custom=$dff000

	SECTION AS_0,CODE
Begin:
	Move.l	4.w,a6
	Cmp.b	#50,530(a6)	;50 Hertz ?
	Bne	Keine_50_Hertz
	Bsr	R_25
	Cmp.w	#240,-406(a6)
	Blt.s	R_0
	Bsr.s	R_2
	Bra.L	R_4

dummy1:
dc.l	0

dummy2:
dc.l	0

R_0:
	Move.l	-406(a6),a0
	Cmp.w	#$4EF9,(a0)
	Bne.s	R_1
	Bra	R_4

R_1:
	Bsr.s	R_3
R_2:
	Moveq	#6,d0
	Moveq	#0,d1
	Jsr	-198(a6)	;AllocMem()
	Move.l	d0,a0
	Move.w	#$4EF9,(a0)+
	Move.l	-406(a6),(a0)+
	Move.l	#$FFFFFE68,a0
	Move.l	a6,a1
	Jsr	-420(a6)	;SetFunction()
	Rts

R_3:
	Move.l	-406(a6),a0
	Move.l	a0,-(sp)
	Cmp.w	#$2F3A,(a0)
	Bne.s	R_4
	Sub.l	#$3BE,a0
	Move.l	976(a0),d0
	Move.l	a6,a1
	Move.l	#$FFFFFE68,a0
	Jsr	-420(a6)	;SetFunction()
	Move.l	(sp)+,a1
	Sub.l	#$3C6,a1
	Move.l	#$42C,d0
	Jsr	-210(a6)	;FreeMem()
	Clr.l	550(a6)
	Jsr	-612(a6)	;KickSumData()
	Move.l	d0,554(a6)
	Move.b	#1,L_5
	Bsr.s	R_2
R_4:
	Move.l	4.w,a6
	Lea	INTName(pc),a1
	Jsr	-408(a6)	;OldOpenLibrary()
	Move.l	d0,L_2
	Lea	R_46(pc),a0
	Tst.b	(a0)
	Beq.s	R_6
	Moveq.l	#80,d0
	Move.l	#$10003,d1
	Jsr	-198(a6)	;AllocMem()
	Move.l	d0,a1
	Move.l	d0,a2
	Moveq.l	#80,d0
	Lea	R_46(pc),a0
R_5:
	Move.b	(a0)+,(a1)+
	Dbra	d0,R_5
	Move.l	L_2(pc),a6
	Move.l	52(a6),a0
	Move.l	a2,a1
	Move.l	#-1,a2
	Jsr	-276(a6)
R_6:
	Move.l	L_2(pc),a6
	Move.l	52(a6),a0
	Clr.l	d0
	Move.w	10(a0),d0
	Move.l	#256,d1
	Sub.l	d0,d1
	Move.w	8(a0),d2
	Move.l	#$280,d0
	Sub.l	d2,d0
	Jsr	-288(a6)
	Move.l	L_2,a1
	Move.l	4.w,a6
	Jsr	-414(a6)
	Moveq.l	#-1,d0
R_7:
	Dbra	d0,R_7
	Lea	DOSName(pc),a1
	Jsr	-408(a6)	;OldOpenLibrary()
	Move.l	d0,L_1
	Move.l	d0,a6
	Jsr	-60(a6)
	Move.l	d0,L_3
	Move.l	4.w,a6
	Move.l	42(a6),d0
	Lea	R_34(pc),a0
	Bsr	R_21
	Move.l	46(a6),d0
	Lea	R_35(pc),a0
	Bsr	R_21
	Move.l	50(a6),d0
	Lea	R_36(pc),a0
	Bsr	R_21
	Move.l	546(a6),d0
	Lea	R_37(pc),a0
	Bsr	R_21
	Move.l	550(a6),d0
	Lea	R_38(pc),a0
	Bsr	R_21
	Move.l	554(a6),d0
	Lea	R_40(pc),a0
	Bsr	R_21
	Move.l	a6,a0
	Sub.l	#$1C8,a0
	Move.l	2(a0),d0
	Lea	R_41(pc),a0
	Bsr	R_20
	Move.l	550(a6),a0
	Cmp.l	#0,a0
	Beq.s	R_12
	Move.l	(a0),a0
	Move.l	14(a0),a0
	Lea	R_39(pc),a1
	Moveq.l	#19,d0
	Clr.l	d1
R_8:
	Move.b	(a0)+,d1
	Cmp.b	#0,d1
	Beq.s	R_12
	Cmp.b	#32,d1
	Bge.s	R_9
	Bra.s	R_10

R_9:
	Cmp.b	#122,d1
	Ble.s	R_11
R_10:
	Moveq.b	#46,d1
R_11:
	Move.b	d1,(a1)+
	Dbra	d0,R_8
R_12:
	Lea	R_33(pc),a0
	Bsr.s	R_18
	Tst.b	L_5
	Beq.s	R_14
	Lea	R_45(pc),a0
	Bsr.s	R_18
R_13:
	Btst	#6,$BFE001
	Bne.s	R_13
	Bra	R_30

R_14:
	Tst.b	L_4
	Bne.s	R_15
	Lea	R_43(pc),a0
	Bsr.s	R_18
	Bra.s	R_17
R_15:
	Lea	R_42(pc),a0
	Bsr	R_18
R_16:
	Btst	#10,$dff016
	Beq	R_30
	Btst	#6,$BFE001
	Bne.s	R_16
	Lea	R_44(pc),a0
	Bsr.s	R_18
