// black or white.
float loclip (float num, float clipat ){ // num is number (usually random)
num = num + .5- clipat ; // between 0 and 1
float Result = num * llRound (num);// clipat is clip point
return Result;}// Numbers less than clipat are set to zero.
float randFMTO(float FM, float TO) //Result is random number ranging
{ return llFrand(TO- FM) + FM; }//ranging from FM to TO.
float WhitePCT = 90.;
loclip
num is number (usually random) between 0 and 1; clipat is clip point. Numbers less than clipat are set to zero.
loclip
These are reused in other scripts here and elsewhere.
default {
state_entry()
{float RTM = randFMTO (1,47) ; //set random increment to wait time
integer RTMI = (integer) RTM;
llSetTimerEvent(19+RTMI); } //next time interval set to 19+RTMI
timer()
{float red = llFrand (1); /randon selection and clipping of colors
float green = llFrand (1);
float blue = llFrand (1);
red= loclip(red,.7);
green = loclip(green,.7);
blue= loclip(blue,.7);
if (red+green+blue = 0.0) { //Check for black
if ( WhitePCT > randFMTO ( 0.0, 100.0 ) ) { // Set white by pct
red = 1.0;
blue = 1.0;
green = 1.0;
} }
llSetColor(<(float)red,(float)green,(float)blue >, ALL_SIDES); } }
float loclip (float num, float clipat ){
//num is number (usually random) between 0 and 1. clipat is clip point. Numbers less than clipat are set to zero
num = num + .5- clipat ;
float Result = num * llRound (num);
return Result;
}
float randFMTO(float FM, float TO) //Result is random number ranging
{ return llFrand(TO- FM) + FM; }//ranging from FM to TO.
default
{
state_entry()
{float RTM = randFMTO (1,57) ; //set random increment to wait time
integer RTMI = (integer) RTM;
llSetTimerEvent(99+RTMI); }
timer()
{
float blue = llFrand (1);
float green = llFrand (1);
float red = 0.0;
blue = loclip(blue,.3);
green = loclip(green,.3);
llSetColor(<(float)red,(float)green,(float)blue >, ALL_SIDES);
} }
float loclip (float num, float clipat ){
num = num + .5- clipat ;
float Result = num * llRound (num);
return Result;
}
float randFMTO(float FM, float TO) //Result is random number ranging
{ return llFrand(TO- FM) + FM; }//ranging from FM to TO.
default
{
state_entry()
{float RTM = randFMTO (1,17) ; //set random increment to wait time
integer RTMI = (integer) RTM;
llSetTimerEvent(99+RTMI); }
timer()
{
float red = llFrand (1);
float green = llFrand (1);
float blue = 0.0;
red= loclip(red,.3);
green = loclip(green,.3);
llSetColor(<(float)red,(float)green,(float)blue >, ALL_SIDES);
} }
float loclip (float num, float clipat ){
//num is number (usually random) between 0 and 1. clipat is clip point. Numbers less than clipat are set to zero
num = num + .5- clipat ;
float Result = num * llRound (num);
return Result;
}
float randFMTO(float FM, float TO) //Result is random number ranging
{ return llFrand(TO- FM) + FM; }//ranging from FM to TO.
default
{
state_entry()
{float RTM = randFMTO (1,37) ; //set random increment to wait time
integer RTMI = (integer) RTM;
llSetTimerEvent(99+RTMI); }
timer()
{
float red = llFrand (1);
float green = llFrand (1);
float blue = 0.0;
red= loclip(red,.3);
green = loclip(green,.3);
llSetColor(<(float)red,(float)green,(float)blue >, ALL_SIDES);
} }
float loclip (float num, float clipat )
{num = num + .5- clipat ;
float Result = num * llRound (num);
return Result;}
float randFMTO(float FM, float TO)
{ return llFrand(TO- FM) + FM; }
default {
state_entry()
{float RTM = randFMTO (1,47) ; //set random increment to wait time
integer RTMI = (integer) RTM;
llSetTimerEvent(117+RTMI); }// wait time 117 + RTM seconds
timer()
{float red = randFMTO (.5, 1 );
float green = randFMTO (.5, 1 );
float blue =randFMTO (.5, 1 );
llSetColor(<(float)red,(float)green,(float)blue >, ALL_SIDES); } }