- Code: Select all
Procedure Handler_RenderFrame()
DisplaySprite(0,0,0)
Debug "yep!"
GrabSprite(1,10,10,35,35)
Debug "nop T_T"
FlipBuffers()
EndProcedure
InitSprite()
OpenScreen(300,300,0,"CRASH!")
CreateSprite(0,300,300)
StartDrawing(SpriteOutput(0))
Box(0,0,300,300,$F0F0FF)
StopDrawing()
BindEvent(#PB_Event_RenderFrame,@Handler_RenderFrame())
FlipBuffers()