Hab mal wieder ein Problem!
Code: Alles auswählen
;PB 4.00
InitSprite()
InitKeyboard()
OpenScreen(800,600,16,"Plotwar")
fr.w = 3
cx.w = 100
cy.w = 100
Repeat
ClearScreen(RGB(255,255,255))
StartDrawing(ScreenOutput())
Circle(cx,cy,fr,255)
StopDrawing()
FlipBuffers()
ExamineKeyboard()
If KeyboardPushed(#PB_Key_S)
cy + 1;+2 oder höher
If cy = 600;Dat funzt denn nicht mehr
cy = 599
EndIf
EndIf
If KeyboardPushed(#PB_Key_W)
cy - 1;hier auch -2 oder weniger
If cy = 0
cy = 1
EndIf
EndIf
If KeyboardPushed(#PB_Key_A)
cx - 1;und hier
If cx = 0
cx = 1
EndIf
EndIf
If KeyboardPushed(#PB_Key_D)
cx + 1;und hier
If cx = 800
cx = 799
EndIf
EndIf
If KeyboardPushed(#PB_Key_Escape)
End
EndIf
ForEver
Nun frag ich mich und euch wieso?
Ich wette es ist wieder mal voll simpel!
