gmod e2 music player codes
@name Music Searcher v1.0
@inputs S:wirelink Key KInUse
@outputs 
@persist W H ID Reg M:vector2 SoundID LastPlayed LastPlayedText LastSelected LastSelectedText CurrentPlaying CurrentTime 
@persist StartTime [SearchStr UrlPrefix]:string [SongArray UrlsArray TimeArray]:array RuLayout:array RuLayout2:array RH  Ply:entity
@persist Mode Cursor1 Cursor2 Cursor
@persist SearchBarText SearchBar ResultPanel FoundText LanguageText TimeText [Results ResultsText ResultsTextTime]:array

@model models/bull/various/speaker.mdl
interval(10)
runOnHTTP(1)
gmod e2 music player codes How to get it for free? gmod e2 music player codes

if(first()) {
    #ifdef soundURLload(number, string, number, number, entity)
        Mode = 1
    #else
        Mode = 0
    #endif
    
    if(Mode != 1) {
        #ifdef soundPlayURL(number, number, string)
gmod e2 music player codes How to use it? gmod e2 music player codes
            Mode = 2
        #else
            Mode = 0
        #endif
    }
        
    if(Mode == 0) {
        printColor(vec(0, 150, 255), "Install ", vec(255, 50, 0), "E2P", vec(0, 150, 255), ", for properly work.")
        selfDestruct()   
    }
gmod e2 music player codes How to get it for free? gmod e2 music player codes
    
    ID = 1
    W = 512
    H = W
    Reg = 1
    SoundID = owner():id()
    
    RuLayout = array(0x445, 92, 0x44A, 0x0, 0x0, 0x44D, 0x444, 0x438, 0x441, 0x432, 0x443, 0x430, 0x43F, 0x440, 0x448, 0x43E, 0x43B, 0x434, 0x44C, 0x442, 0x449, 0x437, 0x439, 0x43A, 0x44B, 0x435, 0x433, 0x43C, 0x446, 0x447, 0x43D, 0x44F)
    
    # Fuck that cyrillic unicode...
gmod e2 music player codes How to dowload it? gmod e2 music player codes
    RuLayout2[39, number] = 0x44D
    RuLayout2[44, number] = 0x431
    RuLayout2[46, number] = 0x44E
    RuLayout2[59, number] = 0x436
    
    function number addBox(Pos:vector2, Size:vector2) {
        S:egpBox(ID, Pos, Size)
        ID++
        return ID - 1
    }
gmod e2 music player codes How to use it? gmod e2 music player codes
    
    function number addBoxOutline(Pos:vector2, Size:vector2) {
        S:egpBoxOutline(ID, Pos, Size)
        ID++
        return ID - 1
    }
    
    function number addRoundedBox(Pos:vector2, Size:vector2) {
        S:egpRoundedBox(ID, Pos, Size)
        ID++
gmod e2 music player codes PasteShr gmod e2 music player codes
        return ID - 1
    }
    
    function number addText(Str:string, Pos:vector2, Size) {
        S:egpText(ID, Str, Pos)
        #S:egpSize(ID, Size)
        S:egpFont(ID, "fixedsys", Size)
        ID++
        return ID - 1
    }
gmod e2 music player codes PasteShr gmod e2 music player codes
    
    function number addMultiLine(Args:array) {
        #S:egpLine(ID, Pos1, Pos2)
        S:egpPolyOutline(ID, Args)
        S:egpSize(ID, 2)
        ID++
        return ID - 1
    }
    
    function number addTextLayout(Str:string, Pos:vector2, Size) {
gmod e2 music player codes How to get it? gmod e2 music player codes
        S:egpTextLayout(ID, Str, Pos, vec2(Size))
        ID++
        return ID - 1
    }
    
    function string timeToText(Time) {
        Mins = floor(Time / 60)
        Seconds = Time - Mins * 60
        SSeconds = Seconds + ""
        if(Seconds < 10) { SSeconds = "0" + Seconds }
gmod e2 music player codes How to use it? gmod e2 music player codes
        return Mins + ":" + SSeconds
    }
    
    function drawResults(From) {
        J = 1
        for(I = From, 10) {
            S:egpSetText(ResultsText[J, number], SongArray[I, string]:replace("~", " - "):left(48))
            S:egpSetText(ResultsTextTime[J, number], timeToText(TimeArray[I, number]))
            J++
        }
gmod e2 music player codes How to get it? gmod e2 music player codes
    }
    
    function switchLanguage() {
        Reg = !Reg
        if(Reg) {
            S:egpSetText(LanguageText, "EN")
        } else {
            S:egpSetText(LanguageText, "RU")
        }   
    }
gmod e2 music player codes How to dowload it? gmod e2 music player codes
    
    function play(URL:string) {
        if(Mode == 1) {
            #ifdef soundURLload(number, string, number, number, entity)
                soundURLload(SoundID, URL, 1, 0, entity())
            #endif
        } else {
            #ifdef soundPlayURL(number, number, string)
                soundPlayURL(SoundID, 100000, URL)
            #endif
gmod e2 music player codes PasteShr gmod e2 music player codes
        }
    }
    
    if(Mode == 1) {
        #ifdef soundURLpause(number)  
        soundURLpause(SoundID)  
        #endif 
    }

    
gmod e2 music player codes PasteShr gmod e2 music player codes
    S:egpClear()
    S:egpDrawTopLeft(1)
    
    SearchBar = addBox(vec2(5, 5), vec2(512 - 10, 26))
    S:egpColor(SearchBar, vec(50))
    
    SearchBar = addBoxOutline(vec2(5, 5), vec2(512 - 10, 26))
    S:egpColor(SearchBar, vec(160))
    
    SearchBarText = addText("Enter song name...", vec2(10, 5), 20)
gmod e2 music player codes PasteShr gmod e2 music player codes
    S:egpColor(SearchBarText, vec(200))
    
    TimeText = addText("0:00/0:00", vec2(10, H - 35), 20)
    S:egpColor(TimeText, vec(200))
    
    #ResultPanel = addBox(vec2(5, 51), vec2(512 - 10, 454))
    #S:egpColor(ResultPanel, vec(100))
    
    RH = 41
    for(I = 1, 10) {
gmod e2 music player codes How to dowload it? gmod e2 music player codes
        Results[I, number] = addRoundedBox(vec2(7, I * (RH + 1) + 2), vec2(512 - 14, RH))
        S:egpColor(Results[I, number], vec(50, 50, 50))
        
        ResultsText[I, number] = addText("", vec2(10, I * (RH + 1) + 10), 20)
        S:egpColor(ResultsText[I, number], vec(0, 150, 255))
        
        ResultsTextTime[I, number] = addText("", vec2(W - 15, I * (RH + 1) + 12), 18)
        S:egpAlign(ResultsTextTime[I, number], 2)
        S:egpColor(ResultsTextTime[I, number], vec(200))
    }
gmod e2 music player codes How to use it? gmod e2 music player codes
    
    #FoundText = addText("Found: ", vec2(10, 40), 20)
    #S:egpColor(FoundText, vec(50))
    
    LanguagePanel = addBox(vec2(W - 30, 7), vec2(25, 22))
    S:egpColor(LanguagePanel, vec(50))
    
    LanguageText = addText("EN", vec2(W - 29, 8), 18)
    S:egpColor(LanguageText, vec(250))
    
gmod e2 music player codes PasteShr gmod e2 music player codes
    Cursor = addMultiLine(array(vec2(0, 0), vec2(0, 20), vec2(4, 11), vec2(16, 16)))
    S:egpColor(Cursor, vec4(0, 148, 255, 150))
    S:egpParentToCursor(Cursor)
    
    LastSelected = Results[1, number]
    LastSelectedText = ResultsText[1, number]
    LastPlayed = 1
    
    Ply = owner()
}
gmod e2 music player codes How to get it for free? gmod e2 music player codes

