Cursorsteuerung ohne IF-Abfragen

[S.O.P.M.]

Hier mal ein Beispiel, wie man sich unnötige IF-Abfragen sparen kann

Code (glbasic) Select Expand

GLOBAL X, Y

WHILE KEY(1) = 0
    INC X, KEY(205) - KEY(203)
    INC Y, KEY(208) - KEY(200)
    FILLRECT X, Y, X + 20, Y + 20, 0xffffff
    SHOWSCREEN
WEND