_fpseek:
MOV.L R2,R5 ; R2(オフセット)をR5に設定
MOV.L #PARM,R2 ; パラメータ・ブロックのアドレスをR2に設定
MOV.L R5,4h:5[R2] ; R5をR1+4バイト(オフセット)に設定
MOV.B R1,1h:5[R2] ; R1(ファイル番号)をR1+1バイトに設定
MOV.B R3,2h:5[R2] ; R3(ディレクション)をR2+2バイト(ディレクション)
; に設定
MOV.L #010C0000h,R1 ; FSEEKの関数コードをR1に設定
MOV.L #SIM_IO,R5 ; システム・コールのアドレスをR5に設定
JSR R5 ; システム・コール
NOP
MOV.L #PARM,R1 ; パラメータ・ブロックのアドレスをR1に設定
MOV.B [R1],R1 ; R1の先頭1バイト(実行結果)をR1に設定
RTS ; 呼び出し元のアドレスに戻る
.SECTION B,DATA,ALIGN=4
PARM: .BLKL 2 ; パラメータ・ブロック領域
|