) !/ ,6:
Description
This command is used to get the status of the PAUSE and FEED keys. This command waits until either
key is pressed, whereupon 0 is returned if PAUSE key is pressed and 1 is returned if FEED key is
pressed.
Syntax
GETKEY()
Model PAUSE FEED
Example
DOWNLOAD "DEMO4.BAS"
SIZE 4,4
GAP 0,0
CLS
:START
A=GETKEY()
IF A=0 THEN GOTO PAUSEB
IF A=1 THEN GOTO FEEDB
:PAUSEB
CLS
TEXT 50,10,"4",0,1,1,"PAUSE key is pressed !"
PRINT 1
GOTO START
:FEEDB
CLS
TEXT 50,10,"4",0,1,1,"FEED key is pressed !"
PRINT 1
EOP
See Also
DOWNLOAD, EOP, END, GOTO