;fix#.sub				FIX #.COM
;1/12/87		Copyright 1987, Logic Associates, Chicago
;Roy Lipscomb		Not to be sold.  For free distribution only.
;
;This submit file will patch #.COM (v3.0) to make it operate even
;when console output has been disabled by ECHO3.COM.
;
;The patched version of #.COM produced by this submit file will be named
;#X.COM.
;
;(#.COM is one of the modules of SUPERMT3.LBR.  The latter is a batch-
;language extension that brings BASIC-like capabilities to most batch
;processors, including SUBMIT, EX15, SUPERSUB, and others.  SUPERMIT is
;distributed free by many RCP/Ms and computer clubs, or can be ordered from
;Logic Associates.)
;
;The patching procedure is as follows:
;
;	[]  Copy the following files to drive A:
;	
;			#.COM
;			FIX#.SUB   (this file)
;			DDT.COM
;			SUBMIT.COM
;			XSUB.COM
;
;	[]  Type--	A:<cr>	    where "<cr>" is carriage return.
;	
;	[]  Type--	SUBMIT FIX#
;
;	[]  When the job finishes, consult the "IMPORTANT" note displayed
;	    at the end of the job.
;

XSUB
^C
DDT #.COM
ac5e
mov a,d
sub h
mvi a,0
.
ac6c
ret
.
sc3d
2
.
sbf3
4
.

G0
SAVE 13 #X.com

;***********************************
;========> IMPORTANT!!!  <==========
;
;Is "OE" to the left of "2" above?
;And is "0A" to the left of "4"?
;  If NO,  discard #X.COM.
;  If YES, discard #.COM and use
;          #X.COM from now on.
;                              (end)