Advertisement
cyber_Ahn

gate_api_scan_inworld

Mar 30th, 2015
368
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. list api;
  2. default
  3. {
  4.     on_rez(integer start_param)
  5.     {
  6.         llResetScript();
  7.     }
  8.     state_entry()
  9.     {
  10.         llListen(-905000, "", "", ""); //Milkyway
  11.         llListen(-805000, "", "", ""); //Pegasus
  12.         llListen(-605000, "", "", ""); //Destiny
  13.         llListen(-505000, "", "", ""); //Iconian
  14.        
  15.         llSetText("ready", <1,1,1>, 1);
  16.     }
  17.     listen(integer c, string n, key id, string message)
  18.     {
  19.             if(c == -905000)
  20.             {
  21.                 message = "M: " + message;
  22.             }
  23.             else if(c == -705000)
  24.             {
  25.                 message = "T: " + message;
  26.             }
  27.             else if(c == -605000)
  28.             {
  29.                 message = "D: " + message;
  30.             }
  31.             else if(c == -505000)
  32.             {
  33.                 message = "I: " + message;
  34.             }
  35.             else
  36.             {
  37.                 message = "P: " + message;
  38.             }
  39.             api += message;
  40.             if(llGetListLength(api) > 5)
  41.             {
  42.                 api = llDeleteSubList(api, 0, 0);
  43.             }
  44.             llSetText(llDumpList2String(api, "\n"), <1,1,1>, 1);
  45.            
  46.             llSay(0,message);
  47.     }
  48. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement