ich nutze momentan die Beta 4 x86 @ Linux und es kann sein das ich einfach nur was vergessen habe aber warum bewegt sich die Maus in diesem Beispiel nur stockend?
Code: Alles auswählen
Debug "Desktops: "+Str(ExamineDesktops())
width.l = DesktopWidth(0)
height.l = DesktopHeight(0)
InitSprite();
InitKeyboard()
InitMouse()
OpenScreen(width, height, 24, "TestScreen")
Procedure DrawMouse(x.l, y.l)
StartDrawing(ScreenOutput())
Box(x,y,10,10,RGBA(Red(255), Green(255), Blue(255), 100))
StopDrawing()
EndProcedure
mouseX.l = 0
mouseY.l = 0
Repeat
ExamineKeyboard()
ExamineMouse()
mouseX = mouseX + MouseDeltaX()
mouseY = mouseY + MouseDeltaY()
If mouseX < 0
mouseX = 0
EndIf
If mouseY < 0
mouseY = 0
EndIf
ClearScreen(RGB(Red(0), Green(0), Blue(0)))
; Always on top
DrawMouse(mouseX, mouseY)
FlipBuffers()
; Braucht man wegen Synchronisierung eig. nicht... Zum testen...
; Delay(1)
Until KeyboardPushed(#PB_Key_Escape)