Class Explosion Expands Root Intrinsic

Dim Effect              As Editable Class     ' Pyrotechnic effect for explosion, if any
Dim InitialSound        As Editable Sound     ' Initial sound (when explosion starts)
Dim Noise               As Editable Byte      ' Noise initially generated by explosion.
Dim Debris(10)          As Editable Class     ' List of debris objects thrown out of explosion.
Dim DebrisCount         As Editable Integer   ' Number of debris objects to use from Debris().
Dim Radius              As Editable Real      ' Radius of explosion, in world units.
Dim RadiusIncrement     As Editable Real      ' Radius increment for each tick.
Dim Damage(4)           As Editable Byte      ' Indexed by EDamageType
Dim DamageIncrement     As Editable Real      ' Damage increment per tick. (usually < 0)
Dim Momentum            As Editable Real      ' Outwards momentum at point of explosion.
Dim MomentumIncrement   As Editable Real      ' Momentum increment per tick (usually < 0).
 