; auto-interrupts patches ; last update 13/12/2003 JL_0_118C: ; Vector 1 TBE, DSKBLK, SOFTINT movem.l D0-D1/A0-A1/A5-A6,-(A7) lea _custom,A0 move.w intenar(A0),D1 btst #$E,D1 beq.b AJL_0_1226 and.w intreqr(A0),D1 btst #2,D1 beq.b JL_0_11BE movea.l PExecBase(PC),A6 movem.l IVSOFTINT(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_11BC: jmp (A5) cnop 0,4 JL_0_11BE: btst #$1,D1 beq.b JL_0_11D2 movea.l PExecBase(PC),A6 movem.l IVDSKBLK(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_11D0: jmp (A5) cnop 0,4 JL_0_11D2: btst #$0,D1 beq.b AJL_0_1226 movea.l PExecBase(PC),A6 movem.l IVTBE(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) jmp (A5) cnop 0,4 AJL_0_1226: addq.l #4,A7 move.l (A7)+,D1 movea.l (A7),A0 lea $10(A7),A7 rte cnop 0,4 JL_0_11F4: ;Vector 2 PORTS movem.l D0-D1/A0-A1/A5-A6,-(A7) lea _custom,A0 move.w intenar(A0),D1 btst #$E,D1 beq.b JL_0_122C and.w intreqr(A0),D1 btst #$3,D1 beq.b JL_0_122C movea.l PExecBase(PC),A6 movem.l IVPORTS(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_1224: jmp (A5) cnop 0,4 JL_0_122C: addq.l #4,A7 move.l (A7)+,D1 movea.l (A7),A0 lea $10(A7),A7 rte cnop 0,4 JL_0_1244: ; Vector 3 COPER, VERTB, BLIT movem.l D0-D1/A0-A1/A5-A6,-(A7) lea _custom,A0 move.w intenar(A0),D1 btst #$E,D1 beq.b pinco3 and.w intreqr(A0),D1 btst #$6,D1 beq.b JL_0_1276 movea.l PExecBase(PC),A6 movem.l IVBLIT(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) jmp (A5) cnop 0,4 JL_0_1276: btst #$5,D1 beq.b JL_0_128A movea.l PExecBase(PC),A6 movem.l IVVERTB(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_1288: jmp (A5) cnop 0,4 JL_0_128A: btst #$4,D1 beq.b pinco3 movea.l PExecBase(PC),A6 movem.l IVCOPER(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_129C: jmp (A5) cnop 0,4 pinco3: addq.l #4,A7 move.l (A7)+,D1 movea.l (A7),A0 lea $10(A7),A7 rte cnop 0,4 JL_0_12AC: ; Vector 4 AUD0, AUD1, AUD2, AUD3 movem.l D0-D1/A0-A1/A5-A6,-(A7) lea _custom,A0 move.w intenar(A0),D1 btst #$E,D1 beq.w JL_0_133E and.w intreqr(A0),D1 movea.l PExecBase(PC),A6 JL_0_12CC: btst #$8,D1 beq.b JL_0_12E0 movem.l IVAUD1(A6),A1/A5 move.l A6,-(A7) pea JL_0_1322(PC) L_0_12DE: jmp (A5) cnop 0,4 JL_0_12E0: btst #$A,D1 beq.b JL_0_12F4 movem.l IVAUD3(A6),A1/A5 move.l A6,-(A7) pea JL_0_1322(PC) L_0_12F2: jmp (A5) cnop 0,4 JL_0_12F4: tst.b D1 bpl.b JL_0_1308 movem.l IVAUD0(A6),A1/A5 move.l A6,-(A7) pea JL_0_1322(PC) L_0_1306: jmp (A5) cnop 0,4 JL_0_1308: btst #$9,D1 beq.b JL_0_131C movem.l IVAUD2(A6),A1/A5 move.l A6,-(A7) pea JL_0_1322(PC) L_0_131A: jmp (A5) cnop 0,4 JL_0_131C: movem.l (A7)+,D0-D1/A0-A1/A5-A6 rte cnop 0,4 JL_0_1322: movea.l (A7)+,A6 lea _custom,A0 move.w #$0780,D1 and.w intenar(A0),D1 and.w intreqr(A0),D1 bne.b JL_0_12CC move.l A6,-(A7) bra.w ExitIntr ;jmp _LVOExitIntr(a6) cnop 0,4 JL_0_133E: addq.l #4,A7 move.l (A7)+,D1 movea.l (A7),A0 lea $10(A7),A7 rte cnop 0,4 JL_0_1358: ; Vector 5 RBF DSKSYNC movem.l D0-D1/A0-A1/A5-A6,-(A7) lea _custom,A0 move.w intenar(A0),D1 btst #$E,D1 beq.b pinco2 and.w intreqr(A0),D1 btst #$C,D1 beq.b JL_0_138A movea.l PExecBase(PC),A6 movem.l IVDSKSYNC(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_1388: jmp (A5) cnop 0,4 JL_0_138A: btst #$B,D1 beq.b pinco2 movea.l PExecBase(PC),A6 movem.l IVRBF(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_139C: jmp (A5) cnop 0,4 pinco2: addq.l #4,A7 move.l (A7)+,D1 movea.l (A7),A0 lea $10(A7),A7 rte cnop 0,4 JL_0_13B0: ; Vector 6 EXTER INTEN movem.l D0-D1/A0-A1/A5-A6,-(A7) lea _custom,A0 move.w intenar(A0),D1 btst #$E,D1 beq.b JL_0_13F6 and.w intreqr(A0),D1 btst #$E,D1 beq.b JL_0_13E2 movea.l PExecBase(PC),A6 movem.l IVINTEN(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_13E0: jmp (A5) cnop 0,4 JL_0_13E2: btst #$D,D1 beq.b JL_0_13F6 movea.l PExecBase(PC),A6 movem.l IVEXTER(A6),A1/A5 move.l A6,-(A7) pea _LVOExitIntr(A6) L_0_13F4: jmp (A5) cnop 0,4 JL_0_13F6: addq.l #4,A7 move.l (A7)+,D1 movea.l (A7),A0 lea $10(A7),A7 rte cnop 0,4