Rakis Heron @Rakis

Opensim Hyper Grid Offline

Give and take is opensim.

Red pulsar flashing light

// Rakis Heron @ yeali.outworldz.net:8002 
// 
// The red pulsar creates slow, red, flashing light effect. 
// 
// Red pulsar flashing light 
default { 
state_entry() { 
llParticleSystem 
([ 
PSYS_PART_FLAGS, 
PSYS_PART_INTERP_COLOR_MASK| 
PSYS_PART_FOLLOW_SRC_MASK| 
PSYS_PART_EMISSIVE_MASK, PSYS_SRC_PATTERN, 
PSYS_SRC_PATTERN_ANGLE_CONE, 
PSYS_SRC_INNERANGLE, 0.0, 
PSYS_SRC_OUTERANGLE, 0.1, 
PSYS_SRC_BURST_SPEED_MIN, 0.0, 
PSYS_SRC_BURST_SPEED_MAX, 0.0, 
PSYS_SRC_BURST_RADIUS, 0.0, 
PSYS_SRC_BURST_PART_COUNT, 5, 
PSYS_SRC_BURST_RATE, 2.0, 
PSYS_PART_MAX_AGE, 1.0, 
PSYS_PART_START_SCALE, <50,50,50>, // light size 
PSYS_PART_START_COLOR, <1,0.2,0.2>, 
PSYS_PART_END_COLOR, <1,0,0>, 
PSYS_PART_START_ALPHA, 1.0, 
PSYS_PART_END_ALPHA, 0.0 
]); 
} 
}

👍 1 like

0 comments

Rain with on off switch

// Two scripts in same prim: 
 
// Script 1 the switch on off 
 
// Script name: Rain on off 
 
integer PLAY_SOUND = TRUE; // TRUE for a click-sound, FALSE for silent. 
string SOUND = "64319812-dab1-4e89-b1ca-5fc937b8d94a"; // a click sound 
string CONTROLLER_ID = "A"; // see more about CONTROL TEMPLATES at end. 
integer mode = 0; // keep track of whether particles are ON(1) or OFF(0). 
 
default { 
touch_start(integer total_number) { 
 
if ( PLAY_SOUND ) llPlaySound( SOUND, 1.0 ); 
 
mode = ! mode; // flip on to off, (or off to on). 
 
llMessageLinked( LINK_SET, mode, CONTROLLER_ID, NULL_KEY ); // send command 
 
} 
 
// Listen for other controllers sending ON/OFF commands and remember changes: 
 
link_message( integer sibling, integer num, string controller_id, key ignore ) { 
 
if ( controller_id != CONTROLLER_ID ) return; // this message is not for us. 
 
mode = num; 
 
} 
 
} 
 
// ####################### EOF ########################## 
 
 
// Script 2 the rain 
// Script name: Rain 
 
 
integer PLAY_SOUND = TRUE; // TRUE for a click-sound, FALSE for silent. 
string SOUND = "64319812-dab1-4e89-b1ca-5fc937b8d94a"; // a click sound 
string CONTROLLER_ID = "A"; // see more about CONTROL TEMPLATES at end. 
integer mode = 0; // keep track of whether particles are ON(1) or OFF(0). 
 
default { 
 
touch_start(integer total_number) { 
 
if ( PLAY_SOUND ) llPlaySound( SOUND, 1.0 ); 
 
mode = ! mode; // flip on to off, (or off to on). 
 
llMessageLinked( LINK_SET, mode, CONTROLLER_ID, NULL_KEY ); // send command 
 
} 
 
// Listen for other controllers sending ON/OFF commands and remember changes: 
 
link_message( integer sibling, integer num, string controller_id, key ignore ) { 
 
if ( controller_id != CONTROLLER_ID ) return; // this message is not for us. 
 
mode = num; 
} 
} 
 
// ####################### EOF ##########################

👍 4 like

0 comments

Fairy Stars div colours

// Fairy Stars div colours 
// Download script and items here: 
https://www.rakisworld.ch/downloads/FairyStars.zip 
 
 
// Script name: Fairy Stars div colours.lsl 
 
// Rakis World, Rakis Heron @ yeali.outworldz.net:8002 
// 
// Script by RAKis - Rakis Heron 
// Particle Script 0.5 
// SL - 17-6-2004 
 
integer on; 
 
