キー入力バッファ内のチェックを行い、バッファ内に文字コードが入るまでループし、文字コードが入った時点でループから抜け出し、CCRのZビットに0を返します。
0 0000 ORG $0000
1 0000 KBCHK EQU * --SAMPLE OF "KBCHK" ROUTINE--
2 0000 103F LOOP SWI2 CALL "KBCHK" ROUTINE
3 0002 4A FCB $4A MAP NO=A ROUTINE NO=E
4 0003 0E FCB $0E
5 0004 27 FA BEQ LOOP
6 0006 3F SWI
7 END
コメントをかく