Code: Select all
LoadSprite(0,"cake_down.png")
UseBuffer(0)
For x=0 To 5
GrabSprite(4070+x, x*80,0, 80,256)
GrabSprite(4080+x, x*80,272, 80,256)
Next x

It is more reliable to cause UseBuffer() each time: (in Windowed mode)
Code: Select all
LoadSprite(0,"cake_down.png")
For x=0 To 5
UseBuffer(0)
GrabSprite(4070+x, x*80,0, 80,256)
UseBuffer(0)
GrabSprite(4080+x, x*80,272, 80,256)
Next x