Pastebin is 300% more awesome when you are logged in. Sign Up, it's FREE!
Guest

Untitled

By: a guest on Nov 25th, 2012  |  syntax: None  |  size: 1.69 KB  |  hits: 50  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. list stations = [
  2. "",
  3. "http://scfire-ntc-aa03.stream.aol.com:80/stream/1019",
  4. "http://160.79.128.30:7712",
  5. "http://scfire-mtc-aa03.stream.aol.com:80/stream/1040",
  6. "http://64.62.194.11:8095",
  7. "http://193.239.120.188:8404",
  8. "http://209.9.238.4:9104",
  9. "http://212.25.58.220:8002",
  10. "http://194.158.114.67:5000"
  11. ]; // add station URLs here between the [ ] in quotes seperated by commas "url1", "url2", "url3"....
  12.  
  13. list station_descriptions = ["Stop","","","","","","","","Disco" ];  // add station descriptions here between the [ ] in quotes seperated by commas... they should be in the same order as the urls they describe, you can use "" for any of them if you do not wish to add a description.
  14.  
  15. list djs = [
  16. "74a0c502-8b4d-4073-9955-20157dc16d53",
  17. "d2f0b9a9-a27f-404f-b0f3-88531f38b1aa",
  18. "f54e4d82-5558-41dc-9d1d-76028e75cda4"
  19. ];  // add the names of those authorized to change stations here between the [ ] in quotes seperated by commas
  20.  
  21. integer current_station = 0;
  22.  
  23. default
  24. {
  25.     state_entry()
  26.     {
  27.         current_station = 0;
  28.     }
  29.  
  30.     on_rez(integer start_param)
  31.     {
  32.         llResetScript();
  33.     }
  34.    
  35.     touch_start(integer total_number)
  36.     {
  37.         if(llListFindList(djs, (list)llKey2Name(llDetectedKey(0))) != 0)
  38.         {
  39.             current_station++;
  40.             if(current_station >= llGetListLength(stations))
  41.                 current_station = 0;
  42.             llSetTimerEvent(3);
  43.             llWhisper(0, "Now Playing Station " + (string)current_station + ": " + llList2String(station_descriptions, current_station));
  44.         }
  45.     }
  46.    
  47.     timer()
  48.     {
  49.         llSetParcelMusicURL(llList2String(stations, current_station));
  50.         llSetTimerEvent(0);
  51.     }
  52. }