

error_trap	pop	hl					; Where did timout come from?
		
		HEXDEC	hl,err_call				; Buffer to contain ascii address.

		HEXDEC	(PADDRESS),err_call1
		PUMP	DEVICE.console,sys_err_msg$

		jr	$
sys_err_msg$	db	CR.asc;,CR.asc,"Error. PC= "
err_call	db	"      calc address="
fdc_err_call1	db	"      "
		db	ETX.asc

fdc_err_buff	db	"   ",ETX.asc