Particle creation with random velocity and spin macro.

What does it do?

It takes a single selected object and asks for a whole bunch of numbers that 
let you define the velocity in the x,y, and z plus a spin factor and then 
creates as many copies of your object as you specify. They all start in the 
same place but as soon as you add a processor the magic begins, all sorts of 
particle effects are now possible.

The numbers is wants are as follows...

X,Y,Z velocity - It asks for 2 numbers for each axis. This lets you give the
randomness a general heading. If you entered 5 and 1 for the X velocity then
the particles would head more to the left than anywhere else. Entering 0's for
both the Y velocities would stop the particles going up or down, Get the idea?

The Spin factor is mulitplied by a random number for X,Y, and Z which means the 
objects can spin in absolutely any direction, the higher the factor the greater 
the potential speed of the spin. Entering 0 will stop them from spinning at 
all.

The quantity is simply how many copies of the objects you want to make, the 
only limit is the amount of ram you have. The minimum is 1.

How to run it?

Copy the file crepart.rpl to the r3d2:macros directory and add the following 
lines to your RPL startup :-

"r3d2:macros/crepart.rpl" LOAD

: KEY_5 .crepart 0 ; ( nb. This can be replaced with any key you wish )

Now boot Real and create an object, anything at all, a sphere, a Space Shuttle, 
whatever. Now press 5 (or whatever key you used) and enter some numbers. Create 
a processor method and play the animation.

It will only take 1 object and complains if you have more than one selected, it 
will also shout if you have a VVEL or VSPI tag on the object and ask you to 
deltete them. The object has no other limitations. It can contain other 
animation methods, etc, etc...

I plan to add some math based functions, so it might create 500 copies and make 
them spread out in a sphere but I need someone to give me the right code, I'm 
no programmer, I just muddled my way through!!! If you can do it them go ahead, 
just let me have a copy!!!

Andy Jones,

Activa UK Tech Support

+44 81 402 5064

2:254/516.1@fidonet
