INCDIR sys:devpack/include/

;	include intuition/intuition_lib.i

;	include libraries/dos_lib.i

	include exec/exec_lib.i
	ifnd AbsExecBase
AbsExecBase equ 4
	endc

	include hardware/custom.i
	ifnd custom
custom equ $dff000
	endc
;dos.library	at $630
;intuition.library	at $63C
;-------------------------------

	SECTION AS_0,CODE
_Begin:	;$C08388
	Movea.l	$4,a6		; ",y...."
	Cmpi.b	#50,530(a6)		; "...2.."
	Bne	R_31		; "f..."
	Bsr	R_25		; "a..¾"
	Cmpi.w	#240,-406(a6)		; ".n.ðþj"
	Blt.s	R_0		; "m."
	Bsr.s	R_2		; "a."
	Bra.s	R_4		; "`z"

R_0:		;$20
	Movea.l	-406(a6),a0		; " nþj"
	Cmpi.w	#$4EF9,(a0)		; ".PNù"
	Bne.s	R_1		; "f."
	Bra	R_4		; "`..n"

R_1:		;$2E
	Bsr.s	R_3		; "a "
R_2:		;$30
	Moveq	#6,d0		; "p."
	Moveq	#0,d1		; "r."
	Jsr	_LVOAllocMem(a6)	; EXE
;	Jsr	_LVODelay(a6)	; DOS
;	Jsr	_LVOOpenScreen(a6)	; INT		; "N®ÿ:"
	Movea.l	d0,a0		; " @"
	Move.w	#$4EF9,(a0)+		; "0üNù"
	Move.l	-406(a6),(a0)+		; " îþj"
	Movea.l	#$FFFFFE68,a0		; " |ÿÿþh"
	Movea.l	a6,a1		; ""N"
	Jsr	_LVOSetFunction(a6)	; EXE
;	Jsr	_LVOUnlockIBase(a6)	; INT		; "N®þ\"
	Rts			; "Nu"

R_3:		;$50
	Movea.l	-406(a6),a0		; " nþj"
	Move.l	a0,-(sp)		; "/."
	Cmpi.w	#$2F3A,(a0)		; ".P/:"
	Bne.s	R_4		; "f>"
	Suba.l	#$3BE,a0		; "‘ü...¾"
	Move.l	976(a0),d0		; " (.Ð"
	Movea.l	a6,a1		; ""N"
	Movea.l	#$FFFFFE68,a0		; " |ÿÿþh"
	Jsr	_LVOSetFunction(a6)	; EXE
;	Jsr	_LVOUnlockIBase(a6)	; INT		; "N®þ\"
	Movea.l	(sp)+,a1		; ""_"
	Suba.l	#$3C6,a1		; "“ü...Æ"
	Move.l	#$42C,d0		; " <...,"
	Jsr	_LVOFreeMem(a6)	; EXE
;	Jsr	_LVOParentDir(a6)	; DOS
;	Jsr	_LVOOpenWorkBench(a6)	; INT		; "N®ÿ."
	Clr.l	550(a6)		; "B®.&"
	Jsr	_LVOSumKickData(a6)	; EXE		; "N®ýœ"
	Move.l	d0,554(a6)		; "-@.*"
	Move.b	#1,L_5		; ".ü...À‰ã"
	Bsr.s	R_2		; "a–"
R_4:		;$9A
	Movea.l	$4,a6		; ",y...."
	Lea	_INTName0(pc),a1		; "Cú.š"
	Jsr	_LVOOldOpenLibrary(a6)	; EXE
;	Jsr	_LVOFreeRemember(a6)	; INT		; "N®þh"
	Move.l	d0,L_2		; "#À.À‰Ú"
	Lea	R_46(pc),a0		; "Aú.¬"
	Tst.b	(a0)		; "J."
	Beq.s	R_6		; "g8"
	Move.l	#80,d0		; " <...P"
	Move.l	#$10003,d1		; ""<...."
	Jsr	_LVOAllocMem(a6)	; EXE
