CH=G@SETUP(640,480,16,1) LOOP G@CHRCLEAR(CH) I@KEYGET2() FOR I=0 TO 2 G@PRINT(CH,0,I*16,STR(I@KEYBTN2(I))) NEXT G@FLIP() S@SLEEP(1000) //1秒停止 ENDLOOP