   10 REM > KeyDOS
   20 CLS
   30 OFF
   40 REPEAT
   50   VDU 30
   60   FOR A%=0 TO 255
   70     IF INKEY(&FE00+A%):PRINT" "FNh0(A%,3); ELSE PRINTSPC4;
   80     IF (A% AND 15)=15:PRINT
   90   NEXT
  100 UNTIL FALSE
  110 DEFFNh0(A%,N%)=RIGHT$("0000000"+STR$~A%,N%)