;	Jsr	_LVODelay(a6)	; DOS
;	Jsr	_LVOOpenScreen(a6)	; INT		; "N®ÿ:"
	Movea.l	d0,a1		; ""@"
	Movea.l	d0,a2		; "$@"
	Move.l	#80,d0		; " <...P"
	Lea	R_46(pc),a0		; "Aú.Š"
R_5:		;$D4
	Move.b	(a0)+,(a1)+		; ".Ø"
	Dbra	d0,R_5		; "QÈÿü"
	Movea.l	L_2(pc),a6		; ",z.v"
	Movea.l	52(a6),a0		; " n.4"
	Movea.l	a2,a1		; ""J"
	Movea.l	#-1,a2		; "$|ÿÿÿÿ"
	Jsr	_LVOFindName(a6)	; EXE
;	Jsr	_LVOSetWindowTitles(a6)	; INT		; "N®þì"
R_6:		;$EE
	Movea.l	L_2(pc),a6		; ",z.b"
	Movea.l	52(a6),a0		; " n.4"
	Clr.l	d0		; "B€"
	Move.w	10(a0),d0		; "0(.."
	Move.l	#256,d1		; ""<...."
	Sub.l	d0,d1		; "’€"
	Move.w	8(a0),d2		; "4(.."
	Move.l	#$280,d0		; " <...€"
	Sub.l	d2,d0		; "�‚"
	Jsr	_LVORemTask(a6)	; EXE
;	Jsr	_LVOSizeWindow(a6)	; INT		; "N®þà"
	Movea.l	L_2,a1		; ""y.À‰Ú"
	Movea.l	$4,a6		; ",y...."
	Jsr	_LVOCloseLibrary(a6)	; EXE
;	Jsr	_LVOLockIBase(a6)	; INT		; "N®þb"
	Move.l	#-1,d0		; " <ÿÿÿÿ"
R_7:		;$12A
	Dbra	d0,R_7		; "QÈÿþ"
	Lea	_DOSName0(pc),a1		; "Cú.."
	Jsr	_LVOOldOpenLibrary(a6)	; EXE
;	Jsr	_LVOFreeRemember(a6)	; INT		; "N®þh"
	Move.l	d0,L_1		; "#À.À‰Ö"
	Movea.l	d0,a6		; ",@"
	Jsr	_LVODispatch(a6)	; EXE
;	Jsr	_LVOOutput(a6)	; DOS
;	Jsr	_LVOClearPointer(a6)	; INT		; "N®ÿÄ"
	Move.l	d0,L_3		; "#À.À‰Þ"
	Movea.l	$4,a6		; ",y...."
	Move.l	42(a6),d0		; " ..*"
	Lea	R_34(pc),a0		; "Aú.Š"
	Bsr	R_21		; "a..B"
	Move.l	46(a6),d0		; " ..."
	Lea	R_35(pc),a0		; "Aú.˜"
	Bsr	R_21		; "a..6"
	Move.l	50(a6),d0		; " ..2"
	Lea	R_36(pc),a0		; "Aú.¦"
	Bsr	R_21		; "a..*"
	Move.l	546(a6),d0		; " ..""
	Lea	R_37(pc),a0		; "Aú.´"
	Bsr	R_21		; "a..."
	Move.l	550(a6),d0		; " ..&"
	Lea	R_38(pc),a0		; "Aú.Â"
	Bsr	R_21		; "a..."
	Move.l	554(a6),d0		; " ..*"
	Lea	R_40(pc),a0		; "Aú.æ"
	Bsr	R_21		; "a..."
	Movea.l	a6,a0		; " N"
	Suba.l	#$1C8,a0		; "‘ü...È"
	Move.l	2(a0),d0		; " (.."
	Lea	R_41(pc),a0		; "Aú.ì"
	Bsr	R_20		; "a..È"
	Movea.l	550(a6),a0		; " n.&"
	Cmp.l	#0,a0		; "±ü...."
	Beq.s	R_12		; "g2"
	Movea.l	(a0),a0		; " P"
	Movea.l	14(a0),a0		; " h.."
	Lea	R_39(pc),a1		; "Cú.’"
	Move.l	#19,d0		; " <...."
	Clr.l	d1		; "B�"
