*******************************************************************
                      Versatile Smoke effect
-------------------------------------------------------------------
Author       : David Thibault (also known as Le DDT)
Email        : david752@hotmail.com
License type : Credit
-------------------------------------------------------------------
Just include this script in your main script and assign the 
DDT_smokeFX action to an entity and it will emit smoke.
(I use a small, invisible and passable dummy entity)

You can change the parameters in WED to change the way the
smoke behave.

If you leave a parameter to 0, it will use it's [default] value.

Parameters

X_Vel      : Velocity of the smoke on the x axis [0]
Y_Vel      : Velocity of the smoke on the y axis [0]
Z_Vel      : Velocity of the smoke on the z axis [3]
For the velocity to use it's default value, all 3 settings must be 0

Fade_Speed : The speed at which the smoke will fade out [0.1]

size       : The size of the smoke bitmap [15]

Start_Alpha: The initial opacity of the smoke [10]

X_Disp     : Amount of dispertion of the effect on the x axis [16]
Y_Disp     : Amount of dispertion of the effect on the y axis [16]
Z_Disp     : Amount of dispertion of the effect on the z axis [0]
For the dispertion to use it's default value, all 3 settings must be 0

Amount     : The amount of smoke particles released per frame
             cycle. This is adjusted with the time variable
             to get a uniform effect on all machines. [5]
-------------------------------------------------------------------
If you use this script, or a modification of this script, please 
include my name in the credits under "Visual Effects programming".
Thanks!

If you have any suggestions for this script, please e-mail me at
david752@hotmail.com
-------------------------------------------------------------------
Thanks to fanatic, from the 3DGS user forum, for helping out a bit!
*******************************************************************