Last Modified: 10/16/2021

Resets all sprite data.


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
    Locate 4,0: Print "Press Start to Clear all Sprites"
        j = JoyPad()
        If j.7 Then
            Exit Do
        End If
        Sleep 1


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()