SYSBEEP=0 WHILE 1  K$=INKEY$()  A=INSTR("AWSEDFTGYHUJKOL",K$)  IF K$!="" AND A>=0 THEN BEEP 22,A*100  VSYNC WEND