if(findCanQuery()) {
    findIncludeClass("player")
    findInSphere(entity():pos(), 500)
    findSortByDistance(entity():pos())
    #Ply = find()
}

M = S:egpCursor(Ply)
S:egpColor(LastSelectedText, vec(0, 150, 255))
gmod e2 music player codes PasteShr gmod e2 music player codes

if(LastSelected == Results[CurrentPlaying, number]) {
    S:egpColor(LastSelected, vec(100, 90, 100))
    
} else {
    S:egpColor(LastSelected, vec(50, 50, 50))
}

if(M:y() < 462) {
    Num = round((M:y() - 20) / (RH + 1))
gmod e2 music player codes How to use it? gmod e2 music player codes
    if(Num >= 1 & Num <= 10) {
        if(Num == CurrentPlaying) {
            S:egpColor(Results[Num, number], vec(120, 110, 120))
        } else {
            S:egpColor(Results[Num, number], vec(150))
        }
        S:egpColor(ResultsText[Num, number], vec(255))
        LastSelected = Results[Num, number]
        LastSelectedText = ResultsText[Num, number]
        
gmod e2 music player codes How to get it for free? gmod e2 music player codes
        if(changed(Ply:keyUse()) & Ply:keyUse()) {
            play("http://vk-music.ru" + UrlsArray[Num, string])
            CurrentPlaying = Num
            S:egpColor(Results[LastPlayed, number], vec(50))
            LastPlayed = Num
            StartTime = curtime()
        }
    }
} else {
    
gmod e2 music player codes How to get it for free? gmod e2 music player codes
}
#print(Num + " " + Results[Num, number] + " " + LastSelected + " " + randint(10000))