R_8:		;$1C8
	Move.b	(a0)+,d1		; ".."
	Cmpi.b	#0,d1		; "...."
	Beq.s	R_12		; "g."
	Cmpi.b	#32,d1		; "... "
	Bge.s	R_9		; "l."
	Bra.s	R_10		; "`."

R_9:		;$1D8
	Cmpi.b	#122,d1		; "...z"
	Ble.s	R_11		; "o."
R_10:		;$1DE
	Move.b	#46,d1		; ".<.."
R_11:		;$1E2
	Move.b	d1,(a1)+		; ".Á"
	Dbra	d0,R_8		; "QÈÿâ"
R_12:		;$1E8
	Lea	R_33(pc),a0		; "Aú.R"
	Bsr.s	R_18		; "ab"
	Tst.b	L_5		; "J9.À‰ã"
	Beq.s	R_14		; "g."
	Lea	R_45(pc),a0		; "Aú.¸"
	Bsr.s	R_18		; "aT"
R_13:		;$1FC
	Btst	#6,$BFE001		; ".9...¿à."
	Bne.s	R_13		; "fö"
	Bra	R_30		; "`..ü"

R_14:		;$20A
	Tst.b	L_4		; "J9.À‰â"
	Bne.s	R_15		; "f."
	Lea	R_43(pc),a0		; "Aú.A"
	Bsr.s	R_18		; "a8"
	Bra.s	R_17		; "`$"

R_15:		;$21A
	Lea	R_42(pc),a0		; "Aú.¿"
	Bsr	R_18		; "a..0"
R_16:		;$222
	Btst	#10,custom+potinp		; ".9...ßð."
	Beq	R_30		; "g..Ø"
	Btst	#6,$BFE001		; ".9...¿à."
	Bne.s	R_16		; "fê"
	Lea	R_44(pc),a0		; "Aú.`"
	Bsr.s	R_18		; "a."
R_17:		;$23E
	Movea.l	$4,a6		; ",y...."
	Movea.l	L_1(pc),a1		; ""z.."
	Jsr	_LVOCloseLibrary(a6)	; EXE
;	Jsr	_LVOLockIBase(a6)	; INT		; "N®þb"
	Clr.l	d0		; "B€"
	Rts			; "Nu"

R_18:		;$250
	Movem.w	d0-d7/a1-a6,-(sp)		; "H§ÿ~"
	Movea.l	L_1(pc),a6		; ",z.ø"
	Move.l	L_3(pc),d1		; "":.ü"
	Clr.l	d3		; "Bƒ"
	Move.l	a0,d2		; "$."
R_19:		;$260
	Addq.l	#1,d3		; "Rƒ"
	Tst.b	(a0)+		; "J."
	Bne.s	R_19		; "fú"
	Jsr	_LVOReschedule(a6)	; EXE
;	Jsr	_LVOWrite(a6)	; DOS
;	Jsr	_LVOClearDMRequest(a6)	; INT		; "N®ÿÐ"
	Movem.w	(sp)+,d0-d7/a1-a6		; "LŸ~ÿ"
	Rts			; "Nu"

R_20:		;$270
	Cmpi.l	#$FC0000,d0		; ".€.ü.."
	Bgt.s	R_22		; "n."
	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:		;$29A
	Tst.l	d0		; "J€"
	Beq.s	R_22		; "g."
	Move.b	#1,L_4		; ".ü...À‰â"
R_22:		;$2A6
	Movea.l	a0,a1		; ""H"
	Move.l	#$30303030,(a1)+		; ""ü0000"
	Move.l	#$30303030,(a1)		; ""¼0000"
	Addq.w	#8,a0		; "PH"
R_23:		;$2B6
	Move.l	d0,d1		; ""."
	Andi.b	#15,d1		; "...."
	Addi.b	#48,d1		; "...0"
	Cmpi.b	#57,d1		; "...9"
	Ble.s	R_24		; "o."
	Addq.b	#7,d1		; "^."
R_24:		;$2C8
	Move.b	d1,-(a0)		; ".."
	Lsr.l	#4,d0		; "èˆ"
	Bne.s	R_23		; "fè"
	Rts			; "Nu"

