home *** CD-ROM | disk | FTP | other *** search
- .386p
-
- CODE segment dword public ER use32 'CODE'
- assume cs:CODE
-
- ; <<< I/O出力プロシジャ >>>
-
- ; <<< 1バイト出力 callm outb&,addr,data >>>
- out_b proc near ; 'out_b'プロシジャの始まり
- mov edx,4[esp] ; 第1パラメータ'addr'を受け取る
- mov eax,8[esp] ; 第2パラメータ'data'を受け取る
- out dx,al ; I/O書き込み
- ret ; F-BASIC386に戻る
- out_b endp ; プロシジャの終わり
- ; <<< 1ワード出力 callm outw&,addr,data >>>
- out_w proc near
- mov edx,4[esp] ; 同上
- mov eax,8[esp]
- out dx,ax
- ret
- out_w endp
-
- ; <<< I/O入力プロシジャ >>>
-
- ; <<< 1バイト入力 val=callm(inb&,addr) >>>
- in_b proc near
- mov edx,4[esp] ; 第1パラメータ'addr'を受け取る
- in al,dx ; I/Oからalに読み込む
- movzx eax,al ; alをeaxに拡張/eaxが戻り値
- ret ; F-BASIC386に戻る
- in_b endp
- ; <<< 1ワード入力 val=callm(inw&,addr) >>>
- in_w proc near
- mov edx,4[esp] ; 同上
- in ax,dx
- movzx eax,ax
- ret
- in_w endp
-
- CODE ends
- end