; ==ECHO3.ASM===H Weinstein==============8310151700=============
;	       Rancho Bernardo CA 92128
; --------------------------------------------------------------
;
;            Toggles echo of screen to LST:
;
; ==============================================================

	org 100h
;
; EQUATES:
;
WBOTLOC equ 1		; location of WBOOT address
TGL	equ 0Eh		; mask for CALL/JMP toggle
CONOUT	equ 00Ch	; offset into BIOS for console display
;
;
	lhld wbotloc	; get address of CONOUT
	mvi l,conout
	mov a,m		; get op code out of BIOS
	xri tgl		; toggle it
	mov m,a		; put it back into BIOS
	ret		; return quietly to the CCP
;	
	END	100h