R_25:		;$2D0
	Cmpi.b	#1,d0		; "...."
	Beq.s	R_29		; "g,"
	Lea	R_46(pc),a1		; "Cú.„"
	Bsr.s	R_28		; "a$"
	Cmpi.b	#34,d1		; "...""
	Beq.s	R_26		; "g."
	Subq.w	#1,a0		; "SH"
	Move.b	#32,L_0		; ".ü. .À†�"
R_26:		;$2EC
	Bsr.s	R_28		; "a."
	Move.b	d1,(a1)+		; ".Á"
	Cmpi.b	#10,d1		; "...."
	Beq.s	R_27		; "g."
	dc.b $0C	;Cmpi.b	#34,d1
	dc.b	$01
	dc.b	$00
L_0:		;$2F9
	dc.b	$22
	Bne.s	R_26		; "fð"
R_27:		;$2FC
	Clr.b	-(a1)		; "B!"
	Rts			; "Nu"

R_28:		;$300
	Move.b	(a0)+,d1		; ".."
R_29:		;$302
	Rts			; "Nu"

R_30:		;$304
	Movea.l	$4,a6		; ",y...."
	Jsr	_LVODisable(a6)	; EXE
;	Jsr	_LVOCreateDir(a6)	; DOS
;	Jsr	_LVOEndRequest(a6)	; INT		; "N®ÿˆ"
	Clr.l	42(a6)		; "B®.*"
	Clr.l	46(a6)		; "B®.."
	Clr.l	50(a6)		; "B®.2"
	Clr.l	546(a6)		; "B®.""
	Clr.l	550(a6)		; "B®.&"
	Clr.l	554(a6)		; "B®.*"
R_31:		;$326
	Lea	$FC0000,a5		; "Kù.ü.."
	Move.w	#$4E70,d0		; "0<Np"
R_32:		;$330
	Cmp.w	(a5)+,d0		; "°]"
	Bne.s	R_32		; "fü"
	Lea	-2(a5),a5		; "Kíÿþ"
	Jmp	_LVOSupervisor(a6)	; EXE
;	Jmp	_LVOOpen(a6)	; DOS
;	Jmp	_LVOOpenIntuition(a6)	; INT		; "Nîÿâ"

R_33:		;$33C
	dc.b	$0C
	dc.b	"  ---------------------------------------------",10
	dc.b	"  VECTOR-BUSTER V2.0 - (c)1990 by FREAKWARE.INC",10
	dc.b	"  --------------------------------------------- ",10
	Move.l	-(a0),d0		; "  "
	dc.b	"ColdCapture: $"
R_34:		;$3DE
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	a2,d0		; " ."
	Move.l	-(a0),d0		; "  "
	dc.b	"CoolCapture: $"
R_35:		;$3F8
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	a2,d0		; " ."
	Move.l	-(a0),d0		; "  "
	Subq.w	#3,-(a1)		; "Wa"
	Moveq	#109,d1		; "rm"
	dc.b	"Capture: $"
R_36:		;$412
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	a2,d0		; " ."
	Move.l	-(a0),d0		; "  "
	dc.b	"KickMemPtr : $"
R_37:		;$42C
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	a2,d0		; " ."
	Move.l	-(a0),d0		; "  "
	dc.b	"KickTagPtr : $"
R_38:		;$446
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	-(sp),d0		; " '"
R_39:		;$450
	Move.l	11822(a6),d7		; "...."
	Move.l	11822(a6),d7		; "...."
	Move.l	11822(a6),d7		; "...."
	Move.l	11822(a6),d7		; "...."
	Move.l	11822(a6),d7		; "...."
	Move.l	a2,-(a3)		; "'."
	Move.l	-(a0),d0		; "  "
	dc.b	"KickChkSum : $"
R_40:		;$476
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	a2,d0		; " ."
	Move.l	-(a0),d0		; "  "
	Neg.w	18767(sp)		; "DoIO"
	Move.l	8224(a1),d4		; "()  "
	Move.l	-(a0),d0		; "  "
	dc.b	" : $"
