Versuch es mal so:
Code:
BOOL w = TRUE
STR z=''
ATTACH 'KEYBOARD'
WHILE w
WHILE z<>'ESC' ! GET_CH liefert ESC bei Betätigen der ESC-Taste
z=CALL(GET_CH)
IF z= ....
... Aktion
ELSE IF z= ....
... Aktion
END IF
END WHILE
END WHILE
DETACH 'KEYBOARD' Allerdings verlierst Du dabei den LIST-Befehl. Das heißt, Du musst jede Taste (auf, ab, rechts, links etc.) ausprogrammieren und ein entsprechendes Listing im Bildschirm ausgeben. Das ist für Dich mühsam, könnte aber dem Anwender die gewünschte Vereinfachung bringen.