@name Music22_Player
@persist [Artist SongName]:string Min Sec On T EntityP:entity
runOnTick(100)
#entity():setVel(owner():pos()+vec(30,0,75)+owner():forward()*-20-entity():pos())

if(dupefinished()){reset()}

if(first()){
runOnChat(1)
runOnHTTP(1)
soundURLPurge()

EntityP = owner()

#entity():setAlpha(0)
}
if(chatClk(owner())){
switch(owner():lastSaid()){
case"#"+owner():lastSaid():explode("#"):string(2),
hideChat(1)
httpRequest("http://music-pesni.com/mp3-music/"+httpUrlEncode(owner():lastSaid():explode("#"):string(2)))
printColor(vec(255,255,0),"Search",vec(255),": "+owner():lastSaid():explode("#"):string(2),vec(255,0,0)," (Please wait...)")
soundURLPurge()
break
}
}
if(httpClk()){
Data=httpData()
URL=Data:matchFirst("http%:/music%-pesni%.com/play/[0-9a-zA-Z+%%]*")
Artist=Data:matchFirst("class%=\"author\"%>%<span class%=\"b%-link%_%_inner\" onclick%=\"getText%_author%(this%)%;scroll%(0%,0%)%; return false\"%>(.-)%<"):replace("&#39;","'")
SongName=Data:matchFirst("class%=\"song\"%>%<span class%=\"b%-link%_%_inner\" onclick%=\"getText%_author%(this%)%;scroll%(0%,0%)%; return false\"%>(.-)%<"):replace("&#39;","'")
Time=Data:matchFirst("duration%-real\"%>([0-9%:]*)%<")
Min=Time:sub(1,1):toNumber()
Sec=Time:sub(3,4):toNumber()
if(URL:find("/play/")){
for(I=1,4){soundURLload(I,URL,100,1,EntityP)}
timer("play",3000)
}else{
printColor(vec(255,0,0),"Song not found!")
}
}
if(clk("play")){
printColor(vec(255,255,0),"Now playing",vec(255),": "+Artist+" - "+SongName)
for(I=1,4){soundURLplay(I) soundURLparent(I,EntityP)}
On=1
}
if(On){
timer("timer",1000)
timer("color",100)
if(clk("color")){
T++
if(T>360){T=0}
#entity():setColor(hsv2rgb(T,1,1))
holoColor(3,hsv2rgb(T,1,1))
#particle(2,3,0,"sprites/gmdm_pickups/light",hsv2rgb(T,1,1),entity():toWorld(vec()),randvec(-1,1)*50)
}
}else{
#entity():setColor(vec(0))
stoptimer("timer")
stoptimer("color")
}
if(Sec<1){Sec=60 Min-=1}
if(Min<0){
setName("Music Player"+"\n"+"Now sleeping")
On=0
}
if(clk("timer")){
Sec--
if(Sec>9){
setName("Music Player"+"\n"+"Now playing:"+"\n"+Artist+" - "+SongName+"\n"+"["+Min+":"+Sec+"]")
}else{
setName("Music Player"+"\n"+"Now playing:"+"\n"+Artist+" - "+SongName+"\n"+"["+Min+":"+"0"+Sec+"]")
}
}
#entity():setVel(owner():pos()+vec(30,0,75)+owner():forward()*-20-entity():pos())