Page	59, 132
Title	Video Block Read

; ============================================================================
;   This program is distributed in the hope that it will be useful, but
;   WITHOUT ANY WARRANTY; without even the implied warranty of
;   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE
;
;   Permission to use for any purpose, modify, copy, and make enhancements
;   and derivative works of the software is granted if attribution is given to
;   R.M. Gillmore, dba the ACME Software Deli, as the author
;
;   While the ACME Software Deli does not work for money, there is nonetheless a
;   a significant amount of work involved.  The ACME Software Deli maintains the
;   rights to all code written, though it may be used and distributed as long as
;   the following conditions are maintained.
;
;   1.  The copyright statement at the top of each code block is maintained in
;       your distribution.
;   2.  You do not identify yourself as the ACME Software Deli
;   3.  Any changes made to the software are sent to the ACME Software Deli
; ============================================================================

videoLibrary_Code	segment	public	'Code'

	videoLibrary_CGroup	Group	videoLibrary_Code

	assume	cs:videoLibrary_CGroup

ifndef SMALL
	db	'@(#)vBlock.a86     $Author: rmgillmore $ $Date:: 2025-05-04 19:35:39#$:', 0
endif

	public	readWindowBlock

readWindowBlockFrame	struc
	diskRead_OldFrame	Dw	?
	diskRead_RtnAddr	Dd	?
	contentBufferPtr	Dd	?
	lowerRightCoord		Dw	?
	upperLeftCoord		Dw	?
readWindowBlockFrame	ends

readWindowBlock	proc	far
	Push	Bp
	Mov	Bp, Sp

	Les	Di, [Bp].contentBufferPtr

	Pop	Bp
	Ret
readWindowBlock	endp


videoLibrary_Code	Ends
	End