may be, flipbuffer don't work correctly
please run this code and give me the debug
Code: Select all
InitSprite():InitMouse():InitKeyboard()
OpenWindow(0,0,0,800,600,"",#PB_Window_ScreenCentered)
OpenWindowedScreen(WindowID(0),0,0,800,600)
CreateSprite(0,128,128)
StartDrawing(SpriteOutput(0))
Circle(64,64,64,$ff)
StopDrawing()
t=ElapsedMilliseconds()
For i=1 To 60
While WindowEvent():Wend
ExamineMouse()
ExamineKeyboard()
ClearScreen(0)
DisplaySprite(0,MouseX()-64,MouseY()-64)
FlipBuffers()
Next
Debug (ElapsedMilliseconds()-t)