R_17:
	Move.l	4.w,a6
	Move.l	L_1(pc),a1
	Jsr	-414(a6)	;CloseLibrary()
	moveq.l	#0,d0
	Rts

R_18:
	Movem.w	d0-d7/a1-a6,-(sp)
	Move.l	L_1(pc),a6
	Move.l	L_3(pc),d1
	Clr.l	d3
	Move.l	a0,d2
R_19:
	Addq.l	#1,d3
	Tst.b	(a0)+
	Bne.s	R_19
	Jsr	-48(a6)
	Movem.w	(sp)+,d0-d7/a1-a6
	Rts

R_20:
	Cmp.l	#$FC0000,d0
	Bgt.s	R_22
	Move.b	#1,L_4
	Move.l	#$204D4F44,10(a0)	; "!| MOD.."
	Move.l	#$49464945,14(a0)	; "!|IFIE.."
	Move.l	#$44202120,18(a0)	; "!|D ! .."
	Bra.s	R_22

R_21:
	Tst.l	d0
	Beq.s	R_22
	Move.b	#1,L_4
R_22:
	Move.l	a0,a1
	Move.l	#$30303030,(a1)+; ""ü0000"
	Move.l	#$30303030,(a1)	; ""¼0000"
	Addq.w	#8,a0
R_23:
	Move.l	d0,d1
	And.b	#15,d1
	Add.b	#48,d1
	Cmp.b	#57,d1
	Ble.s	R_24
	Addq.b	#7,d1
R_24:
	Move.b	d1,-(a0)
	Lsr.l	#4,d0
	Bne.s	R_23
	Rts

R_25:
	Cmp.b	#1,d0
	Beq.s	R_29
	Lea	R_46(pc),a1
	Bsr.s	R_28
	Cmp.b	#34,d1
	Beq.s	R_26
	Subq.w	#1,a0
	Move.b	#32,L_0
R_26:
	Bsr.s	R_28
	Move.b	d1,(a1)+
	Cmp.b	#10,d1
	Beq.s	R_27
	dc.b	$0C		;Cmpi.b	#34,d1
	dc.b	$01
	dc.b	$00
L_0:
	dc.b	$22
	Bne.s	R_26
R_27:
	Clr.b	-(a1)
	Rts

R_28:
	Move.b	(a0)+,d1
R_29:
	Rts

R_30:
	Move.l	4.w,a6
	Jsr	-120(a6)
	Clr.l	42(a6)
	Clr.l	46(a6)
	Clr.l	50(a6)
	Clr.l	546(a6)
	Clr.l	550(a6)
	Clr.l	554(a6)
Keine_50_Hertz:
	Lea	$FC0000,a5
	Move.w	#$4E70,d0
K5H_loop:
	Cmp.w	(a5)+,d0
	Bne.s	K5H_loop
	Lea	-2(a5),a5
	Jmp	-30(a6)		;Supervisor()

even
R_33:
	dc.b	$0C
	dc.b	"  ---------------------------------------------",10
	dc.b	"  VECTOR-BUSTER V2.0 - (c)1990 by FREAKWARE.INC",10
	dc.b	"  --------------------------------------------- ",10
	dc.b	"  ColdCapture: $"
even
R_34:
	dc.b	"00000000 ",10
	dc.b	"  CoolCapture: $"
even
R_35:
	dc.b	"00000000 ",10
	dc.b	"  WarmCapture: $"
even
R_36:
	dc.b	"00000000 ",10
	dc.b	"  KickMemPtr : $"
even
R_37:
	dc.b	"00000000 ",10
	dc.b	"  KickTagPtr : $"
even
R_38:
	dc.b	"00000000 '"
even
R_39:
	dc.b	"....................'",10
	dc.b	"  KickChkSum : $"
even
R_40:
	dc.b	"00000000 ",10
	dc.b	"  DoIO()     : $"
even
R_41:
	dc.b	"00000000 - O.K.             ",10
	dc.b	"  ---------------------------------------------",10
	dc.b	$00
even
R_42:
	dc.b	"  MOUSE-CONTROL",10
	dc.b	"  -------------",10
	dc.b	"  Right: Reset all vectors",10
	dc.b	"  Left : X-it  ",10
	dc.b	"  ---------------------------------------------",10
	dc.b	$00
even
R_43:
	dc.b	"  ALL VECTORS O.K. !",10
	dc.b	"  ---------------------------------------------",10
even
R_44:
	dc.b	"  Leaving . . . . .",10
	dc.b	$0A
	dc.b	$00
even
R_45:
	dc.b	"  *** WARNING: IRQ-LinkVirus detected !",10
	dc.b	"  ---------------------------------------------",10
	dc.b	"  Press left mousebutton to kill ...",10
	dc.b	$0A
	dc.b	$00
	dc.b	$00
even
DOSName:
	dc.b	"dos.library",0
even
INTName:
	dc.b	"intuition.library",0
even
L_1:
	dc.b	$00,$00,$00,$00
even
L_2:
	dc.b	$00,$00,$00,$00
even
L_3:
	dc.b	$00,$00,$00,$00
even
L_4:
	dc.b	$00
even
L_5:
	dc.b	$00
even
R_46:
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
	dc.b	$00,$00,$00,$00,$00,$00,$00,$00
even
	or.b	#0,d0