; Patch #3 to SYS:RUN.LIT Ver. 1.1 (166) (AMOS/L Ver. 1.1 & 1.1A) ; ; HASH TOTALS MUST MATCH: ; INPUT RUN.LIT - 665-501-321-464 ; RUN3.M68 - 775-737-565-417 ; PATCHED RUN.LIT - 724-005-054-134 ; ; Developed by Ultrascience (REV. 4.3) COPY PATCH OHASH 665,501,321,464 NHASH 724,005,054,134 OVER 1,1,0,166.,2 NVER 1,1,0,166.,3 .=34 LWORD 1054 .=140 WORD ^H4EBA,AD1-. .=11550 WORD ^H4EBA,AD2-. .=34332 AD1: BYP CLRW 1052(A0) CMPB (A2)+,#'/ BNE 20$ GTDEC MOVW D1,1052(A0) BR 30$ 20$: SETW 1052(A0) SUB #1,A2 30$: MOV A1,1016(A0) RTN AD2: TSTW 1052(A0) BEQ 40$ DECW 1052(A0) BR 50$ 40$: ORW #C.KIN,JOBCMS(A1) 50$: ANDW #-4,@A3 RTN END