Files
RomWBW/branches/dwg/Apps/crossdev/TERMINAL.LIB
doug e312ea9d7a this is the first serious commit of the entire apps suite.
not all there yet, but the core apps are, see coreapps.bat.
2013-02-16 05:36:54 +00:00

34 lines
896 B
Plaintext
Raw Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
; terminal.lib 2/17/2012 dwg - review for release 1.5.1.0
; terminal.lib 2/11/2012 dwg - review for release 1.5
; terminal.lib 2/07/2012 dwg - review for release 1.5
; terminal.lib 12/25/2011 dwg -
;
;--------------------------
extrn xcrtinit
extrn xcrtlc
extrn xcrtclr
crtinit macro
enter
call xcrtinit
leave
endm
;--------------------------
; Clear the CRT Screen using the appropriate escape sequence by termtype
crtclr macro
enter
call xcrtclr ; call actual routine in terminal.asm
leave
endm
;--------------------------
crtlc macro line,column
enter
mvi h,line ; load 1st positional parameter into reg
mvi l,column ; load 2nd positional parameter into reg
call xcrtlc ; call actual routine in terminal.asm
leave
endm
;--------------------------
; eof - terminal.lib