; master library module
;
; Description:
;	ファイルの書き込み
;
; Functions/Procedures:
;	int dos_write( int fh, const void far * buffer, unsigned len ) ;
;
; Parameters:
;	
;
; Returns:
;	int	AccessDenied (cy=1)	失敗,書き込み禁止
;		InvalidHandle(cy=1)	失敗,ファイルハンドルが無効
;		else	     (cy=0)	成功,書き込んだバイト数
;
; Binding Target:
;	Microsoft-C / Turbo-C / Turbo Pascal
;
; Running Target:
;	PC-9801
;
; Requiring Resources:
;	CPU: 8086
;
; Notes:
;	
;
; Compiler/Assembler:
;	TASM 3.0
;	OPTASM 1.6
;
; Author:
;	恋塚(恋塚昭彦)
;
; Revision History:
;	93/ 3/17 Initial: master.lib
;

func DOS_WRITE
	push	BP
	mov	BP,SP
	@@fh	= (RETSIZE+4)*2
	@@buf	= (RETSIZE+2)*2
	@@len	= (RETSIZE+1)*2

	push	DS
	mov	BX,[BP+@@fh]
	lds	DX,[BP+@@buf]
	mov	CX,[BP+@@len]
	mov	AH,40h
	int	21h
	pop	DS
	jnc	short @@SUCCESS
	neg	AX	; cy=1
@@SUCCESS:
	pop	BP
	ret	8
endfunc