Guest User

Untitled

a guest
Nov 2nd, 2019
141
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #####################################
  2. default
  3. {
  4.     touch_start(integer n)
  5.     {
  6.         llShout(-6766, "sesame");
  7.     }
  8. }
  9. #####################################
  10. integer power;
  11. integer echo;
  12.  
  13. sesame(float dir)
  14. {
  15.     float desc = (float)llGetObjectDesc();
  16.     integer i;
  17.     for(i = 0; i < desc; i++)
  18.     {
  19.         llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_SIZE, (llGetScale() + <dir, 0.0, 0.0>)]);
  20.         llSleep(0.025);
  21.     }
  22.     state default;
  23. }
  24.  
  25. default
  26. {
  27.     state_entry()
  28.     {
  29.         if (!power) llSetScale(<0.5, 0.5, 0.5>);
  30.         echo = llListen(-6766, "", "", "");
  31.     }
  32.  
  33.     listen(integer channel, string name, key id, string message)
  34.     {
  35.         if (message == "sesame")
  36.         {
  37.             llListenRemove(echo);
  38.             state sesame;
  39.         }          
  40.     }
  41. }
  42.  
  43. state sesame
  44. {
  45.     state_entry()
  46.     {
  47.         if (power =! power) sesame(0.1);
  48.         else sesame(-0.1);          
  49.     }
  50. }
  51. #####################################
RAW Paste Data