GFA BASIC 3.0 Bedienungsanleitung Seite 447

AES-Bibliotheken
Beispiel:
DO
SELECT EVNT BUTTON(2,1,1,mx%,my%, bu%,kb%)
CASE1
PLOT mx%,my%
CASE2
PBOX mx%-10,my%-10,mx%+10 ,my%+10
ENDSELECT
LOOP UNTIL BTST(kb%,2)
--> Wartet auf Mausklicks mit der linken Maustaste. Bei Einfachklick wird ein Punkt gesetzt,
bei Doppelklick ein Quadrat. Beendet wird dieses Beispiel, wenn zusätzlich zum Klick
auch die Control-Taste gedrückt wird.
11-21