; 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
