Here's another script I've found out there. I odified it to be a "popcorn" script - big explosion and then smaller ongoing pops, but it's easy to change (add or subtract).
===========================
_markdest = _this select 0
;explosion
~.1
"LaserGuidedBomb" CamCreate [(getpos _markdest select 0),(getpos _markdest select 1), 0]
~.5
"Shell125" CamCreate [(getpos _markdest select 0),(getpos _markdest select 1), 0]
~.35
"Heat125" CamCreate [(getpos _markdest select 0),(getpos _markdest select 1), 10]
~.25
"Heat73" CamCreate [(getpos _markdest select 0),(getpos _markdest select 1), 20]
~.5
"Shell73" CamCreate [(getpos _markdest select 0),(getpos _markdest select 1), 5]
~.75
exit
==============
don't know if it helps.