; LSYS10.M68 -- Patch #2 to SYS:LSYS.MON Version 1.3(123)
;
; This patch corrects 4 problems:  1) If control characters are entered into
; the command line, they will no longer destroy the screen display when
; they are rubbed out,  2) If a program does a DSKDRU without a prior
; DSKDRL, the error is now cleared instead of being propagated,  3) A
; "potential" problem with FETCH is corrected, and  4) Corrects a problem
; with AM-1545/55 and ^C.
;
	COPY	PATCH

	OVER	1,3,0,123.,1
	NVER	1,3,0,123.,2

	OHASH	216,216,002,036
	NHASH	366,350,202,240

	.=2174
	LWORD	55070

	.=11752
	JMP	5$

	.=14116
	SAVE	A0,A3,D3

	.=14140
	REST	A0,A3,D3

	.=15366
	JMP	50$

	.=42202
	LWORD	55070

	.=45346
	JMP	54774

	.=54774
	CLR	12(A3)
	LEA	A0,26(A3)
	RLSE
	RTN
5$:	CMP	A2,MEMBAS
	BHIS	10$
	MOV	JOBCUR,A0
	MOV	14(A0),A6
	CMP	A2,A6
	WORD	62400,134666
	ADD	20(A0),A6
	CMP	A2,A6
	WORD	61000,134654
10$:	WORD	47372,134710
50$:	MOVB	@A3,D6
	CMPB	D6,#40
	WORD	62400,140364
	WORD	47372,140350

	END

.