TC1k的和NC2k的差不多~
试试这个小程序(我自己设计的~):
1 FOR I=191 TO 198
2 IF PEEK(I)<255 THEN CLSOCATE 3,1RINT"刚才按键PEEK地址:";I;" PEEK值:";PEEK(I)
3 NEXT :GOTO 1
只是对付不了"跳出"键
对付跳出键如下(对付不了热键):
1 FOR I=191 TO 198
2 IF PEEK(199)>128 THEN CLS:W$=INKEY$OCATE 3,1RINT"刚才按键PEEK地址:";I;" PEEK值:";PEEK(I)
3 NEXT :GOTO 1
好象是这样,忘了带机出来了~
有错我下次会改滴~不好意思!