R_41:		;$490
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.w	48(a0,d3.w),d0		; "0000"
	Move.l	8271(a5),d0		; " - O"
	Movea.l	a3,sp		; ".K"
	Move.l	-(a0),d7		; ". "
	Move.l	-(a0),d0		; "  "
	Move.l	-(a0),d0		; "  "
	Move.l	-(a0),d0		; "  "
	Move.l	-(a0),d0		; "  "
	Move.l	a2,d0		; " ."
	Move.l	-(a0),d0		; "  "
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	a2,-(a6)		; "-."
	dc.b	$00
R_42:		;$4DB
	dc.b	"  MOUSE-CONTROL",10
	dc.b	"  -------------",10
	dc.b	"  Right: Reset all vectors",10
	Move.l	-(a0),d0		; "  "
	dc.b	"Left : X-it",10
	Move.l	-(a0),d0		; "  "
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	a2,-(a6)		; "-."
	dc.b	$00
R_43:		;$555
	dc.b	"  ALL VECTORS O.K. !",10
	Move.l	-(a0),d0		; "  "
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	a2,-(a6)		; "-."
R_44:		;$59A
	Move.l	-(a0),d0		; "  "
	dc.b	"Leaving . . . . .",10
	dc.b	$0A
	dc.b	$00
R_45:		;$5B0
	Move.l	-(a0),d0		; "  "
	Move.l	10784(a2),d5		; "*** "
	Subq.w	#3,d1		; "WA"
	Addq.w	#1,a6		; "RN"
	dc.b	"ING: IRQ-LinkVirus detected !",10
	Move.l	-(a0),d0		; "  "
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	11565(a5),-(a6)		; "----"
	Move.l	a2,-(a6)		; "-."
	Move.l	-(a0),d0		; "  "
	dc.b	"Press left mousebutton to kill ...",10
	dc.b	$0A
	dc.b	$00
	dc.b	$00
_DOSName0:		;$630
	dc.b	"dos.library",0
_INTName0:		;$63C
	dc.b	"intuition.library",0
L_1:		;$64E
	dc.b	$00,$00,$00,$00
L_2:		;$652
	dc.b	$00,$00,$00,$00
L_3:		;$656
	dc.b	$00,$00,$00,$00
L_4:		;$65A
	dc.b	$00
L_5:		;$65B
	dc.b	$00
R_46:		;$65C
	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
	Ori.b	#0,d0		; "...."
;-------------------------------
; Labelstatistik:
; Name	Aufrufe	Hunk	Offset
;R_0	1	0	$20
;R_1	1	0	$2E
;R_2	2	0	$30
;R_3	1	0	$50
;R_4	3	0	$9A
;R_5	1	0	$D4
;R_6	1	0	$EE
;R_7	1	0	$12A
;R_8	1	0	$1C8
;R_9	1	0	$1D8
;R_10	1	0	$1DE
;R_11	1	0	$1E2
;R_12	2	0	$1E8
;R_13	1	0	$1FC
;R_14	1	0	$20A
;R_15	1	0	$21A
;R_16	1	0	$222
;R_17	1	0	$23E
;R_18	5	0	$250
;R_19	1	0	$260
;R_20	1	0	$270
;R_21	6	0	$29A
;R_22	3	0	$2A6
;R_23	1	0	$2B6
;R_24	1	0	$2C8
;R_25	1	0	$2D0
;R_26	2	0	$2EC
;L_0	1	0	$2F9
;R_27	1	0	$2FC
;R_28	2	0	$300
;R_29	1	0	$302
;R_30	2	0	$304
;R_31	1	0	$326
;R_32	1	0	$330
;R_33	1	0	$33C
;R_34	1	0	$3DE
;R_35	1	0	$3F8
;R_36	1	0	$412
;R_37	1	0	$42C
;R_38	1	0	$446
;R_39	1	0	$450
;R_40	1	0	$476
;R_41	1	0	$490
;R_42	1	0	$4DB
;R_43	1	0	$555
;R_44	1	0	$59A
;R_45	1	0	$5B0
;_DOSName0	1	0	$630
;_INTName0	1	0	$63C
;L_1	3	0	$64E
;L_2	4	0	$652
;L_3	2	0	$656
;L_4	3	0	$65A
;L_5	2	0	$65B
;R_46	3	0	$65C