;Patch the Intelligent terminal routine to CP/M.
;Written by Malcolm Wright, 2-22-80
;COPYRIGHTED BY SSM 1980

;This routine can be used to link ICRT to the 
;console output entry point in the BIOS.  The
;user must supply two addresses to this routine:
;	VB3INT	= Entry point address to initialize
;		  the ICRT.
;	VB3OUT	= Entry point address to output
;		  to the ICRT.

;User addresses.
VB3INT	EQU	0E400H
VB3OUT	EQU	0E406H

	ORG	100H
;Find BIOS Jump table for any size CP/M.
	LHLD	1	;COPY WARM BOOT ADDR.
	LXI	D,10	;DELTA TO "CONOT"
	DAD	D	;ENTRY ADDRESS FOR CONOT

;Change CONOT jump to ICRT entry.
	LXI	D,VB3OUT
	MOV	M,E
	INX	H
	MOV	M,D

;Set-up VB3 and return.
	CALL	VB3INT	;INITIALIZE VB3
	JMP	0	;WARM BOOT SYSTEM

	END