GFA BASIC 3.0 Bedienungsanleitung Seite 261

DO
LOOP UNTIL MOUSEK
--> Wartet auf den Druck einer Maustaste.
DO UNTIL MOUSEK=2
DO WHILE MOUSEK=1
LINE 0,0,MOUSEX ,MOUSEY
LOOP
LOOP UNTIL INKEY$="a"
--> Zeichnet bei gedrückt gehaltener linker Maustaste Linien. Wenn die rechte Maustaste
oder 'a' gedrückt wird, endet das Programm.
DO UNTIL EOF(#1)
INPUT #1,a$
LOOP
--> Liest aus Kanal 1 sequentiell Zeichenketten, bis das Dateiende erreicht wird.
WHILE NOT EOF(#1)
INPUT #1,a$
WEND
--> Konstruktion mit WHILE WEND ist langsamer, da zusätzlich NOT benötigt wird.
7-21