Advertisement
salahzar

cambia colori artistico 5 metri

Apr 4th, 2014
208
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. float DISTANZA=5;
  2. float SPEED=.5;
  3.  
  4. list rossi = [
  5.  
  6. <196, 30, 58>, // rosso cardinale
  7. <200, 8, 21>, // rosso veneziano
  8. <255, 0, 255>, // magenta
  9. <224, 76, 55> // malva
  10. ];
  11.  
  12.  
  13. default
  14. {
  15.     state_entry()
  16.     {
  17.         llSensorRepeat("",NULL_KEY,AGENT,DISTANZA,PI,2);
  18.     }
  19.     no_sensor()
  20.     {
  21.        // llOwnerSay("NoSensor");
  22.         llSetTimerEvent(0);
  23.         integer i;
  24.         for(i=0;i<llGetNumberOfPrims();i++)
  25.         {
  26.             llSetLinkColor(i+1,<1,1,1>,ALL_SIDES);
  27.         }
  28.     }
  29.     sensor(integer x)
  30.     {
  31.        // llOwnerSay("Sensor");
  32.         llSetTimerEvent(SPEED);
  33.     }
  34.     timer()
  35.     {
  36.         integer i;
  37.         for(i=0;i<llGetNumberOfPrims();i++)
  38.         {
  39.             integer random=(integer)llFrand(llGetListLength(rossi));
  40.             vector color=(vector)llList2Vector(rossi,random);
  41.             //llOwnerSay((string)random+(string)color);
  42.             llSetLinkPrimitiveParamsFast(i+1,[ PRIM_COLOR, ALL_SIDES, color/256, 1] );
  43.         }
  44.        
  45.     }
  46. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement