   10 PRINT CHR$(12)
   20 WIDTH 8
   30 DO
   40 WINDOW CURSOR 0,5
   50 PRINT "ASCII PS/2code Event   Count"
   60 PRINT PEEK(2020),PEEK(2021),PEEK(2022),A
   70 REM SCANKEY RETURNS PS/2 CODE ONCE AFTER KEY HAS BEEN PRESSED
   80 REM OTHERWISE (NO KEY PRESSED SINCE LAST SCANKEY CALL) RETURNS ZERO
   90 IF SCANKEY THEN INC A
  100 LOOP
