Guest User

Untitled

a guest
Aug 9th, 2018
97
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. float range = 15.0;
  2. float rate = 10.0;
  3.  
  4. list visitor_list;
  5. integer tempDay;
  6.  
  7. integer isNameOnList(string name) {
  8.     integer i;
  9.     for(i=0;i<llGetListLength(visitor_list);i++) {
  10.         if(llList2String(visitor_list, i) == name) {
  11.             return TRUE;
  12.         }
  13.     }
  14.     return FALSE;
  15. }
  16.  
  17. default {
  18.     on_rez(integer param) {
  19.         llResetScript();
  20.     }
  21.     state_entry() {
  22.         tempDay = (integer)llList2String(llParseString2List(llGetDate(), ["-"], []), 2);
  23.         llSetTimerEvent(1800);
  24.         llSensorRepeat("", "", AGENT, range, PI, rate);
  25.     }
  26.     sensor(integer number_detected) {
  27.         integer i;
  28.         for(i=0;i<number_detected;i++) {
  29.             if(llDetectedKey(i) != llGetOwner()) {
  30.                 string detected_name = llDetectedName(i);
  31.                 if(isNameOnList(detected_name) == FALSE) {
  32.                     visitor_list += detected_name;
  33.                     llGiveInventory(llDetectedKey(i), "Store TOS");
  34.                 }
  35.             }
  36.         }
  37.     }
  38.     timer() {
  39.         if((integer)llList2String(llParseString2List(llGetDate(), ["-"], []), 2) != tempDay) {
  40.             llResetScript();
  41.         }
  42.     }
  43. }
Add Comment
Please, Sign In to add comment