991 B$=INKEY$ : PRINT B$;