Easy Image Flyer  Flies images into the air.  Shows all the images in the order listed in the contents.  Particle system
integer CrTXUR;
integer TotTXUR;
float wait = 30; //Number of seconds between pix release
Global variables
default {
   state_entry()
 

{ llSetTimerEvent(wait);
TotTXUR=llGetInventoryNumber(INVENTORY_TEXTURE); }

 

timer()

 

{if(0 < TotTXUR)

 

{if(CrTXUR < TotTXUR - 1)
{ CrTXUR++; }

 

else

 

{ CrTXUR=0;
TotTXUR=llGetInventoryNumber(INVENTORY_TEXTURE);}

 

string Ximage= llGetInventoryName(INVENTORY_TEXTURE, CrTXUR);

list ParParams = [
PSYS_PART_FLAGS,( //Mask on:1. Off:0
( 1 * PSYS_PART_EMISSIVE_MASK ) |
( 1 * PSYS_PART_BOUNCE_MASK ) |
( 1 * PSYS_PART_INTERP_COLOR_MASK ) |
( 1 * PSYS_PART_INTERP_SCALE_MASK ) |
( 0 * PSYS_PART_WIND_MASK ) |
( 0 * PSYS_PART_FOLLOW_SRC_MASK ) |
( 0 * PSYS_PART_FOLLOW_VELOCITY_MASK ) |
( 0 * PSYS_PART_TARGET_POS_MASK ) ),

PSYS_PART_START_COLOR, <1.,1.,1.>,
PSYS_PART_END_COLOR, <1.,1.,1.>,
PSYS_PART_START_ALPHA, 1.,
PSYS_PART_END_ALPHA, .6,
PSYS_PART_START_SCALE, < 9., 9., 0.0 >,
PSYS_PART_END_SCALE, < 1., 1., 0.0 >,
PSYS_SRC_PATTERN, PSYS_SRC_PATTERN_EXPLODE,
PSYS_SRC_BURST_PART_COUNT, 1, //Number of particles per burst, 1 to 4096
PSYS_SRC_BURST_RATE, 60., //Seconds between particle bursts, 0.0 to 60
PSYS_PART_MAX_AGE, 55., // How many seconds item displays 0.1 to 60
PSYS_SRC_MAX_AGE , 10., //Number of seconds this particle call continues
PSYS_SRC_ACCEL, < 0.00, 0.01, 0.03 > ,
PSYS_SRC_BURST_RADIUS, 5.,
PSYS_SRC_BURST_SPEED_MIN, .01,
PSYS_SRC_BURST_SPEED_MAX, .01
];

llParticleSystem(ParParams+ [PSYS_SRC_TEXTURE,Ximage ]);}

Adjust ACCEL <X,Y,Z) to give you the direction and speed you want. 

} //Timer Close

}//Default close

 
The Thinkerer 05/09/2008
Copyright (c) D. F. Dansereau & S. H. Evans

Site Map

Where start?

LODScr
Famous fables