_charget:
MOV.L #1210000h,R1 ; GETCの機能コードをR1に設定
MOV.L #IO_BUF,R2 ; 入力バッファ先頭アドレスをR2に設定
MOV.L #PARM,R3 ; パラメータ・ブロックのアドレスをR3に設定
MOV.L R2,[R3] ; 入力バッファ先頭アドレスをパラメータ・ブロックに設定
MOV.L R3,R2 ; R3(パラメータ・ブロックのアドレス)をR2に設定
MOV.L #SIM_IO,R3 ; システム・コールのアドレスをR3に設定
JSR R3 ; システム・コール
MOV.L #IO_BUF,R2 ; 入力バッファ先頭アドレスをR2に設定
MOVU.B [R2],R1 ; 入力バッファ先頭1バイト(取得した1バイト文字)をR1に設定
RTS ; 呼び出し元のアドレスに戻る
.SECTION B,DATA,ALIGN=4
PARM: .BLKL 1 ; パラメータ・ブロック領域
.SECTION B_1,DATA
IO_BUF: .BLKL 1 ; 入出力バッファ
|