;		MOVREC vram �� buffer
;		1993 3/5  Hiroshi TODA

	.386p

cseg	segment	dword public use32 'CODE'
	assume	cs:cseg,ds:cseg

	public	movrec_trans00
	db	'movrec_trans00',14
movrec_trans00	proc	near
	push	ebp
	mov	ebp,esp
	push	esi
	push	edi
	push	ebx
	mov	edi,[ebp+8]
	mov	ax,10ch
	mov	fs,ax
	mov	esi,0
	xor	ecx,ecx

	mov	al,30
	mov	edx,0440h
	out	dx,al
#vd00:	mov	edx,0442h
	in	ax,dx
	test	eax,0400h
	jne	short #vd00

	mov	ebx,eax

#vd01:	mov	edx,0442h
	in	ax,dx
	test	eax,0400h
	je	short #vd01

	test	ebx,0800h
	jne	short #vd00

	mov	edx,240
#vd08:	mov	cl,160			; vram �]��
	rep	movs dword ptr [edi],fs:[esi]
	add	esi,1024*2-640
	dec	edx
	jne	short #vd08

	pop	ebx
	pop	edi
	pop	esi
	mov	esp,ebp
	pop	ebp
	ret
movrec_trans00	endp

cseg	ends
	end