endo.a

汇编编程艺术

include stdlib.a
include baseobj.a
include baseobj.aa 

;
; endo: baseobj   A MASM++ object for a single window.
;		  Written by Michael A. Griffith and Todd D. Vender		;
; Modification List:
;
; 25 Oct 91  Michael A. Griffith & Todd D. Vender:
;            Created.
;
; 26 Oct 91  Michael A. Griffith:
;
; 1 Nov 91   Michael A. Griffith & Todd D. Vender:
;            converted to baseobj format
;
; 19 Dec 91  Michael A. Griffith
;            Added error and changed name to nameof
;
; 27 Dec 91  Michael A. Griffth
;	     Changed object order so that parent is a pointer.
;
; 29 Jan 92  Todd D. Vender
;	     Fixed the putchar (putc) problem.  Changed defaults.
;
; 01 Feb 92  John M. Gibson
;	     Set up the put routines not using the stdlib.
;	     Redefined cxo and cyo to be in terms of the logical window.
;
; 02 Feb 92  John M. Gibson
;	     Set default window attributes
;
; 03 Feb 92  John M. Gibson
;	     Added movecursor to endo methods
;
IFNDEF ENDO__
ENDO__		EQU	0	



endo__methods	STRUC
			new		DD	PROC PTR endo__new
			constructor	DD	PROC PTR endo__constructor
			destructor	DD	PROC PTR endo__destructor
			delete		DD	PROC PTR baseobj__delete
			printself	DD	PROC PTR endo__printself
			nameof		DD	PROC PTR endo__nameof
			error		DD	PROC PTR baseobj__error
			regs		DD	PROC PTR baseobj__regs
			putchar		DD	PROC PTR endo__putchar
			putstr		DD	PROC PTR endo__putstr
			putwin		DD	PROC PTR endo__putwin
			up		DD	PROC PTR endo__up
			down		DD	PROC PTR endo__down
			left		DD	PROC PTR endo__left
			right		DD	PROC PTR endo__right
			movecursor	DD	PROC PTR endo__movecursor
			scrup		DD	PROC PTR endo__scrup
			scrdown		DD	PROC PTR endo__scrdown
			scrleft		DD	PROC PTR endo__scrleft
			scrright	DD	PROC PTR endo__scrright
endo__methods	ENDS



endo__data		STRUC
			classname	DB	"endo", 0
			id		DB	(?)
			above		DB	(?)
			below		DB	(?)
			lxs		DW	(80)
			lys		DW	(25)
			lxo		DW	(0)
			lyo		DW	(0)
			pxs		DB	(30)
			pys		DB	(10)
			pxo		DB	(5)
			pyo		DB	(5)
			cxo		DB	(0)
			cyo		DB	(0)
			status		DB	(2)
			attr		DB	(2Ah)
			logical		DD	(?)	
endo__data		ENDS


endo			STRUC
			parent	        DD	0 
			methods		endo__methods <>
			data		endo__data <>
endo			ENDS

ENDIF	;__ENDO