02-08-2004, 08:51 PM
INP(96) returns keyboard scancodes
CLS
WHILE keynumber% <> 1 'ESC = 1
keynumber% = INP(96)
LOCATE 1, 1: PRINT "The number of the key being pressed is"; keynumber%; " "
LOCATE 2, 1: PRINT "(Press some keys)"
WEND
CLS
WHILE keynumber% <> 1 'ESC = 1
keynumber% = INP(96)
LOCATE 1, 1: PRINT "The number of the key being pressed is"; keynumber%; " "
LOCATE 2, 1: PRINT "(Press some keys)"
WEND