While Not KeyHit(1) TileImage(Grass) ; Square Char Rect Rx, Ry, 50, 50, False ;UP If KeyHit(17) Then Rx = Rx - 3 EndIf ;Down If KeyHit(31) Then Rx = Rx + 3 EndIf ;left If KeyHit(30) Then Ry = Ry - 3 EndIf ;right If KeyHit(32) Then Ry = Ry + 3 EndIf Flip:Cls Wend End
I tryed to make the rect move but it wont budge..