Notes

@name Calm Music
@persist [LS,SL,SI]:array P:entity
@model models/bull/various/speaker.mdl
if (first() | duped())
{
timer("readChat",2500)
SL=array("https://www.dropbox.com/s/k7u6cjxv6ibv5ch/Fly%20Me%20To%20The%20Moon%20%28Remastered%29.mp3?dl=1",
"https://www.dropbox.com/s/ghxr2xrc6fca4mf/Daughter%20-%20Youth%20%28Live%20Air%20Studios%29.mp3?dl=1",
"https://www.dropbox.com/s/2cokhyc7odbxb4z/SOB%20by%20Nathaniel%20Rateliff%20%26%20The%20Night%20Sweats%20%28with%20Lyrics%29.mp3?dl=1",
"https://www.dropbox.com/s/hu97zwgg9g19s5p/Adventure%20Time%20-%20Bacon%20Pancakes%20-%20New%20York%20remix.mp3?dl=1",
"https://www.dropbox.com/s/vdd193na8esx1wp/Slow%20Dancing%20in%20a%20Burning%20Room.mp3?dl=1",
"https://www.dropbox.com/s/kkj82a23bj4p6ol/John%20Mayer%20-%20Daughters%20%28lyrics%29.mp3?dl=1",
"https://www.dropbox.com/s/no2dbdlyaer2mhu/John%20Mayer%20-%20New%20Light%20%5BLyrics%5D.mp3?dl=1",
"https://www.dropbox.com/s/7r8xcsjig17zs1i/Gravity%20by%20John%20Mayer.mp3?dl=1" )


SI=array(

"Fly Me To The Moon",
"Youth",
"SOB",
"Bacon Pancakes",
"Slow Dancing",
"Daughters",
"New Light",
"Gravity",
"Dream"
)

holoCreate(1,entity():pos(),vec(1,1,1),ang(),vec(255,255,255),"models/props/de_inferno/fountain.mdl")
LS=owner():lastSaid():explode(" ")
holoDelete(1)
runOnHTTP(1)
streamDisable3D(1)
}
if (clk("xmas"))
{
if (P:isValid())
{
timer("xmas",2500)
}
if (P:getColor()==vec(0,0,255))
{
P:setColor(vec(255,0,0))
}
elseif (P:getColor()==vec(0,255,0))
{
P:setColor(vec(0,0,255))
}
elseif (P:getColor()==vec(255,0,0))
{
P:setColor(vec(0,0,255))
}
}
if (clk("readChat")){
timer("readChat",2500)
local CH = owner():lastSaid():explode(" "),
if (LS[1,string]==CH[1,string] & LS[2,string]==CH[2,string]){
exit()
}
if (CH[1,string]==".youtube")
{
print("Requesting Link... Please Wait...")
httpRequest("http://michaelbelgium.me/ytconverter/convert.php?youtubelink="+CH[2,string])
}
if (CH[1,string]==".play")
{
printColor(vec(0,255,0),"Now Playing: " +SI[CH[2,string]:toNumber(),string])
streamStop(1)
setName("Now Playing: " +SI[CH[2,string]:toNumber(),string])
entity():streamStart(1,SL[CH[2,string]:toNumber(),string],1)
}
elseif(CH[1,string] == ".playowner") { # play on owner
owner():streamStart(1,SL[CH[2,string]:toNumber(),string],1)
setName("Now Playing on "+owner():name()+":"+SI[CH[2,string]:toNumber(),string])
printColor(vec(255,0,69),"Now Playing on You: " +SI[CH[2,string]:toNumber(),string])
}
elseif(CH[1,string]==".volume"){
streamVolume(1,CH[2,string]:toNumber())
printColor(vec(120,255,120),"Volume: "+CH[2,string]:toNumber():toString()+". Remember 1 Is The Max, So Use Numbers Between 0 and 1")
}
elseif(CH[1,string]==".stop"){
streamStop(1)
printColor(vec(255,0,0),"All Music Has Been Stopped!")
}
elseif(CH[1,string]==".songs"){
printColor(vec(255,0,0),"1. Fly Me To The Moon"),
printColor(vec(255,0,0),"2. Youth"),
printColor(vec(255,0,0),"3. SOB"),
printColor(vec(255,0,0),"4. Bacon Pancakes"),
printColor(vec(255,0,0),"5. Slow Dancing"),
printColor(vec(255,0,0),"6. Daughters"),
printColor(vec(255,0,0),"7. New Light"),
printColor(vec(255,0,0),"8. Gravity"),
printColor(vec(255,0,0),"9. Dream")
}
elseif(CH[1,string]==".stream"){
# 181 Radio Stations- http://www.181.fm/mp3links
local Service=CH[2,string]:explode("livestreamingservice.com/")[2,string]:explode("_")[1,string]
setName("Now Streaming: " + Service)
entity():streamStart(1,CH[2,string],1)

}
elseif(CH[1,string]==".xmas"){
timer("xmas",0)
P:setColor(vec(255,0,0))
P:setMaterial("cs_havana/lightbareon01")
}
LS=CH
}elseif(httpClk()){
local Table=jsonDecode(httpData())
if(!Table["error",number]){
streamStop(1)
entity():streamStart(1,Table["file",string],1)
local Text="Now Playing: " +Table["title",string]
setName(Text)
print(Text)
}else {
local Text="Song failed to Load"
print(Text)
}
}