Shatter Screen Wipe?

See if this is any use... it's another block-explode thing.

Just do this sorta thing with it:

Include "explosions.bb"

AppTitle "Hit SPACE..."

Graphics 640, 480, 0, 2
SetBuffer BackBuffer ()

InitExplosions ()

image = LoadImage ("blah.bmp") ; Screen-sized image...

bang.RenderedExplosion = RenderExplosion (image, 16, 16)

Repeat

	Cls

	; Note: EXPLODE_Num is a global variable containing the number of explosion particles on-screen...

	If EXPLODE_Num = 0
		DrawImage image, 0, 0
	EndIf
	
	If KeyHit (57)
		StartRenderedExplosion (bang, 0, 0, 0, 0, 0.025)
	EndIf
	
	UpdateExplosions ()
	
	Flip
	
Until KeyHit (1)

; Do this when you no longer need the pre-rendered explosion...

FreeRenderedExplosion (bang)

End