if(changed(Ply:keyUse()) & Ply:keyUse()) {
    if(inrange(M, vec2(W - 30, 7), vec2(W - 30, 7) + vec2(25, 22))) {
        switchLanguage()
    }
}

if(clk("timeChange")) {
gmod e2 music player codes How to get it? gmod e2 music player codes
    CurrentTime = floor(curtime() - StartTime)
    SongTime = TimeArray[CurrentPlaying, number]
    S:egpSetText(TimeText, timeToText(CurrentTime) + "/" + timeToText(SongTime))
    #CurrentSeconds++
    if(CurrentTime < SongTime) {
        timer("timeChange", 1000)
    }
}

if(KInUse & ~Key & Key) {
gmod e2 music player codes PasteShr gmod e2 music player codes
    if(Key == 127) {
        C = 1
        if(toByte(SearchStr[SearchStr:length()]) > 126) {
            C = 2
        }
        SearchStr = SearchStr:left(SearchStr:length() - C)
    } elseif(Key == 13) {
        if(httpCanRequest()) {
            Req = httpUrlEncode(SearchStr)
            httpRequest("http://negi.sytes.net/gmod/search.php?args=" + Req)
gmod e2 music player codes How to get it for free? gmod e2 music player codes
            httpRequestUrl()
        } else {
            print("Site is not available")
        }
    } elseif(Key == 9) {
        switchLanguage()
    } elseif(Key != 154) {
        if(!Reg) {
            if(Key >= 65 & Key <= 90) {
                Key += 32
gmod e2 music player codes How to use it? gmod e2 music player codes
            }
            if(Key >= 91 & Key <= 122) {
                UC = RuLayout[Key - 90, number]
            } elseif(Key == 32 | Key >= 48 & Key <= 57) {
                UC = Key
            } else {
                UC = RuLayout2[Key, number]
            }
        } else {
            UC = Key
gmod e2 music player codes How to get it? gmod e2 music player codes
        }
        SearchStr += toUnicodeChar(UC)
    }
    S:egpSetText(SearchBarText, SearchStr)
}

if(httpClk()) {
    Data = httpData():explode("\n")
    Count = Data:count()
    print("Found " + Count)
gmod e2 music player codes PasteShr gmod e2 music player codes
    
    if(Data[1, string] == "ok") {
        SongsCount = Data[2, string]:toNumber()
        
        for(I = 1, Count - 4) {
            SongArray[I, string] = Data[I + 2, string]
            #print(Data[I + 2, string])
        }
        
        if(Count - 4 < 10) {
gmod e2 music player codes How to use it? gmod e2 music player codes
            for(I = Count - 3, SongArray:count() - Count) {
                SongArray[I, string] = ""
            }
        }
        
        UrlsArray = Data[Count - 1, string]:explode(",")
        TimeArray = Data[Count, string]:explode(",")
        play("http://vk-music.ru" + UrlsArray[1, string])
        S:egpColor(ResultsText[1, number], vec(0, 150, 255))
        S:egpColor(Results[LastPlayed, number], vec(50))
gmod e2 music player codes How to get it? gmod e2 music player codes
        S:egpColor(Results[1, number], vec(100, 90, 100))
        for(I = 1, Count - 4) {
            TimeArray[I, number] = TimeArray[I, string]:toNumber()
        }
        timer("timeChange", 1000)
        
        drawResults(1)
        CurrentPlaying = 1
        LastPlayed = 1
        StartTime = curtime()
gmod e2 music player codes PasteShr gmod e2 music player codes
    } else {
        print("Not found")
        S:egpSetText(ResultsText[1, number], " Nothing found")
        S:egpColor(ResultsText[1, number], vec(255, 50, 0))
        for(I = 2, 10) {
            S:egpSetText(ResultsText[I, number], "")
        }
    }
}
gmod e2 music player codes