FreeAllSprites

Last Modified: 10/16/2021

Resets all sprite data.

Example

Syntax: FreeAllSprites

Dim sprites(5) As Integer          For i = 0 To 5         sprites(i) = AddSprite(1,1)         PropSprite sprites(i),1,0         MoveSprite sprites(i),136+(i<<4),136     Next          Locate 4,0: Print "Press Start to Clear all Sprites"          Do         j = JoyPad()         If j.7 Then             FreeAllSprites             Exit Do         End If         Sleep 1     Loop          End

Remarks

If you don't want to reset all of the sprite data, the FreeSprite command allows a single sprite to be reset.

See Also

FreeSprite, HideSprite, LinkSprite, MoveSprite, PropSprite, ResizeSprite, ShiftSprite, AddSprite(), SpritePosX(), SpritePosY()