particles(string texture) 
{ 
// mask flags - set to TRUE (or 1) to enable 
integer bounce = 0; // Make particles bounce on Z plane of object 
integer glow = 1; // Make the particles glow 
integer interpColor = 0; // Go from start to end color 
integer interpSize = 1; // Go from start to end size 
integer followSource = 0; // Particles follow the source 
integer followVel = 1; // Particles turn to velocity direction 
integer wind = 0; // Particles affected by wind 
 
//pattern: 
//integer pattern = PSYS_SRC_PATTERN_ANGLE; 
//integer pattern = PSYS_SRC_PATTERN_ANGLE_CONE_EMPTY; 
//integer pattern = PSYS_SRC_PATTERN_ANGLE_CONE; 
//integer pattern = PSYS_SRC_PATTERN_DROP; 
integer pattern = PSYS_SRC_PATTERN_EXPLODE; 
 
// Select a target for particles to go towards 
// "" for no target, "owner" will follow object owner 
// and "self" will target this object 
// or put the key of an object for particles to go to 
//key target = ""; 
key target = ""; 
//key target = "owner"; 
 
// particle parameters 
float age = 5; // Life of each particle 
 
float maxSpeed = .1; // Max speed each particle is spit out at 
float minSpeed = .01; // Min speed each particle is spit out at 
 
 
float startAlpha = 1; // Start alpha (transparency) value 
float endAlpha = 1; // End alpha (transparency) value (if interpColor = TRUE) 
 
vector startColor = <1,1,1>; // Start color of particles <R,G,B> 
vector endColor = <1,0,0>; // End color of particles <R,G,B> (if interpColor = TRUE) 
 
vector startSize = <.3,.3,0>; // Start size of particles <x,y> 
vector endSize = <.1,.1,0>; // End size of particles (if interpSize == TRUE) 
 
vector push = <0,0,-.1>; // Force pushed on particles 
 
// system parameters 
float life = 0; // Life in seconds for the system to make particles 
integer count = 4; // How many particles to emit per BURST 
float rate = .1; // How fast (rate) to emit particles 
float radius = .5; // Radius to emit particles for BURST pattern 
float outerAngle = 1.54; // Outer angle for all ANGLE patterns 
float innerAngle = 1.55; // Inner angle for all ANGLE patterns 
vector omega = <0,0,0>; // Rotation of ANGLE patterns around the source 
 
integer flags = 0; 
 
if (target == "owner") target = llGetOwner(); 
if (target == "self") target = llGetKey(); 
if (glow) flags = flags | PSYS_PART_EMISSIVE_MASK; 
if (bounce) flags = flags | PSYS_PART_BOUNCE_MASK; 
if (interpColor) flags = flags | PSYS_PART_INTERP_COLOR_MASK; 
if (interpSize) flags = flags | PSYS_PART_INTERP_SCALE_MASK; 
if (wind) flags = flags | PSYS_PART_WIND_MASK; 
if (followSource) flags = flags | PSYS_PART_FOLLOW_SRC_MASK; 
if (followVel) flags = flags | PSYS_PART_FOLLOW_VELOCITY_MASK; 
if (target != "") flags = flags | PSYS_PART_TARGET_POS_MASK; 
llParticleSystem([ PSYS_PART_MAX_AGE,age, 
PSYS_PART_FLAGS,flags, 
PSYS_PART_START_COLOR, startColor, 
PSYS_PART_END_COLOR, endColor, 
PSYS_PART_START_SCALE,startSize, 
PSYS_PART_END_SCALE,endSize, 
PSYS_SRC_PATTERN, pattern, 
PSYS_SRC_BURST_RATE,rate, 
PSYS_SRC_ACCEL, push, 
PSYS_SRC_BURST_PART_COUNT,count, 
PSYS_SRC_BURST_RADIUS,radius, 
PSYS_SRC_BURST_SPEED_MIN,minSpeed, 
PSYS_SRC_BURST_SPEED_MAX,maxSpeed, 
PSYS_SRC_TARGET_KEY,target, 
PSYS_SRC_INNERANGLE,innerAngle, 
PSYS_SRC_OUTERANGLE,outerAngle, 
PSYS_SRC_OMEGA, omega, 
PSYS_SRC_MAX_AGE, life, 
PSYS_SRC_TEXTURE, texture, 
PSYS_PART_START_ALPHA, startAlpha, 
PSYS_PART_END_ALPHA, endAlpha 
]); 
} 
 
default 
{ 
state_entry() 
{ 
 
llSetTimerEvent(1); 
} 
 
timer(){ 
particles(llGetInventoryName(INVENTORY_TEXTURE,(integer)llFrand(llGetInventoryNumber(INVENTORY_TEXTURE)))); 
llSetTimerEvent( ((integer)llFrand(2)+1)); 
} 
 
link_message(integer sender_num, integer num, string str, key id){ 
 
if(str == "off") { 
llSetTimerEvent(0); 
llParticleSystem([]); 
}else { 
if(str == "on") { 
llSetTimerEvent(1); 
} 
} 
 
} 
 
}

👍 2 like

4 comments