; Action Replay IV Source Code

; Tested on Devpac V3.14 and Asm-One V1.29

	SECTION	AR000000,CODE
ProgStart:
	movem.l	D0-D7/A0-A6,-(SP)
	suba.l	A1,A1
	movea.l	4.W,A6
	jsr	-$126(A6)
	movea.l	D0,A5
	movea.l	4.W,A6
	lea	doslibrary.MSG(PC),A1
	jsr	-$198(A6)
	move.l	D0,lbL0000E8
	tst.l	$AC(A5)
	beq.s	lbC000044
	moveq	#0,D1
	movea.l	lbL0000E8(PC),A6
	jsr	-$7E(A6)
	move.l	D0,lbL0000EC
	move.l	D0,D1
	movea.l	lbL0000E8(PC),A6
	jsr	-$7E(A6)
	bra.s	lbC00006E

lbC000044:
	lea	$5C(A5),A0
	movea.l	4.W,A6
	jsr	-$180(A6)
	lea	$5C(A5),A0
	jsr	-$174(A6)
	move.l	D0,lbL0000F0
	movea.l	D0,A0
	move.l	$24(A0),D0
	beq.s	lbC00006E
	movea.l	D0,A0
	move.l	(A0),lbL0000EC
lbC00006E:
	move.l	lbL0000EC(PC),D1
	movea.l	lbL0000E8(PC),A6
	jsr	-$60(A6)
	move.l	D0,lbL0000EC
	move.l	#ActionReplayI.MSG,D1
	moveq	#-5,D2
	lea	ProgStart-4.L,A0
	move.l	(A0),D3
	clr.l	(A0)
	move.l	#$4FA0,D4
	movea.l	lbL0000E8(PC),A6
	jsr	-$8A(A6)
	movea.l	A6,A1
	movea.l	4.W,A6
	jsr	-$19E(A6)
	tst.l	lbL0000F0
	beq.s	lbC0000C2
	movea.l	4.W,A6
	jsr	-$84(A6)
	movea.l	lbL0000F0(PC),A1
	jsr	-$17A(A6)
lbC0000C2:
	movem.l	(SP)+,D0-D7/A0-A6
	moveq	#0,D0
	rts

ActionReplayI.MSG:
	dc.b	'Action Replay IV by Blackhawk',0
lbL0000E8:
	dc.l	0
lbL0000EC:
	dc.l	0
lbL0000F0:
	dc.l	0
doslibrary.MSG:
	dc.b	'dos.library',0


	SECTION	AR000100,CODE
	lea	$1A8000,A0
	lea	lbC000126,A1
	move.l	#$28A36,D0
	adda.l	D0,A0
	adda.l	D0,A1
lbC000116:
	move.b	-(A1),-(A0)
	subq.l	#1,D0
	bne.s	lbC000116
	jsr	$1A8000.L
	moveq	#0,D0
	rts

lbC000126:
	bra.w	lbC000146

	bra.w	lbC00065A

lbL00012E:
	dc.l	$3B200
lbL000132:
	dc.l	$1A8000
	dc.l	0

	jmp	$1AF7DC.L

	dc.l	2
	dc.w	0

lbC000146:
	tst.l	$1A8010.L
	bne.w	lbC0001F6
	move.l	lbL00012E(PC),D0
	movea.l	lbL000132(PC),A1
	movea.l	4.W,A6
	jsr	-$CC(A6)
	move.l	D0,$1A8010.L
	tst.l	D0
	bne.s	lbC000174
	moveq	#$78,D0
	move.w	#$F00,D1
	bsr.w	lbC00024C
lbC000174:
	movea.l	4.W,A6
	move.l	#$1A80D2,$2A(A6)
	move.l	#$1A80FA,$2E(A6)
	lea	$22(A6),A0
	moveq	#$16,D0
	moveq	#0,D1
lbC000190:
	add.w	(A0)+,D1
	dbra	D0,lbC000190
	not.w	D1
	move.w	D1,$52(A6)
	lea	$1D3082.L,A0
	lea	$1E3200.L,A1
lbC0001A8:
	clr.w	(A0)+
	cmpa.l	A1,A0
	bne.s	lbC0001A8
	lea	$1E3200.L,A0
	lea	$1F2468.L,A1
lbC0001BA:
	clr.w	(A0)+
	cmpa.l	A1,A0
	bne.s	lbC0001BA
	bsr.w	lbC0004A8
	jsr	$1B52DE.L
	st	$1A801B.L
	tst.b	$1A801A.L
	bne.w	lbC0001F6
	bsr.w	lbC00038A
	movea.l	4.W,A6
	movea.l	$9C(A6),A6
	move.l	$26(A6),$DFF080.L
	tst.w	$DFF088.L
	moveq	#0,D0
lbC0001F6:
	rts

	move.l	#$1AF7DC,$1A8016.L
	sf	$1A801B.L
	st	$1A801A.L
	clr.l	$1A8010.L
	clr.l	$1E2718.L
	bsr.w	lbC00036C
	jmp	(A5)

	jsr	$1B536E.L
	cmp.l	$1D0A3A.L,D0
	beq.w	lbC000248
	moveq	#$78,D0
	move.w	#15,D1
	bsr.w	lbC00024C
	movea.l	4.W,A6
	clr.l	$2A(A6)
	clr.l	$2E(A6)
	rts

lbC000248:
	bra.w	lbC000146

lbC00024C:
	clr.b	$BFE801.L
lbC000252:
	move.w	D1,$DFF180.L
	tst.b	$BFE801.L
	beq.s	lbC000252
	clr.b	$BFE801.L
	dbra	D0,lbC000252
	rts

	cmpi.l	#$1A801E,6(SP)
	blt.s	lbC000282
	cmpi.l	#$1D0A36,6(SP)
	blt.w	lbC00032C
lbC000282:
	tst.w	$1A801C.L
	bne.s	lbC0002BA
	btst	#6,$BFE001.L
	bne.w	lbC00032C
	dc.l	$0839000A,$00DFF016		;btst	#10,$DFF016.L
	bne.w	lbC00032C
	cmpi.b	#$49,$BFEC01.L
	beq.s	lbC000310
	cmpi.b	#$B9,$BFEC01.L
	bne.w	lbC00032C
	bra.s	lbC000304

lbC0002BA:
	cmpi.w	#1,$1A801C.L
	bne.s	lbC0002DE
	cmpi.b	#$49,$BFEC01.L
	beq.s	lbC000310
	cmpi.b	#$45,$BFEC01.L
	beq.w	lbC000304
	bra.w	lbC00032C

lbC0002DE:
	cmpi.w	#2,$1A801C.L
	bne.w	lbC00032C
	cmpi.b	#$49,$BFEC01.L
	beq.s	lbC000310
	btst	#2,$DFF016.L
	beq.w	lbC000304
	bra.w	lbC00032C

lbC000304:
	clr.b	$BFEC01.L
	jmp	$1A8014.L

lbC000310:
	clr.b	$BFEC01.L
	movem.l	D0-D7/A0-A6,-(SP)
	bsr.w	lbC000702
	moveq	#$1E,D0
	move.w	#$F00,D1
	bsr.w	lbC00024C
	movem.l	(SP)+,D0-D7/A0-A6
lbC00032C:
	rts

	tst.w	$1E314C.L
	bne.s	lbC00036A
	cmpi.l	#$1A801E,6(SP)
	blt.s	lbC00034A
	cmpi.l	#$1D0A36,6(SP)
	blt.s	lbC00036A
lbC00034A:
	cmpi.l	#$F80000,6(SP)
	blt.s	lbC00035E
	cmpi.l	#$FFFFF0,6(SP)
	blt.s	lbC00036A
lbC00035E:
	clr.b	$BFEC01.L
	jmp	$1A8014.L

lbC00036A:
	rts

lbC00036C:
	move.w	#$7FFF,$DFF09A.L
	move.w	#$380,$DFF096.L
	bsr.w	lbC00038A
	move.w	#$380,$DFF096.L
	rts

lbC00038A:
	lea	$1ED468.L,A0
	lea	$1CD156.L,A1
	lea	$1D0A36.L,A2
lbC00039C:
	move.w	(A1)+,(A0)+
	cmpa.l	A2,A1
	bne.s	lbC00039C
	lea	$1E4390.L,A0
	move.l	#$1FC0000,(A0)+
	move.l	#$1060000,(A0)+
	move.l	#$8E4D71,(A0)+
	move.l	#$90A8C1,(A0)+
	move.l	#$920038,(A0)+
	move.l	#$9400D0,(A0)+
	move.l	#$1080000,(A0)+
	move.l	#$1200000,(A0)+
	move.l	#$1220000,(A0)+
	move.l	#$1240000,(A0)+
	move.l	#$1260000,(A0)+
	move.l	#$1280000,(A0)+
	move.l	#$12A0000,(A0)+
	move.l	#$12C0000,(A0)+
	move.l	#$12E0000,(A0)+
	move.l	#$1300000,(A0)+
	move.l	#$1320000,(A0)+
	move.l	#$1340000,(A0)+
	move.l	#$1360000,(A0)+
	move.l	#$1380000,(A0)+
	move.l	#$13A0000,(A0)+
	move.l	#$13C0000,(A0)+
	move.l	#$13E0000,(A0)+
	move.l	#$10A0000,(A0)+
	move.l	#$100A000,(A0)+
	move.l	#$1020000,(A0)+
	move.l	#$1040024,(A0)+
	move.l	#$1800000,(A0)+
	move.l	#$1820FFF,(A0)+
	move.l	#$1840CCC,(A0)+
	move.l	#$1860777,(A0)+
	move.l	#$E0001E,(A0)+
	move.l	#$E2D468,(A0)+
	move.l	#$E4001E,(A0)+
	move.l	#$E6F0D8,(A0)+
	move.l	#$FFFFFFFE,(A0)+
	clr.l	0.w
	move.l	#$1E4390,$DFF080.L
	move.w	#$8380,$DFF096.L
	tst.w	$DFF088.L
	move.w	#$96,D0
	move.w	#0,D1
	bra.w	lbC00024C

lbC0004A8:
	tst.b	$1A801B.L
	bne.w	lbC000658
	move.w	#$4000,$DFF09A.L
	movea.l	4.W,A6
	jsr	-$96(A6)
	move.l	D0,$1E3174.L
	lea	$1CD056.L,A0
	lea	$1CCF56.L,A2
	lea	0.w,A1
	move.w	#$3F,D0
lbC0004DC:
	move.l	(A1),(A2)+
	move.l	(A1)+,(A0)+
	dbra	D0,lbC0004DC
	lea	$1CD056.L,A0
	dc.w	$4E7B
	dc.w	$8801

	move.l	#$1CCC2C,$1CD05E.L
	move.l	#$1CCC3E,$1CD062.L
	move.l	#$1CCC50,$1CD066.L
	move.l	#$1CCC62,$1CD06A.L
	move.l	#$1CCC74,$1CD06E.L
	move.l	#$1CCC86,$1CD072.L
	move.l	#$1CCC98,$1CD076.L
	move.l	#$1CCCCE,$1CD07A.L
	move.l	#$1CCCAA,$1CD07E.L
	move.l	#$1CCCBC,$1CD082.L
	move.l	#$1CCD06,$1CD0B6.L
	move.l	#$1CCD18,$1CD0BA.L
	move.l	#$1CCD2A,$1CD0BE.L
	move.l	#$1CCD3C,$1CD0C2.L
	move.l	#$1CCD4E,$1CD0C6.L
	move.l	#$1CCD60,$1CD0CA.L
	move.l	#$1CCD72,$1CD0CE.L
	move.l	#$1CCD84,$1CD0D2.L
	move.l	#$1CCD96,$1CD0D6.L
	move.l	#$1CCDB2,$1CD0DA.L
	move.l	#$1CCDCE,$1CD0DE.L
	move.l	#$1CCDEA,$1CD0E2.L
	move.l	#$1CCE06,$1CD0E6.L
	move.l	#$1CCE22,$1CD0EA.L
	move.l	#$1CCE3E,$1CD0EE.L
	move.l	#$1CCE5A,$1CD0F2.L
	move.l	#$1CCE76,$1CD0F6.L
	move.l	#$1CCE92,$1CD0FA.L
	move.l	#$1CCEAE,$1CD0FE.L
	move.l	#$1CCECA,$1CD102.L
	move.l	#$1CCEE6,$1CD106.L
	move.l	#$1CCF02,$1CD10A.L
	move.l	#$1CCF1E,$1CD10E.L
	move.l	#$1CCF3A,$1CD112.L
	move.l	$1E3174.L,D0
	movea.l	4.W,A6
	jsr	-$9C(A6)
	move.w	#$C000,$DFF09A.L
lbC000658:
	rts

lbC00065A:
	tst.b	$1A801B.L
	bne.s	lbC000664
	rts

lbC000664:
	sf	$1A801B.L
	move.w	#$4000,$DFF09A.L
	movea.l	4.W,A6
	jsr	-$96(A6)
	move.l	D0,$1E3174.L
	lea	$1CCF56.L,A2
	lea	0.w,A1
	move.w	#$3F,D0
lbC00068E:
	move.l	(A2)+,(A1)+
	dbra	D0,lbC00068E
	suba.l	A1,A1
	dc.w	$4E7B
	dc.w	$9801

	move.l	$1E3174.L,D0
	movea.l	4.W,A6
	jsr	-$9C(A6)
	movea.l	4.W,A6
	clr.l	$2A(A1)
	clr.l	$2E(A1)
	clr.l	$32(A1)
	clr.l	$222(A1)
	clr.l	$226(A1)
	clr.l	$22A(A1)
	lea	$22(A6),A0
	moveq	#$16,D0
	moveq	#0,D1
lbC0006CC:
	add.w	(A0)+,D1
	dbra	D0,lbC0006CC
	not.w	D1
	move.w	D1,$52(A6)
	tst.l	$1A8010.L
	beq.w	lbC0006F8
	clr.l	$1A8010.L
	move.l	lbL00012E(PC),D0
	movea.l	lbL000132(PC),A1
	movea.l	4.W,A6
	jsr	-$D2(A6)
lbC0006F8:
	move.w	#$C000,$DFF09A.L
	rts

lbC000702:
	movem.l	D0-D7/A0-A6,-(SP)
	lea	$1CCF56.L,A2
	lea	0.w,A1
	move.w	#$3F,D0
lbC000714:
	move.l	(A2)+,(A1)+
	dbra	D0,lbC000714
	suba.l	A1,A1
	dc.w	$4E7B
	dc.w	$9801

	movea.l	4.W,A6
	clr.l	$2A(A1)
	clr.l	$2E(A1)
	clr.l	$32(A1)
	clr.l	$222(A1)
	clr.l	$226(A1)
	clr.l	$22A(A1)
	lea	$22(A6),A0
	moveq	#$16,D0
	moveq	#0,D1
lbC000744:
	add.w	(A0)+,D1
	dbra	D0,lbC000744
	not.w	D1
	move.w	D1,$52(A6)
	tst.l	$1A8010.L
	beq.w	lbC000770
	clr.l	$1A8010.L
	move.l	lbL00012E(PC),D0
	movea.l	lbL000132(PC),A1
	movea.l	4.W,A6
	jsr	-$D2(A6)
lbC000770:
	movem.l	(SP)+,D0-D7/A0-A6
	rts

	dc.b	'Action Replay IV BETA v1.00 by Blackhawk of '
	dc.b	'Paradox',$D,0
	dc.b	0

	bra.w	lbC000E46

	bra.w	lbC0016FC

	move.l	#$1A868E,$1A8016.L
	bra.w	lbC00088C

	tst.b	$1E2B48.L
	beq.w	lbC0007E4
	move.l	A0,-(SP)
	movea.l	10(SP),A0
	cmpa.l	$1E2C30.L,A0
	bne.w	lbC000870
	sf	$1E2B48.L
	movea.l	(SP)+,A0
lbC0007E4:
	subq.l	#1,$1E2BDC.L
	bne.s	lbC0007F2
	jmp	$1A8766.L

lbC0007F2:
	tst.b	$1E2B47.L
	beq.w	lbC00086E
	movem.l	D0/A0,-(SP)
	movea.l	14(SP),A0
	move.w	(A0),D0
	andi.w	#$FFC0,D0
	cmpi.w	#$4E80,D0
	bne.w	lbC00084C
	move.w	(A0),D0
	cmpi.w	#$4EB9,D0
	bne.w	lbC000822
	moveq	#6,D0
	bra.w	lbC000836

lbC000822:
	andi.w	#$FFF8,D0
	cmpi.w	#$4E90,D0
	bne.w	lbC000834
	moveq	#2,D0
	bra.w	lbC000836

lbC000834:
	moveq	#4,D0
lbC000836:
	add.l	A0,D0
	move.l	D0,$1E2C30.L
	st	$1E2B48.L
	movem.l	(SP)+,D0/A0
	bra.w	lbC00086E

lbC00084C:
	move.w	(A0),D0
	andi.w	#$FF00,D0
	cmpi.w	#$6100,D0
	bne.w	lbC00086A
	cmpi.w	#$6100,(A0)
	bne.w	lbC000866
	moveq	#4,D0
	bra.s	lbC000836

lbC000866:
	moveq	#2,D0
	bra.s	lbC000836

lbC00086A:
	movem.l	(SP)+,D0/A0
lbC00086E:
	move.l	A0,-(SP)
lbC000870:
	movea.l	10(SP),A0
	cmpi.w	#$4E73,(A0)
	bne.w	lbC000882
	bset	#7,14(SP)
lbC000882:
	movea.l	(SP)+,A0
	bset	#7,4(SP)
	rts

lbC00088C:
	sf	$1E29B8.L
	move.l	$DFF004.L,$1E276E.L
	move.w	$DFF002.L,$1E2600.L
	move.w	#$1AF,$DFF096.L
	move.w	$DFF01C.L,$1E2602.L
	move.w	#$7FFF,$DFF09A.L
	move.w	$DFF01E.L,$1E2604.L
	move.w	$DFF010.L,$1E2606.L
	move.w	$1E2480.L,$1E2874.L
	move.l	$1E2422.L,$1E28A6.L
	move.w	$1E2426.L,$1E28AA.L
	move.l	$1E2582.L,$1E2658.L
	move.l	#0,$DFF180.L
	move.b	$BFEE01.L,$1E2884.L
	move.b	$BFEF01.L,$1E2885.L
	move.b	$BFDE00.L,$1E289C.L
	move.b	$BFDF00.L,$1E289D.L
	btst	#6,$DFF003.L
	beq.s	lbC00095A
lbC000938:
	move.w	#0,$DFF02C.L
	btst	#6,$DFF002.L
	bne.s	lbC000938
	move.w	#$40,$DFF096.L
	bset	#6,$1E2605.L
lbC00095A:
	btst	#6,$DFF01A.L
	beq.s	lbC000988
	move.l	#$28000,$1E2834.L
lbC00096E:
	subq.l	#1,$1E2834.L
	beq.s	lbC000980
	btst	#1,$DFF01F.L
	beq.s	lbC00096E
lbC000980:
	move.w	#$210,$DFF096.L
lbC000988:
	movem.l	D0-D7/A0-A7,$1E2608.L
	move.l	6(SP),$1E2648.L
	move.w	4(SP),$1E264C.L
	move.w	#$7FFF,$DFF09C.L
	move.w	#$C000,$DFF09A.L
	move.w	#$2000,SR
	lea	$1E3148.L,SP
	lea	$DFF000.L,A5
	lea	$1E2402.L,A6
	clr.w	$1E315A.L
	clr.l	$DFF144.L
	clr.l	$DFF14C.L
	clr.l	$DFF154.L
	clr.l	$DFF15C.L
	clr.l	$DFF164.L
	clr.l	$DFF16C.L
	clr.l	$DFF174.L
	clr.l	$DFF17C.L
	bsr.w	lbC000D54
	jsr	$1B583A.L
	bsr.w	lbC000DEC
	bsr.w	lbC00128C
	bsr.w	lbC0036FA
	bsr.w	lbC0084B2
	bsr.w	lbC001F02
	jsr	$1C5394.L
	bsr.w	lbC0084EA
	jsr	$1C31CE.L
	bsr.w	lbC0017E4
	bsr.w	lbC000F0C
	bsr.w	lbC000CEA
	bsr.w	lbC000D88
	bsr.w	lbC000C04
	jsr	$1C925A.L
	bsr.w	lbC000C5A
	move.w	#$7FFF,$DFF09A.L
	move.w	#$7FFF,$DFF096.L
	bsr.w	lbC001334
	move.w	SR,D0
	ori.w	#$700,D0
	move.w	D0,SR
	movem.l	($1E2608).L,D0-D7/A0-A7
	move.w	$1E264C.L,4(SP)
	move.l	$1E2648.L,6(SP)
	bset	#7,$1E2604.L
	bset	#7,$1E2602.L
	bset	#7,$1E2600.L
	move.w	#$20,$DFF09C.L
lbC000A9C:
	btst	#5,$DFF01F.L
	beq.s	lbC000A9C
	move.w	#$20,$DFF09C.L
	btst	#7,$1E2601.L
	beq.s	lbC000AD0
	move.l	$1E276E.L,$DFF02A.L
	clr.w	$DFF088.L
	move.w	#$8380,$DFF096.L
lbC000AD0:
	move.l	D0,$1E2776.L
	move.l	D1,$1E277A.L
	move.l	$1E276E.L,D0
	andi.l	#$1FFFF,D0
lbC000AE8:
	move.l	$DFF004.L,D1
	andi.l	#$1FFFF,D1
	cmp.l	D1,D0
	bcc.s	lbC000AE8
	move.l	$1E2776.L,D0
	move.l	$1E277A.L,D1
	move.b	$1E2884.L,$BFEE01.L
	move.b	$1E2885.L,$BFEF01.L
	move.b	$1E289C.L,$BFDE00.L
	move.b	$1E289D.L,$BFDF00.L
	move.w	#$380,$DFF096.L
	move.w	$1E2600.L,$DFF096.L
	move.w	$1E2602.L,$DFF09A.L
	move.w	#$7FFF,$DFF09C.L
	move.w	$1E2604.L,$DFF09C.L
	rts

lbC000B5C:
	lea	Notrackbuffer.MSG(PC),A0
	tst.b	$1E2AF6.L
	beq.w	lbC000B8E
	sf	$1E2AF6.L
	lea	Trackbufferre.MSG(PC),A0
	movea.l	$1E2AE8.L,A1
	move.l	$1E2AEC.L,D0
	move.l	$1E2AF0.L,D1
	lsr.l	#2,D0
lbC000B88:
	move.l	D1,(A1)+
	subq.l	#1,D0
	bne.s	lbC000B88
lbC000B8E:
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

Trackbufferre.MSG:
	dc.b	'Trackbuffer restored',$D,0
Notrackbuffer.MSG:
	dc.b	'No trackbuffer allocated',$D,0

	movem.l	D1/A0/A1,-(SP)
	tst.b	$1E2AF6.L
	beq.w	lbC000BFE
	sf	$1E2AF6.L
	lea	Trackbufferre.MSG(PC),A0
	movea.l	$1E2AE8.L,A1
	move.l	$1E2AEC.L,D0
	move.l	$1E2AF0.L,D1
	lsr.l	#2,D0
lbC000BF8:
	move.l	D1,(A1)+
	subq.l	#1,D0
	bne.s	lbC000BF8
lbC000BFE:
	movem.l	(SP)+,D1/A0/A1
	rts

lbC000C04:
	sf	$1E2B30.L
	sf	$1E2B31.L
	move.b	$1E298B.L,D0
	or.b	$1E298D.L,D0
	move.b	D0,$1E2980.L
	tst.b	$1E298B.L
	beq.w	lbC000C34
	ori.b	#$80,$BFE201.L
lbC000C34:
	tst.b	$1E298D.L
	beq.w	lbC000C46
	ori.b	#$40,$BFE201.L
lbC000C46:
	tst.b	$1E2980.L
	bne.w	lbC000C58
	andi.b	#$3F,$BFE201.L
lbC000C58:
	rts

lbC000C5A:
	move.w	D0,-(SP)
	clr.w	$1E2982.L
	tst.b	$1E2992.L
	bmi.w	lbC000C74
	bset	#0,$1E2983.L
lbC000C74:
	tst.l	$1E29F0.L
	bne.w	lbC000CAE
	move.b	$1E2B44.L,D0
	not.b	D0
	or.b	$1E2AFA.L,D0
	or.b	$1E2AF7.L,D0
	or.b	$1E2AFB.L,D0
	or.b	$1E2AFE.L,D0
	or.b	$1E2B36.L,D0
	or.b	$1E2B42.L,D0
	beq.w	lbC000CB6
lbC000CAE:
	bset	#0,$1E2983.L
lbC000CB6:
	move.b	$1E297C.L,D0
	or.b	$1E297E.L,D0
	or.b	$1E2980.L,D0
	or.b	$1E2B2F.L,D0
	or.b	$1E2B39.L,D0
	or.b	$1E2B46.L,D0
	beq.w	lbC000CE6
	bset	#1,$1E2983.L
lbC000CE6:
	move.w	(SP)+,D0
	rts

lbC000CEA:
	move.b	$1E29B2.L,-(SP)
	moveq	#3,D1
	lea	$1E29BE.L,A0
lbC000CF8:
	btst	D1,$1E298F.L
	beq.w	lbC000D24
	move.b	D1,$1E29B2.L
	cmpi.b	#$FF,0(A0,D1.W)
	beq.w	lbC000D24
	moveq	#0,D0
	jsr	$1BA2AC.L
	move.b	0(A0,D1.W),D0
	jsr	$1BA2AC.L
lbC000D24:
	dbra	D1,lbC000CF8
	move.b	(SP)+,$1E29B2.L
	move.w	$1E2874.L,$DFF07E.L
	bset	#7,$1E2606.L
	move.w	#$7FFF,$DFF09E.L
	move.w	$1E2606.L,$DFF09E.L
	rts

lbC000D54:
	movem.l	A0/A1,-(SP)
	lea	$BFE001.L,A0
	lea	$1E2876.L,A1
	jsr	$1B9BE4.L
	lea	$BFD000.L,A0
	lea	$1E288E.L,A1
	jsr	$1B9BE4.L
	jsr	$1B9F84.L
	movem.l	(SP)+,A0/A1
	rts

lbC000D88:
	movem.l	D0/A0/A1,-(SP)
	btst	#7,$1E288F.L
	bne.w	lbC000DC2
	move.b	#$7F,$BFD100.L
	move.b	$1E288F.L,D0
	nop
	nop
	move.b	D0,$BFD100.L
	nop
	nop
	move.b	#$7F,$BFD100.L
	jsr	$1BA1BA.L
lbC000DC2:
	lea	$BFE001.L,A0
	lea	$1E2876.L,A1
	jsr	$1B9E9C.L
	lea	$BFD000.L,A0
	lea	$1E288E.L,A1
	jsr	$1B9E9C.L
	movem.l	(SP)+,D0/A0/A1
	rts

lbC000DEC:
	lea	$DFF000.L,A5
	move.l	A0,-(SP)
	move.l	$68.W,$1E2690.L
	move.l	#$1A8686,$68.w
	clr.w	$1E269E.L
	clr.w	$1E26A0.L
	clr.w	$1E2698.L
	clr.w	$1E26AC.L
	ori.b	#$40,$BFEE01.L
	clr.b	$BFEC01.L
	move.w	#$200,D0
lbC000E2E:
	nop
	dbra	D0,lbC000E2E
	bclr	#6,$BFEE01.L
	move.w	#$8008,$9A(A5)
	movea.l	(SP)+,A0
	rts

lbC000E46:
	move.l	D0,-(SP)
	move.b	$BFED01.L,D0
	move.w	#8,$DFF09C.L
	moveq	#0,D0
	move.b	$BFEC01.L,D0
	move.w	D0,$1E2698.L
	ori.b	#$40,$BFEE01.L
	clr.b	$BFEC01.L
	moveq	#$50,D0
lbC000E74:
	nop
	dbra	D0,lbC000E74
	bclr	#6,$BFEE01.L
	move.w	$1E2698.L,D0
	not.b	D0
	lsr.b	#1,D0
	bclr	#0,D0
	cmpi.b	#$64,D0
	bne.w	lbC000EA6
	btst	#0,$1E2699.L
	sne	$1E2B32.L
lbC000EA6:
	cmpi.w	#$60,D0
	bne.s	lbC000EBA
	btst	#0,$1E2699.L
	sne	$1E26A0.L
lbC000EBA:
	move.w	$1E2698.L,D0
	andi.w	#$FFFE,D0
	cmpi.w	#$74,D0
	bne.s	lbC000ED8
	btst	#0,$1E2699.L
	sne	$1E26A1.L
lbC000ED8:
	tst.b	$1E26AC.L
	bne.s	lbC000EFA
	ori.b	#2,$BFE001.L
	btst	#0,$1E2699.L
	beq.s	lbC000EFA
	andi.b	#$FD,$BFE001.L
lbC000EFA:
	move.b	$BFED01.L,D0
	move.w	#8,$DFF09C.L
	move.l	(SP)+,D0
	rte

lbC000F0C:
	lea	$DFF000.L,A5
	move.w	#8,$9A(A5)
	move.l	$1E2690.L,$68.w
	rts

lbC000F22:
	movem.l	D0/D1/A0/A1,-(SP)
	moveq	#0,D0
	moveq	#0,D1
	lea	$1E45E8.L,A0
	move.w	#$280,D0
	mulu.w	$1E269C.L,D0
	add.w	$1E269A.L,D0
	addi.w	#$230,D0
	lea	0(A0,D0.W),A1
	addq.w	#8,$1E2952.L
	bpl.s	lbC000F64
	cmpi.b	#$FF,(A1)
	bne.w	lbC000F76
	cmpi.b	#$FF,(A1)
	bne.w	lbC000F62
	sf	(A1)
lbC000F62:
	bra.s	lbC000F76

lbC000F64:
	tst.b	$1E294E.L
	beq.w	lbC000F76
	tst.b	(A1)
	bne.w	lbC000F76
	move.l	A1,D1
lbC000F76:
	move.l	$1E269A.L,D0
	cmp.l	$1E26A8.L,D0
	beq.s	lbC000FB6
	clr.w	$1E2952.L
	move.w	#$280,D0
	mulu.w	$1E26AA.L,D0
	add.w	$1E26A8.L,D0
	addi.w	#$230,D0
	cmpi.b	#$FF,0(A0,D0.W)
	bne.w	lbC000FAC
	sf	0(A0,D0.W)
lbC000FAC:
	move.l	$1E269A.L,$1E26A8.L
lbC000FB6:
	tst.l	D1
	beq.w	lbC000FC0
	movea.l	D1,A0
	st	(A0)
lbC000FC0:
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC000FC6:
	cmpi.w	#$4F,$1E269A.L
	beq.s	lbC000FD8
	addq.w	#1,$1E269A.L
	rts

lbC000FD8:
	clr.w	$1E269A.L
	bsr.w	lbC0010FA
	rts

lbC000FE4:
	cmpi.w	#0,$1E269A.L
	beq.s	lbC000FF6
	subq.w	#1,$1E269A.L
	rts

lbC000FF6:
	move.w	#$4F,$1E269A.L
	bsr.w	lbC0010DC
	rts

lbC001004:
	clr.l	$1E269A.L
	rts

lbC00100C:
	movem.l	D0-D3/A0,-(SP)
	moveq	#0,D3
	tst.b	$1E26A0.L
	sne	D3
lbC00101A:
	move.w	$1E269A.L,D0
	beq.s	lbC00106A
	bsr.s	lbC000FE4
	movea.l	$1E26A2.L,A0
	moveq	#0,D1
	move.w	$1E269C.L,D1
	mulu.w	#$50,D1
	add.w	$1E269A.L,D1
	move.w	#$4E,D2
	sub.w	$1E269A.L,D2
lbC001046:
	move.b	1(A0,D1.W),0(A0,D1.W)
	addq.w	#1,D1
	dbra	D2,lbC001046
	move.b	#$20,0(A0,D1.W)
	tst.b	D3
	beq.w	lbC001066
	tst.w	$1E269A.L
	bne.s	lbC00101A
lbC001066:
	bsr.w	lbC006E88
lbC00106A:
	movem.l	(SP)+,D0-D3/A0
	rts

lbC001070:
	move.l	D0,-(SP)
	move.b	$1E2A56.L,-(SP)
	sf	$1E2A56.L
	move.w	$1E269A.L,D0
	cmpi.w	#$4F,D0
	beq.s	lbC0010D2
	tst.b	$1E26A0.L
	bne.w	lbC0010A0
	bsr.w	lbC000FC6
	bsr.w	lbC00100C
	bra.w	lbC0010D2

lbC0010A0:
	move.l	$1E269A.L,-(SP)
	moveq	#$20,D0
lbC0010A8:
	bsr.w	lbC00670A
	cmpi.w	#$18,$1E269C.L
	bne.w	lbC0010C4
	cmpi.w	#$4F,$1E269A.L
	beq.w	lbC0010CC
lbC0010C4:
	tst.w	$1E269A.L
	bne.s	lbC0010A8
lbC0010CC:
	move.l	(SP)+,$1E269A.L
lbC0010D2:
	move.b	(SP)+,$1E2A56.L
	move.l	(SP)+,D0
	rts

lbC0010DC:
	cmpi.w	#0,$1E269C.L
	beq.s	lbC0010EE
	subq.w	#1,$1E269C.L
	rts

lbC0010EE:
	addq.w	#1,$1E26AA.L
	bsr.w	lbC00121A
	rts

lbC0010FA:
	tst.b	$1E2B34.L
	beq.w	lbC00110A
	addq.b	#1,$1E2B35.L
lbC00110A:
	cmpi.w	#$18,$1E269C.L
	beq.s	lbC00111C
	addq.w	#1,$1E269C.L
	rts

lbC00111C:
	subq.w	#1,$1E26AA.L
	bsr.w	lbC001128
	rts

lbC001128:
	movem.l	D0/D1/A0/A1,-(SP)
	move.w	#$280,D0
	mulu.w	$1E269C.L,D0
	add.w	$1E269A.L,D0
	addi.w	#$230,D0
	cmpi.b	#$FF,0(A0,D0.W)
	bne.w	lbC00114E
	sf	0(A0,D0.W)
lbC00114E:
	tst.b	$1E26A0.L
	bne.s	lbC00114E
	tst.b	$1E2B34.L
	bne.w	lbC001166
	sf	$1E2B35.L
lbC001166:
	cmpi.b	#$17,$1E2B35.L
	bls.w	lbC001182
lbC001172:
	jsr	$1A9780.L
	tst.b	D0
	beq.s	lbC001172
	sf	$1E2B35.L
lbC001182:
	movea.l	$1E26A2.L,A0
	lea	$50(A0),A1
	move.w	#$EF,D0
lbC001190:
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	dbra	D0,lbC001190
	moveq	#$13,D0
	move.l	#$20202020,D1
lbC0011A0:
	move.l	D1,(A0)+
	dbra	D0,lbC0011A0
	lea	$1E45E8.L,A0
	lea	$280(A0),A1
	move.w	#$1DF,D0
lbC0011B4:
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	move.l	(A1)+,(A0)+
	dbra	D0,lbC0011B4
	moveq	#15,D0
lbC0011CA:
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	dbra	D0,lbC0011CA
	clr.w	$1E2952.L
	move.w	#$280,D0
	mulu.w	$1E269C.L,D0
	add.w	$1E269A.L,D0
	addi.w	#$230,D0
	cmpi.b	#$FF,0(A0,D0.W)
	bne.w	lbC001214
	tst.b	$1E294E.L
	beq.w	lbC001214
	st	0(A0,D0.W)
lbC001214:
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC00121A:
	movem.l	D0/D1/A0/A1,-(SP)
	movea.l	$1E26A2.L,A0
	lea	$780(A0),A0
	lea	$50(A0),A1
	move.w	#$EF,D0
lbC001230:
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	dbra	D0,lbC001230
	moveq	#$13,D0
	move.l	#$20202020,D1
lbC001240:
	move.l	D1,-(A1)
	dbra	D0,lbC001240
	lea	$1E45E8.L,A0
	lea	$3C00(A0),A0
	lea	$280(A0),A1
	move.w	#$1DF,D0
lbC001258:
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	move.l	-(A0),-(A1)
	dbra	D0,lbC001258
	moveq	#15,D0
lbC00126E:
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	clr.l	-(A1)
	dbra	D0,lbC00126E
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC00128C:
	sf	$1E2988.L
	st	$1E294E.L
	lea	$DFF000.L,A5
	lea	$1E2402.L,A6
	lea	$1E45E8.L,A0
	lea	$1D3082.L,A1
	move.w	#$F9F,D0
lbC0012B4:
	move.l	(A0),D1
	movep.l	0(A1),D2
	movep.l	D1,0(A1)
	move.l	D2,(A0)+
	addq.w	#8,A1
	dbra	D0,lbC0012B4
	move.l	$80(A6),$1E2AE0.L
	move.l	$E0(A6),$1E2664.L
	move.l	$100(A6),$1E264E.L
	move.w	$104(A6),$1E2652.L
	move.l	$108(A6),$1E2654.L
	move.l	$8E(A6),$1E265C.L
	move.l	$92(A6),$1E2660.L
	move.l	$6C.W,$1E2694.L
	bsr.w	lbC0013E2
	move.l	#$1A868A,$6C.w
	sf	$1E28AE.L
	move.w	#$20,$9C(A5)
lbC00131E:
	btst	#5,$1F(A5)
	beq.s	lbC00131E
	move.w	#$8020,$9A(A5)
	move.w	#$8380,$96(A5)
	rts

lbC001334:
	lea	$1E2402.L,A6
	lea	$DFF000.L,A5
	move.l	$1E2AE0.L,$80(A6)
	move.l	$1E2AE4.L,$84(A6)
	move.l	$1E265C.L,$8E(A6)
	move.l	$1E2660.L,$92(A6)
	move.l	$1E2664.L,$E0(A6)
	move.l	$1E264E.L,$100(A6)
	move.l	$1E2654.L,$108(A6)
	move.l	$1E2658.L,$180(A6)
	tst.w	$108(A6)
	beq.s	lbC00138C
	move.w	$108(A6),$108(A5)
lbC00138C:
	tst.w	$10A(A6)
	beq.s	lbC001398
	move.w	$10A(A6),$10A(A5)
lbC001398:
	tst.w	$100(A6)
	beq.s	lbC0013A4
	move.w	$100(A6),$100(A5)
lbC0013A4:
	tst.w	$102(A6)
	beq.s	lbC0013B0
	move.w	$102(A6),$102(A5)
lbC0013B0:
	tst.l	$80(A6)
	beq.s	lbC0013BC
	move.l	$80(A6),$80(A5)
lbC0013BC:
	tst.l	$84(A6)
	beq.s	lbC0013C8
	move.l	$84(A6),$84(A5)
lbC0013C8:
	tst.w	$180(A6)
	beq.s	lbC0013D4
	move.w	$180(A6),$180(A5)
lbC0013D4:
	tst.w	$182(A6)
	beq.s	lbC0013E0
	move.w	$182(A6),$182(A5)
lbC0013E0:
	rts

lbC0013E2:
	movem.l	D0/D1/A0/A5,-(SP)
	sf	$1E315A.L
	move.w	#0,$1E315C.L
	lea	$DFF000.L,A5
	lea	$1E4200.L,A0
	move.l	#$1060C40,(A0)+
	move.l	#$1E40000,(A0)+
	move.l	#$1FC0000,(A0)+
	move.l	#$8E3D81,(A0)+
	move.l	#$9005C1,(A0)+
	move.l	#$92003C,(A0)+
	move.l	#$9400D0,(A0)+
	move.l	#$1080000,(A0)+
	move.l	#$1009000,(A0)+
	move.l	#$1020000,(A0)+
	move.w	#$180,(A0)+
	move.w	$1E2970.L,(A0)+
	move.w	#$182,(A0)+
	move.w	$1E2972.L,(A0)+
	move.l	#$1E45E8,D0
	swap	D0
	move.w	#$E0,(A0)+
	move.w	D0,(A0)+
	swap	D0
	move.w	#$E2,(A0)+
	move.w	D0,(A0)+
	tst.b	$1E2988.L
	beq.w	lbC0014F4
	move.l	#$1040024,(A0)+
	moveq	#0,D1
	move.w	$1E2984.L,D1
	lsr.w	#2,D1
	move.w	$1E2986.L,D0
	lsl.w	#8,D0
	or.w	D0,D1
	swap	D1
	move.w	$1E2986.L,D0
	addi.w	#$10,D0
	lsl.w	#8,D0
	or.w	D0,D1
	move.w	$1E2984.L,D0
	lsr.w	#1,D0
	andi.w	#1,D0
	or.w	D0,D1
	move.w	$1E2986.L,D0
	lsr.w	#8,D0
	lsl.w	#2,D0
	or.w	D0,D1
	move.w	$1E2986.L,D0
	addi.w	#$10,D0
	lsr.w	#8,D0
	lsl.w	#1,D0
	or.w	D0,D1
	move.l	D1,$204.w
	moveq	#6,D1
	move.w	#$124,D0
lbC0014CE:
	move.w	D0,(A0)+
	move.w	#0,(A0)+
	addq.w	#2,D0
	move.w	D0,(A0)+
	move.w	#$200,(A0)+
	addq.w	#2,D0
	dbra	D1,lbC0014CE
	clr.l	$200.w
	move.l	#$1200000,(A0)+
	move.l	#$1220204,(A0)+
	bra.s	lbC00151E

lbC0014F4:
	clr.l	$200.w
	move.l	#$1200000,(A0)+
	move.l	#$1220200,(A0)+
	moveq	#6,D1
	move.w	#$124,D0
lbC00150A:
	move.w	D0,(A0)+
	move.w	#0,(A0)+
	addq.w	#2,D0
	move.w	D0,(A0)+
	move.w	#$200,(A0)+
	addq.w	#2,D0
	dbra	D1,lbC00150A
lbC00151E:
	move.l	#$FFFFFFFE,(A0)+
	move.l	#$1E4200,$84(A5)
	tst.w	$8A(A5)
	st	$1E315A.L
	movem.l	(SP)+,D0/D1/A0/A5
	rts

lbC00153C:
	movem.l	D0-D4/A0/A3-A5,-(SP)
	lea	$DFF000.L,A5
	sf	$1E315A.L
	move.w	#1,$1E315C.L
	lea	$1E4390.L,A0
	move.l	#$1060000,(A0)+
	move.w	#$10C,(A0)+
	move.w	$1E3152.L,D1
	andi.w	#$FF00,D1
	move.w	D1,(A0)+
	move.w	#$1E4,(A0)+
	move.w	$1E3150.L,(A0)+
	move.w	#$1FC,(A0)+
	move.w	$1E314E.L,(A0)+
	tst.b	$1E295C.L
	bne.s	lbC0015C2
	move.l	#$1200000,(A0)+
	move.l	#$1220100,(A0)+
	move.l	#$1240000,(A0)+
	move.l	#$1260124,(A0)+
	moveq	#5,D1
	move.w	#$128,D0
lbC0015AA:
	move.w	D0,(A0)+
	move.w	#0,(A0)+
	addq.w	#2,D0
	move.w	D0,(A0)+
	move.w	#0,(A0)+
	addq.w	#2,D0
	dbra	D1,lbC0015AA
	bra.w	lbC0015EE

lbC0015C2:
	moveq	#7,D2
	move.w	#$120,D0
	move.l	#$1E3200,D1
lbC0015CE:
	move.w	D0,(A0)+
	swap	D1
	move.w	D1,(A0)+
	addq.w	#2,D0
	move.w	D0,(A0)+
	swap	D1
	move.w	D1,(A0)+
	addq.w	#2,D0
	addi.l	#$D8,D1
	dbra	D2,lbC0015CE
	move.l	#$968020,(A0)+
lbC0015EE:
	move.w	#$8E,(A0)+
	move.w	$1E2786.L,(A0)+
	move.w	#$90,(A0)+
	move.w	$1E2788.L,(A0)+
	move.w	#$92,(A0)+
	move.w	$1E278A.L,(A0)+
	move.w	#$94,(A0)+
	move.w	$1E278C.L,(A0)+
	move.w	#$108,(A0)+
	move.w	$1E27AE.L,(A0)+
	move.w	#$10A,(A0)+
	move.w	$1E27B0.L,(A0)+
	move.w	#$102,(A0)+
	move.w	$1E27A8.L,(A0)+
	moveq	#15,D0
	lea	$1E27D4.L,A4
	lea	$180(A5),A3
lbC001640:
	move.l	(A4)+,(A3)+
	dbra	D0,lbC001640
	moveq	#5,D0
	lea	$1E278E.L,A4
	lea	$E0(A5),A3
	btst	#2,$1E27A7.L
	beq.s	lbC00166A
	btst	#7,4(A5)
	bne.s	lbC00166A
	lea	$1E2818.L,A4
lbC00166A:
	move.l	(A4)+,(A3)+
	dbra	D0,lbC00166A
	move.w	$1E27A6.L,D0
	andi.w	#$FE75,D0
	move.w	D0,D1
	andi.w	#$7000,D1
	bne.s	lbC00168C
	btst	#4,D0
	bne.s	lbC00168C
	ori.w	#$1000,D0
lbC00168C:
	move.w	#$100,(A0)+
	move.w	D0,(A0)+
	move.w	$1E27AA.L,D0
	andi.w	#$400,D0
	ori.w	#$24,D0
	move.w	#$104,(A0)+
	move.w	D0,(A0)+
	cmpi.b	#$80,$1E28AE.L
	beq.s	lbC0016B8
	moveq	#0,D0
	addq.w	#1,$1E2844.L
lbC0016B8:
	tst.b	$1E295C.L
	beq.w	lbC0016DE
	move.w	$1E2964.L,D1
	lea	$DFF180.L,A4
	move.w	D1,$22(A4)
	move.w	D1,$2A(A4)
	move.w	D1,$32(A4)
	move.w	D1,$3A(A4)
lbC0016DE:
	move.l	#$FFFFFFFE,(A0)+
	move.l	#$1E4390,$84(A5)
	tst.w	$8A(A5)
	st	$1E315A.L
	movem.l	(SP)+,D0-D4/A0/A3-A5
	rts

lbC0016FC:
	move.w	D0,-(SP)
	move.w	#$20,$DFF09C.L
	tst.w	$1E315A.L
	beq.s	lbC001732
	tst.w	$1E315C.L
	bne.s	lbC001722
	move.l	#$1E4200,$DFF084.L
	bra.s	lbC00172C

lbC001722:
	move.l	#$1E4390,$DFF084.L
lbC00172C:
	tst.w	$DFF08A.L
lbC001732:
	tst.b	$1E28AE.L
	beq.s	lbC001740
	bsr.w	lbC00153C
	bra.s	lbC001744

lbC001740:
	bsr.w	lbC0013E2
lbC001744:
	tst.b	$1E2B3E.L
	beq.w	lbC00179E
	addq.w	#1,$1E2BA6.L
	cmpi.w	#$3A98,$1E2BA6.L
	bls.w	lbC001778
	move.w	#$3A98,$1E2BA6.L
	move.w	#0,$DFF180.L
	move.w	#$180,$DFF096.L
lbC001778:
	btst	#0,$1E2699.L
	beq.w	lbC00179E
	cmpi.w	#$3A98,$1E2BA6.L
	bcs.w	lbC001798
	move.w	#$8380,$DFF096.L
lbC001798:
	clr.w	$1E2BA6.L
lbC00179E:
	addq.w	#1,$1E26A6.L
	tst.b	$1E2A58.L
	bne.w	lbC0017CA
	tst.b	$1E26AC.L
	beq.s	lbC0017CA
	move.w	$1E26A6.L,D0
	andi.w	#3,D0
	bne.s	lbC0017CA
	eori.b	#2,$BFE001.L
lbC0017CA:
	tst.b	$1E2A58.L
	beq.w	lbC0017DA
	jsr	$1B90A0.L
lbC0017DA:
	jsr	$1BCC8C.L
	move.w	(SP)+,D0
	rte

lbC0017E4:
	lea	$DFF000.L,A5
	move.w	#$300,$96(A5)
	move.w	#$20,$9A(A5)
	lea	$1E45E8.L,A0
	lea	$1D3082.L,A1
	move.w	#$F9F,D0
lbC001806:
	move.l	(A0),D1
	movep.l	0(A1),D2
	movep.l	D1,0(A1)
	move.l	D2,(A0)+
	addq.w	#8,A1
	dbra	D0,lbC001806
	move.w	$1E265C.L,D0
	beq.s	lbC001824
	move.w	D0,$8E(A5)
lbC001824:
	move.w	$1E265E.L,D0
	beq.s	lbC001830
	move.w	D0,$90(A5)
lbC001830:
	move.w	$1E2660.L,D0
	beq.s	lbC00183C
	move.w	D0,$92(A5)
lbC00183C:
	move.w	$1E2662.L,D0
	beq.s	lbC001848
	move.w	D0,$94(A5)
lbC001848:
	move.w	$1E2658.L,D0
	beq.s	lbC001854
	move.w	D0,$180(A5)
lbC001854:
	move.w	$1E265A.L,D0
	beq.s	lbC001860
	move.w	D0,$182(A5)
lbC001860:
	move.w	$1E264E.L,D0
	beq.s	lbC00186C
	move.w	D0,$100(A5)
lbC00186C:
	move.w	$1E2650.L,D0
	beq.s	lbC001878
	move.w	D0,$102(A5)
lbC001878:
	move.w	$1E2652.L,D0
	beq.s	lbC001884
	move.w	D0,$104(A5)
lbC001884:
	move.w	$1E2654.L,D0
	beq.s	lbC001890
	move.w	D0,$108(A5)
lbC001890:
	move.w	$1E2656.L,D0
	beq.s	lbC00189C
	move.w	D0,$10A(A5)
lbC00189C:
	move.l	$1E2694.L,$6C.w
	rts

lbC0018A6:
	movem.l	D1/A0,-(SP)
	bsr.s	lbC0018E2
	tst.w	D0
	beq.s	lbC0018C6
	cmp.w	$1E269E.L,D0
	bne.s	lbC0018C6
	cmpi.w	#13,$1E26A6.L
	bhi.s	lbC0018D8
	clr.w	D0
	bra.s	lbC0018D2

lbC0018C6:
	move.w	D0,$1E269E.L
	clr.w	$1E26A6.L
lbC0018D2:
	movem.l	(SP)+,D1/A0
	rts

lbC0018D8:
	move.w	#12,$1E26A6.L
	bra.s	lbC0018D2

lbC0018E2:
	movem.l	D1/A0,-(SP)
	move.w	$1E2698.L,D1
	btst	#0,D1
	beq.s	lbC001922
	andi.w	#$FF,D1
	not.b	D1
	lsr.w	#1,D1
	tst.b	$1E2B32.L
	beq.w	lbC001918
	moveq	#$40,D0
	cmpi.w	#2,D1
	beq.w	lbC001924
	moveq	#$27,D0
	cmpi.w	#$2A,D0
	beq.w	lbC001924
lbC001918:
	bsr.s	lbC00192A
	moveq	#0,D0
	move.b	0(A0,D1.W),D0
	bra.s	lbC001924

lbC001922:
	moveq	#0,D0
lbC001924:
	movem.l	(SP)+,D1/A0
	rts

lbC00192A:
	tst.b	$1E2954.L
	beq.s	lbC001944
	lea	ascii.MSG(PC),A0
	tst.b	$1E26A0.L
	beq.s	lbC001954
	lea	_.MSG(PC),A0
	bra.s	lbC001954

lbC001944:
	lea	ascii.MSG0(PC),A0
	tst.b	$1E26A0.L
	beq.s	lbC001954
	lea	ascii.MSG1(PC),A0
lbC001954:
	rts

ascii.MSG0:
	dc.b	'`1234567890ß',0
	dc.b	'\',0
	dc.b	'0qwertzuiopü+',0
	dc.b	'123asdfghjklöä#',0
	dc.b	'456<yxcvbnm,.-',0
	dc.b	'.789 '
	dc.b	8
	dc.b	9
	dc.b	13
	dc.b	13
	dc.b	$1B
	dc.b	$84
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	'-',0
	dc.b	$80
	dc.b	$81
	dc.b	$83
	dc.b	$82
	dc.b	$8A
	dc.b	$8B
	dc.b	$8C
	dc.b	$8D
	dc.b	$8E
	dc.b	$8F
	dc.b	$90
	dc.b	$91
	dc.b	$92
	dc.b	$93
	dc.b	'[]/*+'
	dc.b	$85
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
ascii.MSG1:
	dc.b	'~!"§$%&/()=?',0
	dc.b	'|',0
	dc.b	'0QWERTZUIOPÜ*',0
	dc.b	'123ASDFGHJKLÖÄ^',0
	dc.b	'456>YXCVBNM;:_',0
	dc.b	'.789 '
	dc.b	8
	dc.b	9
	dc.b	13
	dc.b	13
	dc.b	$1B
	dc.b	$84
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	'-',0
	dc.b	$80
	dc.b	$81
	dc.b	$83
	dc.b	$82
	dc.b	$8A
	dc.b	$8B
	dc.b	$8C
	dc.b	$8D
	dc.b	$8E
	dc.b	$8F
	dc.b	$90
	dc.b	$91
	dc.b	$92
	dc.b	$93
	dc.b	'{}/*+'
	dc.b	$85
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
ascii.MSG:
	dc.b	'`1234567890-=\',0
	dc.b	'0qwertyuiop[]',0
	dc.b	'123asdfghjkl;''',0,0
	dc.b	'456',0
	dc.b	'zxcvbnm,./',0
	dc.b	'.789 '
	dc.b	8
	dc.b	9
	dc.b	13
	dc.b	13
	dc.b	$1B
	dc.b	$84
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	'-',0
	dc.b	$80
	dc.b	$81
	dc.b	$83
	dc.b	$82
	dc.b	$8A
	dc.b	$8B
	dc.b	$8C
	dc.b	$8D
	dc.b	$8E
	dc.b	$8F
	dc.b	$90
	dc.b	$91
	dc.b	$92
	dc.b	$93
	dc.b	'[]/*+'
	dc.b	$85
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
_.MSG:
	dc.b	'~!@#$%^&*()_+|',0
	dc.b	'0QWERTYUIOP{}',0
	dc.b	'123ASDFGHJKL:"',0,0
	dc.b	'456',0
	dc.b	'ZXCVBNM<>?',0
	dc.b	'.789 '
	dc.b	8
	dc.b	9
	dc.b	13
	dc.b	13
	dc.b	$1B
	dc.b	$84
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	'-',0
	dc.b	$80
	dc.b	$81
	dc.b	$83
	dc.b	$82
	dc.b	$8A
	dc.b	$8B
	dc.b	$8C
	dc.b	$8D
	dc.b	$8E
	dc.b	$8F
	dc.b	$90
	dc.b	$91
	dc.b	$92
	dc.b	$93
	dc.b	'{}/*+'
	dc.b	$85
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0

lbC001AF6:
	movem.l	D0/A0,-(SP)
	tst.b	$1E2988.L
	bne.w	lbC001B30
	moveq	#$50,D0
	mulu.w	$1E269C.L,D0
	add.w	$1E269A.L,D0
	movea.l	$1E26A2.L,A0
	move.b	D1,0(A0,D0.W)
	tst.b	$1E2A56.L
	beq.w	lbC001B30
	moveq	#0,D0
	move.b	D1,D0
	jsr	$1B7624.L
lbC001B30:
	movem.l	(SP)+,D0/A0
	rts

lbC001B36:
	move.l	D1,-(SP)
	moveq	#2,D1
	bsr.w	lbC0066BE
	move.l	(SP)+,D1
	rts

lbC001B42:
	move.l	D1,-(SP)
	moveq	#6,D1
	bsr.w	lbC0066BE
	move.l	(SP)+,D1
	rts

lbL001B4E:
	dc.l	0
	dc.l	0
	dc.l	$183C3C18
	dc.l	$18001800
	dc.l	$6C6C0000
	dc.l	0
	dc.l	$6C6CFE6C
	dc.l	$FE6C6C00
	dc.l	$183E603C
	dc.l	$67C1800
	dc.l	$C6CC18
	dc.l	$3066C600
	dc.l	$386C6876
	dc.l	$DCCC7600
	dc.l	$18183000
	dc.l	0
	dc.l	$C183030
	dc.l	$30180C00
	dc.l	$30180C0C
	dc.l	$C183000
	dc.l	$663CFF
	dc.l	$3C660000
	dc.l	$18187E
	dc.l	$18180000
	dc.l	0
	dc.l	$181830
	dc.l	$7E
	dc.l	0
	dc.l	0
	dc.l	$181800
	dc.l	$3060C18
	dc.l	$3060C000
	dc.l	$3C666E7E
	dc.l	$76663C00
	dc.l	$18381818
	dc.l	$18187E00
	dc.l	$3C66061C
	dc.l	$30667E00
	dc.l	$3C66061C
	dc.l	$6663C00
	dc.l	$1C3C6CCC
	dc.l	$FE0C1E00
	dc.l	$7E607C06
	dc.l	$6663C00
	dc.l	$1C30607C
	dc.l	$66663C00
	dc.l	$7E66060C
	dc.l	$18181800
	dc.l	$3C66663C
	dc.l	$66663C00
	dc.l	$3C66663E
	dc.l	$60C3800
	dc.l	$181800
	dc.l	$181800
	dc.l	$181800
	dc.l	$181830
	dc.l	$C183060
	dc.l	$30180C00
	dc.l	$7E00
	dc.l	$7E0000
	dc.l	$30180C06
	dc.l	$C183000
	dc.l	$3C66060C
	dc.l	$18001800
	dc.l	$7CC6DEDE
	dc.l	$DEC07800
	dc.l	$183C3C66
	dc.l	$7EC3C300
	dc.l	$FC66667C
	dc.l	$6666FC00
	dc.l	$3C66C0C0
	dc.l	$C0663C00
	dc.l	$F86C6666
	dc.l	$666CF800
	dc.l	$FE666078
	dc.l	$6066FE00
	dc.l	$FE666078
	dc.l	$6060F000
	dc.l	$3C66C0CE
	dc.l	$C6663E00
	dc.l	$6666667E
	dc.l	$66666600
	dc.l	$7E181818
	dc.l	$18187E00
	dc.l	$E060606
	dc.l	$66663C00
	dc.l	$E6666C78
	dc.l	$6C66E600
	dc.l	$F0606060
	dc.l	$6266FE00
	dc.l	$82C6EEFE
	dc.l	$D6C6C600
	dc.l	$C6E6F6DE
	dc.l	$CEC6C600
	dc.l	$386CC6C6
	dc.l	$C66C3800
	dc.l	$FC66667C
	dc.l	$6060F000
	dc.l	$386CC6C6
	dc.l	$C66C3806
	dc.l	$FC66667C
	dc.l	$6C66E300
	dc.l	$3C667038
	dc.l	$E663C00
	dc.l	$7E5A1818
	dc.l	$18183C00
	dc.l	$66666666
	dc.l	$66663E00
	dc.l	$C3C36666
	dc.l	$3C3C1800
	dc.l	$C6C6C6D6
	dc.l	$FEEEC600
	dc.l	$C3663C18
	dc.l	$3C66C300
	dc.l	$C3C3663C
	dc.l	$18183C00
	dc.l	$FEC68C18
	dc.l	$3266FE00
	dc.l	$3C303030
	dc.l	$30303C00
	dc.l	$C0603018
	dc.l	$C060300
	dc.l	$3C0C0C0C
	dc.l	$C0C3C00
	dc.l	$10386CC6
	dc.l	0
	dc.l	0
	dc.l	$FE
	dc.l	$18180C00
	dc.l	0
	dc.l	$3C06
	dc.l	$1E663B00
	dc.l	$E0606C76
	dc.l	$66663C00
	dc.l	$3C66
	dc.l	$60663C00
	dc.l	$E06366E
	dc.l	$66663B00
	dc.l	$3C66
	dc.l	$7E603C00
	dc.l	$1C363078
	dc.l	$30307800
	dc.l	$3B66
	dc.l	$663CC67C
	dc.l	$E0606C76
	dc.l	$6666E600
	dc.l	$18003818
	dc.l	$18183C00
	dc.l	$6000606
	dc.l	$606663C
	dc.l	$E060666C
	dc.l	$786CE600
	dc.l	$38181818
	dc.l	$18183C00
	dc.l	$6677
	dc.l	$6B636300
	dc.l	$7C66
	dc.l	$66666600
	dc.l	$3C66
	dc.l	$66663C00
	dc.l	$DC66
	dc.l	$667C60F0
	dc.l	$3D66
	dc.l	$663E0607
	dc.l	$EC76
	dc.l	$6660F000
	dc.l	$3E60
	dc.l	$3C067C00
	dc.l	$8183E18
	dc.l	$181A0C00
	dc.l	$6666
	dc.l	$66663B00
	dc.l	$6666
	dc.l	$663C1800
	dc.l	$636B
	dc.l	$6B363600
	dc.l	$6336
	dc.l	$1C366300
	dc.l	$6666
	dc.l	$663C1870
	dc.l	$7E4C
	dc.l	$18327E00
	dc.l	$E181870
	dc.l	$18180E00
	dc.l	$18181818
	dc.l	$18181800
	dc.l	$7018180E
	dc.l	$18187000
	dc.l	$729C0000
	dc.l	0
	dc.l	$CC33CC33
	dc.l	$CC33CC33
	dc.l	$C3183C66
	dc.l	$7EC3C300
	dc.l	$33003C06
	dc.l	$1E663B00
	dc.l	$C33C66C3
	dc.l	$C3663C00
	dc.l	$66003C66
	dc.l	$66663C00
	dc.l	$66006666
	dc.l	$66663E00
	dc.l	$66006666
	dc.l	$66663B00
	dc.l	$7C66666C
	dc.l	$66666C60
	dc.l	$788078CC
	dc.l	$78047800
	dc.l	$7F414141
	dc.l	$41417F00
	dc.l	$3030303
	dc.l	$337F3000
	dc.l	$48241209
	dc.l	$12244800

lbC001EA6:
	move.l	D0,-(SP)
lbC001EA8:
	bsr.w	lbC0018A6
	tst.b	$1E296E.L
	bne.w	lbC001EE0
	tst.b	D0
	beq.w	lbC001EE0
	cmpi.w	#$20,D0
	beq.w	lbC001EDC
	cmpi.w	#$1F,D0
	bls.w	lbC001EE0
	cmpi.b	#$7F,D0
	bls.w	lbC001EDC
	cmpi.b	#$9F,D0
	bls.w	lbC001EE0
lbC001EDC:
	bsr.w	lbC004EBC
lbC001EE0:
	bsr.w	lbC00670A
	cmpi.w	#13,D0
	bne.s	lbC001EA8
	moveq	#$50,D0
	mulu.w	$1E269C.L,D0
	movea.l	$1E26A2.L,A0
	lea	-$50(A0,D0.W),A0
	moveq	#$50,D7
	move.l	(SP)+,D0
lbC001F00:
	rts

lbC001F02:
	move.l	SP,$1E2968.L
	tst.b	$1E2B36.L
	beq.w	lbC001F18
	jmp	$1C2046.L

lbC001F18:
	tst.b	$1E2AFC.L
	beq.w	lbC001F28
	jsr	$1C013C.L
lbC001F28:
	jsr	$1BE9EE.L
	jsr	$1B514C.L
	jsr	$1C9308.L
lbC001F3A:
	clr.w	$1E26AC.L
	ori.b	#2,$BFE001.L
	tst.b	$1E28AC.L
	bne.s	lbC001F00
	bsr.w	lbC001EA6
	st	$1E26AC.L
	jsr	$1ADB8C.L
	tst.b	$1E26B3.L
	bne.s	lbC001F3A
	jsr	$1AFE58.L
	move.w	#$4F,D0
	movea.l	A0,A1
	lea	$1E2BE0.L,A2
lbC001F7A:
	move.b	(A1)+,(A2)+
	dbra	D0,lbC001F7A
	lea	INTERRUPTS.MSG(PC),A2
	moveq	#0,D1
	movea.l	A0,A1
	move.l	D7,D6
lbC001F8A:
	move.l	D6,D7
	movea.l	A1,A0
lbC001F8E:
	bsr.w	lbC006F44
	cmp.b	(A2)+,D0
	bne.w	lbC001F9A
	bra.s	lbC001F8E

lbC001F9A:
	tst.b	-1(A2)
	beq.w	lbC001FBC
lbC001FA2:
	tst.b	(A2)+
	bne.s	lbC001FA2
	exg	D0,A2
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A2
	addq.w	#4,A2
	addq.w	#1,D1
	tst.b	(A2)
	bne.s	lbC001F8A
	bra.w	lbC0087CE

lbC001FBC:
	bsr.w	lbC007F7E
	exg	D0,A2
	addq.w	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A2
	moveq	#0,D0
	move.b	1(A2),D0
	swap	D0
	move.b	2(A2),D0
	lsl.w	#8,D0
	move.b	3(A2),D0
	movea.l	D0,A1
	jsr	(A1)
	bra.w	lbC001F3A

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC002020
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	beq.w	lbC00201A
	movea.l	#$E80,A1
	cmpi.l	#$149C,4.w
	beq.s	lbC00201A
	movea.l	#$420,A1
lbC00201A:
	move.l	A1,$1E315E.L
lbC002020:
	lea	CurrentCopper.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	$1E315E.L,D0
	bsr.w	lbC001B42
	bsr.w	lbC0087F0
	rts

CurrentCopper.MSG:
	dc.b	13
	dc.b	'Current Copper 0: ',0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC00206A
	cmpi.l	#5,D0
	bge.w	lbC0087CE
	move.w	D0,$1A801C.L
lbC00206A:
	lea	InterruptMode.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#0,D0
	move.w	$1A801C.L,D0
	add.l	D0,D0
	add.l	D0,D0
	movea.l	lbL00208C(PC,D0.W),A0
	bsr.w	lbC0035CE
	bsr.w	lbC0087F0
	rts

lbL00208C:
	dc.l	$1A9F94
	dc.l	$1A9FD9
	dc.l	$1AA016
	dc.l	$1AA053
	dc.l	$1AA090
InterruptMode.MSG:
	dc.b	13
	dc.b	'Interrupt Mode set to: ',$D,0
	dc.b	'-> Left & Right Mouse Button + ''F'' Key -+-'
	dc.b	'  '']'' key disable monitor.',0
	dc.b	'-> ''*'' Key on Keypad   -+-  '']'' on keypa'
	dc.b	'd disables montitor ',0
	dc.b	'-> Right Mouse Button  -+-  '']'' on keypad '
	dc.b	'disables montitor ',0
	dc.b	'-> Level 7 Interrupt   -+-  '']'' on keypad '
	dc.b	'disables montitor ',0
	dc.b	'-> Joystick Left+Right -+-  '']'' on keypad '
	dc.b	'disables montitor ',0,0
INTERRUPTS.MSG:
	dc.b	'INTERRUPTS',0
	dc.b	0
	dc.l	$1AB054
	dc.b	'EXCEPTIONS'
	dc.b	0
	dc.b	0
	dc.l	$1AA818
	dc.b	'NORMALCHAR',0,0
	dc.l	$1C148E
	dc.b	'SETEXCEPT',0
	dc.l	$1B5050
	dc.b	'LIBRARIES',0
	dc.l	$1AAD24
	dc.b	'RESOURCES',0
	dc.l	$1AAD38
	dc.b	'KILLVIRUS',0
	dc.l	$1AB260
	dc.b	'DISKCHECK',0
	dc.l	$1C0696
	dc.b	'MEGASTICK',0
	dc.l	$1C0E48
	dc.b	'SMALLCHAR',0
	dc.l	$1C1484
	dc.b	'CHIPREGS',0,0
	dc.l	$1BE704
	dc.b	'EXECBASE',0,0
	dc.l	$1AB23E
	dc.b	'BOOTCODE',0,0
	dc.l	$1C03BA
	dc.b	'BOOTPROT',0,0
	dc.l	$1C0448
	dc.b	'DISKWIPE',0,0
	dc.l	$1C0AB6
	dc.b	'CODECOPY',0,0
	dc.l	$1BFCF2
	dc.b	'CLRSTICK',0,0
	dc.l	$1C12E4
	dc.b	'SAFEDISK',0,0
	dc.l	$1C20C4
	dc.b	'MAKEDIR',0
	dc.l	$1BCADE
	dc.b	'INSTALL',0
	dc.l	$1BE12A
	dc.b	'RAMTEST',0
	dc.l	$1B2C0A
	dc.b	'DEVICES',0
	dc.l	$1AAD1A
	dc.b	'TRACKER',0
	dc.l	$1B84A0
	dc.b	'CLRDMON',0
	dc.l	$1A8A36
	dc.b	'BOOTCHK',0
	dc.l	$1BB756
	dc.b	'DATACHK',0
	dc.l	$1BB710
	dc.b	'MEMCODE',0
	dc.l	$1C077E
	dc.b	'VERSION',0
	dc.l	$1C0B92
	dc.b	'NOSTICK',0
	dc.l	$1C127C
	dc.b	'RELABEL',0
	dc.l	$1C50F2
	dc.b	'DELETE',0,0
	dc.l	$1BBEF8
	dc.b	'FORMAT',0,0
	dc.l	$1BB216
	dc.b	'UNPACK',0,0
	dc.l	$1B7104
	dc.b	'BAMCHK',0,0
	dc.l	$1BB734
	dc.b	'RCOLOR',0,0
	dc.l	$1AFD8A
	dc.b	'SMDATA',0,0
	dc.l	$1C0884
	dc.b	'LSTICK',0,0
	dc.l	$1C131C
	dc.b	'SSTICK',0,0
	dc.l	$1C13DA
	dc.b	'RENAME',0,0
	dc.l	$1C5190
	dc.b	'SETMAP',0,0
	dc.l	$1C3AC8
	dc.b	'SETCOP',0,0
	dc.l	$1A9EBE
	dc.b	'ALLEXC',0,0
	dc.l	$1AA7A2
	dc.b	'COLOR',0
	dc.l	$1AFDAA
	dc.b	'AVAIL',0
	dc.l	$1AAD10
	dc.b	'TASKS',0
	dc.l	$1AB12E
	dc.b	'PORTS',0
	dc.l	$1AAD2E
	dc.b	'VIRUS',0
	dc.l	$1AB244
	dc.b	'DCOPY',0
	dc.l	$1BFCEC
	dc.b	'TRANS',0
	dc.l	$1AB21E
	dc.b	'SQMEM',0
	dc.l	$1C9056
	dc.b	'RESET',0
	dc.l	$1C1464
	dc.b	'NCHAR',0
	dc.l	$1C148E
	dc.b	'SCHAR',0
	dc.l	$1C1484
	dc.b	'BCODE',0
	dc.l	$1C03BA
	dc.b	'BPROT',0
	dc.l	$1C0448
	dc.b	'DWIPE',0
	dc.l	$1C0AB6
	dc.b	'CCOPY',0
	dc.l	$1BFCF2
	dc.b	'SDISK',0
	dc.l	$1C20C4
	dc.b	'ASCII',0
	dc.l	$1C9448
	dc.b	'ALERT',0
	dc.l	$1C9F60
	dc.b	'DCHIP',0
	dc.l	$1C9FAC
	dc.b	'IMODE',0
	dc.l	$1A9F26
	dc.b	'DMON',0,0
	dc.l	$1C0A0A
	dc.b	'INFO',0,0
	dc.l	$1AA81E
	dc.b	'COMP',0,0
	dc.l	$1AA810
	dc.b	'PACK',0,0
	dc.l	$1B713C
	dc.b	'CODE',0,0
	dc.l	$1B5E78
	dc.b	'SCAN',0,0
	dc.l	$1B9368
	dc.b	'TYPE',0,0
	dc.l	$1C0502
	dc.b	'SMDC',0,0
	dc.l	$1C087A
	dc.b	'EXQR',0,0
	dc.l	$1C1E34
	dc.b	'NTSC',0,0
	dc.l	$1C3486
	dc.b	'COPY',0,0
	dc.l	$1C596A
	dc.b	'SEXC',0,0
	dc.l	$1B5050
	dc.b	'KVIR',0,0
	dc.l	$1AB260
	dc.b	'DCHK',0,0
	dc.l	$1C0696
	dc.b	'CREG',0,0
	dc.l	$1BE704
	dc.b	'EXEC',0,0
	dc.l	$1AB23E
	dc.b	'MDIR',0,0
	dc.l	$1BCADE
	dc.b	'INST',0,0
	dc.l	$1BE12A
	dc.b	'SRIP',0,0
	dc.l	$1B84A0
	dc.b	'ROBD',0,0
	dc.l	$1AC00A
	dc.b	'BDA',0
	dc.l	$1B02A0
	dc.b	'FAQ',0
	dc.l	$1B3370
	dc.b	'DIR',0
	dc.l	$1BAFAA
	dc.b	'SPM',0
	dc.l	$1BDBE0
	dc.b	'SQR',0
	dc.l	$1B53F0
	dc.b	'LQR',0
	dc.l	$1B56EE
	dc.b	'TFD',0
	dc.l	$1B28C0
	dc.b	'TMS',0
	dc.l	$1B20BA
	dc.b	'TMD',0
	dc.l	$1B20B2
	dc.b	'SPR',0
	dc.l	$1AF228
	dc.b	'PRT',0
	dc.l	$1C14EA
	dc.b	'EXQ',0
	dc.l	$1C1E3A
	dc.b	'TDX',0
	dc.l	$1C2C7C
	dc.b	'TDS',0
	dc.l	$1C2CFE
	dc.b	'TDC',0
	dc.l	$1C2CF8
	dc.b	'TDI',0
	dc.l	$1C93C4
	dc.b	'TDD',0
	dc.l	$1C2F7E
	dc.b	'MDA',0
	dc.l	$1C318C
	dc.b	'PAL',0
	dc.l	$1C3476
	dc.b	'ADD',0
	dc.l	$1C07FC
	dc.b	'INT',0
	dc.l	$1AB054
	dc.b	'EXC',0
	dc.l	$1AA818
	dc.b	'LIB',0
	dc.l	$1AAD24
	dc.b	'RES',0
	dc.l	$1AAD38
	dc.b	'MST',0
	dc.l	$1C0E48
	dc.b	'CST',0
	dc.l	$1C12E4
	dc.b	'DEV',0
	dc.l	$1AAD1A
	dc.b	'NST',0
	dc.l	$1C127C
	dc.b	'REL',0
	dc.l	$1C50F2
	dc.b	'DEL',0
	dc.l	$1BBEF8
	dc.b	'LST',0
	dc.l	$1C131C
	dc.b	'SST',0
	dc.l	$1C13DA
	dc.b	'REN',0
	dc.l	$1C5190
	dc.b	'KEY',0
	dc.l	$1C3AC8
	dc.b	'CD',0,0
	dc.l	$1BC8E6
	dc.b	'SA',0,0
	dc.l	$1BCF76
	dc.b	'LA',0,0
	dc.l	$1BD44C
	dc.b	'LQ',0,0
	dc.l	$1B56F4
	dc.b	'SQ',0,0
	dc.l	$1B53F6
	dc.b	'SP',0,0
	dc.l	$1BDBEA
	dc.b	'SM',0,0
	dc.l	$1BB782
	dc.b	'LM',0,0
	dc.l	$1BC364
	dc.b	'BS',0,0
	dc.l	$1B0214
	dc.b	'BD',0,0
	dc.l	$1B026E
	dc.b	'FA',0,0
	dc.l	$1AB05E
	dc.b	'FR',0,0
	dc.l	$1AB236
	dc.b	'FS',0,0
	dc.l	$1AB068
	dc.b	'NO',0,0
	dc.l	$1ACD30
	dc.b	'NQ',0,0
	dc.l	$1AB226
	dc.b	'PC',0,0
	dc.l	$1B06E4
	dc.b	'TS',0,0
	dc.l	$1AFE5E
	dc.b	'TF',0,0
	dc.l	$1B28B2
	dc.b	'TX',0,0
	dc.l	$1AFE66
	dc.b	'TM',0,0
	dc.l	$1B20AA
	dc.b	'RT',0,0
	dc.l	$1BF74E
	dc.b	'WT',0,0
	dc.l	$1BFAFC
	dc.b	'YS',0,0
	dc.l	$1AB21A
	dc.b	'LR',0,0
	dc.l	$1BD442
	dc.b	'SR',0,0
	dc.l	$1BCF6C
	dc.b	'WS',0,0
	dc.l	$1AB22E
	dc.b	'TD',0,0
	dc.l	$1C2C8A
	dc.b	'MS',0,0
	dc.l	$1C300A
	dc.b	'MD',0,0
	dc.l	$1C30CE
	dc.b	'MW',0,0
	dc.l	$1C3140
	dc.b	'ED',0,0
	dc.l	$1C53C0
	dc.b	'TR',0,0
	dc.l	$1C91F2
	dc.b	'ST',0,0
	dc.l	$1C912A
	dc.b	'A',0
	dc.l	$1B363A
	dc.b	'B',0
	dc.l	$1B02CC
	dc.b	'X',0
	dc.l	$1AA748
	dc.b	'C',0
	dc.l	$1AC11A
	dc.b	'D',0
	dc.l	$1AAB70
	dc.b	'E',0
	dc.l	$1AB136
	dc.b	'F',0
	dc.l	$1AB072
	dc.b	'G',0
	dc.l	$1AACE4
	dc.b	'I',0
	dc.l	$1AB21E
	dc.b	'M',0
	dc.l	$1AB040
	dc.b	'N',0
	dc.l	$1AAC9A
	dc.b	'O',0
	dc.l	$1AAD42
	dc.b	'P',0
	dc.l	$1AA808
	dc.b	'R',0
	dc.l	$1AAD4A
	dc.b	'T',0
	dc.l	$1AFE6E
	dc.b	'V',0
	dc.l	$1AA810
	dc.b	'W',0
	dc.l	$1AACE0
	dc.b	'Y',0
	dc.l	$1AB216
	dc.b	'?',0
	dc.l	$1AB212
	dc.b	$27
	dc.b	0
	dc.l	$1B2668
	dc.b	$7E
	dc.b	0
	dc.l	$1AAB58
	dc.b	'.',0
	dc.l	$1AACAE
	dc.b	':',0
	dc.l	$1AB588
	dc.b	';',0
	dc.l	$1AB1A4
	dc.b	',',0
	dc.l	$1ACB6C
	dc.b	$7C
	dc.b	0
	dc.l	$1AF582
	dc.b	$A7
	dc.b	0
	dc.l	$1AF328
	dc.b	'&',0
	dc.l	$1AF426
	dc.b	$5E
	dc.b	0
	dc.l	$1B3678
	dc.w	0

lbC00286E:
	tst.b	$1E2AF6.L
	beq.w	lbC002896
	tst.b	$1E2AFD.L
	bne.w	lbC002896
	lea	Suretoexitwit.MSG(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC002896
	jsr	lbC000B5C(PC)
lbC002896:
	addq.w	#4,SP
	rts

Suretoexitwit.MSG:
	dc.b	'Sure to exit without resetting trackbuffer?',$D,0
	dc.b	0

	movem.l	D0-D3/A0-A2,-(SP)
	lea	AllExceptions.MSG(PC),A0
	not.w	$1E314C.L
	beq.w	lbC0028DE
	lea	AllExceptions.MSG0(PC),A0
lbC0028DE:
	bsr.w	lbC0035CE
	movem.l	(SP)+,D0-D3/A0-A2
	bsr.w	lbC0087F0
	rts

AllExceptions.MSG0:
	dc.b	13
	dc.b	'All Exceptions ignored.',$D,0
	dc.b	0
AllExceptions.MSG:
	dc.b	13
	dc.b	'All Exceptions will activate ARIV.',$D,0
	dc.b	0
	dc.b	0

	bsr.w	lbC008816
	bra.w	lbC0087F0

	bsr.w	lbC008726
	bra.w	lbC0087F0

	jmp	$1B4DFE.L

	jsr	$1BB4BC.L
	move.w	#1,$1E2816.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC002968
	andi.w	#$1FFF,D0
	move.w	D0,$1E2816.L
lbC002968:
	bsr.w	lbC0062E6
	lea	DIWSTRTDIWSTO.MSG(PC),A0
	bsr.w	lbC0035CE
	lea	$1E2786.L,A0
	moveq	#3,D1
lbC00297C:
	move.w	(A0)+,D0
	bsr.w	lbC006F38
	moveq	#4,D0
	jsr	$1AEEAE.L
	dbra	D1,lbC00297C
	jsr	$1AEEA2.L
	lea	BITPLANES.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E27A6.L,D1
	andi.w	#$7000,D1
	rol.w	#4,D1
	tst.w	D1
	beq.w	lbC0029FA
	subq.w	#1,D1
	lea	$1E278E.L,A0
lbC0029B6:
	move.l	(A0)+,D0
	bsr.w	lbC00A1C4
	moveq	#$20,D0
	bsr.w	lbC00670A
	bsr.w	lbC00670A
	dbra	D1,lbC0029B6
	tst.w	$1E269A.L
	beq.s	lbC0029D8
	jsr	$1AEEA2.L
lbC0029D8:
	lea	COLORS.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$1F,D1
	lea	$1E27D4.L,A0
lbC0029EA:
	move.w	(A0)+,D0
	bsr.w	lbC006F38
	jsr	$1AEE96.L
	dbra	D1,lbC0029EA
lbC0029FA:
	lea	SPRITES.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#7,D1
	lea	$1E27B2.L,A0
lbC002A0A:
	move.l	(A0)+,D0
	bsr.w	lbC00A1C4
	moveq	#$20,D0
	bsr.w	lbC00670A
	bsr.w	lbC00670A
	dbra	D1,lbC002A0A
	lea	BPLCON0BPLCON.MSG(PC),A0
	bsr.w	lbC0035CE
	lea	$1E27A6.L,A0
	moveq	#2,D1
lbC002A2E:
	move.w	(A0)+,D0
	bsr.w	lbC006F38
	moveq	#4,D0
	bsr.w	lbC006FD4
	dbra	D1,lbC002A2E
	move.w	$1E2600.L,D0
	bsr.w	lbC006F38
	moveq	#3,D0
	bsr.w	lbC006FD4
	move.w	$1E2604.L,D0
	bsr.w	lbC006F38
	bsr.w	lbC006FF0
	moveq	#1,D1
	lea	BPL1MODBPL2MO.MSG(PC),A0
	bsr.w	lbC0035CE
	lea	$1E27AE.L,A0
lbC002A6C:
	move.w	(A0)+,D0
	bsr.w	lbC006F38
	moveq	#4,D0
	bsr.w	lbC006FD4
	dbra	D1,lbC002A6C
	move.w	$1E2442.L,D0
	bsr.w	lbC006F38
	moveq	#4,D0
	bsr.w	lbC006FD4
	move.w	$1E2444.L,D0
	bsr.w	lbC006F38
	moveq	#4,D0
	bsr.w	lbC006FD4
	move.w	$1E2874.L,D0
	bsr.w	lbC006F38
	bsr.w	lbC006FF0
	lea	CLXCONINTENAA.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E27D2.L,D0
	bsr.w	lbC006F38
	lea	ascii.MSG2(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E2602.L,D0
	bsr.w	lbC006F38
	lea	ascii.MSG2(PC),A0
	bsr.w	lbC0035CE
	move.w	$DFF010.L,D0
	bsr.w	lbC006F38
	moveq	#4,D0
	bsr.w	lbC006FD4
	moveq	#0,D2
	lea	$1E29BE.L,A1
lbC002AEE:
	btst	D2,$1E298F.L
	bne.w	lbC002B04
	lea	ascii.MSG19(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC002B1C

lbC002B04:
	moveq	#$21,D0
	bsr.w	lbC00670A
	moveq	#0,D0
	move.b	0(A1,D2.W),D0
	lsr.w	#1,D0
	bsr.w	lbC0086F8
	moveq	#3,D1
	bsr.w	lbC0066BE
lbC002B1C:
	moveq	#2,D0
	bsr.w	lbC006FD4
	addq.w	#1,D2
	cmpi.w	#4,D2
	bne.s	lbC002AEE
	bsr.w	lbC006FF0
	lea	AUDADRAUDLENA.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#3,D3
	lea	$1E24A2.L,A1
lbC002B3E:
	move.l	(A1)+,D0
	bsr.w	lbC001B42
	lea	ascii.MSG4(PC),A0
	bsr.w	lbC0035CE
	move.w	(A1)+,D0
	bsr.w	lbC006F38
	lea	ascii.MSG2(PC),A0
	bsr.w	lbC0035CE
	move.w	(A1)+,D0
	bsr.w	lbC006F38
	lea	ascii.MSG2(PC),A0
	bsr.w	lbC0035CE
	move.w	(A1)+,D0
	bsr.w	lbC006F38
	lea	ascii.MSG2(PC),A0
	bsr.w	lbC0035CE
	lea	6(A1),A1
	moveq	#13,D0
	bsr.w	lbC00670A
	dbra	D3,lbC002B3E
	jsr	$1B06CA.L
	rts

DIWSTRTDIWSTO.MSG:
	dc.b	'DIWSTRT DIWSTOP DDFSTRT DDFSTOP',$D,0
BITPLANES.MSG:
	dc.b	'BITPLANES',$D,0
COLORS.MSG:
	dc.b	'COLORS',$D,0
SPRITES.MSG:
	dc.b	'SPRITES',$D,0
BPLCON0BPLCON.MSG:
	dc.b	'BPLCON0 BPLCON1 BPLCON2 DMACON INTREQ',$D,0
BPL1MODBPL2MO.MSG:
	dc.b	'BPL1MOD BPL2MOD BLTCON0 BLTCON1 DSKSYNC',$D,0
ascii.MSG2:
	dc.b	'     ',0
ascii.MSG4:
	dc.b	'   ',0
CLXCONINTENAA.MSG:
	dc.b	'CLXCON   INTENA   ADKCON  TDF0  TDF1  TDF2  '
	dc.b	'TDF3',$D,0
AUDADRAUDLENA.MSG:
	dc.b	'AUDADR   AUDLEN   AUDPER   AUDVOL',$D,0
ascii.MSG19:
	dc.b	'****'
	dc.w	0

lbC002C7E:
	move.l	$1E276A.L,D0
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bra.s	lbC002CC6

	sf	$1E296F.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC002C7E
	bclr	#0,D0
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	tst.l	D0
	bne.s	lbC002CC6
	move.l	$1E2648.L,D0
lbC002CC6:
	jsr	$1C5342.L
	st	$1E2834.L
	bclr	#$1F,D0
	beq.w	lbC002CE0
	sf	$1E2834.L
lbC002CE0:
	movea.l	D0,A0
	move.l	D0,-(SP)
	tst.b	$1E296F.L
	beq.w	lbC002D0A
	tst.b	$1E2834.L
	beq.w	lbC002D0A
	move.l	A0,-(SP)
	lea	ascii.MSG3(PC),A0
	bsr.w	lbC0035CE
	jsr	$1C5342.L
	movea.l	(SP)+,A0
lbC002D0A:
	tst.b	$1E3162.L
	beq.s	lbC002D2E
	st	$1E3163.L
	move.l	-4(A0),$1E3166.L
	move.l	-4(A0),$1E316A.L
	clr.w	$1E316E.L
lbC002D2E:
	bsr.w	lbC004F06
	sf	$1E3163.L
	sf	D1
	move.w	$1E2720.L,D0
	cmpi.w	#$3C,D0
	beq.w	lbC002D6A
	cmpi.w	#$3E,D0
	beq.w	lbC002D6A
	cmpi.w	#13,D0
	beq.w	lbC002D6A
	cmpi.w	#$1E,D0
	beq.w	lbC002D6A
	sf	$1E296F.L
	bra.w	lbC002D70

lbC002D6A:
	st	$1E296F.L
lbC002D70:
	moveq	#$7E,D0
	bsr.w	lbC00670A
	move.l	(SP),D0
	bsr.w	lbC001B42
	bsr.w	lbC006FBC
	move.l	(SP),D0
	bsr.w	lbC005D36
	jsr	$1B7740.L
	move.l	A0,$1E276A.L
	move.l	(SP)+,D0
	rts

ascii.MSG3:
	dc.b	';=======================================',$D,0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A0
	bra.w	lbC0077EA

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC001F3A
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	jsr	$1C05CC.L
	bmi.w	lbC0087CE
	lea	$40(A1),A0
	bra.w	lbC0077EA

	bra.w	lbC00A5CE

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC00286E
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC001F00
	bclr	#0,D0
	move.l	D0,$1E2648.L
	bra.w	lbC00286E

	jsr	$1B2E80.L
	bra.w	lbC0087F0

	jsr	$1B2E70.L
	bra.w	lbC0087F0

	jsr	$1B2A1E.L
	bra.w	lbC0087F0

	jsr	$1B2A2E.L
	bra.w	lbC0087F0

	jsr	$1B2A3E.L
	bra.w	lbC0087F0

	bsr.w	lbC007848
	bra.w	lbC0087F0

	movem.l	D0-D2/A1,-(SP)
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC002FD6
	cmpi.w	#$46,D0
	beq.s	lbC002EEC
	cmpi.w	#$44,D0
	beq.w	lbC002FA0
	cmpi.w	#$41,D0
	beq.w	lbC002FA8
	move.w	D0,D2
lbC002E9A:
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.w	lbC002FD6
	cmpi.w	#$20,D0
	bne.s	lbC002E9A
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC002FD6
	cmpi.w	#$55,D2
	beq.s	lbC002EDA
	cmpi.w	#$50,D2
	beq.s	lbC002EE2
	cmpi.w	#$53,D2
	bne.w	lbC002FD6
	move.w	D0,$1E264C.L
	bra.w	lbC002FD6

lbC002EDA:
	movea.l	D0,A1
	move.l	A1,USP
	bra.w	lbC002FD6

lbC002EE2:
	move.l	D0,$1E2648.L
	bra.w	lbC002FD6

lbC002EEC:
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.w	lbC002FD6
	cmpi.w	#$49,D0
	bne.s	lbC002F26
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC002FD6
	andi.w	#7,D0
	rol.w	#8,D0
	andi.w	#$F8FF,$1E264C.L
	or.w	D0,$1E264C.L
	bra.w	lbC002FD6

lbC002F26:
	move.w	#$10,D1
	cmpi.w	#$54,D0
	bne.s	lbC002F34
	move.w	#15,D1
lbC002F34:
	cmpi.w	#$53,D0
	bne.s	lbC002F3E
	move.w	#13,D1
lbC002F3E:
	cmpi.w	#$58,D0
	bne.s	lbC002F48
	move.w	#4,D1
lbC002F48:
	cmpi.w	#$4E,D0
	bne.s	lbC002F52
	move.w	#3,D1
lbC002F52:
	cmpi.w	#$5A,D0
	bne.s	lbC002F5C
	move.w	#2,D1
lbC002F5C:
	cmpi.w	#$56,D0
	bne.s	lbC002F66
	move.w	#1,D1
lbC002F66:
	cmpi.w	#$43,D0
	bne.s	lbC002F70
	move.w	#0,D1
lbC002F70:
	btst	#4,D1
	bne.s	lbC002FD6
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC002FD6
	tst.l	D0
	beq.s	lbC002F92
	clr.w	D0
	bset	D1,D0
	or.w	D0,$1E264C.L
	bra.s	lbC002FD6

lbC002F92:
	move.w	#$FFFF,D0
	bclr	D1,D0
	and.w	D0,$1E264C.L
	bra.s	lbC002FD6

lbC002FA0:
	lea	$1E2608.L,A1
	bra.s	lbC002FAE

lbC002FA8:
	lea	$1E2628.L,A1
lbC002FAE:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC002FD6
	cmpi.l	#7,D0
	bhi.s	lbC002FD6
	lsl.w	#2,D0
	move.w	D0,D1
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC002FD6
	move.l	D0,0(A1,D1.W)
lbC002FD6:
	jsr	$1AAEBC.L
	movem.l	(SP)+,D0-D2/A1
	rts

	movem.l	A0/A1,-(SP)
	lea	$1E2608.L,A1
	lea	_D0.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D2
lbC002FF8:
	move.l	(A1)+,D0
	jsr	$1B209E.L
	jsr	$1AEE96.L
	cmpi.w	#3,D2
	bne.w	lbC003014
	jsr	$1AEE96.L
lbC003014:
	addq.w	#1,D2
	cmpi.w	#7,D2
	bls.s	lbC002FF8
	lea	_A0.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D2
lbC003028:
	move.l	(A1)+,D0
	cmpi.w	#7,D2
	bne.w	lbC003034
	addq.l	#6,D0
lbC003034:
	jsr	$1B209E.L
	jsr	$1AEE96.L
	cmpi.w	#3,D2
	bne.w	lbC00304E
	jsr	$1AEE96.L
lbC00304E:
	addq.w	#1,D2
	cmpi.w	#7,D2
	bls.s	lbC003028
	jsr	$1AEEA2.L
	lea	_PC.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	(A1)+,D0
	bsr.w	lbC00A1C4
	lea	_USP.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	USP,A0
	move.l	A0,D0
	bsr.w	lbC00A1C4
	lea	_SR.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	(A1)+,D0
	bsr.w	lbC006F38
	move.w	D0,D2
	lea	T.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	lea	S.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#2,D2
	bsr.w	lbC004E9E
	lea	I.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#3,D2
	bsr.w	lbC004E9E
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	lea	X.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#4,D2
	bsr.w	lbC004E9E
	lea	N.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	lea	Z.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	lea	V.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	lea	C.MSG(PC),A0
	jsr	$1AB4A8.L
	lsl.w	#1,D2
	bsr.w	lbC004E9E
	jsr	$1AEEA2.L
	movem.l	(SP)+,A0/A1
	rts

_PC.MSG:
	dc.b	'PC = ',0
_USP.MSG:
	dc.b	' USP = ',0
_SR.MSG:
	dc.b	' SR = ',0
T.MSG:
	dc.b	' T=',0
S.MSG:
	dc.b	' S=',0
I.MSG:
	dc.b	' I=',0
X.MSG:
	dc.b	' X=',0
N.MSG:
	dc.b	' N=',0
Z.MSG:
	dc.b	' Z=',0
V.MSG:
	dc.b	' V=',0
C.MSG:
	dc.b	' C=',0
_D0.MSG:
	dc.b	'D0=',0
_A0.MSG:
	dc.b	13
	dc.b	'A0=',0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bra.w	lbC00363A

	jsr	$1B30FC.L
	bra.w	lbC0087F0

	jsr	$1B337E.L
	bra.w	lbC0087F0

	st	$1E2834.L
	bra.w	lbC0031A4

	sf	$1E2834.L
	sf	$1E2B33.L
lbC0031A4:
	bsr.w	lbC003574
	st	$1E2B33.L
	tst.w	D0
	beq.w	lbC0087CE
	move.w	D0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC0031FC
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.s	lbC0031FC
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC003202
	movea.l	D0,A2
	exg	A1,A2
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	exg	A1,A2
	bne.s	lbC003202
	move.w	(SP)+,D0
	bsr.w	lbC00322A
	bsr.w	lbC007110
	bra.w	lbC0087F0

lbC0031FC:
	movea.l	$1E26B4.L,A1
lbC003202:
	movea.l	$1E26B8.L,A2
	move.w	(SP)+,D0
	bsr.w	lbC00322A
	bsr.w	lbC007110
	bra.w	lbC0087F0

Searchfrom.MSG:
	dc.b	'Search from: ',0
to.MSG:
	dc.b	' to: ',0

lbC00322A:
	movem.l	D0/A0,-(SP)
	lea	Searchfrom.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	A1,D0
	bsr.w	lbC001B42
	lea	to.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	A2,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FF0
	movem.l	(SP)+,D0/A0
	rts

	bsr.w	lbC00AB74
	bra.w	lbC0087F0

lbC00325C:
	bsr.w	lbC007206
lbW003260:
	dc.w	$880
lbW003262:
	dc.w	0

	cmpi.w	#$1FF,D0
	bhi.w	lbC0087CE
	bsr.w	lbC0033D2
	move.w	D0,D1
	move.w	#$3B,D0
	bsr.w	lbC00670A
	move.w	D1,D0
	bsr.w	lbC006F38
	dc.w	$4EB9
	dc.w	$1A
lbW003284:
	dc.w	$EE96

	move.w	(A1),D0
	bsr.w	lbC006F38
lbC00328C:
	jsr	$1AEE96.L
	move.w	#$25,D0
	bsr.w	lbC00670A
	move.w	(A1),D0
	bsr.w	lbC0033A2
	moveq	#5,D0
	jsr	$1AEEAE.L
	moveq	#$3B,D0
	jsr	$1AE5E4.L
	move.w	D1,D0
	jsr	$1BE770.L
	jsr	$1B7740.L
	move.w	#6,$1E269A.L
	bra.w	lbC000F22

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmpi.w	#$1FF,D0
	bhi.w	lbC0087CE
	bclr	#0,D0
	move.w	D0,D1
	move.w	D0,D3
	bsr.w	lbC0033D2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmp.w	(A1),D0
	beq.s	lbC00330A
	move.w	D0,D2
	move.w	D1,D0
	bsr.w	lbC0033F4
	move.w	D2,(A1)
	bra.s	lbC003326

lbC00330A:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmp.w	(A1),D0
	beq.s	lbC003326
	move.w	D0,D2
	move.w	D1,D0
	bsr.w	lbC0033F4
	move.w	D2,(A1)
lbC003326:
	addq.w	#2,D3
	move.w	D3,D0
	cmpi.w	#$1FE,D0
	bhi.w	lbC003336
	bra.w	lbW003260

lbC003336:
	rts

	bra.w	lbC00728C

	bra.w	lbC00762E

	bra.w	lbC0075BC

	bsr.w	lbC007732
	bra.w	lbC0087F0

	bsr.w	lbC00AC38
	bra.w	lbC0087F0

	bsr.w	lbC004DFC
	bra.w	lbC0087F0

	bsr.w	lbC006FFC
	bra.w	lbC0087F0

	jmp	$1BEDBE.L

	move.b	$1E2950.L,-(SP)
	bclr	#1,$1E2950.L
	jsr	$1BE946.L
	move.b	(SP)+,$1E2950.L
	rts

	move.b	$1E2950.L,-(SP)
	bset	#1,$1E2950.L
	jsr	$1BE946.L
	move.b	(SP)+,$1E2950.L
	rts

lbC0033A2:
	move.l	D1,-(SP)
	moveq	#$10,D1
	bsr.w	lbC0033AE
	move.l	(SP)+,D1
	rts

lbC0033AE:
	movem.l	D0-D2,-(SP)
	moveq	#$20,D2
	sub.w	D1,D2
	lsl.l	D2,D0
	subq.w	#1,D1
	move.l	D0,D2
lbC0033BC:
	moveq	#$31,D0
	roxl.l	#1,D2
	bcs.s	lbC0033C4
	moveq	#$30,D0
lbC0033C4:
	bsr.w	lbC00670A
	dbra	D1,lbC0033BC
	movem.l	(SP)+,D0-D2
	rts

lbC0033D2:
	bsr.w	lbC003416
	cmpa.l	#$DFF000,A1
	bcs.s	lbC0033F2
	cmpa.l	#$DFF01E,A1
	bcs.s	lbC0033F2
	suba.l	#$DFF000,A1
	adda.l	#$1E2402,A1
lbC0033F2:
	rts

lbC0033F4:
	bsr.w	lbC003416
	cmpa.l	#$DFF000,A1
	bcs.s	lbC003414
	cmpa.l	#$DFF01E,A1
	bhi.s	lbC003414
	suba.l	#$DFF000,A1
	adda.l	#$1E2402,A1
lbC003414:
	rts

lbC003416:
	lea	lbW003434(PC),A1
lbC00341A:
	cmp.w	(A1)+,D0
	beq.s	lbC003430
	addq.w	#4,A1
	tst.w	(A1)
	bpl.s	lbC00341A
	lea	$DFF000.L,A1
	lea	0(A1,D0.W),A1
	rts

lbC003430:
	movea.l	(A1),A1
	rts

lbW003434:
	dc.w	2
	dc.l	$1E2600
	dc.w	$10
	dc.l	$1E2606
	dc.w	$1C
	dc.l	$1E2602
	dc.w	$1E
	dc.l	$1E2604
	dc.w	$28
	dc.l	$1E2928
	dc.w	$2A
	dc.l	$1E2928
	dc.w	$2C
	dc.l	$1E2928
	dc.w	$38
	dc.l	$1E2928
	dc.w	$3A
	dc.l	$1E2928
	dc.w	$3C
	dc.l	$1E2928
	dc.w	$3E
	dc.l	$1E2928
	dc.w	$40
	dc.l	$1E2668
	dc.w	$42
	dc.l	$1E266A
	dc.w	$44
	dc.l	$1E266C
	dc.w	$46
	dc.l	$1E266E
	dc.w	$48
	dc.l	$1E2670
	dc.w	$4A
	dc.l	$1E2672
	dc.w	$4C
	dc.l	$1E2674
	dc.w	$4E
	dc.l	$1E2676
	dc.w	$50
	dc.l	$1E2678
	dc.w	$52
	dc.l	$1E267A
	dc.w	$54
	dc.l	$1E267C
	dc.w	$56
	dc.l	$1E267E
	dc.w	$58
	dc.l	$1E268E
	dc.w	$60
	dc.l	$1E2680
	dc.w	$62
	dc.l	$1E2682
	dc.w	$64
	dc.l	$1E2684
	dc.w	$66
	dc.l	$1E2686
	dc.w	$70
	dc.l	$1E2688
	dc.w	$72
	dc.l	$1E268A
	dc.w	$74
	dc.l	$1E268C
	dc.w	$7E
	dc.l	$1E2874
	dc.w	$80
	dc.l	$1E2AE0
	dc.w	$82
	dc.l	$1E2AE2
	dc.w	$88
	dc.l	$1E2928
	dc.w	$8A
	dc.l	$1E2928
	dc.w	$8E
	dc.l	$1E265C
	dc.w	$90
	dc.l	$1E265E
	dc.w	$92
	dc.l	$1E2660
	dc.w	$94
	dc.l	$1E2662
	dc.w	$96
	dc.l	$1E2600
	dc.w	$9A
	dc.l	$1E2602
	dc.w	$9C
	dc.l	$1E2604
	dc.w	$9E
	dc.l	$1E2606
	dc.w	$E0
	dc.l	$1E2664
	dc.w	$E2
	dc.l	$1E2666
	dc.w	$100
	dc.l	$1E264E
	dc.w	$102
	dc.l	$1E2650
	dc.w	$104
	dc.l	$1E2652
	dc.w	$108
	dc.l	$1E2654
	dc.w	$10A
	dc.l	$1E2656
	dc.w	$180
	dc.l	$1E2658
	dc.w	$182
	dc.l	$1E265A
	dc.w	$FFFF

lbC003574:
	movem.l	D6/A1,-(SP)
	lea	$1E26C8.L,A1
	moveq	#0,D6
lbC003580:
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.s	lbC0035C6
	cmpi.w	#$22,D0
	beq.s	lbC0035AE
	cmpi.w	#$2C,D0
	beq.s	lbC0035C6
	bsr.w	lbC007F7E
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC0035C6
	move.b	D0,(A1)+
	addq.w	#1,D6
	bra.s	lbC003580

lbC0035AE:
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.s	lbC0035C6
	cmpi.w	#$22,D0
	beq.s	lbC003580
	move.b	D0,(A1)+
	addq.w	#1,D6
	bra.s	lbC0035AE

lbC0035C6:
	move.w	D6,D0
	movem.l	(SP)+,D6/A1
	rts

lbC0035CE:
	movem.l	D0/A0,-(SP)
	moveq	#0,D0
lbC0035D4:
	tst.b	$1E26A1.L
	beq.w	lbC0035E8
	tst.b	$1E26A0.L
	bne.w	lbC0035F8
lbC0035E8:
	bsr.w	lbC0040BA
	addq.w	#1,A0
	tst.b	D0
	beq.s	lbC0035F8
	bsr.w	lbC00670A
	bra.s	lbC0035D4

lbC0035F8:
	movem.l	(SP)+,D0/A0
	rts

lbC0035FE:
	cmpi.b	#$1F,D0
	bls.w	lbC003618
	cmpi.b	#$7F,D0
	bls.w	lbC003616
	cmpi.b	#$9F,D0
	bls.w	lbC003618
lbC003616:
	rts

lbC003618:
	moveq	#$20,D0
	rts

lbC00361C:
	cmpi.b	#$1F,D0
	bls.w	lbC003636
	cmpi.b	#$7F,D0
	bls.w	lbC003634
	cmpi.b	#$9F,D0
	bls.w	lbC003636
lbC003634:
	rts

lbC003636:
	moveq	#$2E,D0
	rts

lbC00363A:
	movem.l	D0/D1,-(SP)
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	move.w	#$3A,D0
	bsr.w	lbC00670A
	move.l	A1,D0
	bsr.w	lbC001B42
	moveq	#15,D1
lbC00365C:
	bsr.w	lbC006FBC
	move.l	A0,-(SP)
	movea.l	A1,A0
	bsr.w	lbC0040BA
	bsr.w	lbC001B36
	addq.w	#1,A1
	movea.l	(SP)+,A0
	dbra	D1,lbC00365C
	bsr.w	lbC006FBC
	moveq	#15,D1
	lea	-$10(A1),A1
lbC00367E:
	move.l	A0,-(SP)
	movea.l	A1,A0
	addq.w	#1,A1
	bsr.w	lbC0040BA
	movea.l	(SP)+,A0
	bsr.s	lbC00361C
	bsr.w	lbC00670A
	dbra	D1,lbC00367E
	move.w	#8,$1E269A.L
	bsr.w	lbC000F22
	movem.l	(SP)+,D0/D1
	rts

lbC0036A6:
	sf	$1E26BC.L
	rts

	movem.l	D0/D1/A1,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	moveq	#15,D1
lbC0036C4:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	move.l	A0,-(SP)
	movea.l	A1,A0
	addq.w	#1,A1
	bsr.w	lbC0041CE
	movea.l	(SP)+,A0
	dbra	D1,lbC0036C4
	bsr.w	lbC00363A
	movem.l	(SP)+,D0/D1/A1
	rts

lbC0036FA:
	move.l	A0,-(SP)
	move.w	#$110,$DFF096.L
	sf	$1E28AC.L
	st	$1E294E.L
	sf	$1E2B45.L
	sf	$1E2A56.L
	sf	$1E2B34.L
	sf	$1E2B35.L
	clr.w	$1E2BA6.L
	cmpi.b	#$FF,$BFD000.L
	sne	$1E2A57.L
	cmpi.l	#$41524F4E,$1E2718.L
	beq.w	lbC003864
	move.l	#$41524F4E,$1E2718.L
	clr.w	$1E314C.L
	sf	$1E26BE.L
	lea	$1E2BE0.L,A0
	moveq	#$4F,D0
lbC003768:
	move.b	#$20,(A0)+
	dbra	D0,lbC003768
	moveq	#4,D0
	lea	$1E284E.L,A0
lbC003778:
	clr.l	(A0)+
	clr.w	(A0)+
	dbra	D0,lbC003778
	lea	$1E2B8E.L,A0
	moveq	#4,D0
	moveq	#-1,D1
lbC00378A:
	move.l	D1,(A0)+
	dbra	D0,lbC00378A
	move.w	#2,$1E271C.L
	clr.w	$1E271E.L
	lea	$1E26B8.L,A0
	clr.l	-4(A0)
	move.l	$1E2974.L,(A0)
	tst.l	$1E2978.L
	beq.w	lbC0037BE
	move.l	$1E2978.L,(A0)
lbC0037BE:
	tst.l	$1E2BC8.L
	beq.w	lbC0037D6
	move.l	$1E2BC8.L,D0
	cmp.l	(A0),D0
	bls.w	lbC0037D6
	move.l	D0,(A0)
lbC0037D6:
	move.l	#$1E1462,$1E26A2.L
	cmpi.l	#$5052494E,$1E2956.L
	bne.w	lbC00380A
	clr.l	$1E2956.L
	bsr.w	lbC006E4E
	lea	ACTIONREPLAYA_.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	#$1E1C32,$1E26A2.L
lbC00380A:
	clr.l	$1E269A.L
	clr.l	$1E26A8.L
	jsr	$1AED28.L
	lea	ACTIONREPLAYA.MSG0(PC),A0
	jsr	lbC0035CE(PC)
	lea	ascii.MSG5(PC),A0
	bsr.w	lbC0035CE
	move.w	#8,$1E286C.L
	move.l	$A0.W,$1E286E.L
	move.l	#$40,$A0.w
	lea	$1E28B0.L,A0
	moveq	#$1D,D0
lbC00384C:
	clr.l	(A0)+
	dbra	D0,lbC00384C
	jsr	$1B32A6.L
	move.b	$1E298F.L,D0
	and.b	D0,$1E2991.L
lbC003864:
	jsr	$1B52EA.L
	jsr	$1B529C.L
	tst.b	$1E2B36.L
	bne.w	lbC003880
	sf	$1E2B37.L
lbC003880:
	st	$1E2B33.L
	sf	$1E26A1.L
	sf	$1E2B32.L
	sf	$1E2AFD.L
	sf	$1E2AF6.L
	sf	$1E2B05.L
	move.l	#$FFFFFFFF,$1E29BE.L
	clr.l	$1E2AA6.L
	st	$1E2A9E.L
	clr.w	$1E2952.L
	sf	$1E2A58.L
	clr.w	$1E2928.L
	clr.w	$1E28AE.L
	tst.b	$1E2B46.L
	bne.w	lbC00397C
	tst.b	$1E2AFC.L
	beq.w	lbC0038F2
	bsr.w	lbC006E4E
	lea	DANGERDANGERD.MSG(PC),A0
	jsr	lbC0035CE(PC)
lbC0038F2:
	bsr.w	lbC0085B2
	tst.w	D0
	beq.s	lbC00390C
	lea	Residentprogr.MSG(PC),A0
	bsr.w	lbC0035CE
	bsr.w	lbC001B42
	jsr	$1AEECA.L
lbC00390C:
	btst	#0,$1E2950.L
	beq.w	lbC00391E
	jsr	$1BE946.L
lbC00391E:
	cmpi.l	#$46,$1E2648.L
	bne.s	lbC00397C
	lea	$1E2608.L,A0
	movea.l	$3C(A0),A1
	move.l	(A1),-(SP)
	addq.l	#8,$3C(A0)
	movea.l	$3C(A0),A0
	move.l	(SP)+,(A0)+
	move.w	(A0)+,D0
	move.w	D0,$1E264C.L
	move.l	(A0),D0
	subq.l	#2,D0
	move.l	D0,$1E2648.L
	st	$1E28AC.L
	bsr.w	lbC008604
	tst.w	D0
	beq.s	lbC00397C
	lea	Breakpointrai.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	$1E2648.L,D0
	bsr.w	lbC00A1C4
	bsr.w	lbC006FF0
	sf	$1E28AC.L
lbC00397C:
	cmpi.l	#$136,$1E2648.L
	bne.w	lbC003A06
	lea	$1E2608.L,A0
	movea.l	$3C(A0),A1
	move.l	(A1),-(SP)
	addq.l	#8,$3C(A0)
	movea.l	$3C(A0),A0
	move.l	(SP)+,(A0)+
	move.w	(A0)+,D0
	move.w	D0,$1E264C.L
	move.l	(A0),D0
	move.l	D0,$1E2648.L
	lea	$13E.L,A1
	moveq	#4,D2
lbC0039B8:
	movea.l	(A1),A0
	jsr	$1ABF94.L
	move.b	-1(A1),D1
	cmp.b	D0,D1
	bne.w	lbC0039D2
	lea	10(A1),A1
	dbra	D2,lbC0039B8
lbC0039D2:
	movea.l	A0,A1
	move.l	D0,D2
	lea	Memorybyte.MSG(PC),A0
	jsr	lbC0035CE(PC)
	move.l	A1,D0
	jsr	lbC001B42(PC)
	lea	haschangedfro.MSG(PC),A0
	jsr	lbC0035CE(PC)
	move.w	D1,D0
	jsr	lbC001B36(PC)
	lea	to.MSG0(PC),A0
	jsr	lbC0035CE(PC)
	move.w	D2,D0
	jsr	lbC001B36(PC)
	jsr	$1AEECA.L
lbC003A06:
	move.l	$1E2648.L,$1E276A.L
	move.w	#$8110,$DFF096.L
	movea.l	(SP)+,A0
	rts

Memorybyte.MSG:
	dc.b	'Memorybyte ',0
haschangedfro.MSG:
	dc.b	' has changed from $',0
to.MSG0:
	dc.b	' to $',0
ACTIONREPLAYA.MSG0:
	dc.b	'********************************************'
	dc.b	'************************************        '
	dc.b	'                ACTION REPLAY AMIGA MK IV',$D
	dc.b	'                (c) 1990/1991 by Olaf Boehm '
	dc.b	'& Jorg Zanger',$D
	dc.b	'                          (c) 1993 by Blackh'
	dc.b	'awk',0
ascii.MSG5:
	dc.b	13
	dc.b	'********************************************'
	dc.b	'************************************',0
Breakpointrai.MSG:
	dc.b	'Breakpoint raised at address: ',0
Residentprogr.MSG:
	dc.b	'Resident program allocated at: ',0
DANGERDANGERD.MSG:
	dc.b	'++++++++++++++++++++++++++++++++++++++++++++'
	dc.b	'++++++++++++++++++++++++++++++++++++!  D A N'
	dc.b	' G E R  !  D A N G E R  !  D A N G E R  !  D'
	dc.b	' A N G E R  !  D A N G E R !Bootblock is mes'
	dc.b	'sing with the execbase -> maybe a virus (90%'
	dc.b	')',$D
	dc.b	'  Press f1 to continue booting              '
	dc.b	'      f2 to display bootblock',$D
	dc.b	'        f3 to install normal bootblock      '
	dc.b	'      f4 to install anti-virus-boot',$D
	dc.b	'        f5 to restore execbase and cont. boo'
	dc.b	'ting  f6 to show changed vectors',$D
	dc.b	'       f10 to exit to monitor',$D
	dc.b	'++++++++++++++++++++++++++++++++++++++++++++'
	dc.b	'++++++++++++++++++++++++++++++++++++',0
ACTIONREPLAYA_.MSG:
	dc.b	13
	dc.b	13
	dc.b	'               A C T I O N   R E P L A Y   A'
	dc.b	' M I G A   M K IV ',$D
	dc.b	'               ============================='
	dc.b	'==================',$D
	dc.b	'               ==             Amiga 1200 ver'
	dc.b	'sion            ==',$D
	dc.b	'               ============================='
	dc.b	'==================',$D
	dc.b	'               Original program by   Olaf Bo'
	dc.b	'ehm & Joerg Zanger',$D
	dc.b	'                  Changes & Updates (MK IV) '
	dc.b	'by  BLACKHAWK',$D,$D
	dc.b	'                         Copyright 1993 by P'
	dc.b	'ARADOX!',$D
	dc.b	'                            P.S. AMIGA RULEZ'
	dc.b	' !!!',$D,$D
	dc.b	'            FOR CONSOLES COPIERS --- PC OR A'
	dc.b	'MIGA WAREZ WRITE TO:',$D
	dc.b	'                                SKID ROW!',$D
	dc.b	'                                 B.P 13',$D
	dc.b	'                              95370 MONTIGNY'
	dc.b	13
	dc.b	'                                 FRANCE',$D,0

lbC0040BA:
	cmpa.l	#$1E8468,A0
	bcc.s	lbC0040DE
	cmpa.l	#$1E45E8,A0
	bcs.w	lbC00419E
	move.l	A0,-(SP)
	adda.l	A0,A0
	adda.l	#$1D1082,A0
lbC0040D6:
	moveq	#0,D0
	move.b	(A0),D0
	movea.l	(SP)+,A0
	bra.s	lbC0040E2

lbC0040DE:
	moveq	#0,D0
	move.b	(A0),D0
lbC0040E2:
	tst.b	$1E3163.L
	beq.s	lbC004108
	movem.l	D1/A0,-(SP)
	lea	$1E3166.L,A0
	adda.w	$1E316E.L,A0
	move.b	(A0),D1
	eor.b	D1,D0
	addq.w	#1,$1E316E.L
	movem.l	(SP)+,D1/A0
lbC004108:
	tst.b	$1E3164.L
	beq.s	lbC00412E
	movem.l	D1/A0,-(SP)
	movea.l	A0,A1
	suba.l	$1E3170.L,A1
	move.l	A1,D1
	lea	$1E3166.L,A1
	adda.l	D1,A1
	move.b	(A1),D1
	eor.b	D1,D0
	movem.l	(SP)+,D1/A0
lbC00412E:
	rts

	movem.l	D0-D3/A0-A2,-(SP)
	lea	RobNorthenDec.MSG(PC),A0
	not.b	$1E3162.L
	beq.w	lbC004146
	lea	RobNorthenDec.MSG0(PC),A0
lbC004146:
	bsr.w	lbC0035CE
	movem.l	(SP)+,D0-D3/A0-A2
	bsr.w	lbC0087F0
	rts

RobNorthenDec.MSG:
	dc.b	13
	dc.b	'Rob Northen Decrypter Deactivated.',$D,0
	dc.b	0
RobNorthenDec.MSG0:
	dc.b	13
	dc.b	'Rob Northen Decrypter Activated.',$D,0
	dc.b	0

lbC00419E:
	move.l	A0,D0
	andi.w	#$FFFC,D0
	cmpi.l	#$6C,D0
	bhi.w	lbC0040DE
	cmpi.l	#$68,D0
	bcs.w	lbC0040DE
	move.l	A0,-(SP)
	move.l	A0,D0
	subi.w	#$68,D0
	lea	$1E2690.L,A0
	lea	0(A0,D0.W),A0
	bra.w	lbC0040D6

lbC0041CE:
	movem.l	D1/A0,-(SP)
	cmpa.l	#$1E45E8,A0
	bcs.s	lbC004218
	cmpa.l	#$1E8468,A0
	bcc.s	lbC0041EA
	adda.l	A0,A0
	adda.l	#$1D1082,A0
lbC0041EA:
	tst.b	$1E3164.L
	beq.s	lbC004210
	movem.l	D1/A0/A1,-(SP)
	movea.l	A0,A1
	suba.l	$1E3170.L,A1
	move.l	A1,D1
	lea	$1E3166.L,A1
	adda.l	D1,A1
	move.b	(A1),D1
	eor.b	D1,D0
	movem.l	(SP)+,D1/A0/A1
lbC004210:
	move.b	D0,(A0)
	movem.l	(SP)+,D1/A0
	rts

lbC004218:
	move.l	A0,D1
	andi.w	#$FFFC,D1
	cmpi.l	#$6C,D1
	bhi.s	lbC0041EA
	cmpi.l	#$68,D1
	bcs.s	lbC0041EA
	move.w	A0,D1
	subi.w	#$68,D1
	lea	$1E2690.L,A0
	lea	0(A0,D1.W),A0
	bra.s	lbC0041EA

	move.l	D0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmp.l	$1E2974.L,D0
	bcc.w	lbC0087CE
	cmpi.l	#1,D0
	bne.s	lbC00426A
	move.l	$1E2AE0.L,D0
	bra.s	lbC00427C

lbC00426A:
	cmpi.l	#2,D0
	bne.s	lbC00427C
	move.l	$1E2486.L,D0
	bra.w	lbC00427C

lbC00427C:
	bclr	#0,D0
	bsr.w	lbC004288
	move.l	(SP)+,D0
	rts

lbC004288:
	movem.l	D0-D2/D6/A0/A1,-(SP)
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	movea.l	A1,A0
	jsr	$1ADBFC.L
	move.l	D0,D6
	move.l	A1,D1
	move.w	#$2C,D0
	bsr.w	lbC00670A
	move.l	D1,D0
	bsr.w	lbC001B42
	movea.l	D0,A0
	moveq	#3,D1
lbC0042BA:
	bsr.w	lbC0040BA
	rol.l	#8,D2
	move.b	D0,D2
	addq.w	#1,A0
	dbra	D1,lbC0042BA
	move.l	D2,D0
	btst	#$10,D2
	bne.s	lbC00431A
	lea	MOVE.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	D2,D0
	bsr.w	lbC006F38
	move.w	#$2C,D0
	bsr.w	lbC00670A
	move.w	#$24,D0
	bsr.w	lbC00670A
	move.l	D2,D0
	swap	D0
	andi.w	#$1FE,D0
	move.w	#3,D1
	bsr.w	lbC0066BE
	move.w	D0,D1
	moveq	#12,D0
	bsr.w	lbC006FD4
	moveq	#$3B,D0
	jsr	$1AE5E4.L
	move.w	D1,D0
	jsr	$1BE770.L
	bra.w	lbC0043D2

lbC00431A:
	btst	#0,D2
	bne.s	lbC00432A
	lea	WAIT.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.s	lbC004332

lbC00432A:
	lea	SKIP.MSG(PC),A0
	bsr.w	lbC0035CE
lbC004332:
	move.l	D2,D0
	swap	D0
	andi.w	#$FE,D0
	lsl.w	#1,D0
	move.w	#3,D1
	bsr.w	lbC0066BE
	move.w	#$2C,D0
	bsr.w	lbC00670A
	move.w	#$24,D0
	bsr.w	lbC00670A
	move.l	D2,D0
	swap	D0
	ror.w	#8,D0
	bsr.w	lbC001B36
	move.w	#$2C,D0
	bsr.w	lbC00670A
	move.w	#$24,D0
	bsr.w	lbC00670A
	move.w	D2,D0
	andi.w	#$FE,D0
	lsl.w	#1,D0
	move.w	#3,D1
	bsr.w	lbC0066BE
	move.w	#$2C,D0
	bsr.w	lbC00670A
	move.w	#$24,D0
	bsr.w	lbC00670A
	move.w	D2,D0
	ror.w	#8,D0
	bclr	#7,D0
	bsr.w	lbC001B36
	move.w	#$2C,D0
	bsr.w	lbC00670A
	move.w	#$24,D0
	bsr.w	lbC00670A
	move.w	D2,D0
	clr.b	D0
	rol.w	#1,D0
	move.w	#1,D1
	bsr.w	lbC0066BE
	move.w	#$29,D0
	bsr.w	lbC00670A
	cmpi.l	#$FFFFFFFE,D2
	bne.w	lbC0043D2
	lea	endofcopperli.MSG(PC),A0
	bsr.w	lbC0035CE
lbC0043D2:
	move.w	#$38,D0
	sub.w	$1E269A.L,D0
	jsr	$1AEEAE.L
	lea	dcl.MSG(PC),A0
	jsr	lbC0035CE(PC)
	move.l	D6,D0
	jsr	$1B209E.L
	move.w	#15,$1E269A.L
	movem.l	(SP)+,D0-D2/D6/A0/A1
	rts

endofcopperli.MSG:
	dc.b	' ;end of copperlist',0
MOVE.MSG:
	dc.b	' MOVE #$',0
WAIT.MSG:
	dc.b	' WAIT ($',0
SKIP.MSG:
	dc.b	' SKIP ($',0
dcl.MSG:
	dc.b	'dc.l ',0,0
	dc.b	'bltddat',0
	dc.b	'dmaconr',0
	dc.b	'vposr',0
	dc.b	'vhposr',0
	dc.b	'dskdatr',0
	dc.b	'joy0dat',0
	dc.b	'joy1dat',0
	dc.b	'clxdat',0
	dc.b	'adkconr',0
	dc.b	'pot0dat',0
	dc.b	'pot1dat',0
	dc.b	'potinp',0
	dc.b	'serdat',0
	dc.b	'dskbytr',0
	dc.b	'intenar',0
	dc.b	'intreqr',0
	dc.b	'dskpth',0
	dc.b	'dskptl',0
	dc.b	'dsklen',0
	dc.b	'dskdatr',0
	dc.b	'refptr',0
	dc.b	'vposw',0
	dc.b	'vhposw',0
	dc.b	'copcon',0
	dc.b	'serdat',0
	dc.b	'serper',0
	dc.b	'potgo',0
	dc.b	'joytest',0
	dc.b	'strequ',0
	dc.b	'strvbl',0
	dc.b	'strhor',0
	dc.b	'strlong',0
	dc.b	'bltcon0',0
	dc.b	'bltcon1',0
	dc.b	'bltafwm',0
	dc.b	'bltalwm',0
	dc.b	'bltcpth',0
	dc.b	'bltcptl',0
	dc.b	'bltbpth',0
	dc.b	'bltbptl',0
	dc.b	'bltapth',0
	dc.b	'bltaptl',0
	dc.b	'bltdpth',0
	dc.b	'bltdptl',0
	dc.b	'bltsize',0
	dc.b	'bltcon01 ECS',0
	dc.b	'bltsizv ECS',0
	dc.b	'bltsizh ECS',0
	dc.b	'bltcmod',0
	dc.b	'bltbmod',0
	dc.b	'bltamod',0
	dc.b	'bltdmod',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'bltcdat',0
	dc.b	'bltbdat',0
	dc.b	'bltadat',0
	dc.b	'unused',0
	dc.b	'sprhdat ECS',0
	dc.b	'unused',0
	dc.b	'deniseid ECS',0
	dc.b	'dsksync',0
	dc.b	'cop1lch',0
	dc.b	'cop1lcl',0
	dc.b	'cop2lch',0
	dc.b	'cop2lcl',0
	dc.b	'copjmp1',0
	dc.b	'copjmp2',0
	dc.b	'copins',0
	dc.b	'diwstrt',0
	dc.b	'diwstop',0
	dc.b	'ddfstrt',0
	dc.b	'ddfstop',0
	dc.b	'dmacon',0
	dc.b	'clxcon',0
	dc.b	'intena',0
	dc.b	'intreq',0
	dc.b	'adkcon',0
	dc.b	'aud0pth',0
	dc.b	'aud0ptl',0
	dc.b	'aud0len',0
	dc.b	'aud0per',0
	dc.b	'aud0vol',0
	dc.b	'aud0dat',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'aud1pth',0
	dc.b	'aud1ptl',0
	dc.b	'aud1len',0
	dc.b	'aud1per',0
	dc.b	'aud1vol',0
	dc.b	'aud1dat',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'aud2pth',0
	dc.b	'aud2ptl',0
	dc.b	'aud2len',0
	dc.b	'aud2per',0
	dc.b	'aud2vol',0
	dc.b	'aud2dat',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'aud3pth',0
	dc.b	'aud3ptl',0
	dc.b	'aud3len',0
	dc.b	'aud3per',0
	dc.b	'aud3vol',0
	dc.b	'aud3dat',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'bpl0pth',0
	dc.b	'bpl0ptl',0
	dc.b	'bpl1pth',0
	dc.b	'bpl1ptl',0
	dc.b	'bpl2pth',0
	dc.b	'bpl2ptl',0
	dc.b	'bpl3pth',0
	dc.b	'bpl3ptl',0
	dc.b	'bpl4pth',0
	dc.b	'bpl4ptl',0
	dc.b	'bpl5pth',0
	dc.b	'bpl5ptl',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'bplcon0',0
	dc.b	'bplcon1',0
	dc.b	'bplcon2',0
	dc.b	'bplcon3 ECS',0
	dc.b	'bpl1mod',0
	dc.b	'bpl2mod',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'bpl0dat',0
	dc.b	'bpl1dat',0
	dc.b	'bpl2dat',0
	dc.b	'bpl3dat',0
	dc.b	'bpl4dat',0
	dc.b	'bpl5dat',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'spr0pth',0
	dc.b	'spr0ptl',0
	dc.b	'spr1pth',0
	dc.b	'spr1ptl',0
	dc.b	'spr2pth',0
	dc.b	'spr2ptl',0
	dc.b	'spr3pth',0
	dc.b	'spr3ptl',0
	dc.b	'spr4pth',0
	dc.b	'spr4ptl',0
	dc.b	'spr5pth',0
	dc.b	'spr5ptl',0
	dc.b	'spr6pth',0
	dc.b	'spr6ptl',0
	dc.b	'spr7pth',0
	dc.b	'spr7ptl',0
	dc.b	'spr0pos',0
	dc.b	'spr0ctl',0
	dc.b	'spr0dataa',0
	dc.b	'spr0datab',0
	dc.b	'spr1pos',0
	dc.b	'spr1ctl',0
	dc.b	'spr1dataa',0
	dc.b	'spr1datab',0
	dc.b	'spr2pos',0
	dc.b	'spr2ctl',0
	dc.b	'spr2dataa',0
	dc.b	'spr2datab',0
	dc.b	'spr3pos',0
	dc.b	'spr3ctl',0
	dc.b	'spr3dataa',0
	dc.b	'spr3datab',0
	dc.b	'spr4pos',0
	dc.b	'spr4ctl',0
	dc.b	'spr4dataa',0
	dc.b	'spr4datab',0
	dc.b	'spr5pos',0
	dc.b	'spr5ctl',0
	dc.b	'spr5dataa',0
	dc.b	'spr5datab',0
	dc.b	'spr6pos',0
	dc.b	'spr6ctl',0
	dc.b	'spr6dataa',0
	dc.b	'spr6datab',0
	dc.b	'spr7pos',0
	dc.b	'spr7ctl',0
	dc.b	'spr7dataa',0
	dc.b	'spr7datab',0
	dc.b	'color00',0
	dc.b	'color01',0
	dc.b	'color02',0
	dc.b	'color03',0
	dc.b	'color04',0
	dc.b	'color05',0
	dc.b	'color06',0
	dc.b	'color07',0
	dc.b	'color08',0
	dc.b	'color09',0
	dc.b	'color10',0
	dc.b	'color11',0
	dc.b	'color12',0
	dc.b	'color13',0
	dc.b	'color14',0
	dc.b	'color15',0
	dc.b	'color16',0
	dc.b	'color17',0
	dc.b	'color18',0
	dc.b	'color19',0
	dc.b	'color20',0
	dc.b	'color21',0
	dc.b	'color22',0
	dc.b	'color23',0
	dc.b	'color24',0
	dc.b	'color25',0
	dc.b	'color26',0
	dc.b	'color27',0
	dc.b	'color28',0
	dc.b	'color29',0
	dc.b	'color30',0
	dc.b	'color31',0
	dc.b	'htotal ECS',0
	dc.b	'hsstop ECS',0
	dc.b	'hbstrt ECS',0
	dc.b	'hbstop ECS',0
	dc.b	'vtotal ECS',0
	dc.b	'vsstop ECS',0
	dc.b	'vbstrt ECS',0
	dc.b	'vbstop ECS',0
	dc.b	'sprhstrt ECS',0
	dc.b	'sprhstop ECS',0
	dc.b	'bplhstrt ECS',0
	dc.b	'bplhstop ECS',0
	dc.b	'hhposw ECS',0
	dc.b	'hhposr ECS',0
	dc.b	'beamcon0 ECS',0
	dc.b	'hsstrt ECS',0
	dc.b	'vsstrt ECS',0
	dc.b	'hcenter ECS',0
	dc.b	'diwhigh ECS',0
	dc.b	'bplhmod ECS',0
	dc.b	'sprhpth ECS',0
	dc.b	'sprhptl ECS',0
	dc.b	'bpl1hpth ECS',0
	dc.b	'bpl1hptl ECS',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'unused',0
	dc.b	'no-op',0,0

	movem.l	D0/D1/A0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmp.l	$1E2974.L,D0
	bcc.w	lbC0087CE
	bclr	#0,D0
	move.l	D0,-(SP)
	clr.l	D1
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC004DEE
	cmpi.w	#$4D,D0
	beq.s	lbC004CDA
	cmpi.w	#$53,D0
	beq.s	lbC004D2E
	cmpi.w	#$57,D0
	beq.s	lbC004D28
	bra.w	lbC0087CE

lbC004CDA:
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	cmpi.w	#$23,D0
	bne.s	lbC004CDA
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.w	D0,D1
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	andi.w	#$1FE,D0
	swap	D1
	move.w	D0,D1
	swap	D1
	bra.w	lbC004DCA

lbC004D28:
	bclr	#0,D1
	bra.s	lbC004D32

lbC004D2E:
	bset	#0,D1
lbC004D32:
	bset	#$10,D1
lbC004D36:
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	cmpi.w	#$28,D0
	bne.s	lbC004D36
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	andi.w	#$1FC,D0
	lsr.w	#1,D0
	swap	D1
	or.w	D0,D1
	bsr.w	lbC005CB2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	lsl.w	#8,D0
	or.w	D0,D1
	swap	D1
	bsr.w	lbC005CB2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	bne.w	lbC004D8E
	moveq	#-1,D0
lbC004D8E:
	lsr.w	#1,D0
	bclr	#0,D0
	or.b	D0,D1
	bsr.w	lbC005CB2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	bne.w	lbC004DAA
	moveq	#-1,D0
lbC004DAA:
	lsl.w	#8,D0
	or.w	D0,D1
	bsr.w	lbC005CB2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	bne.w	lbC004DC2
	moveq	#-1,D0
lbC004DC2:
	andi.w	#1,D0
	ror.w	#1,D0
	or.w	D0,D1
lbC004DCA:
	movea.l	(SP),A0
	move.l	D1,D0
	btst	#$10,D0
	bne.s	lbC004DEA
	move.l	D0,D1
	bsr.w	lbC005D22
	andi.l	#$1FFFFFF,D1
	andi.l	#$FE000000,D0
	or.l	D0,D1
	move.l	D1,D0
lbC004DEA:
	bsr.w	lbC005D10
lbC004DEE:
	move.l	(SP)+,D0
	addq.l	#4,D0
	bsr.w	lbC004288
	movem.l	(SP)+,D0/D1/A0
	rts

lbC004DFC:
	movem.l	D0/D1/A0/A1,-(SP)
	sf	$1E2B33.L
	bsr.w	lbC003574
	st	$1E2B33.L
	tst.b	D0
	beq.w	lbC0087CE
	clr.l	D1
	move.b	D0,D1
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	movea.l	D0,A0
	clr.l	D0
	subq.b	#1,D1
	lea	$1E26C8.L,A1
lbC004E44:
	move.b	(A1)+,D0
	bsr.w	lbC0041CE
	addq.w	#1,A0
	dbra	D1,lbC004E44
	movem.l	(SP)+,D0/D1/A0/A1
	rts

	move.l	D0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	bne.s	lbC004E7C
	move.w	$1E271E.L,D0
lbC004E6A:
	lea	Currentoffset.MSG(PC),A0
	bsr.w	lbC0035CE
	bsr.w	lbC001B36
	bsr.w	lbC006FF0
	bra.s	lbC004E88

lbC004E7C:
	andi.w	#$FF,D0
	move.w	D0,$1E271E.L
	bra.s	lbC004E6A

lbC004E88:
	move.l	(SP)+,D0
	rts

Currentoffset.MSG:
	dc.b	'Current offset: ',0,0

lbC004E9E:
	movem.l	D0/D1,-(SP)
	bcs.s	lbC004EAE
	move.w	#$30,D0
	bsr.w	lbC00670A
	bra.s	lbC004EB6

lbC004EAE:
	move.w	#$31,D0
	bsr.w	lbC00670A
lbC004EB6:
	movem.l	(SP)+,D0/D1
	rts

lbC004EBC:
	movem.l	D0-D2/A0,-(SP)
	clr.l	D2
	cmpi.w	#$4F,$1E269A.L
	beq.s	lbC004F00
	move.w	#$4E,D1
	sub.w	$1E269A.L,D1
	movea.l	$1E26A2.L,A0
	move.w	$1E269C.L,D2
	mulu.w	#$50,D2
	addi.w	#$4E,D2
	adda.l	D2,A0
lbC004EEC:
	move.b	(A0),1(A0)
	subq.l	#1,A0
	dbra	D1,lbC004EEC
	move.b	#$20,1(A0)
	bsr.w	lbC006E88
lbC004F00:
	movem.l	(SP)+,D0-D2/A0
	rts

lbC004F06:
	move.l	A1,-(SP)
	movea.l	A0,A1
	jsr	lbC0036A6(PC)
	tst.b	$1E26BC.L
	beq.w	lbC004F1E
	jmp	$1B06A8.L

lbC004F1E:
	movea.l	(SP)+,A1
	move.l	D7,-(SP)
	bsr.w	lbC005CDE
	addq.w	#2,A0
	move.l	D0,D7
	move.w	#$FFFF,$1E2748.L
	move.w	#$FFFF,$1E2724.L
	move.w	#$FFFF,$1E2736.L
	move.w	#$FFFF,$1E2722.L
	jsr	$1CCB5A.L
	tst.w	D0
	bne.w	lbC005B7C
	move.l	D7,D0
	move.w	#$4F,$1E2720.L
	cmpi.w	#$4AFC,D0
	beq.w	lbC005B7C
	move.w	#$32,$1E2720.L
	cmpi.w	#$4E71,D0
	beq.w	lbC005B7C
	move.w	#$37,$1E2720.L
	cmpi.w	#$4E70,D0
	beq.w	lbC005B7C
	move.w	#$3C,$1E2720.L
	cmpi.w	#$4E73,D0
	beq.w	lbC005B7C
	move.w	#$3D,$1E2720.L
	cmpi.w	#$4E77,D0
	beq.w	lbC005B7C
	move.w	#$3E,$1E2720.L
	cmpi.w	#$4E75,D0
	beq.w	lbC005B7C
	move.w	#$41,$1E2720.L
	cmpi.w	#$4E72,D0
	bne.s	lbC004FE0
	move.w	#11,$1E2724.L
	bsr.w	lbC005CDE
	ext.l	D0
	move.l	D0,$1E2726.L
	addq.w	#2,A0
	bra.w	lbC005B7C

lbC004FE0:
	move.w	#$4A,$1E2720.L
	cmpi.w	#$4E76,D0
	beq.w	lbC005B7C
	move.l	D7,D0
	andi.w	#$FFF8,D0
	cmpi.w	#$4E50,D0
	bne.s	lbC005030
	move.w	#$21,$1E2720.L
	move.w	#11,$1E2736.L
	bsr.w	lbC005CDE
	addq.w	#2,A0
	ext.l	D0
	move.l	D0,$1E2738.L
	move.w	#1,$1E2724.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC005030:
	cmpi.w	#$4840,D0
	bne.s	lbC005054
	move.w	#$47,$1E2720.L
	move.w	#0,$1E2724.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC005054:
	cmpi.w	#$4E58,D0
	bne.s	lbC005078
	move.w	#$4C,$1E2720.L
	move.w	#1,$1E2724.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC005078:
	move.l	D7,D0
	andi.w	#$FFB8,D0
	cmpi.w	#$4880,D0
	bne.s	lbC0050B8
	move.w	#$1D,$1E2720.L
	move.w	#2,$1E2722.L
	btst	#6,D7
	bne.s	lbC0050A2
	move.w	#1,$1E2722.L
lbC0050A2:
	move.w	#0,$1E2724.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC0050B8:
	move.l	D7,D0
	andi.w	#$FFF0,D0
	cmpi.w	#$4E60,D0
	bne.s	lbC005110
	move.w	#$28,$1E2720.L
	move.w	#2,$1E2722.L
	move.w	#12,$1E2724.L
	move.w	#1,$1E2736.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2738.L
	btst	#3,D7
	bne.w	lbC005B7C
	move.w	#1,$1E2724.L
	move.l	D0,$1E2726.L
	move.w	#12,$1E2736.L
	bra.w	lbC005B7C

lbC005110:
	cmpi.w	#$4E40,D0
	bne.s	lbC005136
	move.w	#$49,$1E2720.L
	move.w	#11,$1E2724.L
	move.l	D7,D0
	andi.w	#15,D0
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC005136:
	move.l	D7,D0
	andi.w	#$FFC0,D0
	cmpi.w	#$4EC0,D0
	bne.s	lbC00516C
	move.w	#$1E,$1E2720.L
lbC00514A:
	move.l	D7,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2724.L
	move.l	D2,$1E2726.L
	move.l	D3,$1E272A.L
	move.l	D4,$1E272E.L
	bra.w	lbC005B7C

lbC00516C:
	cmpi.w	#$4E80,D0
	bne.s	lbC00517C
	move.w	#$1F,$1E2720.L
	bra.s	lbC00514A

lbC00517C:
	cmpi.w	#$44C0,D0
	bne.s	lbC0051BC
	move.w	#$25,$1E2720.L
	move.w	#0,$1E2722.L
	move.w	#13,$1E2736.L
	move.l	D7,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2724.L
	move.l	D2,$1E2726.L
	move.l	D3,$1E272A.L
	move.l	D4,$1E272E.L
	bra.w	lbC005B7C

lbC0051BC:
	cmpi.w	#$46C0,D0
	bne.s	lbC0051FC
	move.w	#$26,$1E2720.L
	move.w	#1,$1E2722.L
	move.w	#14,$1E2736.L
lbC0051DA:
	move.l	D7,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2724.L
	move.l	D2,$1E2726.L
	move.l	D3,$1E272A.L
	move.l	D4,$1E272E.L
	bra.w	lbC005B7C

lbC0051FC:
	cmpi.w	#$40C0,D0
	bne.s	lbC005260
	move.w	#$27,$1E2720.L
	move.w	#1,$1E2722.L
	move.w	#14,$1E2724.L
lbC00521A:
	move.l	D7,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2736.L
	move.l	D2,$1E2738.L
	move.l	D3,$1E273C.L
	move.l	D4,$1E2740.L
	cmpi.w	#11,$1E2736.L
	bne.w	lbC005B7C
	move.w	#14,$1E2736.L
	subq.l	#2,A0
	cmpi.w	#2,$1E2722.L
	bne.w	lbC005B7C
	subq.l	#2,A0
	bra.w	lbC005B7C

lbC005260:
	cmpi.w	#$4800,D0
	bne.s	lbC00527A
	move.w	#$2F,$1E2720.L
	move.w	#0,$1E2722.L
	bra.w	lbC0051DA

lbC00527A:
	cmpi.w	#$4840,D0
	bne.s	lbC00528C
	move.w	#$36,$1E2720.L
	bra.w	lbC0051DA

lbC00528C:
	cmpi.w	#$4AC0,D0
	bne.s	lbC0052A6
	move.w	#$48,$1E2720.L
	move.w	#0,$1E2722.L
	bra.w	lbC0051DA

lbC0052A6:
	move.l	D7,D0
	andi.w	#$FFC0,D0
	move.w	#8,$1E2720.L
	cmpi.w	#$E1C0,D0
	beq.w	lbC0051DA
	move.w	#9,$1E2720.L
	cmpi.w	#$E0C0,D0
	beq.w	lbC0051DA
	move.w	#$22,$1E2720.L
	cmpi.w	#$E3C0,D0
	beq.w	lbC0051DA
	move.w	#$23,$1E2720.L
	cmpi.w	#$E2C0,D0
	beq.w	lbC0051DA
	move.w	#$38,$1E2720.L
	cmpi.w	#$E7C0,D0
	beq.w	lbC0051DA
	move.w	#$39,$1E2720.L
	cmpi.w	#$E6C0,D0
	beq.w	lbC0051DA
	move.w	#$3A,$1E2720.L
	cmpi.w	#$E5C0,D0
	beq.w	lbC0051DA
	move.w	#$3B,$1E2720.L
	cmpi.w	#$E4C0,D0
	beq.w	lbC0051DA
	move.l	D7,D0
	andi.w	#$F1F0,D0
	cmpi.w	#$C100,D0
	bne.s	lbC00539E
	move.w	#0,$1E2720.L
lbC005340:
	move.w	#0,$1E2722.L
lbC005348:
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	move.w	#0,$1E2724.L
	move.w	#0,$1E2736.L
	btst	#3,D7
	beq.w	lbC005B7C
	move.w	#4,$1E2724.L
	move.w	#4,$1E2736.L
	move.l	$1E2738.L,D0
	move.l	$1E2726.L,$1E2738.L
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC00539E:
	cmpi.w	#$8100,D0
	bne.s	lbC0053AE
	move.w	#$3F,$1E2720.L
	bra.s	lbC005340

lbC0053AE:
	move.l	D7,D0
	andi.w	#$F0F8,D0
	cmpi.w	#$50C8,D0
	bne.s	lbC0053FE
	move.w	#$17,$1E2720.L
	move.w	#0,$1E2724.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	move.w	#15,$1E2736.L
	move.w	#1,$1E2738.L
	bsr.w	lbC005CDE
	addq.w	#2,A0
	ext.l	D0
	subq.l	#2,D0
	add.l	A0,D0
	move.l	D0,$1E273C.L
	bsr.w	lbC005B80
	bra.w	lbC005B7C

lbC0053FE:
	move.l	D7,D0
	andi.w	#$FF00,D0
	cmpi.w	#$600,D0
	bne.s	lbC005438
	move.w	#3,$1E2720.L
lbC005412:
	bsr.w	lbC005C92
	moveq	#$3C,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2724.L
	move.l	D2,$1E2726.L
	move.l	D3,$1E272A.L
	move.l	D4,$1E272E.L
	bra.w	lbC00521A

lbC005438:
	cmpi.w	#$200,D0
	bne.s	lbC005448
	move.w	#7,$1E2720.L
	bra.s	lbC005412

lbC005448:
	move.w	#$15,$1E2720.L
	cmpi.w	#$C00,D0
	beq.s	lbC005412
	move.w	#$1B,$1E2720.L
	cmpi.w	#$A00,D0
	beq.s	lbC005412
	move.w	#$35,$1E2720.L
	cmpi.w	#0,D0
	beq.s	lbC005412
	move.w	#$44,$1E2720.L
	cmpi.w	#$400,D0
	beq.s	lbC005412
	cmpi.w	#$6000,D0
	bne.s	lbC0054E4
	move.w	#13,$1E2720.L
lbC00548E:
	move.w	#15,$1E2724.L
	move.w	#0,$1E2726.L
	move.l	D7,D0
	andi.w	#$FF,D0
	beq.s	lbC0054BE
	ext.w	D0
	ext.l	D0
	add.l	A0,D0
	move.l	D0,$1E272A.L
	move.w	#0,$1E2722.L
	bra.w	lbC005B7C

lbC0054BE:
	move.w	#1,$1E2726.L
	bsr.w	lbC005CDE
	addq.w	#2,A0
	ext.l	D0
	add.l	A0,D0
	subq.l	#2,D0
	move.l	D0,$1E272A.L
	move.w	#1,$1E2722.L
	bra.w	lbC005B7C

lbC0054E4:
	move.w	#15,$1E2720.L
	cmpi.w	#$6100,D0
	beq.s	lbC00548E
	cmpi.w	#$4200,D0
	bne.s	lbC005508
	move.w	#$12,$1E2720.L
lbC005500:
	bsr.w	lbC005C92
	bra.w	lbC0051DA

lbC005508:
	move.w	#$30,$1E2720.L
	cmpi.w	#$4400,D0
	beq.s	lbC005500
	move.w	#$31,$1E2720.L
	cmpi.w	#$4000,D0
	beq.s	lbC005500
	move.w	#$33,$1E2720.L
	cmpi.w	#$4600,D0
	beq.s	lbC005500
	move.w	#$4B,$1E2720.L
	cmpi.w	#$4A00,D0
	beq.s	lbC005500
	move.l	D7,D0
	andi.w	#$F138,D0
	cmpi.w	#$B108,D0
	bne.s	lbC005582
	move.w	#$16,$1E2720.L
	bsr.w	lbC005C92
	bcs.s	lbC005582
	move.w	#3,$1E2724.L
	move.w	#3,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC005582:
	cmpi.w	#$108,D0
	bne.s	lbC0055E0
	move.w	#$2B,$1E2720.L
	move.w	#1,$1E2722.L
	btst	#6,D7
	beq.s	lbC0055A6
	move.w	#2,$1E2722.L
lbC0055A6:
	btst	#7,D7
	bne.s	lbC0055C6
	move.w	#0,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bset	#5,D7
	bra.w	lbC0051DA

lbC0055C6:
	move.w	#0,$1E2724.L
	bsr.w	lbC005C80
	move.l	D0,$1E2726.L
	bset	#5,D7
	bra.w	lbC00521A

lbC0055E0:
	move.l	D7,D0
	andi.w	#$FB80,D0
	cmpi.w	#$4880,D0
	bne.s	lbC005666
	move.w	#$2A,$1E2720.L
	move.w	#1,$1E2722.L
	btst	#6,D7
	beq.s	lbC00560A
	move.w	#2,$1E2722.L
lbC00560A:
	bsr.w	lbC005CDE
	addq.w	#2,A0
	btst	#10,D7
	beq.s	lbC005628
	move.w	#$10,$1E2736.L
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC005628:
	move.w	#$10,$1E2724.L
	move.l	D0,$1E2726.L
	move.l	D7,D0
	bsr.w	lbC005B94
	cmpi.w	#4,D1
	bne.s	lbC00564A
	move.w	#$11,$1E2724.L
lbC00564A:
	move.w	D1,$1E2736.L
	move.l	D2,$1E2738.L
	move.l	D3,$1E273C.L
	move.l	D4,$1E2740.L
	bra.w	lbC005B7C

lbC005666:
	move.l	D7,D0
	andi.w	#$F130,D0
	cmpi.w	#$D100,D0
	bne.s	lbC005684
	move.w	#5,$1E2720.L
lbC00567A:
	bsr.w	lbC005C92
	bcs.s	lbC005692
	bra.w	lbC005348

lbC005684:
	move.w	#$46,$1E2720.L
	cmpi.w	#$9100,D0
	beq.s	lbC00567A
lbC005692:
	move.l	D7,D0
	andi.w	#$F1C0,D0
	cmpi.w	#$4180,D0
	bne.s	lbC0056BC
	move.w	#$11,$1E2720.L
lbC0056A6:
	move.w	#0,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC0056BC:
	move.w	$1E2722.L,D1
	move.w	#1,$1E2722.L
	move.w	#$18,$1E2720.L
	cmpi.w	#$81C0,D0
	beq.s	lbC0056A6
	move.w	#$19,$1E2720.L
	cmpi.w	#$80C0,D0
	beq.s	lbC0056A6
	move.w	#$2D,$1E2720.L
	cmpi.w	#$C1C0,D0
	beq.s	lbC0056A6
	move.w	#$2E,$1E2720.L
	cmpi.w	#$C0C0,D0
	beq.s	lbC0056A6
	move.w	D1,$1E2722.L
	cmpi.w	#$41C0,D0
	bne.s	lbC00572C
	move.w	#$20,$1E2720.L
	move.w	#1,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC00572C:
	move.l	D7,D0
	andi.w	#$F130,D0
	cmpi.w	#$C100,D0
	bne.s	lbC005796
	move.w	#$1C,$1E2720.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2726.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	move.w	#0,$1E2724.L
	move.w	#0,$1E2736.L
	move.l	D7,D0
	andi.w	#$C8,D0
	cmpi.w	#$40,D0
	beq.w	lbC005B7C
	move.w	#1,$1E2724.L
	move.w	#1,$1E2736.L
	cmpi.w	#$48,D0
	beq.w	lbC005B7C
	move.w	#0,$1E2736.L
	bra.w	lbC005B7C

lbC005796:
	move.l	D7,D0
	andi.w	#$F118,D0
	cmpi.w	#$E100,D0
	bne.s	lbC0057F4
	move.w	#8,$1E2720.L
lbC0057AA:
	bsr.w	lbC005C92
	move.w	#0,$1E2724.L
	bsr.w	lbC005C80
	move.l	#8,$1E2726.L
	tst.l	D0
	beq.s	lbC0057CE
	move.l	D0,$1E2726.L
lbC0057CE:
	move.w	#0,$1E2736.L
	bsr.w	lbC005C8A
	move.l	D0,$1E2738.L
	btst	#5,D7
	bne.w	lbC005B7C
	move.w	#11,$1E2724.L
	bra.w	lbC005B7C

lbC0057F4:
	move.w	#9,$1E2720.L
	cmpi.w	#$E000,D0
	beq.s	lbC0057AA
	move.w	#$22,$1E2720.L
	cmpi.w	#$E108,D0
	beq.s	lbC0057AA
	move.w	#$23,$1E2720.L
	cmpi.w	#$E008,D0
	beq.s	lbC0057AA
	move.w	#$38,$1E2720.L
	cmpi.w	#$E118,D0
	beq.w	lbC0057AA
	move.w	#$39,$1E2720.L
	cmpi.w	#$E018,D0
	beq.w	lbC0057AA
	move.w	#$3A,$1E2720.L
	cmpi.w	#$E110,D0
	beq.w	lbC0057AA
	move.w	#$3B,$1E2720.L
	cmpi.w	#$E010,D0
	beq.w	lbC0057AA
	move.l	D7,D0
	andi.w	#$F0C0,D0
	cmpi.w	#$D0C0,D0
	bne.s	lbC00589E
	move.w	#2,$1E2720.L
lbC005872:
	move.w	#1,$1E2722.L
	btst	#8,D7
	beq.s	lbC005888
	move.w	#2,$1E2722.L
lbC005888:
	move.w	#1,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC00589E:
	move.w	#$14,$1E2720.L
	cmpi.w	#$B0C0,D0
	beq.s	lbC005872
	move.w	#$43,$1E2720.L
	cmpi.w	#$90C0,D0
	beq.s	lbC005872
	move.l	D7,D0
	andi.w	#$F0C0,D0
	cmpi.w	#$40,D0
	bne.s	lbC005904
	move.w	#11,$1E2720.L
lbC0058CE:
	btst	#8,D7
	bne.s	lbC0058EE
	move.w	#11,$1E2724.L
	bsr.w	lbC005CDE
	addq.w	#2,A0
	ext.l	D0
	move.l	D0,$1E2726.L
	bra.w	lbC00521A

lbC0058EE:
	move.w	#0,$1E2724.L
	bsr.w	lbC005C80
	move.l	D0,$1E2726.L
	bra.w	lbC00521A

lbC005904:
	move.w	#12,$1E2720.L
	cmpi.w	#$80,D0
	beq.s	lbC0058CE
	move.w	#14,$1E2720.L
	cmpi.w	#$C0,D0
	beq.s	lbC0058CE
	move.w	#$10,$1E2720.L
	cmpi.w	#0,D0
	beq.s	lbC0058CE
	move.l	D7,D0
	andi.w	#$E1C0,D0
	cmpi.w	#$2040,D0
	bne.s	lbC00596E
	move.w	#$29,$1E2720.L
	move.w	#1,$1E2722.L
	btst	#12,D7
	bne.s	lbC005958
	move.w	#2,$1E2722.L
lbC005958:
	move.w	#1,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC00596E:
	move.l	D7,D0
	andi.w	#$F0C0,D0
	cmpi.w	#$50C0,D0
	bne.s	lbC00598A
	move.w	#$40,$1E2720.L
	bsr.w	lbC005B80
	bra.w	lbC0051DA

lbC00598A:
	move.l	D7,D0
	andi.w	#$F100,D0
	cmpi.w	#$5000,D0
	bne.s	lbC0059C6
	move.w	#4,$1E2720.L
lbC00599E:
	bsr.w	lbC005C92
	move.w	#11,$1E2724.L
	bsr.w	lbC005C80
	move.l	#8,$1E2726.L
	tst.l	D0
	beq.s	lbC0059C2
	move.l	D0,$1E2726.L
lbC0059C2:
	bra.w	lbC00521A

lbC0059C6:
	move.w	#$45,$1E2720.L
	cmpi.w	#$5100,D0
	beq.s	lbC00599E
	move.l	D7,D0
	andi.w	#$F100,D0
	cmpi.w	#$B000,D0
	bne.s	lbC005A02
	move.w	#$13,$1E2720.L
	bsr.w	lbC005C92
	move.w	#0,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC005A02:
	cmpi.w	#$B100,D0
	bne.s	lbC005A2A
	move.w	#$1A,$1E2720.L
	bsr.w	lbC005C92
	move.w	#0,$1E2724.L
	bsr.w	lbC005C80
	move.l	D0,$1E2726.L
	bra.w	lbC00521A

lbC005A2A:
	cmpi.w	#$7000,D0
	bne.s	lbC005A66
	move.w	#$2C,$1E2720.L
	move.w	#0,$1E2736.L
	bsr.w	lbC005C80
	move.l	D0,$1E2738.L
	move.w	#11,$1E2724.L
	move.l	D7,D0
	andi.w	#$FF,D0
	ext.w	D0
	ext.l	D0
	move.l	D0,$1E2726.L
	bra.w	lbC005B7C

lbC005A66:
	move.l	D7,D0
	andi.w	#$F000,D0
	cmpi.w	#$D000,D0
	bne.s	lbC005AAA
	move.w	#1,$1E2720.L
lbC005A7A:
	bsr.w	lbC005C92
	move.w	#0,$1E2724.L
	bsr.w	lbC005C80
	move.l	D0,$1E2726.L
	btst	#8,D7
	bne.w	lbC00521A
	move.w	#0,$1E2736.L
	move.l	D0,$1E2738.L
	bra.w	lbC0051DA

lbC005AAA:
	move.w	#$42,$1E2720.L
	cmpi.w	#$9000,D0
	beq.s	lbC005A7A
	move.w	#6,$1E2720.L
	cmpi.w	#$C000,D0
	beq.s	lbC005A7A
	move.w	#$34,$1E2720.L
	cmpi.w	#$8000,D0
	beq.s	lbC005A7A
	cmpi.w	#$6000,D0
	bne.s	lbC005AEA
	move.w	#10,$1E2720.L
	bsr.w	lbC005B80
	bra.w	lbC00548E

lbC005AEA:
	move.w	#$4D,$1E2720.L
	cmpi.w	#$A000,D0
	beq.w	lbC005B7C
	move.w	#$4E,$1E2720.L
	cmpi.w	#$F000,D0
	beq.s	lbC005B7C
	move.l	D7,D0
	andi.w	#$C000,D0
	bne.s	lbC005B7C
	move.l	D7,D0
	andi.w	#$3000,D0
	beq.s	lbC005B7C
	move.w	#$24,$1E2720.L
	rol.w	#4,D0
	subq.w	#1,D0
	beq.s	lbC005B2A
	eori.w	#3,D0
lbC005B2A:
	move.w	D0,$1E2722.L
	move.l	D7,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2724.L
	move.l	D2,$1E2726.L
	move.l	D3,$1E272A.L
	move.l	D4,$1E272E.L
	move.l	D7,D0
	rol.w	#7,D0
	andi.w	#7,D0
	move.l	D7,D1
	lsr.w	#3,D1
	andi.w	#$38,D1
	or.w	D1,D0
	bsr.w	lbC005B94
	move.w	D1,$1E2736.L
	move.l	D2,$1E2738.L
	move.l	D3,$1E273C.L
	move.l	D4,$1E2740.L
lbC005B7C:
	move.l	(SP)+,D7
	rts

lbC005B80:
	move.w	D0,-(SP)
	move.w	D7,D0
	lsr.w	#8,D0
	andi.w	#15,D0
	move.w	D0,$1E2748.L
	move.w	(SP)+,D0
	rts

lbC005B94:
	move.l	D7,-(SP)
	andi.l	#$3F,D0
	move.l	D0,D7
	lsr.w	#3,D0
	move.w	D0,D1
	move.l	D7,D0
	andi.w	#7,D0
	move.l	D0,D2
	cmpi.w	#7,D1
	bcs.s	lbC005BB8
	move.l	D7,D0
	andi.w	#7,D0
	add.w	D0,D1
lbC005BB8:
	moveq	#0,D0
	cmpi.w	#5,D1
	bne.s	lbC005BCE
	bsr.w	lbC005CDE
	addq.w	#2,A0
	move.l	D0,D3
	ext.l	D3
	bra.w	lbC005C7C

lbC005BCE:
	cmpi.w	#6,D1
	bne.s	lbC005BF4
	bsr.w	lbC005CDE
	addq.w	#2,A0
	move.l	D0,D7
	andi.w	#$FF,D0
	move.l	D0,D3
	ext.w	D3
	ext.l	D3
	move.l	D7,D0
	lsr.w	#8,D0
	andi.w	#$F8,D0
	move.l	D0,D4
	bra.w	lbC005C7C

lbC005BF4:
	cmpi.w	#7,D1
	bne.s	lbC005C06
	bsr.w	lbC005CDE
	addq.w	#2,A0
	move.l	D0,D2
	ext.l	D2
	bra.s	lbC005C7C

lbC005C06:
	cmpi.w	#8,D1
	bne.s	lbC005C16
	bsr.w	lbC005D22
	addq.w	#4,A0
	move.l	D0,D2
	bra.s	lbC005C7C

lbC005C16:
	cmpi.w	#9,D1
	bne.s	lbC005C28
	bsr.w	lbC005CDE
	addq.w	#2,A0
	move.l	D0,D3
	ext.l	D3
	bra.s	lbC005C7C

lbC005C28:
	cmpi.w	#10,D1
	bne.s	lbC005C48
	bsr.w	lbC005CDE
	addq.w	#2,A0
	move.l	D0,D3
	andi.w	#$FF,D3
	ext.w	D3
	ext.l	D3
	lsr.w	#8,D0
	andi.w	#$FF,D0
	move.l	D0,D4
	bra.s	lbC005C7C

lbC005C48:
	cmpi.w	#11,D1
	bne.s	lbC005C7C
	cmpi.w	#1,$1E2722.L
	bhi.s	lbC005C74
	bsr.w	lbC005CDE
	cmpi.w	#0,$1E2722.L
	bne.s	lbC005C6C
	andi.w	#$FF,D0
	ext.w	D0
lbC005C6C:
	ext.l	D0
	addq.w	#2,A0
	move.l	D0,D2
	bra.s	lbC005C7C

lbC005C74:
	bsr.w	lbC005D22
	addq.w	#4,A0
	move.l	D0,D2
lbC005C7C:
	move.l	(SP)+,D7
	rts

lbC005C80:
	move.l	D7,D0
	rol.w	#7,D0
	andi.w	#7,D0
	rts

lbC005C8A:
	move.l	D7,D0
	andi.w	#7,D0
	rts

lbC005C92:
	movem.l	D0/D1,-(SP)
	move.w	D7,D0
	lsr.w	#6,D0
	andi.w	#3,D0
	move.w	D0,$1E2722.L
	cmpi.w	#3,D0
	eori.b	#1,CCR
	movem.l	(SP)+,D0/D1
	rts

lbC005CB2:
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.s	lbC005CDC
	cmpi.w	#$20,D0
	seq	$1E26B2.L
	bne.s	lbC005CDC
lbC005CCA:
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.s	lbC005CDC
	cmpi.w	#$20,D0
	beq.s	lbC005CCA
lbC005CDC:
	rts

lbC005CDE:
	move.w	D1,-(SP)
	bsr.w	lbC0040BA
	move.w	D0,D1
	lsl.w	#8,D1
	addq.w	#1,A0
	bsr.w	lbC0040BA
	or.w	D1,D0
	subq.l	#1,A0
	move.w	(SP)+,D1
	rts

lbC005CF6:
	movem.l	D0/A0,-(SP)
	ror.w	#8,D0
	bsr.w	lbC0041CE
	lea	1(A0),A0
	rol.w	#8,D0
	bsr.w	lbC0041CE
	movem.l	(SP)+,D0/A0
	rts

lbC005D10:
	swap	D0
	bsr.s	lbC005CF6
	swap	D0
	lea	2(A0),A0
	bsr.s	lbC005CF6
	lea	-2(A0),A0
	rts

lbC005D22:
	move.l	D1,-(SP)
	bsr.s	lbC005CDE
	move.l	D0,D1
	swap	D1
	addq.w	#2,A0
	bsr.s	lbC005CDE
	or.l	D1,D0
	subq.l	#2,A0
	move.l	(SP)+,D1
	rts

lbC005D36:
	movem.l	D0-D2/A0,-(SP)
	move.l	D0,D2
	move.w	$1E2720.L,D0
	lea	ABCD.MSG(PC),A0
lbC005D46:
	tst.w	D0
	beq.s	lbC005D54
lbC005D4A:
	tst.b	(A0)+
	bmi.s	lbC005DC4
	bne.s	lbC005D4A
	subq.w	#1,D0
	bra.s	lbC005D46

lbC005D54:
	bsr.w	lbC0035CE
	tst.w	$1E2748.L
	bmi.s	lbC005D76
	lea	T.MSG0(PC),A0
	move.w	$1E2748.L,D0
	mulu.w	#3,D0
	lea	0(A0,D0.W),A0
	bsr.w	lbC0035CE
lbC005D76:
	move.w	$1E2722.L,D0
	bmi.s	lbC005D8E
	mulu.w	#3,D0
	lea	B.MSG(PC),A0
	lea	0(A0,D0.W),A0
	bsr.w	lbC0035CE
lbC005D8E:
	move.w	#15,$1E269A.L
	jsr	$1AEE96.L
	lea	$1E2724.L,A1
	bsr.w	lbC005DFE
	tst.w	$1E2736.L
	bmi.s	lbC005DBE
	moveq	#$2C,D0
	bsr.w	lbC00670A
	lea	$1E2736.L,A1
	bsr.w	lbC005DFE
lbC005DBE:
	movem.l	(SP)+,D0-D2/A0
	rts

lbC005DC4:
	lea	wrongopnr.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.s	lbC005DBE

T.MSG0:
	dc.b	'T',0,0
	dc.b	'F',0,0
	dc.b	'HI',0
	dc.b	'LS',0
	dc.b	'CC',0
	dc.b	'CS',0
	dc.b	'NE',0
	dc.b	'EQ',0
	dc.b	'VC',0
	dc.b	'VS',0
	dc.b	'PL',0
	dc.b	'MI',0
	dc.b	'GE',0
	dc.b	'LT',0
	dc.b	'GT',0
	dc.b	'LE',0

lbC005DFE:
	movem.l	D0/D1/A0,-(SP)
	move.w	(A1),D0
	bmi.w	lbC006046
	cmpi.w	#0,D0
	bne.s	lbC005E22
	moveq	#$44,D0
	bsr.w	lbC00670A
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	bra.w	lbC006046

lbC005E22:
	cmpi.w	#1,D0
	bne.s	lbC005E3C
	moveq	#$41,D0
	bsr.w	lbC00670A
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	bra.w	lbC006046

lbC005E3C:
	cmpi.w	#2,D0
	bne.s	lbC005E5E
	lea	A.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	moveq	#$29,D0
	bsr.w	lbC00670A
	bra.w	lbC006046

lbC005E5E:
	cmpi.w	#3,D0
	bne.s	lbC005E82
	lea	A.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	lea	ascii.MSG6(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC006046

lbC005E82:
	cmpi.w	#4,D0
	bne.s	lbC005EA4
	lea	A.MSG0(PC),A0
	bsr.w	lbC0035CE
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	moveq	#$29,D0
	bsr.w	lbC00670A
	bra.w	lbC006046

lbC005EA4:
	cmpi.w	#5,D0
	bne.s	lbC005ECE
	move.l	6(A1),D0
	bsr.w	lbC0062B8
	lea	A.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	moveq	#$29,D0
	bsr.w	lbC00670A
	bra.w	lbC006046

lbC005ECE:
	cmpi.w	#6,D0
	bne.w	lbC005F5E
	move.l	6(A1),D0
	bsr.w	lbC0062B8
	lea	A.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	2(A1),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
lbC005EF0:
	moveq	#$2C,D0
	bsr.w	lbC00670A
	moveq	#$41,D0
	btst	#7,13(A1)
	bne.s	lbC005F02
	moveq	#$44,D0
lbC005F02:
	bsr.w	lbC00670A
	move.l	10(A1),D0
	lsr.w	#4,D0
	andi.w	#7,D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	moveq	#3,D0
	btst	#3,13(A1)
	beq.s	lbC005F22
	moveq	#6,D0
lbC005F22:
	lea	B.MSG(PC),A0
	lea	0(A0,D0.W),A0
	bsr.w	lbC0035CE
	move.l	$1E272E.L,D0
	andi.w	#7,D0
	beq.s	lbC005F54
	move.w	D0,D1
	moveq	#$2A,D0
	bsr.w	lbC00670A
	cmpi.w	#6,D1
	bne.s	lbC005F4A
	moveq	#8,D1
lbC005F4A:
	ori.w	#$30,D1
	move.w	D1,D0
	bsr.w	lbC00670A
lbC005F54:
	moveq	#$29,D0
	bsr.w	lbC00670A
	bra.w	lbC006046

lbC005F5E:
	cmpi.w	#7,D0
	bne.s	lbC005F78
	move.l	2(A1),D0
	bsr.w	lbC00A1C4
	lea	S.MSG0(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC006046

lbC005F78:
	cmpi.w	#8,D0
	bne.s	lbC005F8A
	move.l	2(A1),D0
	bsr.w	lbC00A1C4
	bra.w	lbC006046

lbC005F8A:
	cmpi.w	#9,D0
	bne.s	lbC005FA8
	move.l	6(A1),D0
	addq.l	#2,D0
	add.l	D2,D0
	bsr.w	lbC0062B8
	lea	PC.MSG0(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC006046

lbC005FA8:
	cmpi.w	#10,D0
	bne.s	lbC005FC2
	move.l	6(A1),D0
	bsr.w	lbC0062B8
	lea	PC.MSG1(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC005EF0

lbC005FC2:
	cmpi.w	#11,D0
	bne.s	lbC005FDA
	moveq	#$23,D0
	bsr.w	lbC00670A
	move.l	2(A1),D0
	bsr.w	lbC00628E
	bra.w	lbC006046

lbC005FDA:
	jmp	$1CC978.L

	cmpi.w	#15,D0
	bne.s	lbC005FF6
	move.l	6(A1),D0
	bsr.w	lbC00A1C4
	tst.w	2(A1)
	bne.s	lbC006046
	bra.s	lbC006046

lbC005FF6:
	cmpi.w	#$11,D0
	bne.s	lbC00602C
lbC005FFC:
	move.l	2(A1),D1
	lsr.w	#8,D1
	tst.b	D1
	beq.w	lbC00600E
	moveq	#$44,D2
	bsr.w	lbC00604C
lbC00600E:
	move.l	2(A1),D1
	tst.b	D1
	beq.w	lbC00601E
	moveq	#$41,D2
	bsr.w	lbC00604C
lbC00601E:
	bsr.w	lbC000FE4
	bsr.w	lbC006FBC
	bsr.w	lbC000FE4
	bra.s	lbC006046

lbC00602C:
	cmpi.w	#$10,D0
	moveq	#0,D1
	moveq	#15,D2
	move.l	2(A1),D0
lbC006038:
	roxr.w	#1,D0
	roxl.w	#1,D1
	dbra	D2,lbC006038
	move.l	D1,2(A1)
	bra.s	lbC005FFC

lbC006046:
	movem.l	(SP)+,D0/D1/A0
	rts

lbC00604C:
	movem.l	D0-D3,-(SP)
	moveq	#7,D3
lbC006052:
	btst	D3,D1
	beq.w	lbC0060D2
	move.w	D2,D0
	bsr.w	lbC00670A
	move.w	D3,D0
	eori.w	#7,D0
	bne.w	lbC00606A
	moveq	#0,D0
lbC00606A:
	addi.w	#$30,D0
	bsr.w	lbC00670A
	subq.w	#1,D3
	bmi.w	lbC0060DC
	btst	D3,D1
	bne.w	lbC006086
	moveq	#$2F,D0
	bsr.w	lbC00670A
	bra.s	lbC006052

lbC006086:
	moveq	#$2D,D0
	bsr.w	lbC00670A
lbC00608C:
	subq.w	#1,D3
	bmi.w	lbC0060BA
	btst	D3,D1
	bne.s	lbC00608C
	move.w	D2,D0
	bsr.w	lbC00670A
	move.w	D3,D0
	addq.w	#1,D0
	eori.w	#7,D0
	bne.w	lbC0060AA
	moveq	#0,D0
lbC0060AA:
	addi.w	#$30,D0
	bsr.w	lbC00670A
	moveq	#$2F,D0
	bsr.w	lbC00670A
	bra.s	lbC006052

lbC0060BA:
	move.w	D2,D0
	bsr.w	lbC00670A
	moveq	#$37,D0
	bsr.w	lbC00670A
	moveq	#$2F,D0
	bsr.w	lbC00670A
lbC0060CC:
	movem.l	(SP)+,D0-D3
	rts

lbC0060D2:
	subq.w	#1,D3
	bpl.w	lbC006052
	tst.b	D1
	bne.s	lbC0060CC
lbC0060DC:
	moveq	#$2F,D0
	bsr.w	lbC00670A
	bra.s	lbC0060CC

A.MSG:
	dc.b	'(A',0
ascii.MSG6:
	dc.b	')+',0
A.MSG0:
	dc.b	'-(A',0
S.MSG0:
	dc.b	'.S',0
PC.MSG0:
	dc.b	'(PC)',0
PC.MSG1:
	dc.b	'(PC',0
wrongopnr.MSG:
	dc.b	'wrong opnr!',$D,0
	dc.b	0
B.MSG:
	dc.b	'.B',0
	dc.b	'.W',0
	dc.b	'.L',0
	dc.b	'.?',0
ABCD.MSG:
	dc.b	'ABCD',0
	dc.b	'ADD',0
	dc.b	'ADDA',0
	dc.b	'ADDI',0
	dc.b	'ADDQ',0
	dc.b	'ADDX',0
	dc.b	'AND',0
	dc.b	'ANDI',0
	dc.b	'ASL',0
	dc.b	'ASR',0
	dc.b	'B',0
	dc.b	'BCHG',0
	dc.b	'BCLR',0
	dc.b	'BRA',0
	dc.b	'BSET',0
	dc.b	'BSR',0
	dc.b	'BTST',0
	dc.b	'CHK',0
	dc.b	'CLR',0
	dc.b	'CMP',0
	dc.b	'CMPA',0
	dc.b	'CMPI',0
	dc.b	'CMPM',0
	dc.b	'DB',0
	dc.b	'DIVS',0
	dc.b	'DIVU',0
	dc.b	'EOR',0
	dc.b	'EORI',0
	dc.b	'EXG',0
	dc.b	'EXT',0
	dc.b	'JMP',0
	dc.b	'JSR',0
	dc.b	'LEA',0
	dc.b	'LINK',0
	dc.b	'LSL',0
	dc.b	'LSR',0
	dc.b	'MOVE',0
	dc.b	'MOVE',0
	dc.b	'MOVE',0
	dc.b	'MOVE',0
	dc.b	'MOVE',0
	dc.b	'MOVEA',0
	dc.b	'MOVEM',0
	dc.b	'MOVEP',0
	dc.b	'MOVEQ',0
	dc.b	'MULS',0
	dc.b	'MULU',0
	dc.b	'NBCD',0
	dc.b	'NEG',0
	dc.b	'NEGX',0
	dc.b	'NOP',0
	dc.b	'NOT',0
	dc.b	'OR',0
	dc.b	'ORI',0
	dc.b	'PEA',0
	dc.b	'RESET',0
	dc.b	'ROL',0
	dc.b	'ROR',0
	dc.b	'ROXL',0
	dc.b	'ROXR',0
	dc.b	'RTE',0
	dc.b	'RTR',0
	dc.b	'RTS',0
	dc.b	'SBCD',0
	dc.b	'S',0
	dc.b	'STOP',0
	dc.b	'SUB',0
	dc.b	'SUBA',0
	dc.b	'SUBI',0
	dc.b	'SUBQ',0
	dc.b	'SUBX',0
	dc.b	'SWAP',0
	dc.b	'TAS',0
	dc.b	'TRAP',0
	dc.b	'TRAPV',0
	dc.b	'TST',0
	dc.b	'UNLK',0
	dc.b	'LINEA',0
	dc.b	'LINEF',0
	dc.b	'ILLEGAL',0
	dc.b	'MOVEC',0
	dc.b	$FF

lbC00628E:
	movem.l	D0/D1,-(SP)
	cmpi.w	#1,$1E2722.L
	bne.w	lbC0062A4
	andi.l	#$FFFF,D0
lbC0062A4:
	tst.w	$1E2722.L
	bne.w	lbC0062CE
	andi.l	#$FF,D0
	bra.w	lbC0062CE

lbC0062B8:
	movem.l	D0/D1,-(SP)
	tst.l	D0
	bpl.s	lbC0062CE
	move.l	D0,-(SP)
	move.w	#$2D,D0
	bsr.w	lbC00670A
	move.l	(SP)+,D0
	neg.l	D0
lbC0062CE:
	move.l	D0,-(SP)
	moveq	#1,D1
lbC0062D2:
	lsr.l	#4,D0
	beq.s	lbC0062DA
	addq.w	#1,D1
	bra.s	lbC0062D2

lbC0062DA:
	move.l	(SP)+,D0
	bsr.w	lbC0066BE
	movem.l	(SP)+,D0/D1
	rts

lbC0062E6:
	move.l	#$41E,$1E3156.L
	move.w	$1E2816.L,-(SP)
	move.w	#$FFF,$1E2816.L
	bsr.w	lbC00630C
	move.w	(SP)+,$1E2816.L
	bra.w	lbC006448

lbC00630C:
	movem.l	D0-D4/A0/A1,-(SP)
	move.l	#$7D0,D4
	sf	$1E2814.L
	lea	$1E2402.L,A1
	move.l	$1E2AE0.L,$1E277E.L
	move.l	$84(A1),$1E2782.L
	move.l	$1E265C.L,$1E2786.L
	move.l	$1E2660.L,$1E278A.L
	move.l	$1E264E.L,$1E27A6.L
	move.w	$1E2652.L,$1E27AA.L
	move.l	$1E2654.L,$1E27AE.L
	move.w	$98(A1),$1E27D2.L
	lea	$180(A1),A1
	lea	$1E27D4.L,A0
	moveq	#$1F,D0
lbC00637A:
	move.w	(A1)+,(A0)+
	dbra	D0,lbC00637A
	move.l	$1E2658.L,$1E27D4.L
	lea	$1E24E2.L,A0
	moveq	#5,D0
	lea	$1E278E.L,A1
lbC006398:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC006398
	move.l	$1E2664.L,$1E278E.L
	lea	$1E27B2.L,A1
	lea	$1E2522.L,A0
	moveq	#7,D0
lbC0063B6:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC0063B6
	bra.w	lbC006488

lbC0063C0:
	movem.l	D0-D4/A0-A2,-(SP)
	move.w	$1E2816.L,D4
	movea.l	$1E3156.L,A0
	movea.l	A0,A2
lbC0063D2:
	addq.w	#2,A0
	cmpa.l	#$200000,A0
	bge.s	lbC006434
	cmpi.w	#$E0,(A0)
	bne.s	lbC0063D2
	cmpi.w	#$20,2(A0)
	bge.s	lbC0063D2
	addq.w	#4,A0
	move.w	#$320,D1
	movea.l	A0,A1
lbC0063F2:
	tst.w	(A1)
	beq.s	lbC0063D2
	cmpi.l	#$FFFFFFFE,(A1)
	beq.s	lbC006406
	addq.w	#4,A1
	dbra	D1,lbC0063F2
	bra.s	lbC0063D2

lbC006406:
	move.l	A1,-(SP)
	subq.w	#4,A0
lbC00640A:
	move.l	-4(A0),D0
	jsr	$1CC58A.L
	tst.w	D0
	bne.s	lbC00641E
	subq.w	#4,A0
	dbra	D1,lbC00640A
lbC00641E:
	movea.l	A0,A2
	movea.l	(SP)+,A0
	subq.w	#1,D4
	bne.w	lbC0063D2
lbC006428:
	move.l	A2,$1E3156.L
	movem.l	(SP)+,D0-D4/A0-A2
	rts

lbC006434:
	lea	$41E.w,A2
	move.l	A2,$1E3156.L
	move.w	#1,$1E2816.L
	bra.s	lbC006428

lbC006448:
	movem.l	D0-D4/A0/A1,-(SP)
	clr.w	$1E314E.L
	clr.w	$1E3150.L
	clr.w	$1E3152.L
	bsr.w	lbC0063C0
	lea	$1E2402.L,A1
	movea.l	$1E3156.L,A0
	move.l	A0,$1E277E.L
	move.l	$84(A1),$1E2782.L
	move.l	#$2000,D4
	sf	$1E2814.L
lbC006488:
	btst	#7,$1E2601.L
	beq.w	lbC006698
	movea.l	$1E3156.L,A0
	sf	$1E2815.L
	bclr	#4,$1E2816.L
	beq.w	lbC0064B2
	st	$1E2815.L
lbC0064B2:
	tst.b	$1E2815.L
	beq.w	lbC0064C2
	st	$1E2814.L
lbC0064C2:
	bsr.w	lbC005D22
	addq.w	#4,A0
	subq.w	#1,D4
	beq.w	lbC006698
	move.l	D0,D1
	btst	#$10,D1
	beq.s	lbC006502
	btst	#0,D1
	bne.s	lbC0064B2
	tst.b	$1E2814.L
	beq.s	lbC0064F4
	sf	$1E2814.L
	subq.w	#1,$1E2816.L
	beq.w	lbC006698
lbC0064F4:
	move.l	D1,D2
	swap	D2
	cmpi.w	#$FFFF,D2
	bne.s	lbC0064B2
	bra.w	lbC006698

lbC006502:
	move.l	D1,D2
	swap	D2
	andi.w	#$1FE,D2
	cmpi.w	#$8A,D2
	bne.s	lbC006518
	movea.l	$1E2782.L,A0
	bra.s	lbC0064B2

lbC006518:
	cmpi.w	#$8E,D2
	bne.s	lbC006528
	swap	D2
	move.w	D2,$1E2786.L
	bra.s	lbC0064B2

lbC006528:
	cmpi.w	#$98,D2
	bne.s	lbC006536
	swap	D2
	move.w	D2,$1E27D2.L
lbC006536:
	cmpi.w	#$90,D2
	bne.s	lbC006548
	swap	D2
	move.w	D2,$1E2788.L
	bra.w	lbC0064B2

lbC006548:
	cmpi.w	#$92,D2
	bne.s	lbC00655A
	swap	D2
	move.w	D2,$1E278A.L
	bra.w	lbC0064B2

lbC00655A:
	cmpi.w	#$94,D2
	bne.s	lbC00656C
	swap	D2
	move.w	D2,$1E278C.L
	bra.w	lbC0064B2

lbC00656C:
	cmpi.w	#$E0,D2
	bcs.s	lbC00658E
	cmpi.w	#$FE,D2
	bhi.s	lbC00658E
	move.w	D2,D3
	swap	D2
	lea	$1E278E.L,A1
	subi.w	#$E0,D3
	move.w	D2,0(A1,D3.W)
	bra.w	lbC0064B2

lbC00658E:
	cmpi.w	#$10A,D2
	bhi.s	lbC0065B0
	cmpi.w	#$102,D2
	blt.s	lbC0065B0
	move.w	D2,D3
	subi.w	#$102,D3
	swap	D2
	lea	$1E27A8.L,A1
	move.w	D2,0(A1,D3.W)
	bra.w	lbC0064B2

lbC0065B0:
	cmpi.w	#$120,D2
	bcs.s	lbC0065D2
	cmpi.w	#$140,D2
	bhi.s	lbC0065D2
	move.w	D2,D3
	subi.w	#$120,D3
	swap	D2
	lea	$1E27B2.L,A1
	move.w	D2,0(A1,D3.W)
	bra.w	lbC0064B2

lbC0065D2:
	cmpi.w	#$180,D2
	bcs.s	lbC0065FE
	cmpi.w	#$1BE,D2
	bhi.s	lbC0065FE
	tst.w	$1E3154.L
	bne.w	lbC0065FE
	move.w	D2,D3
	subi.w	#$180,D3
	swap	D2
	lea	$1E27D4.L,A1
	move.w	D2,0(A1,D3.W)
	bra.w	lbC0064B2

lbC0065FE:
	cmpi.w	#$80,D2
	bcs.s	lbC006620
	cmpi.w	#$86,D2
	bhi.s	lbC006620
	subi.w	#$80,D2
	move.w	D2,D3
	lea	$1E277E.L,A1
	swap	D2
	move.w	D2,0(A1,D3.W)
	bra.w	lbC0064B2

lbC006620:
	cmpi.w	#$88,D2
	bne.s	lbC006630
	movea.l	$1E277E.L,A0
	bra.w	lbC0064B2

lbC006630:
	cmpi.w	#$100,D2
	bne.s	lbC006650
	swap	D2
	move.w	D2,$1E27A6.L
	andi.w	#$7010,D2
	beq.w	lbC0064B2
	st	$1E2814.L
	bra.w	lbC0064B2

lbC006650:
	cmpi.w	#$1FC,D2
	bne.s	lbC006662
	swap	D2
	move.w	D2,$1E314E.L
	bra.w	lbC0064B2

lbC006662:
	cmpi.w	#$1E4,D2
	bne.s	lbC006674
	swap	D2
	move.w	D2,$1E3150.L
	bra.w	lbC0064B2

lbC006674:
	cmpi.w	#$10C,D2
	bne.s	lbC006682
	swap	D2
	move.w	D2,$1E3152.L
lbC006682:
	cmpi.w	#$106,D2
	bne.s	lbC006694
	swap	D2
	andi.w	#$F300,D0
	move.w	D2,$1E3154.L
lbC006694:
	bra.w	lbC0064B2

lbC006698:
	moveq	#5,D0
	moveq	#0,D1
	move.w	$1E27AE.L,D1
	lea	$1E278E.L,A0
	lea	$1E2818.L,A1
lbC0066AE:
	move.l	(A0)+,D2
	add.l	D1,D2
	move.l	D2,(A1)+
	dbra	D0,lbC0066AE
	movem.l	(SP)+,D0-D4/A0/A1
	rts

lbC0066BE:
	movem.l	D0/D1/D5-D7,-(SP)
	moveq	#0,D5
	move.l	D0,D7
	move.w	D1,D6
	subq.w	#1,D6
	moveq	#7,D0
	sub.w	D6,D0
	lsl.w	#2,D0
	lsl.l	D0,D7
lbC0066D2:
	rol.l	#4,D7
	move.w	D7,D0
	andi.w	#15,D0
	addi.w	#$30,D0
	cmpi.w	#$39,D0
	bls.w	lbC0066E8
	addq.w	#7,D0
lbC0066E8:
	bsr.w	lbC00670A
	dbra	D6,lbC0066D2
	movem.l	(SP)+,D0/D1/D5-D7
	rts

lbC0066F6:
	andi.w	#$FF,D0
	subi.b	#$41,D0
	bpl.w	lbC006704
	addq.b	#7,D0
lbC006704:
	addi.b	#10,D0
	rts

lbC00670A:
	movem.l	D0-D3/A0-A2,-(SP)
	lea	$1E45E8.L,A0
	lea	lbL001B4E(PC),A1
	moveq	#0,D1
	move.b	D0,D1
	move.l	$1E269A.L,D0
	tst.b	D1
	beq.w	lbC0068BE
	cmpi.b	#$1F,D1
	bls.w	lbC006738
	cmpi.b	#$7F,D1
	bls.w	lbC006884
lbC006738:
	cmpi.b	#13,D1
	beq.w	lbC006CF0
	cmpi.b	#10,D1
	beq.w	lbC006CF0
	cmpi.b	#$1B,D1
	beq.w	lbC006D3E
	cmpi.b	#8,D1
	beq.w	lbC0069A2
	cmpi.b	#$84,D1
	beq.w	lbC0069AA
	cmpi.b	#$85,D1
	beq.w	lbC006D48
	cmpi.b	#$82,D1
	beq.w	lbC0069B2
	cmpi.b	#$83,D1
	beq.w	lbC006A0E
	cmpi.b	#$80,D1
	beq.w	lbC006BA4
	cmpi.b	#$81,D1
	beq.w	lbC006A98
	cmpi.b	#9,D1
	beq.w	lbC006D40
	cmpi.b	#$5A,D1
	cmpi.b	#$8A,D1
	beq.w	lbC00690C
	cmpi.b	#$8B,D1
	beq.w	lbC006922
	cmpi.b	#$8C,D1
	beq.w	lbC006992
	cmpi.b	#$8D,D1
	beq.w	lbC00699C
	cmpi.b	#$8E,D1
	beq.w	lbC006D6E
	cmpi.b	#$8F,D1
	beq.w	lbC006D78
	cmpi.b	#$90,D1
	beq.w	lbC006DE6
	cmpi.b	#$91,D1
	beq.w	lbC006DC4
	cmpi.b	#$92,D1
	beq.w	lbC0068C8
	cmpi.b	#$93,D1
	beq.w	lbC006D14
	move.w	#$80,D2
	cmpi.b	#$C4,D1
	beq.w	lbC006878
	move.w	#$81,D2
	cmpi.b	#$E4,D1
	beq.w	lbC006878
	move.w	#$82,D2
	cmpi.b	#$D6,D1
	beq.w	lbC006878
	move.w	#$83,D2
	cmpi.b	#$F6,D1
	beq.w	lbC006878
	move.w	#$84,D2
	cmpi.b	#$DC,D1
	beq.w	lbC006878
	move.w	#$85,D2
	cmpi.b	#$FC,D1
	beq.w	lbC006878
	move.w	#$86,D2
	cmpi.b	#$DF,D1
	beq.w	lbC006878
	move.w	#$87,D2
	cmpi.b	#$A7,D1
	beq.w	lbC006878
	tst.b	$1E2B05.L
	beq.w	lbC006872
	move.w	#$88,D2
	cmpi.w	#$94,D1
	beq.w	lbC006878
	move.w	#$89,D2
	cmpi.w	#$95,D1
	beq.w	lbC006878
	move.w	#$8A,D2
	cmpi.w	#$96,D1
	beq.w	lbC006878
lbC006872:
	moveq	#$2E,D1
	bra.w	lbC006884

lbC006878:
	swap	D0
	bsr.w	lbC001AF6
	move.w	D2,D1
	bra.w	lbC00688A

lbC006884:
	swap	D0
	bsr.w	lbC001AF6
lbC00688A:
	moveq	#0,D2
	move.w	D0,D2
	swap	D0
	mulu.w	#$280,D0
	add.l	D0,D2
	subi.w	#$20,D1
	lsl.w	#3,D1
	adda.l	D1,A1
	moveq	#7,D0
lbC0068A0:
	move.b	(A1)+,D3
	tst.b	$1E2B45.L
	beq.w	lbC0068AE
	not.b	D3
lbC0068AE:
	move.b	D3,0(A0,D2.W)
	addi.w	#$50,D2
	dbra	D0,lbC0068A0
	bsr.w	lbC000FC6
lbC0068BE:
	bsr.w	lbC000F22
	movem.l	(SP)+,D0-D3/A0-A2
	rts

lbC0068C8:
	lea	Keymapisnowge.MSG(PC),A0
	not.b	$1E2954.L
	beq.w	lbC0068DA
	lea	Keymapisnowus.MSG(PC),A0
lbC0068DA:
	bsr.w	lbC0035CE
	bra.s	lbC0068BE

Keymapisnowge.MSG:
	dc.b	13
	dc.b	'Keymap is now german',$D,0
Keymapisnowus.MSG:
	dc.b	13
	dc.b	'Keymap is now usa',$D,0
	dc.b	0

lbC00690C:
	tst.b	$1E26A0.L
	bne.w	lbC00691C
	bsr.w	lbC006E4E
	bra.s	lbC0068BE

lbC00691C:
	bsr.w	lbC001004
	bra.s	lbC0068BE

lbC006922:
	tst.b	$1E26A0.L
	beq.w	lbC00695C
	lea	$1E1C32.L,A0
	lea	$1E1462.L,A1
	cmpa.l	$1E26A2.L,A0
	beq.w	lbC006944
	exg	A1,A0
lbC006944:
	move.w	#$1F3,D0
lbC006948:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC006948
	move.l	$1E269A.L,$1E2C38.L
	bra.w	lbC0068BE

lbC00695C:
	lea	$1E1C32.L,A0
	lea	$1E1462.L,A1
	cmpa.l	$1E26A2.L,A0
	bne.w	lbC006974
	exg	A1,A0
lbC006974:
	move.w	#$1F3,D0
lbC006978:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC006978
	jsr	$1AEDD2.L
	move.l	$1E2C38.L,$1E269A.L
	bra.w	lbC0068BE

lbC006992:
	jsr	$1B673A.L
	bra.w	lbC0068BE

lbC00699C:
	jmp	$1C9364.L

lbC0069A2:
	bsr.w	lbC00100C
	bra.w	lbC0068BE

lbC0069AA:
	bsr.w	lbC001070
	bra.w	lbC0068BE

lbC0069B2:
	tst.b	$1E26A0.L
	beq.w	lbC006A06
	movem.l	D0/A0,-(SP)
	movea.l	$1E26A2.L,A0
	move.w	$1E269C.L,D0
	mulu.w	#$50,D0
	lea	0(A0,D0.W),A0
	tst.w	$1E269A.L
	beq.w	lbC0069FE
lbC0069DE:
	subq.w	#1,$1E269A.L
	beq.w	lbC0069FE
	move.w	$1E269A.L,D0
	cmpi.b	#$20,-1(A0,D0.W)
	bne.s	lbC0069DE
	cmpi.b	#$20,0(A0,D0.W)
	beq.s	lbC0069DE
lbC0069FE:
	movem.l	(SP)+,D0/A0
	bra.w	lbC0068BE

lbC006A06:
	bsr.w	lbC000FE4
	bra.w	lbC0068BE

lbC006A0E:
	tst.b	$1E26A0.L
	beq.w	lbC006A90
	movem.l	D0/A0,-(SP)
	movea.l	$1E26A2.L,A0
	move.w	$1E269C.L,D0
	mulu.w	#$50,D0
	lea	0(A0,D0.W),A0
	cmpi.w	#$4F,$1E269A.L
	beq.w	lbC006A64
lbC006A3C:
	addq.w	#1,$1E269A.L
	cmpi.w	#$4F,$1E269A.L
	beq.w	lbC006A64
	move.w	$1E269A.L,D0
	cmpi.b	#$20,-1(A0,D0.W)
	bne.s	lbC006A3C
	cmpi.b	#$20,0(A0,D0.W)
	beq.s	lbC006A3C
lbC006A64:
	cmpi.w	#$4F,$1E269A.L
	bne.w	lbC006A88
lbC006A70:
	move.w	$1E269A.L,D0
	cmpi.b	#$20,-1(A0,D0.W)
	bne.w	lbC006A88
	subq.w	#1,$1E269A.L
	bne.s	lbC006A70
lbC006A88:
	movem.l	(SP)+,D0/A0
	bra.w	lbC0068BE

lbC006A90:
	bsr.w	lbC000FC6
	bra.w	lbC0068BE

lbC006A98:
	tst.b	$1E26A0.L
	beq.w	lbC006AAE
	move.w	#$18,$1E269C.L
	bra.w	lbC0068BE

lbC006AAE:
	cmpi.w	#$18,$1E269C.L
	bne.w	lbC006B94
	movem.l	D0/D1/D7/A0/A1,-(SP)
	moveq	#0,D1
	movea.l	$1E26A2.L,A0
	lea	$780(A0),A0
	move.b	(A0)+,D1
	moveq	#$46,D7
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC006B90
	cmpi.w	#$3A,D1
	bne.w	lbC006AFE
	addq.l	#8,D0
	addq.l	#8,D0
	movea.l	D0,A1
	jsr	lbC00111C(PC)
	clr.w	$1E269A.L
	jsr	lbC00363A(PC)
	bra.w	lbC006B9C

lbC006AFE:
	cmpi.w	#$7E,D1
	bne.w	lbC006B36
	movea.l	D0,A0
	bsr.w	lbC004F06
	move.l	A0,$1E276A.L
	move.l	A0,D0
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	jsr	lbC00111C(PC)
	clr.w	$1E269A.L
	jsr	lbC002CC6(PC)
	bra.w	lbC006B9C

lbC006B36:
	cmpi.w	#$2E,D1
	bne.w	lbC006B58
	movea.l	D0,A0
	lea	$40(A0),A0
	jsr	lbC00111C(PC)
	clr.w	$1E269A.L
	jsr	$1AF6C4.L
	bra.w	lbC006B9C

lbC006B58:
	cmpi.w	#$2C,D1
	bne.w	lbC006B74
	addq.l	#4,D0
	jsr	lbC00111C(PC)
	clr.w	$1E269A.L
	jsr	lbC004288(PC)
	bra.w	lbC006B9C

lbC006B74:
	cmpi.w	#$3B,D1
	bne.w	lbC006B90
	addq.w	#2,D0
	jsr	lbC00111C(PC)
	clr.w	$1E269A.L
	jsr	lbW003260(PC)
	bra.w	lbC006B9C

lbC006B90:
	movem.l	(SP)+,D0/D1/D7/A0/A1
lbC006B94:
	bsr.w	lbC0010FA
	bra.w	lbC0068BE

lbC006B9C:
	movem.l	(SP)+,D0/D1/D7/A0/A1
	bra.w	lbC0068BE

lbC006BA4:
	tst.b	$1E26A0.L
	beq.w	lbC006BB8
	clr.w	$1E269C.L
	bra.w	lbC0068BE

lbC006BB8:
	tst.w	$1E269C.L
	bne.w	lbC006CE0
	movem.l	D0/D1/D7/A0/A1,-(SP)
	moveq	#0,D1
	movea.l	$1E26A2.L,A0
	move.b	(A0)+,D1
	moveq	#$46,D7
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC006CDC
	cmpi.w	#$3A,D1
	bne.w	lbC006C02
	subq.l	#8,D0
	subq.l	#8,D0
	movea.l	D0,A1
	jsr	lbC0010EE(PC)
	clr.w	$1E269A.L
	jsr	lbC00363A(PC)
	bra.w	lbC006CE8

lbC006C02:
	cmpi.w	#$7E,D1
	bne.w	lbC006C82
	move.l	D0,D7
	movea.l	D0,A0
	lea	-$64(A0),A0
lbC006C12:
	bsr.w	lbC004F06
	cmp.l	A0,D7
	bls.w	lbC006C24
	move.l	A0,$1E276A.L
	bra.s	lbC006C12

lbC006C24:
	move.l	$1E276A.L,D0
	bset	#$1F,D0
	jsr	lbC0010EE(PC)
	clr.w	$1E269A.L
	move.w	$1E2720.L,D1
	cmpi.w	#$3C,D1
	beq.w	lbC006C62
	cmpi.w	#$3E,D1
	beq.w	lbC006C62
	cmpi.w	#13,D1
	beq.w	lbC006C62
	cmpi.w	#$1E,D1
	beq.w	lbC006C62
	bra.w	lbC006C7A

lbC006C62:
	lea	ascii.MSG3(PC),A0
	jsr	lbC0035CE(PC)
	jsr	lbC0010EE(PC)
	clr.w	$1E269A.L
	clr.w	$1E269C.L
lbC006C7A:
	jsr	lbC002CC6(PC)
	bra.w	lbC006CE8

lbC006C82:
	cmpi.w	#$2E,D1
	bne.w	lbC006CA4
	movea.l	D0,A0
	lea	-$40(A0),A0
	jsr	lbC0010EE(PC)
	clr.w	$1E269A.L
	jsr	$1AF6C4.L
	bra.w	lbC006CE8

lbC006CA4:
	cmpi.w	#$2C,D1
	bne.w	lbC006CC0
	subq.l	#4,D0
	jsr	lbC0010EE(PC)
	clr.w	$1E269A.L
	jsr	lbC004288(PC)
	bra.w	lbC006CE8

lbC006CC0:
	cmpi.w	#$3B,D1
	bne.w	lbC006CDC
	subq.w	#2,D0
	jsr	lbC0010EE(PC)
	clr.w	$1E269A.L
	jsr	lbW003260(PC)
	bra.w	lbC006CE8

lbC006CDC:
	movem.l	(SP)+,D0/D1/D7/A0/A1
lbC006CE0:
	bsr.w	lbC0010DC
	bra.w	lbC0068BE

lbC006CE8:
	movem.l	(SP)+,D0/D1/D7/A0/A1
	bra.w	lbC0068BE

lbC006CF0:
	tst.b	$1E2A56.L
	beq.w	lbC006D06
	move.l	D0,-(SP)
	moveq	#10,D0
	jsr	$1B7624.L
	move.l	(SP)+,D0
lbC006D06:
	clr.w	$1E269A.L
	bsr.w	lbC0010FA
	bra.w	lbC0068BE

lbC006D14:
	lea	$1E1462.L,A0
	cmpi.l	#$1E1C32,$1E26A2.L
	beq.w	lbC006D2E
	lea	$1E1C32.L,A0
lbC006D2E:
	move.l	A0,$1E26A2.L
	jsr	$1AEDD2.L
	bra.w	lbC0068BE

lbC006D3E:
	bra.s	lbC006CF0

lbC006D40:
	bsr.w	lbC004EBC
	bra.w	lbC0068BE

lbC006D48:
	lea	$1C5DC4.L,A0
	tst.b	$1E26A0.L
	beq.w	lbC006D5E
	lea	$1C5B09.L,A0
lbC006D5E:
	jsr	$1BE6B0.L
	jsr	$1B06CA.L
	bra.w	lbC0068BE

lbC006D6E:
	jsr	$1B775A.L
	bra.w	lbC0068BE

lbC006D78:
	bsr.w	lbC006FF0
	tst.b	$1E2A57.L
	bne.w	lbC006D90
	jsr	$1B779E.L
	bra.w	lbC0068BE

lbC006D90:
	lea	Printerdumpon.MSG(PC),A0
	tst.b	$1E2A56.L
	beq.w	lbC006DB0
	sf	$1E2A56.L
	lea	Printerdumpof.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC006DBA

lbC006DB0:
	bsr.w	lbC0035CE
	not.b	$1E2A56.L
lbC006DBA:
	jsr	$1B7604.L
	bra.w	lbC0068BE

lbC006DC4:
	lea	$1C87A2.L,A0
	st	$1E2B34.L
	jsr	$1BE6B0.L
	jsr	$1B06CA.L
	sf	$1E2B34.L
	bra.w	lbC0068BE

lbC006DE6:
	bsr.w	lbC006FF0
	lea	Insertmodeon.MSG(PC),A0
	tst.b	$1E296E.L
	bne.w	lbC006DFC
	lea	Overwritemode.MSG(PC),A0
lbC006DFC:
	bsr.w	lbC0035CE
	not.b	$1E296E.L
	bra.w	lbC0068BE

Insertmodeon.MSG:
	dc.b	'Insert mode on',$D,0
Overwritemode.MSG:
	dc.b	'Overwrite mode on',$D,0
Printerdumpon.MSG:
	dc.b	'Printerdump on',$D,0
Printerdumpof.MSG:
	dc.b	'Printerdump off',$D,0

lbC006E4E:
	movem.l	D0/A0,-(SP)
	clr.l	$1E269A.L
	movea.l	$1E26A2.L,A0
	move.w	#$1F3,D0
lbC006E62:
	move.l	#$20202020,(A0)+
	dbra	D0,lbC006E62
	lea	$1E45E8.L,A0
	move.w	#$7CF,D0
lbC006E76:
	clr.l	(A0)+
	clr.l	(A0)+
	dbra	D0,lbC006E76
	bsr.w	lbC000F22
	movem.l	(SP)+,D0/A0
	rts

lbC006E88:
	movem.l	D0/D1/A0,-(SP)
	move.l	$1E269A.L,-(SP)
	move.b	$1E2A56.L,-(SP)
	sf	$1E2A56.L
	sf	$1E294E.L
	movea.l	$1E26A2.L,A0
	moveq	#0,D0
	move.w	$1E269C.L,D0
	mulu.w	#$50,D0
	lea	0(A0,D0.W),A0
	clr.w	$1E269A.L
	moveq	#$4F,D1
	moveq	#0,D0
	cmpi.w	#$18,$1E269C.L
	bne.w	lbC006ED2
	moveq	#$4E,D1
lbC006ED2:
	move.b	(A0)+,D0
	jsr	lbC0035FE(PC)
	bsr.w	lbC00670A
	dbra	D1,lbC006ED2
	st	$1E294E.L
	move.b	(SP)+,$1E2A56.L
	move.l	(SP)+,$1E269A.L
	movem.l	(SP)+,D0/D1/A0
	rts

	movem.l	D0-D2/A0,-(SP)
	move.l	$1E269A.L,-(SP)
	sf	$1E294E.L
	clr.l	$1E269A.L
	movea.l	$1E26A2.L,A0
	move.w	#$7CE,D1
lbC006F18:
	move.b	(A0)+,D0
	bne.s	lbC006F1E
	moveq	#$20,D0
lbC006F1E:
	bsr.w	lbC00670A
	dbra	D1,lbC006F18
	st	$1E294E.L
	move.l	(SP)+,$1E269A.L
	movem.l	(SP)+,D0-D2/A0
	rts

lbC006F38:
	move.l	D1,-(SP)
	moveq	#4,D1
	bsr.w	lbC0066BE
	move.l	(SP)+,D1
	rts

lbC006F44:
	tst.w	D7
	seq	$1E26B3.L
	beq.s	lbC006F62
	moveq	#0,D0
	move.b	(A0)+,D0
	tst.b	$1E2B33.L
	beq.w	lbC006F60
	bsr.w	lbC006F64
lbC006F60:
	subq.w	#1,D7
lbC006F62:
	rts

lbC006F64:
	cmpi.b	#$60,D0
	bls.w	lbC006F78
	cmpi.b	#$7A,D0
	bhi.w	lbC006F78
	subi.b	#$20,D0
lbC006F78:
	rts

	movem.l	D1/A0,-(SP)
	move.b	$1E294E.L,-(SP)
	st	$1E294E.L
	bsr.w	lbC0035CE
	jsr	$1AEE96.L
	move.w	#$82,D0
	bsr.w	lbC00670A
	bsr.w	lbC001EA6
	moveq	#0,D0
	bsr.s	lbC006F44
	move.w	D0,D1
	moveq	#0,D0
	cmpi.w	#$59,D1
	bne.s	lbC006FB0
	moveq	#1,D0
lbC006FB0:
	move.b	(SP)+,$1E294E.L
	movem.l	(SP)+,D1/A0
	rts

lbC006FBC:
	move.l	D0,-(SP)
	moveq	#$20,D0
	bsr.w	lbC00670A
	move.l	(SP)+,D0
	rts

lbC006FC8:
	move.l	D0,-(SP)
	moveq	#13,D0
	bsr.w	lbC00670A
	move.l	(SP)+,D0
	rts

lbC006FD4:
	movem.l	D0/D1,-(SP)
	move.w	D0,D1
	tst.w	D0
	beq.s	lbC006FEA
	subq.w	#1,D1
	moveq	#$20,D0
lbC006FE2:
	bsr.w	lbC00670A
	dbra	D1,lbC006FE2
lbC006FEA:
	movem.l	(SP)+,D0/D1
	rts

lbC006FF0:
	tst.w	$1E269A.L
	beq.s	lbC006FFA
	bra.s	lbC006FC8

lbC006FFA:
	rts

lbC006FFC:
	movem.l	D0-D7/A0-A6,-(SP)
	lea	$1E26C8.L,A5
	lea	$1E26A1.L,A6
	move.l	$1E2974.L,D6
	clr.l	D1
	sf	$1E2B33.L
	bsr.w	lbC003574
	st	$1E2B33.L
	cmpi.b	#1,D0
	bls.w	lbC0087CE
	move.w	D0,D1
	movea.l	$1E26B4.L,A2
	movea.l	$1E26B8.L,A3
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC007076
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC007076
	movea.l	A1,A2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC007076
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC007076
	movea.l	A1,A3
lbC007076:
	movea.l	A2,A1
	movea.l	A3,A2
	bsr.w	lbC00322A
	movea.l	A2,A3
	movea.l	A1,A2
	cmpa.l	A2,A3
	bcs.w	lbC0087CE
	movea.l	A5,A0
	move.b	(A0),D0
	moveq	#0,D5
	move.b	D0,D5
	move.w	D1,D2
lbC007092:
	sub.b	D0,(A0)+
	dbra	D2,lbC007092
	move.l	A3,D3
	subq.b	#1,D1
lbC00709C:
	move.w	D1,D2
	movea.l	A2,A3
	addq.w	#1,A2
	movea.l	A3,A0
	movea.l	A5,A4
	addq.w	#1,A4
	bsr.w	lbC0040BA
	move.w	D0,D4
	move.w	D0,$1E2834.L
lbC0070B4:
	addq.w	#1,A0
	bsr.w	lbC0040BA
	sub.b	D4,D0
	cmp.b	(A4)+,D0
	bne.s	lbC0070E6
	subq.w	#1,D2
	bne.s	lbC0070B4
	move.l	A3,D0
	bsr.w	lbC001B42
	lea	offset.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#0,D0
	move.w	$1E2834.L,D0
	sub.b	D5,D0
	neg.b	D0
	bsr.w	lbC001B36
	bsr.w	lbC006FF0
lbC0070E6:
	tst.b	(A6)
	bne.s	lbC0070FE
lbC0070EA:
	cmp.l	A2,D3
	beq.s	lbC0070FA
	cmpa.l	D6,A2
	bne.s	lbC00709C
	movea.l	#$C00000,A2
	bra.s	lbC0070EA

lbC0070FA:
	bsr.w	lbC006FF0
lbC0070FE:
	movem.l	(SP)+,D0-D7/A0-A6
	rts

offset.MSG:
	dc.b	'  offset: ',0,0

lbC007110:
	movem.l	D0-D4/D6/A0-A6,-(SP)
	move.w	D0,D6
	move.l	$1E2974.L,D1
	lea	$1E26A1.L,A5
	move.b	$1E2834.L,D4
	lea	$1E8468.L,A6
	subq.w	#1,D6
	lea	$1E26C8.L,A0
lbC007136:
	tst.b	(A5)
	bne.w	lbC0071FC
lbC00713C:
	cmpa.l	A1,A2
	beq.w	lbC0071FC
	cmpa.l	D1,A1
	bne.w	lbC00716E
	tst.l	$1E2BC8.L
	beq.w	lbC007166
	move.l	$1E2BC8.L,D1
	cmpa.l	D1,A1
	beq.w	lbC007166
	movea.l	$1E2BC4.L,A1
	bra.s	lbC00713C

lbC007166:
	movea.l	#$C00000,A1
	bra.s	lbC00713C

lbC00716E:
	move.w	D6,D0
	movea.l	A1,A3
	movea.l	A0,A4
lbC007174:
	move.l	D0,D2
	move.l	A0,D3
	movea.l	A3,A0
	cmpa.l	A6,A0
	bcc.s	lbC0071C2
	cmpa.l	#$1E45E8,A0
	bcs.s	lbC007198
	move.l	A0,-(SP)
	adda.l	A0,A0
	adda.l	#$1D1082,A0
lbC007190:
	move.b	(A0),D0
	movea.l	(SP)+,A0
	bra.w	lbC0071C4

lbC007198:
	move.l	A0,D0
	andi.w	#$FFFC,D0
	cmpi.l	#$6C,D0
	bhi.s	lbC0071C2
	cmpi.l	#$68,D0
	bcs.s	lbC0071C2
	move.l	A0,-(SP)
	move.l	A0,D0
	subi.w	#$68,D0
	lea	$1E2690.L,A0
	lea	0(A0,D0.W),A0
	bra.s	lbC007190

lbC0071C2:
	move.b	(A0),D0
lbC0071C4:
	tst.b	D4
	beq.s	lbC0071DC
	cmpi.b	#$60,D0
	bls.w	lbC0071DC
	cmpi.b	#$7A,D0
	bhi.w	lbC0071DC
	subi.b	#$20,D0
lbC0071DC:
	addq.w	#1,A3
	cmp.b	(A4)+,D0
	exg	D0,D2
	exg	D3,A0
	bne.s	lbC0071F6
	dbra	D0,lbC007174
	move.l	A1,D0
	bsr.w	lbC001B42
	moveq	#2,D0
	bsr.w	lbC006FD4
lbC0071F6:
	addq.w	#1,A1
	bra.w	lbC007136

lbC0071FC:
	bsr.w	lbC006FF0
	movem.l	(SP)+,D0-D4/D6/A0-A6
	rts

lbC007206:
	movem.l	D1-D6/A1,-(SP)
	moveq	#0,D1
	bsr.w	lbC007B68
	tst.b	$1E26AE.L
	beq.w	lbC007286
	move.l	D0,D1
lbC00721C:
	move.w	D7,D6
	movea.l	A0,A1
	moveq	#0,D2
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.s	lbC007284
	move.w	D0,D2
	bsr.w	lbC007B68
	tst.b	$1E26AE.L
	bne.w	lbC00724E
	move.l	D6,D7
	movea.l	A1,A0
	move.w	#$FFFF,$1E26AE.L
	bra.w	lbC007284

lbC00724E:
	cmpi.w	#$2A,D2
	bne.s	lbC00725C
	bsr.w	lbC00A524
	move.l	D0,D1
	bra.s	lbC00721C

lbC00725C:
	cmpi.w	#$2B,D2
	bne.s	lbC007266
	add.l	D0,D1
	bra.s	lbC00721C

lbC007266:
	cmpi.w	#$2D,D2
	bne.s	lbC007270
	sub.l	D0,D1
	bra.s	lbC00721C

lbC007270:
	cmpi.w	#$2F,D2
	bne.s	lbC007280
	exg	D1,D0
	bsr.w	lbC00A5A6
	move.l	D0,D1
	bra.s	lbC00721C

lbC007280:
	move.w	D6,D7
	movea.l	A1,A0
lbC007284:
	move.l	D1,D0
lbC007286:
	movem.l	(SP)+,D1-D6/A1
	rts

lbC00728C:
	movem.l	D0-D5,-(SP)
	jsr	lbC007206(PC)
	move.l	D0,D1
	move.w	#$25,D0
	bsr.w	lbC00670A
	move.w	#$1F,D2
lbC0072A2:
	rol.l	#1,D1
	bcc.s	lbC0072B0
	move.w	#$31,D0
	bsr.w	lbC00670A
	bra.s	lbC0072B8

lbC0072B0:
	move.w	#$30,D0
	bsr.w	lbC00670A
lbC0072B8:
	dbra	D2,lbC0072A2
	lea	ascii.MSG7(PC),A0
	bsr.w	lbC0035CE
	move.l	D1,D0
	bsr.w	lbC00A1C4
	lea	ascii.MSG8(PC),A0
	bsr.w	lbC0035CE
	tst.l	D1
	bpl.w	lbC0072E2
	neg.l	D1
	move.w	#$2D,D0
	jsr	lbC00670A(PC)
lbC0072E2:
	move.w	#$21,D0
	jsr	lbC00670A(PC)
	clr.l	D0
	bsr.w	lbC00A1C4
	bsr.w	lbC001B36
	jsr	lbC006FBC(PC)
	move.w	#$82,D0
	bsr.w	lbC00670A
	bsr.w	lbC00670A
	moveq	#0,D4
	moveq	#0,D5
lbC007308:
	clr.l	D0
	move.w	#$20,D3
	moveq	#10,D2
lbC007310:
	asl.l	#1,D1
	roxl.l	#1,D0
	cmp.l	D2,D0
	bcs.w	lbC00731E
	sub.l	D2,D0
	addq.l	#1,D1
lbC00731E:
	subq.w	#1,D3
	bne.s	lbC007310
	move.l	D1,D2
	moveq	#1,D1
	bsr.w	lbC0066BE
	move.w	#$82,D0
	bsr.w	lbC00670A
	bsr.w	lbC00670A
	move.l	D2,D1
	bne.s	lbC007308
	jsr	lbC006FC8(PC)
	movem.l	(SP)+,D0-D5
	rts

ascii.MSG7:
	dc.b	' = $',0
ascii.MSG8:
	dc.b	' = ',0,0

	movem.l	D0-D3/A0-A2,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D1
	move.l	D0,D2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC007372
	move.l	D0,D2
lbC007372:
	move.w	#0,$1E2816.L
	bsr.w	lbC0062E6
	cmpi.l	#8,D1
	bcc.s	lbC007392
	lsl.w	#2,D1
	lea	$1E27B2.L,A0
	move.l	0(A0,D1.W),D1
lbC007392:
	cmpi.l	#8,D2
	bcc.s	lbC0073A6
	lsl.w	#2,D2
	lea	$1E27B2.L,A0
	move.l	0(A0,D2.W),D2
lbC0073A6:
	cmpi.l	#$FFFFF,D1
	bhi.w	lbC0087CE
	cmpi.l	#$FFFFF,D2
	bhi.w	lbC0087CE
	bclr	#0,D1
	bclr	#0,D2
	movea.l	D1,A1
	movea.l	D2,A2
	lea	4(A1),A1
	lea	4(A2),A2
	cmp.l	D1,D2
	beq.s	lbC0073D8
	bsr.w	lbC0073E2
	bra.s	lbC0073DC

lbC0073D8:
	bsr.w	lbC0074FC
lbC0073DC:
	movem.l	(SP)+,D0-D3/A0-A2
	rts

lbC0073E2:
	movem.l	D0-D4/A0-A3,-(SP)
	move.w	#$A7,D0
	bsr.w	lbC00670A
	move.l	A1,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FBC
	move.l	A2,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FBC
	movea.l	A1,A0
	bsr.w	lbC005D22
	move.l	D0,D2
	movea.l	A2,A0
	bsr.w	lbC005D22
	move.l	D0,D3
	moveq	#15,D4
lbC007414:
	roxl.w	#1,D3
	roxl.w	#1,D0
	swap	D3
	roxl.w	#1,D3
	roxl.w	#1,D0
	swap	D3
	roxl.w	#1,D2
	roxl.w	#1,D0
	swap	D2
	roxl.w	#1,D2
	roxl.w	#1,D0
	swap	D2
	moveq	#1,D1
	bsr.w	lbC0066BE
	dbra	D4,lbC007414
	jsr	$1B7740.L
	move.w	#15,$1E269A.L
	bsr.w	lbC000F22
	movem.l	(SP)+,D0-D4/A0-A3
	rts

	movem.l	D0-D4/A0-A4,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmpi.l	#$FFFFF,D0
	bhi.w	lbC0087CE
	bclr	#0,D0
	movea.l	D0,A1
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmpi.l	#$FFFFF,D0
	bhi.w	lbC0087CE
	bclr	#0,D0
	movea.l	D0,A2
	moveq	#15,D4
lbC007490:
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	bsr.w	lbC0066F6
	cmpi.w	#15,D0
	bhi.w	lbC0087CE
	swap	D2
	roxr.w	#1,D0
	roxl.w	#1,D2
	swap	D2
	roxr.w	#1,D0
	roxl.w	#1,D2
	swap	D3
	roxr.w	#1,D0
	roxl.w	#1,D3
	swap	D3
	roxr.w	#1,D0
	roxl.w	#1,D3
	dbra	D4,lbC007490
	move.l	D2,D0
	movea.l	A1,A0
	bsr.w	lbC005D10
	move.l	D3,D0
	movea.l	A2,A0
	bsr.w	lbC005D10
	lea	4(A1),A1
	lea	4(A2),A2
	cmpa.l	#$FFFFE,A1
	bhi.w	lbC0074F6
	cmpa.l	#$FFFFE,A2
	bhi.w	lbC0074F6
	bsr.w	lbC0073E2
lbC0074F6:
	movem.l	(SP)+,D0-D4/A0-A4
	rts

lbC0074FC:
	movem.l	D0-D3/A0,-(SP)
	move.w	#$26,D0
	bsr.w	lbC00670A
	move.l	A1,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FBC
	movea.l	A1,A0
	bsr.w	lbC005D22
	move.l	D0,D2
	moveq	#15,D3
	moveq	#1,D1
lbC00751E:
	clr.b	D0
	roxl.w	#1,D2
	roxl.w	#1,D0
	swap	D2
	roxl.w	#1,D2
	roxl.w	#1,D0
	swap	D2
	bsr.w	lbC0066BE
	dbra	D3,lbC00751E
	jsr	$1B7740.L
	move.w	#8,$1E269A.L
	bsr.w	lbC000F22
	movem.l	(SP)+,D0-D3/A0
	rts

	movem.l	D0-D3/A0-A2,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmpi.l	#$FFFFF,D0
	bhi.w	lbC0087CE
	bclr	#0,D0
	movea.l	D0,A1
	moveq	#15,D1
lbC007570:
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	bsr.w	lbC0066F6
	cmpi.w	#3,D0
	bhi.w	lbC0087CE
	roxr.w	#1,D0
	roxl.w	#1,D2
	swap	D2
	roxr.w	#1,D0
	roxl.w	#1,D2
	swap	D2
	dbra	D1,lbC007570
	move.l	D2,D0
	swap	D0
	movea.l	A1,A0
	bsr.w	lbC005D10
	lea	4(A1),A1
	cmpa.l	#$FFFFE,A1
	bhi.w	lbC0075B6
	bsr.w	lbC0074FC
lbC0075B6:
	movem.l	(SP)+,D0-D3/A0-A2
	rts

lbC0075BC:
	move.l	D0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC0075E8
	tst.l	D0
	beq.w	lbC0087CE
	cmpi.l	#8,D0
	bhi.w	lbC0087CE
	move.w	D0,$1E271C.L
	bra.w	lbC0075E8

	move.l	(SP)+,D0
	rts

lbC0075E8:
	lea	Currentbitwid.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#0,D0
	move.w	$1E271C.L,D0
	lsl.w	#3,D0
	bsr.w	lbC0086F8
	bsr.w	lbC001B36
	bsr.w	lbC006FBC
	lea	bits.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	(SP)+,D0
	rts

Currentbitwid.MSG:
	dc.b	'Current bit widht: !',0
bits.MSG:
	dc.b	'bits',$D,0
	dc.b	0

lbC00762E:
	movem.l	D0/A1,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bsr.w	lbC00765A
	movem.l	(SP)+,D0/A1
	rts

lbC00765A:
	movem.l	D0-D2/A0,-(SP)
	move.l	D0,D2
	move.w	#$7C,D0
	bsr.w	lbC00670A
	move.l	D2,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FBC
	move.w	#$25,D0
	bsr.w	lbC00670A
	move.w	$1E271C.L,D1
	subq.w	#1,D1
	movea.l	D2,A0
	move.w	D1,D2
lbC007686:
	bsr.w	lbC0040BA
	addq.w	#1,A0
	moveq	#8,D1
	bsr.w	lbC0033AE
	dbra	D2,lbC007686
	move.w	#9,$1E269A.L
	bsr.w	lbC000F22
	movem.l	(SP)+,D0-D2/A0
	rts

	movem.l	D0-D3/A0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	movea.l	D0,A1
	jsr	lbC005CB2(PC)
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	cmpi.w	#$25,D0
	bne.w	lbC0087CE
	move.w	$1E271C.L,D1
	subq.w	#1,D1
lbC0076EA:
	moveq	#7,D2
	moveq	#0,D3
lbC0076EE:
	lsl.w	#1,D3
	jsr	lbC006F44(PC)
	tst.b	$1E26B3.L
	bne.w	lbC0087CE
	cmpi.b	#$30,D0
	beq.w	lbC007712
	cmpi.b	#$31,D0
	bne.w	lbC0087CE
	ori.b	#1,D3
lbC007712:
	dbra	D2,lbC0076EE
	move.b	D3,D0
	exg	A1,A0
	jsr	lbC0041CE(PC)
	exg	A1,A0
	addq.w	#1,A1
	dbra	D1,lbC0076EA
	move.l	A1,D0
	jsr	lbC00765A(PC)
	movem.l	(SP)+,D0-D3/A0
	rts

lbC007732:
	movem.l	D0-D3/A0-A4,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	subq.l	#1,D0
	movea.l	D0,A3
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A4
	movea.l	A2,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	movea.l	A3,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	movea.l	A4,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	cmpa.l	A2,A3
	bcs.w	lbC0087CE
	movea.l	A3,A1
	suba.l	A2,A1
	move.l	A1,D1
	cmpa.l	A2,A4
	bcs.s	lbC0077C8
	adda.l	A1,A4
lbC0077AA:
	tst.b	$1E26A1.L
	bne.s	lbC0077E4
	movea.l	A3,A0
	bsr.w	lbC0040BA
	movea.l	A4,A0
	bsr.w	lbC0041CE
	subq.l	#1,A3
	subq.l	#1,A4
	subq.l	#1,D1
	bpl.s	lbC0077AA
	bra.s	lbC0077E4

lbC0077C8:
	tst.b	$1E26A1.L
	bne.s	lbC0077E4
	movea.l	A2,A0
	bsr.w	lbC0040BA
	movea.l	A4,A0
	bsr.w	lbC0041CE
	addq.w	#1,A2
	addq.w	#1,A4
	subq.l	#1,D1
	bpl.s	lbC0077C8
lbC0077E4:
	movem.l	(SP)+,D0-D3/A0-A4
	rts

lbC0077EA:
	movem.l	D0/D1/A1,-(SP)
	movea.l	A0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	move.w	#$2E,D0
	bsr.w	lbC00670A
	move.l	A1,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FBC
	moveq	#$3F,D1
lbC007812:
	moveq	#0,D0
	move.l	A0,-(SP)
	movea.l	A1,A0
	addq.w	#1,A1
	bsr.w	lbC0040BA
	movea.l	(SP)+,A0
	add.b	$1E271F.L,D0
	andi.w	#$FF,D0
	jsr	lbC00361C(PC)
	bsr.w	lbC00670A
	dbra	D1,lbC007812
	move.w	#8,$1E269A.L
	bsr.w	lbC000F22
	movem.l	(SP)+,D0/D1/A1
	rts

lbC007848:
	movem.l	D0-D4/A0-A3,-(SP)
	lea	$1E26A1.L,A3
	sf	$1E2B33.L
	bsr.w	lbC003574
	st	$1E2B33.L
	tst.w	D0
	beq.w	lbC0087CE
	move.w	D0,D3
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D2
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D1
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	cmp.l	D2,D1
	bcs.w	lbC0087CE
	sub.l	D2,D1
	movea.l	D2,A0
	lea	$1E26C8.L,A2
	moveq	#0,D4
lbC0078BC:
	tst.b	(A3)
	bne.s	lbC0078D6
	move.b	0(A2,D4.W),D0
	bsr.w	lbC0041CE
	addq.w	#1,A0
	addq.w	#1,D4
	cmp.w	D3,D4
	bne.s	lbC0078D2
	moveq	#0,D4
lbC0078D2:
	subq.l	#1,D1
	bne.s	lbC0078BC
lbC0078D6:
	movem.l	(SP)+,D0-D4/A0-A3
	rts

	movea.l	2(SP),A3
	clr.l	(SP)
	clr.l	4(SP)
	cmpi.l	#$42524F4E,$1E293C.L
	bne.s	lbC007916
	tst.b	$1E2B02.L
	beq.s	lbC007916
	lea	$40000.L,SP
	jmp	(A3)

	clr.l	$1E2718.L
	movem.l	D0-D7/A0-A6,$1D0A3E.L
	movea.l	$F80004.L,A3
lbC007916:
	move.b	#$13,$1E2C45.L
	cmpi.b	#$F8,$FC0005.L
	bne.w	lbC007932
	move.b	#$20,$1E2C45.L
lbC007932:
	move.l	D0,-(SP)
	move.l	A3,D0
	cmpi.b	#$13,$1E2C45.L
	bhi.w	lbC007948
	ori.l	#$FC0000,D0
lbC007948:
	ori.l	#$F80000,D0
	movea.l	D0,A3
	move.l	(SP)+,D0
	bsr.w	lbC00B3CC
	jsr	$1B29C4.L
	moveq	#$10,D1
	move.w	$1E2998.L,D0
	btst	#3,D0
	beq.w	lbC007970
	bset	#3,D1
lbC007970:
	btst	#2,D0
	beq.w	lbC007980
	bset	#2,D1
	bra.w	lbC00798C

lbC007980:
	btst	#1,D0
	beq.w	lbC00798C
	bset	#1,D1
lbC00798C:
	move.w	D1,$1E2996.L
	jsr	$1C0BDA.L
	jsr	$1AF9A2.L
	move.b	$1E2B43.L,$1E2B44.L
	not.b	$1E2B44.L
	move.w	$1E298E.L,$1E2990.L
	move.w	#$FFFF,$1E2992.L
	sf	$1E2B36.L
	sf	$1E2B42.L
	sf	$1E297C.L
	sf	$1E2B39.L
	sf	$1E2B46.L
	clr.l	$1E2BDC.L
	sf	$1E2B3A.L
	sf	$1E294F.L
	clr.b	$1E29B2.L
	sf	$1E2B01.L
	st	$1E2C44.L
	move.w	#$AAA,$1E2970.L
	move.w	#0,$1E2972.L
	clr.w	$1E2BA6.L
	st	$1E2954.L
	move.l	#$5052494E,$1E2956.L
	sf	$1E2B36.L
	sf	$1E2AFA.L
	st	$1E296E.L
	sf	$1E296C.L
	clr.w	$1E298A.L
	clr.w	$1E298C.L
	sf	$1E2B2F.L
	sf	$1E2980.L
	sf	$1E2AFB.L
	sf	$1E2AF8.L
	sf	$1E2AF9.L
	move.b	#3,$1E2950.L
	sf	$1E2B02.L
	sf	$1E2B2F.L
	st	$1E2B3E.L
	sf	$1E2B3F.L
	sf	$1E2B41.L
	sf	$1E2B40.L
	sf	$1E2B38.L
	lea	$1E2B4A.L,A0
	moveq	#$35,D0
lbC007AA4:
	clr.b	(A0)+
	dbra	D0,lbC007AA4
	jsr	lbC000C5A(PC)
	tst.l	$1D0A3A.L
	bne.s	lbC007ABA
	bsr.w	lbC00D404
lbC007ABA:
	movem.l	($1D0A3E).L,D0-D7/A0-A6
	jmp	$1A868E.L

	clr.l	$1E2BC4.L
	clr.l	$1E2BC8.L
	tst.b	$1E2B43.L
	beq.w	lbC007AF6
	move.l	$1E2B14.L,$1E2BC4.L
	move.l	$1E2B18.L,$1E2BC8.L
	bra.w	lbC007B14

lbC007AF6:
	tst.b	$1E2B00.L
	bne.w	lbC007B14
	move.l	$1E2bcc.L,$1E2BC4.L
	move.l	$1E2BD0.L,$1E2BC8.L
lbC007B14:
	move.l	#$80000,$1E2974.L
	btst	#3,$1E2997.L
	beq.w	lbC007B34
	move.l	#$200000,$1E2974.L
lbC007B34:
	move.l	$1E299A.L,$1E2978.L
	btst	#2,$1E2997.L
	bne.w	lbC007B66
	move.l	#$C80000,$1E2978.L
	btst	#1,$1E2997.L
	bne.w	lbC007B66
	clr.l	$1E2978.L
lbC007B66:
	rts

lbC007B68:
	movem.l	D1-D5/A1,-(SP)
	move.b	$1E2B33.L,-(SP)
	st	$1E2B33.L
	move.w	#$FFFF,$1E26AE.L
	clr.l	D0
	clr.l	D1
	clr.l	D2
	clr.l	D3
	sf	D5
	sf	$1E2948.L
	sf	$1E2949.L
lbC007B96:
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC007C46
	cmpi.b	#$21,D0
	beq.w	lbC007C90
	cmpi.b	#$53,D0
	beq.w	lbC007E60
	cmpi.b	#$54,D0
	beq.w	lbC007DAA
	cmpi.b	#$25,D0
	beq.w	lbC007C82
	cmpi.b	#$24,D0
	beq.w	lbC007C9E
	cmpi.b	#$5C,D0
	beq.w	lbC007CAC
	cmpi.b	#$2D,D0
	bne.w	lbC007BE0
	not.b	D5
	bra.s	lbC007B96

lbC007BE0:
	move.w	D0,D1
	jsr	lbC0066F6(PC)
	cmpi.b	#15,D0
	bhi.w	lbC007C46
	move.w	D1,D0
	st	$1E2948.L
	move.w	#15,D1
	move.w	#$10,D3
lbC007BFE:
	jsr	lbC0066F6(PC)
	cmp.w	D0,D1
	bcs.s	lbC007C40
	tst.b	$1E2948.L
	beq.w	lbC007C16
	st	$1E2949.L
lbC007C16:
	cmpi.w	#2,D3
	beq.s	lbC007C74
	cmpi.w	#10,D3
	beq.s	lbC007C78
	lsl.l	#4,D2
lbC007C24:
	ext.w	D0
	add.l	D0,D2
	bsr.w	lbC006F44
	tst.b	$1E26B3.L
	bne.s	lbC007C4E
	st	$1E2948.L
	cmpi.b	#$20,D0
	bne.s	lbC007BFE
lbC007C40:
	bsr.w	lbC007F7E
	bra.s	lbC007C4E

lbC007C46:
	clr.w	$1E26AE.L
	clr.l	D2
lbC007C4E:
	tst.b	$1E2949.L
	bne.w	lbC007C5E
	clr.w	$1E26AE.L
lbC007C5E:
	move.l	D2,D0
	tst.b	D5
	beq.w	lbC007C68
	neg.l	D0
lbC007C68:
	move.b	(SP)+,$1E2B33.L
	movem.l	(SP)+,D1-D5/A1
	rts

lbC007C74:
	lsl.l	#1,D2
	bra.s	lbC007C24

lbC007C78:
	move.l	D2,D4
	lsl.l	#3,D2
	lsl.l	#1,D4
	add.l	D4,D2
	bra.s	lbC007C24

lbC007C82:
	move.w	#1,D1
	move.w	#2,D3
	moveq	#$30,D0
	bra.w	lbC007BFE

lbC007C90:
	move.w	#9,D1
	move.w	#10,D3
	moveq	#$30,D0
	bra.w	lbC007BFE

lbC007C9E:
	move.w	#15,D1
	move.w	#$10,D3
	moveq	#$30,D0
	bra.w	lbC007BFE

lbC007CAC:
	jsr	lbC005CB2(PC)
	tst.b	$1E26B3.L
	bne.s	lbC007C46
	cmpi.b	#$41,D0
	bne.w	lbC007D12
	lea	$1E2628.L,A1
lbC007CC6:
	jsr	lbC005CB2(PC)
	tst.b	$1E26B3.L
	bne.w	lbC007C46
	cmpi.b	#$30,D0
	bcs.w	lbC007C46
	cmpi.b	#$37,D0
	bhi.w	lbC007C46
	subi.b	#$30,D0
	moveq	#0,D2
	cmpi.b	#7,D0
	bne.w	lbC007CFE
	cmpa.l	#$1E2628,A1
	bne.w	lbC007CFE
	moveq	#6,D2
lbC007CFE:
	ext.w	D0
	lsl.w	#2,D0
	add.l	0(A1,D0.W),D2
	move.w	#$FFFF,$1E26AE.L
	bra.w	lbC007C5E

lbC007D12:
	cmpi.b	#$44,D0
	bne.w	lbC007D22
	lea	$1E2608.L,A1
	bra.s	lbC007CC6

lbC007D22:
	cmpi.b	#$53,D0
	bne.w	lbC007D50
	jsr	lbC005CB2(PC)
	tst.b	$1E26B3.L
	bne.w	lbC007C46
	cmpi.b	#$50,D0
	bne.w	lbC007C46
	move.l	USP,A1
	move.l	A1,D2
	move.w	#$FFFF,$1E26AE.L
	bra.w	lbC007C5E

lbC007D50:
	cmpi.b	#$42,D0
	bne.w	lbC007D7A
	tst.b	$1E2AF6.L
	bne.w	lbC007D68
	jsr	$1BF6B0.L
lbC007D68:
	move.l	$1E2AE8.L,D2
	move.w	#$FFFF,$1E26AE.L
	bra.w	lbC007C5E

lbC007D7A:
	cmpi.b	#$50,D0
	bne.w	lbC007C46
	jsr	lbC005CB2(PC)
	tst.b	$1E26B3.L
	bne.w	lbC007C46
	cmpi.b	#$43,D0
	bne.w	lbC007C46
	move.l	$1E2648.L,D2
	move.w	#$FFFF,$1E26AE.L
	bra.w	lbC007C5E

lbC007DAA:
	tst.b	$1E2AF6.L
	beq.w	lbC007C46
	bsr.w	lbC007B68
	tst.b	$1E26AE.L
	beq.w	lbC007C46
	moveq	#0,D2
	moveq	#0,D3
	move.l	D0,D1
	moveq	#0,D0
	move.b	(A0),D0
	jsr	lbC006F64(PC)
	cmpi.b	#$53,D0
	bne.w	lbC007E10
	bsr.w	lbC006F44
	bsr.w	lbC007B68
	tst.b	$1E26AE.L
	beq.w	lbC007C46
	move.l	D0,D2
	moveq	#0,D0
	move.b	(A0),D0
	jsr	lbC006F64(PC)
	cmpi.b	#$4F,D0
	bne.w	lbC007E10
	bsr.w	lbC006F44
	bsr.w	lbC007B68
	tst.b	$1E26AE.L
	beq.w	lbC007C46
	move.l	D0,D3
lbC007E10:
	cmp.b	$1E2AF4.L,D1
	bcs.w	lbC007C46
	cmp.b	$1E2AF5.L,D1
	bhi.w	lbC007C46
	sub.b	$1E2AF4.L,D1
	cmpi.l	#10,D2
	bhi.w	lbC007C46
	andi.w	#$FF,D1
	mulu.w	#11,D1
	add.w	D2,D1
	lsl.l	#8,D1
	lsl.l	#1,D1
	add.l	D3,D1
	add.l	$1E2AE8.L,D1
	move.l	D1,D0
	move.w	#$FFFF,$1E26AE.L
	move.b	(SP)+,$1E2B33.L
	movem.l	(SP)+,D1-D5/A1
	rts

lbC007E60:
	tst.b	$1E2AF6.L
	beq.w	lbC007C46
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC007C46
	divu.w	#11,D0
	moveq	#0,D1
	moveq	#0,D2
	move.w	D0,D1
	swap	D0
	move.w	D0,D2
	moveq	#0,D3
	moveq	#0,D0
	move.b	(A0),D0
	jsr	lbC006F64(PC)
	cmpi.b	#$4F,D0
	bne.w	lbC007E10
	bsr.w	lbC006F44
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC007C46
	move.l	D0,D3
	bra.w	lbC007E10

	lea	Cartrigecolor.MSG(PC),A0
	jsr	lbC0035CE(PC)
	move.w	#$5A,$1E2970.L
	move.w	#$FFF,$1E2972.L
	jsr	$1B06CA.L
	rts

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC007EFA
	move.w	D0,D1
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC007EFA
	move.w	D1,$1E2970.L
	move.w	D0,$1E2972.L
lbC007EFA:
	moveq	#3,D1
	lea	Cartrigecolor.MSG0(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E2970.L,D0
	bsr.w	lbC0066BE
	lea	pen.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E2972.L,D0
	bsr.w	lbC0066BE
	bra.w	lbC0087F0

Cartrigecolor.MSG:
	dc.b	'Cartrige colors are restored - back: $aaa  p'
	dc.b	'en: $000',$D,0
Cartrigecolor.MSG0:
	dc.b	'Cartrige colors - back: $',0
pen.MSG:
	dc.b	'  pen: $',0,0

lbC007F7E:
	subq.l	#1,A0
	addq.w	#1,D7
	rts

	bsr.w	lbC007F9C
	bra.w	lbC0087F0

	bsr.w	lbC008304
	bra.w	lbC0087F0

	bsr.w	lbC00800A
	bra.w	lbC0087F0

lbC007F9C:
	bsr.w	lbC003574
	tst.w	D0
	beq.w	lbC0087CE
	move.w	D0,-(SP)
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D2
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	move.l	D2,-(SP)
	st	$1E2946.L
	move.w	#$817,D0
	lea	$1DF082.L,A1
lbC007FDA:
	clr.l	(A1)+
	dbra	D0,lbC007FDA
	move.l	(SP)+,$1E26C0.L
	move.w	(SP)+,D0
	move.b	D0,$1E284C.L
	st	$1E26BE.L
	move.l	#$1DF082,$1E26C4.L
	lea	Firsttrainpas.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC00803E

lbC00800A:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0082F4
	tst.b	$1E26BE.L
	beq.w	lbC008164
	move.b	$1E284C.L,D5
	cmp.b	D0,D5
	beq.w	lbC008126
	move.b	D0,$1E284C.L
	tst.b	$1E2946.L
	beq.w	lbC00816C
lbC00803E:
	bsr.w	lbC006FF0
	sf	$1E2946.L
	movea.l	$1E26C0.L,A0
	move.b	$1E284C.L,D3
	movea.l	$1E26C4.L,A4
	move.l	$1E2978.L,D6
	bne.w	lbC008074
	move.l	$1E2BC8.L,D6
	bne.w	lbC008074
	move.l	$1E2974.L,D6
lbC008074:
	move.l	#$1E1462,D5
	move.l	$1E2974.L,D7
	cmpa.l	$1E2974.L,A0
	bcs.w	lbC0080BE
	tst.l	$1E2BC8.L
	beq.w	lbC0080A4
	move.l	$1E2BC8.L,D7
	cmpa.l	$1E2BC8.L,A0
	bcs.w	lbC0080BE
lbC0080A4:
	tst.l	$1E2978.L
	beq.w	lbC00811A
	move.l	$1E2978.L,D7
	cmpa.l	$1E2978.L,A0
	beq.w	lbC00811A
lbC0080BE:
	bsr.w	lbC0040BA
	cmp.b	D0,D3
	bne.w	lbC0080D2
	move.l	A0,(A4)+
	addq.w	#1,A0
	cmpa.l	D5,A4
	bne.s	lbC0080D4
	bra.s	lbC00811A

lbC0080D2:
	addq.w	#1,A0
lbC0080D4:
	tst.b	$1E26A1.L
	bne.w	lbC008152
	cmpa.l	D7,A0
	bcs.s	lbC0080BE
	cmp.l	D6,D7
	beq.s	lbC00811A
	cmp.l	$1E2974.L,D7
	bne.w	lbC00810C
	movea.l	$1E2BC4.L,A0
	move.l	$1E2BC8.L,D7
	bne.s	lbC0080BE
	move.l	$1E2978.L,D7
	movea.l	#$C00000,A0
	bra.s	lbC0080BE

lbC00810C:
	movea.l	#$C00000,A0
	move.l	$1E2978.L,D7
	bra.s	lbC0080BE

lbC00811A:
	move.l	A0,$1E26C0.L
	move.l	A4,$1E26C4.L
lbC008126:
	tst.b	$1E26BE.L
	beq.s	lbC008162
	lea	Searchedupto.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	$1E26C0.L,D0
	bsr.w	lbC001B42
	bsr.w	lbC006FF0
	cmpi.l	#$1DF082,$1E26C4.L
	bne.w	lbC00815A
lbC008152:
	lea	Trainermakerw.MSG(PC),A0
	bra.w	lbC0035CE

lbC00815A:
	lea	Trainmodeacti.MSG(PC),A0
	bra.w	lbC0035CE

lbC008162:
	rts

lbC008164:
	lea	Starttrainerw.MSG(PC),A0
	bra.w	lbC0035CE

lbC00816C:
	bsr.w	lbC008174
	bra.w	lbC00803E

lbC008174:
	sf	D4
	lea	$1DF082.L,A1
	movea.l	$1E26C4.L,A2
lbC008182:
	cmpa.l	A1,A2
	beq.w	lbC00819C
	movea.l	(A1)+,A0
	bsr.w	lbC0040BA
	cmp.b	$1E284C.L,D0
	beq.s	lbC008182
	clr.l	-4(A1)
	bra.s	lbC008182

lbC00819C:
	lea	$1DF082.L,A1
	movea.l	A1,A2
lbC0081A4:
	movea.l	A2,A0
	cmpa.l	$1E26C4.L,A0
	beq.w	lbC0081C2
	tst.l	(A2)
	beq.w	lbC0081BE
	move.l	(A2),D0
	bset	#$1F,D0
	move.l	D0,(A1)+
lbC0081BE:
	addq.w	#4,A2
	bra.s	lbC0081A4

lbC0081C2:
	move.l	A1,$1E26C4.L
	lea	$1DF082.L,A1
lbC0081CE:
	cmpa.l	$1E26C4.L,A1
	beq.w	lbC0081FE
	move.l	(A1)+,D3
	bclr	#$1F,D3
	beq.s	lbC0081CE
	tst.b	D4
	bne.w	lbC0081F0
	st	D4
	lea	Possibleaddre.MSG(PC),A0
	bsr.w	lbC0035CE
lbC0081F0:
	move.l	D3,D0
	bsr.w	lbC001B42
	moveq	#2,D0
	bsr.w	lbC006FD4
	bra.s	lbC0081CE

lbC0081FE:
	tst.b	D4
	bne.w	lbC00820C
	lea	Nothingfound.MSG(PC),A0
	bra.w	lbC0035CE

lbC00820C:
	rts

Starttrainerw.MSG:
	dc.b	'Start trainer with ts-command',$D,0
Possibleaddre.MSG:
	dc.b	'Possible addresses: ',$D,0
Nothingfound.MSG:
	dc.b	'Nothing found!',$D,0
Searchedupto.MSG:
	dc.b	'Searched up to: ',0
Trainmodeacti.MSG:
	dc.b	'Trainmode active!',$D,0
Firsttrainpas.MSG:
	dc.b	'First trainpass!',$D
	dc.b	'Change the countvalue next time!',$D,0
Trainermakerw.MSG:
	dc.b	'Trainermaker was not successful!',$D
	dc.b	'Start new train (TS) or exit train (TX)',$D,0

lbC0082F4:
	tst.b	$1E26BE.L
	beq.w	lbC008302
	bra.w	lbC008174

lbC008302:
	rts

lbC008304:
	move.l	A0,-(SP)
	tst.b	$1E26BE.L
	beq.s	lbC008320
	sf	$1E26BE.L
	bsr.w	lbC006FF0
	lea	Trainmodeinac.MSG(PC),A0
	bsr.w	lbC0035CE
lbC008320:
	movea.l	(SP)+,A0
	rts

Trainmodeinac.MSG:
	dc.b	'Trainmode inactive!',$D,0
	dc.b	0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	bclr	#0,D0
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	lea	$1E284E.L,A3
	moveq	#4,D3
lbC008364:
	tst.l	(A3)+
	beq.s	lbC008384
	cmp.l	-4(A3),D0
	beq.w	lbC008384
	lea	2(A3),A3
	dbra	D3,lbC008364
	lea	Toomanybreakp.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC0087F0

lbC008384:
	move.l	D0,-4(A3)
	lea	Breakpointins.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC0087F0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D3
	lea	$1E284E.L,A3
	moveq	#4,D2
lbC0083AC:
	move.l	(A3)+,D1
	lea	2(A3),A3
	cmp.l	D3,D1
	beq.s	lbC0083E2
	dbra	D2,lbC0083AC
	lea	Breakpointnot.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC0087F0

	moveq	#4,D0
	lea	$1E284E.L,A0
lbC0083CE:
	clr.l	(A0)+
	addq.w	#2,A0
	dbra	D0,lbC0083CE
	lea	Allbreakpoint.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC0087F0

lbC0083E2:
	clr.l	-6(A3)
	lea	Breakpointdel.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC0087F0

	lea	Breakpointsat.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#4,D3
	lea	$1E284E.L,A2
lbC008402:
	move.l	(A2)+,D0
	lea	2(A2),A2
	tst.l	D0
	beq.s	lbC008418
	bsr.w	lbC001B42
	move.w	#2,D0
	bsr.w	lbC006FD4
lbC008418:
	dbra	D3,lbC008402
	bra.w	lbC0087F0

Breakpointsat.MSG:
	dc.b	'Breakpoints at addresses:  ',0
Breakpointnot.MSG:
	dc.b	'Breakpoint not found!',$D,0
Toomanybreakp.MSG:
	dc.b	'Too many breakpoints!',$D,0
Breakpointdel.MSG:
	dc.b	'Breakpoint deleted   ',$D,0
Breakpointins.MSG:
	dc.b	'Breakpoint inserted  ',$D,0
Allbreakpoint.MSG:
	dc.b	'All breakpoints deleted!',$D,0

lbC0084B2:
	lea	$1E284E.L,A3
	moveq	#4,D3
lbC0084BA:
	tst.l	(A3)+
	bne.s	lbC0084C8
	lea	2(A3),A3
lbC0084C2:
	dbra	D3,lbC0084BA
	rts

lbC0084C8:
	move.l	-4(A3),D0
	bclr	#0,D0
	exg	D0,A0
	move.w	(A3)+,D1
	bsr.w	lbC005CDE
	andi.w	#$FFF0,D0
	cmpi.w	#$4E40,D0
	bne.s	lbC0084C2
	move.l	D1,D0
	bsr.w	lbC005CF6
	bra.s	lbC0084C2

lbC0084EA:
	move.w	$1E286C.L,D0
	lsl.w	#2,D0
	lea	$80.w,A0
	cmpi.l	#$40,0(A0,D0.W)
	beq.s	lbC008508
	move.l	0(A0,D0.W),$1E286E.L
lbC008508:
	lea	$1E284E.L,A3
	moveq	#4,D3
	sf	$1E2834.L
lbC008516:
	move.l	$1E2648.L,D0
	cmp.l	(A3)+,D0
	beq.s	lbC008526
	subq.l	#4,A3
	tst.l	(A3)+
	bne.s	lbC008586
lbC008526:
	lea	2(A3),A3
lbC00852A:
	dbra	D3,lbC008516
	tst.b	$1E2834.L
	bne.s	lbC008552
	move.w	$1E286C.L,D0
	lsl.w	#2,D0
	lea	$80.w,A0
	move.l	$1E286E.L,0(A0,D0.W)
	sf	$1E297E.L
	rts

lbC008552:
	move.w	$1E286C.L,D0
	lea	$80.w,A0
	lsl.w	#2,D0
	move.l	#$40,0(A0,D0.W)
	move.l	#$46,$BC.w
	move.l	#$4E714E71,$40.w
	move.l	#$4E4F4E73,$44.w
	st	$1E297E.L
	rts

lbC008586:
	st	$1E2834.L
	move.l	-4(A3),D0
	bclr	#0,D0
	exg	D0,A0
	bsr.w	lbC005CDE
	move.w	D0,(A3)+
	move.w	$1E286C.L,D0
	andi.w	#15,D0
	ori.w	#$4E40,D0
	bsr.w	lbC005CF6
	bra.w	lbC00852A

lbC0085B2:
	bsr.w	lbC00AED2
	beq.w	lbC008600
	move.l	4.W,D0
	bclr	#0,D0
	exg	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC008600
	move.l	4.W,D0
	bclr	#0,D0
	exg	D0,A1
	move.l	$2A(A1),D0
	bne.s	lbC008602
	move.l	$2E(A1),D0
	bne.s	lbC008602
	move.l	$32(A1),D0
	bne.s	lbC008602
	move.l	$222(A1),D0
	bne.s	lbC008602
	move.l	$226(A1),D0
	bne.s	lbC008602
	move.l	$22A(A1),D0
	bne.s	lbC008602
lbC008600:
	moveq	#0,D0
lbC008602:
	rts

lbC008604:
	moveq	#4,D1
	lea	$1E284E.L,A0
lbC00860C:
	move.l	(A0)+,D2
	lea	2(A0),A0
	cmp.l	$1E2648.L,D2
	beq.s	lbC00865C
	dbra	D1,lbC00860C
	move.w	$1E286C.L,D0
	lea	$80.w,A0
	lsl.w	#2,D0
	move.l	$1E286E.L,0(A0,D0.W)
	addq.w	#1,$1E286C.L
	andi.w	#15,$1E286C.L
	move.w	$1E286C.L,D0
	lsl.w	#2,D0
	move.l	0(A0,D0.W),$1E286E.L
	move.l	#$40,0(A0,D0.W)
	moveq	#0,D0
	rts

lbC00865C:
	moveq	#-1,D0
	rts

	movem.l	D0/A1,-(SP)
	moveq	#0,D0
lbC008666:
	bsr.w	lbC0033D2
	move.w	(A1),(A0)+
	addq.w	#2,D0
	cmpi.w	#$1C0,D0
	bne.s	lbC008666
	movem.l	(SP)+,D0/A1
	rts

	movem.l	D0/A1/A2,-(SP)
	lea	$20(A0),A0
	lea	lbW0086A8(PC),A2
	moveq	#$20,D0
lbC008688:
	cmp.w	(A2),D0
	bne.s	lbC008692
	addq.w	#2,A2
	addq.w	#2,A0
	bra.s	lbC008698

lbC008692:
	bsr.w	lbC0033F4
	move.w	(A0)+,(A1)
lbC008698:
	addq.w	#2,D0
	cmpi.w	#$1BE,D0
	bne.s	lbC008688
	addq.w	#2,A0
	movem.l	(SP)+,D0/A1/A2
	rts

lbW0086A8:
	dc.w	$26
	dc.w	$28
	dc.w	$2A
	dc.w	$2C
	dc.w	$38
	dc.w	$3A
	dc.w	$3C
	dc.w	$3E
	dc.w	$58
	dc.w	$5A
	dc.w	$5C
	dc.w	$5E
	dc.w	$68
	dc.w	$6A
	dc.w	$6C
	dc.w	$6E
	dc.w	$76
	dc.w	$78
	dc.w	$7A
	dc.w	$7C
	dc.w	$88
	dc.w	$8A
	dc.w	$AC
	dc.w	$AE
	dc.w	$BC
	dc.w	$BE
	dc.w	$CC
	dc.w	$CE
	dc.w	$DC
	dc.w	$DE
	dc.w	$F8
	dc.w	$FA
	dc.w	$FC
	dc.w	$FE
	dc.w	$106
	dc.w	$10C
	dc.w	$10E
	dc.w	$11C
	dc.w	$11E
	dc.w	$FFFF

lbC0086F8:
	movem.l	D1-D3,-(SP)
	tst.l	D0
	beq.s	lbC008720
	clr.l	D3
	clr.l	D2
lbC008704:
	moveq	#10,D1
	bsr.w	lbC00A5A6
	or.b	D1,D3
	ror.l	#4,D3
	addq.l	#1,D2
	tst.l	D0
	bne.s	lbC008704
	moveq	#15,D0
	sub.w	D2,D0
lbC008718:
	ror.l	#4,D3
	dbra	D0,lbC008718
	move.l	D3,D0
lbC008720:
	movem.l	(SP)+,D1-D3
	rts

lbC008726:
	movem.l	D0-D5,-(SP)
	bsr.w	lbC007206
	move.l	D0,D2
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bsr.w	lbC007206
	subq.l	#1,D0
	move.l	D0,D3
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bsr.w	lbC007206
	move.l	D0,D4
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	sub.l	D2,D3
	bmi.w	lbC0087CE
lbC008792:
	tst.b	$1E26A1.L
	bne.s	lbC0087B4
	movea.l	D2,A0
	bsr.w	lbC0040BA
	move.b	D0,D5
	addq.l	#1,D2
	movea.l	D4,A0
	bsr.w	lbC0040BA
	addq.l	#1,D4
	cmp.b	D5,D0
	bne.s	lbC0087BE
lbC0087B0:
	subq.l	#1,D3
	bpl.s	lbC008792
lbC0087B4:
	bsr.w	lbC006FF0
	movem.l	(SP)+,D0-D5
	rts

lbC0087BE:
	move.l	D4,D0
	subq.l	#1,D0
	bsr.w	lbC00A1C4
	moveq	#2,D0
	bsr.w	lbC006FD4
	bra.s	lbC0087B0

lbC0087CE:
	sf	$1E3164.L
	bsr.w	lbC006FF0
	lea	ascii.MSG9(PC),A0
	bsr.w	lbC0035CE
	movea.l	$1E2968.L,SP
	bra.w	lbC001F3A

ascii.MSG9:
	dc.b	'???',$D,0
	dc.b	0

lbC0087F0:
	move.l	A0,-(SP)
	bsr.w	lbC006FF0
	lea	Ready.MSG(PC),A0
	bsr.w	lbC0035CE
	movea.l	(SP)+,A0
	rts

Ready.MSG:
	dc.b	'Ready.',$D,0

	st	$1E2834.L
	bsr.w	lbC00881C
	bra.s	lbC0087F0

lbC008816:
	sf	$1E2834.L
lbC00881C:
	clr.w	$1E314E.L
	clr.w	$1E3150.L
	clr.w	$1E3152.L
	clr.w	$1E295A.L
	clr.w	$1E2962.L
	move.w	#$FFFF,$1E2964.L
	sf	$1E295C.L
	sf	$1E2966.L
	clr.w	D0
	clr.w	D1
	bsr.w	lbC009AFA
	move.w	#$FFFF,$DFF034.L
	tst.b	$1E2834.L
	bne.w	lbC009DE2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	bne.s	lbC008876
	moveq	#1,D0
lbC008876:
	move.w	D0,$1E2816.L
	bsr.w	lbC0062E6
	bsr.w	lbC00D4B2
lbC008884:
	cmpi.b	#$34,$1E278B.L
	bcc.w	lbC0088BA
	cmpi.b	#$D0,$1E278D.L
	bhi.w	lbC0088BA
	addq.b	#8,$1E278B.L
	addq.b	#8,$1E278D.L
	addi.b	#$10,$1E2787.L
	addi.b	#$10,$1E2789.L
	bra.s	lbC008884

lbC0088BA:
	moveq	#0,D0
	move.b	$1E2788.L,D0
	lsl.w	#1,D0
	eori.w	#$100,D0
	move.b	$1E2788.L,D0
	moveq	#0,D1
	move.b	$1E2786.L,D1
	sub.w	D1,D0
	cmpi.w	#$116,D0
	bls.s	lbC0088E2
	move.w	#$116,D0
lbC0088E2:
	cmpi.w	#$7F,D0
	bhi.s	lbC0088FE
	move.b	#$80,$1E2788.L
	move.w	#$80,D1
	sub.w	D0,D1
	move.b	D1,$1E2786.L
	bra.s	lbC008914

lbC0088FE:
	move.b	#$20,$1E2786.L
	move.b	$1E2786.L,D1
	add.w	D0,D1
	move.b	D1,$1E2788.L
lbC008914:
	move.w	D0,$1E2848.L
	bsr.w	lbC00A19E
	st	$1E28AE.L
	moveq	#0,D0
lbC008926:
	clr.w	$1E2940.L
	btst	#6,$BFE001.L
	bne.s	lbC00893E
	move.w	#$67,$1E2940.L
lbC00893E:
	btst	#2,$DFF016.L
	bne.s	lbC008950
	move.w	#$65,$1E2940.L
lbC008950:
	cmpi.w	#$67,$1E2940.L
	bne.s	lbC00899C
	addq.l	#1,D0
	cmpi.w	#2,$1E2844.L
	bls.s	lbC00899C
	move.w	#0,$1E2844.L
	cmpi.b	#$80,$1E2788.L
	bne.s	lbC008990
	cmpi.b	#$7F,$1E2786.L
	beq.s	lbC00899C
	subq.w	#1,$1E2848.L
	addq.b	#1,$1E2786.L
	bra.s	lbC00899C

lbC008990:
	subq.w	#1,$1E2848.L
	subq.b	#1,$1E2788.L
lbC00899C:
	cmpi.w	#$65,$1E2940.L
	bne.s	lbC0089E6
	cmpi.w	#2,$1E2844.L
	bls.s	lbC0089E6
	move.w	#0,$1E2844.L
	cmpi.b	#$20,$1E2786.L
	beq.s	lbC0089D0
	subq.b	#1,$1E2786.L
	addq.w	#1,$1E2848.L
	bra.s	lbC0089E6

lbC0089D0:
	cmpi.b	#$36,$1E2788.L
	beq.s	lbC0089E6
	addq.b	#1,$1E2788.L
	addq.w	#1,$1E2848.L
lbC0089E6:
	bsr.w	lbC0018A6
	move.w	$1E269E.L,D0
	jsr	lbC006F64(PC)
	beq.w	lbC009A18
	cmpi.w	#$31,D0
	beq.w	lbC009402
	cmpi.w	#$32,D0
	beq.w	lbC009424
	cmpi.w	#$33,D0
	beq.w	lbC009446
	cmpi.w	#$34,D0
	beq.w	lbC009468
	cmpi.w	#$35,D0
	beq.w	lbC00948A
	cmpi.w	#$36,D0
	beq.w	lbC0094AC
	cmpi.w	#$37,D0
	beq.w	lbC008C26
	cmpi.w	#$38,D0
	beq.w	lbC008C6E
	cmpi.w	#$39,D0
	beq.w	lbC008CB6
	cmpi.w	#$43,D0
	beq.w	lbC008CFE
	cmpi.w	#$58,D0
	beq.w	lbC008D18
	cmpi.w	#$2B,D0
	beq.w	lbC0094EE
	cmpi.w	#$2D,D0
	beq.w	lbC00955C
	cmpi.w	#$3D,D0
	beq.w	lbC0095C8
	cmpi.w	#$4D,D0
	beq.w	lbC009618
	cmpi.w	#$4E,D0
	beq.w	lbC009630
	cmpi.w	#$4F,D0
	beq.w	lbC009648
	cmpi.w	#$50,D0
	beq.w	lbC00966C
	cmpi.w	#$51,D0
	beq.w	lbC009690
	cmpi.w	#$4C,D0
	beq.w	lbC0096A8
	cmpi.w	#$48,D0
	beq.w	lbC0096CE
	cmpi.w	#$47,D0
	beq.w	lbC008B70
	cmpi.w	#$41,D0
	beq.w	lbC009364
	cmpi.w	#$44,D0
	beq.w	lbC00933A
	cmpi.w	#$53,D0
	beq.w	lbC0092FA
	cmpi.w	#$45,D0
	beq.w	lbC009314
	cmpi.w	#$46,D0
	beq.w	lbC00980E
	cmpi.w	#$3C,D0
	beq.w	lbC0093B6
	cmpi.w	#$3E,D0
	beq.w	lbC0093DC
	cmpi.w	#$49,D0
	beq.w	lbC0092E0
	cmpi.w	#$42,D0
	beq.w	lbC00923E
	cmpi.w	#$57,D0
	beq.w	lbC008C0A
	cmpi.w	#$59,D0
	beq.w	lbC008BF4
	cmpi.w	#$52,D0
	beq.w	lbC008C02
	cmpi.w	#$30,D0
	beq.w	lbC0094CE
	cmpi.w	#$80,D0
	beq.w	lbC009780
	cmpi.w	#$81,D0
	beq.w	lbC009876
	cmpi.w	#$82,D0
	beq.w	lbC0096F0
	cmpi.w	#$83,D0
	beq.w	lbC009720
	cmpi.w	#$84,D0
	beq.w	lbC0090B8
	cmpi.w	#$85,D0
	beq.w	lbC008D5A
	cmpi.w	#$8A,D0
	beq.w	lbC009176
	cmpi.w	#$8B,D0
	beq.w	lbC0090D8
	cmpi.w	#$8C,D0
	bne.s	lbC008B64
	addq.w	#1,$1E2816.L
	bsr.w	lbC006448
	bra.w	lbC008D7E

lbC008B64:
	cmpi.w	#$93,D0
	beq.w	lbC0090F8
	bra.w	lbC009A18

lbC008B70:
	tst.b	$1E26A0.L
	bne.w	lbC008BD0
	bset	#2,$1E27A7.L
	moveq	#0,D0
	move.w	$1E278C.L,D0
	sub.w	$1E278A.L,D0
	addq.w	#7,D0
	andi.w	#$FFF8,D0
	addq.w	#8,D0
	lsr.w	#1,D0
	btst	#7,$1E27A6.L
	bne.w	lbC008BA8
	lsr.w	#1,D0
lbC008BA8:
	lea	$1E2818.L,A0
	lea	$1E278E.L,A1
	moveq	#5,D1
lbC008BB6:
	move.l	(A1)+,D2
	add.l	D0,D2
	move.l	D2,(A0)+
	dbra	D1,lbC008BB6
	move.w	D0,$1E27AE.L
	move.w	D0,$1E27B0.L
	bra.w	lbC008BE4

lbC008BD0:
	bclr	#2,$1E27A7.L
	clr.w	$1E27AE.L
	clr.w	$1E27B0.L
lbC008BE4:
	jsr	$1B0D6E.L
	jsr	$1B0E38.L
	bra.w	lbC009A18

lbC008BF4:
	not.b	$1E2966.L
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC008C02:
	bsr.w	lbC009750
	bra.w	lbC009A18

lbC008C0A:
	move.w	#$FFFF,$1E2964.L
	tst.b	$1E26A0.L
	beq.w	lbC009A18
	clr.w	$1E2964.L
	bra.w	lbC009A18

lbC008C26:
	lea	$1E27D4.L,A0
	move.w	$1E2962.L,D1
	add.w	D1,D1
	move.w	0(A0,D1.W),D0
	andi.w	#$FFF,D0
	move.w	D0,D2
	addi.w	#$100,D2
	tst.b	$1E26A0.L
	beq.w	lbC008C50
	subi.w	#$200,D2
lbC008C50:
	andi.w	#$F00,D2
	andi.w	#$FF,D0
	or.w	D2,D0
	andi.w	#$FFF,D0
	move.w	D0,0(A0,D1.W)
	bsr.w	lbC009036
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC008C6E:
	lea	$1E27D4.L,A0
	move.w	$1E2962.L,D1
	add.w	D1,D1
	move.w	0(A0,D1.W),D0
	andi.w	#$FFF,D0
	move.w	D0,D2
	addi.w	#$10,D2
	tst.b	$1E26A0.L
	beq.w	lbC008C98
	subi.w	#$20,D2
lbC008C98:
	andi.w	#$F0,D2
	andi.w	#$F0F,D0
	or.w	D2,D0
	andi.w	#$FFF,D0
	move.w	D0,0(A0,D1.W)
	bsr.w	lbC009036
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC008CB6:
	lea	$1E27D4.L,A0
	move.w	$1E2962.L,D1
	add.w	D1,D1
	move.w	0(A0,D1.W),D0
	andi.w	#$FFF,D0
	move.w	D0,D2
	addi.w	#1,D2
	tst.b	$1E26A0.L
	beq.w	lbC008CE0
	subi.w	#2,D2
lbC008CE0:
	andi.w	#15,D2
	andi.w	#$FF0,D0
	or.w	D2,D0
	andi.w	#$FFF,D0
	move.w	D0,0(A0,D1.W)
	bsr.w	lbC009036
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC008CFE:
	addq.w	#1,$1E2962.L
	andi.w	#$1F,$1E2962.L
	bsr.w	lbC009918
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC008D18:
	subq.w	#1,$1E2962.L
	andi.w	#$1F,$1E2962.L
	bsr.w	lbC009918
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC008D32:
	lea	$DFF000.L,A0
	clr.l	$144(A0)
	clr.l	$14C(A0)
	clr.l	$154(A0)
	clr.l	$15C(A0)
	clr.l	$164(A0)
	clr.l	$16C(A0)
	clr.l	$174(A0)
	clr.l	$17C(A0)
	rts

lbC008D5A:
	tst.b	$1E26BE.L
	bne.w	lbC009A18
	tst.b	$1E295C.L
	bne.w	lbC009A18
	lea	$1E3200.L,A0
	move.w	#$200,D0
lbC008D78:
	clr.l	(A0)+
	dbra	D0,lbC008D78
lbC008D7E:
	st	$1E295C.L
	lea	MODEHIRES2000.MSG(PC),A0
	moveq	#0,D0
	moveq	#0,D1
	bsr.w	lbC009AFA
	bsr.w	lbC009B4A
	move.w	#$17,$1E295E.L
	move.w	#6,$1E2960.L
	moveq	#7,D1
	move.l	$1E3156.L,D0
	bsr.w	lbC009BF4
	move.w	#$11,$1E295E.L
	move.w	#7,$1E2960.L
	moveq	#2,D1
	moveq	#0,D0
	move.w	$1E314E.L,D0
	andi.w	#$FF,D0
	bsr.w	lbC009BF4
	move.w	#$1C,$1E295E.L
	move.w	#7,$1E2960.L
	moveq	#4,D1
	moveq	#0,D0
	move.w	$1E3150.L,D0
	bsr.w	lbC009BF4
	bsr.w	lbC008E14
	bsr.w	lbC00900A
	bsr.w	lbC008F24
	bsr.w	lbC008F5E
	bsr.w	lbC008E94
	bsr.w	lbC008F96
	bsr.w	lbC008FE0
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC008E14:
	movem.l	D0-D4/A0,-(SP)
	tst.b	$1E295C.L
	beq.w	lbC008E8E
	moveq	#1,D3
	move.w	$1E27A6.L,D4
	andi.w	#$7000,D4
	beq.w	lbC008E8E
	rol.w	#4,D4
	move.w	D4,D2
	subq.w	#1,D2
	lea	$1E278E.L,A0
	clr.w	$1E2960.L
	moveq	#7,D1
lbC008E46:
	move.w	#2,$1E295E.L
	move.l	(A0)+,D0
	bsr.w	lbC009BF4
	btst	D3,$1E295A.L
	beq.w	lbC008E72
	move.w	#2,$1E295E.L
	move.w	#$15,D0
	bsr.w	lbC009B8A
	bra.w	lbC008E82

lbC008E72:
	move.w	#2,$1E295E.L
	move.w	#$27,D0
	bsr.w	lbC009B8A
lbC008E82:
	addq.w	#1,$1E2960.L
	addq.w	#1,D3
	dbra	D2,lbC008E46
lbC008E8E:
	movem.l	(SP)+,D0-D4/A0
	rts

lbC008E94:
	movem.l	D0/A0,-(SP)
	clr.w	$1E2960.L
	move.w	#$10,$1E295E.L
	move.w	$1E27A6.L,D0
	btst	#15,D0
	bne.w	lbC008ED8
	btst	#11,D0
	bne.w	lbC008EE0
	btst	#10,D0
	bne.w	lbC008EE8
	andi.w	#$7000,D0
	cmpi.w	#$6000,D0
	beq.w	lbC008EF0
	lea	LORES.MSG(PC),A0
	bra.w	lbC008EF8

lbC008ED8:
	lea	HIRES.MSG(PC),A0
	bra.w	lbC008EF8

lbC008EE0:
	lea	HAM.MSG(PC),A0
	bra.w	lbC008EF8

lbC008EE8:
	lea	DUALPF.MSG(PC),A0
	bra.w	lbC008EF8

lbC008EF0:
	lea	HALFBR.MSG(PC),A0
	bra.w	lbC008EF8

lbC008EF8:
	bsr.w	lbC009B4A
	move.w	#$17,$1E295E.L
	lea	ascii.MSG10(PC),A0
	btst	#2,$1E27A7.L
	beq.w	lbC008F18
	lea	LACE.MSG(PC),A0
lbC008F18:
	jsr	$1B1A24.L
	movem.l	(SP)+,D0/A0
	rts

lbC008F24:
	movem.l	D0/D1,-(SP)
	moveq	#4,D1
	move.w	#1,$1E2960.L
	move.w	#$17,$1E295E.L
	moveq	#4,D1
	move.w	$1E278A.L,D0
	bsr.w	lbC009BF4
	move.w	#$1C,$1E295E.L
	move.w	$1E278C.L,D0
	bsr.w	lbC009BF4
	movem.l	(SP)+,D0/D1
	rts

lbC008F5E:
	movem.l	D0/D1,-(SP)
	moveq	#4,D1
	move.w	#2,$1E2960.L
	move.w	#$12,$1E295E.L
	move.w	$1E27AE.L,D0
	bsr.w	lbC009BF4
	move.w	#$17,$1E295E.L
	move.w	$1E27B0.L,D0
	bsr.w	lbC009BF4
	movem.l	(SP)+,D0/D1
	rts

lbC008F96:
	movem.l	D0-D3,-(SP)
	moveq	#4,D1
	move.w	#$17,$1E295E.L
	move.w	#3,$1E2960.L
	moveq	#0,D2
	moveq	#0,D3
	move.b	$1E2789.L,D2
	move.b	$1E2787.L,D3
	sub.w	D3,D2
	addi.w	#$100,D2
	move.w	D2,D0
	btst	#7,$1E27A6.L
	beq.w	lbC008FD2
	add.w	D0,D0
lbC008FD2:
	bsr.w	lbC0086F8
	bsr.w	lbC009BF4
	movem.l	(SP)+,D0-D3
	rts

lbC008FE0:
	movem.l	D0/D1,-(SP)
	moveq	#4,D1
	move.w	#$1C,$1E295E.L
	move.w	#3,$1E2960.L
	move.w	$1E2848.L,D0
	bsr.w	lbC0086F8
	bsr.w	lbC009BF4
	movem.l	(SP)+,D0/D1
	rts

lbC00900A:
	movem.l	D0/D1,-(SP)
	moveq	#4,D1
	move.w	#$17,$1E295E.L
	move.w	#5,$1E2960.L
	move.w	$1E27A6.L,D0
	andi.w	#$7000,D0
	rol.w	#4,D0
	bsr.w	lbC009BF4
	movem.l	(SP)+,D0/D1
	rts

lbC009036:
	movem.w	D0/D1/A0,-(SP)
	moveq	#0,D0
	moveq	#4,D1
	move.w	#$17,$1E295E.L
	move.w	#4,$1E2960.L
	move.w	$1E2962.L,D0
	bsr.w	lbC0086F8
	bsr.w	lbC009BF4
	move.w	#$1C,$1E295E.L
	move.w	$1E2962.L,D0
	add.w	D0,D0
	lea	$1E27D4.L,A0
	move.w	0(A0,D0.W),D0
	andi.w	#$FFF,D0
	bsr.w	lbC009BF4
	movem.w	(SP)+,D0/D1/A0
	rts

HIRES.MSG:
	dc.b	'HIRES  ',0
LORES.MSG:
	dc.b	'LORES  ',0
HAM.MSG:
	dc.b	'HAM    ',0
HALFBR.MSG:
	dc.b	'HALF BR',0
DUALPF.MSG:
	dc.b	'DUAL PF',0
LACE.MSG:
	dc.b	' LACE',0
ascii.MSG10:
	dc.b	'     ',0

lbC0090B8:
	tst.b	$1E295C.L
	beq.w	lbC009A18
	sf	$1E295C.L
	move.w	#$20,$DFF096.L
	bsr.w	lbC008D32
	bra.w	lbC009A18

lbC0090D8:
	lea	$1E27D4.L,A0
	moveq	#$1F,D0
lbC0090E0:
	move.w	$DFF006.L,D1
	move.w	D1,(A0)+
lbC0090E8:
	dbra	D1,lbC0090E8
	dbra	D0,lbC0090E0
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC0090F8:
	lea	$1E27D4.L,A0
	lea	$DFF184.L,A1
	move.l	(A0)+,$1E2658.L
	moveq	#14,D0
lbC00910C:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC00910C
	move.w	$1E27A6.L,D0
	andi.w	#$FE14,D0
	move.w	D0,$1E264E.L
	move.w	$1E27A8.L,$1E2650.L
	move.w	$1E27AA.L,$1E2652.L
	move.w	$1E27AE.L,$1E2654.L
	move.w	$1E27B0.L,$1E2656.L
	move.w	$1E2786.L,$1E265C.L
	move.w	$1E2788.L,$1E265E.L
	move.w	$1E278A.L,$1E2660.L
	move.w	$1E278C.L,$1E2662.L
	bra.w	lbC009A18

lbC009176:
	lea	$1E27D4.L,A0
	move.w	$1E27A6.L,D0
	andi.w	#$7000,D0
	cmpi.w	#$1000,D0
	beq.w	lbC0091A6
	cmpi.w	#$2000,D0
	beq.w	lbC0091B4
	cmpi.w	#$3000,D0
	beq.w	lbC0091CA
	cmpi.w	#$4000,D0
	beq.w	lbC0091EA
lbC0091A6:
	clr.w	(A0)+
	move.w	#$FFF,(A0)+
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC0091B4:
	clr.w	(A0)+
	move.w	#$F00,(A0)+
	move.w	#$F0,(A0)+
	move.w	#15,(A0)+
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC0091CA:
	move.l	#15,(A0)+
	move.l	#$F000FF,(A0)+
	move.l	#$F000F0F,(A0)+
	move.l	#$FF00FFF,(A0)+
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC0091EA:
	move.l	#8,(A0)+
	move.l	#$F0080,(A0)+
	move.l	#$F000F8,(A0)+
	move.l	#$FF0800,(A0)+
	move.l	#$F000F08,(A0)+
	move.l	#$F0F0F80,(A0)+
	move.l	#$FF00F88,(A0)+
	move.l	#$FFF0FF8,(A0)+
	bsr.w	lbC009036
	bra.w	lbC009A18

	moveq	#15,D0
	moveq	#0,D1
lbC009226:
	move.w	D1,(A0)+
	addi.w	#$10,D1
	move.w	D1,(A0)+
	addi.w	#$101,D1
	dbra	D0,lbC009226
	bsr.w	lbC009036
	bra.w	lbC009A18

lbC00923E:
	lea	$1E27D4.L,A0
	moveq	#$1F,D0
	tst.b	$1E26A0.L
	beq.w	lbC009292
lbC009250:
	moveq	#0,D2
	move.w	(A0),D1
	andi.w	#$F00,D1
	beq.w	lbC009262
	subi.w	#$100,D1
	or.w	D1,D2
lbC009262:
	move.w	(A0),D1
	andi.w	#$F0,D1
	beq.w	lbC009272
	subi.w	#$10,D1
	or.w	D1,D2
lbC009272:
	move.w	(A0),D1
	andi.w	#15,D1
	beq.w	lbC009280
	subq.w	#1,D1
	or.w	D1,D2
lbC009280:
	move.w	D2,(A0)+
	dbra	D0,lbC009250
	bsr.w	lbC009036
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC009292:
	moveq	#0,D2
	move.w	(A0),D1
	andi.w	#$F00,D1
	cmpi.w	#$F00,D1
	beq.w	lbC0092A6
	addi.w	#$100,D1
lbC0092A6:
	or.w	D1,D2
	move.w	(A0),D1
	andi.w	#$F0,D1
	cmpi.w	#$F0,D1
	beq.w	lbC0092BA
	addi.w	#$10,D1
lbC0092BA:
	or.w	D1,D2
	move.w	(A0),D1
	andi.w	#15,D1
	cmpi.w	#15,D1
	beq.w	lbC0092CC
	addq.w	#1,D1
lbC0092CC:
	or.w	D1,D2
	move.w	D2,(A0)+
	dbra	D0,lbC009292
	bsr.w	lbC009036
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC0092E0:
	lea	$1E27D4.L,A0
	moveq	#$1F,D0
lbC0092E8:
	not.w	(A0)+
	dbra	D0,lbC0092E8
	bsr.w	lbC009036
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC0092FA:
	subq.b	#1,$1E2787.L
	tst.b	$1E26A0.L
	beq.w	lbC00932A
	addq.b	#2,$1E2787.L
	bra.w	lbC00932A

lbC009314:
	addq.b	#1,$1E2789.L
	tst.b	$1E26A0.L
	beq.w	lbC00932A
	subq.b	#2,$1E2789.L
lbC00932A:
	bsr.w	lbC00992C
	bsr.w	lbC008F24
	bsr.w	lbC008F96
	bra.w	lbC009A18

lbC00933A:
	andi.w	#$FBFF,$1E27A6.L
	ori.w	#$400,$1E27A6.L
	tst.b	$1E26A0.L
	beq.w	lbC00935C
	bclr	#2,$1E27A6.L
lbC00935C:
	bsr.w	lbC008E94
	bra.w	lbC009A18

lbC009364:
	moveq	#0,D0
	move.b	$1E2789.L,D0
	sub.b	$1E2787.L,D0
	addi.w	#$100,D0
	btst	#7,$1E27A6.L
	beq.w	lbC009384
	add.w	D0,D0
lbC009384:
	lsr.w	#3,D0
	mulu.w	$1E2848.L,D0
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#4,D1
	move.l	D3,-(SP)
	move.l	(A0)+,D2
	move.l	(A2)+,D3
lbC0093A0:
	add.l	D0,D2
	add.l	D0,D3
	move.l	D2,(A0)+
	move.l	D3,(A2)+
	dbra	D1,lbC0093A0
	move.l	(SP)+,D3
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC0093B6:
	tst.b	$1E27A9.L
	beq.w	lbC0093CC
	subi.b	#$11,$1E27A9.L
	bra.w	lbC0093D4

lbC0093CC:
	move.b	#$FF,$1E27A9.L
lbC0093D4:
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC0093DC:
	cmpi.b	#$FF,$1E27A9.L
	beq.w	lbC0093F4
	addi.b	#$11,$1E27A9.L
	bra.w	lbC0093FA

lbC0093F4:
	clr.b	$1E27A9.L
lbC0093FA:
	bsr.w	lbC009918
	bra.w	lbC009A18

lbC009402:
	bset	#1,$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC00941C
	bclr	#1,$1E295A.L
lbC00941C:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009424:
	bset	#2,$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC00943E
	bclr	#2,$1E295A.L
lbC00943E:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009446:
	bset	#3,$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC009460
	bclr	#3,$1E295A.L
lbC009460:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009468:
	bset	#4,$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC009482
	bclr	#4,$1E295A.L
lbC009482:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC00948A:
	bset	#5,$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC0094A4
	bclr	#5,$1E295A.L
lbC0094A4:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC0094AC:
	bset	#6,$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC0094C6
	bclr	#6,$1E295A.L
lbC0094C6:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC0094CE:
	clr.w	$1E295A.L
	tst.b	$1E26A0.L
	beq.w	lbC0094E6
	move.w	#$FFFF,$1E295A.L
lbC0094E6:
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC0094EE:
	move.w	$1E27A6.L,D0
	move.w	D0,D2
	andi.w	#$7000,D0
	cmpi.w	#$6000,D0
	beq.w	lbC009A18
	move.w	D0,D1
	rol.w	#4,D1
	subq.w	#1,D1
	lsl.w	#2,D1
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	move.l	0(A0,D1.W),4(A0,D1.W)
	move.l	0(A2,D1.W),4(A2,D1.W)
	addi.w	#$1000,D0
	cmpi.w	#$5000,D0
	beq.w	lbC009552
	andi.w	#$8FFF,D2
	or.w	D0,D2
lbC009534:
	move.w	D2,$1E27A6.L
	bsr.w	lbC009918
	bsr.w	lbC008E14
	bsr.w	lbC00900A
	bsr.w	lbC008E94
	bsr.w	lbC008F96
	bra.w	lbC009A18

lbC009552:
	andi.w	#$FFF,D2
	ori.w	#$5000,D2
	bra.s	lbC009534

lbC00955C:
	move.w	$1E27A6.L,D0
	move.w	D0,D1
	andi.w	#$7000,D0
	cmpi.w	#$1000,D0
	beq.w	lbC009A18
	subi.w	#$1000,D0
	move.w	D0,D2
	rol.w	#4,D2
	cmpi.w	#$5000,D0
	beq.w	lbC0095BE
	andi.w	#$8FFF,D1
	or.w	D0,D1
lbC009586:
	move.w	D1,$1E27A6.L
	move.w	D2,$1E2960.L
	move.w	#2,$1E295E.L
	lea	ascii.MSG11(PC),A0
	bsr.w	lbC009B4A
	bsr.w	lbC009918
	bsr.w	lbC00900A
	bsr.w	lbC008E94
	bsr.w	lbC008F96
	bra.w	lbC009A18

ascii.MSG11:
	dc.b	' 000000',0

lbC0095BE:
	andi.w	#$3FF,D1
	ori.w	#$5000,D1
	bra.s	lbC009586

lbC0095C8:
	move.l	$1E278E.L,D0
	move.l	D0,$1E2792.L
	move.l	D0,$1E2796.L
	move.l	D0,$1E279A.L
	move.l	D0,$1E279E.L
	move.l	D0,$1E27A2.L
	move.l	$1E2818.L,D0
	move.l	D0,$1E281C.L
	move.l	D0,$1E2820.L
	move.l	D0,$1E2824.L
	move.l	D0,$1E2828.L
	move.l	D0,$1E282C.L
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009618:
	addq.w	#2,$1E27AE.L
	addq.w	#2,$1E27B0.L
	bsr.w	lbC009918
	bsr.w	lbC008F5E
	bra.w	lbC009A18

lbC009630:
	subq.w	#2,$1E27AE.L
	subq.w	#2,$1E27B0.L
	bsr.w	lbC009918
	bsr.w	lbC008F5E
	bra.w	lbC009A18

lbC009648:
	lea	$1E27AE.L,A0
	tst.b	$1E26A0.L
	beq.w	lbC00965E
	lea	$1E27B0.L,A0
lbC00965E:
	subq.w	#2,(A0)
	bsr.w	lbC009918
	bsr.w	lbC008F5E
	bra.w	lbC009A18

lbC00966C:
	lea	$1E27AE.L,A0
	tst.b	$1E26A0.L
	beq.w	lbC009682
	lea	$1E27B0.L,A0
lbC009682:
	addq.w	#2,(A0)
	bsr.w	lbC009918
	bsr.w	lbC008F5E
	bra.w	lbC009A18

lbC009690:
	clr.w	$1E27AE.L
	clr.w	$1E27B0.L
	bsr.w	lbC009918
	bsr.w	lbC008F5E
	bra.w	lbC009A18

lbC0096A8:
	andi.w	#$7FFF,$1E27A6.L
	tst.b	$1E26A0.L
	beq.w	lbC0096C2
	ori.w	#$8000,$1E27A6.L
lbC0096C2:
	bsr.w	lbC008E94
	bsr.w	lbC008F96
	bra.w	lbC009A18

lbC0096CE:
	andi.w	#$F3FF,$1E27A6.L
	tst.b	$1E26A0.L
	bne.w	lbC0096E8
	ori.w	#$800,$1E27A6.L
lbC0096E8:
	bsr.w	lbC008E94
	bra.w	lbC009A18

lbC0096F0:
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#5,D0
	moveq	#1,D1
lbC009700:
	btst	D1,$1E295A.L
	bne.w	lbC00970E
	subq.l	#2,(A0)
	subq.l	#2,(A2)
lbC00970E:
	addq.w	#4,A0
	addq.w	#4,A2
	addq.w	#1,D1
	dbra	D0,lbC009700
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009720:
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#5,D0
	moveq	#1,D1
lbC009730:
	btst	D1,$1E295A.L
	bne.w	lbC00973E
	addq.l	#2,(A0)
	addq.l	#2,(A2)
lbC00973E:
	addq.w	#4,A0
	addq.w	#4,A2
	addq.w	#1,D1
	dbra	D0,lbC009730
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009750:
	lea	$1E278E.L,A0
	move.w	$1E27A6.L,D0
	andi.w	#$7000,D0
	rol.w	#4,D0
	subq.w	#2,D0
	bmi.w	lbC00977E
	move.l	(A0)+,D1
lbC00976A:
	move.l	(A0)+,-8(A0)
	dbra	D0,lbC00976A
	move.l	D1,-4(A0)
	bsr.w	lbC009918
	bra.w	lbC008E14

lbC00977E:
	rts

lbC009780:
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#5,D0
	moveq	#1,D1
	moveq	#0,D2
	moveq	#0,D3
	tst.b	$1E2966.L
	beq.w	lbC0097B4
	move.b	$1E278D.L,D2
	move.b	$1E278B.L,D3
	sub.w	D3,D2
	lsr.w	#2,D2
	addq.w	#2,D2
	bra.w	lbC0097C8

lbC0097B4:
	move.b	$1E2787.L,D3
	move.b	$1E2789.L,D2
	addi.w	#$100,D2
	sub.w	D3,D2
	lsr.w	#3,D2
lbC0097C8:
	btst	#7,$1E27A6.L
	beq.w	lbC0097D6
	add.w	D2,D2
lbC0097D6:
	move.w	$1E27AE.L,D4
	ext.l	D4
	add.l	D4,D2
	tst.b	$1E26A0.L
	beq.w	lbC0097EE
	add.w	D2,D2
	add.w	D2,D2
lbC0097EE:
	btst	D1,$1E295A.L
	bne.w	lbC0097FC
	sub.l	D2,(A0)
	sub.l	D2,(A2)
lbC0097FC:
	addq.w	#4,A0
	addq.w	#4,A2
	addq.w	#1,D1
	dbra	D0,lbC0097EE
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC00980E:
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#5,D0
	moveq	#1,D1
	moveq	#0,D2
	move.b	$1E2789.L,D2
	sub.b	$1E2787.L,D2
	addi.w	#$100,D2
	lsr.w	#3,D2
	mulu.w	$1E2848.L,D2
	tst.b	$1E26A0.L
	beq.w	lbC009844
	neg.l	D2
lbC009844:
	btst	#7,$1E27A6.L
	beq.w	lbC009852
	add.w	D2,D2
lbC009852:
	btst	D1,$1E295A.L
	bne.w	lbC009860
	add.l	D2,(A0)
	add.l	D2,(A2)
lbC009860:
	addq.w	#4,A0
	addq.w	#4,A2
	addq.w	#1,D1
	dbra	D0,lbC009852
	bsr.w	lbC009918
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009876:
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#5,D0
	moveq	#1,D1
	moveq	#0,D2
	moveq	#0,D3
	tst.b	$1E2966.L
	beq.w	lbC0098AA
	move.b	$1E278D.L,D2
	move.b	$1E278B.L,D3
	sub.w	D3,D2
	lsr.w	#2,D2
	addq.w	#2,D2
	bra.w	lbC0098BE

lbC0098AA:
	move.b	$1E2787.L,D3
	move.b	$1E2789.L,D2
	addi.w	#$100,D2
	sub.w	D3,D2
	lsr.w	#3,D2
lbC0098BE:
	btst	#7,$1E27A6.L
	beq.w	lbC0098CC
	add.w	D2,D2
lbC0098CC:
	move.w	$1E27AE.L,D4
	ext.l	D4
	add.l	D4,D2
	tst.b	$1E26A0.L
	beq.w	lbC0098E4
	add.w	D2,D2
	add.w	D2,D2
lbC0098E4:
	btst	D1,$1E295A.L
	bne.w	lbC0098F2
	add.l	D2,(A0)
	add.l	D2,(A2)
lbC0098F2:
	addq.w	#4,A0
	addq.w	#4,A2
	addq.w	#1,D1
	dbra	D0,lbC0098E4
	bsr.w	lbC008E14
	bra.w	lbC009A18

lbC009904:
	move.l	D0,-(SP)
	clr.b	$BFE801.L
lbC00990C:
	tst.b	$BFE801.L
	beq.s	lbC00990C
	move.l	(SP)+,D0
	rts

lbC009918:
	move.l	D0,-(SP)
	clr.b	$BFE801.L
lbC009920:
	tst.b	$BFE801.L
	beq.s	lbC009920
	move.l	(SP)+,D0
	rts

lbC00992C:
	movem.l	D0/D1,-(SP)
	moveq	#0,D0
	move.b	$1E2789.L,D0
	sub.b	$1E2787.L,D0
	addi.w	#$100,D0
	btst	#7,$1E27A6.L
	bne.w	lbC009978
	moveq	#0,D1
	move.b	$1E2787.L,D1
	subi.w	#$11,D1
	lsr.w	#1,D1
	andi.w	#$FFF8,D1
	move.w	D1,$1E278A.L
	lsr.w	#1,D0
	subq.w	#8,D0
	add.w	D1,D0
	move.w	D0,$1E278C.L
	movem.l	(SP)+,D0/D1
	rts

lbC009978:
	moveq	#0,D1
	move.b	$1E2787.L,D1
	subi.w	#9,D1
	lsr.w	#1,D1
	andi.w	#$FFFC,D1
	move.w	D1,$1E278A.L
	lsr.w	#1,D0
	subq.w	#8,D0
	add.w	D1,D0
	move.w	D0,$1E278C.L
	move.w	#$CC,$1E278C.L
	movem.l	(SP)+,D0/D1
	rts

lbC0099AA:
	move.w	$DFF00A.L,D0
	moveq	#0,D1
	move.b	D0,D1
	add.w	D1,D1
	lsr.w	#8,D0
	lea	$1E3200.L,A0
	moveq	#7,D2
lbC0099C0:
	cmpi.w	#$20,D0
	bhi.w	lbC0099CC
	move.w	#$20,D0
lbC0099CC:
	cmpi.w	#$120,D0
	bls.w	lbC0099D8
	move.w	#$120,D0
lbC0099D8:
	moveq	#0,D3
	move.w	D0,D4
	addi.w	#$30,D4
	move.b	D0,D3
	lsl.w	#8,D3
	move.w	D1,D5
	lsr.w	#1,D5
	move.b	D5,D3
	swap	D3
	move.b	D4,D3
	lsl.w	#8,D3
	cmpi.w	#$FF,D0
	bls.w	lbC0099FC
	bset	#2,D3
lbC0099FC:
	cmpi.w	#$FF,D4
	bls.w	lbC009A08
	bset	#1,D3
lbC009A08:
	move.l	D3,(A0)
	addi.w	#$10,D1
	lea	$D8(A0),A0
	dbra	D2,lbC0099C0
	rts

lbC009A18:
	tst.b	$1E295C.L
	beq.w	lbC009A46
	bsr.s	lbC0099AA
	bsr.w	lbC008FE0
	lea	$1E278E.L,A0
	lea	$1E2818.L,A2
	moveq	#5,D0
lbC009A36:
	andi.l	#$1FFFFF,(A0)+
	andi.l	#$1FFFFF,(A2)+
	dbra	D0,lbC009A36
lbC009A46:
	bsr.w	lbC009904
	tst.b	$1E26A1.L
	beq.w	lbC008926
	bsr.w	lbC00D4E4
	tst.b	$1E295C.L
	beq.w	lbC009A6C
	sf	$1E295C.L
	bsr.w	lbC008D32
lbC009A6C:
	sf	$1E28AE.L
	move.w	#$20,$DFF096.L
	bsr.w	lbC00A19E
	lea	$DFF144.L,A5
	clr.l	(A5)
	clr.l	8(A5)
	clr.l	$10(A5)
	clr.l	$18(A5)
	clr.l	$20(A5)
	clr.l	$28(A5)
	clr.l	$30(A5)
	clr.l	$38(A5)
	lea	pictureheigth.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#0,D0
	move.w	$1E2848.L,D0
	bsr.w	lbC0086F8
	moveq	#3,D1
	bsr.w	lbC0066BE
	bsr.w	lbC006FF0
	lea	CopperPositio.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	$1E3156.L,D0
	bsr.w	lbC001B42
	bra.w	lbC006FF0

pictureheigth.MSG:
	dc.b	'picture heigth: !',0
CopperPositio.MSG:
	dc.b	'Copper Position :',0

lbC009AFA:
	move.w	D0,$1E295E.L
	move.w	D1,$1E2960.L
	rts

lbC009B08:
	cmpi.b	#$20,D0
	beq.w	lbC009B30
	cmpi.b	#$39,D0
	bhi.w	lbC009B20
	cmpi.b	#$30,D0
	bcc.w	lbC009B38
lbC009B20:
	cmpi.b	#$3A,D0
	beq.w	lbC009B40
	subi.b	#$37,D0
	bra.w	lbC009B48

lbC009B30:
	move.b	#$27,D0
	bra.w	lbC009B48

lbC009B38:
	subi.b	#$30,D0
	bra.w	lbC009B48

lbC009B40:
	move.b	#$25,D0
	bra.w	lbC009B48

lbC009B48:
	rts

lbC009B4A:
	movem.l	D0/A0,-(SP)
	moveq	#0,D0
	tst.b	$1E295C.L
	beq.w	lbC009B76
lbC009B5A:
	move.b	(A0)+,D0
	beq.w	lbC009B76
	cmpi.b	#13,D0
	beq.w	lbC009B7C
	bsr.s	lbC009B08
	bsr.w	lbC009B8A
	addq.w	#1,$1E295E.L
	bra.s	lbC009B5A

lbC009B76:
	movem.l	(SP)+,D0/A0
	rts

lbC009B7C:
	clr.w	$1E295E.L
	addq.w	#1,$1E2960.L
	bra.s	lbC009B5A

lbC009B8A:
	movem.l	D0-D4/A0/A1,-(SP)
	andi.w	#$FF,D0
	move.w	$1E295E.L,D1
	lsr.w	#2,D1
	mulu.w	#$D8,D1
	move.w	$1E2960.L,D2
	mulu.w	#$18,D2
	lea	$1E3204.L,A0
	lea	0(A0,D1.W),A0
	lea	0(A0,D2.W),A0
	move.w	$1E295E.L,D2
	andi.w	#3,D2
	moveq	#3,D1
	sub.w	D2,D1
	add.w	D1,D1
	add.w	D1,D1
	move.w	#$FFF0,D2
	rol.w	D1,D2
	lea	lbL009D3E(PC),A1
	add.w	D0,D0
	add.w	D0,D0
	move.l	0(A1,D0.W),D0
	swap	D0
	moveq	#4,D3
lbC009BDE:
	lsl.w	D1,D0
	and.w	D2,(A0)
	or.w	D0,(A0)
	addq.w	#4,A0
	clr.w	D0
	rol.l	#4,D0
	dbra	D3,lbC009BDE
	movem.l	(SP)+,D0-D4/A0/A1
	rts

lbC009BF4:
	tst.b	$1E295C.L
	beq.w	lbC009C2A
	movem.l	D0-D3,-(SP)
	subq.w	#1,D1
	move.w	D1,D2
	lsl.w	#2,D2
	ror.l	D2,D0
lbC009C0A:
	move.w	D0,D3
	andi.w	#15,D0
	bsr.w	lbC009B8A
	move.w	D3,D0
	addq.w	#1,$1E295E.L
	andi.w	#$FFF0,D0
	rol.l	#4,D0
	dbra	D1,lbC009C0A
	movem.l	(SP)+,D0-D3
lbC009C2A:
	rts

MODEHIRES2000.MSG:
	dc.b	'1: 000000 MODE:        HIRES     ',$D
	dc.b	'2: 000000 DDFSTRT END  0000 0000 ',$D
	dc.b	'3: 000000 MODULO:      0000      ',$D
	dc.b	'4: 000000 WIDTH HEIGHT 0000 0000 ',$D
	dc.b	'5: 000000 COLOR VALUE  0000 0000 ',$D
	dc.b	'6: 000000 PLANES:      0000      ',$D
	dc.b	'7: 000000 COPPER:      0000000   ',$D
	dc.b	'8: 000000 FMODE: 00  NMODE: 0000 ',$D,$D,0
lbL009D3E:
	dc.l	$EAAAE
	dc.l	$44444
	dc.l	$E2E8E
	dc.l	$E262E
	dc.l	$8AE22
	dc.l	$E8E2E
	dc.l	$E8EAE
	dc.l	$E2648
	dc.l	$EAEAE
	dc.l	$EAE2E
	dc.l	$4AEAA
	dc.l	$CACAC
	dc.l	$E888E
	dc.l	$CAAAC
	dc.l	$E8C8E
	dc.l	$E8C88
	dc.l	$E8EAE
	dc.l	$AAEAA
	dc.l	$40444
	dc.l	$222A4
	dc.l	$AACAA
	dc.l	$8888E
	dc.l	$AEAAA
	dc.l	$AEEEA
	dc.l	$EAAAE
	dc.l	$EAE88
	dc.l	$EAAEE
	dc.l	$CACCA
	dc.l	$6842C
	dc.l	$E4444
	dc.l	$AAAAE
	dc.l	$AAAE4
	dc.l	$AAAEA
	dc.l	$AA4AA
	dc.l	$AA444
	dc.l	$E248E
	dc.l	$44404
	dc.l	$4040
	dc.l	2
	dc.l	0
	dc.l	$E2644

lbC009DE2:
	lea	$DFF000.L,A5
	move.w	#1,$1E2816.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC009E04
	move.w	D0,$1E2816.L
lbC009E04:
	bsr.w	lbC0062E6
	moveq	#0,D0
	move.b	$1E2788.L,D0
	lsl.w	#1,D0
	eori.w	#$100,D0
	move.b	$1E2788.L,D0
	moveq	#0,D1
	move.b	$1E2786.L,D1
	sub.w	D1,D0
	cmpi.w	#$116,D0
	bls.s	lbC009E30
	move.w	#$116,D0
lbC009E30:
	cmpi.w	#$7F,D0
	bhi.s	lbC009E4C
	move.b	#$80,$1E2788.L
	move.w	#$80,D1
	sub.w	D0,D1
	move.b	D1,$1E2786.L
	bra.s	lbC009E62

lbC009E4C:
	move.b	#$20,$1E2786.L
	move.b	$1E2786.L,D1
	add.w	D0,D1
	move.b	D1,$1E2788.L
lbC009E62:
	bsr.w	lbC00A076
	move.w	#$10B,$1E2838.L
	move.w	#$28,$1E283C.L
	move.w	#$10B,$1E2840.L
	move.w	#$28,$1E2844.L
	bsr.w	lbC00A19E
	bsr.w	lbC00A122
	move.b	#$80,$1E28AE.L
	move.w	#$FFFF,$34(A5)
lbC009E9C:
	tst.b	$1E26A1.L
	bne.w	lbC009F38
	btst	#6,$BFE001.L
	beq.w	lbC009EBE
	btst	#2,$16(A5)
	beq.w	lbC009EBE
	bra.s	lbC009E9C

lbC009EBE:
	move.w	10(A5),$1E2848.L
lbC009EC6:
	bsr.w	lbC00A122
	tst.b	$1E26A1.L
	bne.w	lbC009F38
	btst	#6,$BFE001.L
	beq.w	lbC009EEC
	btst	#2,$16(A5)
	beq.w	lbC009EEC
	bra.s	lbC009E9C

lbC009EEC:
	bsr.w	lbC009FFA
	btst	#6,$BFE001.L
	bne.w	lbC009F1A
	add.w	$1E2838.L,D0
	add.w	$1E283C.L,D1
	bsr.w	lbC009FC8
	move.w	D0,$1E2838.L
	move.w	D1,$1E283C.L
	bra.s	lbC009EC6

lbC009F1A:
	add.w	$1E2840.L,D0
	add.w	$1E2844.L,D1
	bsr.w	lbC009FC8
	move.w	D0,$1E2840.L
	move.w	D1,$1E2844.L
	bra.s	lbC009EC6

lbC009F38:
	move.w	#$20,$96(A5)
	clr.l	$144(A5)
	clr.l	$14C(A5)
	bsr.w	lbC00A0F0
	sf	$1E28AE.L
	bsr.w	lbC00A19E
	lea	Widthx.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E2840.L,D0
	addi.w	#14,D0
	sub.w	$1E2838.L,D0
	btst	#7,$1E27A6.L
	beq.w	lbC009F7A
	lsl.w	#1,D0
lbC009F7A:
	bsr.w	lbC0086F8
	moveq	#3,D1
	bsr.w	lbC0066BE
	lea	Heighty.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	$1E2844.L,D0
	sub.w	$1E283C.L,D0
	addi.w	#14,D0
	bsr.w	lbC0086F8
	moveq	#3,D1
	bsr.w	lbC0066BE
	bra.w	lbC006FF0

Widthx.MSG:
	dc.b	'Width:  x = !',0
Heighty.MSG:
	dc.b	13
	dc.b	'Height: y = !',0,0

lbC009FC8:
	cmpi.w	#$6A,D0
	bhi.w	lbC009FD4
	move.w	#$6B,D0
lbC009FD4:
	cmpi.w	#$1C9,D0
	bls.w	lbC009FE0
	move.w	#$1C9,D0
lbC009FE0:
	cmpi.w	#$19,D1
	bhi.w	lbC009FEC
	move.w	#$1A,D1
lbC009FEC:
	cmpi.w	#$138,D1
	bls.w	lbC009FF8
	move.w	#$138,D1
lbC009FF8:
	rts

lbC009FFA:
	movem.l	D2/D3,-(SP)
	moveq	#0,D1
	moveq	#0,D3
	move.w	$DFF00A.L,D0
	move.w	$1E2848.L,D2
	move.w	D0,$1E2848.L
	move.b	D0,D1
	lsr.w	#8,D0
	move.b	D2,D3
	lsr.w	#8,D2
	sub.w	D0,D2
	sub.w	D1,D3
	cmpi.w	#$7F,D2
	bgt.w	lbC00A04E
	cmpi.w	#$7F,D3
	bgt.w	lbC00A058
	cmpi.w	#$FF81,D2
	blt.w	lbC00A062
	cmpi.w	#$FF81,D3
	blt.w	lbC00A06C
lbC00A040:
	move.w	D2,D1
	move.w	D3,D0
	neg.w	D0
	neg.w	D1
	movem.l	(SP)+,D2/D3
	rts

lbC00A04E:
	move.w	#$FF,D0
	sub.w	D2,D0
	move.w	D0,D2
	bra.s	lbC00A040

lbC00A058:
	move.w	#$FF,D0
	sub.w	D3,D0
	move.w	D0,D3
	bra.s	lbC00A040

lbC00A062:
	move.w	#$FF01,D0
	sub.w	D2,D0
	move.w	D0,D2
	bra.s	lbC00A040

lbC00A06C:
	move.w	#$FF01,D0
	sub.w	D3,D0
	move.w	D0,D3
	bra.s	lbC00A040

lbC00A076:
	movem.l	D0/A0-A2,-(SP)
	lea	$100.w,A0
	lea	$300.w,A1
	lea	$1DF082.L,A2
	move.l	(A0)+,(A2)+
	move.l	(A1)+,(A2)+
	moveq	#7,D0
lbC00A08E:
	move.l	(A0),(A2)+
	move.l	(A1),(A2)+
	move.l	#$8000,(A0)+
	move.l	#$10000,(A1)+
	move.l	(A0),(A2)+
	move.l	(A1),(A2)+
	move.l	#$80000000,(A0)+
	move.l	#1,(A1)+
	dbra	D0,lbC00A08E
	move.l	$1E25A2.L,(A2)+
	move.l	0.L,(A2)+
	move.w	$1E2506.L,(A2)+
	move.l	#$5555AAAA,$104.w
	move.l	#$AAAA5555,-(A1)
	clr.l	0.w
	move.w	$1E2506.L,D0
	andi.w	#$3F,D0
	ori.w	#$24,D0
	move.w	D0,$1E27AA.L
	movem.l	(SP)+,D0/A0-A2
	rts

lbC00A0F0:
	movem.l	D0/A0-A2,-(SP)
	lea	$100.w,A0
	lea	$300.w,A1
	lea	$1DF082.L,A2
	moveq	#$10,D0
lbC00A104:
	move.l	(A2)+,(A0)+
	move.l	(A2)+,(A1)+
	dbra	D0,lbC00A104
	move.l	(A2)+,$DFF1A2.L
	move.l	(A2)+,0.w
	move.w	(A2)+,$DFF104.L
	movem.l	(SP)+,D0/A0-A2
	rts

lbC00A122:
	movem.l	D0/D1/D3/D4,-(SP)
	move.w	$1E2838.L,D4
	move.w	$1E283C.L,D3
	bsr.w	lbC00A162
	move.w	D0,$100.w
	move.w	D1,$102.w
	move.w	$1E2840.L,D4
	move.w	$1E2844.L,D3
	bsr.w	lbC00A162
	movem.w	D0/D1,$300.w
	move.w	#$8020,$DFF096.L
	movem.l	(SP)+,D0/D1/D3/D4
	rts

lbC00A162:
	movem.l	D2-D4,-(SP)
	moveq	#0,D0
	moveq	#0,D1
	move.w	D4,D0
	lsr.w	#1,D0
	move.w	D4,D1
	andi.w	#1,D1
	move.w	D3,D2
	lsl.w	#8,D2
	or.w	D2,D0
	move.w	D3,D2
	lsr.w	#6,D2
	andi.w	#4,D2
	or.w	D2,D1
	addi.w	#$10,D3
	move.w	D3,D2
	lsl.w	#8,D2
	or.w	D2,D1
	move.w	D3,D2
	lsr.w	#7,D2
	andi.w	#2,D2
	or.w	D2,D1
	movem.l	(SP)+,D2-D4
	rts

lbC00A19E:
	movem.l	D0/D1/A0/A1,-(SP)
	move.w	#$3E7F,D0
	lea	$1D3082.L,A0
	lea	$1E45E8.L,A1
lbC00A1B2:
	move.b	(A0),D1
	move.b	(A1),(A0)
	addq.w	#2,A0
	move.b	D1,(A1)+
	dbra	D0,lbC00A1B2
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC00A1C4:
	swap	D0
	bsr.w	lbC006F38
	swap	D0
	bra.w	lbC006F38

	bsr.w	lbC00A1E8
	bra.w	lbC0087F0

	bsr.w	lbC00A368
	bra.w	lbC0087F0

	bsr.w	lbC00A3D2
	bra.w	lbC0087F0

lbC00A1E8:
	lea	$1E28B0.L,A3
	moveq	#9,D3
	lea	namelengthadd.MSG(PC),A0
	bsr.w	lbC0035CE
lbC00A1F8:
	tst.b	(A3)
	beq.s	lbC00A26E
	lea	ascii.MSG12(PC),A0
	move.w	(A0)+,D1
	cmp.b	(A3),D1
	bcc.s	lbC00A20A
	move.b	#1,(A3)
lbC00A20A:
	moveq	#0,D0
	move.b	(A3),D0
	subq.w	#1,D0
	mulu.w	#11,D0
	lea	0(A0,D0.W),A0
	bsr.w	lbC0035CE
	moveq	#0,D0
	move.b	1(A3),D0
	subq.w	#1,D0
	cmpi.w	#2,D0
	bls.s	lbC00A22C
	moveq	#3,D0
lbC00A22C:
	mulu.w	#6,D0
	lea	byte.MSG(PC),A0
	lea	0(A0,D0.W),A0
	bsr.w	lbC0035CE
	bsr.w	lbC006FBC
	move.l	2(A3),D0
	jsr	$1A9A1C.L
	bsr.w	lbC006FBC
	bsr.w	lbC006FBC
	move.l	6(A3),D0
	bsr.w	lbC00A1C4
	moveq	#3,D0
	bsr.w	lbC006FD4
	move.b	10(A3),D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	move.b	11(A3),D0
lbC00A26E:
	lea	12(A3),A3
	bsr.w	lbC006FF0
	dbra	D3,lbC00A1F8
	bra.w	lbC006FF0

namelengthadd.MSG:
	dc.b	'name     length address maxcount player',$D,0
	dc.b	0
ascii.MSG12:
	dc.b	0
	dc.b	15
	dc.b	'counter   ',0
	dc.b	'lives     ',0
	dc.b	'energy    ',0
	dc.b	'time      ',0
	dc.b	'score     ',0
	dc.b	'shield    ',0
	dc.b	'money     ',0
	dc.b	'bombs     ',0
	dc.b	'ext-weap1 ',0
	dc.b	'ext-weap2 ',0
	dc.b	'level     ',0
	dc.b	'status    ',0
	dc.b	'keys      ',0
	dc.b	'counter1  ',0
	dc.b	'counter2  ',0,0
byte.MSG:
	dc.b	'byte ',0
	dc.b	'word ',0
	dc.b	'long ',0
	dc.b	'???? ',0

lbC00A368:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D3
	moveq	#9,D1
	lea	$1E28B0.L,A1
lbC00A380:
	tst.b	(A1)
	beq.s	lbC00A38A
	cmp.l	2(A1),D0
	beq.s	lbC00A39E
lbC00A38A:
	lea	12(A1),A1
	dbra	D1,lbC00A380
	lea	Counternotfou.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC00A1E8

lbC00A39E:
	clr.b	(A1)
	lea	Counterdelete.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC00A1E8

Counternotfou.MSG:
	dc.b	'Counter not found!',$D,0
Counterdelete.MSG:
	dc.b	'Counter deleted',$D,0
	dc.b	0

lbC00A3D2:
	lea	$1E28B0.L,A4
	moveq	#9,D1
lbC00A3DA:
	tst.b	(A4)
	beq.s	lbC00A3F2
	lea	12(A4),A4
	dbra	D1,lbC00A3DA
	lea	Toomanynotes.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC00A1E8

lbC00A3F2:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,2(A4)
	lea	type.MSG(PC),A0
	bsr.w	lbC0035CE
	lea	ascii.MSG12(PC),A0
	move.w	(A0)+,D2
	subq.w	#1,D2
	moveq	#1,D3
lbC00A416:
	move.w	D3,D0
	jsr	$1A9A10.L
	bsr.w	lbC006FBC
	bsr.w	lbC0035CE
	lea	11(A0),A0
	moveq	#7,D0
	bsr.w	lbC006FD4
	addq.w	#1,D3
	dbra	D2,lbC00A416
	bsr.w	lbC006FF0
	jsr	$1A9D80.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	lea	1(A4),A4
	move.b	D0,D5
	beq.w	lbC00A1E8
	lea	counterlength.MSG(PC),A0
	bsr.w	lbC0035CE
	jsr	$1A9D80.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.b	D0,(A4)+
	addq.w	#4,A4
	lea	maxcount.MSG(PC),A0
	bsr.w	lbC0035CE
	jsr	$1A9D80.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,(A4)+
	lea	player.MSG(PC),A0
	bsr.w	lbC0035CE
	jsr	$1A9D80.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.b	D0,(A4)+
	clr.b	(A4)+
	move.b	D5,-12(A4)
	bra.w	lbC00A1E8

type.MSG:
	dc.b	'type?',$D,0
Toomanynotes.MSG:
	dc.b	'Too many notes!',$D,0
counterlength.MSG:
	dc.b	'counterlength?',$D
	dc.b	'1 byte, 2 word, 3 long',$D,0
	dc.b	'counteraddress?',$D,0
maxcount.MSG:
	dc.b	'max-count?',$D,0
player.MSG:
	dc.b	'player?',$D,0
	dc.b	0

lbC00A524:
	clr.l	$1E2932.L
	clr.l	$1E2936.L
	move.l	D0,$1E292A.L
	move.l	D1,$1E292E.L
	move.w	$1E292C.L,D0
	mulu.w	$1E2930.L,D0
	move.l	D0,$1E2936.L
	move.w	$1E292A.L,D0
	mulu.w	$1E2930.L,D0
	add.l	$1E2934.L,D0
	move.l	D0,$1E2934.L
	move.w	$1E292C.L,D0
	mulu.w	$1E292E.L,D0
	add.l	$1E2934.L,D0
	bcc.s	lbC00A580
	addq.w	#1,$1E2932.L
lbC00A580:
	move.l	D0,$1E2934.L
	move.w	$1E292A.L,D0
	mulu.w	$1E292E.L,D0
	add.l	$1E2932.L,D0
	move.l	D0,$1E2932.L
	move.l	$1E2936.L,D0
	rts

lbC00A5A6:
	movem.l	D3-D5,-(SP)
	moveq	#$1F,D3
	move.l	D0,D4
	move.l	D1,D5
	moveq	#0,D0
	move.l	D4,D1
lbC00A5B4:
	asl.l	#1,D1
	roxl.l	#1,D0
	cmp.l	D5,D0
	bcs.w	lbC00A5C2
	sub.l	D5,D0
	addq.l	#1,D1
lbC00A5C2:
	dbra	D3,lbC00A5B4
	exg	D0,D1
	movem.l	(SP)+,D3-D5
	rts

lbC00A5CE:
	moveq	#0,D1
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.s	lbC00A5E6
	cmpi.w	#$16,D0
	bhi.w	lbC0087CE
	move.w	D0,D1
lbC00A5E6:
	move.w	D1,D0
	bra.w	lbC00A5EC

lbC00A5EC:
	move.w	D0,D2
	move.w	#$27,D0
	bsr.w	lbC00670A
	move.w	D2,D0
	jsr	$1A9A10.L
	bsr.w	lbC006FBC
	lea	$1E2876.L,A0
	lea	0(A0,D2.W),A0
	move.w	#$25,D0
	bsr.w	lbC00670A
	move.b	(A0),D0
	moveq	#8,D1
	bsr.w	lbC0033AE
	bsr.w	lbC006FBC
	move.w	#$25,D0
	bsr.w	lbC00670A
	move.b	$18(A0),D0
	bsr.w	lbC0033AE
	moveq	#5,D0
	jsr	lbC006FD4(PC)
	move.w	#$3B,D0
	bsr.w	lbC00670A
	lea	parallelporta.MSG(PC),A0
	move.w	D2,D0
	jsr	$1C53A4.L
	jsr	$1B7740.L
	move.w	#5,$1E269A.L
	jmp	$1A8DFC.L

parallelporta.MSG:
	dc.b	'parallel port a',0
	dc.b	'parallel port a direction',0
	dc.b	'parallel port b',0
	dc.b	'parallel port b direction',0
	dc.b	'timer a low',0
	dc.b	'timer a high',0
	dc.b	'timer b low',0
	dc.b	'timer b high',0
	dc.b	'eventcounter low',0
	dc.b	'eventcounter med',0
	dc.b	'eventcounter high',0
	dc.b	'unused',0
	dc.b	'serial port',0
	dc.b	'interrupt control reg',0
	dc.b	'control reg a',0
	dc.b	'control reg b',0
	dc.b	'ext 1',0
	dc.b	'ext 2',0
	dc.b	'ext 3',0
	dc.b	'ext 4',0
	dc.b	'ext 5',0
	dc.b	'ext 6',0
	dc.b	'ext 7',0
	dc.b	'ext 8',0,0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	cmpi.w	#$17,D0
	bhi.w	lbC0087CE
	move.w	D0,D2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.w	D0,D3
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.w	D0,D4
	move.w	D2,D0
	lea	$1E2876.L,A0
	lea	0(A0,D0.W),A0
	move.b	D3,(A0)
	move.b	D4,$18(A0)
	move.w	D2,D0
	addq.w	#1,D0
	cmpi.w	#$17,D0
	bhi.w	lbC00A7E8
	bra.w	lbC00A5EC

lbC00A7E8:
	rts

lbC00A7EA:
	movem.l	D0-D4/A1-A5,-(SP)
	lea	$1E26A1.L,A4
	move.w	#$F128,D2
	move.w	#$5128,D3
	move.w	#$C0,D4
	moveq	#7,D7
	lea	$1E2608.L,A5
	move.l	A0,D0
	cmp.l	$1E2974.L,D0
	bgt.w	lbC00A81E
	move.l	$1E2974.L,D6
	bra.w	lbC00A84C

lbC00A81E:
	tst.l	$1E2BC8.L
	beq.w	lbC00A83C
	cmp.l	$1E2BC8.L,D0
	bgt.w	lbC00A83C
	move.l	$1E2BC8.L,D0
	bra.w	lbC00A84C

lbC00A83C:
	tst.l	$1E2978.L
	beq.w	lbC00A8FE
	move.l	$1E2978.L,D6
lbC00A84C:
	subq.l	#2,D6
lbC00A84E:
	tst.b	(A4)
	bne.w	lbC00A8FE
	bsr.w	lbC005CDE
	addq.w	#2,A0
	cmpa.l	D6,A0
	bne.s	lbC00A89C
	addq.l	#2,D6
	cmp.l	$1E2974.L,D6
	bne.w	lbC00A884
	tst.l	$1E2BC8.L
	beq.w	lbC00A884
	movea.l	$1E2BC4.L,A0
	move.l	$1E2BC8.L,D6
	bra.w	lbC00A89A

lbC00A884:
	tst.l	$1E2978.L
	beq.w	lbC00A8FE
	movea.l	#$C00000,A0
	move.l	$1E2978.L,D6
lbC00A89A:
	subq.l	#2,D6
lbC00A89C:
	move.w	D0,D1
	andi.w	#$FF00,D1
	cmpi.w	#$400,D1
	beq.w	lbC00A906
lbC00A8AA:
	move.w	D0,D1
	and.w	D2,D1
	cmp.w	D3,D1
	bne.s	lbC00A84E
	move.w	D0,D1
	and.w	D4,D1
	cmp.w	D4,D1
	beq.s	lbC00A84E
	move.w	D0,D1
	movea.l	A0,A2
	btst	#4,D0
	beq.s	lbC00A8E4
	btst	#0,D0
	bne.s	lbC00A8D8
	moveq	#0,D0
	bsr.w	lbC005CDE
	cmpa.l	D0,A1
	bne.w	lbC00A84E
	bra.s	lbC00A900

lbC00A8D8:
	bsr.w	lbC005D22
	cmp.l	A1,D0
	bne.w	lbC00A84E
	bra.s	lbC00A900

lbC00A8E4:
	bsr.w	lbC005CDE
	ext.l	D0
	and.w	D7,D1
	add.w	D1,D1
	add.w	D1,D1
	movea.l	A5,A3
	add.l	$20(A3,D1.W),D0
	cmpa.l	D0,A1
	bne.w	lbC00A84E
	bra.s	lbC00A900

lbC00A8FE:
	suba.l	A0,A0
lbC00A900:
	movem.l	(SP)+,D0-D4/A1-A5
	rts

lbC00A906:
	move.l	A0,$1E2844.L
	move.w	D0,D1
	andi.w	#$C0,D1
	cmpi.w	#$C0,D1
	beq.w	lbC00A9C4
	cmpi.w	#$80,D1
	exg	D0,D1
	beq.w	lbC00A92E
	bsr.w	lbC005CDE
	addq.w	#2,A0
	bra.w	lbC00A934

lbC00A92E:
	bsr.w	lbC005D22
	addq.w	#4,A0
lbC00A934:
	move.l	D0,$1E2848.L
	exg	D0,D1
	move.w	D0,D1
	andi.w	#$3F,D1
	cmpi.w	#$38,D1
	beq.w	lbC00A96A
	cmpi.w	#$39,D1
	beq.w	lbC00A97A
	andi.w	#$38,D1
	cmpi.w	#$10,D1
	beq.w	lbC00A988
	cmpi.w	#$28,D1
	beq.w	lbC00A9A2
	bra.w	lbC00A9C4

lbC00A96A:
	bsr.w	lbC005CDE
	ext.l	D0
	cmpa.l	D0,A1
	beq.w	lbC00A9CE
	bra.w	lbC00A9C4

lbC00A97A:
	bsr.w	lbC005D22
	cmpa.l	D0,A1
	beq.w	lbC00A9CE
	bra.w	lbC00A9C4

lbC00A988:
	move.w	D0,D1
	andi.w	#7,D1
	lsl.w	#2,D1
	lea	$1E2608.L,A3
	cmpa.l	$20(A3,D1.W),A1
	beq.w	lbC00A9CE
	bra.w	lbC00A9C4

lbC00A9A2:
	move.w	D0,D1
	andi.w	#7,D1
	lsl.w	#2,D1
	moveq	#0,D0
	bsr.w	lbC005CDE
	lea	$1E2608.L,A3
	add.l	$20(A3,D1.W),D0
	cmpa.l	D0,A1
	beq.w	lbC00A9CE
	bra.w	lbC00A9C4

lbC00A9C4:
	movea.l	$1E2844.L,A0
	bra.w	lbC00A8AA

lbC00A9CE:
	movea.l	$1E2844.L,A0
	bra.w	lbC00A900

	st	$1E2838.L
	bsr.w	lbC00A9F4
	bra.w	lbC0087F0

	sf	$1E2838.L
	bsr.w	lbC00A9F4
	bra.w	lbC0087F0

lbC00A9F4:
	movem.l	D0/D1/D5/D6/A0-A2,-(SP)
	sf	$1E2834.L
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	suba.l	A0,A0
lbC00AA10:
	tst.b	$1E26A1.L
	bne.w	lbC00AAB4
	bsr.w	lbC00A7EA
	move.l	A0,D1
	tst.l	D1
	beq.s	lbC00AA8C
	movea.l	A0,A2
	lea	SUBfoundat.MSG(PC),A0
	bsr.w	lbC0035CE
	move.l	A2,D0
	subq.l	#2,D0
	bsr.w	lbC00A1C4
	bsr.w	lbC006FF0
	tst.b	$1E2838.L
	bne.s	lbC00AA82
	lea	-2(A2),A0
	bsr.w	lbC005CDE
	andi.w	#$FF00,D0
	cmpi.w	#$400,D0
	beq.w	lbC00AA66
	move.b	#$4A,D0
	movea.l	A2,A0
	subq.l	#2,A0
	bsr.w	lbC0041CE
	bra.w	lbC00AA82

lbC00AA66:
	jsr	lbC005CDE(PC)
	move.w	D0,D1
	moveq	#0,D0
	addq.w	#2,A0
	jsr	lbC005CF6(PC)
	btst	#7,D1
	beq.w	lbC00AA82
	addq.w	#2,A0
	jsr	lbC005CF6(PC)
lbC00AA82:
	st	$1E2834.L
	movea.l	A2,A0
	bra.s	lbC00AA10

lbC00AA8C:
	tst.b	$1E2838.L
	bne.s	lbC00AAA4
	tst.b	$1E2834.L
	beq.s	lbC00AAA4
	lea	SUBseliminate.MSG(PC),A0
	bsr.w	lbC0035CE
lbC00AAA4:
	tst.b	$1E2834.L
	bne.s	lbC00AAB4
	lea	Nothingfound.MSG0(PC),A0
	bsr.w	lbC0035CE
lbC00AAB4:
	movem.l	(SP)+,D0/D1/D6/D7/A0-A2
	rts

SUBfoundat.MSG:
	dc.b	'SUB found at:',0
Nothingfound.MSG0:
	dc.b	'Nothing found!',$D,0
SUBseliminate.MSG:
	dc.b	'SUB''s eliminated',$D,0

	movem.l	D0/D1/A0-A4,-(SP)
	lea	0.w,A0
	lea	$200000.L,A1
	moveq	#0,D1
	movea.l	A0,A2
	move.l	#$F2D4B698,D0
lbC00AB02:
	move.l	D1,(A0)
	lea	$1000(A0),A0
	cmpa.l	A0,A1
	bls.w	lbC00AB1C
	move.l	(A0),D1
	move.l	D0,(A0)
	tst.l	(A2)
	bne.w	lbC00AB1C
	cmp.l	(A0),D0
	beq.s	lbC00AB02
lbC00AB1C:
	movea.l	A0,A3
	move.l	A3,$1E299E.L
	bclr	#3,$1E2999.L
	cmpa.l	#$200000,A3
	blt.w	lbC00AB3E
	bset	#3,$1E2999.L
lbC00AB3E:
	movem.l	(SP)+,D0/D1/A0-A4
	rts

	lea	Listoflibrari.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$17A,D0
	bra.w	lbC00B1A8

	lea	Listofports.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$188,D0
	bra.w	lbC00B1A8

	lea	Listofresourc.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$150,D0
	bra.w	lbC00B1A8

lbC00AB74:
	lea	Runningtask.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$114,D0
	bsr.w	lbC00B196
	bsr.w	lbC006FC8
	lea	Readytasks.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$196,D0
	bsr.w	lbC00B1A8
	bsr.w	lbC006FC8
	lea	Waitingtasks.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$1A4,D0
	bra.w	lbC00B1A8

Listofdevices.MSG:
	dc.b	'List of devices:',$D,0
Listofinterru.MSG:
	dc.b	'List of interrupts:',$D,0
Listoflibrari.MSG:
	dc.b	'List of libraries:',$D,0
Listofports.MSG:
	dc.b	'List of ports:',$D,0
Listofresourc.MSG:
	dc.b	'List of resources:',$D,0
Runningtask.MSG:
	dc.b	'Running task:',$D,0
Readytasks.MSG:
	dc.b	'Ready tasks:',$D,0
Waitingtasks.MSG:
	dc.b	'Waiting tasks:',$D,0

lbC00AC38:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	moveq	#0,D2
	moveq	#6,D1
	st	D6
lbC00AC5C:
	movea.l	A1,A0
	jsr	lbC0040BA(PC)
	cmpi.b	#$2E,D0
	beq.w	lbC00ACCC
	jsr	lbC00361C(PC)
	cmpi.b	#$2E,D0
	beq.w	lbC00ACBE
	cmpi.b	#$C4,D0
	beq.w	lbC00ACCC
	cmpi.b	#$E4,D0
	beq.w	lbC00ACCC
	cmpi.b	#$D6,D0
	beq.w	lbC00ACCC
	cmpi.b	#$F6,D0
	beq.w	lbC00ACCC
	cmpi.b	#$DC,D0
	beq.w	lbC00ACCC
	cmpi.b	#$FC,D0
	beq.w	lbC00ACCC
	cmpi.b	#$DF,D0
	beq.w	lbC00ACCC
	cmpi.b	#$A7,D0
	beq.w	lbC00ACCC
	cmpi.w	#$9F,D0
	bls.w	lbC00ACCC
lbC00ACBE:
	tst.b	D6
	bne.w	lbC00ACE4
	st	D6
	moveq	#$2E,D0
	bra.w	lbC00ACCE

lbC00ACCC:
	sf	D6
lbC00ACCE:
	subq.w	#1,D2
	bpl.s	lbC00ACE0
	moveq	#$48,D2
	exg	D0,A1
	bsr.w	lbC0066BE
	exg	D0,A1
	bsr.w	lbC006FBC
lbC00ACE0:
	bsr.w	lbC00670A
lbC00ACE4:
	tst.b	$1E26A1.L
	bne.w	lbC00ACFE
	addq.w	#1,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	beq.w	lbC00AC5C
lbC00ACFE:
	bsr.w	lbC006FF0
	move.l	A0,D0
	lea	Quickdumpupto.MSG(PC),A0
	bsr.w	lbC0035CE
	jsr	$1A9A1C.L
	bra.w	lbC006FF0

Quickdumpupto.MSG:
	dc.b	'Quick-dump up to address:',0

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bclr	#0,D0
	movea.l	D0,A2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	bsr.w	lbC0036A6
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	bclr	#0,D0
	movea.l	D0,A3
	cmpa.l	A2,A3
	bls.w	lbC0087CE
	cmpa.l	#$5000,A2
	bcc.w	lbC00AD8C
	lea	$5000.w,A2
lbC00AD8C:
	lea	Ramtesterinac.MSG(PC),A0
	bsr.w	lbC0035CE
	lea	Passoneramfil.MSG(PC),A0
	bsr.w	lbC0035CE
	movea.l	A2,A0
lbC00AD9E:
	clr.w	(A0)+
	cmpa.l	A0,A3
	bhi.s	lbC00AD9E
	move.l	#$4C4B40,D0
lbC00ADAA:
	subq.l	#1,D0
	bne.s	lbC00ADAA
	movea.l	A2,A0
	sf	$1E2834.L
lbC00ADB6:
	tst.w	(A0)+
	bne.w	lbC00AE38
lbC00ADBC:
	cmpa.l	A0,A3
	bhi.s	lbC00ADB6
	tst.b	$1E2834.L
	bne.w	lbC00ADD2
	lea	RAMsareok.MSG(PC),A0
	bsr.w	lbC0035CE
lbC00ADD2:
	bsr.w	lbC006FF0
	lea	Passtworamfil.MSG(PC),A0
	bsr.w	lbC0035CE
	movea.l	A2,A0
lbC00ADE0:
	move.w	#$FFFF,(A0)+
	cmpa.l	A0,A3
	bhi.s	lbC00ADE0
	move.l	#$4C4B40,D0
lbC00ADEE:
	subq.l	#1,D0
	bne.s	lbC00ADEE
	movea.l	A2,A0
	sf	$1E2834.L
lbC00ADFA:
	cmpi.w	#$FFFF,(A0)
	bne.w	lbC00AE24
lbC00AE02:
	lea	2(A0),A0
	cmpa.l	A0,A3
	bhi.s	lbC00ADFA
	tst.b	$1E2834.L
	bne.w	lbC00AE1C
	lea	RAMsareok.MSG(PC),A0
	bsr.w	lbC0035CE
lbC00AE1C:
	bsr.w	lbC006FF0
	bra.w	lbC0087F0

lbC00AE24:
	st	$1E2834.L
	move.l	A0,D0
	bsr.w	lbC00A1C4
	moveq	#2,D0
	bsr.w	lbC006FD4
	bra.s	lbC00AE02

lbC00AE38:
	st	$1E2834.L
	move.l	A0,D0
	subq.l	#2,D0
	bsr.w	lbC00A1C4
	moveq	#2,D0
	bsr.w	lbC006FD4
	bra.w	lbC00ADBC

Ramtesterinac.MSG:
	dc.b	'Ram-tester in action!',$D
	dc.b	'=====================',$D,0
Passoneramfil.MSG:
	dc.b	'Pass one (ram filled with $0000)',$D,0
Passtworamfil.MSG:
	dc.b	'Pass two (ram filled with $ffff)',$D,0
RAMsareok.MSG:
	dc.b	'RAM''s are o.k.',$D,0
	dc.b	0

lbC00AED2:
	movem.l	D1/D2/A0-A2,-(SP)
	move.l	4.L,D0
	movea.l	D0,A1
	btst	#0,D0
	bne.w	lbC00AF2C
	lea	$26(A1),A0
	bsr.w	lbC00AF76
	bne.w	lbC00AF2C
	add.l	A1,D0
	not.l	D0
	bne.w	lbC00AF2C
	moveq	#0,D1
	moveq	#$16,D2
	lea	$22(A1),A0
lbC00AF02:
	bsr.w	lbC00AF56
	bne.w	lbC00AF2C
	addq.w	#2,A0
	add.w	D0,D1
	dbra	D2,lbC00AF02
	not.w	D1
	lea	$52(A1),A0
	jsr	$1B2E30.L
	cmp.w	D0,D1
	bne.w	lbC00AF2C
	moveq	#1,D0
	movem.l	(SP)+,D1/D2/A0-A2
	rts

lbC00AF2C:
	moveq	#0,D0
	movem.l	(SP)+,D1/D2/A0-A2
	rts

lbC00AF34:
	move.l	A1,-(SP)
	movea.l	A0,A1
	bsr.w	lbC0036A6
	moveq	#0,D0
	tst.b	$1E26BC.L
	bne.w	lbC00AF4C
	jsr	lbC0040BA(PC)
lbC00AF4C:
	movea.l	(SP)+,A1
	tst.b	$1E26BC.L
	rts

lbC00AF56:
	movem.l	D1/A0,-(SP)
	bsr.s	lbC00AF34
	bne.w	lbC00AF6A
	addq.w	#1,A0
	lsl.w	#8,D0
	move.w	D0,D1
	bsr.s	lbC00AF34
	or.w	D1,D0
lbC00AF6A:
	movem.l	(SP)+,D1/A0
	tst.b	$1E26BC.L
	rts

lbC00AF76:
	movem.l	D1/A0,-(SP)
	bsr.s	lbC00AF56
	bne.w	lbC00AF8A
	addq.w	#2,A0
	swap	D0
	move.l	D0,D1
	bsr.s	lbC00AF56
	or.l	D1,D0
lbC00AF8A:
	movem.l	(SP)+,D1/A0
	tst.b	$1E26BC.L
	rts

	lea	Listofdevices.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$15E,D0
	bra.w	lbC00B1A8

	bsr.w	lbC00AED2
	beq.w	lbC00B08C
	movea.l	4.L,A0
	lea	$142(A0),A0
	lea	4(A0),A2
	bsr.s	lbC00AF76
	bne.w	lbC00B08C
	movea.l	D0,A1
	moveq	#0,D2
	moveq	#0,D3
lbC00AFC8:
	tst.b	$1E26A1.L
	bne.w	lbC00B08C
	cmpa.l	A1,A2
	beq.w	lbC00B00E
	lea	14(A1),A0
	bsr.w	lbC00AF56
	bne.w	lbC00B08C
	move.w	D0,D1
	lea	$1C(A1),A0
	bsr.s	lbC00AF76
	bne.w	lbC00B08C
	btst	#1,D1
	beq.w	lbC00AFFE
	add.l	D0,D2
	bra.w	lbC00B000

lbC00AFFE:
	add.l	D0,D3
lbC00B000:
	movea.l	A1,A0
	bsr.w	lbC00AF76
	bne.w	lbC00B08C
	movea.l	D0,A1
	bra.s	lbC00AFC8

lbC00B00E:
	lea	Memorybytesfr.MSG(PC),A0
	bsr.w	lbC0035CE
	moveq	#7,D1
	moveq	#$21,D0
	bsr.w	lbC00670A
	move.l	D2,D0
	bsr.w	lbC0086F8
	bsr.w	lbC0066BE
	moveq	#3,D0
	bsr.w	lbC006FD4
	moveq	#$21,D0
	bsr.w	lbC00670A
	move.l	D3,D0
	bsr.w	lbC0086F8
	bsr.w	lbC0066BE
	moveq	#3,D0
	bsr.w	lbC006FD4
	moveq	#$21,D0
	bsr.w	lbC00670A
	move.l	D2,D0
	add.l	D3,D0
	bsr.w	lbC0086F8
	bsr.w	lbC0066BE
	bra.w	lbC006FF0

Memorybytesfr.MSG:
	dc.b	'Memorybytes free:',$D
	dc.b	'Chipmem    Fastmem    Totalmem',$D,0

lbC00B08C:
	move.l	A0,-(SP)
	lea	Execbasenotva.MSG(PC),A0
	bsr.w	lbC0035CE
	movea.l	(SP)+,A0
	rts

Execbasenotva.MSG:
	dc.b	'Execbase not valid!',$D,0
	dc.b	0

lbC00B0B0:
	movem.l	D0/D1/A1/A2,-(SP)
	movea.l	A0,A2
	bsr.w	lbC00B162
	beq.w	lbC00B12E
	move.l	A2,D0
	jsr	$1A9A1C.L
	moveq	#2,D0
	bsr.w	lbC006FD4
	exg	A1,A0
	bsr.w	lbC0035CE
	lea	8(A2),A0
	bsr.w	lbC00AF34
	bne.w	lbC00B12E
	cmpi.b	#13,D0
	bne.w	lbC00B126
	bsr.w	lbC006FBC
	lea	$AC(A2),A0
	bsr.w	lbC00AF76
	bne.w	lbC00B12E
	tst.l	D0
	beq.w	lbC00B126
	lsl.l	#2,D0
	movea.l	D0,A0
	lea	$10(A0),A0
	bsr.w	lbC00AF76
	bne.w	lbC00B12E
	tst.l	D0
	beq.w	lbC00B126
	lsl.l	#2,D0
	movea.l	D0,A0
	moveq	#$3C,D0
	bsr.w	lbC00670A
	bsr.w	lbC00B136
	moveq	#$3E,D0
	bsr.w	lbC00670A
lbC00B126:
	movea.l	A1,A0
	movem.l	(SP)+,D0/D1/A1/A2
	rts

lbC00B12E:
	suba.l	A0,A0
	movem.l	(SP)+,D0/D1/A1/A2
	rts

lbC00B136:
	movem.l	D0/D1/A0,-(SP)
	jsr	lbC0040BA(PC)
	addq.w	#1,A0
	tst.w	D0
	beq.w	lbC00B15C
	subq.w	#1,D0
	move.w	D0,D1
lbC00B14A:
	jsr	lbC0040BA(PC)
	addq.w	#1,A0
	jsr	lbC00361C(PC)
	bsr.w	lbC00670A
	dbra	D1,lbC00B14A
lbC00B15C:
	movem.l	(SP)+,D0/D1/A0
	rts

lbC00B162:
	move.l	D0,-(SP)
	bsr.w	lbC00AF76
	bne.w	lbC00B190
	movea.l	D0,A1
	lea	10(A0),A0
	bsr.w	lbC00AF76
	bne.w	lbC00B190
	movea.l	D0,A0
	exg	A1,A0
	bsr.w	lbC00AF76
	bne.w	lbC00B190
	tst.l	D0
	beq.w	lbC00B190
	move.l	(SP)+,D0
	rts

lbC00B190:
	move.l	(SP)+,D0
	suba.l	A0,A0
	rts

lbC00B196:
	st	$1E294B.L
	bsr.w	lbC00B1B2
	sf	$1E294B.L
	rts

lbC00B1A8:
	sf	$1E294B.L
	bra.w	lbC00B1B2

lbC00B1B2:
	move.l	A0,-(SP)
	move.l	D0,D1
	bsr.w	lbC00AED2
	beq.w	lbC00B214
	movea.l	4.W,A0
	move.l	D1,D0
	lea	0(A0,D0.W),A0
	move.l	A0,D0
	bsr.w	lbC00AF76
	bne.w	lbC00B214
	movea.l	D0,A0
	bsr.w	lbC00AF76
	bne.w	lbC00B214
	tst.l	D0
	bne.w	lbC00B1EE
	lea	empty.MSG(PC),A0
	bsr.w	lbC0035CE
	bra.w	lbC00B210

lbC00B1EE:
	tst.b	$1E26A1.L
	bne.w	lbC00B210
	bsr.w	lbC00B0B0
	bsr.w	lbC006FF0
	move.l	A0,D0
	tst.b	$1E294B.L
	bne.w	lbC00B210
	tst.l	D0
	bne.s	lbC00B1EE
lbC00B210:
	movea.l	(SP)+,A0
	rts

lbC00B214:
	movea.l	(SP)+,A0
	moveq	#0,D0
	rts

empty.MSG:
	dc.b	'empty!',$D,0

	lea	Listofinterru.MSG(PC),A0
	bsr.w	lbC0035CE
	move.w	#$16C,D0
	bra.w	lbC00B1A8

	cmpi.b	#$13,$1E2C45.L
	bls.w	lbC00B366
	bra.w	lbC00B244

lbC00B242:
	move.l	A1,(A0)+
lbC00B244:
	dbra	D1,lbC00B242
	moveq	#0,D2
	moveq	#0,D3
	moveq	#0,D4
	moveq	#0,D5
	moveq	#0,D6
	moveq	#0,D7
	suba.l	A6,A6
	movea.l	A6,A5
	moveq	#0,D0
	movea.l	D0,A2
	movea.l	$1E2974.L,A3
	move.l	D2,-(SP)
	lea	$400.w,A0
	lea	$F8031C.L,A1
	move.l	A3,D0
	move.l	A0,D1
	sub.l	D1,D0
	move.w	#$303,D1
	moveq	#-10,D2
	pea	$F81F32.L
	jsr	$1C00AA.L
	move.l	(SP)+,D2
	lea	$400.w,A0
	move.l	#$57C,D0
	pea	$F81C02.L
	jsr	$1C00AA.L
	movea.l	D0,A6
	suba.w	#$FCE8,A6
	move.l	A6,4.L
	movea.l	A6,A0
	move.w	#$98,D1
lbC00B2B0:
	clr.l	(A0)+
	dbra	D1,lbC00B2B0
	move.w	$F8000E.L,$22(A6)
	move.w	A2,$128(A6)
	move.l	A3,$3E(A6)
	move.l	A5,$26(A6)
	movem.l	D2-D4,$222(A6)
	movem.l	D5-D7,$2A(A6)
	moveq	#-1,D6
	cmpi.l	#$48454C50,0.w
	bne.w	lbC00B2EE
	movem.l	($100).W,D6/D7
	bset	#$1F,D6
lbC00B2EE:
	movem.l	D6/D7,$202(A6)
	movea.l	A6,A0
	lea	$F81F84.L,A1
	movea.l	A1,A2
	pea	$F81AD0.L
	jsr	$1C00AA.L
	move.w	D0,$10(A6)
	move.w	#$264,$12(A6)
	lea	$17A(A6),A0
	move.l	A0,8(A0)
	addq.w	#4,A0
	clr.l	(A0)
	move.l	A0,-(A0)
	lea	$142(A6),A0
	move.l	A0,8(A0)
	addq.w	#4,A0
	clr.l	(A0)
	move.l	A0,-(A0)
	lea	$400.L,A1
	pea	$F81904.L
	jsr	$1C00AA.L
	lea	$C00000.L,A0
	lea	$DC0000.L,A1
	movea.l	$1E2978.L,A4
	move.l	#0,$DFF02A.L
	jmp	$F802C2.L

lbC00B364:
	move.l	A1,(A0)+
lbC00B366:
	dbra	D1,lbC00B364
	move.l	#$FFFFFFFF,D6
	cmpi.l	#$48454C50,0.w
	bne.s	lbC00B384
	clr.l	0.w
	movem.l	($100).W,D6/D7
lbC00B384:
	lea	$400.w,A6
	suba.w	#$FD8A,A6
	lea	$C00000.L,A0
	lea	$DC0000.L,A1
	movea.l	$1E2978.L,A4
	move.l	A4,D0
	beq.w	lbC00B3AA
	lea	$C00276.L,A6
lbC00B3AA:
	lea	0.w,A0
	lea	$200000.L,A1
	movea.l	$1E2974.L,A3
	lea	$F80240.L,A5
	move.l	#0,$DFF02A.L
	jmp	(A5)

lbC00B3CC:
	movem.l	D0-D4,-(SP)
	moveq	#0,D3
	moveq	#3,D4
	move.b	#$FF,$BFD300.L
lbC00B3DC:
	bset	D4,$BFD100.L
	nop
	nop
	nop
	nop
	bclr	#7,$BFD100.L
	nop
	nop
	nop
	nop
	bclr	D4,$BFD100.L
	nop
	nop
	nop
	nop
	bset	D4,$BFD100.L
	nop
	nop
	nop
	nop
	bset	#7,$BFD100.L
	nop
	nop
	nop
	nop
	bclr	D4,$BFD100.L
	nop
	nop
	nop
	nop
	bset	D4,$BFD100.L
	moveq	#0,D0
	moveq	#$1F,D1
lbC00B43E:
	lsl.l	#1,D0
	bclr	D4,$BFD100.L
	nop
	nop
	nop
	nop
	move.b	$BFE001.L,D2
	lsr.b	#5,D2
	andi.b	#1,D2
	or.b	D2,D0
	bset	D4,$BFD100.L
	nop
	nop
	dbra	D1,lbC00B43E
	bclr	D3,$1E298F.L
	not.l	D0
	beq.w	lbC00B47C
	bset	D3,$1E298F.L
lbC00B47C:
	addq.w	#1,D3
	addq.w	#1,D4
	cmpi.w	#4,D3
	bne.w	lbC00B3DC
	bset	#0,$1E298F.L
	movem.l	(SP)+,D0-D4
	rts

	st	$1E2834.L
	bsr.w	lbC00B4AA
	bra.w	lbC0087F0

	sf	$1E2834.L
lbC00B4AA:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	move.l	D0,D1
	movea.l	$1E26B4.L,A1
	movea.l	$1E26B8.L,A2
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC00B4EE
	bclr	#0,D0
	movea.l	D0,A1
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC00B4EE
	bclr	#0,D0
	movea.l	D0,A2
lbC00B4EE:
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	beq.w	lbC00B504
	movea.l	$1E26B4.L,A1
lbC00B504:
	exg	A1,A2
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	beq.w	lbC00B51C
	movea.l	$1E26B8.L,A1
lbC00B51C:
	exg	A1,A2
	cmpa.l	A2,A1
	bgt.w	lbC0087CE
	jsr	$1AB104.L
	movea.l	A1,A0
	lea	$1E26A1.L,A5
	movea.l	A2,A6
	move.l	$1E2974.L,D0
	cmp.l	A0,D0
	bls.w	lbC00B548
	cmp.l	A2,D0
	bgt.w	lbC00B5A8
	movea.l	D0,A2
lbC00B548:
	tst.l	$1E2BC8.L
	beq.w	lbC00B578
	move.l	$1E2BC8.L,D0
	cmp.l	A0,D0
	bls.w	lbC00B578
	move.l	$1E2BC4.L,D0
	cmp.l	A0,D0
	bgt.w	lbC00B578
	move.l	$1E2BC8.L,D0
	cmp.l	A2,D0
	bgt.w	lbC00B5A8
	move.l	A2,D0
lbC00B578:
	tst.l	$1E2978.L
	beq.w	lbC00B5A8
	move.l	$1E2978.L,D0
	cmp.l	A0,D0
	bls.w	lbC00B5A8
	move.l	#$C00000,D0
	cmp.l	A0,D0
	bgt.w	lbC00B5A8
	move.l	$1E2978.L,D0
	cmp.l	A2,D0
	bgt.w	lbC00B5A8
	movea.l	D0,A2
lbC00B5A8:
	tst.b	(A5)
	bne.w	lbC00B68A
	cmpa.l	A2,A0
	ble.s	lbC00B624
	cmpa.l	A6,A2
	bge.w	lbC00B68A
	move.l	$1E2974.L,D0
	cmp.l	A2,D0
	bne.w	lbC00B60C
	tst.l	$1E2BC8.L
	beq.w	lbC00B5E8
	movea.l	$1E2BC4.L,A0
	move.l	$1E2BC8.L,D0
	movea.l	A6,A2
	cmp.l	A6,D0
	bge.w	lbC00B5E4
	movea.l	D0,A2
lbC00B5E4:
	bra.w	lbC00B624

lbC00B5E8:
	tst.l	$1E2978.L
	beq.w	lbC00B68A
	movea.l	#$C00000,A0
	move.l	$1E2978.L,D0
	movea.l	A6,A2
	cmp.l	A6,D0
	bge.w	lbC00B608
	movea.l	D0,A2
lbC00B608:
	bra.w	lbC00B624

lbC00B60C:
	tst.l	$1E2BC8.L
	beq.w	lbC00B68A
	move.l	$1E2BC8.L,D0
	cmp.l	A2,D0
	beq.s	lbC00B5E8
	bra.w	lbC00B68A

lbC00B624:
	movea.l	A0,A4
	bsr.w	lbC005CDE
	tst.w	D0
	beq.s	lbC00B646
	andi.w	#$F000,D0
	cmpi.w	#$F000,D0
	beq.s	lbC00B646
	cmpi.w	#$7000,D0
	beq.s	lbC00B646
	cmpi.w	#$A000,D0
	beq.s	lbC00B646
	bra.s	lbC00B64C

lbC00B646:
	addq.w	#2,A0
	bra.w	lbC00B5A8

lbC00B64C:
	movem.l	D0-D3/A1-A4,-(SP)
	bsr.w	lbC004F06
	movem.l	(SP)+,D0-D3/A1-A4
	lea	$1E2724.L,A3
	bsr.w	lbC00B6DE
	cmp.l	D0,D1
	beq.w	lbC00B6C6
	lea	$1E2736.L,A3
	bsr.w	lbC00B6DE
	cmp.l	D0,D1
	beq.w	lbC00B6C6
lbC00B678:
	tst.b	$1E2834.L
	bne.w	lbC00B5A8
	lea	2(A4),A0
	bra.w	lbC00B5A8

lbC00B68A:
	lea	Searcheduptoa.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	A4,D0
	cmpi.l	#$C00000,D0
	bne.w	lbC00B6A6
	move.l	$1E2974.L,D0
lbC00B6A6:
	jsr	$1A9A1C.L
	bra.w	lbC006FF0

Searcheduptoa.MSG:
	dc.b	'Searched up to adr: ',0,0

lbC00B6C6:
	move.l	A4,D0
	jsr	$1A9A1C.L
	moveq	#1,D0
	bsr.w	lbC006FD4
	jsr	lbC005D36(PC)
	bsr.w	lbC006FF0
	bra.s	lbC00B678

lbC00B6DE:
	movem.l	D1/D2/A0,-(SP)
	moveq	#-1,D0
	move.w	(A3),D1
	bmi.w	lbC00B71A
	cmpi.w	#2,D1
	beq.w	lbC00B720
	cmpi.w	#5,D1
	beq.w	lbC00B732
	cmpi.w	#7,D1
	beq.w	lbC00B74A
	cmpi.w	#8,D1
	beq.w	lbC00B74A
	cmpi.w	#9,D1
	beq.w	lbC00B750
	cmpi.w	#15,D1
	beq.w	lbC00B75A
lbC00B71A:
	movem.l	(SP)+,D1/D2/A0
	rts

lbC00B720:
	move.l	2(A3),D1
	lsl.w	#2,D1
	lea	$1E2628.L,A0
	move.l	0(A0,D1.W),D0
	bra.s	lbC00B71A

lbC00B732:
	move.l	2(A3),D1
	move.l	6(A3),D2
	lsl.w	#2,D1
	lea	$1E2628.L,A0
	move.l	0(A0,D1.W),D0
	add.l	D2,D0
	bra.s	lbC00B71A

lbC00B74A:
	move.l	2(A3),D0
	bra.s	lbC00B71A

lbC00B750:
	move.l	A4,D0
	addq.l	#2,D0
	add.l	6(A3),D0
	bra.s	lbC00B71A

lbC00B75A:
	move.l	6(A3),D0
	bra.s	lbC00B71A

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	moveq	#$5E,D0
	bsr.w	lbC00670A
	move.l	A1,D0
	jsr	$1A9A1C.L
	bra.w	lbC006FBC

lbC00B792:
	move.l	A0,-(SP)
	movea.l	A1,A0
	bsr.w	lbC005CF6
	movea.l	(SP)+,A0
	rts

	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC0087CE
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0087CE
	movem.l	D7/A0,-(SP)
	bsr.w	lbC005CB2
	movem.l	(SP)+,D7/A0
	tst.b	$1E26B3.L
	beq.w	lbC00B7D6
	rts

lbC00B7D6:
	tst.b	$1E3162.L
	beq.s	lbC00B800
	st	$1E3164.L
	move.l	-4(A1),$1E3166.L
	move.l	-4(A1),$1E316A.L
	move.l	A1,$1E3170.L
	clr.w	$1E316E.L
lbC00B800:
	move.l	#$20002E,D0
	bsr.w	lbC00C9BA
	swap	D0
	tst.w	D0
	beq.w	lbC00C2C4
	swap	D0
	move.l	D0,D2
	swap	D0
	bsr.w	lbC00C96C
	tst.w	D0
	bmi.w	lbC0087CE
	move.w	D1,$1E2834.L
	move.w	D0,$1E2720.L
	subi.w	#$3A,$1E2720.L
	move.w	#$FFFF,$1E2722.L
	cmpi.w	#$2E,D2
	bne.w	lbC00B87A
	bsr.w	lbC006F44
	move.w	#0,$1E2722.L
	cmpi.b	#$42,D0
	beq.w	lbC00B87A
	move.w	#1,$1E2722.L
	cmpi.b	#$57,D0
	beq.w	lbC00B87A
	move.w	#2,$1E2722.L
	cmpi.b	#$4C,D0
	bne.w	lbC0087CE
lbC00B87A:
	bsr.w	lbC00C4F0
	cmpi.w	#9,$1E2724.L
	bne.w	lbC00B89A
	move.l	$1E2726.L,D0
	sub.l	A1,D0
	subq.l	#2,D0
	move.l	D0,$1E2726.L
lbC00B89A:
	lea	2(A1),A4
	move.w	$1E2720.L,D0
	addi.w	#$3A,D0
	bne.w	lbC00B942
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	tst.w	$1E2736.L
	bpl.w	lbC0087CE
	move.w	#$6100,D0
lbC00B8C4:
	subq.w	#1,$1E2724.L
	ori.w	#1,$1E2724.L
	cmpi.w	#7,$1E2724.L
	bne.w	lbC0087CE
	move.l	$1E2726.L,D1
	sub.l	A1,D1
	subq.l	#2,D1
	cmpi.w	#1,$1E2722.L
	beq.s	lbC00B908
	move.l	D1,D2
	andi.l	#$FFFFFF80,D2
	beq.w	lbC00B938
	eori.l	#$FFFFFF80,D2
	beq.w	lbC00B938
lbC00B908:
	move.l	D1,D2
	andi.l	#$FFFF8000,D2
	beq.w	lbC00B91E
	eori.l	#$FFFF8000,D2
	bne.w	lbC0087CE
lbC00B91E:
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D1,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C2C4

lbC00B938:
	or.b	D1,D0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00B942:
	cmpi.w	#$10,D0
	bhi.w	lbC00B988
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	tst.w	$1E2736.L
	bpl.w	lbC0087CE
	move.w	$1E2724.L,D1
	move.w	#$1FD,D2
	btst	D1,D2
	beq.w	lbC0087CE
	move.w	D0,D1
	subq.w	#1,D1
	move.w	#$50C0,D0
	bsr.w	lbC00C2E0
	lea	$1E2724.L,A0
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00B988:
	cmpi.w	#$20,D0
	bhi.w	lbC00B9B8
	tst.w	$1E2736.L
	bpl.w	lbC0087CE
	cmpi.w	#8,$1E2724.L
	bne.w	lbC0087CE
	move.w	D0,D1
	subi.w	#$11,D1
	move.w	#$6000,D0
	bsr.w	lbC00C2E0
	bra.w	lbC00B8C4

lbC00B9B8:
	cmpi.w	#$21,D0
	bne.w	lbC00B9C6
	move.w	#$11,D0
	bra.s	lbC00B988

lbC00B9C6:
	cmpi.w	#$22,D0
	bne.w	lbC00BA10
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	tst.w	$1E2736.L
	bpl.w	lbC0087CE
	cmpi.w	#11,$1E2724.L
	bne.w	lbC0087CE
	move.w	#$4E72,D0
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	$1E2728.L,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C2C4

lbC00BA10:
	cmpi.w	#$23,D0
	bne.w	lbC00BA4A
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	tst.w	$1E2736.L
	bpl.w	lbC0087CE
	cmpi.w	#11,$1E2724.L
	bne.w	lbC0087CE
	move.w	#$4E40,D0
	or.l	$1E2726.L,D0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00BA4A:
	cmpi.w	#$24,D0
	bne.w	lbC00BC00
	cmpi.w	#11,$1E2724.L
	bhi.w	lbC00BACE
	cmpi.w	#8,$1E2736.L
	bhi.w	lbC00BACE
	move.w	$1E2722.L,D1
	bpl.w	lbC00BA7C
	moveq	#1,D1
	move.w	D1,$1E2722.L
lbC00BA7C:
	cmpi.w	#2,D1
	beq.w	lbC00BA8A
	addq.w	#1,D1
	ori.w	#1,D1
lbC00BA8A:
	ror.w	#4,D1
	move.w	D1,D0
	lea	$1E2724.L,A0
	bsr.w	lbC00C348
	movem.l	D0/A0,-(SP)
	movea.l	A1,A0
	bsr.w	lbC005CDE
	move.w	D0,D2
	movem.l	(SP)+,D0/A0
	moveq	#0,D0
	lea	$1E2736.L,A0
	bsr.w	lbC00C348
	move.w	D0,D1
	lsl.w	#3,D0
	andi.w	#$1C0,D0
	ror.w	#7,D1
	andi.w	#$E00,D1
	or.w	D1,D0
	or.w	D2,D0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00BACE:
	cmpi.w	#12,$1E2736.L
	bne.w	lbC00BB0E
	move.w	$1E2724.L,D1
	move.w	#$FFD,D2
	btst	D1,D2
	beq.w	lbC0087CE
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	lea	$1E2724.L,A0
	move.w	#1,$1E2722.L
	move.w	#$44C0,D0
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BB0E:
	cmpi.w	#13,$1E2736.L
	bne.w	lbC00BB6A
	move.w	$1E2724.L,D1
	move.w	#$FFD,D2
	btst	D1,D2
	beq.w	lbC0087CE
	move.w	#$46C0,D0
	tst.w	$1E2722.L
	bmi.w	lbC00BB54
	cmpi.w	#1,$1E2722.L
	beq.w	lbC00BB54
	cmpi.w	#0,$1E2722.L
	bne.w	lbC0087CE
	move.w	#$44C0,D0
lbC00BB54:
	lea	$1E2724.L,A0
	move.w	#1,$1E2722.L
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BB6A:
	cmpi.w	#13,$1E2724.L
	bne.w	lbC00BBA2
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	move.w	$1E2736.L,D1
	move.w	#$1FD,D2
	btst	D1,D2
	beq.w	lbC0087CE
	lea	$1E2736.L,A0
	move.w	#$40C0,D0
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BBA2:
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	cmpi.w	#15,$1E2724.L
	bne.w	lbC00BBD6
	cmpi.w	#1,$1E2736.L
	bne.w	lbC0087CE
	move.w	#$4E68,D0
	or.l	$1E2738.L,D0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00BBD6:
	cmpi.w	#15,$1E2736.L
	bne.w	lbC0087CE
	cmpi.w	#1,$1E2724.L
	bne.w	lbC0087CE
	move.w	#$4E60,D0
	or.l	$1E2726.L,D0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00BC00:
	cmpi.w	#$25,D0
	bne.w	lbC00BC62
	cmpi.w	#1,$1E2736.L
	bne.w	lbC0087CE
	move.w	$1E2724.L,D1
	move.w	#$FFF,D0
	btst	D1,D0
	beq.w	lbC0087CE
	move.w	$1E2722.L,D1
	beq.w	lbC0087CE
	bpl.w	lbC00BC3A
	moveq	#1,D1
	move.w	D1,$1E2722.L
lbC00BC3A:
	move.w	#$3040,D0
	cmpi.w	#1,D1
	beq.w	lbC00BC4A
	move.w	#$2040,D0
lbC00BC4A:
	move.l	$1E2738.L,D1
	ror.w	#7,D1
	or.w	D1,D0
	lea	$1E2724.L,A0
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BC62:
	cmpi.w	#$27,D0
	bne.w	lbC00BD0A
	move.w	$1E2722.L,D1
	beq.w	lbC0087CE
	bpl.w	lbC00BC80
	moveq	#1,D1
	move.w	D1,$1E2722.L
lbC00BC80:
	subq.w	#1,D1
	lsl.w	#6,D1
	move.w	#$188,D0
	or.w	D1,D0
	move.l	$1E2738.L,D2
	or.l	$1E273C.L,D0
	move.l	$1E2726.L,D3
	ror.w	#7,D3
	or.w	D3,D0
	cmpi.w	#0,$1E2724.L
	beq.w	lbC00BCE4
	move.w	#$108,D0
	or.w	D1,D0
	move.l	$1E2726.L,D2
	or.l	$1E272A.L,D0
	move.l	$1E2738.L,D1
	ror.w	#7,D1
	or.w	D1,D0
	cmpi.w	#0,$1E2736.L
	bne.w	lbC0087CE
	cmpi.w	#5,$1E2724.L
	bne.w	lbC0087CE
	bra.w	lbC00BCF0

lbC00BCE4:
	cmpi.w	#5,$1E2736.L
	bne.w	lbC0087CE
lbC00BCF0:
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D2,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C2C4

lbC00BD0A:
	cmpi.w	#$28,D0
	bne.w	lbC00BD5E
	cmpi.w	#11,$1E2724.L
	bne.w	lbC0087CE
	cmpi.w	#0,$1E2736.L
	bne.w	lbC0087CE
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	move.w	#$7000,D0
	move.l	$1E2738.L,D1
	ror.w	#7,D1
	or.w	D1,D0
	move.l	$1E2726.L,D1
	cmpi.w	#$FF,D1
	bhi.w	lbC0087CE
	andi.w	#$FF,D1
	or.w	D1,D0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00BD5E:
	cmpi.w	#$26,D0
	bne.w	lbC00BE32
	move.w	$1E2722.L,D1
	beq.w	lbC0087CE
	bpl.w	lbC00BD78
	move.w	#1,D1
lbC00BD78:
	lsr.w	#1,D1
	lsl.w	#6,D1
	cmpi.w	#14,$1E2724.L
	bne.w	lbC00BDDE
	move.w	$1E2736.L,D2
	move.w	#$1F4,D3
	btst	D2,D3
	beq.w	lbC0087CE
	move.l	$1E2726.L,D2
	cmpi.w	#4,$1E2736.L
	beq.w	lbC00BDB8
	move.w	D2,D3
	moveq	#0,D2
	moveq	#15,D4
lbC00BDB0:
	lsr.w	#1,D3
	roxl.w	#1,D2
	dbra	D4,lbC00BDB0
lbC00BDB8:
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D2,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	move.w	#$4880,D0
	or.w	D1,D0
	lea	$1E2736.L,A0
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BDDE:
	cmpi.w	#14,$1E2736.L
	bne.w	lbC0087CE
	move.w	$1E2724.L,D2
	move.w	#$7EC,D3
	btst	D2,D3
	beq.w	lbC0087CE
	move.l	$1E2738.L,D2
	moveq	#0,D3
	moveq	#15,D4
lbC00BE04:
	lsr.w	#1,D2
	roxl.w	#1,D3
	dbra	D4,lbC00BE04
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D3,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	move.w	#$4C80,D0
	or.w	D1,D0
	lea	$1E2724.L,A0
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BE32:
	cmpi.w	#$38,D0
	bhi.w	lbC00BEA6
	tst.w	$1E2722.L
	bpl.w	lbC0087CE
	tst.w	$1E2724.L
	bne.w	lbC0087CE
	cmpi.w	#8,$1E2736.L
	bne.w	lbC0087CE
	subi.w	#$29,D0
	move.w	D0,D1
	move.w	#$50C8,D0
	bsr.w	lbC00C2E0
	or.l	$1E2726.L,D0
	move.l	$1E2738.L,D1
	sub.l	A4,D1
	move.l	D1,D2
	andi.l	#$FFFF8000,D2
	beq.w	lbC00BE8C
	eori.l	#$FFFF8000,D2
	bne.w	lbC0087CE
lbC00BE8C:
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D1,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bsr.w	lbC00B792
	bra.w	lbC00C2C4

lbC00BEA6:
	cmpi.w	#$39,D0
	bne.w	lbC00BEB6
	move.w	#$2A,D0
	bra.w	lbC00BE32

lbC00BEB6:
	move.w	$1E2720.L,D0
	mulu.w	#6,D0
	suba.l	A4,A4
	lea	lbL00CC5A(PC),A3
	lea	0(A3,D0.L),A3
	move.w	$1E2834.L,D7
lbC00BED0:
	moveq	#0,D0
	move.b	(A3),D0
	bne.w	lbC00BF06
	tst.w	$1E2722.L
	bpl.w	lbC00C2BA
	tst.w	$1E2724.L
	bpl.w	lbC00C2BA
	tst.w	$1E2736.L
	bpl.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00B792
	lea	2(A1),A4
	bra.w	lbC00C2C4

lbC00BF06:
	subq.w	#1,D0
	bne.w	lbC00BF5C
	tst.w	$1E2724.L
	bne.w	lbC00C2BA
	move.w	$1E2736.L,D0
	move.w	2(A3),D1
	btst	D0,D1
	beq.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	lea	$1E2724.L,A0
	move.l	2(A0),D1
	ror.w	#7,D1
	or.w	D1,D0
	lea	$1E2736.L,A0
	lea	2(A1),A4
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BF5C:
	subq.w	#1,D0
	bne.w	lbC00BFB2
	tst.w	$1E2736.L
	bne.w	lbC00C2BA
	move.w	$1E2724.L,D0
	move.w	2(A3),D1
	btst	D0,D1
	beq.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	lea	$1E2736.L,A0
	move.l	2(A0),D1
	ror.w	#7,D1
	or.w	D1,D0
	lea	$1E2724.L,A0
	lea	2(A1),A4
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00BFB2:
	subq.w	#1,D0
	bne.w	lbC00C004
	cmpi.w	#4,$1E2724.L
	bne.w	lbC00C2BA
	cmpi.w	#4,$1E2736.L
	bne.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	move.l	$1E2726.L,D1
	ror.w	#7,D1
	or.w	D1,D0
	move.l	$1E2738.L,D1
	or.w	D1,D0
	bsr.w	lbC00B792
	lea	2(A1),A4
	bra.w	lbC00C2C4

lbC00C004:
	subq.w	#1,D0
	bne.w	lbC00C058
	cmpi.w	#1,$1E2736.L
	bne.w	lbC00C2BA
	move.w	2(A3),D2
	move.w	$1E2724.L,D1
	btst	D1,D2
	beq.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#7,D1
	or.w	D1,D0
	move.l	$1E2738.L,D1
	ror.w	#7,D1
	or.w	D1,D0
	lea	$1E2724.L,A0
	lea	2(A1),A4
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00C058:
	subq.w	#1,D0
	bne.w	lbC00C0E0
	cmpi.w	#11,$1E2724.L
	bne.w	lbC00C2BA
	move.w	2(A3),D2
	move.w	D2,D0
	move.w	$1E2736.L,D1
	btst	D1,D2
	beq.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	lea	$1E2736.L,A0
	lea	2(A1),A4
	cmpi.w	#2,$1E2722.L
	bne.w	lbC00C0C2
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.l	$1E2726.L,D0
	bsr.w	lbC005D10
	addq.w	#4,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C0D8

lbC00C0C2:
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	$1E2728.L,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
lbC00C0D8:
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00C0E0:
	subq.w	#1,D0
	bne.w	lbC00C138
	cmpi.w	#11,$1E2724.L
	bne.w	lbC00C2BA
	move.w	2(A3),D2
	move.w	$1E2736.L,D1
	btst	D1,D2
	beq.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	move.l	$1E2726.L,D1
	andi.w	#7,D1
	ror.w	#7,D1
	or.w	D1,D0
	lea	$1E2736.L,A0
	lea	2(A1),A4
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00C138:
	subq.w	#1,D0
	bne.w	lbC00C17A
	cmpi.w	#11,$1E2724.L
	bne.w	lbC00C2BA
	cmpi.w	#12,$1E2736.L
	bne.w	lbC00C2BA
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00B792
	addq.w	#2,A1
	move.w	$1E2728.L,D0
	bsr.w	lbC00B792
	addq.w	#2,A1
	movea.l	A1,A4
	bra.w	lbC00C2C4

lbC00C17A:
	subq.w	#1,D0
	bne.w	lbC00C1BC
	cmpi.w	#11,$1E2724.L
	bne.w	lbC00C2BA
	cmpi.w	#13,$1E2736.L
	bne.w	lbC00C2BA
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	4(A3),D0
	bsr.w	lbC00B792
	addq.w	#2,A1
	move.w	$1E2728.L,D0
	bsr.w	lbC00B792
	addq.w	#2,A1
	movea.l	A1,A4
	bra.w	lbC00C2C4

lbC00C1BC:
	subq.w	#1,D0
	bne.w	lbC00C1C6
	bra.w	lbC0087CE

lbC00C1C6:
	subq.w	#1,D0
	bne.w	lbC00C20E
	tst.w	$1E2736.L
	bpl.w	lbC00C2BA
	move.w	$1E2724.L,D1
	move.w	2(A3),D2
	btst	D1,D2
	beq.w	lbC00C2BA
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	4(A3),D0
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	lea	$1E2724.L,A0
	lea	2(A1),A4
	bsr.w	lbC00C348
	bra.w	lbC00C2C4

lbC00C20E:
	subq.w	#1,D0
	bne.w	lbC00C25E
	cmpi.w	#3,$1E2724.L
	bne.w	lbC00C2BA
	cmpi.w	#3,$1E2736.L
	bne.w	lbC00C2BA
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	move.w	4(A3),D0
	or.w	D1,D0
	or.l	$1E2726.L,D0
	move.l	$1E2738.L,D1
	ror.w	#7,D1
	or.w	D1,D0
	bsr.w	lbC00B792
	lea	2(A1),A4
	bra.w	lbC00C2C4

lbC00C25E:
	subq.w	#1,D0
	bne.w	lbC00C2BA
	cmpi.w	#1,$1E2724.L
	bne.w	lbC00C2BA
	cmpi.w	#11,$1E2736.L
	bne.w	lbC00C2BA
	bsr.w	lbC00C2E6
	bcs.w	lbC00C2BA
	move.w	4(A3),D0
	move.w	$1E2722.L,D1
	lsl.w	#6,D1
	or.w	D1,D0
	or.l	$1E2726.L,D0
	bsr.w	lbC00B792
	lea	2(A1),A4
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	$1E273A.L,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C2C4

lbC00C2BA:
	addq.w	#6,A3
	dbra	D7,lbC00BED0
	bra.w	lbC0087CE

lbC00C2C4:
	move.w	#$5E,D0
	jsr	lbC00670A(PC)
	move.l	A4,D0
	jsr	$1A9A1C.L
	bsr.w	lbC006FBC
	sf	$1E3164.L
	rts

lbC00C2E0:
	lsl.w	#8,D1
	or.w	D1,D0
	rts

lbC00C2E6:
	movem.l	D1/D2,-(SP)
	moveq	#0,D2
	move.b	1(A3),D2
	move.w	$1E2722.L,D1
	bmi.w	lbC00C30A
	btst	D1,D2
	beq.w	lbC00C33E
lbC00C300:
	andi.w	#$FFFE,SR
	movem.l	(SP)+,D1/D2
	rts

lbC00C30A:
	move.w	#1,$1E2722.L
	btst	#1,D2
	bne.s	lbC00C300
	move.w	#0,$1E2722.L
	cmpi.w	#0,D2
	beq.s	lbC00C300
	subq.w	#1,D2
	move.w	D2,$1E2722.L
	cmpi.w	#3,D2
	bne.s	lbC00C300
	subq.w	#1,D2
	move.w	D2,$1E2722.L
	bra.s	lbC00C300

lbC00C33E:
	ori.w	#1,SR
	movem.l	(SP)+,D1/D2
	rts

lbC00C348:
	movem.l	D1-D3,-(SP)
	move.w	(A0),D1
	cmpi.w	#6,D1
	bhi.w	lbC00C3DE
	lsl.w	#3,D1
	cmpi.w	#$20,D1
	bhi.w	lbC00C370
	move.l	2(A0),D2
	or.w	D2,D1
	or.w	D1,D0
	bsr.w	lbC00B792
	bra.w	lbC00C4EA

lbC00C370:
	cmpi.w	#$28,D1
	bhi.w	lbC00C39E
	move.l	2(A0),D2
	move.l	6(A0),D3
	or.w	D3,D1
	or.w	D1,D0
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D2,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C39E:
	move.l	2(A0),D2
	move.l	6(A0),D3
	or.w	D3,D1
	or.w	D1,D0
	bsr.w	lbC00B792
	andi.w	#$FF,D2
	move.l	10(A0),D3
	ror.w	#1,D3
	or.w	D3,D2
	move.l	14(A0),D3
	ror.w	#4,D3
	or.w	D3,D2
	swap	D3
	lsr.w	#4,D3
	or.w	D3,D2
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D2,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C3DE:
	cmpi.w	#7,D1
	bne.w	lbC00C406
	ori.w	#$38,D0
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	move.w	4(A0),D0
	movea.l	A4,A0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C406:
	cmpi.w	#8,D1
	bne.w	lbC00C42E
	ori.w	#$39,D0
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	move.l	2(A0),D0
	movea.l	A4,A0
	bsr.w	lbC005D10
	addq.w	#4,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C42E:
	cmpi.w	#9,D1
	bne.w	lbC00C456
	ori.w	#$3A,D0
	bsr.w	lbC00B792
	movem.l	D0/A0,-(SP)
	move.w	4(A0),D0
	movea.l	A4,A0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C456:
	cmpi.w	#10,D1
	bne.w	lbC00C49A
	ori.w	#$3B,D0
	bsr.w	lbC00B792
	move.l	2(A0),D1
	andi.w	#$FF,D1
	move.l	6(A0),D2
	ror.w	#1,D2
	or.w	D2,D1
	move.l	10(A0),D2
	ror.w	#4,D2
	or.w	D2,D1
	swap	D2
	ror.w	#4,D2
	or.w	D2,D1
	movem.l	D0/A0,-(SP)
	movea.l	A4,A0
	move.w	D1,D0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C49A:
	cmpi.w	#11,D1
	bne.w	lbC00C4E6
	ori.w	#$3C,D0
	bsr.w	lbC00B792
	cmpi.w	#1,$1E2722.L
	bhi.w	lbC00C4CE
	movem.l	D0/A0,-(SP)
	move.w	4(A0),D0
	movea.l	A4,A0
	bsr.w	lbC005CF6
	addq.w	#2,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C4CE:
	movem.l	D0/A0,-(SP)
	move.l	2(A0),D0
	movea.l	A4,A0
	bsr.w	lbC005D10
	addq.w	#4,A4
	movem.l	(SP)+,D0/A0
	bra.w	lbC00C4EA

lbC00C4E6:
	bsr.w	lbC00B792
lbC00C4EA:
	movem.l	(SP)+,D1-D3
	rts

lbC00C4F0:
	movem.l	D0/A1,-(SP)
	move.w	#$FFFF,$1E2724.L
	move.w	#$FFFF,$1E2736.L
	bsr.w	lbC005CB2
	tst.b	$1E26B3.L
	bne.w	lbC00C546
	bsr.w	lbC007F7E
	lea	$1E2724.L,A1
	bsr.w	lbC00C54C
	tst.b	$1E26B3.L
	bne.w	lbC00C546
	cmpi.w	#$2C,D0
	bne.w	lbC0087CE
	lea	$1E2736.L,A1
	bsr.w	lbC00C54C
	tst.b	$1E26B3.L
	beq.w	lbC0087CE
lbC00C546:
	movem.l	(SP)+,D0/A1
	rts

lbC00C54C:
	movem.l	D1-D6/A1-A6,-(SP)
	bsr.w	lbC006F44
	moveq	#0,D1
	move.w	D0,D1
	bsr.w	lbC006F44
	cmpi.w	#$37,D0
	bhi.w	lbC00C5EE
	cmpi.w	#$2F,D0
	bls.w	lbC00C5EE
	cmpi.w	#$41,D1
	beq.s	lbC00C5BA
	cmpi.w	#$44,D1
	bne.w	lbC00C5EE
	clr.w	(A1)
	subi.w	#$30,D0
	move.l	D0,2(A1)
	bsr.w	lbC006F44
	cmpi.w	#$2D,D0
	beq.w	lbC00C8D8
	cmpi.w	#$2F,D0
	beq.w	lbC00C8D8
	cmpi.w	#$20,D0
	beq.w	lbC00C5A8
	cmpi.w	#$2C,D0
	bne.w	lbC00C5EA
lbC00C5A8:
	cmpi.w	#$20,D0
	bne.w	lbC00C5B4
	bsr.w	lbC005CB2
lbC00C5B4:
	movem.l	(SP)+,D1-D6/A1-A6
	rts

lbC00C5BA:
	move.w	#1,(A1)
	subi.w	#$30,D0
	move.l	D0,2(A1)
	bsr.w	lbC006F44
	cmpi.w	#$2D,D0
	beq.w	lbC00C8D8
	cmpi.w	#$2F,D0
	beq.w	lbC00C8D8
	cmpi.w	#$20,D0
	beq.s	lbC00C5A8
	cmpi.w	#$2C,D0
	bne.w	lbC00C5EA
	bra.s	lbC00C5A8

lbC00C5EA:
	jsr	lbC007F7E(PC)
lbC00C5EE:
	cmpi.w	#$55,D1
	bne.w	lbC00C614
	cmpi.w	#$53,D0
	bne.w	lbC0087CE
	bsr.w	lbC006F44
	cmpi.w	#$50,D0
	bne.w	lbC0087CE
	move.w	#15,(A1)
	bsr.w	lbC005CB2
	bra.s	lbC00C5B4

lbC00C614:
	cmpi.w	#$43,D0
	bne.w	lbC00C644
	cmpi.w	#$43,D1
	bne.w	lbC00C644
	bsr.w	lbC006F44
	bsr.w	lbC007F7E
	cmpi.w	#$52,D0
	bne.w	lbC00C644
	bsr.w	lbC006F44
	bsr.w	lbC005CB2
	move.w	#12,(A1)
	bra.w	lbC00C5B4

lbC00C644:
	bsr.w	lbC007F7E
	bsr.w	lbC007F7E
	bsr.w	lbC006F44
	cmpi.w	#$2D,D0
	beq.w	lbC00C894
	cmpi.w	#$28,D0
	beq.w	lbC00C848
	cmpi.w	#$23,D0
	beq.w	lbC00C82A
	cmpi.w	#$53,D0
	bne.w	lbC00C688
	bsr.w	lbC006F44
	cmpi.w	#$52,D0
	bne.w	lbC00C5B4
	bsr.w	lbC005CB2
	move.w	#13,(A1)
	bra.w	lbC00C5B4

lbC00C688:
	bsr.w	lbC007F7E
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC00C5B4
	move.l	D0,2(A1)
	bsr.w	lbC006F44
	cmpi.w	#$28,D0
	bne.w	lbC00C802
	bsr.w	lbC006F44
	cmpi.w	#$41,D0
	beq.w	lbC00C75C
	cmpi.w	#$50,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	cmpi.w	#$43,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	cmpi.w	#$29,D0
	beq.w	lbC00C750
	cmpi.w	#$2C,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	move.l	#0,6(A1)
	cmpi.w	#$44,D0
	beq.w	lbC00C702
	move.l	#1,6(A1)
	cmpi.w	#$41,D0
	bne.w	lbC00C5B4
lbC00C702:
	bsr.w	lbC006F44
	jsr	lbC0066F6(PC)
	cmpi.w	#7,D0
	bhi.w	lbC00C5B4
	move.l	D0,10(A1)
lbC00C716:
	bsr.w	lbC006F44
	cmpi.w	#$29,D0
	bne.w	lbC00C72E
	bsr.w	lbC005CB2
	move.w	#10,(A1)
	bra.w	lbC00C5B4

lbC00C72E:
	cmpi.w	#$2E,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	cmpi.w	#$57,D0
	beq.s	lbC00C716
	cmpi.w	#$4C,D0
	bne.w	lbC00C5B4
	bset	#7,10(A1)
	bra.s	lbC00C716

lbC00C750:
	bsr.w	lbC005CB2
	move.w	#9,(A1)
	bra.w	lbC00C5B4

lbC00C75C:
	bsr.w	lbC006F44
	jsr	lbC0066F6(PC)
	cmpi.w	#7,D0
	bhi.w	lbC00C5B4
	move.l	D0,6(A1)
	bsr.w	lbC006F44
	cmpi.w	#$29,D0
	bne.w	lbC00C788
	bsr.w	lbC005CB2
	move.w	#5,(A1)
	bra.w	lbC00C5B4

lbC00C788:
	cmpi.w	#$2C,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	move.l	#0,10(A1)
	cmpi.w	#$44,D0
	beq.w	lbC00C7B4
	move.l	#1,10(A1)
	cmpi.w	#$41,D0
	bne.w	lbC00C5B4
lbC00C7B4:
	bsr.w	lbC006F44
	jsr	lbC0066F6(PC)
	cmpi.w	#7,D0
	bhi.w	lbC00C5B4
	move.l	D0,14(A1)
lbC00C7C8:
	bsr.w	lbC006F44
	cmpi.w	#$29,D0
	bne.w	lbC00C7E0
	bsr.w	lbC005CB2
	move.w	#6,(A1)
	bra.w	lbC00C5B4

lbC00C7E0:
	cmpi.w	#$2E,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	cmpi.w	#$57,D0
	beq.s	lbC00C7C8
	cmpi.w	#$4C,D0
	bne.w	lbC00C5B4
	bset	#7,14(A1)
	bra.s	lbC00C7C8

lbC00C802:
	move.w	#8,(A1)
	cmpi.w	#$2E,D0
	bne.w	lbC00C5A8
	move.w	#$FFFF,(A1)
	bsr.w	lbC006F44
	cmpi.w	#$53,D0
	bne.w	lbC00C5B4
	move.w	#7,(A1)
	bsr.w	lbC005CB2
	bra.w	lbC00C5B4

lbC00C82A:
	bsr.w	lbC007206
	tst.b	$1E26AE.L
	beq.w	lbC00C5B4
	move.l	D0,2(A1)
	move.w	#11,(A1)
	bsr.w	lbC005CB2
	bra.w	lbC00C5B4

lbC00C848:
	bsr.w	lbC006F44
	cmpi.w	#$41,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	jsr	lbC0066F6(PC)
	cmpi.w	#7,D0
	bhi.w	lbC00C5B4
	move.l	D0,2(A1)
	bsr.w	lbC006F44
	cmpi.w	#$29,D0
	bne.w	lbC00C5B4
	bsr.w	lbC005CB2
	cmpi.w	#$2B,D0
	beq.w	lbC00C888
	move.w	#2,(A1)
	bra.w	lbC00C5B4

lbC00C888:
	bsr.w	lbC005CB2
	move.w	#3,(A1)
	bra.w	lbC00C5B4

lbC00C894:
	bsr.w	lbC006F44
	cmpi.w	#$28,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	cmpi.w	#$41,D0
	bne.w	lbC00C5B4
	bsr.w	lbC006F44
	jsr	lbC0066F6(PC)
	cmpi.w	#7,D0
	bhi.w	lbC00C5B4
	move.l	D0,2(A1)
	bsr.w	lbC006F44
	cmpi.w	#$29,D0
	bne.w	lbC00C5B4
	bsr.w	lbC005CB2
	move.w	#4,(A1)
	bra.w	lbC00C5B4

lbC00C8D8:
	bsr.w	lbC007F7E
	bsr.w	lbC007F7E
	bsr.w	lbC007F7E
	move.w	#$FFFF,(A1)
	moveq	#0,D2
lbC00C8EA:
	bsr.w	lbC00C934
	bcs.w	lbC00C5B4
	move.w	D0,D3
	bset	D0,D2
	bsr.w	lbC006F44
	cmpi.w	#$2F,D0
	beq.s	lbC00C8EA
	cmpi.w	#$2D,D0
	bne.w	lbC00C928
	bsr.w	lbC00C934
	bcs.w	lbC00C5B4
	cmp.w	D0,D3
	blt.w	lbC00C5B4
lbC00C916:
	bset	D3,D2
	subq.w	#1,D3
	cmp.w	D3,D0
	ble.s	lbC00C916
	bsr.w	lbC006F44
	cmpi.w	#$2F,D0
	beq.s	lbC00C8EA
lbC00C928:
	move.w	#14,(A1)
	move.l	D2,2(A1)
	bra.w	lbC00C5A8

lbC00C934:
	bsr.w	lbC006F44
	move.w	D0,D1
	bsr.w	lbC006F44
	bsr.w	lbC0066F6
	cmpi.w	#7,D0
	bhi.w	lbC00C966
	eori.w	#7,D0
	cmpi.w	#$41,D1
	beq.w	lbC00C960
	cmpi.w	#$44,D1
	bne.w	lbC00C966
	addq.w	#8,D0
lbC00C960:
	andi.b	#$FE,CCR
	rts

lbC00C966:
	ori.w	#1,SR
	rts

lbC00C96C:
	movem.l	D2-D4/A0/A1,-(SP)
	move.w	D0,D1
	subq.w	#1,D1
	moveq	#0,D0
	lea	BSRSTSFSHISLS.MSG(PC),A0
lbC00C97A:
	move.w	D1,D2
	lea	$1E26C8.L,A1
lbC00C982:
	cmpi.b	#7,(A0)
	bls.w	lbC00C99C
	cmpm.b	(A0)+,(A1)+
	bne.w	lbC00C99C
	dbra	D2,lbC00C982
	cmpi.b	#7,(A0)
	bls.w	lbC00C9B0
lbC00C99C:
	cmpi.b	#7,(A0)+
	bhi.s	lbC00C99C
	move.b	-1(A0),D3
	ext.w	D3
	add.w	D3,D0
	tst.b	(A0)
	bpl.s	lbC00C97A
	moveq	#-1,D0
lbC00C9B0:
	moveq	#0,D1
	move.b	(A0),D1
	movem.l	(SP)+,D2-D4/A0/A1
	rts

lbC00C9BA:
	movem.l	D1/D2/D5/A1,-(SP)
	move.l	D0,D1
	moveq	#0,D0
	moveq	#0,D2
	lea	$1E26C8.L,A1
	bsr.w	lbC005CB2
	move.w	#$FFFF,D2
	tst.b	$1E26B3.L
	bne.w	lbC00CA2A
	bsr.w	lbC007F7E
	sf	D5
lbC00C9E2:
	bsr.w	lbC006F44
	cmpi.w	#$28,D0
	bne.w	lbC00C9F0
	st	D5
lbC00C9F0:
	cmpi.w	#$29,D0
	bne.w	lbC00C9FA
	sf	D5
lbC00C9FA:
	move.w	#$FFFF,D2
	tst.b	$1E26B3.L
	bne.w	lbC00CA2A
	tst.b	D5
	bne.w	lbC00CA20
	move.w	D1,D2
	cmp.b	D0,D1
	beq.w	lbC00CA2A
	swap	D1
	move.w	D1,D2
	cmp.b	D0,D1
	beq.w	lbC00CA2A
lbC00CA20:
	move.b	D0,(A1)+
	addi.l	#$10000,D2
	bra.s	lbC00C9E2

lbC00CA2A:
	move.l	D2,D0
	movem.l	(SP)+,D1/D2/D5/A1
	rts

BSRSTSFSHISLS.MSG:
	dc.b	'BSR'
	dc.b	1
	dc.b	'ST'
	dc.b	1
	dc.b	'SF'
	dc.b	1
	dc.b	'SHI'
	dc.b	1
	dc.b	'SLS'
	dc.b	1
	dc.b	'SCC'
	dc.b	1
	dc.b	'SCS'
	dc.b	1
	dc.b	'SNE'
	dc.b	1
	dc.b	'SEQ'
	dc.b	1
	dc.b	'SVC'
	dc.b	1
	dc.b	'SVS'
	dc.b	1
	dc.b	'SPL'
	dc.b	1
	dc.b	'SMI'
	dc.b	1
	dc.b	'SGE'
	dc.b	1
	dc.b	'SLT'
	dc.b	1
	dc.b	'SGT'
	dc.b	1
	dc.b	'SLE'
	dc.b	1
	dc.b	'BT'
	dc.b	1
	dc.b	'BF'
	dc.b	1
	dc.b	'BHI'
	dc.b	1
	dc.b	'BLS'
	dc.b	1
	dc.b	'BCC'
	dc.b	1
	dc.b	'BCS'
	dc.b	1
	dc.b	'BNE'
	dc.b	1
	dc.b	'BEQ'
	dc.b	1
	dc.b	'BVC'
	dc.b	1
	dc.b	'BVS'
	dc.b	1
	dc.b	'BPL'
	dc.b	1
	dc.b	'BMI'
	dc.b	1
	dc.b	'BGE'
	dc.b	1
	dc.b	'BLT'
	dc.b	1
	dc.b	'BGT'
	dc.b	1
	dc.b	'BLE'
	dc.b	1
	dc.b	'BRA'
	dc.b	1
	dc.b	'STOP'
	dc.b	1
	dc.b	'TRAP'
	dc.b	1
	dc.b	'MOVE'
	dc.b	1
	dc.b	'MOVEA'
	dc.b	1
	dc.b	'MOVEM'
	dc.b	1
	dc.b	'MOVEP'
	dc.b	1
	dc.b	'MOVEQ'
	dc.b	1
	dc.b	'DBT'
	dc.b	1
	dc.b	'DBF'
	dc.b	1
	dc.b	'DBHI'
	dc.b	1
	dc.b	'DBLS'
	dc.b	1
	dc.b	'DBCC'
	dc.b	1
	dc.b	'DBCS'
	dc.b	1
	dc.b	'DBNE'
	dc.b	1
	dc.b	'DBEQ'
	dc.b	1
	dc.b	'DBVC'
	dc.b	1
	dc.b	'DBVS'
	dc.b	1
	dc.b	'DBPL'
	dc.b	1
	dc.b	'DBMI'
	dc.b	1
	dc.b	'DBGE'
	dc.b	1
	dc.b	'DBLT'
	dc.b	1
	dc.b	'DBGT'
	dc.b	1
	dc.b	'DBLE'
	dc.b	1
	dc.b	'DBRA'
	dc.b	1
	dc.b	'ABCD'
	dc.b	2
	dc.b	'ADD'
	dc.b	4
	dc.b	'ADDA'
	dc.b	1
	dc.b	'ADDI'
	dc.b	1
	dc.b	'ADDQ'
	dc.b	1
	dc.b	'ADDX'
	dc.b	2
	dc.b	'AND'
	dc.b	6
	dc.b	'ANDI'
	dc.b	4
	dc.b	'ASL'
	dc.b	3
	dc.b	'ASR'
	dc.b	3
	dc.b	'BCHG'
	dc.b	2
	dc.b	'BCLR'
	dc.b	2
	dc.b	'BSET'
	dc.b	2
	dc.b	'BTST'
	dc.b	2
	dc.b	'CHK'
	dc.b	1
	dc.b	'CLR'
	dc.b	1
	dc.b	'CMP'
	dc.b	3
	dc.b	'CMPA'
	dc.b	1
	dc.b	'CMPI'
	dc.b	1
	dc.b	'CMPM'
	dc.b	1
	dc.b	'DIVS'
	dc.b	1
	dc.b	'DIVU'
	dc.b	1
	dc.b	'EOR'
	dc.b	5
	dc.b	'EORI'
	dc.b	4
	dc.b	'EXG'
	dc.b	3
	dc.b	'EXT'
	dc.b	1
	dc.b	'ILLEGAL'
	dc.b	1
	dc.b	'JMP'
	dc.b	1
	dc.b	'JSR'
	dc.b	1
	dc.b	'LEA'
	dc.b	1
	dc.b	'LINK'
	dc.b	1
	dc.b	'LSL'
	dc.b	3
	dc.b	'LSR'
	dc.b	3
	dc.b	'MULS'
	dc.b	1
	dc.b	'MULU'
	dc.b	1
	dc.b	'NBCD'
	dc.b	1
	dc.b	'NEG'
	dc.b	1
	dc.b	'NEGX'
	dc.b	1
	dc.b	'NOP'
	dc.b	1
	dc.b	'NOT'
	dc.b	1
	dc.b	'OR'
	dc.b	6
	dc.b	'ORI'
	dc.b	4
	dc.b	'PEA'
	dc.b	1
	dc.b	'RESET'
	dc.b	1
	dc.b	'ROL'
	dc.b	3
	dc.b	'ROR'
	dc.b	3
	dc.b	'ROXL'
	dc.b	3
	dc.b	'ROXR'
	dc.b	3
	dc.b	'RTE'
	dc.b	1
	dc.b	'RTR'
	dc.b	1
	dc.b	'RTS'
	dc.b	1
	dc.b	'SBCD'
	dc.b	2
	dc.b	'SUB'
	dc.b	4
	dc.b	'SUBA'
	dc.b	1
	dc.b	'SUBI'
	dc.b	1
	dc.b	'SUBQ'
	dc.b	1
	dc.b	'SUBX'
	dc.b	2
	dc.b	'SWAP'
	dc.b	1
	dc.b	'TAS'
	dc.b	1
	dc.b	'TRAPV'
	dc.b	1
	dc.b	'TST'
	dc.b	1
	dc.b	'UNLK'
	dc.b	1
	dc.b	'LINEA'
	dc.b	1
	dc.b	'LINEF'
	dc.b	1
	dc.b	$FF
lbL00CC5A:
	dc.l	$2010001
	dc.l	$C1000301
	dc.l	$C108
	dc.l	$2070FFF
	dc.l	$D0000107
	dc.l	$1FCD100
	dc.l	$4060FFF
	dc.l	$D0C00507
	dc.l	$1FD0600
	dc.l	$4060FFF
	dc.l	$D0C00507
	dc.l	$1FD0600
	dc.l	$60701FF
	dc.l	$50000207
	dc.l	$1D100
	dc.l	$3070000
	dc.l	$D1080207
	dc.l	$FFDC000
	dc.l	$10701FC
	dc.l	$C1000507
	dc.l	$1FC0200
	dc.l	$7010000
	dc.l	$23C0802
	dc.l	$27C
	dc.l	$8010000
	dc.l	$23C0507
	dc.l	$1FC0200
	dc.l	$7010000
	dc.l	$23C0802
	dc.l	$27C
	dc.l	$8010000
	dc.l	$23C0107
	dc.l	$1E120
	dc.l	$6070001
	dc.l	$E1000A01
	dc.l	$1FCE1C0
	dc.l	$1070001
	dc.l	$E0200607
	dc.l	$1E000
	dc.l	$A0101FC
	dc.l	$E0C00100
	dc.l	$1FD0140
	dc.l	$50001FD
	dc.l	$8400100
	dc.l	$1FD0180
	dc.l	$50001FD
	dc.l	$8800100
	dc.l	$1FD01C0
	dc.l	$50001FD
	dc.l	$8C00100
	dc.l	$1FD0100
	dc.l	$50001FD
	dc.l	$8000200
	dc.l	$FFD4180
	dc.l	$A0701FD
	dc.l	$42000207
	dc.l	$FFFB000
	dc.l	$4060FFF
	dc.l	$B0C00507
	dc.l	$1FD0C00
	dc.l	$4060FFF
	dc.l	$B0C00507
	dc.l	$1FD0C00
	dc.l	$B070000
	dc.l	$B1080200
	dc.l	$FFD81C0
	dc.l	$2000FFD
	dc.l	$80C00107
	dc.l	$1FDB100
	dc.l	$50701FD
	dc.l	$A000700
	dc.l	$A3C
	dc.l	$8020000
	dc.l	$A7C0801
	dc.l	$A3C
	dc.l	$50701FD
	dc.l	$A000700
	dc.l	$A3C
	dc.l	$8020000
	dc.l	$A7C0801
	dc.l	$A3C
	dc.l	$2000001
	dc.l	$C1400200
	dc.l	$2C188
	dc.l	$4000002
	dc.l	$C1480A06
	dc.l	$14880
	dc.l	0
	dc.l	$4AFC0A00
	dc.l	$7E44EC0
	dc.l	$A0007E4
	dc.l	$4E800400
	dc.l	$7E441C0
	dc.l	$C000000
	dc.l	$4E500107
	dc.l	$1E128
	dc.l	$6070001
	dc.l	$E1080A00
	dc.l	$1FCE3C0
	dc.l	$1070001
	dc.l	$E0280607
	dc.l	$1E008
	dc.l	$A0001FC
	dc.l	$E2C00200
	dc.l	$FFDC1C0
	dc.l	$2000FFD
	dc.l	$C0C00A01
	dc.l	$1FD4800
	dc.l	$A0701FD
	dc.l	$44000A07
	dc.l	$1FD4000
	dc.l	0
	dc.l	$4E710A07
	dc.l	$1FD4600
	dc.l	$2070FFD
	dc.l	$80000107
	dc.l	$1FC8100
	dc.l	$50701FD
	dc.l	$700
	dc.l	$3C
	dc.l	$8020000
	dc.l	$7C0801
	dc.l	$3C
	dc.l	$50701FD
	dc.l	$700
	dc.l	$3C
	dc.l	$8020000
	dc.l	$7C0801
	dc.l	$3C
	dc.l	$A0007E4
	dc.l	$48400000
	dc.l	$4E70
	dc.l	$1070001
	dc.l	$E1380607
	dc.l	$1E118
	dc.l	$A0101FC
	dc.l	$E7C00107
	dc.l	$1E038
	dc.l	$6070001
	dc.l	$E0180A01
	dc.l	$1FCE6C0
	dc.l	$1070001
	dc.l	$E1300607
	dc.l	$1E110
	dc.l	$A0101FC
	dc.l	$E5C00107
	dc.l	$1E030
	dc.l	$6070001
	dc.l	$E0100A01
	dc.l	$1FCE4C0
	dc.l	0
	dc.l	$4E730000
	dc.l	$4E77
	dc.l	0
	dc.l	$4E750201
	dc.l	$18100
	dc.l	$3010000
	dc.l	$81080207
	dc.l	$FFF9000
	dc.l	$10701FC
	dc.l	$91000406
	dc.l	$FFF90C0
	dc.l	$50701FD
	dc.l	$4000406
	dc.l	$FFF90C0
	dc.l	$50701FD
	dc.l	$4000607
	dc.l	$1FF5100
	dc.l	$2070001
	dc.l	$91000307
	dc.l	$9108
	dc.l	$A000001
	dc.l	$48400A00
	dc.l	$1FD4AC0
	dc.l	0
	dc.l	$4E760A07
	dc.l	$1FD4A00
	dc.l	$A000002
	dc.w	$4E58

	lea	Listofexcepti.MSG(PC),A0
	movea.l	A0,A1
	jsr	$1AB4A8.L
	moveq	#6,D1
	moveq	#15,D2
	lea	lbW00CF8E(PC),A2
lbC00CF38:
	move.w	(A2)+,D0
	ext.l	D0
	movea.l	D0,A0
	bsr.w	lbC005D22
	bsr.w	lbC0066BE
	movea.l	A1,A0
	bsr.w	lbC00F860
	jsr	$1AB4A8.L
	movea.l	A0,A1
	dbra	D2,lbC00CF38
	bsr.w	lbC006FC8
	moveq	#15,D2
	moveq	#0,D3
	lea	$80.L,A0
lbC00CF66:
	move.w	D3,D0
	moveq	#1,D1
	bsr.w	lbC0066BE
	bsr.w	lbC006FBC
	moveq	#6,D1
	bsr.w	lbC005D22
	addq.l	#4,A0
	bsr.w	lbC0066BE
	moveq	#2,D0
	bsr.w	lbC006FD4
	addq.w	#1,D3
	dbra	D2,lbC00CF66
	bra.w	lbC0087F0

lbW00CF8E:
	dc.w	8
	dc.w	12
	dc.w	$10
	dc.w	$14
	dc.w	$18
	dc.w	$1C
	dc.w	$20
	dc.w	$24
	dc.w	$28
	dc.w	$2C
	dc.w	$64
	dc.w	$68
	dc.w	$6C
	dc.w	$70
	dc.w	$74
	dc.w	$78
Listofexcepti.MSG:
	dc.b	'List of exceptions:',$D,0
	dc.b	' = Bus error ($8)',$D,0
	dc.b	' = Address error ($c)',$D,0
	dc.b	' = Illegal instruction ($10)',$D,0
	dc.b	' = Division by zero ($14)',$D,0
	dc.b	' = Chk exception ($18)',$D,0
	dc.b	' = Trapv exception ($1c)',$D,0
	dc.b	' = Privilege violation ($20)',$D,0
	dc.b	' = Trace exception ($24)',$D,0
	dc.b	' = Line-A ($28)',$D,0
	dc.b	' = Line-F ($2c)',$D,0
	dc.b	' = Interrupt request 1 ($64)',$D,0
	dc.b	' = Interrupt request 2 ($68)',$D,0
	dc.b	' = Interrupt request 3 ($6c)',$D,0
	dc.b	' = Interrupt request 4 ($70)',$D,0
	dc.b	' = Interrupt request 5 ($74)',$D,0
	dc.b	' = Interrupt request 6 ($78)',$D,0
	dc.b	'List of traps',$D,0
	dc.b	0

	moveq	#4,D0
	lea	$100.w,A0
lbC00D17C:
	move.l	#$4E404E73,(A0)+
	add.w	D0,-4(A0)
	dbra	D0,lbC00D17C
	move.l	#$100,12.w
	move.l	#$104,$10.w
	move.l	#$108,$14.w
	move.l	#$10C,$28.w
	move.l	#$110,$2C.w
	st	$1E297C.L
	lea	Exceptionhand.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC0087F0

	rts

Exceptionhand.MSG:
	dc.b	'Exceptionhandler installed!',$D
	dc.b	'Exceptions: 1) Address error',$D
	dc.b	'            2) Illegal opcode',$D
	dc.b	'            3) Line-A',$D
	dc.b	'            4) Line-F',$D
	dc.b	'            5) Division by zero error',$D,0

	cmpi.l	#$114,$1E2648.L
	bhi.w	lbC00D2C6
	cmpi.l	#$102,$1E2648.L
	beq.w	lbC00D2C8
	cmpi.l	#$106,$1E2648.L
	beq.w	lbC00D2D0
	cmpi.l	#$10A,$1E2648.L
	beq.w	lbC00D2D8
	cmpi.l	#$10E,$1E2648.L
	beq.w	lbC00D2E0
	cmpi.l	#$112,$1E2648.L
	beq.w	lbC00D2E8
lbC00D2C6:
	rts

lbC00D2C8:
	moveq	#14,D0
	moveq	#0,D1
	bra.w	lbC00D2F8

lbC00D2D0:
	moveq	#6,D0
	moveq	#1,D1
	bra.w	lbC00D2F8

lbC00D2D8:
	moveq	#6,D0
	moveq	#2,D1
	bra.w	lbC00D2F8

lbC00D2E0:
	moveq	#6,D0
	moveq	#3,D1
	bra.w	lbC00D2F8

lbC00D2E8:
	moveq	#6,D0
	moveq	#4,D1
	bra.w	lbC00D2F8

	moveq	#6,D0
	moveq	#5,D1
	bra.w	lbC00D2F8

lbC00D2F8:
	movea.l	#$1E2644,A0
	add.l	D0,(A0)
	movea.l	(A0),A0
	jsr	lbC005CDE(PC)
	move.w	D0,$1E264C.L
	addq.w	#2,A0
	jsr	lbC005D22(PC)
	move.l	D0,$1E2648.L
	move.l	D0,$1E276A.L
	lea	Addressingerr.MSG(PC),A0
	move.w	D1,D0
	jsr	$1C53A4.L
	lea	raisedataddre.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1A9A1C.L
	bsr.w	lbC0087F0
	rts

Addressingerr.MSG:
	dc.b	'Addressing error',0
	dc.b	'Illegal instruction',0
	dc.b	'Division by zero',0
	dc.b	'Line-A exception',0
	dc.b	'Line-F exception',0
	dc.b	'Privilege violation',0
raisedataddre.MSG:
	dc.b	' raised at address: ',0,0

	tst.l	$1A8010.L
	bne.s	lbC00D3D4
	lea	RamAllocation.MSG(PC),A0
	jsr	$1AB4A8.L
lbC00D3D4:
	rts

RamAllocation.MSG:
	dc.b	13
	dc.b	'Ram-Allocation Failure! Program is unsafe!!',$D,0

lbC00D404:
	bsr.w	lbC00D494
	move.l	D0,$1D0A3A.L
	rts

	bsr.w	lbC00D494
	lea	$1D0A3A.L,A0
	cmp.l	(A0),D0
	beq.w	lbC00D444
	lea	ROMprogramfai.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC00A1C4
	lea	OriginalChk.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1D0A3A.L,A0
	move.l	A0,D0
	bsr.w	lbC00A1C4
lbC00D444:
	rts

ROMprogramfai.MSG:
	dc.b	'ROM-program failure, it may be corrupt!!',$D
	dc.b	'Calculated Chk:= ',0
OriginalChk.MSG:
	dc.b	13
	dc.b	'Original   Chk:= ',0

lbC00D494:
	movem.l	D1/D2/A0,-(SP)
	lea	$1A801E.L,A0
	moveq	#0,D0
	moveq	#0,D2
	move.w	#$A285,D1
lbC00D4A6:
	add.l	(A0)+,D0
	dbra	D1,lbC00D4A6
	movem.l	(SP)+,D1/D2/A0
	rts

lbC00D4B2:
	movem.l	D0/A0/A1,-(SP)
	lea	$1E2720.L,A0
	lea	$1E27D4.L,A1
	moveq	#15,D0
lbC00D4C4:
	move.l	(A1)+,(A0)+
	dbra	D0,lbC00D4C4
	lea	$1E278E.L,A0
	lea	$1E26C8.L,A1
	moveq	#5,D0
lbC00D4D8:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC00D4D8
	movem.l	(SP)+,D0/A0/A1
	rts

lbC00D4E4:
	movem.l	D0/A0/A1,-(SP)
	lea	$1E2720.L,A0
	lea	$DFF180.L,A1
	moveq	#15,D0
lbC00D4F6:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC00D4F6
	moveq	#5,D0
	lea	$1E26C8.L,A0
	lea	$DFF0E0.L,A1
lbC00D50A:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC00D50A
	movem.l	(SP)+,D0/A0/A1
	rts

	st	$1E28AC.L
	movem.l	D0-D7/A0-A6,-(SP)
	moveq	#0,D5
	move.l	$1E2978.L,D5
	beq.w	lbC00D532
	subi.l	#$C00000,D5
lbC00D532:
	add.l	$1E2974.L,D5
	add.l	$1E2BC8.L,D5
	sub.l	$1E2BC4.L,D5
	cmpi.l	#$100000,D5
	bhi.w	lbC00D6F4
	tst.b	$1E2B01.L
	beq.w	lbC00D562
	movea.l	$1E2B20.L,A1
	bra.w	lbC00D5AE

lbC00D562:
	move.l	$1E299A.L,D0
	beq.w	lbC00D59A
	sub.l	$1E2978.L,D0
	tst.l	$1E2978.L
	bne.w	lbC00D582
	subi.l	#$C00000,D0
lbC00D582:
	cmp.l	D0,D5
	bhi.w	lbC00D59A
	move.l	#$C00000,D0
	or.l	$1E2978.L,D0
	movea.l	D0,A1
	bra.w	lbC00D5AE

lbC00D59A:
	move.l	$1E299E.L,D0
	sub.l	$1E2974.L,D0
	cmp.l	D0,D5
	bhi.w	lbC00D6EC
	movea.l	D0,A1
lbC00D5AE:
	move.l	A1,$1E29A2.L
	move.w	$1E2998.L,$1E29A6.L
	move.w	$1E2996.L,$1E29A8.L
	move.l	$1E2B20.L,$1E2BBC.L
	move.l	$1E2BC4.L,$1E2BD4.L
	move.l	$1E2BC8.L,$1E2BD8.L
	move.l	#$80000,$1E2BC0.L
	cmpi.l	#$100000,$1E2974.L
	beq.w	lbC00D61C
	move.l	#$C00000,$1E2BC0.L
	tst.l	$1E2978.L
	bne.w	lbC00D61C
	move.l	$1E2BC4.L,$1E2BC0.L
lbC00D61C:
	movea.l	$1E29A2.L,A2
	lea	0(A2,D5.L),A3
	cmpa.l	#$1D3082,A2
	bhi.w	lbC00D63A
	cmpa.l	#$1A801E,A3
	bhi.w	lbC00D6EC
lbC00D63A:
	jsr	$1BB4BC.L
	lea	$DFF000.L,A5
	move.w	#$200,$96(A5)
	move.w	#$4000,$9A(A5)
	bsr.w	lbC00A19E
	jsr	$1B9FE6.L
	move.l	D0,$1E2AC4.L
	move.l	D1,$1E2AC8.L
	move.l	A0,$1E2ACC.L
	cmpi.l	#$400,D0
	bls.w	lbC00D6FC
	move.l	A1,-(SP)
	movea.l	A0,A1
	jsr	$1BD8D0.L
	movea.l	(SP)+,A1
	cmpi.w	#$400,D0
	bhi.w	lbC00D704
	suba.l	A0,A0
	move.l	#$1FFFF,D0
lbC00D694:
	move.l	(A0)+,(A1)+
	subq.l	#1,D0
	bpl.s	lbC00D694
	move.l	$1E2BC0.L,D0
	beq.w	lbC00D6B2
	movea.l	D0,A0
	move.l	#$1FFFF,D0
lbC00D6AC:
	move.l	(A0)+,(A1)+
	subq.l	#1,D0
	bpl.s	lbC00D6AC
lbC00D6B2:
	movea.l	$1E2ACC.L,A0
	move.l	$1E2AC4.L,D0
	lsr.l	#2,D0
	move.l	$1E2AC8.L,D1
lbC00D6C6:
	move.l	D1,(A0)+
	subq.l	#1,D0
	bne.s	lbC00D6C6
	bsr.w	lbC00A19E
	move.w	#$C000,$9A(A5)
	move.w	#$8200,$96(A5)
	st	$1E296C.L
	bsr.w	lbC0087F0
lbC00D6E6:
	movem.l	(SP)+,D0-D7/A0-A6
	rts

lbC00D6EC:
	lea	Notenoughextr.MSG(PC),A0
	bra.w	lbC00D70C

lbC00D6F4:
	lea	Logicalmemory.MSG(PC),A0
	bra.w	lbC00D70C

lbC00D6FC:
	lea	Nosavingpossi.MSG(PC),A0
	bra.w	lbC00D718

lbC00D704:
	lea	Systemerrorre.MSG(PC),A0
	bra.w	lbC00D718

lbC00D70C:
	jsr	$1AB4A8.L
	bsr.w	lbC0087F0
	bra.s	lbC00D6E6

lbC00D718:
	bsr.w	lbC00A19E
	move.w	#$C000,$9A(A5)
	move.w	#$8200,$96(A5)
	bra.s	lbC00D70C

Notenoughextr.MSG:
	dc.b	'Not enough extra ram available!',$D,0
Logicalmemory.MSG:
	dc.b	'Logical memory is more than 1024 Kb. Use pre'
	dc.b	'ferences (F3) to set!',$D,0
Nosavingpossi.MSG:
	dc.b	'No saving possible - no data space!',$D,0
Systemerrorre.MSG:
	dc.b	'System error: regsave longer than memblock!!'
	dc.b	'!!!!!!',$D,0
	dc.b	0
Warningdrivec.MSG:
	dc.b	'Warning: drive configuration has changed!',$D,0
	dc.b	0

	st	$1E28AC.L
	tst.b	$1E296C.L
	beq.w	lbC00D8F8
	sf	$1E294E.L
	sf	$1E2AF6.L
	lea	$DFF000.L,A5
	move.w	#$200,$96(A5)
	move.w	#$4000,$9A(A5)
	bsr.w	lbC00A19E
	suba.l	A0,A0
	movea.l	$1E29A2.L,A1
	move.l	#$1FFFF,D0
lbC00D854:
	move.l	(A1)+,(A0)+
	subq.l	#1,D0
	bpl.s	lbC00D854
	tst.l	$1E2BC0.L
	beq.w	lbC00D876
	movea.l	$1E2BC0.L,A0
	move.l	#$1FFFF,D0
lbC00D870:
	move.l	(A1)+,(A0)+
	subq.l	#1,D0
	bpl.s	lbC00D870
lbC00D876:
	movea.l	$1E2ACC.L,A1
	jsr	$1BD90C.L
	bmi.w	lbC00D8CC
	tst.w	D0
	beq.w	lbC00D896
	lea	Warningdrivec.MSG(PC),A0
	jsr	$1AB4A8.L
lbC00D896:
	movea.l	$1E2ACC.L,A0
	move.l	$1E2AC4.L,D0
	lsr.l	#2,D0
	move.l	$1E2AC8.L,D1
lbC00D8AA:
	move.l	D1,(A0)+
	subq.l	#1,D0
	bne.s	lbC00D8AA
	bsr.w	lbC00A19E
	bsr.w	lbC0087F0
	move.w	#$C000,$9A(A5)
	move.w	#$8200,$96(A5)
	st	$1E294E.L
	rts

lbC00D8CC:
	bsr.w	lbC00A19E
	move.w	#$C000,$9A(A5)
	move.w	#$8200,$96(A5)
	lea	Noloadpossibl.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1BDA64.L
	bsr.w	lbC0087F0
	st	$1E294E.L
	rts

lbC00D8F8:
	lea	Nosavequickfi.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC0087F0
	st	$1E294E.L
	rts

Nosavequickfi.MSG:
	dc.b	'No savequick-file in RAM-disk!',$D,0
Noloadpossibl.MSG:
	dc.b	'No load possible - required systemconfigurat'
	dc.b	'ion:',$D,0

	move.l	#$FFFFFFFF,$1E2BA2.L
	sf	$1E2B3B.L
	sf	$1E2B3D.L
	btst	#6,$BFE001.L
	beq.w	lbC00D9A4
	btst	#2,$1E2B3A.L
	beq.w	lbC00D994
	jsr	$1C32B2.L
lbC00D994:
	btst	#0,$1E2B3A.L
	beq.w	lbC00D9A4
	bsr.w	lbC00D9B0
lbC00D9A4:
	move.l	$1E2486.L,$1E2AE4.L
	rts

lbC00D9B0:
	move.w	#$88,D0
	move.w	#$80,D1
	move.l	$1E2B0C.L,D7
	bsr.w	lbC00D9EE
	move.l	A0,$1E2482.L
	move.l	A0,$1E2B0C.L
	move.w	#$8A,D0
	move.w	#$84,D1
	move.l	$1E2B10.L,D7
	bsr.w	lbC00D9EE
	move.l	A0,$1E2486.L
	move.l	A0,$1E2B10.L
	rts

lbC00D9EE:
	lea	$DFF000.L,A5
	move.w	#$4000,$9A(A5)
	move.w	#$7FFF,$96(A5)
	move.w	#1,$9C(A5)
	movea.l	D7,A0
	bsr.w	lbC00DA4C
	bne.w	lbC00DA44
	lea	$1E2402.L,A0
	movea.l	0(A0,D1.W),A0
	exg	D0,A0
	bclr	#0,D0
	exg	D0,A0
	bsr.w	lbC00DA4C
	bne.w	lbC00DA44
	suba.l	A0,A0
lbC00DA2C:
	bsr.w	lbC00DA4C
	bne.w	lbC00DA44
	addq.w	#2,A0
	cmpa.l	$1E2974.L,A0
	bne.s	lbC00DA2C
	lea	$FFFFFFFF.L,A0
lbC00DA44:
	move.w	#$C000,$9A(A5)
	rts

lbC00DA4C:
	move.l	(A0),D2
	move.l	#$9C8001,(A0)
	clr.w	0(A5,D0.W)
	move.w	#$8280,$96(A5)
	move.w	#$280,$96(A5)
	btst	#0,$1F(A5)
	bne.w	lbC00DA74
	move.l	D2,(A0)
	moveq	#0,D2
	rts

lbC00DA74:
	move.l	D2,(A0)
	moveq	#-1,D2
	rts

lbC00DA7A:
	movem.l	D0-D6/A0,-(SP)
	move.w	#$280,D4
	mulu.w	D1,D4
	move.w	D0,D5
	ext.l	D5
	add.l	D5,D4
	subi.l	#$F1,D4
	move.w	D2,D5
	sub.w	D0,D5
	lea	$1E45E8.L,A0
	adda.l	D4,A0
	move.w	D3,D6
	sub.w	D1,D6
	addq.w	#1,D6
	mulu.w	#$280,D6
	addi.l	#$140,D6
	ori.b	#15,0(A0,D6.L)
	ori.b	#15,(A0)+
lbC00DAB6:
	ori.b	#$FF,0(A0,D6.L)
	ori.b	#$FF,(A0)+
	dbra	D5,lbC00DAB6
	ori.b	#$F0,0(A0,D6.L)
	ori.b	#$F0,(A0)
	lea	$1E45E8.L,A0
	adda.l	D4,A0
	move.w	D2,D6
	sub.w	D0,D6
	addq.w	#2,D6
	move.w	D3,D5
	sub.w	D1,D5
	addq.w	#1,D5
	lsl.w	#3,D5
	addq.w	#4,D5
lbC00DAE6:
	bset	#4,0(A0,D6.W)
	bset	#3,(A0)
	lea	$50(A0),A0
	dbra	D5,lbC00DAE6
	movem.l	(SP)+,D0-D6/A0
	rts

lbC00DAFE:
	movem.l	D0-D7/A0,-(SP)
	move.w	#$280,D4
	mulu.w	D1,D4
	move.w	D0,D5
	ext.l	D5
	add.l	D5,D4
	subi.l	#$A1,D4
	move.w	D2,D5
	sub.w	D0,D5
	lea	$1E45E8.L,A0
	adda.l	D4,A0
	move.w	D3,D6
	sub.w	D1,D6
	addq.w	#1,D6
	mulu.w	#8,D6
	addi.l	#2,D6
lbC00DB30:
	move.w	D5,D7
	eori.b	#7,(A0)+
lbC00DB36:
	eori.b	#$FF,(A0)+
	dbra	D7,lbC00DB36
	eori.b	#$E0,(A0)
	suba.w	D5,A0
	subq.w	#2,A0
	lea	$50(A0),A0
	dbra	D6,lbC00DB30
	movem.l	(SP)+,D0-D7/A0
	rts

lbC00DB54:
	movem.l	D0-D7/A0,-(SP)
	move.w	#$280,D4
	mulu.w	D1,D4
	move.w	D0,D5
	ext.l	D5
	add.l	D5,D4
	subi.l	#$A1,D4
	move.w	D2,D5
	sub.w	D0,D5
	lea	$1E45E8.L,A0
	adda.l	D4,A0
	move.w	D3,D6
	sub.w	D1,D6
	addq.w	#1,D6
	mulu.w	#8,D6
	addi.l	#2,D6
	lsr.w	#1,D6
lbC00DB88:
	move.w	D5,D7
	ori.b	#1,$50(A0)
	ori.b	#4,(A0)+
lbC00DB94:
	ori.b	#$11,$50(A0)
	ori.b	#$44,(A0)+
	dbra	D7,lbC00DB94
	ori.b	#$10,$50(A0)
	ori.b	#$40,(A0)
	suba.w	D5,A0
	subq.w	#2,A0
	lea	$A0(A0),A0
	dbra	D6,lbC00DB88
	movem.l	(SP)+,D0-D7/A0
	rts

lbC00DBBE:
	movem.l	D0-D2/A0/A1,-(SP)
lbC00DBC2:
	move.l	A0,D0
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	movea.l	D0,A0
	cmpi.w	#0,(A0)
	beq.s	lbC00DC32
	tst.w	(A0)
	bmi.w	lbC00DBF2
	movem.w	D0-D3,-(SP)
	move.w	(A0),D0
	move.w	2(A0),D1
	move.w	4(A0),D2
	move.w	6(A0),D3
	bsr.w	lbC00DA7A
	movem.w	(SP)+,D0-D3
lbC00DBF2:
	movea.l	A0,A1
	addq.w	#8,A0
	move.w	4(A1),D1
	move.w	(A1),D2
	bclr	#15,D2
	sub.w	D2,D1
	move.w	2(A1),$1E269C.L
lbC00DC0A:
	move.w	D1,D2
	move.w	(A1),$1E269A.L
	bclr	#7,$1E269A.L
lbC00DC1A:
	moveq	#0,D0
	move.b	(A0)+,D0
	beq.s	lbC00DBC2
	jsr	$1AE5E4.L
	dbra	D2,lbC00DC1A
	jsr	$1A8FD4.L
	bra.s	lbC00DC0A

lbC00DC32:
	movem.l	(SP)+,D0-D2/A0/A1
	rts

lbC00DC38:
	movem.l	D0/A0/A1,-(SP)
	lea	$1E45E8.L,A0
	move.w	#$F9F,D0
lbC00DC46:
	clr.l	(A0)+
	dbra	D0,lbC00DC46
	move.w	#$FFFF,$DFF034.L
	lea	$1E277E.L,A0
	lea	$200.w,A1
	moveq	#$12,D0
lbC00DC60:
	move.l	(A1)+,(A0)+
	dbra	D0,lbC00DC60
	move.l	$1E25A2.L,(A0)+
	move.w	$1E25A6.L,(A0)+
	move.l	$1E269A.L,(A0)+
	move.l	#$7770000,$DFF1A2.L
	move.w	#$FCA,$DFF1A6.L
	lea	$200.w,A0
	clr.l	(A0)+
	clr.l	(A0)+
	move.l	#$1800,(A0)+
	move.l	#$18003C00,(A0)+
	move.l	#$18002400,(A0)+
	move.l	#$18003C00,(A0)+
	move.l	#$18003C00,(A0)+
	move.l	#$18003C00,(A0)+
	move.l	#$18003FE0,(A0)+
	move.l	#$1FC03FF0,(A0)+
	move.l	#$1FE0F570,(A0)+
	move.l	#$5FE0F570,(A0)+
	move.l	#$5FE0FFF0,(A0)+
	move.l	#$7FE0FFF0,(A0)+
	move.l	#$3FC0FFF0,(A0)+
	move.l	#$1F807FE0,(A0)+
	move.l	#$18F03FC0,(A0)+
	move.l	#$3FC0,(A0)+
	clr.l	(A0)+
	move.w	#$2A8,$1E2984.L
	move.w	#$EC,$1E2986.L
	st	$1E2988.L
	sf	$1E294E.L
	move.w	#$8020,$DFF096.L
	movem.l	(SP)+,D0/A0/A1
	rts

lbC00DD1E:
	movem.l	D0/A0/A1,-(SP)
	move.w	#$20,$DFF096.L
	sf	$1E2988.L
	lea	$1E277E.L,A0
	lea	$200.w,A1
	moveq	#$12,D0
lbC00DD3C:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC00DD3C
	move.l	(A0)+,$DFF1A2.L
	move.w	(A0)+,$DFF1A6.L
	move.l	(A0)+,$1E269A.L
	jsr	lbC008D32(PC)
	st	$1E294E.L
	lea	$1E45E8.L,A0
	move.w	#$F9F,D0
lbC00DD68:
	clr.l	(A0)+
	dbra	D0,lbC00DD68
	jsr	$1AEDD2.L
	movem.l	(SP)+,D0/A0/A1
	rts

lbC00DD7A:
	movem.l	D1-D3/A0,-(SP)
lbC00DD7E:
	btst	#0,$1E2699.L
	bne.s	lbC00DD7E
lbC00DD88:
	moveq	#0,D0
	move.w	$1E2698.L,D0
	btst	#0,D0
	beq.w	lbC00DDB0
	andi.w	#$FF,D0
	not.b	D0
	lsr.b	#1,D0
	neg.w	D0
lbC00DDA2:
	btst	#0,$1E2699.L
	bne.s	lbC00DDA2
	bra.w	lbC00DF1A

lbC00DDB0:
	addq.w	#1,$1E27D4.L
	btst	#6,$1E27D5.L
	beq.w	lbC00DE5E
	clr.w	$1E27D4.L
	jsr	$1C0FC2.L
	cmpi.w	#0,D0
	bne.w	lbC00DDE2
	subq.w	#2,$1E2984.L
	subq.w	#1,$1E2986.L
lbC00DDE2:
	cmpi.w	#1,D0
	bne.w	lbC00DDF0
	subq.w	#1,$1E2986.L
lbC00DDF0:
	cmpi.w	#2,D0
	bne.w	lbC00DE04
	addq.w	#2,$1E2984.L
	subq.w	#1,$1E2986.L
lbC00DE04:
	cmpi.w	#3,D0
	bne.w	lbC00DE12
	subq.w	#2,$1E2984.L
lbC00DE12:
	cmpi.w	#5,D0
	bne.w	lbC00DE20
	addq.w	#2,$1E2984.L
lbC00DE20:
	cmpi.w	#6,D0
	bne.w	lbC00DE34
	subq.w	#2,$1E2984.L
	addq.w	#1,$1E2986.L
lbC00DE34:
	cmpi.w	#7,D0
	bne.w	lbC00DE42
	addq.w	#1,$1E2986.L
lbC00DE42:
	cmpi.w	#8,D0
	bne.w	lbC00DE56
	addq.w	#2,$1E2984.L
	addq.w	#1,$1E2986.L
lbC00DE56:
	cmpi.w	#13,D0
	beq.w	lbC00DF3A
lbC00DE5E:
	jsr	lbC009FFA(PC)
	add.w	D0,$1E2984.L
	cmpi.w	#$FA,$1E2984.L
	bgt.w	lbC00DE7C
	move.w	#$FB,$1E2984.L
lbC00DE7C:
	cmpi.w	#$37B,$1E2984.L
	ble.w	lbC00DE90
	move.w	#$37B,$1E2984.L
lbC00DE90:
	add.w	D1,$1E2986.L
	cmpi.w	#$3B,$1E2986.L
	bgt.w	lbC00DEAA
	move.w	#$3C,$1E2986.L
lbC00DEAA:
	cmpi.w	#$104,$1E2986.L
	ble.w	lbC00DEBE
	move.w	#$104,$1E2986.L
lbC00DEBE:
	btst	#6,$BFE001.L
	bne.w	lbC00DD88
	move.w	#$FFFF,D0
lbC00DECE:
	nop
	dbra	D0,lbC00DECE
lbC00DED4:
	btst	#6,$BFE001.L
	beq.s	lbC00DED4
lbC00DEDE:
	move.w	$1E2984.L,D0
	move.w	$1E2986.L,D1
	subi.w	#$FB,D0
	subi.w	#$3C,D1
	lsr.w	#3,D1
	lsr.w	#3,D0
	moveq	#0,D2
lbC00DEF8:
	cmp.b	1(A0),D0
	bcs.w	lbC00DF20
	cmp.b	5(A0),D0
	bhi.w	lbC00DF20
	cmp.b	3(A0),D1
	bcs.w	lbC00DF20
	cmp.b	7(A0),D1
	bhi.w	lbC00DF20
lbC00DF18:
	move.l	D2,D0
lbC00DF1A:
	movem.l	(SP)+,D1-D3/A0
	rts

lbC00DF20:
	addq.w	#8,A0
lbC00DF22:
	tst.b	(A0)+
	bne.s	lbC00DF22
	addq.w	#1,A0
	move.l	A0,D3
	andi.w	#$FFFE,D3
	movea.l	D3,A0
	addq.l	#1,D2
	tst.w	(A0)
	bne.s	lbC00DEF8
	moveq	#-1,D2
	bra.s	lbC00DF18

lbC00DF3A:
	btst	#7,$BFE001.L
	beq.s	lbC00DF3A
	bra.s	lbC00DEDE

lbC00DF46:
	movem.l	D0-D3/A0,-(SP)
lbC00DF4A:
	tst.w	D0
	beq.w	lbC00DF64
	addq.w	#8,A0
lbC00DF52:
	tst.b	(A0)+
	bne.s	lbC00DF52
	move.l	A0,D1
	addq.l	#1,D1
	andi.w	#$FFFE,D1
	movea.l	D1,A0
	subq.w	#1,D0
	bra.s	lbC00DF4A

lbC00DF64:
	movem.w	(A0),D0-D3
	bsr.w	lbC00DAFE
	movem.l	(SP)+,D0-D3/A0
	rts

lbC00DF72:
	movem.l	D0-D3/A0,-(SP)
lbC00DF76:
	tst.w	D0
	beq.w	lbC00DF90
	addq.w	#8,A0
lbC00DF7E:
	tst.b	(A0)+
	bne.s	lbC00DF7E
	move.l	A0,D1
	addq.l	#1,D1
	andi.w	#$FFFE,D1
	movea.l	D1,A0
	subq.w	#1,D0
	bra.s	lbC00DF76

lbC00DF90:
	movem.w	(A0),D0-D3
	bsr.w	lbC00DB54
	movem.l	(SP)+,D0-D3/A0
	rts

	lea	$1E29F0.L,A1
	lea	$1E29F4.L,A2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC00E004
	cmpi.w	#3,D0
	bhi.w	lbC00E004
	move.w	D0,D1
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC00DFF2
	st	0(A1,D1.W)
	add.w	D1,D1
	add.w	D1,D1
	moveq	#0,D2
	moveq	#15,D3
lbC00DFE0:
	roxr.w	#1,D0
	roxr.l	#1,D2
	ror.l	#1,D2
	dbra	D3,lbC00DFE0
	move.l	D2,0(A2,D1.W)
	bra.w	lbC00E004

lbC00DFF2:
	sf	0(A1,D1.W)
	lea	$1E29F4.L,A1
	add.w	D1,D1
	add.w	D1,D1
	clr.l	0(A1,D1.W)
lbC00E004:
	lea	ActionReplayD.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#3,D2
	moveq	#0,D3
	lea	$1E29F0.L,A1
	lea	$1E29F4.L,A2
lbC00E01E:
	lea	drive.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#1,D1
	move.l	D3,D0
	jsr	$1AE598.L
	jsr	$1AEE96.L
	lea	code.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	(A2)+,D0
	jsr	lbC00A1C4(PC)
	jsr	$1AEE96.L
	lea	normal.MSG(PC),A0
	tst.b	(A1)+
	beq.w	lbC00E05C
	lea	protected.MSG(PC),A0
lbC00E05C:
	jsr	$1AB4A8.L
	jsr	$1AEECA.L
	addq.w	#1,D3
	dbra	D2,lbC00E01E
	jsr	$1B06CA.L
	rts

ascii.MSG13:
	dc.b	0
	dc.b	11
	dc.b	0
	dc.b	3
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	3
	dc.b	'No Fast',0,0
	dc.b	$15
	dc.b	0
	dc.b	3
	dc.b	0
	dc.b	$1B
	dc.b	0
	dc.b	3
	dc.b	' 0.5MB',0,0
	dc.b	0
	dc.b	$1F
	dc.b	0
	dc.b	3
	dc.b	0
	dc.b	$25
	dc.b	0
	dc.b	3
	dc.b	'Maximum',0,0
	dc.b	11
	dc.b	0
	dc.b	5
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	5
	dc.b	'0.5MB',0,0
	dc.b	$15
	dc.b	0
	dc.b	5
	dc.b	0
	dc.b	$1B
	dc.b	0
	dc.b	5
	dc.b	'Maximum',0,0
	dc.b	4
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	9
	dc.b	' On',0,0
	dc.b	$22
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$25
	dc.b	0
	dc.b	9
	dc.b	'Add',0,0
	dc.b	4
	dc.b	0
	dc.b	14
	dc.b	0
	dc.b	8
	dc.b	0
	dc.b	14
	dc.b	'NoRes',0,0
	dc.b	12
	dc.b	0
	dc.b	14
	dc.b	0
	dc.b	$10
	dc.b	0
	dc.b	14
	dc.b	'Test1',0,0
	dc.b	$14
	dc.b	0
	dc.b	14
	dc.b	0
	dc.b	$18
	dc.b	0
	dc.b	14
	dc.b	'Test2',0,0
	dc.b	$1E
	dc.b	0
	dc.b	14
	dc.b	0
	dc.b	$24
	dc.b	0
	dc.b	14
	dc.b	'Blanker',0,0
	dc.b	$13
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$1B
	dc.b	0
	dc.b	$11
	dc.b	' BACKGND',0,0
	dc.b	0
	dc.b	$1E
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$26
	dc.b	0
	dc.b	$11
	dc.b	' FOREGND',0,0
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	$13
	dc.b	'0',0,0
	dc.b	9
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$13
	dc.b	'1',0,0
	dc.b	11
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	11
	dc.b	0
	dc.b	$13
	dc.b	'2',0,0
	dc.b	13
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	13
	dc.b	0
	dc.b	$13
	dc.b	'3',0,0
	dc.b	15
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	15
	dc.b	0
	dc.b	$13
	dc.b	'4',0,0
	dc.b	$11
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$13
	dc.b	'5',0,0
	dc.b	$13
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$13
	dc.b	'6',0,0
	dc.b	$15
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$13
	dc.b	'7',0,0
	dc.b	$17
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$13
	dc.b	'8',0,0
	dc.b	$19
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$19
	dc.b	0
	dc.b	$13
	dc.b	'9',0,0
	dc.b	$1B
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$1B
	dc.b	0
	dc.b	$13
	dc.b	'A',0,0
	dc.b	$1D
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$1D
	dc.b	0
	dc.b	$13
	dc.b	'B',0,0
	dc.b	$1F
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$1F
	dc.b	0
	dc.b	$13
	dc.b	'C',0,0
	dc.b	'!',0
	dc.b	$13
	dc.b	0
	dc.b	$21
	dc.b	0
	dc.b	$13
	dc.b	'D',0,0
	dc.b	$23
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$23
	dc.b	0
	dc.b	$13
	dc.b	'E',0,0
	dc.b	$25
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$25
	dc.b	0
	dc.b	$13
	dc.b	'F',0,0
	dc.b	7
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	$15
	dc.b	'0',0,0
	dc.b	9
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$15
	dc.b	'1',0,0
	dc.b	11
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	11
	dc.b	0
	dc.b	$15
	dc.b	'2',0,0
	dc.b	13
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	13
	dc.b	0
	dc.b	$15
	dc.b	'3',0,0
	dc.b	15
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	15
	dc.b	0
	dc.b	$15
	dc.b	'4',0,0
	dc.b	$11
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$15
	dc.b	'5',0,0
	dc.b	$13
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$15
	dc.b	'6',0,0
	dc.b	$15
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$15
	dc.b	'7',0,0
	dc.b	$17
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$15
	dc.b	'8',0,0
	dc.b	$19
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$19
	dc.b	0
	dc.b	$15
	dc.b	'9',0,0
	dc.b	$1B
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$1B
	dc.b	0
	dc.b	$15
	dc.b	'A',0,0
	dc.b	$1D
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$1D
	dc.b	0
	dc.b	$15
	dc.b	'B',0,0
	dc.b	$1F
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$1F
	dc.b	0
	dc.b	$15
	dc.b	'C',0,0
	dc.b	$21
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$21
	dc.b	0
	dc.b	$15
	dc.b	'D',0,0
	dc.b	$23
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$23
	dc.b	0
	dc.b	$15
	dc.b	'E',0,0
	dc.b	$25
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$25
	dc.b	0
	dc.b	$15
	dc.b	'F',0,0
	dc.b	7
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	$17
	dc.b	'0',0,0
	dc.b	9
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$17
	dc.b	'1',0,0
	dc.b	11
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	11
	dc.b	0
	dc.b	$17
	dc.b	'2',0,0
	dc.b	13
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	13
	dc.b	0
	dc.b	$17
	dc.b	'3',0,0
	dc.b	15
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	15
	dc.b	0
	dc.b	$17
	dc.b	'4',0,0
	dc.b	$11
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$17
	dc.b	'5',0,0
	dc.b	$13
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$17
	dc.b	'6',0,0
	dc.b	$15
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$17
	dc.b	'7',0,0
	dc.b	$17
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$17
	dc.b	'8',0,0
	dc.b	$19
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$19
	dc.b	0
	dc.b	$17
	dc.b	'9',0,0
	dc.b	$1B
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$1B
	dc.b	0
	dc.b	$17
	dc.b	'A',0,0
	dc.b	$1D
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$1D
	dc.b	0
	dc.b	$17
	dc.b	'B',0,0
	dc.b	$1F
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$1F
	dc.b	0
	dc.b	$17
	dc.b	'C',0,0
	dc.b	$21
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$21
	dc.b	0
	dc.b	$17
	dc.b	'D',0,0
	dc.b	$23
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$23
	dc.b	0
	dc.b	$17
	dc.b	'E',0,0
	dc.b	$25
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	$25
	dc.b	0
	dc.b	$17
	dc.b	'F',0,0
	dc.b	'0',0
	dc.b	3
	dc.b	0
	dc.b	'3',0
	dc.b	3
	dc.b	' On',0,0
	dc.b	'.',0
	dc.b	15
	dc.b	0
	dc.b	'5',0
	dc.b	$11
	dc.b	'  Next            Page',0,0
	dc.b	0
	dc.b	'.',0
	dc.b	$14
	dc.b	0
	dc.b	'5',0
	dc.b	$16
	dc.b	'           Ok',0,0
	dc.b	'>',0
	dc.b	2
	dc.b	0
	dc.b	'A',0
	dc.b	2
	dc.b	'100%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	4
	dc.b	0
	dc.b	'A',0
	dc.b	4
	dc.b	' 90%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	6
	dc.b	0
	dc.b	'A',0
	dc.b	6
	dc.b	' 80%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	8
	dc.b	0
	dc.b	'A',0
	dc.b	8
	dc.b	' 70%',0,0
	dc.b	0
	dc.b	'>',0,$A,0
	dc.b	'A',0,$A
	dc.b	' 60%',0,0
	dc.b	0
	dc.b	'>',0,$C,0
	dc.b	'A',0,$C
	dc.b	' 50%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	14
	dc.b	0
	dc.b	'A',0
	dc.b	14
	dc.b	' 40%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	$10
	dc.b	0
	dc.b	'A',0
	dc.b	$10
	dc.b	' 30%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	$12
	dc.b	0
	dc.b	'A',0
	dc.b	$12
	dc.b	' 20%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	$14
	dc.b	0
	dc.b	'A',0
	dc.b	$14
	dc.b	' 10%',0,0
	dc.b	0
	dc.b	'>',0
	dc.b	$16
	dc.b	0
	dc.b	'A',0
	dc.b	$16
	dc.b	'  0%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	2
	dc.b	0
	dc.b	'J',0
	dc.b	2
	dc.b	'100%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	4
	dc.b	0
	dc.b	'J',0
	dc.b	4
	dc.b	' 90%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	6
	dc.b	0
	dc.b	'J',0
	dc.b	6
	dc.b	' 80%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	8
	dc.b	0
	dc.b	'J',0
	dc.b	8
	dc.b	' 70%',0,0
	dc.b	0
	dc.b	'G',0,$A,0
	dc.b	'J',0,$A
	dc.b	' 60%',0,0
	dc.b	0
	dc.b	'G',0,$C,0
	dc.b	'J',0,$C
	dc.b	' 50%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	14
	dc.b	0
	dc.b	'J',0
	dc.b	14
	dc.b	' 40%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	$10
	dc.b	0
	dc.b	'J',0
	dc.b	$10
	dc.b	' 30%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	$12
	dc.b	0
	dc.b	'J',0
	dc.b	$12
	dc.b	' 20%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	$14
	dc.b	0
	dc.b	'J',0
	dc.b	$14
	dc.b	' 10%',0,0
	dc.b	0
	dc.b	'G',0
	dc.b	$16
	dc.b	0
	dc.b	'J',0
	dc.b	$16
	dc.b	'  0%',0,0
	dc.b	$80
	dc.b	$10
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	0
	dc.b	$80
	dc.b	$18
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$1D
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	'0',0
	dc.b	8
	dc.b	0
	dc.b	'3',0
	dc.b	8
	dc.b	' On',0,0
	dc.b	1
	dc.b	0
	dc.b	1
	dc.b	0
	dc.b	$27
	dc.b	0
	dc.b	10
	dc.b	' Memory Control',0
	dc.b	$80
	dc.b	3
	dc.b	0
	dc.b	3
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	5
	dc.b	'Fast:     Chip:',0
	dc.b	$80
	dc.b	1
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	10
	dc.b	0
	dc.b	11
	dc.b	' ClearMem',0
	dc.b	$80
	dc.b	12
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	$27
	dc.b	0
	dc.b	8
	dc.b	' External Memory',0,0
	dc.b	$80
	dc.b	15
	dc.b	0
	dc.b	9
	dc.b	0
	dc.b	$18
	dc.b	0
	dc.b	9
	dc.b	'$      -$',0,0
	dc.b	1
	dc.b	0
	dc.b	12
	dc.b	0
	dc.b	$27
	dc.b	0
	dc.b	15
	dc.b	' Module Interna',0,0
	dc.b	1
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$27
	dc.b	0
	dc.b	$17
	dc.b	' Color Control',0,0
	dc.b	$80
	dc.b	4
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	4
	dc.b	0
	dc.b	$17
	dc.b	'R G B',0,0
	dc.b	'*',0
	dc.b	1
	dc.b	0
	dc.b	'8',0
	dc.b	4
	dc.b	'   Megastick',0,0
	dc.b	0
	dc.b	'*',0
	dc.b	6
	dc.b	0
	dc.b	'8',0
	dc.b	9
	dc.b	'   Autoconfig',0,0
	dc.b	';',0
	dc.b	1
	dc.b	0
	dc.b	'M',0
	dc.b	$17
	dc.b	0
	dc.b	0
	dc.b	$80
	dc.b	'<',0
	dc.b	2
	dc.b	0
	dc.b	'<',0
	dc.b	$18
	dc.b	'Player 1',0,0
	dc.b	$80
	dc.b	'L',0
	dc.b	2
	dc.b	0
	dc.b	'L',0
	dc.b	$18
	dc.b	'Player 2',0,0
	dc.b	$80
	dc.b	'D',0
	dc.b	5
	dc.b	0
	dc.b	'D',0
	dc.b	$18
	dc.b	'A u t o f i r e',0,0
	dc.b	0
lbL00E5D0:
	dc.l	$F0005
	dc.l	$110005
	dc.l	$4F666600
	dc.l	$30003
	dc.l	$50003
	dc.l	$44463000
	dc.l	$90003
	dc.l	$B0003
	dc.l	$44463100
	dc.l	$F0003
	dc.l	$110003
	dc.l	$44463200
	dc.l	$150003
	dc.l	$170003
	dc.l	$44463300
	dc.l	$30005
	dc.l	$A0005
	dc.l	$56617269
	dc.l	$61626C65
	dc.l	6
	dc.l	$A0009
	dc.l	$A204F
	dc.l	$6E000010
	dc.l	$A0017
	dc.l	$A0000
	dc.l	$6000E
	dc.l	$9000E
	dc.l	$4446303A
	dc.l	6
	dc.l	$100009
	dc.l	$104446
	dc.l	$313A0000
	dc.l	$60012
	dc.l	$90012
	dc.l	$4446323A
	dc.l	6
	dc.l	$140009
	dc.l	$144446
	dc.l	$333A0000
	dc.l	$10000E
	dc.l	$17000E
	dc.l	$10
	dc.l	$100017
	dc.l	$100000
	dc.l	$100012
	dc.l	$170012
	dc.l	$10
	dc.l	$140017
	dc.l	$140000
	dc.l	$270003
	dc.l	$2A0003
	dc.l	$4446303A
	dc.l	$2F
	dc.l	$30032
	dc.l	$34446
	dc.l	$313A0000
	dc.l	$270005
	dc.l	$2A0005
	dc.l	$4446323A
	dc.l	$2F
	dc.l	$50032
	dc.l	$54446
	dc.l	$333A0000
	dc.l	$1E000A
	dc.l	$22000A
	dc.l	$46696E64
	dc.l	$26
	dc.l	$A002A
	dc.l	$A4B69
	dc.l	$6C6C0000
	dc.l	$2E000A
	dc.l	$32000A
	dc.l	$426F6F74
	dc.l	$1E
	dc.l	$F0025
	dc.l	$F5265
	dc.l	$73696465
	dc.l	$6E740000
	dc.l	$1E0013
	dc.l	$250015
	dc.l	$20202020
	dc.l	$20202020
	dc.l	$20204C6F
	dc.l	$61640000
	dc.l	$2A0013
	dc.l	$310015
	dc.l	$20202020
	dc.l	$20202020
	dc.l	$20205361
	dc.l	$76650000
	dc.l	$360013
	dc.l	$3D0015
	dc.l	$20204E65
	dc.l	$78742020
	dc.l	$20202020
	dc.l	$20202020
	dc.l	$20205061
	dc.l	$67650000
	dc.l	$420013
	dc.l	$490015
	dc.l	$20202020
	dc.l	$20202020
	dc.l	$2020204F
	dc.l	$6B00002A
	dc.l	$F0031
	dc.l	$F4E6F
	dc.l	$20436C69
	dc.l	$636B0000
	dc.l	$3A0003
	dc.l	$410003
	dc.l	$52657369
	dc.l	$64656E74
	dc.l	$3A
	dc.l	$80042
	dc.l	$84661
	dc.l	$73747374
	dc.l	$61727400
	dc.l	$10001
	dc.l	$190006
	dc.l	$20426F6F
	dc.l	$7453656C
	dc.l	$6563746F
	dc.l	$72000001
	dc.l	$80019
	dc.l	$152042
	dc.l	$6F6F7442
	dc.l	$6C6F636B
	dc.l	$436F6465
	dc.l	$72008002
	dc.l	$C000A
	dc.l	$C4469
	dc.l	$736B436F
	dc.l	$64657200
	dc.l	$1C0001
	dc.l	$340006
	dc.l	$20447269
	dc.l	$7665436F
	dc.l	$6E74726F
	dc.l	$6C00801E
	dc.l	$30023
	dc.l	$34F6E
	dc.l	$2F4F6666
	dc.l	$1C
	dc.l	$80034
	dc.l	$B2056
	dc.l	$69727573
	dc.l	$54657374
	dc.l	$1C
	dc.l	$D0034
	dc.l	$102053
	dc.l	$61666520
	dc.l	$4469736B
	dc.l	$37
	dc.l	$10044
	dc.l	$42020
	dc.l	$20536574
	dc.l	$6D617020
	dc.l	$44000037
	dc.l	$60045
	dc.l	$92042
	dc.l	$75727374
	dc.l	$204E6962
	dc.l	$626C6572
	dc.l	0

	movem.l	D0-D7/A0-A6,-(SP)
	jsr	lbC00DC38(PC)
lbC00E868:
	lea	ascii.MSG13(PC),A0
	jsr	lbC00DBBE(PC)
	sf	$1E2834.L
lbC00E876:
	jsr	$1B6E66.L
lbC00E87C:
	jsr	lbC00DD7A(PC)
	tst.l	D0
	bmi.s	lbC00E87C
	tst.w	D0
	bpl.w	lbC00E89E
	neg.w	D0
	cmpi.w	#$45,D0
	beq.w	lbC00EB24
	cmpi.w	#$40,D0
	beq.w	lbC00EB2E
	bra.s	lbC00E87C

lbC00E89E:
	cmpi.w	#$58,D0
	bhi.s	lbC00E87C
	jsr	$1B6E66.L
	cmpi.w	#$3F,D0
	beq.w	lbC00EB24
	cmpi.w	#$3D,D0
	bne.w	lbC00E8C2
	not.b	$1E2B2F.L
	bra.s	lbC00E876

lbC00E8C2:
	cmpi.w	#7,D0
	bne.w	lbC00E8D2
	not.b	$1E2B02.L
	bra.s	lbC00E876

lbC00E8D2:
	cmpi.w	#8,D0
	bne.w	lbC00E8E4
	bchg	#0,$1E2B3A.L
	bra.s	lbC00E876

lbC00E8E4:
	cmpi.w	#9,D0
	bne.w	lbC00E8F6
	bchg	#2,$1E2B3A.L
	bra.s	lbC00E876

lbC00E8F6:
	cmpi.w	#10,D0
	bne.w	lbC00E908
	not.b	$1E2B3E.L
	bra.w	lbC00E876

lbC00E908:
	cmpi.w	#6,D0
	bne.w	lbC00E91A
	not.b	$1E2B43.L
	bra.w	lbC00E876

lbC00E91A:
	cmpi.w	#5,D0
	bne.w	lbC00E92E
	bchg	#4,$1E2997.L
	bra.w	lbC00E876

lbC00E92E:
	cmpi.w	#11,D0
	bne.w	lbC00E940
	sf	$1E2834.L
	bra.w	lbC00E876

lbC00E940:
	cmpi.w	#12,D0
	bne.w	lbC00E952
	st	$1E2834.L
	bra.w	lbC00E876

lbC00E952:
	cmpi.w	#12,D0
	bls.w	lbC00E9BE
	cmpi.w	#$3D,D0
	bhi.w	lbC00E9BE
	lea	$1E2970.L,A1
	tst.b	$1E2834.L
	beq.w	lbC00E978
	lea	$1E2972.L,A1
lbC00E978:
	move.w	(A1),D1
	cmpi.w	#$1C,D0
	bhi.w	lbC00E994
	subi.w	#13,D0
	lsl.w	#8,D0
	andi.w	#$FF,D1
	or.w	D0,D1
	move.w	D1,(A1)
	bra.w	lbC00E876

lbC00E994:
	cmpi.w	#$2C,D0
	bhi.w	lbC00E9AE
	subi.w	#$1D,D0
	andi.w	#$F0F,D1
	lsl.w	#4,D0
	or.w	D0,D1
	move.w	D1,(A1)
	bra.w	lbC00E876

lbC00E9AE:
	subi.w	#$2D,D0
	andi.w	#$FF0,D1
	or.w	D0,D1
	move.w	D1,(A1)
	bra.w	lbC00E876

lbC00E9BE:
	cmpi.w	#$3F,D0
	bls.w	lbC00EA06
	cmpi.w	#$55,D0
	bhi.w	lbC00EA06
	cmpi.w	#$4A,D0
	bhi.w	lbC00E9EE
	subi.w	#$40,D0
	move.w	#10,D1
	sub.w	D0,D1
	mulu.w	#10,D1
	move.w	D1,$1E298A.L
	bra.w	lbC00E876

lbC00E9EE:
	subi.w	#$4B,D0
	move.w	#10,D1
	sub.w	D0,D1
	mulu.w	#10,D1
	move.w	D1,$1E298C.L
	bra.w	lbC00E876

lbC00EA06:
	cmpi.w	#2,D0
	bhi.w	lbC00EA2A
	btst	D0,$1E2999.L
	beq.w	lbC00E876
	andi.w	#$FFF8,$1E2996.L
	bset	D0,$1E2997.L
	bra.w	lbC00E876

lbC00EA2A:
	cmpi.w	#3,D0
	bne.w	lbC00EA3E
	bclr	#3,$1E2997.L
	bra.w	lbC00E876

lbC00EA3E:
	cmpi.w	#4,D0
	bne.w	lbC00EA5E
	btst	#3,$1E2999.L
	beq.w	lbC00E876
	bset	#3,$1E2997.L
	bra.w	lbC00E876

lbC00EA5E:
	cmpi.w	#$3E,D0
	bne.w	lbC00EA6C
	jmp	$1B6A08.L

lbC00EA6C:
	cmpi.w	#$56,D0
	bne.w	lbC00EA94
	jsr	$1B6E66.L
	move.l	$1E2B14.L,D0
	moveq	#6,D1
	move.l	#$100009,D7
	jsr	$1B6FF6.L
	move.l	D0,D2
	bra.w	lbC00EAA8

lbC00EA94:
	cmpi.w	#$57,D0
	bne.w	lbC00EB0E
	jsr	$1B6E66.L
	move.l	$1E2B14.L,D2
lbC00EAA8:
	move.l	$1E2B18.L,D0
	moveq	#6,D1
	move.l	#$180009,D7
	jsr	$1B6FF6.L
	jsr	$1B6E66.L
	move.l	D0,D3
	cmp.l	D2,D3
	bcs.w	lbC00E876
	movea.l	D2,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC00E876
	movea.l	D3,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC00E876
	bclr	#0,D2
	bclr	#0,D3
	move.l	D2,$1E2B14.L
	move.l	D3,$1E2B18.L
	sub.l	D2,D3
	move.l	D3,$1E2B1C.L
	bra.w	lbC00E876

lbC00EB0E:
	cmpi.w	#$58,D0
	bne.w	lbC00EB20
	not.b	$1E2B00.L
	bra.w	lbC00E876

lbC00EB20:
	bra.w	lbC00E876

lbC00EB24:
	jsr	lbC00DD1E(PC)
	movem.l	(SP)+,D0-D7/A0-A6
	rts

lbC00EB2E:
	moveq	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	lea	lbL00E5D0(PC),A0
	jsr	lbC00DBBE(PC)
lbC00EB42:
	jsr	$1B6CEA.L
	lea	lbL00E5D0(PC),A0
lbC00EB4C:
	jsr	lbC00DD7A(PC)
	tst.l	D0
	bmi.s	lbC00EB4C
	tst.w	D0
	bpl.w	lbC00EB6C
	neg.w	D0
	cmpi.w	#$45,D0
	beq.s	lbC00EB24
	cmpi.w	#$40,D0
	beq.w	lbC00EB86
	bra.s	lbC00EB4C

lbC00EB6C:
	cmpi.w	#$1E,D0
	bhi.s	lbC00EB4C
	jsr	$1B6CEA.L
	cmpi.w	#$1B,D0
	beq.s	lbC00EB24
	cmpi.w	#$1A,D0
	bne.w	lbC00EB98
lbC00EB86:
	move.w	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	jmp	lbC00E868(PC)

lbC00EB98:
	cmpi.w	#5,D0
	bhi.w	lbC00EBBE
	subq.w	#1,D0
	bmi.w	lbC00EBB6
	cmpi.w	#3,D0
	bhi.w	lbC00EBB6
	btst	D0,$1E298F.L
	beq.s	lbC00EB42
lbC00EBB6:
	move.w	D0,$1E2992.L
	bra.s	lbC00EB42

lbC00EBBE:
	cmpi.w	#6,D0
	bne.w	lbC00EBDC
	not.b	$1E2AFA.L
	beq.w	lbC00EB42
	bset	#2,$1E2950.L
	bra.w	lbC00EB42

lbC00EBDC:
	cmpi.w	#7,D0
	bne.w	lbC00EC1C
	jsr	$1B6CEA.L
	move.l	$1E2B06.L,D0
	moveq	#8,D1
	move.l	#$10000A,D7
	jsr	$1B6FF6.L
	move.l	D0,$1E2B06.L
	jsr	$1B6CEA.L
	st	$1E2AFA.L
	bset	#2,$1E2950.L
	bra.w	lbC00EB42

lbC00EC1C:
	cmpi.w	#7,D0
	bls.w	lbC00EC3A
	cmpi.w	#11,D0
	bhi.w	lbC00EC3A
	lea	$1E29F0.L,A1
	not.b	-8(A1,D0.W)
	bra.w	lbC00EB42

lbC00EC3A:
	cmpi.w	#11,D0
	bls.w	lbC00ECA2
	cmpi.w	#15,D0
	bhi.w	lbC00ECA2
	subi.w	#12,D0
	lea	$1E29F0.L,A1
	st	0(A1,D0.W)
	move.l	#$10000E,D7
	lsl.w	#1,D0
	add.w	D0,D7
	lsl.w	#1,D0
	lea	$1E29F4.L,A1
	move.w	D0,D2
	moveq	#4,D1
	move.l	D7,$1E269A.L
	moveq	#8,D0
	jsr	$1AEEAE.L
	move.l	0(A1,D2.W),D0
	jsr	$1B6FF6.L
	move.l	D2,D7
	moveq	#0,D2
	moveq	#15,D3
lbC00EC8C:
	roxr.w	#1,D0
	roxr.l	#1,D2
	ror.l	#1,D2
	dbra	D3,lbC00EC8C
	move.l	D2,D0
	move.l	D7,D2
	move.l	D0,0(A1,D2.W)
	bra.w	lbC00EB42

lbC00ECA2:
	cmpi.w	#15,D0
	bls.w	lbC00ECCA
	cmpi.w	#$13,D0
	bhi.w	lbC00ECCA
	subi.w	#$10,D0
	btst	D0,$1E298F.L
	beq.w	lbC00EB42
	bchg	D0,$1E2991.L
	bra.w	lbC00EB42

lbC00ECCA:
	cmpi.w	#$13,D0
	bls.w	lbC00ED32
	cmpi.w	#$16,D0
	bhi.w	lbC00ED32
	subi.w	#$14,D0
	bchg	D0,$1E2950.L
	btst	#1,$1E2950.L
	beq.w	lbC00ED0A
	tst.w	D0
	bne.w	lbC00ED02
	bclr	#1,$1E2950.L
	bra.w	lbC00ED0A

lbC00ED02:
	bset	#0,$1E2950.L
lbC00ED0A:
	btst	#2,$1E2950.L
	bne.w	lbC00EB42
	sf	$1E2AFA.L
	sf	$1E2B3F.L
	sf	$1E2B40.L
	sf	$1E2B41.L
	bra.w	lbC00EB42

lbC00ED32:
	cmpi.w	#$18,D0
	bne.w	lbC00ED4C
	jsr	$1C5774.L
	lea	lbL00E5D0(PC),A0
	jsr	lbC00DBBE(PC)
	bra.w	lbC00EB42

lbC00ED4C:
	cmpi.w	#$19,D0
	bne.w	lbC00ED66
	jsr	$1C583A.L
	lea	lbL00E5D0(PC),A0
	jsr	lbC00DBBE(PC)
	bra.w	lbC00EB42

lbC00ED66:
	cmpi.w	#$17,D0
	bne.w	lbC00ED9E
	cmpi.b	#$13,$1E2C45.L
	bhi.w	lbC00ED9E
	sf	$1E2B40.L
	not.b	$1E2B3F.L
	beq.w	lbC00EB42
	bset	#3,$1E2B40.L
	bset	#2,$1E2950.L
	bra.w	lbC00EB42

lbC00ED9E:
	cmpi.w	#$1C,D0
	bne.w	lbC00EDD0
	cmpi.b	#$13,$1E2C45.L
	bhi.w	lbC00EDD0
	bchg	#3,$1E2B40.L
	bne.w	lbC00EB42
	st	$1E2B3F.L
	bset	#2,$1E2950.L
	bra.w	lbC00EB42

lbC00EDD0:
	cmpi.w	#$1D,D0
	bne.w	lbC00EDFA
	cmpi.b	#$13,$1E2C45.L
	bhi.w	lbC00EDFA
	not.b	$1E2B41.L
	beq.w	lbC00EB42
	bset	#2,$1E2950.L
	bra.w	lbC00EB42

lbC00EDFA:
	cmpi.w	#$1E,D0
	bne.w	lbC00EE0C
	not.b	$1E2C44.L
	bra.w	lbC00EB42

lbC00EE0C:
	bra.w	lbC00EB42

	movem.l	D0-D7/A0-A6,-(SP)
	lea	lbL00E5D0(PC),A0
	move.w	$1E298E.L,D2
	moveq	#1,D0
	moveq	#$10,D1
lbC00EE22:
	lsr.w	#1,D2
	bcs.w	lbC00EE34
	jsr	lbC00DF72(PC)
	exg	D0,D1
	jsr	lbC00DF72(PC)
	exg	D0,D1
lbC00EE34:
	addq.w	#1,D0
	addq.w	#1,D1
	cmpi.w	#4,D0
	bls.s	lbC00EE22
	cmpi.b	#$13,$1E2C45.L
	bls.w	lbC00EE5C
	moveq	#0,D0
lbC00EE4C:
	jsr	lbC00DF72(PC)
	addq.w	#1,D0
	cmpi.w	#5,D0
	bls.s	lbC00EE4C
	bra.w	lbC00EE68

lbC00EE5C:
	moveq	#1,D0
	add.w	$1E2992.L,D0
	jsr	lbC00DF46(PC)
lbC00EE68:
	moveq	#$10,D0
	move.w	$1E2990.L,D2
lbC00EE70:
	lsr.w	#1,D2
	bcc.w	lbC00EE7A
	jsr	lbC00DF46(PC)
lbC00EE7A:
	addq.w	#1,D0
	cmpi.w	#$13,D0
	bls.s	lbC00EE70
	btst	#0,$1E2950.L
	beq.w	lbC00EE94
	moveq	#$14,D0
	jsr	lbC00DF46(PC)
lbC00EE94:
	btst	#1,$1E2950.L
	beq.w	lbC00EEA6
	moveq	#$15,D0
	jsr	lbC00DF46(PC)
lbC00EEA6:
	btst	#2,$1E2950.L
	beq.w	lbC00EEB8
	moveq	#$16,D0
	jsr	lbC00DF46(PC)
lbC00EEB8:
	cmpi.b	#$13,$1E2C45.L
	bls.w	lbC00EECA
	moveq	#$17,D0
	jsr	lbC00DF72(PC)
lbC00EECA:
	tst.b	$1E2B3F.L
	beq.w	lbC00EEDA
	moveq	#$17,D0
	jsr	lbC00DF46(PC)
lbC00EEDA:
	tst.b	$1E2AFA.L
	beq.w	lbC00EEEA
	moveq	#6,D0
	jsr	lbC00DF46(PC)
lbC00EEEA:
	move.l	$1E2B06.L,D0
	move.l	#$10000A,$1E269A.L
	jsr	lbC00A1C4(PC)
	moveq	#8,D1
	lea	$1E29F0.L,A1
	lea	$1E29F4.L,A2
	move.l	#$10000E,D2
lbC00EF12:
	tst.b	(A1)+
	beq.w	lbC00EF1E
	move.w	D1,D0
	jsr	lbC00DF46(PC)
lbC00EF1E:
	move.l	(A2)+,D0
	move.l	D2,$1E269A.L
	jsr	lbC00A1C4(PC)
	addq.w	#1,D1
	addq.w	#2,D2
	cmpi.w	#11,D1
	bls.s	lbC00EF12
	moveq	#$1C,D0
	cmpi.b	#$13,$1E2C45.L
	bls.w	lbC00EF46
	jsr	lbC00DF72(PC)
lbC00EF46:
	btst	#3,$1E2B40.L
	beq.w	lbC00EF56
	jsr	lbC00DF46(PC)
lbC00EF56:
	moveq	#$1D,D0
	cmpi.b	#$13,$1E2C45.L
	bls.w	lbC00EF68
	jsr	lbC00DF72(PC)
lbC00EF68:
	tst.b	$1E2B41.L
	beq.w	lbC00EF76
	jsr	lbC00DF46(PC)
lbC00EF76:
	moveq	#$1E,D0
	tst.b	$1E2C44.L
	beq.w	lbC00EF86
	jsr	lbC00DF46(PC)
lbC00EF86:
	movem.l	(SP)+,D0-D7/A0-A6
	rts

	movem.l	D0-D7/A0-A6,-(SP)
	moveq	#0,D0
	lea	ascii.MSG13(PC),A0
	move.w	$1E2998.L,D1
	moveq	#2,D2
lbC00EF9E:
	lsr.w	#1,D1
	bcs.w	lbC00EFA8
	jsr	lbC00DF72(PC)
lbC00EFA8:
	addq.w	#1,D0
	dbra	D2,lbC00EF9E
	btst	#0,D1
	bne.w	lbC00EFBC
	addq.w	#1,D0
	jsr	lbC00DF72(PC)
lbC00EFBC:
	moveq	#2,D2
	move.w	$1E2996.L,D1
	moveq	#0,D0
lbC00EFC6:
	lsr.w	#1,D1
	bcc.w	lbC00EFD0
	jsr	lbC00DF46(PC)
lbC00EFD0:
	addq.w	#1,D0
	dbra	D2,lbC00EFC6
	btst	#0,D1
	bne.w	lbC00EFE6
	jsr	lbC00DF46(PC)
	bra.w	lbC00EFEC

lbC00EFE6:
	addq.w	#1,D0
	jsr	lbC00DF46(PC)
lbC00EFEC:
	btst	#1,D1
	beq.w	lbC00EFFA
	moveq	#5,D0
	jsr	lbC00DF46(PC)
lbC00EFFA:
	move.l	$1E2B14.L,D0
	move.l	#$100009,$1E269A.L
	jsr	$1A9A1C.L
	move.l	$1E2B18.L,D0
	move.l	#$180009,$1E269A.L
	jsr	$1A9A1C.L
	tst.b	$1E2B43.L
	beq.w	lbC00F036
	moveq	#6,D0
	jsr	lbC00DF46(PC)
lbC00F036:
	tst.b	$1E2B02.L
	beq.w	lbC00F046
	moveq	#7,D0
	jsr	lbC00DF46(PC)
lbC00F046:
	btst	#0,$1E2B3A.L
	beq.w	lbC00F058
	moveq	#8,D0
	jsr	lbC00DF46(PC)
lbC00F058:
	btst	#2,$1E2B3A.L
	beq.w	lbC00F06A
	moveq	#9,D0
	jsr	lbC00DF46(PC)
lbC00F06A:
	tst.b	$1E2B3E.L
	beq.w	lbC00F07A
	moveq	#10,D0
	jsr	lbC00DF46(PC)
lbC00F07A:
	tst.b	$1E2834.L
	bne.w	lbC00F094
	moveq	#11,D0
	bsr.w	lbC00DF46
	lea	$1E2970.L,A1
	bra.w	lbC00F0A0

lbC00F094:
	moveq	#12,D0
	bsr.w	lbC00DF46
	lea	$1E2972.L,A1
lbC00F0A0:
	move.w	(A1),D1
	moveq	#$2D,D0
	andi.w	#15,D1
	add.w	D1,D0
	bsr.w	lbC00DF46
	moveq	#$1D,D0
	move.w	(A1),D1
	lsr.w	#4,D1
	andi.w	#15,D1
	add.w	D1,D0
	bsr.w	lbC00DF46
	moveq	#13,D0
	move.w	(A1),D1
	lsr.w	#8,D1
	andi.w	#15,D1
	add.w	D1,D0
	bsr.w	lbC00DF46
	tst.b	$1E2B2F.L
	beq.w	lbC00F0DE
	moveq	#$3D,D0
	jsr	lbC00DF46(PC)
lbC00F0DE:
	moveq	#$40,D0
	moveq	#$64,D1
	sub.w	$1E298A.L,D1
	divu.w	#10,D1
	add.w	D1,D0
	bsr.w	lbC00DF46
	moveq	#$4B,D0
	moveq	#$64,D1
	sub.w	$1E298C.L,D1
	divu.w	#10,D1
	add.w	D1,D0
	bsr.w	lbC00DF46
	moveq	#$58,D0
	tst.b	$1E2B00.L
	bne.w	lbC00F116
	jsr	lbC00DF46(PC)
lbC00F116:
	movem.l	(SP)+,D0-D7/A0-A6
	rts

	movem.l	D3/D6/A1,-(SP)
	lea	$1E26C8.L,A1
	jsr	$1B706C.L
	move.l	D1,D3
	move.l	D1,D6
	jsr	$1C1C66.L
	jsr	$1B701C.L
	movem.l	(SP)+,D3/D6/A1
	rts

	movem.l	D1/D3/A1,-(SP)
	moveq	#0,D3
	subq.w	#1,D1
lbC00F14A:
	move.b	(A1)+,D0
	beq.w	lbC00F18A
	lsl.l	#4,D3
	jsr	$1AEE3E.L
	cmpi.b	#$2F,D0
	bls.w	lbC00F178
	cmpi.b	#$39,D0
	bls.w	lbC00F17A
	cmpi.b	#$40,D0
	bls.w	lbC00F178
	cmpi.b	#$46,D0
	bls.w	lbC00F17A
lbC00F178:
	moveq	#$30,D0
lbC00F17A:
	jsr	$1AE5D0.L
	andi.w	#15,D0
	or.w	D0,D3
	dbra	D1,lbC00F14A
lbC00F18A:
	move.l	D3,D0
	movem.l	(SP)+,D1/D3/A1
	rts

	movem.l	D0-D2,-(SP)
	move.l	D0,D2
	clr.b	0(A1,D1.W)
lbC00F19C:
	jsr	$1B7090.L
	move.b	D0,-1(A1,D1.W)
	move.l	D2,D0
	lsr.l	#4,D0
	move.l	D0,D2
	subq.w	#1,D1
	bne.s	lbC00F19C
	movem.l	(SP)+,D0-D2
	rts

	andi.w	#15,D0
	cmpi.w	#9,D0
	bls.w	lbC00F1C8
	addi.w	#$37,D0
	rts

lbC00F1C8:
	addi.w	#$30,D0
	rts

ActionReplayD.MSG:
	dc.b	'Action Replay Disk coder v1.1',$D
	dc.b	'=============================',$D,0
drive.MSG:
	dc.b	'drive',0
code.MSG:
	dc.b	'code:',0
normal.MSG:
	dc.b	'normal',0
protected.MSG:
	dc.b	'protected!',0,0

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,$1E2A52.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,$1E2A4E.L
	clr.w	$1E2B24.L
	bsr.w	lbC00F534
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,$1E2A3E.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,$1E2A42.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,$1E2A46.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,$1E2A4A.L
	bsr.w	lbC00F2DC
	clr.w	$1E2B24.L
	bsr.w	lbC00F336
	move.l	A2,D0
	sub.l	$1E2A46.L,D0
	jsr	lbC00A1C4(PC)
	jsr	$1B06CA.L
	rts

lbC00F2DC:
	move.l	A0,-(SP)
	clr.l	$1E2A04.L
	clr.w	$1E2A08.L
	lea	$1E2A0A.L,A0
	move.l	#$1000200,(A0)+
	move.l	#$4001000,(A0)+
	move.l	#$80009,(A0)+
	move.l	#$A000C,(A0)+
	move.l	#0,(A0)+
	move.l	#8,(A0)+
	move.l	#$20003,(A0)+
	move.l	#$30003,(A0)+
	move.l	#$10004,(A0)+
	move.l	#$50006,(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	movea.l	(SP)+,A0
	rts

lbC00F336:
	movea.l	$1E2A3E.L,A0
	movea.l	$1E2A42.L,A1
	movea.l	$1E2A46.L,A2
	move.l	$1E2A4A.L,D0
	moveq	#1,D2
	clr.w	D1
	clr.l	D7
	move.l	A0,$1E2B26.L
lbC00F35A:
	bsr.w	lbC00F3FE
	tst.b	D0
	beq.s	lbC00F36E
	addq.w	#1,D1
	cmpi.w	#$108,D1
	bne.s	lbC00F36E
	bsr.w	lbC00F4D6
lbC00F36E:
	movem.l	D0/A0,-(SP)
	suba.l	$1E2B26.L,A0
	move.l	A0,D0
	add.l	D0,$1E2B26.L
	mulu.w	$1E2B24.L,D0
	bne.w	lbC00F398
	move.w	$DFF006.L,$DFF180.L
	bra.w	lbC00F3B6

lbC00F398:
	add.l	$1E2B2A.L,D0
	move.l	D0,$1E2B2A.L
	clr.w	D0
	rol.l	#7,D0
	lsl.w	#1,D0
	lea	lbW00F674(PC),A0
	move.w	0(A0,D0.W),$DFF180.L
lbC00F3B6:
	movem.l	(SP)+,D0/A0
	cmpa.l	A0,A1
	bgt.s	lbC00F35A
	bsr.w	lbC00F4D6
	bsr.w	lbC00F516
	move.l	D7,(A2)+
	movea.l	$1E2A3E.L,A0
	movea.l	$1E2A42.L,A1
	move.l	A1,D2
	sub.l	A0,D2
	move.l	D2,(A2)+
	clr.l	D0
	clr.l	D1
	clr.l	D2
	clr.l	D3
	clr.l	D4
	clr.l	D5
	lea	$1E2A32.L,A3
	movem.w	(A3)+,D0-D5
	movea.l	A2,A3
	suba.l	A0,A3
	lea	$1E2A42.L,A4
	suba.l	A2,A4
	rts

lbC00F3FE:
	movea.l	$1E2A4A.L,A3
	adda.l	A0,A3
	cmpa.l	A1,A3
	ble.s	lbC00F40C
	movea.l	A1,A3
lbC00F40C:
	moveq	#1,D5
	movea.l	A0,A5
	addq.w	#1,A5
lbC00F412:
	move.b	(A0),D3
	move.b	1(A0),D4
lbC00F418:
	cmp.b	(A5)+,D3
	bne.s	lbC00F420
	cmp.b	(A5),D4
	beq.s	lbC00F428
lbC00F420:
	cmpa.l	A5,A3
	bgt.s	lbC00F418
	bra.w	lbC00F484

lbC00F428:
	subq.w	#1,A5
	movea.l	A0,A4
lbC00F42C:
	move.b	(A4)+,D3
	cmp.b	(A5)+,D3
	bne.s	lbC00F436
	cmpa.l	A5,A3
	bgt.s	lbC00F42C
lbC00F436:
	move.l	A4,D3
	sub.l	A0,D3
	subq.l	#1,D3
	cmp.l	D3,D5
	bge.s	lbC00F480
	move.l	A5,D4
	sub.l	A0,D4
	sub.l	D3,D4
	subq.w	#1,D4
	cmpi.l	#4,D3
	ble.s	lbC00F460
	moveq	#6,D6
	cmpi.l	#$101,D3
	blt.s	lbC00F45E
	move.w	#$100,D3
lbC00F45E:
	bra.s	lbC00F466

lbC00F460:
	move.w	D3,D6
	subq.w	#2,D6
	lsl.w	#1,D6
lbC00F466:
	lea	$1E2A0A.L,A6
	cmp.w	0(A6,D6.W),D4
	bge.s	lbC00F480
	move.l	D3,D5
	move.l	D4,$1E2A04.L
	move.b	D6,$1E2A08.L
lbC00F480:
	cmpa.l	A5,A3
	bgt.s	lbC00F412
lbC00F484:
	cmpi.l	#1,D5
	beq.s	lbC00F4CA
	bsr.w	lbC00F4D6
	move.b	$1E2A08.L,D6
	move.l	$1E2A04.L,D3
	move.w	8(A6,D6.W),D0
	bsr.w	lbC00F508
	move.w	$10(A6,D6.W),D0
	beq.s	lbC00F4B2
	move.l	D5,D3
	subq.w	#1,D3
	bsr.w	lbC00F508
lbC00F4B2:
	move.w	$18(A6,D6.W),D0
	move.w	$20(A6,D6.W),D3
	bsr.w	lbC00F508
	addi.w	#1,$28(A6,D6.W)
	adda.l	D5,A0
	clr.b	D0
	rts

lbC00F4CA:
	move.b	(A0)+,D3
	moveq	#8,D0
	bsr.w	lbC00F508
	moveq	#1,D0
	rts

lbC00F4D6:
	tst.w	D1
	beq.s	lbC00F4F2
	move.w	D1,D3
	clr.w	D1
	cmpi.w	#9,D3
	bge.s	lbC00F4F4
	addq.w	#1,$1E2A3A.L
	subq.w	#1,D3
	moveq	#5,D0
	bra.w	lbC00F508

lbC00F4F2:
	rts

lbC00F4F4:
	addq.w	#1,$1E2A3C.L
	subi.w	#9,D3
	ori.w	#$700,D3
	moveq	#11,D0
	bra.w	lbC00F508

lbC00F508:
	subq.w	#1,D0
lbC00F50A:
	lsr.l	#1,D3
	roxl.l	#1,D2
	bcs.s	lbC00F518
	dbra	D0,lbC00F50A
	rts

lbC00F516:
	clr.w	D0
lbC00F518:
	move.l	D2,(A2)+
	eor.l	D2,D7
	moveq	#1,D2
	dbra	D0,lbC00F50A
	rts

	clr.w	$1E2B24.L
	st	$1E2AFF.L
	bra.w	lbC00F53A

lbC00F534:
	sf	$1E2AFF.L
lbC00F53A:
	movea.l	$1E2A4E.L,A0
	movea.l	$1E2A52.L,A1
	move.l	A1,$1E2B26.L
	movea.l	-(A0),A2
	adda.l	A1,A2
	move.l	-(A0),D5
	move.l	-(A0),D0
	eor.l	D0,D5
lbC00F556:
	movem.l	D0/A2,-(SP)
	suba.l	$1E2B26.L,A2
	move.l	A2,D0
	neg.l	D0
	sub.l	D0,$1E2B26.L
	mulu.w	$1E2B24.L,D0
	bne.w	lbC00F58C
	tst.b	$1E2AFF.L
	bne.w	lbC00F5AA
	move.w	$DFF006.L,$DFF180.L
	bra.w	lbC00F5AA

lbC00F58C:
	add.l	$1E2B2A.L,D0
	move.l	D0,$1E2B2A.L
	clr.w	D0
	rol.l	#7,D0
	lsl.w	#1,D0
	lea	lbW00F674(PC),A2
	move.w	0(A2,D0.W),$DFF180.L
lbC00F5AA:
	movem.l	(SP)+,D0/A2
	lsr.l	#1,D0
	bne.s	lbC00F5B6
	bsr.w	lbC00F64E
lbC00F5B6:
	bcs.w	lbC00F5F6
	moveq	#8,D1
	moveq	#1,D3
	lsr.l	#1,D0
	bne.s	lbC00F5C6
	bsr.w	lbC00F64E
lbC00F5C6:
	bcs.w	lbC00F622
	moveq	#3,D1
	clr.w	D4
lbC00F5CE:
	bsr.w	lbC00F65A
	move.w	D2,D3
	add.w	D4,D3
lbC00F5D6:
	moveq	#7,D1
lbC00F5D8:
	lsr.l	#1,D0
	bne.s	lbC00F5E0
	bsr.w	lbC00F64E
lbC00F5E0:
	roxl.l	#1,D2
	dbra	D1,lbC00F5D8
	move.b	D2,-(A2)
	dbra	D3,lbC00F5D6
	bra.w	lbC00F630

lbC00F5F0:
	moveq	#8,D1
	moveq	#8,D4
	bra.s	lbC00F5CE

lbC00F5F6:
	moveq	#2,D1
	bsr.w	lbC00F65A
	cmpi.b	#2,D2
	blt.s	lbC00F618
	cmpi.b	#3,D2
	beq.s	lbC00F5F0
	moveq	#8,D1
	bsr.w	lbC00F65A
	move.w	D2,D3
	move.w	#12,D1
	bra.w	lbC00F622

lbC00F618:
	move.w	#9,D1
	add.w	D2,D1
	addq.w	#2,D2
	move.w	D2,D3
lbC00F622:
	bsr.w	lbC00F65A
lbC00F626:
	subq.w	#1,A2
	move.b	0(A2,D2.W),(A2)
	dbra	D3,lbC00F626
lbC00F630:
	cmpa.l	A2,A1
	blt.w	lbC00F556
	tst.l	D5
	bne.s	lbC00F63C
	rts

lbC00F63C:
	move.l	#$FFFF,D0
lbC00F642:
	move.w	D0,$DFF182.L
	subq.l	#1,D0
	bne.s	lbC00F642
	rts

lbC00F64E:
	move.l	-(A0),D0
	eor.l	D0,D5
	move.w	#$10,CCR
	roxr.l	#1,D0
	rts

lbC00F65A:
	subq.w	#1,D1
	clr.w	D2
lbC00F65E:
	lsr.l	#1,D0
	bne.s	lbC00F66C
	move.l	-(A0),D0
	eor.l	D0,D5
	move.w	#$10,CCR
	roxr.l	#1,D0
lbC00F66C:
	roxl.l	#1,D2
	dbra	D1,lbC00F65E
	rts

lbW00F674:
	dc.w	0
	dc.w	$100
	dc.w	$200
	dc.w	$300
	dc.w	$400
	dc.w	$500
	dc.w	$600
	dc.w	$700
	dc.w	$800
	dc.w	$900
	dc.w	$A00
	dc.w	$B00
	dc.w	$C00
	dc.w	$D00
	dc.w	$E00
	dc.w	$F00
	dc.w	$F01
	dc.w	$F02
	dc.w	$F03
	dc.w	$F04
	dc.w	$F05
	dc.w	$F06
	dc.w	$F07
	dc.w	$F08
	dc.w	$F09
	dc.w	$F0A
	dc.w	$F0B
	dc.w	$F0C
	dc.w	$F0D
	dc.w	$F0E
	dc.w	$F0F
	dc.w	$E0F
	dc.w	$D0F
	dc.w	$C0F
	dc.w	$B0F
	dc.w	$A0F
	dc.w	$90F
	dc.w	$80F
	dc.w	$70F
	dc.w	$60F
	dc.w	$50F
	dc.w	$40F
	dc.w	$30F
	dc.w	$20F
	dc.w	$10F
	dc.w	15
	dc.w	$1F
	dc.w	$2F
	dc.w	$3F
	dc.w	$4F
	dc.w	$5F
	dc.w	$6F
	dc.w	$7F
	dc.w	$8F
	dc.w	$9F
	dc.w	$AF
	dc.w	$BF
	dc.w	$CF
	dc.w	$DF
	dc.w	$EF
	dc.w	$FF
	dc.w	$FE
	dc.w	$FD
	dc.w	$FC
	dc.w	$FB
	dc.w	$FA
	dc.w	$F9
	dc.w	$F8
	dc.w	$F7
	dc.w	$F6
	dc.w	$F5
	dc.w	$F4
	dc.w	$F3
	dc.w	$F2
	dc.w	$F1
	dc.w	$F0
	dc.w	$E0
	dc.w	$D0
	dc.w	$C0
	dc.w	$B0
	dc.w	$A0
	dc.w	$90
	dc.w	$80
	dc.w	$70
	dc.w	$60
	dc.w	$50
	dc.w	$40
	dc.w	$30
	dc.w	$20
	dc.w	$10
	dc.w	0

lbC00F72A:
	move.l	A0,-(SP)
	lea	$BFE001.L,A0
	move.b	#$FF,$300(A0)
	move.b	#$10,$D00(A0)
	bclr	#0,$BFD200.L
	movea.l	(SP)+,A0
	rts

lbC00F74A:
	movem.l	D0-D3/A0-A2,-(SP)
	lea	$BFE001.L,A0
	lea	$BFD000.L,A1
	lea	lbW00F802(PC),A2
	moveq	#0,D1
	moveq	#2,D2
	tst.b	$1E2954.L
	beq.w	lbC00F774
	lea	lbB00F823(PC),A2
	moveq	#2,D1
	moveq	#0,D2
lbC00F774:
	tst.b	(A2)
	beq.w	lbC00F7D2
	cmp.b	(A2)+,D0
	lea	1(A2),A2
	bne.s	lbC00F774
	move.b	-1(A2),D0
	bpl.w	lbC00F7D2
	neg.b	D0
	move.b	D0,D3
	move.w	#$1B,D0
	jsr	$1B770E.L
	move.w	#$52,D0
	jsr	$1B770E.L
	move.w	D1,D0
	jsr	$1B770E.L
	move.w	D3,D0
	jsr	$1B770E.L
	move.w	#$1B,D0
	jsr	$1B770E.L
	move.w	#$52,D0
	jsr	$1B770E.L
	move.w	D2,D0
	jsr	$1B770E.L
	bra.w	lbC00F7FC

lbC00F7D2:
	cmpi.b	#$1B,D0
	beq.w	lbC00F7FC
	cmpi.b	#13,D0
	bne.w	lbC00F7E6
	move.b	#10,D0
lbC00F7E6:
	btst	#6,(A0)
	beq.w	lbC00F7FC
	btst	#0,(A1)
	bne.s	lbC00F7E6
	nop
	nop
	move.b	D0,$100(A0)
lbC00F7FC:
	movem.l	(SP)+,D0-D3/A0-A2
	rts

lbW00F802:
	dc.w	$C45B
	dc.w	$D65C
	dc.w	$DC5D
	dc.w	$A740
	dc.w	$E47B
	dc.w	$F67C
	dc.w	$FC7D
	dc.w	$DF7E
	dc.w	$40C0
	dc.w	$7B85
	dc.w	$7D83
	dc.w	$7E82
	dc.w	$7C84
	dc.w	$5BA5
	dc.w	$5CA4
	dc.w	$5DA3
	dc.b	0
lbB00F823:
	dc.b	$C4
	dc.w	$A5D6
	dc.w	$A4DC
	dc.w	$A3A7
	dc.w	$C0E4
	dc.w	$85F6
	dc.w	$84FC
	dc.w	$83DF
	dc.w	$8200

lbC00F834:
	movem.l	D0/A0/A1,-(SP)
	lea	$BFE001.L,A0
	lea	$BFD000.L,A1
lbC00F844:
	btst	#6,(A0)
	beq.w	lbC00F85A
	btst	#0,(A1)
	bne.s	lbC00F844
	nop
	nop
	move.b	D0,$100(A0)
lbC00F85A:
	movem.l	(SP)+,D0/A0/A1
	rts

lbC00F860:
	tst.b	(A0)+
	bne.s	lbC00F860
	rts

	move.l	D0,-(SP)
	clr.w	$1E269A.L
	tst.b	$1E2A56.L
	beq.w	lbC00F87C
	moveq	#13,D0
	bsr.s	lbC00F834
lbC00F87C:
	move.l	(SP)+,D0
	rts

	tst.b	$1E2A57.L
	beq.w	lbC00F8C4
	bsr.w	lbC00F72A
	movem.l	D0-D3/A0,-(SP)
	movea.l	$1E26A2.L,A0
	moveq	#$18,D1
lbC00F89A:
	moveq	#$4F,D2
lbC00F89C:
	moveq	#0,D0
	moveq	#$1E,D3
	move.b	(A0)+,D0
	jsr	$1AB4D8.L
lbC00F8A8:
	dbra	D3,lbC00F8A8
	bsr.w	lbC00F74A
	dbra	D2,lbC00F89C
	moveq	#13,D0
	bsr.w	lbC00F74A
	dbra	D1,lbC00F89A
	movem.l	(SP)+,D0-D3/A0
	rts

lbC00F8C4:
	lea	Sorrynoprinte.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

Sorrynoprinte.MSG:
	dc.b	'Sorry no printer connected!',$D,0
	dc.b	0

lbC00F8F4:
	movea.l	$1E2A5C.L,A0
	move.l	A0,$1D0BAA.L
	lea	$3B8(A0),A1
	moveq	#$7F,D0
	moveq	#0,D1
lbC00F908:
	move.l	D1,D2
	subq.w	#1,D0
lbC00F90C:
	move.b	(A1)+,D1
	cmp.b	D2,D1
	bgt.s	lbC00F908
	dbra	D0,lbC00F90C
	addq.b	#1,D2
	lea	$1D0B2E.L,A1
	asl.l	#8,D2
	asl.l	#2,D2
	addi.l	#$43C,D2
	add.l	A0,D2
	movea.l	D2,A2
	moveq	#$1E,D0
lbC00F92E:
	clr.l	(A2)
	move.l	A2,(A1)+
	moveq	#0,D1
	move.w	$2A(A0),D1
	asl.l	#1,D1
	adda.l	D1,A2
	adda.l	#$1E,A0
	dbra	D0,lbC00F92E
	ori.b	#2,$BFE001.L
	move.b	#6,$1D0BAE.L
	clr.b	$1D0BAF.L
	clr.b	$1D0BB0.L
	clr.w	$1D0BB8.L
	move.l	#$1000100,$1D0BC0.L
	move.w	#0,$1D0BC4.L
	move.w	#0,$1D0BC8.L
	move.w	#0,$1D0BC6.L
	move.w	#0,$1D0BCA.L
	lea	$DFF000.L,A0
	clr.w	$A8(A0)
	clr.w	$B8(A0)
	clr.w	$C8(A0)
	clr.w	$D8(A0)
	move.w	#$800F,$96(A0)
	rts

lbC00F9B0:
	movem.l	D0-D4/A0-A6,-(SP)
	addq.b	#1,$1D0BAF.L
	move.b	$1D0BAF.L,D0
	cmp.b	$1D0BAE.L,D0
	bcs.s	lbC00F9DE
	clr.b	$1D0BAF.L
	tst.b	$1D0BB6.L
	beq.w	lbC00FA96
	bsr.s	lbC00F9E4
	bra.w	lbC00FD46

lbC00F9DE:
	bsr.s	lbC00F9E4
	bra.w	lbC00FDEA

lbC00F9E4:
	lea	$DFF0A0.L,A5
	lea	$1D0A7E.L,A6
	bsr.w	lbC00FDF8
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC0.L
	beq.s	lbC00FA0C
	muls.w	$1D0BC0.L,D0
	asr.w	#8,D0
lbC00FA0C:
	move.w	D0,8(A5)
	lea	$DFF0B0.L,A5
	lea	$1D0AAA.L,A6
	bsr.w	lbC00FDF8
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC2.L
	beq.s	lbC00FA38
	muls.w	$1D0BC2.L,D0
	asr.w	#8,D0
lbC00FA38:
	move.w	D0,8(A5)
	lea	$DFF0C0.L,A5
	lea	$1D0AD6.L,A6
	bsr.w	lbC00FDF8
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC2.L
	beq.s	lbC00FA64
	muls.w	$1D0BC2.L,D0
	asr.w	#8,D0
lbC00FA64:
	move.w	D0,8(A5)
	lea	$DFF0D0.L,A5
	lea	$1D0B02.L,A6
	bsr.w	lbC00FDF8
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC0.L
	beq.s	lbC00FA90
	muls.w	$1D0BC0.L,D0
	asr.w	#8,D0
lbC00FA90:
	move.w	D0,8(A5)
	rts

lbC00FA96:
	movea.l	$1D0BAA.L,A0
	lea	12(A0),A3
	lea	$3B8(A0),A2
	lea	$43C(A0),A0
	moveq	#0,D0
	moveq	#0,D1
	move.b	$1D0BB0.L,D0
	move.b	0(A2,D0.W),D1
	asl.l	#8,D1
	asl.l	#2,D1
	add.w	$1D0BB8.L,D1
	clr.w	$1D0BBA.L
	lea	$DFF0A0.L,A5
	lea	$1D0A7E.L,A6
	bsr.w	lbC00FB74
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC0.L
	beq.s	lbC00FAEE
	muls.w	$1D0BC0.L,D0
	asr.w	#8,D0
lbC00FAEE:
	move.w	D0,8(A5)
	lea	$DFF0B0.L,A5
	lea	$1D0AAA.L,A6
	bsr.s	lbC00FB74
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC2.L
	beq.s	lbC00FB18
	muls.w	$1D0BC2.L,D0
	asr.w	#8,D0
lbC00FB18:
	move.w	D0,8(A5)
	lea	$DFF0C0.L,A5
	lea	$1D0AD6.L,A6
	bsr.s	lbC00FB74
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC2.L
	beq.s	lbC00FB42
	muls.w	$1D0BC2.L,D0
	asr.w	#8,D0
lbC00FB42:
	move.w	D0,8(A5)
	lea	$DFF0D0.L,A5
	lea	$1D0B02.L,A6
	bsr.s	lbC00FB74
	moveq	#0,D0
	move.b	$13(A6),D0
	cmpi.w	#$100,$1D0BC0.L
	beq.s	lbC00FB6C
	muls.w	$1D0BC0.L,D0
	asr.w	#8,D0
lbC00FB6C:
	move.w	D0,8(A5)
	bra.w	lbC00FCD8

lbC00FB74:
	tst.l	(A6)
	bne.s	lbC00FB7C
	bsr.w	lbC00FE60
lbC00FB7C:
	move.l	0(A0,D1.L),(A6)
	addq.l	#4,D1
	moveq	#0,D2
	move.b	2(A6),D2
	andi.b	#$F0,D2
	lsr.b	#4,D2
	move.b	(A6),D0
	andi.b	#$F0,D0
	or.b	D0,D2
	tst.b	D2
	beq.s	lbC00FC0A
	moveq	#0,D3
	lea	$1D0B2E.L,A1
	move.w	D2,D4
	subq.l	#1,D2
	asl.l	#2,D2
	mulu.w	#$1E,D4
	move.l	0(A1,D2.L),4(A6)
	move.w	0(A3,D4.L),8(A6)
	move.w	0(A3,D4.L),$28(A6)
	move.b	2(A3,D4.L),$12(A6)
	move.b	3(A3,D4.L),$13(A6)
	move.w	4(A3,D4.L),D3
	tst.w	D3
	beq.s	lbC00FBF6
	move.l	4(A6),D2
	asl.w	#1,D3
	add.l	D3,D2
	move.l	D2,10(A6)
	move.l	D2,$24(A6)
	move.w	4(A3,D4.L),D0
	add.w	6(A3,D4.L),D0
	move.w	D0,8(A6)
	move.w	6(A3,D4.L),14(A6)
	bra.s	lbC00FC0A

lbC00FBF6:
	move.l	4(A6),D2
	add.l	D3,D2
	move.l	D2,10(A6)
	move.l	D2,$24(A6)
	move.w	6(A3,D4.L),14(A6)
lbC00FC0A:
	move.w	(A6),D0
	andi.w	#$FFF,D0
	beq.w	lbC0102B0
	move.w	2(A6),D0
	andi.w	#$FF0,D0
	cmpi.w	#$E50,D0
	beq.s	lbC00FC42
	move.b	2(A6),D0
	andi.b	#15,D0
	cmpi.b	#3,D0
	beq.s	lbC00FC48
	cmpi.b	#5,D0
	beq.s	lbC00FC48
	cmpi.b	#9,D0
	bne.s	lbC00FC50
	bsr.w	lbC0102B0
	bra.s	lbC00FC50

lbC00FC42:
	bsr.w	lbC0103AA
	bra.s	lbC00FC50

lbC00FC48:
	bsr.w	lbC00FF72
	bra.w	lbC0102B0

lbC00FC50:
	movem.l	D0/D1/A0/A1,-(SP)
	moveq	#0,D1
	move.w	(A6),D1
	andi.w	#$FFF,D1
	lea	$1D0C02.L,A1
	moveq	#0,D0
	moveq	#$24,D2
lbC00FC66:
	cmp.w	0(A1,D0.W),D1
	bcc.s	lbC00FC72
	addq.l	#2,D0
	dbra	D2,lbC00FC66
lbC00FC72:
	moveq	#0,D1
	move.b	$12(A6),D1
	mulu.w	#$48,D1
	adda.l	D1,A1
	move.w	0(A1,D0.W),$10(A6)
	movem.l	(SP)+,D0/D1/A0/A1
	move.w	2(A6),D0
	andi.w	#$FF0,D0
	cmpi.w	#$ED0,D0
	beq.w	lbC0102B0
	move.w	$14(A6),$DFF096.L
	btst	#2,$1E(A6)
	bne.s	lbC00FCAC
	clr.b	$1B(A6)
lbC00FCAC:
	btst	#6,$1E(A6)
	bne.s	lbC00FCB8
	clr.b	$1D(A6)
lbC00FCB8:
	move.l	4(A6),(A5)
	move.w	8(A6),4(A5)
	move.w	$10(A6),D0
	move.w	D0,6(A5)
	move.w	$14(A6),D0
	or.w	D0,$1D0BBA.L
	bra.w	lbC0102B0

lbC00FCD8:
	move.w	#$200,D0
lbC00FCDC:
	dbra	D0,lbC00FCDC
	move.w	$1D0BBA.L,D0
	ori.w	#$8000,D0
	move.w	D0,$DFF096.L
	move.w	#$100,D0
lbC00FCF4:
	dbra	D0,lbC00FCF4
	lea	$DFF000.L,A5
	lea	$1D0B02.L,A6
	move.l	10(A6),$D0(A5)
	move.w	14(A6),$D4(A5)
	lea	$1D0AD6.L,A6
	move.l	10(A6),$C0(A5)
	move.w	14(A6),$C4(A5)
	lea	$1D0AAA.L,A6
	move.l	10(A6),$B0(A5)
	move.w	14(A6),$B4(A5)
	lea	$1D0A7E.L,A6
	move.l	10(A6),$A0(A5)
	move.w	14(A6),$A4(A5)
lbC00FD46:
	addi.w	#$10,$1D0BB8.L
	move.b	$1D0BB5.L,D0
	beq.s	lbC00FD62
	move.b	D0,$1D0BB6.L
	clr.b	$1D0BB5.L
lbC00FD62:
	tst.b	$1D0BB6.L
	beq.s	lbC00FD7A
	subq.b	#1,$1D0BB6.L
	beq.s	lbC00FD7A
	subi.w	#$10,$1D0BB8.L
lbC00FD7A:
	tst.b	$1D0BB3.L
	beq.s	lbC00FD9E
	sf	$1D0BB3.L
	moveq	#0,D0
	move.b	$1D0BB1.L,D0
	clr.b	$1D0BB1.L
	lsl.w	#4,D0
	move.w	D0,$1D0BB8.L
lbC00FD9E:
	cmpi.w	#$400,$1D0BB8.L
	bcs.s	lbC00FDEA
lbC00FDA8:
	moveq	#0,D0
	move.b	$1D0BB1.L,D0
	lsl.w	#4,D0
	move.w	D0,$1D0BB8.L
	clr.b	$1D0BB1.L
	clr.b	$1D0BB2.L
	addq.b	#1,$1D0BB0.L
	andi.b	#$7F,$1D0BB0.L
	move.b	$1D0BB0.L,D1
	movea.l	$1D0BAA.L,A0
	cmp.b	$3B6(A0),D1
	bcs.s	lbC00FDEA
	clr.b	$1D0BB0.L
lbC00FDEA:
	tst.b	$1D0BB2.L
	bne.s	lbC00FDA8
	movem.l	(SP)+,D0-D4/A0-A6
	rts

lbC00FDF8:
	bsr.w	lbC01053E
	move.w	2(A6),D0
	andi.w	#$FFF,D0
	beq.s	lbC00FE60
	move.b	2(A6),D0
	andi.b	#15,D0
	beq.s	lbC00FE68
	cmpi.b	#1,D0
	beq.w	lbC00FEE0
	cmpi.b	#2,D0
	beq.w	lbC00FF32
	cmpi.b	#3,D0
	beq.w	lbC00FFD6
	cmpi.b	#4,D0
	beq.w	lbC010066
	cmpi.b	#5,D0
	beq.w	lbC010100
	cmpi.b	#6,D0
	beq.w	lbC010108
	cmpi.b	#14,D0
	beq.w	lbC0102EC
	move.w	$10(A6),6(A5)
	cmpi.b	#7,D0
	beq.w	lbC01010E
	cmpi.b	#10,D0
	beq.w	lbC0101E6
lbC00FE5E:
	rts

lbC00FE60:
	move.w	$10(A6),6(A5)
	rts

lbC00FE68:
	moveq	#0,D0
	move.b	$1D0BAF.L,D0
	divs.w	#3,D0
	swap	D0
	cmpi.w	#0,D0
	beq.s	lbC00FE98
	cmpi.w	#2,D0
	beq.s	lbC00FE8C
	moveq	#0,D0
	move.b	3(A6),D0
	lsr.b	#4,D0
	bra.s	lbC00FE9E

lbC00FE8C:
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	bra.s	lbC00FE9E

lbC00FE98:
	move.w	$10(A6),D2
	bra.s	lbC00FECA

lbC00FE9E:
	asl.w	#1,D0
	moveq	#0,D1
	move.b	$12(A6),D1
	mulu.w	#$48,D1
	lea	$1D0C02.L,A0
	adda.l	D1,A0
	moveq	#0,D1
	move.w	$10(A6),D1
	moveq	#$24,D3
lbC00FEBA:
	move.w	0(A0,D0.W),D2
	cmp.w	(A0),D1
	bcc.s	lbC00FECA
	addq.l	#2,A0
	dbra	D3,lbC00FEBA
	rts

lbC00FECA:
	move.w	D2,6(A5)
	rts

lbC00FED0:
	tst.b	$1D0BAF.L
	bne.s	lbC00FE5E
	move.b	#15,$1D0BB4.L
lbC00FEE0:
	moveq	#0,D0
	move.b	3(A6),D0
	and.b	$1D0BB4.L,D0
	move.b	#$FF,$1D0BB4.L
	sub.w	D0,$10(A6)
	move.w	$10(A6),D0
	andi.w	#$FFF,D0
	cmpi.w	#$71,D0
	bpl.s	lbC00FF12
	andi.w	#$F000,$10(A6)
	ori.w	#$71,$10(A6)
lbC00FF12:
	move.w	$10(A6),D0
	andi.w	#$FFF,D0
	move.w	D0,6(A5)
	rts

lbC00FF20:
	tst.b	$1D0BAF.L
	bne.w	lbC00FE5E
	move.b	#15,$1D0BB4.L
lbC00FF32:
	clr.w	D0
	move.b	3(A6),D0
	and.b	$1D0BB4.L,D0
	move.b	#$FF,$1D0BB4.L
	add.w	D0,$10(A6)
	move.w	$10(A6),D0
	andi.w	#$FFF,D0
	cmpi.w	#$358,D0
	bmi.s	lbC00FF64
	andi.w	#$F000,$10(A6)
	ori.w	#$358,$10(A6)
lbC00FF64:
	move.w	$10(A6),D0
	andi.w	#$FFF,D0
	move.w	D0,6(A5)
	rts

lbC00FF72:
	move.l	A0,-(SP)
	move.w	(A6),D2
	andi.w	#$FFF,D2
	moveq	#0,D0
	move.b	$12(A6),D0
	mulu.w	#$4A,D0
	lea	$1D0C02.L,A0
	adda.l	D0,A0
	moveq	#0,D0
lbC00FF8E:
	cmp.w	0(A0,D0.W),D2
	bcc.s	lbC00FF9E
	addq.w	#2,D0
	cmpi.w	#$4A,D0
	bcs.s	lbC00FF8E
	moveq	#$46,D0
lbC00FF9E:
	move.b	$12(A6),D2
	andi.b	#8,D2
	beq.s	lbC00FFAE
	tst.w	D0
	beq.s	lbC00FFAE
	subq.w	#2,D0
lbC00FFAE:
	move.w	0(A0,D0.W),D2
	movea.l	(SP)+,A0
	move.w	D2,$18(A6)
	move.w	$10(A6),D0
	clr.b	$16(A6)
	cmp.w	D0,D2
	beq.s	lbC00FFD0
	bge.w	lbC00FE5E
	move.b	#1,$16(A6)
	rts

lbC00FFD0:
	clr.w	$18(A6)
	rts

lbC00FFD6:
	move.b	3(A6),D0
	beq.s	lbC00FFE4
	move.b	D0,$17(A6)
	clr.b	3(A6)
lbC00FFE4:
	tst.w	$18(A6)
	beq.w	lbC00FE5E
	moveq	#0,D0
	move.b	$17(A6),D0
	tst.b	$16(A6)
	bne.s	lbC010012
	add.w	D0,$10(A6)
	move.w	$18(A6),D0
	cmp.w	$10(A6),D0
	bgt.s	lbC01002A
	move.w	$18(A6),$10(A6)
	clr.w	$18(A6)
	bra.s	lbC01002A

lbC010012:
	sub.w	D0,$10(A6)
	move.w	$18(A6),D0
	cmp.w	$10(A6),D0
	blt.s	lbC01002A
	move.w	$18(A6),$10(A6)
	clr.w	$18(A6)
lbC01002A:
	move.w	$10(A6),D2
	move.b	$1F(A6),D0
	andi.b	#15,D0
	beq.s	lbC010060
	moveq	#0,D0
	move.b	$12(A6),D0
	mulu.w	#$48,D0
	lea	$1D0C02.L,A0
	adda.l	D0,A0
	moveq	#0,D0
lbC01004C:
	cmp.w	0(A0,D0.W),D2
	bcc.s	lbC01005C
	addq.w	#2,D0
	cmpi.w	#$48,D0
	bcs.s	lbC01004C
	moveq	#$46,D0
lbC01005C:
	move.w	0(A0,D0.W),D2
lbC010060:
	move.w	D2,6(A5)
	rts

lbC010066:
	move.b	3(A6),D0
	beq.s	lbC010090
	move.b	$1A(A6),D2
	andi.b	#15,D0
	beq.s	lbC01007C
	andi.b	#$F0,D2
	or.b	D0,D2
lbC01007C:
	move.b	3(A6),D0
	andi.b	#$F0,D0
	beq.s	lbC01008C
	andi.b	#15,D2
	or.b	D0,D2
lbC01008C:
	move.b	D2,$1A(A6)
lbC010090:
	move.b	$1B(A6),D0
	lea	$1D0BE2.L,A4
	lsr.w	#2,D0
	andi.w	#$1F,D0
	moveq	#0,D2
	move.b	$1E(A6),D2
	andi.b	#3,D2
	beq.s	lbC0100CC
	lsl.b	#3,D0
	cmpi.b	#1,D2
	beq.s	lbC0100BA
	move.b	#$FF,D2
	bra.s	lbC0100D0

lbC0100BA:
	tst.b	$1B(A6)
	bpl.s	lbC0100C8
	move.b	#$FF,D2
	sub.b	D0,D2
	bra.s	lbC0100D0

lbC0100C8:
	move.b	D0,D2
	bra.s	lbC0100D0

lbC0100CC:
	move.b	0(A4,D0.W),D2
lbC0100D0:
	move.b	$1A(A6),D0
	andi.w	#15,D0
	mulu.w	D0,D2
	lsr.w	#7,D2
	move.w	$10(A6),D0
	tst.b	$1B(A6)
	bmi.s	lbC0100EA
	add.w	D2,D0
	bra.s	lbC0100EC

lbC0100EA:
	sub.w	D2,D0
lbC0100EC:
	move.w	D0,6(A5)
	move.b	$1A(A6),D0
	lsr.w	#2,D0
	andi.w	#$3C,D0
	add.b	D0,$1B(A6)
	rts

lbC010100:
	bsr.w	lbC00FFE4
	bra.w	lbC0101E6

lbC010108:
	bsr.s	lbC010090
	bra.w	lbC0101E6

lbC01010E:
	move.b	3(A6),D0
	beq.s	lbC010138
	move.b	$1C(A6),D2
	andi.b	#15,D0
	beq.s	lbC010124
	andi.b	#$F0,D2
	or.b	D0,D2
lbC010124:
	move.b	3(A6),D0
	andi.b	#$F0,D0
	beq.s	lbC010134
	andi.b	#15,D2
	or.b	D0,D2
lbC010134:
	move.b	D2,$1C(A6)
lbC010138:
	move.b	$1D(A6),D0
	lea	$1D0BE2.L,A4
	lsr.w	#2,D0
	andi.w	#$1F,D0
	moveq	#0,D2
	move.b	$1E(A6),D2
	lsr.b	#4,D2
	andi.b	#3,D2
	beq.s	lbC010176
	lsl.b	#3,D0
	cmpi.b	#1,D2
	beq.s	lbC010164
	move.b	#$FF,D2
	bra.s	lbC01017A

lbC010164:
	tst.b	$1B(A6)
	bpl.s	lbC010172
	move.b	#$FF,D2
	sub.b	D0,D2
	bra.s	lbC01017A

lbC010172:
	move.b	D0,D2
	bra.s	lbC01017A

lbC010176:
	move.b	0(A4,D0.W),D2
lbC01017A:
	move.b	$1C(A6),D0
	andi.w	#15,D0
	mulu.w	D0,D2
	lsr.w	#6,D2
	moveq	#0,D0
	move.b	$13(A6),D0
	tst.b	$1D(A6)
	bmi.s	lbC010196
	add.w	D2,D0
	bra.s	lbC010198

lbC010196:
	sub.w	D2,D0
lbC010198:
	bpl.s	lbC01019C
	clr.w	D0
lbC01019C:
	cmpi.w	#$40,D0
	bls.s	lbC0101A6
	move.w	#$40,D0
lbC0101A6:
	move.b	D0,$13(A6)
	move.b	$1C(A6),D0
	lsr.w	#2,D0
	andi.w	#$3C,D0
	add.b	D0,$1D(A6)
	rts

lbC0101BA:
	moveq	#0,D0
	move.b	3(A6),D0
	beq.s	lbC0101C6
	move.b	D0,$20(A6)
lbC0101C6:
	move.b	$20(A6),D0
	lsl.w	#7,D0
	cmp.w	8(A6),D0
	bge.s	lbC0101DE
	sub.w	D0,8(A6)
	lsl.w	#1,D0
	add.l	D0,4(A6)
	rts

lbC0101DE:
	move.w	#1,8(A6)
	rts

lbC0101E6:
	moveq	#0,D0
	move.b	3(A6),D0
	lsr.b	#4,D0
	tst.b	D0
	beq.s	lbC010206
lbC0101F2:
	add.b	D0,$13(A6)
	cmpi.b	#$40,$13(A6)
	bmi.s	lbC010204
	move.b	#$40,$13(A6)
lbC010204:
	rts

lbC010206:
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
lbC010210:
	sub.b	D0,$13(A6)
	bpl.s	lbC01021A
	clr.b	$13(A6)
lbC01021A:
	rts

lbC01021C:
	move.b	3(A6),D0
	subq.b	#1,D0
	move.b	D0,$1D0BB0.L
lbC010228:
	clr.b	$1D0BB1.L
	st	$1D0BB2.L
	rts

lbC010236:
	moveq	#0,D0
	move.b	3(A6),D0
	cmpi.b	#$40,D0
	bls.s	lbC010244
	moveq	#$40,D0
lbC010244:
	move.b	D0,$13(A6)
	rts

lbC01024A:
	moveq	#0,D0
	move.b	3(A6),D0
	move.l	D0,D2
	lsr.b	#4,D0
	mulu.w	#10,D0
	andi.b	#15,D2
	add.b	D2,D0
	cmpi.b	#$3F,D0
	bhi.s	lbC010228
	move.b	D0,$1D0BB1.L
	st	$1D0BB2.L
	rts

lbC010272:
	moveq	#0,D0
	move.b	3(A6),D0
	beq.w	lbC01111E
	cmpi.b	#$1F,D0
	bhi.s	lbC010290
	clr.b	$1D0BAF.L
	move.b	D0,$1D0BAE.L
	rts

lbC010290:
	move.w	D0,$1D0bcc.L
	move.l	#$1B0F87,D2
	divu.w	D0,D2
	lea	$BFD000.L,A4
	move.b	D2,$400(A4)
	lsr.w	#8,D2
	move.b	D2,$500(A4)
	rts

lbC0102B0:
	bsr.w	lbC01053E
	move.b	2(A6),D0
	andi.b	#15,D0
	cmpi.b	#9,D0
	beq.w	lbC0101BA
	cmpi.b	#11,D0
	beq.w	lbC01021C
	cmpi.b	#13,D0
	beq.w	lbC01024A
	cmpi.b	#14,D0
	beq.s	lbC0102EC
	cmpi.b	#15,D0
	beq.s	lbC010272
	cmpi.b	#12,D0
	beq.w	lbC010236
	bra.w	lbC00FE60

lbC0102EC:
	move.b	3(A6),D0
	andi.b	#$F0,D0
	lsr.b	#4,D0
	beq.s	lbC010368
	cmpi.b	#1,D0
	beq.w	lbC00FED0
	cmpi.b	#2,D0
	beq.w	lbC00FF20
	cmpi.b	#3,D0
	beq.s	lbC010382
	cmpi.b	#4,D0
	beq.w	lbC010396
	cmpi.b	#5,D0
	beq.w	lbC0103AA
	cmpi.b	#6,D0
	beq.w	lbC0103B8
	cmpi.b	#7,D0
	beq.w	lbC0103FE
	cmpi.b	#9,D0
	beq.w	lbC010414
	cmpi.b	#10,D0
	beq.w	lbC010482
	cmpi.b	#11,D0
	beq.w	lbC01049A
	cmpi.b	#12,D0
	beq.w	lbC0104B2
	cmpi.b	#13,D0
	beq.w	lbC0104D2
	cmpi.b	#14,D0
	beq.w	lbC0104F2
	cmpi.b	#15,D0
	beq.w	lbC01051A
	rts

lbC010368:
	move.b	3(A6),D0
	andi.b	#1,D0
	asl.b	#1,D0
	andi.b	#$FD,$BFE001.L
	or.b	D0,$BFE001.L
	rts

lbC010382:
	move.b	3(A6),D0
	andi.b	#15,D0
	andi.b	#$F0,$1F(A6)
	or.b	D0,$1F(A6)
	rts

lbC010396:
	move.b	3(A6),D0
	andi.b	#15,D0
	andi.b	#$F0,$1E(A6)
	or.b	D0,$1E(A6)
	rts

lbC0103AA:
	move.b	3(A6),D0
	andi.b	#15,D0
	move.b	D0,$12(A6)
	rts

lbC0103B8:
	tst.b	$1D0BAF.L
	bne.w	lbC00FE5E
	move.b	3(A6),D0
	andi.b	#15,D0
	beq.s	lbC0103F0
	tst.b	$22(A6)
	beq.s	lbC0103EA
	subq.b	#1,$22(A6)
	beq.w	lbC00FE5E
lbC0103DA:
	move.b	$21(A6),$1D0BB1.L
	st	$1D0BB3.L
	rts

lbC0103EA:
	move.b	D0,$22(A6)
	bra.s	lbC0103DA

lbC0103F0:
	move.w	$1D0BB8.L,D0
	lsr.w	#4,D0
	move.b	D0,$21(A6)
	rts

lbC0103FE:
	move.b	3(A6),D0
	andi.b	#15,D0
	lsl.b	#4,D0
	andi.b	#15,$1E(A6)
	or.b	D0,$1E(A6)
	rts

lbC010414:
	move.l	D1,-(SP)
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	beq.s	lbC01047E
	moveq	#0,D1
	move.b	$1D0BAF.L,D1
	bne.s	lbC01043C
	move.w	(A6),D1
	andi.w	#$FFF,D1
	bne.s	lbC01047E
	moveq	#0,D1
	move.b	$1D0BAF.L,D1
lbC01043C:
	divu.w	D0,D1
	swap	D1
	tst.w	D1
	bne.s	lbC01047E
lbC010444:
	move.w	$14(A6),$DFF096.L
	move.l	4(A6),(A5)
	move.w	8(A6),4(A5)
	move.w	#$200,D0
lbC01045A:
	dbra	D0,lbC01045A
	move.w	$14(A6),D0
	bset	#15,D0
	move.w	D0,$DFF096.L
	move.w	#$200,D0
lbC010470:
	dbra	D0,lbC010470
	move.l	10(A6),(A5)
	move.l	14(A6),4(A5)
lbC01047E:
	move.l	(SP)+,D1
	rts

lbC010482:
	tst.b	$1D0BAF.L
	bne.w	lbC00FE5E
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	bra.w	lbC0101F2

lbC01049A:
	tst.b	$1D0BAF.L
	bne.w	lbC00FE5E
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	bra.w	lbC010210

lbC0104B2:
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	cmp.b	$1D0BAF.L,D0
	bne.w	lbC00FE5E
	clr.b	$13(A6)
	move.w	#0,8(A5)
	rts

lbC0104D2:
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	cmp.b	$1D0BAF.L,D0
	bne.w	lbC00FE5E
	move.w	(A6),D0
	beq.w	lbC00FE5E
	move.l	D1,-(SP)
	bra.w	lbC010444

lbC0104F2:
	tst.b	$1D0BAF.L
	bne.w	lbC00FE5E
	moveq	#0,D0
	move.b	3(A6),D0
	andi.b	#15,D0
	tst.b	$1D0BB6.L
	bne.w	lbC00FE5E
	addq.b	#1,D0
	move.b	D0,$1D0BB5.L
	rts

lbC01051A:
	tst.b	$1D0BAF.L
	bne.w	lbC00FE5E
	move.b	3(A6),D0
	andi.b	#15,D0
	lsl.b	#4,D0
	andi.b	#15,$1F(A6)
	or.b	D0,$1F(A6)
	tst.b	D0
	beq.w	lbC00FE5E
lbC01053E:
	movem.l	D1/A0,-(SP)
	moveq	#0,D0
	move.b	$1F(A6),D0
	lsr.b	#4,D0
	beq.s	lbC01058C
	lea	$1D0BD2.L,A0
	move.b	0(A0,D0.W),D0
	add.b	D0,$23(A6)
	btst	#7,$23(A6)
	beq.s	lbC01058C
	clr.b	$23(A6)
	move.l	10(A6),D0
	moveq	#0,D1
	move.w	14(A6),D1
	add.l	D1,D0
	add.l	D1,D0
	movea.l	$24(A6),A0
	addq.l	#1,A0
	cmpa.l	D0,A0
	bcs.s	lbC010582
	movea.l	10(A6),A0
lbC010582:
	move.l	A0,$24(A6)
	moveq	#-1,D0
	sub.b	(A0),D0
	move.b	D0,(A0)
lbC01058C:
	movem.l	(SP)+,D1/A0
	rts

lbC010592:
	bra.w	lbC00F8F4

lbC010596:
	bra.w	lbC00F9B0

lbW01059A:
	dc.w	$18
	dc.w	$314A
	dc.w	$6178
	dc.w	$8DA1
	dc.w	$B4C5
	dc.w	$D4E0
	dc.w	$EBF4
	dc.w	$FAFD
	dc.w	$FFFD
	dc.w	$FAF4
	dc.w	$EBE0
	dc.w	$D4C5
	dc.w	$B4A1
	dc.w	$8D78

	bsr.s	lbC010602
	move.w	(A0)+,-(A0)
lbC0105BA:
	btst	#6,$BFE001.L
	bne.s	lbC0105BA
	rts

	moveq	#0,D0
	jsr	$1AF0E0.L
	andi.l	#$FFFFE,D0
	movea.l	D0,A0
	lea	ActionReplays.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	D0,A0
	move.l	A0,$1E2A62.L
	clr.b	$1E2A5A.L
lbC0105EE:
	bsr.w	lbC010B32
	tst.w	D0
	bne.w	lbC010606
	lea	Nosonginmemor.MSG(PC),A0
	jsr	$1AB4A8.L
lbC010602:
	bra.w	lbC0106CC

lbC010606:
	move.w	D0,$1E2A60.L
	move.l	A0,$1E2A5C.L
lbC010612:
	lea	Songlocatedin.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2A5C.L,D0
	jsr	$1A9A1C.L
	lea	songtype.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	Soundtracker1.MSG(PC),A0
	move.w	$1E2A60.L,D0
lbC01063C:
	subq.w	#1,D0
	beq.w	lbC010648
	bsr.w	lbC00F860
	bra.s	lbC01063C

lbC010648:
	jsr	$1AB4A8.L
	lea	songname.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2A5C.L,A0
	moveq	#$14,D0
	bsr.w	lbC011462
	lea	YoucannowF1pl.MSG(PC),A0
	jsr	$1AB4A8.L
lbC01066E:
	jsr	$1A9780.L
	move.w	$1E269E.L,D0
	cmpi.w	#$8A,D0
	beq.w	lbC010AFC
	cmpi.w	#$8B,D0
	beq.w	lbC010B04
	cmpi.w	#$8C,D0
	beq.w	lbC011298
	cmpi.w	#$8D,D0
	beq.w	lbC0106D8
	cmpi.w	#$8E,D0
	beq.w	lbC010770
	cmpi.w	#$8F,D0
	beq.w	lbC0108F6
	cmpi.w	#$90,D0
	beq.w	lbC010B0C
	cmpi.w	#$91,D0
	beq.w	lbC010778
	cmpi.w	#$92,D0
	beq.w	lbC010780
	cmpi.w	#$93,D0
	beq.w	lbC0106CC
	bra.s	lbC01066E

lbC0106CC:
	bsr.w	lbC01111A
	jsr	$1B06CA.L
	rts

lbC0106D8:
	bsr.w	lbC0106E0
	bra.w	lbC010612

lbC0106E0:
	bsr.w	lbC01111A
	lea	Pleaseenterno.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1A9D80.L
	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
	move.l	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01076C
	lea	$1E8468.L,A0
	cmpi.l	#$10000,$1E2A5C.L
	bcc.w	lbC010728
	lea	$1ED468.L,A0
lbC010728:
	jsr	$1BA028.L
	lea	$1E26C8.L,A1
	move.b	$1E29B2.L,-(SP)
	move.l	D1,D0
	bsr.w	lbC01394E
	bmi.w	lbC01075E
	bsr.w	lbC011140
	movea.l	$1E2A5C.L,A2
	bsr.w	lbC0145BE
	bmi.w	lbC01075E
	bsr.w	lbC0139D8
	bmi.w	lbC01075E
lbC01075E:
	move.l	D0,D1
	bsr.w	lbC0121AE
	move.l	D1,D0
	move.b	(SP)+,$1E29B2.L
lbC01076C:
	bra.w	lbC012A96

lbC010770:
	bsr.w	lbC010788
	bra.w	lbC010612

lbC010778:
	bsr.w	lbC010AD0
	bra.w	lbC010612

lbC010780:
	bsr.w	lbC010A8A
	bra.w	lbC010612

lbC010788:
	lea	Pleaseenterno.MSG0(PC),A0
	jsr	$1AB4A8.L
	jsr	$1A9D80.L
	movea.l	A0,A1
	movea.l	$1E2A5C.L,A0
	moveq	#$13,D1
lbC0107A2:
	move.b	(A1)+,D0
	cmpi.b	#$20,D0
	bcs.w	lbC0107B8
	cmpi.b	#$7E,D0
	bhi.w	lbC0107B8
	bra.w	lbC0107BA

lbC0107B8:
	moveq	#0,D0
lbC0107BA:
	jsr	$1AC0A8.L
	addq.l	#1,A0
	dbra	D1,lbC0107A2
	rts

Pleaseenterno.MSG0:
	dc.b	'Please enter now the new song name:',$D,0
Pleaseenterno.MSG:
	dc.b	'Please enter now the save-filename:',$D,0
Pressspacebar.MSG:
	dc.b	'Press space bar or left mouse button for exi'
	dc.b	't',$D,$D
	dc.b	'songname:',$D,$D
	dc.b	'speed:    songpos:    maxpos:   pattpos:    '
	dc.b	'  counter:    break:',$D,$D,$D,$D,$D,$D,$D
	dc.b	'note        sampledata                      '
	dc.b	'    volumedata',$D,$D,$D
	dc.b	'voice1:',$D,$D
	dc.b	'voice2:',$D,$D
	dc.b	'voice3:',$D,$D
	dc.b	'voice4:',$D,$D,0
	dc.b	0

lbC0108F6:
	sf	$1E294E.L
	jsr	$1AED28.L
	lea	Pressspacebar.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2A5C.L,A0
	move.w	#9,$1E269A.L
	move.w	#2,$1E269C.L
	moveq	#$14,D0
	bsr.w	lbC011462
	lea	$3B6(A0),A0
	cmpi.w	#1,$1E2A60.L
	bne.w	lbC01093C
	lea	-$1E0(A0),A0
lbC01093C:
	jsr	$1ABF94.L
	move.w	D0,D5
lbC010944:
	jsr	$1A9780.L
	cmpi.w	#$20,D0
	beq.w	lbC010A7A
	btst	#6,$BFE001.L
	beq.w	lbC010A7A
	move.w	#6,$1E269A.L
	move.w	#4,$1E269C.L
	move.b	$1DF0EA.L,D0
	jsr	$1A9A10.L
	move.w	#$12,$1E269A.L
	move.b	$1DF0EB.L,D0
	jsr	$1A9A10.L
	move.w	#$1D,$1E269A.L
	move.b	D5,D0
	jsr	$1A9A10.L
	move.w	#$28,$1E269A.L
	move.w	$1DF0EC.L,D0
	jsr	$1AEE12.L
	move.w	#$36,$1E269A.L
	move.b	$1DF0EE.L,D0
	jsr	$1A9A10.L
	move.w	#$40,$1E269A.L
	move.b	$1DF0EF.L,D0
	jsr	$1A9A10.L
	clr.w	$1E269A.L
	move.w	#15,$1E269C.L
	lea	$1DF16E.L,A0
	moveq	#3,D2
lbC0109F0:
	moveq	#9,D1
lbC0109F2:
	move.w	(A0)+,D0
	jsr	$1AEE12.L
	moveq	#2,D0
	jsr	$1AEEAE.L
	dbra	D1,lbC0109F2
	jsr	$1AEECA.L
	jsr	$1AEEA2.L
	addq.l	#8,A0
	dbra	D2,lbC0109F0
	bra.w	lbC010944

	lea	$1DF1DE.L,A0
	moveq	#0,D0
	moveq	#0,D1
	moveq	#0,D2
lbC010A28:
	move.w	D2,$1E269A.L
	move.b	(A0)+,D0
	move.b	(A0)+,D1
	cmp.b	D0,D1
	bhi.w	lbC010A4E
	moveq	#$17,D1
	sub.w	D0,D1
	move.w	D1,$1E269C.L
	moveq	#$54,D0
	jsr	$1AE5E4.L
	bra.w	lbC010A60

lbC010A4E:
	moveq	#$16,D1
	sub.w	D0,D1
	moveq	#$20,D0
	move.w	D1,$1E269C.L
	jsr	$1AE5E4.L
lbC010A60:
	addq.w	#1,D2
	cmpi.w	#$4F,D2
	bne.s	lbC010A28
	moveq	#$4F,D0
	lea	$1DF1DE.L,A0
lbC010A70:
	move.b	(A0)+,(A0)+
	dbra	D0,lbC010A70
	bra.w	lbC010944

lbC010A7A:
	st	$1E294E.L
	jsr	$1AED28.L
	bra.w	lbC010612

lbC010A8A:
	movea.l	$1E2A5C.L,A1
	lea	$1D6(A1),A1
	cmpi.w	#1,$1E2A60.L
	beq.w	lbC010AA4
	lea	$1E0(A1),A1
lbC010AA4:
	moveq	#0,D1
	moveq	#0,D2
lbC010AA8:
	lea	2(A1,D1.W),A0
	jsr	$1ABF94.L
	tst.w	D0
	beq.w	lbC010ABA
	move.w	D1,D2
lbC010ABA:
	addq.w	#1,D1
	cmpi.w	#$7F,D1
	bne.s	lbC010AA8
	addq.w	#1,D2
	move.w	D2,D0
	lea	(A1),A0
	jsr	$1AC0A8.L
	rts

lbC010AD0:
	cmpi.w	#2,$1E2A60.L
	bcs.w	lbC010AFA
	cmpi.w	#3,$1E2A60.L
	bhi.w	lbC010AFA
	addi.l	#$1E0,$1E2A5C.L
	move.w	#1,$1E2A60.L
lbC010AFA:
	rts

lbC010AFC:
	bsr.w	lbC011112
	bra.w	lbC01066E

lbC010B04:
	bsr.w	lbC01111A
	bra.w	lbC01066E

lbC010B0C:
	movea.l	$1E2A5C.L,A0
	move.l	$1E2974.L,D0
	lea	$500(A0),A0
	cmp.l	A0,D0
	bhi.w	lbC0105EE
	addq.b	#1,$1E2A5A.L
	movea.l	$1E2A62.L,A0
	bra.w	lbC0105EE

lbC010B32:
	movem.l	D1-D3/A1-A6,-(SP)
	movea.l	A0,A6
	move.l	$1E2974.L,D1
	move.b	$1E2A5A.L,D0
	beq.w	lbC010B66
	cmpi.b	#1,D0
	beq.w	lbC010B76
	cmpi.b	#2,D0
	beq.w	lbC010BD8
	cmpi.b	#3,D0
	beq.w	lbC010C94
	moveq	#0,D0
	bra.w	lbC010CF0

lbC010B66:
	lea	Pass1pleasewa.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2A62.L,A0
lbC010B76:
	move.b	#1,$1E2A5A.L
	move.l	#$4D2E4B2E,D3
lbC010B84:
	jsr	$1ADBFC.L
	cmp.l	D3,D0
	beq.s	lbC010BA8
	addq.l	#2,A0
	jsr	$1B8C2A.L
	tst.b	$1E26A1.L
	bne.w	lbC010BC8
	cmp.l	A0,D1
	bhi.s	lbC010B84
	bra.w	lbC010BC8

lbC010BA8:
	movea.l	A0,A1
	moveq	#2,D1
	lea	-$81(A1),A0
	jsr	$1ABF94.L
	tst.b	D0
	bne.w	lbC010BBE
	moveq	#3,D1
lbC010BBE:
	lea	-$438(A1),A0
	move.w	D1,D0
	bra.w	lbC010CF0

lbC010BC8:
	lea	Pass2pleasewa.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2A62.L,A0
lbC010BD8:
	move.l	$1E2974.L,D1
	move.b	#2,$1E2A5A.L
lbC010BE6:
	jsr	$1ADBFC.L
	andi.l	#$DFDFFFF0,D0
	cmpi.l	#$53542D30,D0
	beq.w	lbC010C16
	addq.l	#2,A0
	jsr	$1B8C2A.L
	tst.b	$1E26A1.L
	bne.w	lbC010C84
	cmp.l	A0,D1
	bhi.s	lbC010BE6
	bra.w	lbC010C84

lbC010C16:
	movea.l	A0,A1
	moveq	#$1F,D2
lbC010C1A:
	bsr.w	lbC010E6E
	tst.b	D0
	bne.w	lbC010C38
	lea	$1E(A0),A0
	dbra	D2,lbC010C1A
lbC010C2C:
	lea	2(A1),A0
	move.l	$1E2974.L,D1
	bra.s	lbC010BE6

lbC010C38:
	moveq	#0,D1
	movea.l	A0,A3
	lea	-$1E(A0),A0
	bsr.w	lbC010DCC
	tst.w	D0
	beq.s	lbC010C2C
	move.w	D0,D2
	cmpi.w	#14,D2
	bls.s	lbC010C2C
lbC010C50:
	moveq	#1,D0
	lea	-$1D6(A3),A0
	cmpi.w	#$1E,D2
	bls.w	lbC010CF0
	cmpi.w	#15,D1
	bls.w	lbC010CF0
	movea.l	A3,A0
	jsr	$1ADBB8.L
	tst.b	D0
	bne.w	lbC010C7A
	moveq	#3,D0
	bra.w	lbC010C7C

lbC010C7A:
	moveq	#2,D0
lbC010C7C:
	lea	-$3B6(A3),A0
	bra.w	lbC010CF0

lbC010C84:
	lea	Pass3pleasewa.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2A62.L,A0
lbC010C94:
	move.l	$1E2974.L,D2
	move.b	#3,$1E2A5A.L
lbC010CA2:
	bsr.w	lbC010E6E
	tst.w	D0
	bne.w	lbC010CC6
	addq.l	#2,A0
	jsr	$1B8C2A.L
	tst.b	$1E26A1.L
	bne.w	lbC010CEE
	cmp.l	A0,D2
	bls.w	lbC010CEE
	bra.s	lbC010CA2

lbC010CC6:
	movea.l	A0,A1
	bsr.w	lbC010D7E
	tst.w	D0
	bne.w	lbC010CD8
lbC010CD2:
	lea	2(A1),A0
	bra.s	lbC010CA2

lbC010CD8:
	movea.l	A0,A3
	lea	-$1E(A0),A0
	bsr.w	lbC010DCC
	cmpi.w	#14,D0
	bls.s	lbC010CD2
	move.w	D0,D2
	bra.w	lbC010C50

lbC010CEE:
	moveq	#0,D0
lbC010CF0:
	movem.l	(SP)+,D1-D3/A1-A6
	rts

Pass1pleasewa.MSG:
	dc.b	13
	dc.b	'Pass 1 please wait',$D
	dc.b	'Address: ',0
Pass2pleasewa.MSG:
	dc.b	13
	dc.b	'Pass 2 please wait',$D
	dc.b	'Address: ',0
Pass3pleasewa.MSG:
	dc.b	13
	dc.b	'Pass 3 please wait',$D
	dc.b	'Address: ',0

	move.l	D0,-(SP)
	move.b	$1E294E.L,-(SP)
	sf	$1E294E.L
	move.l	A0,D0
	tst.b	D0
	bne.w	lbC010D74
	move.w	#9,$1E269A.L
	jsr	$1A9A1C.L
lbC010D74:
	move.b	(SP)+,$1E294E.L
	move.l	(SP)+,D0
	rts

lbC010D7E:
	movem.l	D1/D2/A0-A2,-(SP)
	lea	$86(A0),A1
	lea	$1DF1DE.L,A2
	moveq	#$7F,D0
lbC010D8E:
	clr.l	(A2)+
	dbra	D0,lbC010D8E
	move.w	#$7FF,D1
	lea	$1DF1DE.L,A2
lbC010D9E:
	lea	0(A1,D1.W),A0
	jsr	$1ABF94.L
	add.w	D0,D0
	addq.w	#1,0(A2,D0.W)
	dbra	D1,lbC010D9E
	cmpi.w	#$320,(A2)
	bls.w	lbC010DC0
	moveq	#1,D0
	bra.w	lbC010DC6

lbC010DC0:
	moveq	#0,D0
	bra.w	lbC010DC6

lbC010DC6:
	movem.l	(SP)+,D1/D2/A0-A2
	rts

lbC010DCC:
	movem.l	D2/A0,-(SP)
	moveq	#0,D1
	moveq	#0,D2
lbC010DD4:
	bsr.w	lbC010DFE
	tst.w	D0
	beq.w	lbC010DF4
	addq.w	#1,D1
	cmpi.w	#2,D0
	bne.w	lbC010DEA
	move.w	D1,D2
lbC010DEA:
	lea	-$1E(A0),A0
	cmpi.w	#$1F,D1
	bls.s	lbC010DD4
lbC010DF4:
	move.l	D1,D0
	move.l	D2,D1
	movem.l	(SP)+,D2/A0
	rts

lbC010DFE:
	movem.l	D1/D2/A0/A1,-(SP)
	movea.l	A0,A1
	lea	$16(A1),A0
	jsr	$1ADBB8.L
	cmpi.w	#$7FFF,D0
	bhi.w	lbC010E5A
	tst.w	D0
	beq.w	lbC010E60
	move.w	D0,D1
	lea	$18(A1),A0
	jsr	$1ADBB8.L
	cmpi.w	#$40,D0
	bhi.w	lbC010E5A
	lea	$1C(A1),A0
	jsr	$1ADBB8.L
	andi.w	#$FFFE,D0
	cmp.w	D0,D1
	bcs.w	lbC010E5A
	move.w	D0,D2
	lea	$1A(A1),A0
	jsr	$1ADBB8.L
	cmp.w	D0,D1
	bcs.w	lbC010E5A
	bra.w	lbC010E66

lbC010E5A:
	moveq	#0,D0
	bra.w	lbC010E68

lbC010E60:
	moveq	#1,D0
	bra.w	lbC010E68

lbC010E66:
	moveq	#2,D0
lbC010E68:
	movem.l	(SP)+,D1/D2/A0/A1
	rts

lbC010E6E:
	movem.l	D2-D4/A0/A1,-(SP)
	moveq	#0,D0
	jsr	$1ABF94.L
	tst.w	D0
	beq.w	lbC010F14
	movea.l	A0,A1
	move.w	D0,D3
	move.w	D0,D2
	lea	1(A1),A0
	jsr	$1ABF94.L
	tst.w	D0
	beq.w	lbC010EA2
	cmpi.w	#$70,D0
	bcc.w	lbC010EA2
	bra.w	lbC010F10

lbC010EA2:
	subq.w	#1,D2
	moveq	#0,D1
	moveq	#0,D4
lbC010EA8:
	lea	2(A1,D2.W),A0
	moveq	#0,D0
	jsr	$1ABF94.L
	tst.w	D0
	bne.w	lbC010EBC
	addq.w	#1,D4
lbC010EBC:
	cmp.w	D0,D1
	bcc.w	lbC010EC4
	move.w	D0,D1
lbC010EC4:
	dbra	D2,lbC010EA8
	addq.w	#1,D1
	cmp.w	D1,D3
	bcs.w	lbC010F10
	cmpi.w	#1,D1
	beq.w	lbC010F10
	add.w	D4,D4
	cmp.w	D4,D3
	bls.w	lbC010F10
	moveq	#0,D0
	lea	12(A1,D3.W),A0
	moveq	#$7F,D2
	sub.w	D3,D2
	subi.w	#10,D2
	beq.w	lbC010F12
	bpl.w	lbC010EFA
	bra.w	lbC010F12

lbC010EFA:
	jsr	$1ABF94.L
	tst.b	D0
	bne.w	lbC010F10
	addq.l	#1,A0
	dbra	D2,lbC010EFA
	bra.w	lbC010F12

lbC010F10:
	moveq	#0,D3
lbC010F12:
	move.w	D3,D0
lbC010F14:
	movem.l	(SP)+,D2-D4/A0/A1
	rts

ActionReplays.MSG:
	dc.b	'Action Replay sound-tool v1.1 ',$D
	dc.b	'------------------------------',$D
	dc.b	'Now analysing (selected) Chip-memory for any'
	dc.b	' sounds',$D,0
Nosonginmemor.MSG:
	dc.b	13
	dc.b	'No song in memory found',$D,0
Songlocatedin.MSG:
	dc.b	13
	dc.b	'Song located in memory at: $',0
songtype.MSG:
	dc.b	' , songtype = ',0
Soundtracker1.MSG:
	dc.b	'Soundtracker (16 samples)',$D,0
	dc.b	'Soundtracker (32 samples)',$D,0
	dc.b	'Noisetracker (32 samples)',$D,0
songname.MSG:
	dc.b	'songname:',0
YoucannowF1pl.MSG:
	dc.b	'You can now:',$D
	dc.b	'F1 = play module , F2 = stop module , F3 = s'
	dc.b	'ee more details , F4 = save module',$D
	dc.b	'F5 = rename song , F6 = show songdata , F7 ='
	dc.b	' continue searching',$D
	dc.b	'F8 = change to st-16s , F9 = calculate new p'
	dc.b	'atternlength , F10 = exit',$D,0

lbC011112:
	bsr.w	lbC0111D4
	bra.w	lbC011288

lbC01111A:
	bsr.w	lbC011290
lbC01111E:
	clr.w	$DFF0A8.L
	clr.w	$DFF0B8.L
	clr.w	$DFF0C8.L
	clr.w	$DFF0D8.L
	move.w	#15,$DFF096.L
	rts

lbC011140:
	movem.l	D1/D2/A0/A1,-(SP)
	movea.l	$1E2A5C.L,A1
	moveq	#14,D2
	moveq	#0,D1
	move.w	#$258,D1
	cmpi.w	#1,$1E2A60.L
	beq.w	lbC011164
	moveq	#$1E,D2
	move.w	#$43C,D1
lbC011164:
	lea	$14(A1),A1
lbC011168:
	lea	$16(A1),A0
	jsr	$1ADBB8.L
	add.l	D0,D0
	add.l	D0,D1
	lea	$1E(A1),A1
	dbra	D2,lbC011168
	lea	(A1),A0
	bsr.w	lbC011190
	mulu.w	#$400,D0
	add.l	D1,D0
	movem.l	(SP)+,D1/D2/A0/A1
	rts

lbC011190:
	movem.l	D1-D3/A0/A1,-(SP)
	movea.l	A0,A1
	jsr	$1ABF94.L
	moveq	#0,D3
	move.w	D0,D1
	beq.w	lbC0111BC
	subq.w	#1,D1
lbC0111A6:
	lea	2(A1,D1.W),A0
	jsr	$1ABF94.L
	cmp.b	D0,D3
	bhi.w	lbC0111B8
	move.b	D0,D3
lbC0111B8:
	dbra	D1,lbC0111A6
lbC0111BC:
	move.w	D3,D0
	addq.w	#1,D0
	movem.l	(SP)+,D1-D3/A0/A1
	rts

	movem.l	D0-D7/A0-A6,-(SP)
	bsr.w	lbC010596
	movem.l	(SP)+,D0-D7/A0-A6
	rts

lbC0111D4:
	movem.l	D0/A0/A1,-(SP)
	sf	$1E26BE.L
	lea	$1DF16E.L,A0
	move.w	#$190,D0
lbC0111E8:
	clr.l	(A0)+
	dbra	D0,lbC0111E8
	lea	$1DF16E.L,A0
	move.w	#1,$14(A0)
	move.w	#2,$30(A0)
	move.w	#4,$4C(A0)
	move.w	#8,$68(A0)
	lea	$1DF0A2.L,A1
	lea	lbW01123A(PC),A0
	moveq	#$25,D0
lbC011218:
	move.w	(A0)+,(A1)+
	dbra	D0,lbC011218
	lea	lbW01059A(PC),A0
	lea	$1DF082.L,A1
	moveq	#$1F,D0
lbC01122A:
	move.b	(A0)+,(A1)+
	dbra	D0,lbC01122A
	bsr.w	lbC010592
	movem.l	(SP)+,D0/A0/A1
	rts

lbW01123A:
	dc.w	$358
	dc.w	$328
	dc.w	$2FA
	dc.w	$2D0
	dc.w	$2A6
	dc.w	$280
	dc.w	$25C
	dc.w	$23A
	dc.w	$21A
	dc.w	$1FC
	dc.w	$1E0
	dc.w	$1C5
	dc.w	$1AC
	dc.w	$194
	dc.w	$17D
	dc.w	$168
	dc.w	$153
	dc.w	$140
	dc.w	$12E
	dc.w	$11D
	dc.w	$10D
	dc.w	$FE
	dc.w	$F0
	dc.w	$E2
	dc.w	$D6
	dc.w	$CA
	dc.w	$BE
	dc.w	$B4
	dc.w	$AA
	dc.w	$A0
	dc.w	$97
	dc.w	$8F
	dc.w	$87
	dc.w	$7F
	dc.w	$78
	dc.w	$71
	dc.w	0
	dc.w	0
	dc.w	0

lbC011288:
	st	$1E2A58.L
	rts

lbC011290:
	sf	$1E2A58.L
	rts

lbC011298:
	lea	Scanningsound.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2A5C.L,D0
	jsr	$1A9A1C.L
	jsr	$1AEECA.L
	movea.l	D0,A1
	lea	songname.MSG0(PC),A0
	jsr	$1AB4A8.L
	movea.l	A1,A0
	moveq	#$14,D0
	jsr	$1B933C.L
	jsr	$1AEECA.L
	moveq	#14,D1
	move.w	$1E2A60.L,D2
	cmpi.w	#1,D2
	beq.w	lbC0112E2
	moveq	#$1E,D1
lbC0112E2:
	moveq	#0,D2
	lea	$14(A1),A1
lbC0112E8:
	lea	samplename.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	A1,A0
	moveq	#$16,D0
	bsr.w	lbC011462
	lea	lenght.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$16(A1),A0
	jsr	$1ADBB8.L
	add.w	D0,D0
	jsr	$1AEE12.L
	lea	vol.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$18(A1),A0
	jsr	$1ADBB8.L
	jsr	$1AEE12.L
	lea	repeat.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$1A(A1),A0
	jsr	$1ADBB8.L
	jsr	$1AEE12.L
	lea	replen.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$1C(A1),A0
	jsr	$1ADBB8.L
	add.w	D0,D0
	jsr	$1AEE12.L
	jsr	$1AEECA.L
	lea	$1E(A1),A1
	dbra	D1,lbC0112E8
	lea	lenghtofsound.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	(A1),A0
	jsr	$1ABF94.L
	jsr	$1A9A10.L
	jsr	$1AEECA.L
	lea	numberofpatte.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	(A1),A0
	bsr.w	lbC011190
	jsr	$1A9A10.L
	jsr	$1AEECA.L
	lea	moduletotalle.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC011140
	jsr	$1B209E.L
	jsr	$1AEECA.L
	bra.w	lbC010612

Scanningsound.MSG:
	dc.b	13
	dc.b	'Scanning sound-module at:',0
songname.MSG0:
	dc.b	'songname  :',0
samplename.MSG:
	dc.b	'samplename:',0
lenght.MSG:
	dc.b	' lenght:',0
vol.MSG:
	dc.b	' vol:',0
repeat.MSG:
	dc.b	' repeat:',0
replen.MSG:
	dc.b	' replen:',0
lenghtofsound.MSG:
	dc.b	'lenght of sound    : ',0
numberofpatte.MSG:
	dc.b	'number of patterns : ',0
moduletotalle.MSG:
	dc.b	'module total lenght: ',0

lbC011462:
	movem.l	D0/D1/A0,-(SP)
	tst.w	D0
	beq.w	lbC011488
	subq.w	#1,D0
	move.w	D0,D1
lbC011470:
	jsr	$1ABF94.L
	jsr	$1AB4F6.L
	jsr	$1AE5E4.L
	addq.l	#1,A0
	dbra	D1,lbC011470
lbC011488:
	movem.l	(SP)+,D0/D1/A0
	rts

	lea	$DFF000.L,A5
	move.w	#$FF00,$34(A5)
	sf	$1E294E.L
	st	$1E2840.L
	jsr	$1AED28.L
	jsr	$1B97B2.L
	move.w	#$12C,$1E283C.L
	bsr.w	lbC011590
lbC0114BE:
	sf	$1E294E.L
	jsr	$1AED28.L
	lea	PressF1hearso.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC0117FA
	bsr.w	lbC011914
	bsr.w	lbC011722
	not.b	$1E2840.L
	bsr.w	lbC011722
	moveq	#0,D2
	moveq	#2,D3
lbC0114EE:
	jsr	$1A9780.L
	btst	#6,$BFE001.L
	beq.w	lbC0116E8
	btst	#2,$16(A5)
	beq.w	lbC0116DE
	move.w	$1E269E.L,D0
	cmpi.w	#$8A,D0
	beq.w	lbC011A10
	cmpi.w	#$8B,D0
	beq.w	lbC011908
	cmpi.w	#$93,D0
	beq.w	lbC011578
	cmpi.w	#$82,D0
	beq.w	lbC0116A6
	cmpi.w	#$83,D0
	beq.w	lbC0116C2
	cmpi.w	#$80,D0
	beq.w	lbC01167E
	cmpi.w	#$81,D0
	beq.w	lbC011692
	cmpi.w	#$8C,D0
	beq.w	lbC011618
	cmpi.w	#$8D,D0
	beq.w	lbC0115BE
	cmpi.w	#$8E,D0
	beq.w	lbC011674
	moveq	#0,D2
	moveq	#2,D3
	subi.w	#$30,D0
	cmpi.w	#4,D0
	bhi.s	lbC0114EE
	tst.w	D0
	bne.w	lbC011630
	bra.w	lbC0114EE

lbC011578:
	jsr	$1B97B2.L
	jsr	$1AED28.L
	st	$1E294E.L
	jmp	$1B06CA.L

lbC011590:
	clr.l	$1E2834.L
	move.l	$1E2974.L,$1E2838.L
	bsr.w	lbC011CDC
	bra.w	lbC0115A8

lbC0115A8:
	bsr.w	lbC011722
	not.b	$1E2840.L
	bsr.w	lbC011722
	not.b	$1E2840.L
	rts

lbC0115BE:
	move.l	$1E2A94.L,$1E2834.L
	move.l	$1E2A98.L,$1E2838.L
	subi.l	#$5000,$1E2834.L
	bpl.w	lbC0115E6
	clr.l	$1E2834.L
lbC0115E6:
	addi.l	#$5000,$1E2838.L
	move.l	$1E2838.L,D0
	cmp.l	$1E2974.L,D0
	bls.w	lbC01160A
	move.l	$1E2974.L,$1E2838.L
lbC01160A:
	bsr.w	lbC011914
	bsr.s	lbC0115A8
	bsr.w	lbC011CDC
	bra.w	lbC0114EE

lbC011618:
	bsr.w	lbC011590
	bsr.w	lbC011914
	move.w	#$12C,$1E283C.L
	bsr.w	lbC0117FA
	bra.w	lbC0114EE

lbC011630:
	subq.w	#1,D0
	move.w	D0,D1
	lsl.w	#4,D1
	lea	$1E24A2.L,A0
	lea	0(A0,D1.W),A0
	move.l	(A0),D0
	move.l	D0,$1E2834.L
	moveq	#0,D1
	move.w	4(A0),D1
	add.l	D1,D0
	add.l	D1,D0
	move.l	D0,$1E2838.L
	bsr.w	lbC011CDC
	bsr.w	lbC0115A8
	bsr.w	lbC011914
	move.w	6(A0),$1E283C.L
	bsr.w	lbC0117FA
	bra.w	lbC0114EE

lbC011674:
	jsr	$1BF4EA.L
	bra.w	lbC0114BE

lbC01167E:
	addq.w	#2,$1E283C.L
	bsr.w	lbC0117FA
	jsr	$1B17DE.L
	bra.w	lbC0114EE

lbC011692:
	subq.w	#2,$1E283C.L
	bsr.w	lbC0117FA
	jsr	$1B17DE.L
	bra.w	lbC0114EE

lbC0116A6:
	move.b	$1E26A0.L,$1E2840.L
	move.w	$1E2A92.L,D0
	bsr.w	lbC011866
	bsr.w	lbC011722
	bra.w	lbC0114EE

lbC0116C2:
	move.b	$1E26A0.L,$1E2840.L
	move.w	$1E2A92.L,D0
	bsr.w	lbC01181E
	bsr.w	lbC011722
	bra.w	lbC0114EE

lbC0116DE:
	st	$1E2840.L
	bra.w	lbC0116EE

lbC0116E8:
	sf	$1E2840.L
lbC0116EE:
	jsr	$1B1ED4.L
	tst.w	D0
	beq.w	lbC01171E
	lea	$1B96F8.L,A2
	bpl.w	lbC01170C
	lea	$1B9740.L,A2
	neg.w	D0
lbC01170C:
	move.w	D0,D1
	move.w	$1E2A92.L,D0
lbC011714:
	jsr	(A2)
	subq.w	#1,D1
	bpl.s	lbC011714
	bsr.w	lbC011722
lbC01171E:
	bra.w	lbC0114EE

lbC011722:
	movem.l	D0-D3/A0,-(SP)
	move.w	#5,$1E269C.L
	tst.b	$1E2840.L
	bne.w	lbC01174E
	move.w	#$1E,$1E269A.L
	lea	startsample.MSG(PC),A0
	move.l	$1E2834.L,D0
	bra.w	lbC011760

lbC01174E:
	move.w	#$32,$1E269A.L
	lea	endsample.MSG(PC),A0
	move.l	$1E2838.L,D0
lbC011760:
	jsr	$1AB4A8.L
	jsr	$1A9A1C.L
	moveq	#$3C,D0
	moveq	#$41,D1
	bsr.w	lbC011CB0
	move.l	$1E2834.L,D0
	sub.l	$1E2A94.L,D0
	move.w	$1E2A92.L,D1
	divu.w	D1,D0
	cmpi.w	#$27F,D0
	bls.w	lbC011794
	move.w	#$27F,D0
lbC011794:
	movem.l	D0-D3/A2,-(SP)
	lea	$FFFFFFFF.L,A2
	move.w	D0,D0
	move.w	#$3C,D1
	move.w	D0,D2
	move.w	#$41,D3
	jsr	$1B9AD2.L
	movem.l	(SP)+,D0-D3/A2
	move.l	$1E2838.L,D0
	sub.l	$1E2A94.L,D0
	divu.w	D1,D0
	cmpi.w	#$27F,D0
	bls.w	lbC0117CE
	move.w	#$27F,D0
lbC0117CE:
	movem.l	D0-D3/A2,-(SP)
	lea	$FFFFFFFF.L,A2
	move.w	D0,D0
	move.w	#$3C,D1
	move.w	D0,D2
	move.w	#$41,D3
	jsr	$1B9AD2.L
	movem.l	(SP)+,D0-D3/A2
	jsr	$1B17DE.L
	movem.l	(SP)+,D0-D3/A0
	rts

lbC0117FA:
	clr.w	$1E269A.L
	move.w	#5,$1E269C.L
	lea	sampleperiod.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	$1E283C.L,D0
	jmp	$1AEE12.L

lbC01181E:
	movem.l	D0/D1/A0,-(SP)
	ext.l	D0
	lea	$1E2834.L,A0
	tst.b	$1E2840.L
	beq.w	lbC01183A
	lea	$1E2838.L,A0
lbC01183A:
	add.l	D0,(A0)
	move.l	$1E2834.L,D1
	cmp.l	$1E2838.L,D1
	bcs.w	lbC01184E
	sub.l	D0,(A0)
lbC01184E:
	move.l	$1E2838.L,D1
	cmp.l	$1E2A98.L,D1
	bls.w	lbC011860
	sub.l	D0,(A0)
lbC011860:
	movem.l	(SP)+,D0/D1/A0
	rts

lbC011866:
	movem.l	D0/D1/A0,-(SP)
	ext.l	D0
	lea	$1E2834.L,A0
	tst.b	$1E2840.L
	beq.w	lbC011882
	lea	$1E2838.L,A0
lbC011882:
	sub.l	D0,(A0)
	move.l	$1E2838.L,D1
	cmp.l	$1E2834.L,D1
	bhi.w	lbC011896
	add.l	D0,(A0)
lbC011896:
	move.l	$1E2834.L,D1
	cmp.l	$1E2A94.L,D1
	bcc.w	lbC0118A8
	add.l	D0,(A0)
lbC0118A8:
	movem.l	(SP)+,D0/D1/A0
	rts

sampleperiod.MSG:
	dc.b	'sampleperiod: ',0
startsample.MSG:
	dc.b	'startsample: ',0
endsample.MSG:
	dc.b	'endsample: ',0,0

	lea	$DFF000.L,A5
	clr.w	$A8(A5)
	clr.w	$B8(A5)
	clr.w	$C8(A5)
	clr.w	$D8(A5)
	move.w	#$FF,$9E(A5)
	move.w	#$80,$9A(A5)
	move.w	#15,$96(A5)
	move.w	#$80,$9C(A5)
	rts

lbC011908:
	bsr.w	lbC011914
	bsr.w	lbC0115A8
	bra.w	lbC0114EE

lbC011914:
	movem.l	D0-D7/A0-A6,-(SP)
	move.w	#$3C,D0
	move.w	#$C7,D1
	bsr.w	lbC011CB0
	bsr.w	lbC011CDC
	move.l	$1E2834.L,$1E2A94.L
	move.l	$1E2838.L,$1E2A98.L
	movem.l	D0-D3/A2,-(SP)
	lea	$FFFFFFFF.L,A2
	move.w	#0,D0
	move.w	#$87,D1
	move.w	#$27F,D2
	move.w	#$87,D3
	jsr	$1B9AD2.L
	movem.l	(SP)+,D0-D3/A2
	move.l	$1E2838.L,D2
	sub.l	$1E2834.L,D2
	lsl.l	#5,D2
	divu.w	#$280,D2
	andi.l	#$FFFF,D2
	moveq	#0,D5
	moveq	#0,D4
	move.l	$1E2834.L,D0
	move.l	$1E2838.L,D1
	lsl.l	#5,D0
	lsl.l	#5,D1
lbC01198C:
	move.l	D0,D6
	lsr.l	#5,D6
	movea.l	D6,A2
	move.l	D0,D6
	add.l	D2,D6
	lsr.l	#5,D6
	movea.l	D6,A3
	move.l	A3,D7
	sub.l	A2,D7
	bne.w	lbC0119A4
	moveq	#1,D7
lbC0119A4:
	move.b	(A2)+,D6
	ext.w	D6
	ext.l	D6
	add.l	D6,D5
	cmpa.l	A2,A3
	bhi.s	lbC0119A4
	neg.l	D5
	divs.w	D7,D5
	addi.w	#$10E,D5
	lsr.w	#1,D5
	tst.w	D4
	bne.w	lbC0119D0
	move.w	D4,$1E2A8E.L
	move.w	D5,$1E2A90.L
	bra.w	lbC0119FE

lbC0119D0:
	movem.l	D0-D3/A2,-(SP)
	lea	-1.w,A2
	move.w	$1E2A8E.L,D0
	move.w	$1E2A90.L,D1
	move.w	D4,D2
	move.w	D5,D3
	jsr	$1B9AD2.L
	movem.l	(SP)+,D0-D3/A2
	move.w	D4,$1E2A8E.L
	move.w	D5,$1E2A90.L
lbC0119FE:
	moveq	#0,D5
	addq.w	#1,D4
	add.l	D2,D0
	cmpi.w	#$280,D4
	bcs.s	lbC01198C
	movem.l	(SP)+,D0-D7/A0-A6
	rts

lbC011A10:
	movem.l	D0-D7/A0-A6,-(SP)
	lea	$DFF000.L,A5
	moveq	#$30,D0
	moveq	#$37,D1
	bsr.w	lbC011CB0
	moveq	#0,D5
	move.l	$1E2838.L,D0
	sub.l	$1E2834.L,D0
	divu.w	#$20,D0
	move.w	D0,D5
	swap	D0
	move.w	D0,D6
	moveq	#15,D0
	moveq	#0,D7
	move.l	$1E2834.L,D1
lbC011A44:
	move.l	D1,$A0(A5)
	move.w	D5,$A4(A5)
	move.w	#$40,$A8(A5)
	move.w	$1E283C.L,$A6(A5)
	move.w	#$8201,$96(A5)
lbC011A60:
	btst	#6,$BFE001.L
	beq.w	lbC011AEA
	tst.b	$1E26A1.L
	bne.w	lbC011AEA
	btst	#7,$1F(A5)
	beq.s	lbC011A60
	move.w	#$80,$9C(A5)
	add.l	D5,D1
	add.l	D5,D1
	exg	D0,D7
	move.w	#6,$1E269C.L
	moveq	#15,D0
	sub.w	D7,D0
	mulu.w	#5,D0
	move.w	D0,$1E269A.L
	moveq	#$2B,D0
	jsr	$1AE5E4.L
	subq.w	#6,$1E269A.L
	bmi.w	lbC011AB8
	jsr	$1AEE96.L
lbC011AB8:
	exg	D0,D7
	dbra	D0,lbC011A44
	move.w	D6,$A4(A5)
	beq.w	lbC011AEA
lbC011AC6:
	btst	#6,$BFE001.L
	beq.w	lbC011AEA
	tst.b	$1E26A1.L
	bne.w	lbC011AEA
	btst	#7,$1F(A5)
	beq.s	lbC011AC6
	move.w	#$80,$9C(A5)
lbC011AEA:
	clr.w	$A8(A5)
	addq.w	#4,$1E269A.L
	jsr	$1AEE96.L
	movem.l	(SP)+,D0-D7/A0-A6
	bra.w	lbC0114EE

PressF1hearso.MSG:
	dc.b	'Press:',$D
	dc.b	'F1 = hear sound    F2 = calculate new graphi'
	dc.b	'cs  F3 = reset start/end/freq',$D
	dc.b	'F4 = expand range  F5 = save sample         '
	dc.b	'    F10 = exit',$D
	dc.b	'Left & Right or Mouse + left/right button to'
	dc.b	' change start/end of sample',$D,0
	dc.b	'1,2,3,4 = actually used samples',0,0

lbC011BF8:
	movem.l	D0-D6/A0-A3/A5,-(SP)
	lea	$DFF000.L,A5
	lea	$1E45E8.L,A0
	lea	$50.w,A1
	move.l	A1,D4
	mulu.w	D1,D4
	moveq	#-$10,D5
	and.w	D0,D5
	lsr.w	#3,D5
	add.w	D5,D4
	add.l	A0,D4
	moveq	#0,D5
	sub.w	D1,D3
	roxl.b	#1,D5
	tst.w	D3
	bge.w	lbC011C28
	neg.w	D3
lbC011C28:
	sub.w	D0,D2
	roxl.b	#1,D5
	tst.w	D2
	bge.w	lbC011C34
	neg.w	D2
lbC011C34:
	move.w	D3,D1
	sub.w	D2,D1
	bge.w	lbC011C3E
	exg	D2,D3
lbC011C3E:
	roxl.b	#1,D5
	lea	lbW011D02(PC),A3
	move.b	0(A3,D5.W),D5
	add.w	D2,D2
lbC011C4A:
	btst	#6,2(A5)
	bne.s	lbC011C4A
	move.w	D2,$62(A5)
	sub.w	D3,D2
	bge.w	lbC011C60
	ori.b	#$40,D5
lbC011C60:
	move.w	D2,$52(A5)
	sub.w	D3,D2
	move.w	D2,$64(A5)
	move.w	#$8000,$74(A5)
	move.w	A2,$72(A5)
	move.w	#$FFFF,$44(A5)
	andi.w	#15,D0
	ror.w	#4,D0
	ori.w	#$BCA,D0
	move.w	#$8240,$96(A5)
	move.w	D0,$40(A5)
	move.w	D5,$42(A5)
	move.l	D4,$48(A5)
	move.l	D4,$54(A5)
	move.w	A1,$60(A5)
	move.w	A1,$66(A5)
	lsl.w	#6,D3
	addq.w	#2,D3
	move.w	D3,$58(A5)
	movem.l	(SP)+,D0-D6/A0-A3/A5
	rts

lbC011CB0:
	movem.l	D0/D1,-(SP)
	exg	D0,D1
lbC011CB6:
	movem.l	D0-D3/A2,-(SP)
	suba.l	A2,A2
	move.w	#0,D0
	move.w	D1,D1
	move.w	#$280,D2
	move.w	D1,D3
	jsr	lbC011BF8(PC)
	movem.l	(SP)+,D0-D3/A2
	addq.w	#1,D1
	cmp.w	D1,D0
	bcc.s	lbC011CB6
	movem.l	(SP)+,D0/D1
	rts

lbC011CDC:
	move.l	D0,-(SP)
	move.l	$1E2838.L,D0
	sub.l	$1E2834.L,D0
	divu.w	#$280,D0
	andi.w	#$FFFE,D0
	bne.w	lbC011CF8
	moveq	#2,D0
lbC011CF8:
	move.w	D0,$1E2A92.L
	move.l	(SP)+,D0
	rts

lbW011D02:
	dc.w	$111
	dc.w	$915
	dc.w	$519
	dc.w	$D1D

	movem.l	D0/D1,-(SP)
	move.b	$200(A0),2(A1)
	move.b	$300(A0),3(A1)
	move.b	#$FF,$200(A0)
	move.b	#$FF,$300(A0)
	move.b	(A0),(A1)
	move.b	$100(A0),1(A1)
	bclr	#0,$E00(A0)
	bclr	#0,$F00(A0)
	move.b	$400(A0),4(A1)
	move.b	$500(A0),5(A1)
	move.b	$600(A0),6(A1)
	move.b	$700(A0),7(A1)
	bset	#4,$E00(A0)
	bset	#4,$F00(A0)
	move.b	$400(A0),$10(A1)
	move.b	$500(A0),$11(A1)
	move.b	$600(A0),$12(A1)
	move.b	$700(A0),$13(A1)
	sf	$14(A1)
	move.l	#$1F40,D0
lbC011D80:
	subq.l	#1,D0
	bne.s	lbC011D80
	moveq	#0,D0
	moveq	#0,D1
	move.b	$A00(A0),$17(A1)
	move.b	$900(A0),$16(A1)
	move.b	$800(A0),$15(A1)
	move.b	$800(A0),D0
	move.b	$A00(A0),10(A1)
	move.b	$900(A0),9(A1)
	move.b	$800(A0),8(A1)
	cmp.b	$15(A1),D0
	beq.w	lbC011DC8
	subq.b	#1,D0
	cmp.b	$15(A1),D0
	beq.w	lbC011DC8
	bset	#0,$14(A1)
lbC011DC8:
	move.b	$800(A0),D1
	move.l	#$FA0,D0
lbC011DD2:
	subq.l	#1,D0
	bne.s	lbC011DD2
	cmp.b	$800(A0),D1
	bne.w	lbC011DE4
	bset	#1,$14(A1)
lbC011DE4:
	moveq	#2,D0
	cmpa.l	#$BFE001,A0
	beq.w	lbC011DF4
	move.w	#$271,D0
lbC011DF4:
	btst	#1,$14(A1)
	bne.w	lbC011E3A
	clr.l	$1E2834.L
	move.b	10(A1),$1E2835.L
	move.b	9(A1),$1E2836.L
	move.b	8(A1),$1E2837.L
	sub.l	D0,$1E2834.L
	move.b	$1E2835.L,10(A1)
	move.b	$1E2836.L,9(A1)
	move.b	$1E2837.L,8(A1)
lbC011E3A:
	move.b	$C00(A0),12(A1)
	move.b	#$80,13(A1)
	clr.b	$E00(A0)
	clr.b	$F00(A0)
	cmpa.l	#$BFE001,A0
	bne.w	lbC011EA4
	tst.b	$D00(A0)
	move.b	#$FF,$300(A0)
	move.b	#$20,$100(A0)
	move.l	#$800,D1
lbC011E6E:
	move.w	#0,$DFF02C.L
	move.b	$D00(A0),D0
	btst	#4,D0
	bne.w	lbC011E8A
	subq.l	#1,D1
	bne.s	lbC011E6E
	move.b	$D00(A0),D0
lbC011E8A:
	btst	#7,D0
	beq.w	lbC011EF2
	btst	#4,D0
	beq.w	lbC011EF2
	bset	#4,13(A1)
	bra.w	lbC011EF2

lbC011EA4:
	bclr	#7,$100(A0)
	bset	#3,$100(A0)
	nop
	nop
	bclr	#3,$100(A0)
	move.b	$D00(A0),D0
	move.l	#$FFFF,D1
lbC011EC4:
	move.b	$D00(A0),D0
	btst	#4,D0
	bne.w	lbC011ED8
	subq.l	#1,D1
	bne.s	lbC011EC4
	move.b	$D00(A0),D0
lbC011ED8:
	btst	#7,D0
	beq.w	lbC011EF2
	btst	#4,D0
	beq.w	lbC011EF2
	bset	#4,13(A1)
	bra.w	lbC011EF2

lbC011EF2:
	bset	#6,$E00(A0)
	clr.b	$500(A0)
	move.b	#1,$400(A0)
	bset	#0,$E00(A0)
	clr.b	$C00(A0)
	move.w	#$1000,D0
lbC011F10:
	dbra	D0,lbC011F10
	move.b	$D00(A0),D0
	btst	#7,D0
	beq.w	lbC011F2E
	btst	#3,D0
	beq.w	lbC011F2E
	bset	#3,13(A1)
lbC011F2E:
	move.b	#$18,$D00(A0)
	clr.b	$E00(A0)
	move.b	#5,$400(A0)
	clr.b	$500(A0)
	move.b	$D00(A0),D0
	bset	#0,$E00(A0)
	move.w	#$800,D0
lbC011F50:
	dbra	D0,lbC011F50
	move.b	$D00(A0),D0
	btst	#7,D0
	beq.w	lbC011F6E
	btst	#0,D0
	beq.w	lbC011F6E
	bset	#0,13(A1)
lbC011F6E:
	clr.b	$E00(A0)
	clr.b	$F00(A0)
	move.b	#5,$600(A0)
	clr.b	$700(A0)
	move.b	$D00(A0),D0
	bset	#0,$F00(A0)
	move.w	#$800,D0
lbC011F8E:
	dbra	D0,lbC011F8E
	move.b	$D00(A0),D0
	btst	#7,D0
	beq.w	lbC011FAC
	btst	#1,D0
	beq.w	lbC011FAC
	bset	#1,13(A1)
lbC011FAC:
	btst	#7,15(A1)
	beq.w	lbC011FBC
	bset	#2,13(A1)
lbC011FBC:
	movem.l	(SP)+,D0/D1
	rts

	move.b	(A1),(A0)
	move.b	1(A1),$100(A0)
	move.b	2(A1),$200(A0)
	move.b	3(A1),$300(A0)
	move.b	#$20,$E00(A0)
	move.b	#$60,$F00(A0)
	move.b	4(A1),$400(A0)
	move.b	5(A1),$500(A0)
	move.b	6(A1),$600(A0)
	move.b	7(A1),$700(A0)
	bset	#0,$E00(A0)
	bset	#0,$F00(A0)
	move.b	$10(A1),$400(A0)
	move.b	$11(A1),$500(A0)
	move.b	$12(A1),$600(A0)
	move.b	$13(A1),$700(A0)
	clr.b	$E00(A0)
	clr.b	$F00(A0)
	move.b	10(A1),$A00(A0)
	move.b	9(A1),$900(A0)
	move.b	8(A1),$800(A0)
	btst	#0,$14(A1)
	beq.w	lbC01206A
	move.b	$17(A1),$A00(A0)
	move.b	$16(A1),$900(A0)
	move.b	$15(A1),$800(A0)
	tst.b	$A00(A0)
	move.b	10(A1),$A00(A0)
	move.b	9(A1),$900(A0)
	move.b	8(A1),$800(A0)
lbC01206A:
	btst	#1,$14(A1)
	beq.w	lbC01207A
	move.b	$A00(A0),$A00(A0)
lbC01207A:
	move.b	12(A1),$C00(A0)
	move.b	#$7B,$D00(A0)
	move.b	13(A1),$D00(A0)
	clr.b	$E00(A0)
	clr.b	$F00(A0)
	move.b	#$90,$BFED01.L
	tst.b	$BFED01.L
	tst.b	$BFDD00.L
	rts

	move.b	#3,$BFE201.L
	clr.b	$BFEE01.L
	move.b	#8,$BFEF01.L
	move.b	#$7F,$BFED01.L
	move.b	#$88,$BFED01.L
	move.b	#$C0,$BFD200.L
	move.b	#$FF,$BFD300.L
	move.b	#$7F,$BFDD00.L
	move.b	#$FF,$BFD100.L
	move.b	#$87,$BFD100.L
	move.b	#$FF,$BFD100.L
	rts

lbC012102:
	movem.l	D2-D4/A1/A2,-(SP)
	moveq	#0,D0
	bra.w	lbC01211A

lbC01210C:
	movem.l	D2-D4/A1/A2,-(SP)
	moveq	#0,D0
	suba.l	A0,A0
	move.l	$1E2974.L,D2
lbC01211A:
	lsr.l	#2,D2
lbC01211C:
	movea.l	A0,A1
	move.l	(A0)+,D3
	moveq	#4,D4
lbC012122:
	subq.l	#1,D2
	beq.w	lbC012134
	cmp.l	(A0),D3
	bne.w	lbC012134
	addq.l	#4,A0
	addq.l	#4,D4
	bra.s	lbC012122

lbC012134:
	cmp.l	D4,D0
	bls.w	lbC012146
lbC01213A:
	tst.l	D2
	bne.s	lbC01211C
	movea.l	A2,A0
	movem.l	(SP)+,D2-D4/A1/A2
	rts

lbC012146:
	move.l	D3,D1
	move.l	D4,D0
	movea.l	A1,A2
	bra.s	lbC01213A

lbC01214E:
	movem.l	D0/D1/A0/A1,-(SP)
	sf	$1E26BE.L
	move.w	#$85F,D0
	lea	$1DAD82.L,A1
lbC012162:
	move.l	(A0)+,D1
	move.l	D1,(A1)
	addq.w	#8,A1
	dbra	D0,lbC012162
	move.w	#$49F,D0
lbC012170:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC012170
	movem.l	(SP)+,D0/D1/A0/A1
	st	$1E29B3.L
	st	$1E29B4.L
	sf	$1E29B5.L
	sf	$1E29B6.L
	st	$1E29B7.L
	sf	$1E2A9D.L
	sf	$1E2A9F.L
	move.w	#$8002,$DFF09C.L
	rts

lbC0121AE:
	movem.l	D1/D2/A0/A1,-(SP)
	tst.b	$1E2A9D.L
	beq.w	lbC0121C6
	jsr	$1BC2F6.L
	bmi.w	lbC0121CC
lbC0121C6:
	jsr	$1BAF04.L
lbC0121CC:
	move.w	#$85F,D2
	lea	$1DAD82.L,A1
lbC0121D6:
	move.l	0(A1),D1
	addq.l	#8,A1
	move.l	D1,(A0)+
	dbra	D2,lbC0121D6
	move.w	#$49F,D2
lbC0121E6:
	move.l	(A1)+,(A0)+
	dbra	D2,lbC0121E6
	jsr	$1BA16A.L
	movem.l	(SP)+,D1/D2/A0/A1
	tst.w	D0
	rts

lbC0121FA:
	sf	$1E2A9E.L
	move.w	D0,-(SP)
	clr.w	D0
	move.b	$1E29B2.L,D0
	addq.b	#3,D0
	ori.b	#$78,$BFD100.L
	bclr	D0,$BFD100.L
	move.w	(SP)+,D0
	rts

lbC01221E:
	ori.b	#$78,$BFD100.L
	rts

lbC012228:
	move.b	$1E29B2.L,D0
	bset	D0,$1E29B6.L
	bclr	#7,$BFD100.L
	bsr.s	lbC01221E
	bsr.s	lbC0121FA
	nop
	nop
	bsr.w	lbC0122E0
	move.l	#$1FFFF,D0
lbC01224E:
	btst	#5,$BFE001.L
	beq.w	lbC012266
	subq.l	#1,D0
	bpl.s	lbC01224E
	bsr.s	lbC01221E
	moveq	#-1,D0
	tst.w	D0
	rts

lbC012266:
	moveq	#0,D0
	bsr.s	lbC01221E
	tst.w	D0
	rts

lbC01226E:
	move.w	D0,-(SP)
	move.b	$1E29B2.L,D0
	bclr	D0,$1E29B6.L
	move.w	(SP)+,D0
	bset	#7,$BFD100.L
	bsr.s	lbC01221E
	bsr.w	lbC0121FA
	bsr.s	lbC01221E
	rts

lbC012290:
	move.l	D0,-(SP)
	move.b	$1E29B2.L,-(SP)
	moveq	#3,D0
lbC01229A:
	move.b	D0,$1E29B2.L
	bsr.s	lbC01226E
	subq.w	#1,D0
	bpl.s	lbC01229A
	move.b	(SP)+,$1E29B2.L
	move.l	(SP)+,D0
	st	$1E2A9E.L
	rts

lbC0122B6:
	move.b	#8,$BFDE00.L
	move.b	#0,$BFD400.L
	move.b	#15,$BFD500.L
	bset	#0,$BFDE00.L
lbC0122D6:
	tst.b	$BFD500.L
	bne.s	lbC0122D6
	rts

lbC0122E0:
	move.w	D0,-(SP)
	move.w	#$7D,D0
lbC0122E6:
	bsr.s	lbC0122B6
	dbra	D0,lbC0122E6
	move.w	(SP)+,D0
	rts

lbC0122F0:
	bsr.w	lbC0121FA
	bclr	#1,$BFD100.L
	bclr	#0,$BFD100.L
	nop
	nop
	bset	#0,$BFD100.L
	bsr.w	lbC01221E
	bsr.s	lbC0122B6
	bsr.w	lbC01234A
	rts

lbC01231C:
	bsr.w	lbC0121FA
	bset	#1,$BFD100.L
	bclr	#0,$BFD100.L
	nop
	nop
	bset	#0,$BFD100.L
	bsr.w	lbC01221E
	bsr.w	lbC0122B6
	bsr.w	lbC012358
	rts

lbC01234A:
	move.w	D0,-(SP)
	move.b	#2,D0
	bsr.w	lbC012366
	move.w	(SP)+,D0
	rts

lbC012358:
	move.w	D0,-(SP)
	move.b	#$FE,D0
	bsr.w	lbC012366
	move.w	(SP)+,D0
	rts

lbC012366:
	movem.l	D1/A0,-(SP)
	lea	$1E29BA.L,A0
	moveq	#0,D1
	move.b	$1E29B2.L,D1
	add.b	D0,0(A0,D1.W)
	movem.l	(SP)+,D1/A0
	rts

lbC012382:
	movem.l	D0/D1/A0/A1,-(SP)
	lea	$1E29BA.L,A0
	lea	$1E29BE.L,A1
	moveq	#0,D0
	moveq	#0,D1
	move.b	$1E29B2.L,D0
	move.w	D0,D1
	addq.w	#3,D1
	clr.b	0(A0,D0.W)
lbC0123A4:
	bsr.w	lbC0121FA
	btst	#4,$BFE001.L
	beq.w	lbC0123BA
	bsr.w	lbC01231C
	bra.s	lbC0123A4

lbC0123BA:
	bsr.w	lbC01221E
	move.b	0(A0,D0.W),0(A1,D0.W)
	neg.b	0(A1,D0.W)
	clr.b	0(A0,D0.W)
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC0123D2:
	movem.l	D0-D4/A0/A1,-(SP)
	lea	$1E29BA.L,A0
	lea	$1E29BE.L,A1
	moveq	#0,D1
	moveq	#0,D2
	move.b	$1E29B2.L,D1
	move.w	D1,D2
	addq.w	#3,D2
	cmpi.b	#$FF,0(A1,D1.W)
	bne.w	lbC0123FC
	bsr.s	lbC012382
lbC0123FC:
	tst.w	D0
	beq.w	lbC012456
	moveq	#0,D3
	moveq	#0,D4
	move.b	0(A0,D1.W),D3
	move.b	D0,D4
	lsr.w	#1,D3
	lsr.w	#1,D4
	sub.w	D3,D4
	beq.w	lbC012434
	subq.w	#1,D4
	bpl.w	lbC01242C
	addq.w	#2,D4
	neg.w	D4
lbC012420:
	bsr.w	lbC01231C
	dbra	D4,lbC012420
	bra.w	lbC012434

lbC01242C:
	bsr.w	lbC0122F0
	dbra	D4,lbC01242C
lbC012434:
	andi.b	#$FB,$BFD100.L
	andi.b	#1,D0
	beq.w	lbC01244C
	bsr.w	lbC01247C
	bra.w	lbC012450

lbC01244C:
	bsr.w	lbC012476
lbC012450:
	movem.l	(SP)+,D0-D4/A0/A1
	rts

lbC012456:
	bsr.w	lbC0121FA
	btst	#4,$BFE001.L
	beq.w	lbC012470
	bsr.w	lbC01221E
	bsr.w	lbC01231C
	bra.s	lbC012456

lbC012470:
	clr.b	0(A0,D1.W)
	bra.s	lbC012434

lbC012476:
	moveq	#4,D0
	bra.w	lbC012482

lbC01247C:
	moveq	#0,D0
	bra.w	lbC012482

lbC012482:
	moveq	#0,D1
	move.b	$1E29B2.L,D1
	lea	$1E29F0.L,A1
	tst.b	0(A1,D1.W)
	beq.w	lbC0124C6
	lea	$1E29BA.L,A1
	move.b	0(A1,D1.W),D2
	lsl.w	#2,D1
	lea	$1E29F4.L,A1
	lsr.b	#1,D2
	bne.w	lbC0124B8
	eori.b	#4,D0
	bra.w	lbC0124C6

lbC0124B8:
	move.l	0(A1,D1.W),D3
	btst	D2,D3
	beq.w	lbC0124C6
	eori.b	#4,D0
lbC0124C6:
	andi.b	#$FB,$BFD100.L
	bsr.w	lbC0122B6
	or.b	D0,$BFD100.L
	bsr.w	lbC0122B6
	rts

lbC0124DE:
	movem.l	D1/D2/A0-A3/A5,-(SP)
	move.l	D0,D1
	bsr.w	lbC012940
	bmi.w	lbC01262A
	moveq	#-8,D0
	tst.b	$1E26A1.L
	bne.w	lbC01262A
	lea	$DFF000.L,A5
	bsr.w	lbC01302A
	bmi.w	lbC01262A
	move.b	$1E29B2.L,D0
	btst	D0,$1E29B6.L
	bne.w	lbC01251E
	bsr.w	lbC012228
	bmi.w	lbC01262A
lbC01251E:
	move.l	D1,D0
	bsr.w	lbC0123D2
	bsr.w	lbC0121FA
	move.w	#$8210,$96(A5)
	move.w	#$4489,$7E(A5)
	move.w	#$77F0,$9E(A5)
	move.w	#$9500,$9E(A5)
	move.w	#$4000,$24(A5)
	lea	$400(A0),A1
	move.l	#$AAAAAAAA,(A1)+
	move.w	#$4489,(A1)+
	movea.l	A1,A2
	moveq	#10,D0
lbC012558:
	clr.l	(A2)
	lea	$440(A2),A2
	dbra	D0,lbC012558
	move.l	A1,$20(A5)
	move.w	#2,$9C(A5)
	move.w	#$9761,$24(A5)
	move.w	#$9761,$24(A5)
	move.l	#$10000,D2
lbC01257E:
	tst.b	$1E26A1.L
	bne.w	lbC012622
	btst	#1,$1F(A5)
	bne.w	lbC01261C
	subq.l	#1,D2
	beq.w	lbC01261C
	lea	$2EC0(A1),A2
	moveq	#10,D0
lbC01259E:
	lea	-$440(A2),A2
	tst.w	2(A2)
	bne.w	lbC0125B0
	dbra	D0,lbC01259E
	bra.s	lbC01257E

lbC0125B0:
	cmpi.w	#$4489,(A2)
	bne.w	lbC0125C4
	lea	$2A80(A1),A3
	cmpa.l	A2,A3
	beq.w	lbC0125FE
	bra.s	lbC01257E

lbC0125C4:
	move.w	#$4000,$24(A5)
	move.l	#$AAAAAAAA,-6(A2)
	move.w	#$4489,-2(A2)
	move.l	A2,D0
	sub.l	A1,D0
	move.l	#$2EC2,D1
	sub.l	D0,D1
	lsr.w	#1,D1
	bset	#15,D1
	move.l	D1,D0
	move.l	A2,$20(A5)
	move.w	#2,$9C(A5)
	move.w	D1,$24(A5)
	move.w	D1,$24(A5)
lbC0125FE:
	move.l	#$20000,D0
lbC012604:
	tst.b	$1E26A1.L
	bne.w	lbC012622
	btst	#1,$1F(A5)
	bne.w	lbC012628
	subq.l	#1,D0
	bne.s	lbC012604
lbC01261C:
	moveq	#-2,D0
	bra.w	lbC01262A

lbC012622:
	moveq	#-8,D0
	bra.w	lbC01262A

lbC012628:
	moveq	#0,D0
lbC01262A:
	tst.w	D0
	movem.l	(SP)+,D1/D2/A0-A3/A5
	rts

lbC012632:
	movem.l	D1-D7/A0-A3,-(SP)
	move.l	#$55555555,D6
	movem.l	A0/A1,-(SP)
	tst.b	$1E29B7.L
	beq.w	lbC012662
	lea	$40(A0),A0
	move.w	#$FF,D0
	moveq	#0,D5
lbC012654:
	move.l	(A0)+,D1
	eor.l	D1,D5
	dbra	D0,lbC012654
	and.l	D6,D5
	movem.l	(SP),A0/A1
lbC012662:
	lea	$21E(A1),A2
	lea	$43E(A0),A1
	lea	$23E(A0),A0
	move.w	#$1DD8,D0
	move.w	#2,D1
	move.l	#$FFFFFFFF,D2
	move.w	#$4001,D3
	bsr.w	lbC012A4E
	movem.l	(SP)+,A0/A1
	movea.l	A1,A3
	tst.b	$1E29B7.L
	beq.w	lbC0126A6
	moveq	#0,D7
	lea	8(A0),A2
	moveq	#9,D0
lbC01269C:
	move.l	(A2)+,D1
	eor.l	D1,D7
	dbra	D0,lbC01269C
	and.l	D6,D7
lbC0126A6:
	moveq	#7,D0
lbC0126A8:
	move.l	(A0)+,D1
	move.l	(A0)+,D2
	cmpi.w	#1,D0
	bls.w	lbC0126B4
lbC0126B4:
	and.l	D6,D1
	and.l	D6,D2
	lsl.l	#1,D1
	or.l	D2,D1
	move.l	D1,(A1)+
	dbra	D0,lbC0126A8
	tst.b	$1E29B7.L
	beq.w	lbC0126EC
	moveq	#-9,D0
	cmpi.b	#$FF,4(A3)
	bne.w	lbC0126F6
	moveq	#-3,D0
	cmp.l	$18(A3),D7
	bne.w	lbC012706
	moveq	#-4,D0
	cmp.l	$1C(A3),D5
	bne.w	lbC012714
lbC0126EC:
	moveq	#0,D0
lbC0126EE:
	tst.w	D0
	movem.l	(SP)+,D1-D7/A0-A3
	rts

lbC0126F6:
	tst.b	$1E2A9F.L
	beq.s	lbC0126EE
	move.b	#$FF,4(A3)
	bra.s	lbC0126EC

lbC012706:
	tst.b	$1E2A9F.L
	beq.s	lbC0126EE
	move.l	D7,$18(A3)
	bra.s	lbC0126EC

lbC012714:
	tst.b	$1E2A9F.L
	beq.s	lbC0126EE
	move.l	D5,$1C(A3)
	bra.s	lbC0126EC

lbC012722:
	movem.l	D1/D2/A1-A3,-(SP)
	move.l	A0,-(SP)
	lea	$1E29C2.L,A2
	moveq	#10,D1
lbC012730:
	clr.l	(A2)+
	dbra	D1,lbC012730
	movea.l	A0,A1
	lea	$400(A0),A0
	lea	$1E29C2.L,A2
	moveq	#10,D1
lbC012744:
	movea.l	A1,A3
	bsr.w	lbC012632
	bmi.w	lbC012780
	lea	$440(A0),A0
	lea	$220(A1),A1
	moveq	#0,D2
	move.b	6(A3),D2
	moveq	#-5,D0
	cmpi.w	#10,D2
	bhi.w	lbC012780
	lsl.w	#2,D2
	moveq	#-5,D0
	tst.l	0(A2,D2.W)
	bne.w	lbC012780
	lea	$20(A3),A3
	move.l	A3,0(A2,D2.W)
	dbra	D1,lbC012744
	moveq	#0,D0
lbC012780:
	tst.w	D0
	movea.l	(SP)+,A0
	movem.l	(SP)+,D1/D2/A1-A3
	rts

lbC01278A:
	movem.l	D0-D5/A0-A3,-(SP)
	movem.l	A0/A1,-(SP)
	lea	$20(A0),A0
	lea	$40(A1),A1
	move.w	#$200,D0
	bsr.w	lbC012858
	movem.l	(SP),A2/A3
	movem.l	(SP),A0/A1
	move.l	#$AAAAAAAA,(A1)+
	move.l	#$44894489,(A1)+
	lea	4(A0),A0
	moveq	#4,D5
lbC0127BC:
	bsr.w	lbC012818
	dbra	D5,lbC0127BC
	lea	8(A3),A3
	moveq	#0,D1
	moveq	#9,D0
lbC0127CC:
	move.l	(A3)+,D2
	eor.l	D2,D1
	dbra	D0,lbC0127CC
	andi.l	#$55555555,D1
	move.l	D1,$18(A2)
	lea	$10(A3),A3
	moveq	#0,D1
	move.w	#$FF,D0
lbC0127E8:
	move.l	(A3)+,D2
	eor.l	D2,D1
	dbra	D0,lbC0127E8
	andi.l	#$55555555,D1
	move.l	D1,$1C(A2)
	bsr.w	lbC012818
	bsr.w	lbC012818
	bsr.w	lbC0128CA
	movem.l	(SP)+,A0/A1
	lea	$240(A1),A1
	bsr.w	lbC0128CA
	movem.l	(SP)+,D0-D5/A0-A3
	rts

lbC012818:
	move.l	(A0)+,D0
lbC01281A:
	move.l	D0,D3
	lsr.l	#1,D0
	bsr.w	lbC01282A
	move.l	D3,D0
	bsr.w	lbC01282A
	rts

lbC01282A:
	andi.l	#$55555555,D0
	move.l	D0,D2
	eori.l	#$55555555,D2
	move.l	D2,D1
	lsl.l	#1,D2
	lsr.l	#1,D1
	bset	#$1F,D1
	and.l	D2,D1
	or.l	D1,D0
	btst	#0,-1(A1)
	beq.w	lbC012854
	bclr	#$1F,D0
lbC012854:
	move.l	D0,(A1)+
	rts

lbC012858:
	movem.l	D0-D4/A2-A4,-(SP)
	move.w	D0,D4
	lsl.w	#2,D0
	ori.w	#8,D0
	movem.l	A0/A1,-(SP)
	move.w	D0,D3
	movea.l	A1,A2
	movea.l	A0,A1
	move.w	#$1DB1,D0
	move.w	#0,D1
	move.l	#$FFFFFFFF,D2
	bsr.w	lbC012A4E
	movem.l	(SP),A0/A1
	movea.l	A1,A2
	move.w	#$2D8C,D0
	bsr.w	lbC012A4E
	movem.l	(SP),A0/A1
	adda.w	D4,A0
	adda.w	D4,A1
	adda.w	D4,A1
	subq.w	#2,A0
	subq.w	#2,A1
	movea.l	A1,A2
	movea.l	A0,A1
	move.w	#$DB1,D0
	move.w	#$1002,D1
	bsr.w	lbC012A4E
	movem.l	(SP),A0/A1
	adda.w	D4,A1
	movea.l	A1,A2
	move.w	#$1D8C,D0
	move.w	#0,D1
	bsr.w	lbC012A4E
	movem.l	(SP)+,A0/A1
	movem.l	(SP)+,D0-D4/A2-A4
	rts

lbC0128CA:
	btst	#0,-1(A1)
	bne.w	lbC0128E2
	btst	#6,(A1)
	bne.w	lbC0128E2
	bset	#7,(A1)
	rts

lbC0128E2:
	bclr	#7,(A1)
	rts

lbC0128E8:
	movem.l	D0/D1/A0-A2,-(SP)
	lea	$2E80(A0),A1
	lea	$1540(A0),A0
	move.l	#$AAAAAAAA,$440(A1)
	moveq	#10,D0
	moveq	#1,D1
lbC012900:
	move.b	D1,7(A0)
	bsr.w	lbC01278A
	lea	-$220(A0),A0
	lea	-$440(A1),A2
	lea	$440(A1),A1
	bsr.s	lbC0128CA
	movea.l	A2,A1
	addq.w	#1,D1
	dbra	D0,lbC012900
	movem.l	(SP)+,D0/D1/A0-A2
	bsr.w	lbC012928
	rts

lbC012928:
	movem.l	D0/A0,-(SP)
	move.w	#$FF,D0
lbC012930:
	move.l	#$AAAAAAAA,(A0)+
	dbra	D0,lbC012930
	movem.l	(SP)+,D0/A0
	rts

lbC012940:
	move.l	A5,-(SP)
	lea	$BFE000.L,A5
	bclr	#7,$F01(A5)
	clr.b	$A01(A5)
	clr.b	$901(A5)
	clr.b	$801(A5)
	moveq	#0,D0
lbC01295C:
	tst.b	$1E26A1.L
	beq.w	lbC01296C
	moveq	#-8,D0
	bra.w	lbC01298A

lbC01296C:
	btst	#1,$DFF01F.L
	bne.w	lbC01298A
	cmpi.b	#$80,$801(A5)
	bls.s	lbC01295C
	moveq	#-12,D0
	move.w	#$8002,$DFF09C.L
lbC01298A:
	movea.l	(SP)+,A5
	rts

lbC01298E:
	movem.l	D1/A1/A5,-(SP)
	bsr.s	lbC012940
	bsr.w	lbC012EDA
	bmi.w	lbC012A46
	moveq	#-8,D0
	tst.b	$1E26A1.L
	bne.w	lbC012A46
	lea	$DFF000.L,A5
	bsr.w	lbC0121FA
	moveq	#-10,D0
	btst	#3,$BFE001.L
	beq.w	lbC012A46
	move.b	$1E29B2.L,D0
	btst	D0,$1E29B6.L
	bne.w	lbC0129DA
	moveq	#-11,D0
	bsr.w	lbC012228
	bmi.w	lbC012A46
lbC0129DA:
	bsr.w	lbC0121FA
	moveq	#0,D0
	move.b	$1E29B3.L,D0
	bsr.w	lbC0123D2
	bsr.w	lbC0121FA
	move.b	$BFD100.L,D0
	move.w	#$8010,$96(A5)
	move.w	#$4000,$24(A5)
	move.w	#$7F00,$9E(A5)
	move.w	#$8100,$9E(A5)
	cmpi.b	#$50,$1E29B3.L
	bcs.w	lbC012A1E
	move.w	#$A100,$9E(A5)
lbC012A1E:
	lea	$1A(A0),A1
	move.l	A1,$20(A5)
	move.w	#$1002,$9C(A5)
	move.w	#$D955,$24(A5)
	move.w	#$D955,$24(A5)
	bsr.w	lbC012940
	move.w	#$4000,$24(A5)
	bsr.w	lbC01221E
lbC012A46:
	tst.w	D0
	movem.l	(SP)+,D1/A1/A5
	rts

lbC012A4E:
	bsr.w	lbC012A82
	lea	$DFF000.L,A5
	movem.w	D0/D1,$40(A5)
	move.l	D2,$44(A5)
	move.l	A0,$50(A5)
	move.l	A1,$4C(A5)
	move.l	A2,$54(A5)
	clr.l	$60(A5)
	clr.l	$64(A5)
	move.w	#$5555,$70(A5)
	move.w	D3,$58(A5)
	rts

lbC012A82:
	move.w	#$8640,$DFF096.L
lbC012A8A:
	btst	#6,$DFF002.L
	bne.s	lbC012A8A
	rts

lbC012A96:
	jsr	$1AEECA.L
lbC012A9C:
	movem.l	D0/A0,-(SP)
	lea	Diskok.MSG(PC),A0
	neg.w	D0
	mulu.w	#$1E,D0
	lea	0(A0,D0.L),A0
	jsr	$1AB4A8.L
	jsr	$1AEECA.L
	movem.l	(SP)+,D0/A0
	rts

Diskok.MSG:
	dc.b	'Disk ok                      ',0
	dc.b	'No disk in drive             ',0
	dc.b	'Read error                   ',0
	dc.b	'Headerchecksum error         ',0
	dc.b	'Datachecksum error           ',0
	dc.b	'Track malformed              ',0
	dc.b	'Wrong blocktype              ',0
	dc.b	'Not a bootblock              ',0
	dc.b	'User break                   ',0
	dc.b	'Not a dos-track              ',0
	dc.b	'Disk is write-protected      ',0
	dc.b	'Write error                  ',0
	dc.b	'DMA not ready (sync ?)       ',0
	dc.b	'Drive not available          ',0
	dc.b	'Filename expected            ',0
	dc.b	'Bam corrupt                  ',0
	dc.b	'Bam not valid                ',0
	dc.b	'Invalid sectornr             ',0
	dc.b	'File not found               ',0
	dc.b	'Disk full                    ',0
	dc.b	'Sector not free              ',0
	dc.b	'Dos strukture corrupt        ',0
	dc.b	'End of file                  ',0
	dc.b	'Sector freed twice           ',0
	dc.b	'Invalid pathname             ',0
	dc.b	'Directory not found          ',0
	dc.b	'File exists                  ',0
	dc.b	'Directory not empty          ',0
	dc.b	'No valid freeze-file         ',0
	dc.b	'Verify error                 ',0
	dc.b	'AAR MK II file: use old aload',0
	dc.b	'Not enough ChipMem available ',0
	dc.b	'Not enough FastMem available ',0
	dc.b	'Not enough Exp.Mem available ',0
	dc.b	'Not a DOS-disk               ',0

lbC012EDA:
	bsr.w	lbC0121FA
	btst	#2,$BFE001.L
	bne.w	lbC012F0C
	bsr.w	lbC01221E
	moveq	#0,D0
	bsr.w	lbC0123D2
	moveq	#2,D0
	bsr.w	lbC0123D2
	bsr.w	lbC0121FA
	moveq	#-1,D0
	btst	#2,$BFE001.L
	beq.w	lbC012F0E
lbC012F0C:
	moveq	#0,D0
lbC012F0E:
	bsr.w	lbC01221E
	tst.w	D0
	rts

lbC012F16:
	movem.l	D1,-(SP)
	moveq	#0,D1
	move.w	D0,D1
	moveq	#-$11,D0
	cmpi.l	#$6DF,D1
	bhi.w	lbC012F74
	divu.w	#11,D1
	moveq	#-8,D0
	tst.b	$1E26A1.L
	bne.w	lbC012F74
	bsr.s	lbC012EDA
	bmi.w	lbC012F74
	move.b	$1E29B2.L,D0
	cmp.b	$1E29B4.L,D0
	bne.w	lbC012F5A
	cmp.b	$1E29B3.L,D1
	beq.w	lbC012F64
lbC012F5A:
	move.l	D1,D0
	bsr.w	lbC012F7C
	bmi.w	lbC012F74
lbC012F64:
	swap	D1
	lea	$1E29C2.L,A1
	lsl.w	#2,D1
	movea.l	0(A1,D1.W),A1
	moveq	#0,D0
lbC012F74:
	movem.l	(SP)+,D1
	tst.w	D0
	rts

lbC012F7C:
	movem.l	D1/D2,-(SP)
	move.w	D0,D2
	moveq	#5,D1
lbC012F84:
	move.w	D2,D0
	bsr.w	lbC0124DE
	bmi.w	lbC012FB4
	bsr.w	lbC012722
	bmi.w	lbC012FB4
	move.b	D2,$1E29B3.L
	move.b	$1E29B2.L,$1E29B4.L
	sf	$1E29B5.L
	movem.l	(SP)+,D1/D2
	moveq	#0,D0
	rts

lbC012FB4:
	cmpi.w	#$FFF4,D0
	beq.w	lbC012FC0
	dbra	D1,lbC012F84
lbC012FC0:
	st	$1E29B3.L
	st	$1E29B4.L
	movem.l	(SP)+,D1/D2
	tst.w	D0
	rts

lbC012FD4:
	bsr.w	lbC012EDA
	bmi.w	lbC013026
	move.b	$1E29B2.L,-(SP)
	move.b	$1E29B4.L,$1E29B2.L
	move.l	D1,-(SP)
	moveq	#5,D1
	bsr.w	lbC0128E8
lbC012FF4:
	bsr.w	lbC01298E
	bmi.w	lbC01301A
	move.l	(SP)+,D1
	move.b	(SP)+,$1E29B2.L
	st	$1E29B3.L
	st	$1E29B4.L
	sf	$1E29B5.L
	moveq	#0,D0
	rts

lbC01301A:
	dbra	D1,lbC012FF4
	move.l	(SP)+,D1
	move.b	(SP)+,$1E29B2.L
lbC013026:
	tst.w	D0
	rts

lbC01302A:
	cmpi.b	#$FF,$1E29B3.L
	beq.w	lbC01304E
	cmpi.b	#$FF,$1E29B4.L
	beq.w	lbC01304E
	tst.b	$1E29B5.L
	beq.w	lbC01304E
	bra.s	lbC012FD4

lbC01304E:
	moveq	#0,D0
	rts

	move.w	D0,-(SP)
	moveq	#-1,D0
lbC013056:
	move.w	D0,$DFF180.L
	dbra	D0,lbC013056
	move.w	(SP)+,D0
	rts

lbC013064:
	moveq	#0,D0
	move.l	#$370,D1
	tst.w	D0
	rts

lbC013070:
	movem.l	D2/A1-A3,-(SP)
	moveq	#0,D1
	move.b	$1E29B2.L,D1
	move.l	D1,D2
	lsl.l	#2,D2
	lea	$1E2AA6.L,A3
	tst.b	0(A3,D1.W)
	bne.w	lbC0130C0
	move.l	#$370,D0
	bsr.w	lbC012F16
	bmi.w	lbC0130C8
	move.l	$14(A1),D0
	st	0(A3,D1.W)
	lea	$1E2AAA.L,A3
	cmp.l	0(A3,D2.W),D0
	beq.w	lbC0130C0
	move.l	D0,0(A3,D2.W)
	move.l	#$370,$1E2AA2.L
lbC0130C0:
	move.l	$1E2AA2.L,D1
	moveq	#0,D0
lbC0130C8:
	movem.l	(SP)+,D2/A1-A3
	tst.w	D0
	rts

	st	$1E2B34.L
	moveq	#2,D6
	move.b	(A0),D0
	jsr	$1AEE3E.L
	cmpi.b	#$41,D0
	bne.w	lbC0130F0
	jsr	$1AEE1E.L
	moveq	#-1,D6
lbC0130F0:
	bsr.w	lbC014D28
	lea	$1E26C8.L,A2
	move.b	$1E29B2.L,-(SP)
	lea	$5000.w,A0
	bsr.w	lbC01214E
	bsr.w	lbC0161CE
	bmi.w	lbC0131B4
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC0131B4
	move.l	A0,-(SP)
	lea	Directoryof.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	lea	$1E075E.L,A2
	moveq	#0,D2
	bsr.w	lbC0131CA
	bmi.w	lbC0131B4
	sf	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC0131B4
	bsr.w	lbC0149E4
	move.l	D0,D2
	jsr	$1B05D2.L
	moveq	#4,D1
	jsr	$1AE598.L
	move.l	A0,-(SP)
	lea	blocksfree.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	#$6E0,D0
	sub.l	D2,D0
	mulu.w	#$3E8,D0
	divu.w	#$6E0,D0
	ext.l	D0
	jsr	$1B05D2.L
	roxr.l	#4,D0
	moveq	#2,D1
	cmpi.w	#$100,D0
	bne.w	lbC01318C
	moveq	#3,D1
lbC01318C:
	jsr	$1AE598.L
	move.w	#$2E,D0
	jsr	$1AE5E4.L
	roxl.l	#4,D0
	moveq	#1,D1
	jsr	$1AE598.L
	lea	ofdiskused.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	moveq	#0,D0
lbC0131B4:
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	sf	$1E2B34.L
	move.b	(SP)+,$1E29B2.L
	rts

lbC0131CA:
	movem.l	D1-D6/A0-A4,-(SP)
	tst.w	D6
	beq.w	lbC013276
	moveq	#-6,D0
	cmpi.l	#2,(A1)
	bne.w	lbC013278
	cmpi.l	#2,$1FC(A1)
	bhi.w	lbC013280
	tst.l	$1FC(A1)
	beq.w	lbC013278
	moveq	#$47,D3
	movea.l	A2,A3
	lea	$18(A1),A4
	moveq	#0,D5
lbC0131FE:
	move.l	(A4)+,(A2)+
	bne.w	lbC013208
	subq.l	#4,A2
	subq.w	#1,D5
lbC013208:
	addq.w	#1,D5
	dbra	D3,lbC0131FE
	move.w	D2,D0
	jsr	$1AEEAE.L
	movea.l	A0,A4
	moveq	#$28,D0
	jsr	$1AE5E4.L
	bsr.w	lbC014BD0
	moveq	#$29,D0
	jsr	$1AE5E4.L
	jsr	$1AEECA.L
	movea.l	A4,A0
	addq.w	#4,D2
	move.l	$1F0(A1),D4
	subq.w	#1,D6
	beq.w	lbC01325C
	subq.w	#1,D5
	bmi.w	lbC01325C
lbC013246:
	move.l	(A3)+,D0
	bsr.w	lbC012F16
	bmi.w	lbC013278
	bsr.w	lbC0131CA
	bmi.w	lbC013278
	dbra	D5,lbC013246
lbC01325C:
	subq.w	#4,D2
	addq.w	#1,D6
	move.l	D4,D0
	beq.w	lbC013276
	bsr.w	lbC012F16
	bmi.w	lbC013278
	bsr.w	lbC0131CA
	bmi.w	lbC013278
lbC013276:
	moveq	#0,D0
lbC013278:
	tst.w	D0
	movem.l	(SP)+,D1-D6/A0-A4
	rts

lbC013280:
	cmpi.l	#$FFFFFFFD,$1FC(A1)
	bne.s	lbC013278
	move.w	D2,D0
	addq.w	#2,D0
	jsr	$1AEEAE.L
	move.l	$144(A1),D0
	jsr	$1B05D2.L
	moveq	#6,D1
	jsr	$1AE598.L
	moveq	#2,D0
	jsr	$1AEEAE.L
	bsr.w	lbC014BD0
	jsr	$1AEECA.L
	move.l	$1F0(A1),D0
	beq.w	lbC0132CC
	bsr.w	lbC012F16
	bmi.s	lbC013278
	bsr.w	lbC0131CA
	bmi.s	lbC013278
lbC0132CC:
	moveq	#0,D0
	bra.s	lbC013278

Directoryof.MSG:
	dc.b	'Directory of ',0
blocksfree.MSG:
	dc.b	' blocks free, ',0
ofdiskused.MSG:
	dc.b	' % of disk used',$D,0

lbC0132FE:
	movem.l	D0-D3/A0,-(SP)
	moveq	#10,D0
lbC013304:
	moveq	#7,D1
lbC013306:
	clr.l	(A0)+
	dbra	D1,lbC013306
	move.l	#$444F5300,D1
	move.w	#$7F,D2
	moveq	#0,D3
	tst.b	$1E2C47.L
	beq.w	lbC013324
	moveq	#1,D3
lbC013324:
	move.l	D3,-(SP)
	or.l	D1,D3
	move.l	D3,(A0)+
	move.l	(SP)+,D3
	addq.b	#1,D1
	dbra	D2,lbC013324
	dbra	D0,lbC013304
	movem.l	(SP)+,D0-D3/A0
	rts

	jsr	$1AEE1E.L
	cmpi.b	#$51,D0
	seq	$1E2A6C.L
	cmpi.b	#$56,D0
	seq	$1E2A6B.L
	sf	$1E2B33.L
	bsr.w	lbC014D28
	st	$1E2B33.L
	move.w	D0,$1E2A6E.L
	jsr	$1AEE1E.L
	sf	$1E2C47.L
	tst.b	$1E26B3.L
	bne.w	lbC013392
	jsr	$1AEE3E.L
	cmpi.b	#$46,D0
	seq	$1E2C47.L
lbC013392:
	lea	Readytoformat.MSG(PC),A0
	jsr	$1AB4A8.L
	move.b	$1E29B2.L,D0
	moveq	#1,D1
	jsr	$1AE598.L
	lea	yn.MSG(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC0133C0
	moveq	#-8,D0
	bra.w	lbC012A96

lbC0133C0:
	move.l	#$370,$1E2AA2.L
	sf	$1E294E.L
	lea	$5000.w,A0
	bsr.w	lbC01214E
	movea.l	A0,A1
	tst.b	$1E2A6C.L
	bne.w	lbC0134EA
	movea.l	A1,A0
	bsr.w	lbC0132FE
	bsr.w	lbC0128E8
	move.b	$1E29B2.L,$1E29B4.L
	sf	$1E29B5.L
	move.w	#$9F,D1
lbC013402:
	moveq	#0,D2
	moveq	#11,D5
	lea	$408(A0),A1
lbC01340A:
	move.w	D1,D0
	ori.w	#$FF00,D0
	swap	D0
	move.w	D2,D0
	lsl.w	#8,D0
	move.b	D5,D0
	movem.l	D0-D3,-(SP)
	bsr.w	lbC01281A
	movem.l	(SP)+,D0-D3
	bsr.w	lbC0128CA
	moveq	#9,D0
	moveq	#0,D3
	lea	-8(A1),A1
lbC013430:
	move.l	(A1)+,D4
	eor.l	D4,D3
	dbra	D0,lbC013430
	andi.l	#$55555555,D3
	move.l	D3,D0
	movem.l	D0-D3,-(SP)
	bsr.w	lbC01281A
	movem.l	(SP)+,D0-D3
	bsr.w	lbC0128CA
	lea	$410(A1),A1
	addq.w	#1,D2
	subq.w	#1,D5
	bne.s	lbC01340A
	movem.l	D1/A0,-(SP)
	lea	Formattingtra.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	D1,D0
	lsr.l	#1,D0
	jsr	$1B05D2.L
	moveq	#2,D1
	jsr	$1AE598.L
	lea	head.MSG(PC),A0
	jsr	$1AB4A8.L
	movem.l	(SP),D1/A0
	move.l	D1,D0
	andi.w	#1,D0
	eori.w	#1,D0
	moveq	#1,D1
	jsr	$1AE598.L
	jsr	$1AEECA.L
	jsr	$1A8FB6.L
	movem.l	(SP)+,D1/A0
	move.b	D1,$1E29B3.L
	bsr.w	lbC01298E
	bmi.w	lbC0134F0
	dbra	D1,lbC013402
	jsr	$1AEECA.L
	movea.l	A0,A1
	tst.b	$1E2A6B.L
	beq.w	lbC0134EA
	movea.l	A1,A0
	moveq	#$23,D0
	jsr	$1AEEAE.L
	clr.w	$1E269A.L
	bsr.w	lbC013570
	movea.l	A0,A1
	tst.w	D0
	bmi.w	lbC0134EE
lbC0134EA:
	bsr.w	lbC01362C
lbC0134EE:
	movea.l	A1,A0
lbC0134F0:
	move.l	D0,D1
	moveq	#$23,D0
	jsr	$1AEEAE.L
	clr.w	$1E269A.L
	bsr.w	lbC0121AE
	bmi.w	lbC01350A
	move.w	D1,D0
lbC01350A:
	bsr.w	lbC012A96
	st	$1E294E.L
	tst.w	D0
	rts

Readytoformat.MSG:
	dc.b	'Ready to format disk in drive DF',0
yn.MSG:
	dc.b	': (y/n)?',$D,0
Formattingtra.MSG:
	dc.b	'Formatting track !',0
head.MSG:
	dc.b	', head ',0
Verifyingtrac.MSG:
	dc.b	'Verifying track !',0

lbC013570:
	movem.l	D1/D2/A1,-(SP)
	st	$1E29B7.L
	move.w	#0,D2
lbC01357E:
	movea.l	A0,A1
	lea	Verifyingtrac.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	D2,D0
	lsr.w	#1,D0
	jsr	$1B05D2.L
	moveq	#2,D1
	jsr	$1AE598.L
	lea	head.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	D2,D0
	andi.w	#1,D0
	eori.w	#1,D0
	moveq	#1,D1
	jsr	$1AE598.L
	clr.w	$1E269A.L
	movea.l	A1,A0
	move.w	D2,D0
	bsr.w	lbC012F7C
	bmi.w	lbC0135D4
	addq.w	#1,D2
	cmpi.w	#$9F,D2
	bls.s	lbC01357E
	moveq	#0,D0
lbC0135D4:
	st	$1E29B7.L
	movem.l	(SP)+,D1/D2/A1
	tst.w	D0
	rts

lbC0135E2:
	movem.l	D0/D1/A0,-(SP)
	move.b	$1E29B2.L,-(SP)
	moveq	#0,D0
	moveq	#3,D1
	lea	$1E29BE.L,A0
lbC0135F6:
	btst	D1,$1E2991.L
	beq.w	lbC01361C
	move.b	D1,$1E29B2.L
	cmpi.b	#$FF,0(A0,D1.W)
	bne.w	lbC01361C
	bsr.w	lbC012228
	bsr.w	lbC0123D2
	bsr.w	lbC01226E
lbC01361C:
	dbra	D1,lbC0135F6
	move.b	(SP)+,$1E29B2.L
	movem.l	(SP)+,D0/D1/A0
	rts

lbC01362C:
	movem.l	D1-D4/A0-A2,-(SP)
	movea.l	A1,A0
	moveq	#0,D0
	jsr	lbC012F16(PC)
	bmi.w	lbC01373A
	move.l	#$444F5300,D0
	tst.b	$1E2C47.L
	beq.w	lbC013652
	move.l	#$444F5301,D0
lbC013652:
	move.l	D0,(A1)+
	clr.l	(A1)+
	st	$1E29B5.L
	lea	$1E26C8.L,A2
	move.w	$1E2A6E.L,D0
	move.w	D0,D1
	tst.w	D0
	bne.w	lbC013676
	moveq	#$13,D1
	lea	ActionReplayA.MSG(PC),A2
lbC013676:
	move.w	#$370,D0
	bsr.w	lbC012F16
	bmi.w	lbC01373A
	st	$1E29B5.L
	move.l	#2,(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	move.l	#$48,(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	moveq	#$47,D0
lbC01369E:
	clr.l	(A1)+
	dbra	D0,lbC01369E
	move.l	#$FFFFFFFF,(A1)+
	move.l	#$371,(A1)+
	moveq	#$18,D0
lbC0136B2:
	clr.l	(A1)+
	dbra	D0,lbC0136B2
	clr.l	(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	andi.w	#$1F,D1
	move.b	D1,(A1)
	moveq	#1,D0
	subq.w	#1,D1
lbC0136C8:
	move.b	-1(A2,D0.W),0(A1,D0.W)
	addq.w	#1,D0
	dbra	D1,lbC0136C8
	lea	$34(A1),A1
	clr.l	(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	move.l	#1,(A1)+
	lea	-$200(A1),A1
	bsr.w	lbC013770
	move.w	#$371,D0
	bsr.w	lbC012F16
	bmi.w	lbC01373A
	st	$1E29B5.L
	clr.l	(A1)+
	moveq	#$35,D0
lbC013708:
	move.l	#$FFFFFFFF,(A1)+
	dbra	D0,lbC013708
	move.l	#$3FFFFFFF,(A1)+
	moveq	#$47,D0
lbC01371A:
	clr.l	(A1)+
	dbra	D0,lbC01371A
	lea	-$200(A1),A1
	move.l	$70(A1),D0
	bclr	#14,D0
	bclr	#15,D0
	move.l	D0,$70(A1)
	bsr.w	lbC013756
	moveq	#0,D0
lbC01373A:
	tst.w	D0
	movem.l	(SP)+,D1-D4/A0-A2
	rts

ActionReplayA.MSG:
	dc.b	'Action Replay Amiga',0

lbC013756:
	movem.l	D0/D1/A0/A1,-(SP)
	moveq	#0,D0
	moveq	#$7F,D1
	clr.l	(A1)
	movea.l	A1,A0
lbC013762:
	sub.l	(A1)+,D0
	dbra	D1,lbC013762
	move.l	D0,(A0)
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC013770:
	movem.l	D0/D1/A0/A1,-(SP)
	moveq	#0,D0
	moveq	#$7F,D1
	clr.l	$14(A1)
	movea.l	A1,A0
lbC01377E:
	sub.l	(A1)+,D0
	dbra	D1,lbC01377E
	move.l	D0,$14(A0)
	movem.l	(SP)+,D0/D1/A0/A1
	rts

lbC01378E:
	movem.l	D0/D1/A0/A1,-(SP)
	lea	4(A1),A0
	clr.l	(A0)
	move.w	#$FF,D1
	moveq	#0,D0
lbC01379E:
	add.l	(A1)+,D0
	bcc.w	lbC0137A6
	addq.l	#1,D0
lbC0137A6:
	dbra	D1,lbC01379E
	not.l	D0
	move.l	D0,(A0)
	movem.l	(SP)+,D0/D1/A0/A1
	rts

Checksumwasco.MSG:
	dc.b	'Checksum was correct',$D,0
Oldchecksumwa.MSG:
	dc.b	'Old checksum was ',0
nowissetto.MSG:
	dc.b	', now is set to ',0,0

lbC0137EE:
	movem.l	D0/A0,-(SP)
	cmp.l	D6,D7
	bne.w	lbC013806
	lea	Checksumwasco.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC013830

lbC013806:
	lea	Oldchecksumwa.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	D6,D0
	jsr	$1B209E.L
	lea	nowissetto.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	D7,D0
	jsr	$1B209E.L
	jsr	$1AEECA.L
lbC013830:
	movem.l	(SP)+,D0/A0
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	bclr	#0,D0
	movea.l	D0,A1
	move.l	$14(A1),D6
	bsr.w	lbC013770
	move.l	$14(A1),D7
	bra.s	lbC0137EE

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	bclr	#0,D0
	movea.l	D0,A1
	move.l	(A1),D6
	bsr.w	lbC013756
	move.l	(A1),D7
	bra.w	lbC0137EE

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	bclr	#0,D0
	movea.l	D0,A1
	move.l	4(A1),D6
	bsr.w	lbC01378E
	move.l	4(A1),D7
	bra.w	lbC0137EE

lbC0138A2:
	jmp	$1B06A8.L

	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
	tst.w	D0
	bne.w	lbC0138C4
	moveq	#-14,D0
	bra.w	lbC012A96

lbC0138C4:
	move.l	D0,D2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.s	lbC0138A2
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.s	lbC0138A2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.s	lbC0138A2
	exg	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.s	lbC0138A2
	exg	D0,A1
	move.l	D0,D1
	sub.l	A1,D1
	bcs.w	lbC0138A2
	beq.w	lbC0138A2
	movea.l	A1,A2
	lea	$5000.w,A0
	bsr.w	lbC01214E
	lea	$1E26C8.L,A1
	move.l	D2,D0
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC01394E
	bmi.w	lbC01393E
	move.l	D1,D0
	bsr.w	lbC0145BE
	bmi.w	lbC01393E
	bsr.w	lbC0139D8
lbC01393E:
	move.b	(SP)+,$1E29B2.L
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	rts

lbC01394E:
	movem.l	D1/D2/A1/A2,-(SP)
	move.l	D0,D1
	move.w	D1,$1E2A6E.L
	move.l	A1,$1E2A70.L
	movea.l	A1,A2
	bsr.w	lbC0161EE
	bmi.w	lbC0139D0
	jsr	$1CC4BA.L
	bmi.w	lbC0139D0
	move.w	D2,D0
	bsr.w	lbC014288
	cmpi.w	#$FFEE,D0
	beq.w	lbC013994
	tst.w	D0
	bmi.w	lbC0139D0
	move.l	D1,D0
	move.l	D2,D1
	bsr.w	lbC014080
	bmi.w	lbC0139D0
lbC013994:
	moveq	#$6D,D0
	lea	$1E075E.L,A1
lbC01399C:
	clr.l	(A1)+
	dbra	D0,lbC01399C
	move.w	#$1E8,$1E2A74.L
	tst.b	$1E2C46.L
	beq.w	lbC0139BC
	move.w	#$200,$1E2A74.L
lbC0139BC:
	clr.w	$1E2A82.L
	clr.l	$1E2A7E.L
	clr.l	$1E2A7A.L
	moveq	#0,D0
lbC0139D0:
	movem.l	(SP)+,D1/D2/A1/A2
	tst.w	D0
	rts

lbC0139D8:
	movem.l	D1-D5/A1-A4,-(SP)
	tst.b	$1E2A9D.L
	bne.w	lbC0139F4
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC013B04
lbC0139F4:
	movea.l	$1E2A70.L,A2
	move.w	$1E2A6E.L,D0
	bsr.w	lbC0161EE
	bmi.w	lbC013B04
	move.l	D1,D5
	move.l	A1,$1E2A70.L
	move.w	D2,$1E2A6E.L
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC013B04
	movea.l	A1,A2
	movea.l	$1E2A70.L,A1
	move.w	$1E2A6E.L,D0
	bsr.w	lbC01435A
	movea.l	A2,A1
	lsl.l	#2,D0
	move.l	$18(A1,D0.W),D1
	exg	D1,D3
	bsr.w	lbC01421E
	exg	D1,D3
	move.l	D3,$18(A1,D0.W)
	bsr.w	lbC013770
	st	$1E29B5.L
	exg	D1,D2
	bsr.w	lbC01425A
	exg	D1,D2
	move.l	D2,D0
	move.l	D1,-(SP)
	bsr.w	lbC013B0C
	move.l	D1,D4
	move.l	(SP)+,D1
	tst.w	D0
	bmi.w	lbC013B04
	move.l	#2,(A1)
	move.l	$1E2A7E.L,$144(A1)
	move.b	$1E2A6F.L,$1B0(A1)
	moveq	#0,D0
	lea	$1B1(A1),A4
	movea.l	$1E2A70.L,A2
lbC013A8C:
	move.b	(A2)+,0(A4,D0.W)
	addq.w	#1,D0
	cmp.w	$1E2A6E.L,D0
	bne.s	lbC013A8C
	move.l	D1,$1F0(A1)
	movea.l	$1E2A70.L,A2
	move.w	$1E2A6E.L,D0
	move.l	D5,D1
	move.l	D1,$1F4(A1)
	bsr.w	lbC013770
	st	$1E29B5.L
lbC013ABA:
	bsr.w	lbC01421E
	tst.w	D1
	beq.w	lbC013AE0
	bsr.w	lbC01425A
	move.l	D1,D0
	bsr.w	lbC013B0C
	bmi.w	lbC013B04
	move.l	D1,D4
	bsr.w	lbC013770
	st	$1E29B5.L
	bra.s	lbC013ABA

lbC013AE0:
	tst.w	$1E2C46.L
	bne.w	lbC013B02
	move.l	D4,D0
	bsr.w	lbC012F16
	bmi.w	lbC013B04
	clr.l	$10(A1)
	bsr.w	lbC013770
	st	$1E29B5.L
lbC013B02:
	moveq	#0,D0
lbC013B04:
	movem.l	(SP)+,D1-D5/A1-A4
	tst.w	D0
	rts

lbC013B0C:
	movem.l	D2/A2,-(SP)
	move.l	D0,D1
	bsr.w	lbC012F16
	bmi.w	lbC013B8C
	move.l	#$10,(A1)
	move.l	D1,4(A1)
	clr.l	12(A1)
	moveq	#0,D0
	bsr.w	lbC0141B4
	move.l	D1,$10(A1)
	lea	$138(A1),A2
	moveq	#0,D0
	move.l	D2,-(SP)
	move.l	D1,D2
lbC013B3C:
	addq.w	#1,D0
	bsr.w	lbC0141F0
	move.l	D1,-(A2)
	beq.w	lbC013B52
	move.l	D1,D2
	cmpi.w	#$48,D0
	bne.s	lbC013B3C
	addq.w	#1,D0
lbC013B52:
	move.l	D2,D1
	move.l	(SP)+,D2
	subq.w	#1,D0
	move.l	D0,8(A1)
	moveq	#$2E,D0
	lea	$138(A1),A2
lbC013B62:
	clr.l	(A2)+
	dbra	D0,lbC013B62
	move.l	D2,$1F4(A1)
	clr.l	$1F8(A1)
	move.l	D1,D2
	bsr.w	lbC01421E
	tst.l	D1
	beq.w	lbC013B80
	move.l	D1,$1F8(A1)
lbC013B80:
	move.l	#$FFFFFFFD,$1FC(A1)
	move.l	D2,D1
	moveq	#0,D0
lbC013B8C:
	movem.l	(SP)+,D2/A2
	tst.w	D0
	rts

lbC013B94:
	tst.b	$1E2C46.L
	bne.w	lbC013D64
	movem.l	D1-D3/A1,-(SP)
	move.l	D0,D1
	tst.b	$1E2A9D.L
	bne.w	lbC013BBC
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC013C78
lbC013BBC:
	move.l	D1,D0
	move.l	D0,D3
	add.l	D0,$1E2A7E.L
	bsr.w	lbC013E84
	bmi.w	lbC013C78
lbC013BCE:
	moveq	#0,D2
	move.w	$1E2A74.L,D2
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC013C78
	move.l	#8,(A1)
	move.l	$1E2A7A.L,4(A1)
	move.w	$1E2A82.L,D0
	ext.l	D0
	move.l	D0,8(A1)
	clr.l	12(A1)
	clr.l	$10(A1)
	clr.l	$14(A1)
	move.l	A0,-(SP)
	movea.l	A2,A0
lbC013C0A:
	jsr	$1ABF94.L
	addq.l	#1,A0
	move.b	D0,$18(A1,D2.W)
	addq.w	#1,D2
	subq.l	#1,D3
	beq.w	lbC013C4A
	cmpi.w	#$1E8,D2
	bne.s	lbC013C0A
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.l	D2,12(A1)
	move.w	D2,$1E2A74.L
	bsr.w	lbC013E84
	bmi.w	lbC013C78
	move.l	D1,$10(A1)
	st	$1E29B5.L
	bsr.w	lbC013770
	bra.s	lbC013BCE

lbC013C4A:
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.w	D2,$1E2A74.L
	move.l	D2,12(A1)
	cmpi.w	#$1E8,D2
	bne.w	lbC013C6C
	bsr.w	lbC013E84
	bmi.w	lbC013C78
	move.l	D1,$10(A1)
lbC013C6C:
	st	$1E29B5.L
	bsr.w	lbC013770
	moveq	#0,D0
lbC013C78:
	movem.l	(SP)+,D1-D3/A1
	tst.w	D0
	rts

lbC013C80:
	tst.b	$1E2C46.L
	bne.w	lbC013DF8
	movem.l	D1-D3/A1,-(SP)
	move.l	D0,D1
	tst.b	$1E2A9D.L
	bne.w	lbC013CA8
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC013D5C
lbC013CA8:
	move.l	D1,D0
	move.l	D0,D3
	add.l	D0,$1E2A7E.L
	bsr.w	lbC013E84
	bmi.w	lbC013D5C
lbC013CBA:
	moveq	#0,D2
	move.w	$1E2A74.L,D2
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC013D5C
	move.l	#8,(A1)
	move.l	$1E2A7A.L,4(A1)
	move.w	$1E2A82.L,D0
	ext.l	D0
	move.l	D0,8(A1)
	clr.l	12(A1)
	clr.l	$10(A1)
	clr.l	$14(A1)
	move.l	A0,-(SP)
	movea.l	A2,A0
lbC013CF6:
	move.b	(A0)+,$18(A1,D2.W)
	addq.w	#1,D2
	subq.l	#1,D3
	beq.w	lbC013D2E
	cmpi.w	#$1E8,D2
	bne.s	lbC013CF6
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.l	D2,12(A1)
	move.w	D2,$1E2A74.L
	bsr.w	lbC013E84
	bmi.w	lbC013D5C
	move.l	D1,$10(A1)
	st	$1E29B5.L
	bsr.w	lbC013770
	bra.s	lbC013CBA

lbC013D2E:
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.w	D2,$1E2A74.L
	move.l	D2,12(A1)
	cmpi.w	#$1E8,D2
	bne.w	lbC013D50
	bsr.w	lbC013E84
	bmi.w	lbC013D5C
	move.l	D1,$10(A1)
lbC013D50:
	st	$1E29B5.L
	bsr.w	lbC013770
	moveq	#0,D0
lbC013D5C:
	movem.l	(SP)+,D1-D3/A1
	tst.w	D0
	rts

lbC013D64:
	movem.l	D1-D3/A1,-(SP)
	move.l	D0,D1
	tst.b	$1E2A9D.L
	bne.w	lbC013D82
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC013DF0
lbC013D82:
	move.l	D1,D0
	move.l	D0,D3
	add.l	D0,$1E2A7E.L
	bsr.w	lbC013E84
	bmi.w	lbC013DF0
lbC013D94:
	moveq	#0,D2
	move.w	$1E2A74.L,D2
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC013DF0
	move.l	A0,-(SP)
	movea.l	A2,A0
lbC013DAA:
	jsr	$1ABF94.L
	addq.l	#1,A0
	move.b	D0,0(A1,D2.W)
	addq.w	#1,D2
	subq.l	#1,D3
	beq.w	lbC013DDE
	cmpi.w	#$200,D2
	bne.s	lbC013DAA
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.w	D2,$1E2A74.L
	bsr.w	lbC013E84
	bmi.w	lbC013DF0
	st	$1E29B5.L
	bra.s	lbC013D94

lbC013DDE:
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.w	D2,$1E2A74.L
	st	$1E29B5.L
	moveq	#0,D0
lbC013DF0:
	movem.l	(SP)+,D1-D3/A1
	tst.w	D0
	rts

lbC013DF8:
	movem.l	D1-D3/A1,-(SP)
	move.l	D0,D1
	tst.b	$1E2A9D.L
	bne.w	lbC013E16
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC013E7C
lbC013E16:
	move.l	D1,D0
	move.l	D0,D3
	add.l	D0,$1E2A7E.L
	bsr.w	lbC013E84
	bmi.w	lbC013E7C
lbC013E28:
	moveq	#0,D2
	move.w	$1E2A74.L,D2
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC013E7C
	move.l	A0,-(SP)
	movea.l	A2,A0
lbC013E3E:
	move.b	(A0)+,0(A1,D2.W)
	addq.w	#1,D2
	subq.l	#1,D3
	beq.w	lbC013E6A
	cmpi.w	#$200,D2
	bne.s	lbC013E3E
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.w	D2,$1E2A74.L
	bsr.w	lbC013E84
	bmi.w	lbC013E7C
	st	$1E29B5.L
	bra.s	lbC013E28

lbC013E6A:
	movea.l	A0,A2
	movea.l	(SP)+,A0
	move.w	D2,$1E2A74.L
	st	$1E29B5.L
	moveq	#0,D0
lbC013E7C:
	movem.l	(SP)+,D1-D3/A1
	tst.w	D0
	rts

lbC013E84:
	tst.b	$1E2C46.L
	beq.w	lbC013E9E
	cmpi.w	#$200,$1E2A74.L
	beq.w	lbC013EB4
	bra.w	lbC013EAA

lbC013E9E:
	cmpi.w	#$1E8,$1E2A74.L
	beq.w	lbC013EB4
lbC013EAA:
	move.l	$1E2A76.L,D1
	bra.w	lbC013F06

lbC013EB4:
	clr.w	$1E2A74.L
	moveq	#0,D0
	move.w	$1E2A82.L,D0
	divu.w	#$48,D0
	swap	D0
	tst.w	D0
	bne.w	lbC013EEC
	bsr.w	lbC013F38
	bmi.w	lbC013F08
	move.l	D1,D0
	tst.l	$1E2A7A.L
	bne.w	lbC013EE8
	move.l	D0,$1E2A7A.L
lbC013EE8:
	bsr.w	lbC01418E
lbC013EEC:
	bsr.w	lbC013F0C
	bmi.w	lbC013F08
	move.l	D1,D0
	bsr.w	lbC014168
	move.l	D1,$1E2A76.L
	addq.w	#1,$1E2A82.L
lbC013F06:
	moveq	#0,D0
lbC013F08:
	tst.w	D0
	rts

lbC013F0C:
	movem.l	A0,-(SP)
	lea	$1E0682.L,A0
	moveq	#$1A,D0
lbC013F18:
	tst.l	(A0)+
	bne.w	lbC013F72
	dbra	D0,lbC013F18
	addq.l	#4,A0
	moveq	#$1A,D0
lbC013F26:
	tst.l	(A0)+
	bne.w	lbC013F72
	dbra	D0,lbC013F26
	movem.l	(SP)+,A0
	bra.w	lbC013F56

lbC013F38:
	movem.l	A0,-(SP)
	lea	$1E06EE.L,A0
	moveq	#$1B,D0
lbC013F44:
	tst.l	(A0)+
	bne.w	lbC013F72
	dbra	D0,lbC013F44
	movem.l	(SP)+,A0
	bra.w	lbC013F56

lbC013F56:
	movem.l	A0,-(SP)
	lea	$1E0682.L,A0
	moveq	#$36,D0
lbC013F62:
	tst.l	(A0)+
	bne.w	lbC013F72
	dbra	D0,lbC013F62
	moveq	#-$13,D0
	bra.w	lbC013F92

lbC013F72:
	move.l	-(A0),D0
	move.l	#$1E0682,D1
	suba.l	D1,A0
	move.l	A0,D1
	lsl.l	#3,D1
lbC013F80:
	lsr.l	#1,D0
	bcs.w	lbC013F8A
	addq.l	#1,D1
	bra.s	lbC013F80

lbC013F8A:
	addq.l	#2,D1
	move.l	D1,D0
	bsr.w	lbC013F9A
lbC013F92:
	movem.l	(SP)+,A0
	tst.w	D0
	rts

lbC013F9A:
	movem.l	D1/A0,-(SP)
	move.l	D1,D0
	lea	$1E0682.L,A0
	moveq	#-$11,D0
	cmpi.l	#$6DF,D1
	bhi.w	lbC013FD4
	subq.l	#2,D1
	move.l	D1,D0
	lsr.l	#5,D0
	lsl.l	#2,D0
	adda.l	D0,A0
	move.l	D1,D0
	andi.w	#$1F,D0
	move.l	(A0),D1
	bclr	D0,D1
	bne.w	lbC013FD0
	moveq	#-$14,D0
	bra.w	lbC013FD4

lbC013FD0:
	move.l	D1,(A0)
	moveq	#0,D0
lbC013FD4:
	movem.l	(SP)+,D1/A0
	tst.w	D0
	rts

lbC013FDC:
	movem.l	D1/A0,-(SP)
	move.l	D1,D0
	lea	$1E0682.L,A0
	moveq	#-$11,D0
	cmpi.l	#$6DF,D1
	bhi.w	lbC014016
	subq.l	#2,D1
	move.l	D1,D0
	lsr.l	#5,D0
	lsl.l	#2,D0
	adda.l	D0,A0
	move.l	D1,D0
	andi.w	#$1F,D0
	move.l	(A0),D1
	bset	D0,D1
	beq.w	lbC014012
	moveq	#-$17,D0
	bra.w	lbC014016

lbC014012:
	move.l	D1,(A0)
	moveq	#0,D0
lbC014016:
	movem.l	(SP)+,D1/A0
	tst.w	D0
	rts

	bsr.w	lbC014D1E
	move.l	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC012A96
	lea	$5000.w,A0
	bsr.w	lbC01214E
	move.b	$1E29B2.L,-(SP)
	lea	$1E26C8.L,A1
	move.l	D1,D0
	movea.l	A1,A2
	bsr.w	lbC0161EE
	bmi.w	lbC014076
	move.w	D2,D0
	bsr.w	lbC014288
	bmi.w	lbC014076
	move.l	D1,D0
	move.l	D2,D1
	bsr.w	lbC014080
	move.w	D0,D1
lbC014060:
	bsr.w	lbC0121AE
	bmi.w	lbC01406A
	move.w	D1,D0
lbC01406A:
	bsr.w	lbC012A96
	move.b	(SP)+,$1E29B2.L
	rts

lbC014076:
	sf	$1E29B5.L
	move.w	D0,D1
	bra.s	lbC014060

lbC014080:
	movem.l	D1-D5/A1/A2,-(SP)
	move.l	D1,D2
	move.l	D0,D5
	tst.b	$1E2A9D.L
	bne.w	lbC0140A0
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC014160
lbC0140A0:
	move.l	D5,D0
	bsr.w	lbC012F16
	bmi.w	lbC014160
	cmpi.l	#2,$1FC(A1)
	bne.w	lbC0140C8
	lea	$138(A1),A2
	moveq	#$47,D1
	moveq	#-$1B,D0
lbC0140BE:
	tst.l	-(A2)
	bne.w	lbC014160
	dbra	D1,lbC0140BE
lbC0140C8:
	move.l	$1F0(A1),D3
	move.l	D5,D1
lbC0140CE:
	bsr.w	lbC013FDC
	bmi.w	lbC014160
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC014160
	move.l	8(A1),D4
	subq.w	#1,D4
	bmi.w	lbC014114
	lea	$138(A1),A2
lbC0140EE:
	move.l	-(A2),D1
	beq.w	lbC014114
	bsr.w	lbC013FDC
	bmi.w	lbC014160
	dbra	D4,lbC0140EE
	move.l	$1F8(A1),D0
	beq.w	lbC014114
	move.l	D0,D1
	bsr.w	lbC012F16
	bmi.w	lbC014160
	bra.s	lbC0140CE

lbC014114:
	move.l	D2,D0
	bsr.w	lbC012F16
	bmi.w	lbC014160
	cmpi.l	#$FFFFFFFD,$1FC(A1)
	beq.w	lbC014140
	moveq	#$47,D4
	lea	$138(A1),A2
lbC014130:
	cmp.l	-(A2),D5
	beq.w	lbC014152
	dbra	D4,lbC014130
	moveq	#-$15,D0
	bra.w	lbC014160

lbC014140:
	move.l	D3,$1F0(A1)
	st	$1E29B5.L
	bsr.w	lbC013770
	bra.w	lbC01415E

lbC014152:
	move.l	D3,(A2)
	st	$1E29B5.L
	bsr.w	lbC013770
lbC01415E:
	moveq	#0,D0
lbC014160:
	movem.l	(SP)+,D1-D5/A1/A2
	tst.w	D0
	rts

lbC014168:
	movem.l	D0/D1/A0,-(SP)
	move.l	D0,D1
	move.l	D1,D0
	lea	$1E075E.L,A0
	lsr.l	#5,D0
	lsl.l	#2,D0
	adda.l	D0,A0
	move.l	D1,D0
	andi.w	#$1F,D0
	move.l	(A0),D1
	bset	D0,D1
	move.l	D1,(A0)
	movem.l	(SP)+,D0/D1/A0
	rts

lbC01418E:
	movem.l	D0/D1/A0,-(SP)
	move.l	D0,D1
	move.l	D1,D0
	lea	$1E083A.L,A0
	lsr.l	#5,D0
	lsl.l	#2,D0
	adda.l	D0,A0
	move.l	D1,D0
	andi.w	#$1F,D0
	move.l	(A0),D1
	bset	D0,D1
	move.l	D1,(A0)
	movem.l	(SP)+,D0/D1/A0
	rts

lbC0141B4:
	movem.l	D0/A0,-(SP)
	lea	$1E075E.L,A0
	moveq	#$36,D0
lbC0141C0:
	tst.l	(A0)+
	bne.w	lbC0141D0
	dbra	D0,lbC0141C0
	moveq	#0,D1
	bra.w	lbC0141E8

lbC0141D0:
	move.l	-(A0),D0
	move.l	#$1E075E,D1
	suba.l	D1,A0
	move.l	A0,D1
	lsl.l	#3,D1
lbC0141DE:
	lsr.l	#1,D0
	bcs.w	lbC0141E8
	addq.l	#1,D1
	bra.s	lbC0141DE

lbC0141E8:
	movem.l	(SP)+,D0/A0
	tst.w	D0
	rts

lbC0141F0:
	bsr.s	lbC0141B4
	tst.l	D1
	bne.w	lbC0141FA
	rts

lbC0141FA:
	movem.l	D0/D1/A0,-(SP)
	move.l	D1,D0
	lea	$1E075E.L,A0
	lsr.l	#5,D0
	lsl.l	#2,D0
	adda.l	D0,A0
	move.l	D1,D0
	andi.w	#$1F,D0
	move.l	(A0),D1
	bclr	D0,D1
	move.l	D1,(A0)
	movem.l	(SP)+,D0/D1/A0
	rts

lbC01421E:
	movem.l	D0/A0,-(SP)
	lea	$1E083A.L,A0
	moveq	#$36,D0
lbC01422A:
	tst.l	(A0)+
	bne.w	lbC01423A
	dbra	D0,lbC01422A
	moveq	#0,D1
	bra.w	lbC014252

lbC01423A:
	move.l	-(A0),D0
	move.l	#$1E083A,D1
	suba.l	D1,A0
	move.l	A0,D1
	lsl.l	#3,D1
lbC014248:
	lsr.l	#1,D0
	bcs.w	lbC014252
	addq.l	#1,D1
	bra.s	lbC014248

lbC014252:
	movem.l	(SP)+,D0/A0
	tst.w	D0
	rts

lbC01425A:
	bsr.s	lbC01421E
	tst.l	D1
	bne.w	lbC014264
	rts

lbC014264:
	movem.l	D0/D1/A0,-(SP)
	move.l	D1,D0
	lea	$1E083A.L,A0
	lsr.l	#5,D0
	lsl.l	#2,D0
	adda.l	D0,A0
	move.l	D1,D0
	andi.w	#$1F,D0
	move.l	(A0),D1
	bclr	D0,D1
	move.l	D1,(A0)
	movem.l	(SP)+,D0/D1/A0
	rts

lbC014288:
	move.l	D3,-(SP)
	move.l	D0,D3
	bsr.w	lbC0142B4
	cmpi.w	#$FFE7,D0
	beq.w	lbC01429E
	move.l	(SP)+,D3
	tst.w	D0
	rts

lbC01429E:
	move.l	D3,D0
	move.l	(SP)+,D3
	bra.w	lbC0142A6

lbC0142A6:
	move.l	D6,-(SP)
	moveq	#-3,D6
	bsr.w	lbC0142CC
	move.l	(SP)+,D6
	tst.w	D0
	rts

lbC0142B4:
	move.l	D6,-(SP)
	moveq	#2,D6
	bsr.w	lbC0142CC
	cmpi.w	#$FFEE,D0
	bne.w	lbC0142C6
	moveq	#-$19,D0
lbC0142C6:
	move.l	(SP)+,D6
	tst.w	D0
	rts

lbC0142CC:
	movem.l	D3-D5/A1-A3,-(SP)
	move.w	D0,D5
	movea.l	A1,A2
	bsr.w	lbC01435A
	lsl.l	#2,D0
	move.l	D0,D2
	move.l	D1,D4
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC01434E
	move.l	$18(A1,D2.W),D0
	beq.w	lbC014356
	move.l	D4,D2
lbC0142F2:
	move.l	D2,D3
	move.l	D0,D2
	bsr.w	lbC012F16
	bmi.w	lbC01434E
	lea	$1B0(A1),A3
	movem.l	D5/A2/A3,-(SP)
	cmp.l	$1FC(A1),D6
	bne.w	lbC014340
	cmp.b	(A3)+,D5
	bne.w	lbC014340
	subq.w	#1,D5
	moveq	#0,D0
lbC014318:
	move.b	(A3)+,D0
	jsr	$1AEE3E.L
	sub.b	(A2)+,D0
	beq.w	lbC01432E
	cmpi.b	#$E0,D0
	bne.w	lbC014340
lbC01432E:
	dbra	D5,lbC014318
	movem.l	(SP)+,D5/A2/A3
	move.l	D2,D1
	move.l	D3,D2
	moveq	#0,D0
	bra.w	lbC01434E

lbC014340:
	movem.l	(SP)+,D5/A2/A3
	move.l	$1F0(A1),D0
	beq.w	lbC014356
	bra.s	lbC0142F2

lbC01434E:
	movem.l	(SP)+,D3-D5/A1-A3
	tst.w	D0
	rts

lbC014356:
	moveq	#-$12,D0
	bra.s	lbC01434E

lbC01435A:
	movem.l	D1/D2/A1,-(SP)
	moveq	#0,D1
	move.w	D0,D1
	subq.w	#1,D0
lbC014364:
	mulu.w	#13,D1
	moveq	#0,D2
	move.b	(A1)+,D2
	exg	D2,D0
	jsr	$1AEE3E.L
	exg	D2,D0
	add.w	D2,D1
	andi.w	#$7FF,D1
	dbra	D0,lbC014364
	ext.l	D1
	divu.w	#$48,D1
	moveq	#0,D0
	swap	D1
	move.w	D1,D0
	movem.l	(SP)+,D1/D2/A1
	rts

lbC014392:
	movem.l	D1/A1/A2,-(SP)
	bsr.w	lbC013064
	bmi.w	lbC014414
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC014414
	moveq	#-$10,D0
	tst.l	$138(A1)
	beq.w	lbC014414
	move.l	$13C(A1),D0
	move.l	D0,$1E2A66.L
	move.b	$1E29B2.L,$1E2A6A.L
	tst.b	$1E2A9C.L
	beq.w	lbC0143DE
	clr.l	$138(A1)
	bsr.w	lbC013770
	st	$1E29B5.L
lbC0143DE:
	bsr.w	lbC012F16
	bmi.w	lbC014414
	move.l	(A1)+,D1
	lea	$1E0682.L,A2
	moveq	#$36,D0
lbC0143F0:
	add.l	(A1),D1
	move.l	(A1)+,(A2)+
	dbra	D0,lbC0143F0
	moveq	#$47,D0
lbC0143FA:
	add.l	(A1)+,D1
	dbra	D0,lbC0143FA
	moveq	#-15,D0
	tst.l	D1
	bne.w	lbC014414
	moveq	#0,D0
	move.b	$1E2A9C.L,$1E2A9D.L
lbC014414:
	movem.l	(SP)+,D1/A1/A2
	tst.w	D0
	rts

	movem.l	A1-A3,-(SP)
	move.b	$1E29B2.L,-(SP)
	move.b	$1E2A6A.L,$1E29B2.L
	move.l	$1E2A66.L,D0
	bsr.w	lbC012F16
	bmi.w	lbC01447C
	lea	4(A1),A3
	lea	$1E0682.L,A2
	moveq	#$36,D0
lbC01444A:
	move.l	(A2)+,(A3)+
	dbra	D0,lbC01444A
	bsr.w	lbC013756
	st	$1E29B5.L
	bsr.w	lbC013064
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC01447C
	move.l	#$FFFFFFFF,$138(A1)
	st	$1E29B5.L
	bsr.w	lbC013770
	moveq	#0,D0
lbC01447C:
	move.b	(SP)+,$1E29B2.L
	movem.l	(SP)+,A1-A3
	tst.w	D0
	rts

	bsr.w	lbC014D1E
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC012A96
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	movea.l	D0,A2
	lea	$5000.w,A0
	bsr.w	lbC01214E
	lea	$1E26C8.L,A1
	move.w	D1,D0
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC014938
	bmi.w	lbC014516
	move.l	A0,-(SP)
	lea	Loadingfrom.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	A2,D0
	jsr	$1A9A1C.L
	add.l	$1E2A88.L,D0
	lea	to.MSG1(PC),A0
	jsr	$1AB4A8.L
	jsr	$1A9A1C.L
	jsr	$1AEECA.L
	movea.l	(SP)+,A0
	move.l	$1E2A88.L,D0
	bsr.w	lbC01453A
lbC014516:
	move.b	(SP)+,$1E29B2.L
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	rts

Loadingfrom.MSG:
	dc.b	'Loading from ',0
to.MSG1:
	dc.b	' to ',0,0

lbC01453A:
	movem.l	D1/D2/A1,-(SP)
	move.l	D0,D1
	cmpa.l	#$8400,A2
	bhi.w	lbC0145A4
	movea.l	A2,A1
	adda.l	D0,A1
	cmpa.l	#$8500,A1
	bhi.w	lbC014578
	move.l	D0,D1
	movea.l	$1E2974.L,A1
	suba.l	#$3400,A1
	bsr.w	lbC0149BC
	bmi.w	lbC0145B6
	move.l	D1,D0
	bsr.w	lbC014684
	bra.w	lbC0145B6

lbC014578:
	move.l	D0,D1
	move.l	#$8500,D0
	sub.l	A2,D0
	sub.l	D0,D1
	move.l	D0,D2
	movea.l	$1E2974.L,A1
	suba.l	#$3400,A1
	bsr.w	lbC0149BC
	bmi.w	lbC0145B6
	move.l	D2,D0
	bsr.w	lbC014684
	bmi.w	lbC0145B6
lbC0145A4:
	lea	$5000.w,A1
	bsr.w	lbC0149BC
	bmi.w	lbC0145B6
	move.l	D1,D0
	bsr.w	lbC014706
lbC0145B6:
	movem.l	(SP)+,D1/D2/A1
	tst.w	D0
	rts

lbC0145BE:
	movem.l	D1/D2/A1,-(SP)
	move.l	D0,D1
	tst.b	$1E2A9D.L
	bne.w	lbC0145DC
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC01467C
lbC0145DC:
	move.l	D1,D0
	cmpa.l	#$8400,A2
	bhi.w	lbC014642
	movea.l	A2,A1
	adda.l	D0,A1
	cmpa.l	#$8500,A1
	bhi.w	lbC014616
	move.l	D0,D1
	movea.l	$1E2974.L,A1
	suba.l	#$3400,A1
	bsr.w	lbC0149BC
	bmi.w	lbC01467C
	move.l	D1,D0
	bsr.w	lbC013B94
	bra.w	lbC01467C

lbC014616:
	move.l	D0,D1
	move.l	#$8500,D0
	sub.l	A2,D0
	sub.l	D0,D1
	move.l	D0,D2
	movea.l	$1E2974.L,A1
	suba.l	#$3400,A1
	bsr.w	lbC0149BC
	bmi.w	lbC01467C
	move.l	D2,D0
	bsr.w	lbC013B94
	bmi.w	lbC01467C
lbC014642:
	move.l	$1E2974.L,D0
	subi.l	#$3800,D0
	cmpa.l	D0,A2
	bls.w	lbC014660
	lea	$5000.w,A1
	bsr.w	lbC0149BC
	bmi.w	lbC01467C
lbC014660:
	move.l	A2,D2
	add.l	D1,D2
	cmp.l	D0,D2
	bls.w	lbC014676
	lea	$5000.w,A1
	bsr.w	lbC0149BC
	bmi.w	lbC01467C
lbC014676:
	move.l	D1,D0
	bsr.w	lbC013C80
lbC01467C:
	movem.l	(SP)+,D1/D2/A1
	tst.w	D0
	rts

lbC014684:
	tst.b	$1E2C46.L
	bne.w	lbC014780
	movem.l	D1-D3/A1,-(SP)
	move.l	D0,D3
	move.w	$1E2A8C.L,D2
	move.l	$1E2A84.L,D0
	bsr.w	lbC012F16
	bmi.w	lbC0146FA
	exg	A2,A0
	cmpi.w	#$1E8,D2
	beq.w	lbC0146CC
lbC0146B2:
	move.b	$18(A1,D2.W),D0
	jsr	$1AC0A8.L
	addq.l	#1,A0
	addq.w	#1,D2
	subq.l	#1,D3
	beq.w	lbC0146F0
	cmpi.w	#$1E8,D2
	bne.s	lbC0146B2
lbC0146CC:
	moveq	#0,D2
	move.l	$10(A1),D0
	bne.w	lbC0146DC
	moveq	#-$16,D0
	bra.w	lbC014702

lbC0146DC:
	move.l	D0,$1E2A84.L
	exg	A2,A0
	bsr.w	lbC012F16
	bmi.w	lbC0146FA
	exg	A2,A0
	bra.s	lbC0146B2

lbC0146F0:
	exg	A2,A0
	move.w	D2,$1E2A8C.L
	moveq	#0,D0
lbC0146FA:
	movem.l	(SP)+,D1-D3/A1
	tst.w	D0
	rts

lbC014702:
	exg	A2,A0
	bra.s	lbC0146FA

lbC014706:
	tst.b	$1E2C46.L
	bne.w	lbC014860
	movem.l	D1-D3/A1,-(SP)
	move.l	D0,D3
	move.w	$1E2A8C.L,D2
	move.l	$1E2A84.L,D0
	bsr.w	lbC012F16
	bmi.w	lbC014774
	exg	A2,A0
	cmpi.w	#$1E8,D2
	beq.w	lbC014746
lbC014734:
	move.b	$18(A1,D2.W),(A0)+
	addq.w	#1,D2
	subq.l	#1,D3
	beq.w	lbC01476A
	cmpi.w	#$1E8,D2
	bne.s	lbC014734
lbC014746:
	moveq	#0,D2
	move.l	$10(A1),D0
	bne.w	lbC014756
	moveq	#-$16,D0
	bra.w	lbC01477C

lbC014756:
	move.l	D0,$1E2A84.L
	exg	A2,A0
	bsr.w	lbC012F16
	bmi.w	lbC014774
	exg	A2,A0
	bra.s	lbC014734

lbC01476A:
	exg	A2,A0
	move.w	D2,$1E2A8C.L
	moveq	#0,D0
lbC014774:
	movem.l	(SP)+,D1-D3/A1
	tst.w	D0
	rts

lbC01477C:
	exg	A2,A0
	bra.s	lbC014774

lbC014780:
	movem.l	D1-D3/A1/A3/A4,-(SP)
	move.l	D0,D3
	move.w	$1E2A8C.L,D2
	movea.l	$1E2A84.L,A3
	moveq	#0,D0
	move.w	(A3),D0
	bsr.w	lbC012F16
	bmi.w	lbC014854
	exg	A2,A0
	cmpi.w	#$200,D2
	beq.w	lbC0147C8
lbC0147A8:
	move.b	0(A1,D2.W),D0
	jsr	$1AC0A8.L
	addq.l	#1,A0
	addq.w	#1,D2
	addq.l	#1,$1E2C40.L
	subq.l	#1,D3
	beq.w	lbC01484A
	cmpi.w	#$200,D2
	bne.s	lbC0147A8
lbC0147C8:
	moveq	#0,D2
	moveq	#-$16,D0
	move.l	$1E2C40.L,D1
	cmp.l	$1E2A88.L,D1
	bcc.w	lbC01485C
	cmpi.l	#$1E075E,$1E2A84.L
	bne.w	lbC01482A
	move.l	$1E2C3C.L,D0
	bne.w	lbC0147FA
	moveq	#-$16,D0
	bra.w	lbC01485C

lbC0147FA:
	exg	A2,A0
	jsr	lbC012F16(PC)
	bmi.w	lbC014854
	exg	A2,A0
	move.l	$1F8(A1),$1E2C3C.L
	lea	$1E075E.L,A3
	lea	$18(A1),A4
	moveq	#$47,D0
lbC01481A:
	move.w	2(A4),(A3)+
	addq.l	#4,A4
	dbra	D0,lbC01481A
	move.l	A3,$1E2A84.L
lbC01482A:
	movea.l	$1E2A84.L,A3
	moveq	#0,D0
	move.w	-(A3),D0
	move.l	A3,$1E2A84.L
	exg	A2,A0
	bsr.w	lbC012F16
	bmi.w	lbC014854
	exg	A2,A0
	bra.w	lbC0147A8

lbC01484A:
	exg	A2,A0
	move.w	D2,$1E2A8C.L
	moveq	#0,D0
lbC014854:
	movem.l	(SP)+,D1-D3/A1/A3/A4
	tst.w	D0
	rts

lbC01485C:
	exg	A2,A0
	bra.s	lbC014854

lbC014860:
	movem.l	D1-D3/A1/A3/A4,-(SP)
	move.l	D0,D3
	move.w	$1E2A8C.L,D2
	movea.l	$1E2A84.L,A3
	moveq	#0,D0
	move.w	(A3),D0
	bsr.w	lbC012F16
	bmi.w	lbC01492C
	exg	A2,A0
	cmpi.w	#$200,D2
	beq.w	lbC0148A0
lbC014888:
	move.b	0(A1,D2.W),(A0)+
	addq.w	#1,D2
	addq.l	#1,$1E2C40.L
	subq.l	#1,D3
	beq.w	lbC014922
	cmpi.w	#$200,D2
	bne.s	lbC014888
lbC0148A0:
	moveq	#0,D2
	moveq	#-$16,D0
	move.l	$1E2C40.L,D1
	cmp.l	$1E2A88.L,D1
	bcc.w	lbC014934
	cmpi.l	#$1E075E,$1E2A84.L
	bne.w	lbC014902
	move.l	$1E2C3C.L,D0
	bne.w	lbC0148D2
	moveq	#-$16,D0
	bra.w	lbC014934

lbC0148D2:
	exg	A2,A0
	jsr	lbC012F16(PC)
	bmi.w	lbC01492C
	exg	A2,A0
	move.l	$1F8(A1),$1E2C3C.L
	lea	$1E075E.L,A3
	lea	$18(A1),A4
	moveq	#$47,D0
lbC0148F2:
	move.w	2(A4),(A3)+
	addq.l	#4,A4
	dbra	D0,lbC0148F2
	move.l	A3,$1E2A84.L
lbC014902:
	movea.l	$1E2A84.L,A3
	moveq	#0,D0
	move.w	-(A3),D0
	move.l	A3,$1E2A84.L
	exg	A2,A0
	bsr.w	lbC012F16
	bmi.w	lbC01492C
	exg	A2,A0
	bra.w	lbC014888

lbC014922:
	exg	A2,A0
	move.w	D2,$1E2A8C.L
	moveq	#0,D0
lbC01492C:
	movem.l	(SP)+,D1-D3/A1/A3/A4
	tst.w	D0
	rts

lbC014934:
	exg	A2,A0
	bra.s	lbC01492C

lbC014938:
	movem.l	D1/D2/A1/A2,-(SP)
	move.w	D0,D1
	movea.l	A1,A2
	bsr.w	lbC0161EE
	bmi.w	lbC0149B4
	jsr	$1CC4BA.L
	bmi.w	lbC0149B4
	move.w	D2,D0
	bsr.w	lbC0142A6
	bmi.w	lbC0149B4
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC0149B4
	move.l	$10(A1),$1E2A84.L
	move.l	$144(A1),$1E2A88.L
	move.l	$1F8(A1),$1E2C3C.L
	clr.w	$1E2A8C.L
	clr.l	$1E2C40.L
	tst.b	$1E2C46.L
	beq.w	lbC0149B2
	lea	$1E075E.L,A2
	lea	$18(A1),A1
	moveq	#$47,D0
lbC0149A0:
	move.w	2(A1),(A2)+
	addq.l	#4,A1
	dbra	D0,lbC0149A0
	subq.l	#2,A2
	move.l	A2,$1E2A84.L
lbC0149B2:
	moveq	#0,D0
lbC0149B4:
	movem.l	(SP)+,D1/D2/A1/A2
	tst.w	D0
	rts

lbC0149BC:
	moveq	#0,D0
	move.b	$1E2A9D.L,-(SP)
	sf	$1E2A9D.L
	cmpa.l	A0,A1
	beq.w	lbC0149DA
	bsr.w	lbC0121AE
	exg	A0,A1
	bsr.w	lbC01214E
lbC0149DA:
	move.b	(SP)+,$1E2A9D.L
	tst.w	D0
	rts

lbC0149E4:
	movem.l	D1-D3/A0,-(SP)
	lea	$1E0682.L,A0
	moveq	#$36,D1
	moveq	#0,D0
lbC0149F2:
	move.l	(A0)+,D2
	moveq	#$1F,D3
lbC0149F6:
	lsr.l	#1,D2
	bcc.w	lbC0149FE
	addq.l	#1,D0
lbC0149FE:
	dbra	D3,lbC0149F6
	dbra	D1,lbC0149F2
	movem.l	(SP)+,D1-D3/A0
	rts

	bsr.w	lbC014D28
	lea	$1E8468.L,A0
	bsr.w	lbC01214E
	tst.w	D0
	beq.w	lbC014A2E
	lea	$1E26C8.L,A2
	bsr.w	lbC014A40
	bmi.w	lbC014A32
lbC014A2E:
	bsr.w	lbC014B46
lbC014A32:
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	bmi.w	lbC012A96
	rts

lbC014A40:
	movem.l	D1-D5/A1-A3,-(SP)
	cmpi.w	#1,D0
	bls.w	lbC014A96
	cmpi.b	#$3A,1(A2)
	bne.w	lbC014A96
	cmpi.b	#$2F,(A2)
	bls.w	lbC014A78
	cmpi.b	#$33,(A2)
	bhi.w	lbC014A78
	moveq	#0,D1
	move.b	(A2),D1
	subi.b	#$30,D1
	btst	D1,$1E298F.L
	bne.w	lbC014A7E
lbC014A78:
	moveq	#-13,D0
	bra.w	lbC014B3E

lbC014A7E:
	move.b	D1,$1E29B2.L
	move.l	#$370,$1E2AA2.L
	addq.l	#2,A2
	subq.w	#2,D0
	beq.w	lbC014B2E
lbC014A96:
	move.w	D0,D3
	move.l	$1E2AA2.L,-(SP)
	subq.w	#1,D3
lbC014AA0:
	movea.l	A2,A1
	moveq	#0,D0
lbC014AA4:
	cmpi.b	#$2F,(A2)+
	beq.w	lbC014AD6
	addq.l	#1,D0
	dbra	D3,lbC014AA4
	tst.w	D0
	beq.w	lbC014B2C
	move.w	D0,D4
	bsr.w	lbC013070
	bmi.w	lbC014B38
	move.w	D4,D0
	bsr.w	lbC0142B4
	bmi.w	lbC014B38
	move.l	D1,$1E2AA2.L
	bra.w	lbC014B2C

lbC014AD6:
	tst.w	D0
	beq.w	lbC014B00
	move.w	D0,D4
	bsr.w	lbC013070
	bmi.w	lbC014B38
	move.w	D4,D0
	bsr.w	lbC0142B4
	bmi.w	lbC014B38
	move.l	D1,$1E2AA2.L
	moveq	#-$18,D0
	subq.w	#1,D3
	bmi.w	lbC014B38
	bra.s	lbC014AA0

lbC014B00:
	move.l	$1E2AA2.L,D0
	bsr.w	lbC012F16
	bmi.w	lbC014B38
	moveq	#-$18,D0
	tst.l	$1F4(A1)
	beq.w	lbC014B38
	move.l	$1F4(A1),$1E2AA2.L
	moveq	#-$18,D0
	subq.w	#1,D3
	bmi.w	lbC014B2C
	bra.w	lbC014AA0

lbC014B2C:
	tst.l	(SP)+
lbC014B2E:
	moveq	#0,D0
	movem.l	(SP)+,D1-D5/A1-A3
	tst.w	D0
	rts

lbC014B38:
	move.l	(SP)+,$1E2AA2.L
lbC014B3E:
	movem.l	(SP)+,D1-D5/A1-A3
	tst.w	D0
	rts

lbC014B46:
	movem.l	D1-D3/A1-A3,-(SP)
	lea	$1E0916.L,A3
	moveq	#0,D3
	bsr.w	lbC013070
	bmi.w	lbC014BC8
lbC014B5A:
	move.l	D1,(A3)+
	addq.w	#1,D3
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.w	lbC014BC8
	move.l	$1F4(A1),D1
	bne.s	lbC014B5A
	subq.w	#1,D3
	move.l	-(A3),D0
	bsr.w	lbC012F16
	bmi.w	lbC014BC8
	bsr.w	lbC014BD0
	move.w	#$3A,D0
	cmpi.w	#$4E,$1E269A.L
	bhi.w	lbC014B94
	jsr	$1AE5E4.L
lbC014B94:
	subq.w	#1,D3
	bmi.w	lbC014BC6
	bra.w	lbC014BB4

lbC014B9E:
	move.w	#$2F,D0
	cmpi.w	#$4E,$1E269A.L
	bhi.w	lbC014BB4
	jsr	$1AE5E4.L
lbC014BB4:
	move.l	-(A3),D0
	bsr.w	lbC012F16
	bmi.w	lbC014BC8
	bsr.w	lbC014BD0
	dbra	D3,lbC014B9E
lbC014BC6:
	moveq	#0,D0
lbC014BC8:
	movem.l	(SP)+,D1-D3/A1-A3
	tst.w	D0
	rts

lbC014BD0:
	movem.l	D0/D1/A0,-(SP)
	lea	$1B0(A1),A0
	moveq	#0,D0
	move.b	(A0)+,D0
	move.b	0(A0,D0.W),-(SP)
	clr.b	0(A0,D0.W)
	move.w	$1E269A.L,D1
	add.w	D0,D1
	cmpi.w	#$4E,D1
	bhi.w	lbC014BFA
	jsr	$1AB4A8.L
lbC014BFA:
	move.b	(SP)+,0(A0,D0.W)
	movem.l	(SP)+,D0/D1/A0
	rts

	sf	$1E2B33.L
	bsr.w	lbC014D28
	st	$1E2B33.L
	tst.w	D0
	beq.w	lbC0138A2
	lea	$1E8468.L,A0
	bsr.w	lbC01214E
	lea	$1E26C8.L,A1
	bsr.w	lbC014C40
	move.w	D0,D1
	bsr.w	lbC0121AE
	bmi.w	lbC014C3A
	move.w	D1,D0
lbC014C3A:
	bsr.w	lbC012A96
	rts

lbC014C40:
	movem.l	D1-D7/A1-A4,-(SP)
	move.b	$1E29B2.L,-(SP)
	move.w	D0,D3
	movea.l	A1,A2
	bsr.w	lbC0161EE
	bmi.w	lbC014D10
	move.l	D1,D6
	movea.l	A1,A4
	move.w	D2,D3
	move.w	D3,D0
	bsr.w	lbC014288
	cmpi.w	#$FFEE,D0
	beq.w	lbC014C76
	tst.w	D0
	bmi.w	lbC014D10
	moveq	#-$1A,D0
	bra.w	lbC014D10

lbC014C76:
	tst.b	$1E2A9D.L
	bne.w	lbC014C8E
	st	$1E2A9C.L
	bsr.w	lbC014392
	bmi.w	lbC014D10
lbC014C8E:
	bsr.w	lbC013F38
	bmi.w	lbC014D10
	move.l	D1,D4
	move.l	D3,D0
	movea.l	A4,A1
	bsr.w	lbC01435A
	move.l	D0,D5
	move.l	D6,D0
	bsr.w	lbC012F16
	bmi.w	lbC014D10
	lsl.l	#2,D5
	move.l	$18(A1,D5.W),D7
	move.l	D4,$18(A1,D5.W)
	st	$1E29B5.L
	bsr.w	lbC013770
	move.l	D4,D0
	bsr.w	lbC012F16
	bmi.w	lbC014D10
	move.l	#2,(A1)
	move.l	D4,4(A1)
	lea	8(A1),A2
	moveq	#$69,D0
lbC014CDA:
	clr.l	(A2)+
	dbra	D0,lbC014CDA
	lea	$1B0(A1),A2
	move.b	D3,(A2)+
	subq.w	#1,D3
	movea.l	A4,A3
lbC014CEA:
	move.b	(A3)+,(A2)+
	dbra	D3,lbC014CEA
	move.l	D7,$1F0(A1)
	move.l	D6,$1F4(A1)
	clr.l	$1F8(A1)
	move.l	#2,$1FC(A1)
	st	$1E29B5.L
	bsr.w	lbC013770
	moveq	#0,D0
lbC014D10:
	move.b	(SP)+,$1E29B2.L
	movem.l	(SP)+,D1-D7/A1-A4
	tst.w	D0
	rts

lbC014D1E:
	st	$1E2B04.L
	bra.w	lbC014D2E

lbC014D28:
	sf	$1E2B04.L
lbC014D2E:
	jsr	$1ADB8C.L
	jsr	$1AFE58.L
	tst.b	$1E26B3.L
	bne.w	lbC014D98
	cmpi.w	#$22,D0
	bne.w	lbC014D52
	jmp	$1AB44E.L

lbC014D52:
	movem.l	D1/D2/A1,-(SP)
	moveq	#0,D1
	moveq	#0,D2
	lea	$1E26C8.L,A1
lbC014D60:
	jsr	$1AEE1E.L
	tst.b	$1E26B3.L
	bne.w	lbC014D8E
	cmpi.b	#$2C,D0
	beq.w	lbC014D8E
	addq.l	#1,D1
	cmpi.b	#$20,D0
	beq.w	lbC014D84
	move.l	D1,D2
lbC014D84:
	jsr	$1AB4F6.L
	move.b	D0,(A1)+
	bra.s	lbC014D60

lbC014D8E:
	move.l	D2,D0
	movem.l	(SP)+,D1/D2/A1
	bra.w	lbC014D9A

lbC014D98:
	moveq	#0,D0
lbC014D9A:
	tst.b	$1E2B04.L
	beq.w	lbC014DB0
	sf	$1E2B04.L
	tst.w	D0
	beq.w	lbC0197C8
lbC014DB0:
	rts

	movem.l	D0/D1/A0,-(SP)
	tst.b	$1E2A9E.L
	beq.w	lbC014DF6
	moveq	#3,D0
	moveq	#6,D1
	lea	$1E2AA6.L,A0
lbC014DCA:
	ori.b	#$78,$BFD100.L
	bclr	D1,$BFD100.L
	btst	#2,$BFE001.L
	bne.w	lbC014DE8
	sf	0(A0,D0.W)
lbC014DE8:
	subq.w	#1,D1
	dbra	D0,lbC014DCA
	ori.b	#$78,$BFD100.L
lbC014DF6:
	movem.l	(SP)+,D0/D1/A0
	rts

lbC014DFC:
	movem.l	D1-D7/A0-A6,-(SP)
	moveq	#0,D0
	add.l	$1E2974.L,D0
	tst.l	$1E2978.L
	beq.w	lbC014E1E
	add.l	$1E2978.L,D0
	subi.l	#$C00000,D0
lbC014E1E:
	add.l	$1E2BC8.L,D0
	sub.l	$1E2BC4.L,D0
	swap	D0
	move.l	#$5B000,D1
	divu.w	D0,D1
	andi.l	#$FFFF,D1
	lsr.l	#3,D1
	move.w	D1,$1E2B24.L
	clr.l	$1E2B2A.L
	move.w	#$100,$DFF096.L
	move.w	#$4000,$DFF09A.L
	jsr	$1B2078.L
	move.l	$1E2690.L,$68.w
	move.l	$1E2694.L,$6C.w
	subi.l	#$A00,$1E2974.L
	bsr.w	lbC01210C
	addi.l	#$A00,$1E2974.L
	move.l	D0,$1E2AD4.L
	move.l	D1,$1E2AD8.L
	move.l	A0,$1E2ADC.L
	cmpi.l	#$A00,D0
	bcs.w	lbC014EC2
	move.w	#$27F,D0
	subi.l	#$A00,$1E2974.L
	movea.l	$1E2974.L,A0
	movea.l	$1E2ADC.L,A1
lbC014EBC:
	move.l	(A0)+,(A1)+
	dbra	D0,lbC014EBC
lbC014EC2:
	moveq	#0,D0
	clr.l	$1E2C34.L
	tst.l	$1E2BC8.L
	beq.w	lbC014F00
	move.l	$1E2BC4.L,$1E2A3E.L
	move.l	$1E2BC8.L,$1E2A42.L
	move.l	$1E2BC4.L,$1E2A46.L
	bsr.w	lbC00F2DC
	bsr.w	lbC00F336
	move.l	A2,$1E2C34.L
lbC014F00:
	clr.l	$1E2A3E.L
	move.l	$1E2974.L,$1E2A42.L
	move.l	$1E2A3E.L,$1E2A46.L
	bsr.w	lbC00F2DC
	bsr.w	lbC00F336
	move.l	A2,$1E2ABE.L
	clr.l	$1E2ABA.L
	tst.l	$1E2978.L
	beq.w	lbC014F64
	move.l	#$C00000,$1E2A3E.L
	move.l	$1E2978.L,$1E2A42.L
	move.l	$1E2A3E.L,$1E2A46.L
	bsr.w	lbC00F2DC
	bsr.w	lbC00F336
	move.l	A2,$1E2ABA.L
lbC014F64:
	addi.l	#$A00,$1E2974.L
	movem.l	(SP)+,D1-D7/A0-A6
	moveq	#0,D0
	cmpi.l	#$A00,$1E2AD4.L
	bge.w	lbC014F94
	subi.l	#$A00,$1E2974.L
	clr.l	$1E2AD4.L
	moveq	#-1,D0
lbC014F94:
	tst.w	D0
	rts

lbC014F98:
	movem.l	D0-D7/A0-A6,-(SP)
	moveq	#0,D0
	add.l	$1E2974.L,D0
	tst.l	$1E2978.L
	beq.w	lbC014FBA
	add.l	$1E2978.L,D0
	subi.l	#$C00000,D0
lbC014FBA:
	add.l	$1E2BC8.L,D0
	sub.l	$1E2BC4.L,D0
	swap	D0
	move.l	#$5B000,D1
	divu.w	D0,D1
	lsr.l	#3,D1
	move.w	D1,$1E2B24.L
	clr.l	$1E2B2A.L
	tst.l	$1E2C34.L
	beq.w	lbC015000
	move.l	$1E2BC4.L,$1E2A52.L
	move.l	$1E2C34.L,$1E2A4E.L
	bsr.w	lbC00F534
lbC015000:
	clr.l	$1E2A52.L
	move.l	$1E2ABE.L,$1E2A4E.L
	bsr.w	lbC00F534
	tst.l	$1E2ABA.L
	beq.w	lbC015036
	move.l	#$C00000,$1E2A52.L
	move.l	$1E2ABA.L,$1E2A4E.L
	bsr.w	lbC00F534
lbC015036:
	tst.l	$1E2AD4.L
	beq.w	lbC015066
	move.l	#$27F,D0
	movea.l	$1E2ADC.L,A0
	movea.l	$1E2974.L,A1
	suba.l	#$A00,A1
	move.l	$1E2AD8.L,D1
lbC01505E:
	move.l	(A0),(A1)+
	move.l	D1,(A0)+
	dbra	D0,lbC01505E
lbC015066:
	jsr	$1B2078.L
	move.l	#$1A8686,$68.w
	move.l	#$1A868A,$6C.w
	move.w	#$C000,$DFF09A.L
	move.w	#$8100,$DFF096.L
	movem.l	(SP)+,D0-D7/A0-A6
	rts

	st	$1E2848.L
	bra.w	lbC0150A2

	sf	$1E2848.L
lbC0150A2:
	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
	tst.w	D0
	beq.w	lbC0138A2
	move.l	D0,D1
	jsr	lbC012EDA(PC)
	bpl.w	lbC0150D0
lbC0150C2:
	jsr	lbC01221E(PC)
	jsr	lbC012A96(PC)
	jmp	$1B06CA.L

lbC0150D0:
	jsr	lbC0121FA(PC)
	moveq	#-10,D0
	btst	#3,$BFE001.L
	beq.s	lbC0150C2
	jsr	lbC01221E(PC)
	move.l	#$20,$1E2A4A.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC015104
	move.l	D0,$1E2A4A.L
lbC015104:
	move.l	$1E2BC8.L,D0
	sub.l	$1E2BC4.L,D0
	add.l	$1E2974.L,D0
	tst.l	$1E2978.L
	beq.w	lbC01512C
	add.l	$1E2978.L,D0
	subi.l	#$C00000,D0
lbC01512C:
	cmpi.l	#$100000,D0
	bls.w	lbC01514C
	lea	Suretofreezem.MSG(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC01514C
	moveq	#-8,D0
	bra.w	lbC012A96

lbC01514C:
	bsr.w	lbC0135E2
	jsr	$1A8AA6.L
	bsr.w	lbC014DFC
	smi	$1E2838.L
	move.l	$1E2974.L,D0
	subi.l	#$3400,D0
	cmp.l	$1E2ABE.L,D0
	bhi.w	lbC015186
	bsr.w	lbC014F98
	lea	Nosavingpossi.MSG0(PC),A0
	jsr	$1AB4A8.L
	rts

lbC015186:
	movea.l	D0,A0
	bsr.w	lbC01214E
	move.l	D1,D0
	move.l	D1,D4
	lea	$1E26C8.L,A1
	bsr.w	lbC01394E
	bmi.w	lbC015244
	lea	$1E2834.L,A2
	move.l	#$41525033,(A2)
	moveq	#4,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	lea	$1E2ABE.L,A2
	moveq	#4,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	lea	$1E2ABA.L,A2
	moveq	#4,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	lea	$1E2C34.L,A2
	moveq	#4,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	lea	$1E2974.L,A2
	moveq	#4,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	lea	$1E2978.L,A2
	moveq	#4,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	lea	$1E2BC4.L,A2
	moveq	#8,D0
	bsr.w	lbC013C80
	bmi.w	lbC015244
	bsr.w	lbC0153A8
	bmi.w	lbC015244
	lea	$1E0916.L,A1
	bsr.w	lbC0159F6
	movea.l	A1,A2
	bsr.w	lbC013C80
	bmi.w	lbC015244
	bsr.w	lbC0139D8
	bmi.w	lbC015244
	moveq	#0,D0
	move.b	$1E2848.L,$1E28AC.L
lbC015244:
	move.l	D0,-(SP)
	bsr.w	lbC0121AE
	move.l	(SP)+,D0
	bsr.w	lbC014F98
	tst.w	D0
	bpl.w	lbC01525A
	bra.w	lbC012A96

lbC01525A:
	tst.b	$1E2838.L
	beq.w	lbC012A96
	lea	WARNINGNoload.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
	bra.w	lbC012A96

Nosavingpossi.MSG0:
	dc.b	'No saving possible: Try higher crunchrate',$D,0
WARNINGNoload.MSG:
	dc.b	'WARNING: No load without cartridge possible',$D
	dc.b	'Try to fill $900 bytes in chipmem with zero '
	dc.b	'(be careful)',$D,0
Suretofreezem.MSG:
	dc.b	'Sure to freeze more than 1024 Kb (Y/N)?',$D,0
Pleaseinserta.MSG:
	dc.b	'Please insert an empty formatted disk and pr'
	dc.b	'ess SPACE or ESC for exit!',$D,0
Notenoughspac.MSG:
	dc.b	'Not enough space on inserted disk! Use anoth'
	dc.b	'er!',$D,0
	dc.b	0

lbC0153A8:
	movem.l	D6/D7/A0-A2,-(SP)
	move.l	#$C8000,D7
	moveq	#0,D6
	suba.l	A1,A1
	movea.l	$1E2ABE.L,A2
	jsr	$1BD2E2.L
	bmi.w	lbC015402
	tst.l	$1E2ABA.L
	beq.w	lbC0153E6
	lea	$C00000.L,A1
	movea.l	$1E2ABA.L,A2
	jsr	$1BD2E2.L
	bmi.w	lbC015402
lbC0153E6:
	tst.l	$1E2C34.L
	beq.w	lbC015402
	movea.l	$1E2BC4.L,A1
	movea.l	$1E2C34.L,A2
	jsr	$1BD2E2.L
lbC015402:
	movem.l	(SP)+,D6/D7/A0-A2
	rts

	movem.l	D5/A1/A2,-(SP)
	move.l	A2,D5
	sub.l	A1,D5
	movea.l	A1,A2
lbC015412:
	cmp.l	D7,D5
	bls.w	lbC015436
	move.l	D7,D0
	sub.l	D0,D5
	jsr	lbC013C80(PC)
	bmi.w	lbC01543E
	jsr	$1BD31E.L
	bmi.w	lbC01543E
	move.l	#$C8000,D7
	bra.s	lbC015412

lbC015436:
	move.l	D5,D0
	sub.l	D0,D7
	jsr	lbC013C80(PC)
lbC01543E:
	movem.l	(SP)+,D5/A1/A2
	rts

	move.l	A1,-(SP)
	jsr	lbC0139D8(PC)
	bmi.w	lbC015562
	jsr	lbC0121AE(PC)
	bpl.w	lbC01545E
	jsr	lbC01214E(PC)
	bra.w	lbC015562

lbC01545E:
	move.l	$68.L,-(SP)
	move.l	$6C.L,-(SP)
	jsr	$1B2078.L
	move.l	#$1A8686,$68.L
	move.l	#$1A868A,$6C.L
	move.w	#$C000,$DFF09A.L
	move.w	#$8100,$DFF096.L
lbC015494:
	exg	A6,A0
	lea	Pleaseinserta.MSG(PC),A0
	jsr	$1AB4A8.L
	exg	A6,A0
lbC0154A2:
	jsr	$1A9780.L
	cmpi.b	#$20,D0
	beq.w	lbC0154BE
	tst.b	$1E26A1.L
	beq.s	lbC0154A2
	moveq	#-8,D0
	bra.w	lbC015516

lbC0154BE:
	jsr	lbC01214E(PC)
	sf	$1E2A9C.L
	jsr	lbC014392(PC)
	tst.w	D0
	bpl.w	lbC0154E6
	move.l	D0,-(SP)
	jsr	lbC0121AE(PC)
	move.l	(SP)+,D0
lbC0154DA:
	jsr	lbC012A96(PC)
lbC0154DE:
	jsr	$1AEEA2.L
	bra.s	lbC015494

lbC0154E6:
	jsr	lbC0149E4(PC)
	move.l	D0,-(SP)
	jsr	lbC0121AE(PC)
	bpl.w	lbC0154FA
	lea	4(SP),SP
	bra.s	lbC0154DA

lbC0154FA:
	move.l	(SP)+,D0
	cmpi.w	#$6A4,D0
	bcc.w	lbC015514
	exg	A6,A0
	lea	Notenoughspac.MSG(PC),A0
	jsr	$1AB4A8.L
	exg	A6,A0
	bra.s	lbC0154DE

lbC015514:
	moveq	#0,D0
lbC015516:
	move.w	#$100,$DFF096.L
	move.w	#$4000,$DFF09A.L
	jsr	$1B2078.L
	move.l	(SP)+,$6C.L
	move.l	(SP)+,$68.L
	tst.l	D0
	bmi.w	lbC015562
	lea	$1E26C8.L,A1
	move.b	#$2E,0(A1,D4.W)
	addq.w	#1,D6
	move.w	D6,D0
	addi.b	#$30,D0
	move.b	D0,1(A1,D4.W)
	move.w	D4,D0
	addq.w	#2,D0
	jsr	lbC01214E(PC)
	jsr	lbC01394E(PC)
lbC015562:
	movea.l	(SP)+,A1
	tst.l	D0
	rts

	st	$1E2848.L
	bra.w	lbC015578

	sf	$1E2848.L
lbC015578:
	sf	$1E2AF6.L
	bsr.w	lbC014D1E
	tst.w	D0
	beq.w	lbC0138A2
	move.l	D0,D1
	movea.l	$1E2974.L,A0
	suba.l	#$3400,A0
	bsr.w	lbC01214E
	move.l	D1,D0
	move.w	D0,D4
	lea	$1E26C8.L,A1
	bsr.w	lbC014938
	bmi.w	lbC015762
	move.w	#$100,$DFF096.L
	move.w	#$4000,$DFF09A.L
	jsr	$1B2078.L
	lea	$1E2834.L,A2
	moveq	#4,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	moveq	#-$1C,D0
	cmpi.l	#$41525033,$1E2834.L
	beq.w	lbC0155F6
	cmpi.l	#$41525046,$1E2834.L
	bne.w	lbC01575C
	moveq	#-$1E,D0
	bra.w	lbC01575C

lbC0155F6:
	lea	$1E2ABE.L,A2
	moveq	#4,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	lea	$1E2ABA.L,A2
	moveq	#4,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	lea	$1E2C34.L,A2
	moveq	#4,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	lea	$1E2974.L,A2
	moveq	#4,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	lea	$1E2978.L,A2
	moveq	#4,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	lea	$1E2BC4.L,A2
	moveq	#8,D0
	bsr.w	lbC014706
	bmi.w	lbC01575C
	moveq	#-$1F,D0
	move.l	$1E2974.L,D1
	cmp.l	$1E299E.L,D1
	bhi.w	lbC01575C
	moveq	#-$20,D0
	move.l	$1E2978.L,D1
	beq.w	lbC01567E
	cmp.l	$1E299A.L,D1
	bhi.w	lbC01575C
lbC01567E:
	moveq	#-$21,D0
	move.l	$1E2BC8.L,D1
	beq.w	lbC0156B0
	st	$1E2B43.L
	st	$1E2B00.L
	cmp.l	$1E2BD0.L,D1
	bhi.w	lbC01575C
	move.l	$1E2BC4.L,D1
	cmp.l	$1E2bcc.L,D1
	bcs.w	lbC01575C
lbC0156B0:
	bsr.w	lbC015876
	bmi.w	lbC01575C
	lea	$1E0916.L,A2
	move.l	$1E2A88.L,D0
	subi.l	#$20,D0
	sub.l	$1E2ABE.L,D0
	tst.l	$1E2ABA.L
	beq.w	lbC0156E6
	sub.l	$1E2ABA.L,D0
	addi.l	#$C00000,D0
lbC0156E6:
	tst.l	$1E2C34.L
	beq.w	lbC0156FC
	sub.l	$1E2C34.L,D0
	add.l	$1E2BC4.L,D0
lbC0156FC:
	tst.l	D0
	bpl.w	lbC015710
	addi.l	#$20,D0
lbC015708:
	addi.l	#$C8000,D0
	bmi.s	lbC015708
lbC015710:
	bsr.w	lbC014706
	bmi.w	lbC01575C
	lea	$1E0916.L,A1
	bsr.w	lbC015A32
	movem.l	D0-D3,-(SP)
	bsr.w	lbC014F98
	movem.l	(SP)+,D0-D3
	tst.w	D0
	bmi.w	lbC01578C
	tst.w	D0
	beq.w	lbC015744
	lea	Warningdrivec.MSG0(PC),A0
	jsr	$1AB4A8.L
lbC015744:
	jsr	lbC012290(PC)
	bsr.w	lbC015B8A
	bsr.w	lbC012A96
	move.b	$1E2848.L,$1E28AC.L
	rts

lbC01575C:
	jsr	$1B2078.L
lbC015762:
	move.l	#$1A8686,$68.w
	move.l	#$1A868A,$6C.w
	move.w	#$C000,$DFF09A.L
	move.w	#$8100,$DFF096.L
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	rts

lbC01578C:
	lea	Noloadpossibl.MSG0(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2974.L,-(SP)
	move.l	$1E2978.L,-(SP)
	move.w	$1E2990.L,-(SP)
	move.l	D1,$1E2974.L
	move.l	D2,$1E2978.L
	move.w	D3,$1E2990.L
	bsr.w	lbC015B8A
	move.w	(SP)+,$1E2990.L
	move.l	(SP)+,$1E2978.L
	move.l	(SP)+,$1E2974.L
	moveq	#0,D0
	bra.s	lbC015762

Insertdiskwit.MSG:
	dc.b	'Insert disk with save-file nr ',0
andpressSPACE.MSG:
	dc.b	' and press SPACE or ESC to abort.',$D,0
Noloadpossibl.MSG0:
	dc.b	'No load possible - required system configura'
	dc.b	'tion:',$D,0
	dc.b	0
Warningdrivec.MSG0:
	dc.b	'Warning: drive configuration has changed!',$D,0
	dc.b	0

lbC015876:
	movem.l	D6/D7/A0-A2,-(SP)
	move.l	#$C8000,D7
	moveq	#0,D6
	suba.l	A1,A1
	movea.l	$1E2ABE.L,A2
	jsr	$1BD7B0.L
	bmi.w	lbC0158D0
	tst.l	$1E2ABA.L
	beq.w	lbC0158B4
	lea	$C00000.L,A1
	movea.l	$1E2ABA.L,A2
	jsr	$1BD7B0.L
	bmi.w	lbC0158D0
lbC0158B4:
	tst.l	$1E2C34.L
	beq.w	lbC0158D0
	movea.l	$1E2BC4.L,A1
	movea.l	$1E2C34.L,A2
	jsr	$1BD7B0.L
lbC0158D0:
	movem.l	(SP)+,D6/D7/A0-A2
	rts

	movem.l	D5/A1/A2,-(SP)
	move.l	A2,D5
	sub.l	A1,D5
	movea.l	A1,A2
lbC0158E0:
	cmp.l	D7,D5
	bls.w	lbC015904
	move.l	D7,D0
	sub.l	D0,D5
	jsr	lbC014706(PC)
	bmi.w	lbC01590C
	jsr	$1BD7EC.L
	bmi.w	lbC01590C
	move.l	#$C8000,D7
	bra.s	lbC0158E0

lbC015904:
	move.l	D5,D0
	sub.l	D0,D7
	jsr	lbC014706(PC)
lbC01590C:
	movem.l	(SP)+,D5/A1/A2
	rts

	movem.l	D1/A1,-(SP)
	jsr	lbC0121AE(PC)
	bpl.w	lbC015926
	jsr	lbC01214E(PC)
	bra.w	lbC0159D0

lbC015926:
	move.l	$68.W,-(SP)
	move.l	$6C.W,-(SP)
	jsr	$1B2078.L
	move.l	#$1A8686,$68.w
	move.l	#$1A868A,$6C.w
	move.w	#$C000,$DFF09A.L
	move.w	#$8100,$DFF096.L
	addq.w	#1,D6
lbC015956:
	exg	A0,A6
	lea	Insertdiskwit.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	D6,D0
	moveq	#1,D1
	jsr	$1AE598.L
	lea	andpressSPACE.MSG(PC),A0
	jsr	$1AB4A8.L
	exg	A0,A6
lbC015978:
	jsr	$1A9780.L
	cmpi.b	#$20,D0
	beq.w	lbC015994
	tst.b	$1E26A1.L
	beq.s	lbC015978
	moveq	#-8,D0
	bra.w	lbC0159D0

lbC015994:
	lea	$1E26C8.L,A1
	move.b	#$2E,0(A1,D4.W)
	move.w	D6,D0
	addi.b	#$30,D0
	move.b	D0,1(A1,D4.W)
	move.w	D4,D0
	addq.w	#2,D0
	jsr	lbC01214E(PC)
	jsr	lbC014938(PC)
	bpl.w	lbC0159CE
	exg	D0,D1
	jsr	lbC0121AE(PC)
	exg	D0,D1
	jsr	lbC012A96(PC)
	jsr	$1AEEA2.L
	bra.s	lbC015956

lbC0159CE:
	moveq	#0,D0
lbC0159D0:
	move.w	#$100,$DFF096.L
	move.w	#$4000,$DFF09A.L
	jsr	$1B2078.L
	move.l	(SP)+,$6C.w
	move.l	(SP)+,$68.w
	tst.l	D0
	movem.l	(SP)+,D1/A1
	rts

lbC0159F6:
	movem.l	A0-A3,-(SP)
	move.l	A1,-(SP)
	lea	lbL015AC6(PC),A2
lbC015A00:
	movea.l	(A2)+,A3
	move.l	(A2)+,D0
	subq.w	#1,D0
lbC015A06:
	move.b	(A3)+,(A1)+
	dbra	D0,lbC015A06
	tst.w	(A2)
	bpl.s	lbC015A00
	move.l	A1,D0
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	movea.l	D0,A1
	move.l	USP,A0
	move.l	A0,(A1)+
	movea.l	A1,A0
	jsr	$1B053A.L
	movea.l	A0,A1
	move.l	A1,D0
	sub.l	(SP)+,D0
	movem.l	(SP)+,A0-A3
	rts

lbC015A32:
	movem.l	D4/A0-A4,-(SP)
	move.l	$1E29BA.L,-(SP)
	move.w	$1E2998.L,D0
	move.w	(A1),D1
	andi.w	#$FFEE,D0
	andi.w	#$FFEE,D1
	and.w	D1,D0
	sub.w	D1,D0
	move.l	$124(A1),D1
	move.l	$128(A1),D2
	moveq	#0,D3
	move.w	2(A1),D3
	tst.w	D0
	bne.w	lbC015AC2
	movea.l	A1,A4
	lea	lbL015AC6(PC),A2
lbC015A6A:
	movea.l	(A2)+,A3
	move.l	(A2)+,D0
	subq.w	#1,D0
lbC015A70:
	move.b	(A1)+,(A3)+
	dbra	D0,lbC015A70
	tst.w	(A2)
	bpl.s	lbC015A6A
	move.l	A1,D0
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	movea.l	D0,A1
	movea.l	(A1)+,A0
	move.l	A0,USP
	movea.l	A1,A0
	jsr	$1B0554.L
	movea.l	A0,A1
	moveq	#0,D0
	move.w	$1E298E.L,D1
	and.w	2(A4),D1
	cmp.w	2(A4),D1
	beq.w	lbC015AA8
	moveq	#1,D0
lbC015AA8:
	move.w	$1E298E.L,D4
	and.w	D4,$1E2990.L
	move.l	(SP)+,$1E29BA.L
	movem.l	(SP)+,D4/A0-A4
	tst.w	D0
	rts

lbC015AC2:
	moveq	#-1,D0
	bra.s	lbC015AA8

lbL015AC6:
	dc.l	$1E2996
	dc.l	2
	dc.l	$1E2990
	dc.l	2
	dc.l	$1E29BA
	dc.l	4
	dc.l	$1E276E
	dc.l	4
	dc.l	$1E2608
	dc.l	$40
	dc.l	$1E264C
	dc.l	2
	dc.l	$1E2648
	dc.l	4
	dc.l	$1E2690
	dc.l	4
	dc.l	$1E2694
	dc.l	4
	dc.l	$1E286C
	dc.l	2
	dc.l	$1E286E
	dc.l	4
	dc.l	$1E2876
	dc.l	$30
	dc.l	$1E2ADC
	dc.l	4
	dc.l	$1E2AD8
	dc.l	4
	dc.l	$1E2AD4
	dc.l	4
	dc.l	$1E28B0
	dc.l	$78
	dc.l	$1E29BE
	dc.l	4
	dc.l	$1E298A
	dc.l	2
	dc.l	$1E298C
	dc.l	2
	dc.l	$1E297C
	dc.l	1
	dc.l	$1E2AE0
	dc.l	4
	dc.l	$1E2AE4
	dc.l	4
	dc.l	$1E2BA2
	dc.l	4
	dc.l	$1E2B3B
	dc.l	1
	dc.l	$FFFFFFFF

lbC015B8A:
	movem.l	D0-D2/A0,-(SP)
	jsr	$1AEECA.L
	lea	Memoryconfigu.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2974.L,D0
	bsr.w	lbC015CBA
	lea	ChipMem.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2978.L,D0
	beq.w	lbC015BD4
	subi.l	#$C00000,D0
	bsr.w	lbC015CBA
	lea	FastMem.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC015BDE

lbC015BD4:
	lea	noFastMem.MSG(PC),A0
	jsr	$1AB4A8.L
lbC015BDE:
	lea	noExternalMem.MSG(PC),A0
	move.l	$1E2BC8.L,D0
	beq.w	lbC015BFA
	sub.l	$1E2BC4.L,D0
	bsr.w	lbC015CBA
	lea	ExternMem.MSG(PC),A0
lbC015BFA:
	jsr	$1AB4A8.L
	lea	Activedrives.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D2
lbC015C0C:
	btst	D2,$1E2991.L
	beq.w	lbC015C3E
	moveq	#$44,D0
	jsr	$1AE5E4.L
	moveq	#$46,D0
	jsr	$1AE5E4.L
	moveq	#1,D1
	move.w	D2,D0
	jsr	$1AE598.L
	moveq	#$3A,D0
	jsr	$1AE5E4.L
	jsr	$1AEE96.L
lbC015C3E:
	addq.w	#1,D2
	cmpi.w	#3,D2
	bls.s	lbC015C0C
	jsr	$1AEECA.L
	movem.l	(SP)+,D0-D2/A0
	rts

Memoryconfigu.MSG:
	dc.b	'Memoryconfiguration: ',0
ChipMem.MSG:
	dc.b	' ChipMem, ',0
FastMem.MSG:
	dc.b	' FastMem, ',0
noFastMem.MSG:
	dc.b	' no FastMem, ',0
Activedrives.MSG:
	dc.b	'Active drives: ',0
ExternMem.MSG:
	dc.b	' Extern Mem',$D,0
noExternalMem.MSG:
	dc.b	' no ExternalMem',$D,0

lbC015CBA:
	movem.l	D0/D1/A0,-(SP)
	lsr.l	#8,D0
	lsr.l	#2,D0
	mulu.w	#10,D0
	lsr.l	#8,D0
	lsr.l	#2,D0
	jsr	$1B05D2.L
	roxr.l	#4,D0
	moveq	#1,D1
	jsr	$1AE598.L
	move.w	#$2E,D0
	jsr	$1AE5E4.L
	roxl.l	#4,D0
	moveq	#1,D1
	jsr	$1AE598.L
	lea	MByte.MSG(PC),A0
	jsr	$1AB4A8.L
	movem.l	(SP)+,D0/D1/A0
	rts

MByte.MSG:
	dc.b	' MByte',0,0

	st	$1E2834.L
	bra.w	lbC015D16

	sf	$1E2834.L
lbC015D16:
	tst.b	$1E2834.L
	beq.w	lbC015D34
	sf	$1E2B33.L
	bsr.w	lbC014D28
	st	$1E2B33.L
	bra.w	lbC015D44

lbC015D34:
	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
lbC015D44:
	tst.w	D0
	beq.w	lbC0138A2
	lea	$1E26C8.L,A1
	move.l	A1,$1E2A70.L
	move.w	D0,$1E2A6E.L
	move.w	#1,$1E2816.L
	moveq	#0,D6
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC015D96
	move.w	D0,$1E2816.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC015D96
	cmpi.w	#$320,D0
	bhi.w	lbC0138A2
	move.w	D0,D6
lbC015D96:
	move.w	D6,D7
	tst.b	$1E2834.L
	bne.w	lbC015DA8
	jsr	$1AE1C0.L
lbC015DA8:
	move.w	$1E27A6.L,D0
	andi.w	#$7000,D0
	bne.w	lbC015DC8
	lea	SorrynoBitpla.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

lbC015DC8:
	movea.l	$1E2974.L,A0
	suba.l	#$3400,A0
	bsr.w	lbC01214E
	bsr.w	lbC015E00
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	bmi.w	lbC012A96
	rts

SorrynoBitpla.MSG:
	dc.b	'Sorry no Bitplanes!',$D,0
	dc.b	0

lbC015E00:
	movem.l	D6/A1,-(SP)
	move.w	$1E27A6.L,D0
	moveq	#0,D6
	btst	#10,D0
	beq.w	lbC015E16
	moveq	#$32,D6
lbC015E16:
	tst.w	D6
	beq.w	lbC015E50
	movea.l	$1E2A70.L,A1
	move.w	$1E2A6E.L,D0
	cmpi.w	#$32,D6
	beq.w	lbC015E38
	move.b	D6,-1(A1,D0.W)
	bra.w	lbC015E50

lbC015E38:
	move.b	#$2E,0(A1,D0.W)
	move.b	#$50,1(A1,D0.W)
	move.b	D6,2(A1,D0.W)
	addq.w	#3,D0
	move.w	D0,$1E2A6E.L
lbC015E50:
	move.w	$1E2A6E.L,D0
	movea.l	$1E2A70.L,A1
	bsr.w	lbC01394E
	bmi.w	lbC015E96
	bsr.w	lbC016070
	bmi.w	lbC015E96
	bsr.w	lbC016018
	bmi.w	lbC015E96
	bsr.w	lbC015F92
	bmi.w	lbC015E96
	bsr.w	lbC015E9E
	bmi.w	lbC015E96
	bsr.w	lbC0139D8
	bmi.w	lbC015E96
	subq.w	#1,D6
	cmpi.w	#$31,D6
	beq.w	lbC015E16
lbC015E96:
	tst.w	D0
	movem.l	(SP)+,D6/A1
	rts

lbC015E9E:
	movem.l	D1-D7/A1/A2,-(SP)
	lea	$1E0916.L,A2
	move.l	#$424F4459,(A2)
	moveq	#0,D0
	move.w	D4,D0
	mulu.w	D5,D0
	mulu.w	D7,D0
	lsl.l	#1,D0
	move.l	D0,4(A2)
	moveq	#8,D0
	bsr.w	lbC0145BE
	bmi.w	lbC015F8A
	lea	$1E2834.L,A1
	lea	$1E278E.L,A2
	move.w	D4,D0
	subq.w	#1,D0
lbC015ED6:
	cmpi.w	#$32,D6
	bne.w	lbC015EE6
	addq.l	#4,A2
	move.l	(A2)+,(A1)+
	bra.w	lbC015EF8

lbC015EE6:
	cmpi.w	#$31,D6
	bne.w	lbC015EF6
	move.l	(A2)+,(A1)+
	addq.l	#4,A2
	bra.w	lbC015EF8

lbC015EF6:
	move.l	(A2)+,(A1)+
lbC015EF8:
	dbra	D0,lbC015ED6
lbC015EFC:
	lea	$1E2834.L,A1
	moveq	#1,D1
lbC015F04:
	movea.l	(A1),A2
	moveq	#0,D0
	move.w	D5,D0
	lsl.l	#1,D0
	bsr.w	lbC0145BE
	bmi.w	lbC015F8A
	move.w	$1E27AE.L,D0
	btst	#0,D1
	bne.w	lbC015F28
	move.w	$1E27B0.L,D0
lbC015F28:
	cmpi.w	#$32,D6
	bne.w	lbC015F3A
	move.w	$1E27B0.L,D0
	bra.w	lbC015F48

lbC015F3A:
	cmpi.w	#$31,D6
	bne.w	lbC015F48
	move.w	$1E27AE.L,D0
lbC015F48:
	tst.w	$1E314E.L
	beq.s	lbC015F68
	move.w	$1E314E.L,D3
	addq.w	#1,D3
	lsr.w	#1,D3
	btst	#7,$1E27A6.L
	bne.s	lbC015F66
	addq.w	#2,D3
lbC015F66:
	add.w	D3,D0
lbC015F68:
	btst	#2,$1E27A7.L
	beq.w	lbC015F78
	sub.w	D5,D0
	sub.w	D5,D0
lbC015F78:
	adda.w	D0,A2
	move.l	A2,(A1)+
	addq.w	#1,D1
	cmp.w	D4,D1
	bls.s	lbC015F04
	subq.w	#1,D7
	bne.w	lbC015EFC
	moveq	#0,D0
lbC015F8A:
	movem.l	(SP)+,D1-D7/A1/A2
	tst.w	D0
	rts

lbC015F92:
	movem.l	D1/A1/A2,-(SP)
	lea	$1E0916.L,A1
	move.l	#$434D4150,(A1)+
	move.w	D4,D0
	lea	$1E27D4.L,A2
	cmpi.w	#$32,D6
	bne.w	lbC015FB6
	lea	$10(A2),A2
lbC015FB6:
	cmpi.w	#6,D0
	beq.w	lbC015FC6
	moveq	#0,D1
	bset	D0,D1
	bra.w	lbC015FD8

lbC015FC6:
	moveq	#$20,D1
	move.w	$1E27A6.L,D0
	btst	#11,D0
	beq.w	lbC015FD8
	moveq	#$10,D1
lbC015FD8:
	move.w	D1,D0
	mulu.w	#3,D0
	move.l	D0,(A1)+
	subq.w	#1,D1
lbC015FE2:
	move.w	(A2),D0
	lsr.w	#4,D0
	andi.w	#$F0,D0
	move.b	D0,(A1)+
	move.w	(A2),D0
	andi.w	#$F0,D0
	move.b	D0,(A1)+
	move.w	(A2)+,D0
	lsl.w	#4,D0
	andi.w	#$F0,D0
	move.b	D0,(A1)+
	dbra	D1,lbC015FE2
	lea	$1E0916.L,A2
	move.l	4(A2),D0
	addq.l	#8,D0
	bsr.w	lbC0145BE
	movem.l	(SP)+,D1/A1/A2
	rts

lbC016018:
	movem.l	D1/A1/A2,-(SP)
	lea	$1E0916.L,A1
	move.l	#$43414D47,(A1)+
	move.l	#4,(A1)+
	moveq	#0,D0
	move.w	$1E27A6.L,D0
	andi.w	#$8804,D0
	move.w	D4,D1
	tst.w	D6
	bne.w	lbC01605C
	cmpi.w	#6,D1
	bne.w	lbC01605C
	move.w	$1E27A6.L,D1
	btst	#11,D1
	bne.w	lbC01605C
	bset	#7,D0
lbC01605C:
	move.l	D0,(A1)+
	lea	$1E0916.L,A2
	moveq	#12,D0
	bsr.w	lbC0145BE
	movem.l	(SP)+,D1/A1/A2
	rts

lbC016070:
	movem.l	D1-D3/A1/A2,-(SP)
	lea	$1E0916.L,A1
	move.l	#$464F524D,(A1)+
	clr.l	(A1)+
	move.l	#$494C424D,(A1)+
	move.l	#$424D4844,(A1)+
	move.l	#$14,(A1)+
	move.w	$1E278A.L,D0
	move.w	$1E278C.L,D1
	andi.w	#$FC,D0
	andi.w	#$FC,D1
	sub.w	D0,D1
	addq.w	#8,D1
	addq.w	#7,D1
	lsr.w	#3,D1
	move.w	$1E27A6.L,D0
	btst	#15,D0
	beq.w	lbC0160C0
	lsl.w	#1,D1
lbC0160C0:
	move.w	D1,D5
	lsl.w	#4,D1
	move.w	D1,(A1)+
	tst.w	D7
	bne.w	lbC0160FC
	move.w	$1E2786.L,D0
	lsr.w	#8,D0
	move.w	$1E2788.L,D1
	lsr.w	#8,D1
	btst	#7,D1
	bne.w	lbC0160E8
	bset	#8,D1
lbC0160E8:
	sub.w	D0,D1
	move.w	$1E27A6.L,D0
	btst	#2,D0
	beq.w	lbC0160FA
	lsl.w	#1,D1
lbC0160FA:
	move.w	D1,D7
lbC0160FC:
	move.w	D7,(A1)+
	clr.l	(A1)+
	move.w	$1E27A6.L,D0
	lsr.w	#8,D0
	lsr.w	#4,D0
	andi.w	#7,D0
	cmpi.w	#$32,D6
	bne.w	lbC016118
	lsr.w	#1,D0
lbC016118:
	cmpi.w	#$31,D6
	bne.w	lbC016124
	addq.w	#1,D0
	lsr.w	#1,D0
lbC016124:
	move.w	D0,D4
	move.b	D0,(A1)+
	move.w	D5,D3
	lsl.w	#1,D3
	mulu.w	D7,D3
	mulu.w	D0,D3
	addq.l	#8,D3
	addi.l	#$20,D3
	addi.l	#12,D3
	cmpi.w	#6,D0
	beq.w	lbC01615A
	moveq	#0,D1
	bset	D0,D1
	mulu.w	#3,D1
	add.l	D1,D3
	addi.l	#8,D3
	bra.w	lbC016174

lbC01615A:
	addi.l	#$38,D3
	move.w	$1E27A6.L,D1
	btst	#11,D1
	bne.w	lbC016174
	addi.l	#$30,D3
lbC016174:
	clr.b	(A1)+
	clr.w	(A1)+
	clr.w	(A1)+
	move.w	$1E27A6.L,D1
	move.w	#5,D0
	btst	#15,D1
	bne.w	lbC01618E
	lsl.w	#1,D0
lbC01618E:
	btst	#2,D1
	beq.w	lbC016198
	lsl.w	#1,D0
lbC016198:
	move.b	D0,(A1)+
	move.b	#11,(A1)+
	move.w	#$140,D0
	move.w	$1E27A6.L,D1
	btst	#15,D1
	beq.w	lbC0161B4
	move.w	#$280,D0
lbC0161B4:
	move.w	D0,(A1)+
	move.w	D7,(A1)+
	lea	$1E0916.L,A2
	move.l	D3,4(A2)
	moveq	#$28,D0
	bsr.w	lbC0145BE
	movem.l	(SP)+,D1-D3/A1/A2
	rts

lbC0161CE:
	tst.w	D0
	beq.w	lbC013070
	move.l	$1E2AA2.L,-(SP)
	bsr.w	lbC014A40
	move.l	$1E2AA2.L,D1
	move.l	(SP)+,$1E2AA2.L
	tst.w	D0
	rts

lbC0161EE:
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01624C
	cmpi.b	#$2F,-1(A2,D1.W)
	beq.w	lbC01624C
	cmpi.b	#$3A,-1(A2,D1.W)
	beq.w	lbC01624C
	moveq	#0,D2
lbC01620E:
	cmpi.b	#$3A,-1(A2,D1.W)
	beq.w	lbC01622E
	cmpi.b	#$2F,-1(A2,D1.W)
	beq.w	lbC016236
	addq.w	#1,D2
	subq.w	#1,D1
	bne.s	lbC01620E
	movea.l	A2,A1
	bra.w	lbC01623C

lbC01622E:
	lea	0(A2,D1.W),A1
	bra.w	lbC01623C

lbC016236:
	lea	0(A2,D1.W),A1
	subq.w	#1,D1
lbC01623C:
	move.w	D1,D0
	tst.w	D2
	bne.w	lbC01624A
	moveq	#-14,D0
	bra.w	lbC01624C

lbC01624A:
	bra.s	lbC0161CE

lbC01624C:
	tst.w	D0
	rts

	moveq	#1,D1
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC016264
	move.w	D0,D1
lbC016264:
	lea	lbW0163A4(PC),A0
	move.w	(A0)+,D0
	cmp.w	D0,D1
	bhi.w	lbC0138A2
	lsl.w	#3,D1
	movea.l	0(A0,D1.W),A1
	move.l	4(A0,D1.W),D1
	sub.l	A1,D1
	lea	Readytoinstal.MSG(PC),A0
	jsr	$1AB4A8.L
	move.b	$1E29B2.L,D0
	move.l	D1,D2
	moveq	#1,D1
	jsr	$1AE598.L
	move.l	D2,D1
	lea	yn.MSG0(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC0162AE
	moveq	#-8,D0
	bra.w	lbC012A96

lbC0162AE:
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	bsr.w	lbC0162F8
	move.w	D0,D1
	jsr	lbC0121AE(PC)
	bmi.w	lbC0162C6
	move.w	D1,D0
lbC0162C6:
	bsr.w	lbC012A96
	rts

Readytoinstal.MSG:
	dc.b	'Ready to install disk in drive df',0
yn.MSG0:
	dc.b	':? (y/n)',$D,0

lbC0162F8:
	movem.l	D1-D3/A1/A2,-(SP)
	movea.l	A1,A2
	moveq	#0,D3
	moveq	#0,D0
	bsr.w	lbC012F16
	bmi.w	lbC01639C
	moveq	#-$22,D0
	cmpi.l	#$444F5300,(A1)
	beq.w	lbC016320
	cmpi.l	#$444F5301,(A1)
	bne.w	lbC01639C
lbC016320:
	add.l	(A1)+,D3
	clr.l	(A1)+
	move.l	#$370,(A1)
	add.l	(A1)+,D3
	move.w	#$7C,D2
	lsr.w	#2,D1
lbC016332:
	tst.w	D1
	beq.w	lbC016340
	move.l	(A2)+,(A1)
	subq.w	#1,D1
	bra.w	lbC016342

lbC016340:
	clr.l	(A1)
lbC016342:
	add.l	(A1)+,D3
	bcc.w	lbC01634A
	addq.l	#1,D3
lbC01634A:
	dbra	D2,lbC016332
	st	$1E29B5.L
	moveq	#1,D0
	bsr.w	lbC012F16
	bmi.w	lbC01639C
	move.w	#$7F,D2
lbC016362:
	tst.w	D1
	beq.w	lbC016370
	move.l	(A2)+,(A1)
	subq.w	#1,D1
	bra.w	lbC016372

lbC016370:
	clr.l	(A1)
lbC016372:
	add.l	(A1)+,D3
	bcc.w	lbC01637A
	addq.l	#1,D3
lbC01637A:
	dbra	D2,lbC016362
	st	$1E29B5.L
	moveq	#0,D0
	bsr.w	lbC012F16
	bmi.w	lbC01639C
	not.l	D3
	move.l	D3,4(A1)
	st	$1E29B5.L
	moveq	#0,D0
lbC01639C:
	movem.l	(SP)+,D1-D3/A1/A2
	tst.w	D0
	rts

lbW0163A4:
	dc.w	1
	dc.l	$1BE290
	dc.l	$1BE2BA
	dc.l	$1BE2BA
	dc.l	$1BE6B0

lbC0163B6:
	lea	doslibrary.MSG0(PC),A1
	jsr	-$60(A6)
	tst.l	D0
	beq.w	lbC0163CE
	movea.l	D0,A0
	movea.l	$16(A0),A0
	moveq	#0,D0
lbC0163CC:
	rts

lbC0163CE:
	moveq	#-1,D0
	bra.s	lbC0163CC

doslibrary.MSG0:
	dc.b	'dos.library',0,0
	dc.b	0

lbC0163E0:
	movem.l	A0-A6,-(SP)
	movea.l	4.L,A6
	bsr.s	lbC016408
	movem.l	(SP)+,A0-A6
	movea.l	4.L,A6
	lea	doslibrary.MSG1(PC),A1
	jsr	-$60(A6)
	movea.l	D0,A0
	movea.l	$16(A0),A0
	moveq	#0,D0
	rts

lbC016408:
	btst	#2,$DFF016.L
	beq.w	lbC01654A
	cmpi.w	#$4880,$FC06DC.L
	bne.w	lbC01642E
	lea	FC06DC0000000.MSG(PC),A0
	move.l	#$46433037,(A0)+
	move.w	#$3138,(A0)
lbC01642E:
	lea	DASAVIRUSSYST.MSG(PC),A0
	cmpi.l	#$7F94C,$226(A6)
	beq.w	lbC0164C2
	lea	BANDITVIRUS.MSG(PC),A0
	cmpi.l	#$7EBE2,$226(A6)
	beq.s	lbC0164C2
	lea	SCAVIRUS.MSG(PC),A0
	cmpi.l	#$7EC3E,$2E(A6)
	beq.s	lbC0164C2
	lea	NORTHSTARVIRU.MSG(PC),A0
	cmpi.l	#$7EC0E,$2E(A6)
	beq.s	lbC0164C2
	lea	SYSTEMNOTOKin.MSG(PC),A0
	move.l	$2A(A6),D0
	or.l	$2E(A6),D0
	or.l	$22A(A6),D0
	bne.s	lbC0164DC
	cmpi.w	#$4880,$FC06DC.L
	beq.s	lbC0164B6
	cmpi.l	#$FC06DC,-$1C6(A6)
	bne.s	lbC0164C2
lbC01648E:
	btst	#6,$BFE001.L
	bne.w	lbC0164AC
	bset	#1,$BFE001.L
	move.w	#$44F,$DFF180.L
	rts

lbC0164AC:
	move.w	#$4F4,$DFF180.L
	rts

lbC0164B6:
	cmpi.l	#$FC0718,-$1C6(A6)
	bne.s	lbC0164C2
	bra.s	lbC01648E

lbC0164C2:
	lea	ITDOSENTHAVET.MSG(PC),A1
	moveq	#$30,D0
lbC0164C8:
	move.b	#$20,(A1)+
	dbra	D0,lbC0164C8
	moveq	#15,D0
	lea	ascii.MSG14(PC),A1
lbC0164D6:
	move.b	(A0)+,(A1)+
	dbra	D0,lbC0164D6
lbC0164DC:
	lea	ascii.MSG15(PC),A1
	move.l	$2E(A6),D2
	bsr.s	lbC016508
	move.l	$2A(A6),D2
	bsr.s	lbC016508
	move.l	-$1C6(A6),D2
	bsr.s	lbC016508
	move.l	$222(A6),D2
	bsr.s	lbC016508
	move.l	$226(A6),D2
	bsr.s	lbC016508
	move.l	$22A(A6),D2
	bsr.s	lbC016508
	bra.w	lbC01652A

lbC016508:
	moveq	#7,D1
lbC01650A:
	rol.l	#4,D2
	move.l	D2,D3
	andi.b	#15,D3
	addi.b	#$30,D3
	cmpi.b	#$3A,D3
	bcs.s	lbC01651E
	addq.b	#7,D3
lbC01651E:
	move.b	D3,(A1)+
	dbra	D1,lbC01650A
	move.b	#$20,(A1)+
	rts

lbC01652A:
	lea	intuitionlibr.MSG(PC),A1
	jsr	-$198(A6)
	move.l	D0,-(SP)
	movea.l	(SP),A6
	lea	lbW016578(PC),A0
	moveq	#0,D0
	move.l	#$B4,D1
	jsr	-$5A(A6)
	tst.l	D0
	beq.s	lbC016562
lbC01654A:
	movea.l	4.L,A6
	jsr	-$96(A6)
	bset	#0,7.L
	jmp	$F800D0.L

lbC016562:
	movea.l	4.L,A6
	movea.l	(SP)+,A1
	jsr	-$19E(A6)
	move.w	#$F44,$DFF180.L
	rts

lbW016578:
	dc.w	$60
	dc.w	$1420
	dc.b	' Amiga Action Replay MK III AntiVirus-Boot',0
	dc.b	1
	dc.b	0
	dc.b	'P#For SCA,BANDIT,NORTH-STAR,BYTE WARRIOR (DA'
	dc.b	'SA), VIRUS',0
	dc.b	1
	dc.b	0
	dc.b	$C8
	dc.b	$32
	dc.b	'And most FUTURE-VIRUS !!!!!!! ',0
	dc.b	1
	dc.b	1
	dc.b	$22
	dc.b	$46
	dc.b	'Found',0
	dc.b	1
	dc.b	0
	dc.b	$F0
	dc.b	$5A
	dc.b	$20
ascii.MSG14:
	dc.b	'                ',0
	dc.b	1
	dc.b	0
	dc.b	$64
	dc.b	$6E
	dc.b	$20
ITDOSENTHAVET.MSG:
	dc.b	'IT DOSEN''T HAVE TO BE A VIRUS IN THE MEMORY'
	dc.b	' !?!',0
	dc.b	1
	dc.b	0
	dc.b	5
	dc.b	$8C
	dc.b	'VEKTOR  : CoolCap. ColdCap. DOIO     Kickmem'
	dc.b	'  KickTag  KickSum ',0
	dc.b	1
	dc.b	0
	dc.b	5
	dc.b	$9B
	dc.b	'STANDART: 00000000 00000000 00'
FC06DC0000000.MSG:
	dc.b	'FC06DC 00000000 00000000 00000000',0
	dc.b	1
	dc.b	0
	dc.b	5
	dc.b	$AA
	dc.b	'F'
	dc.b	'OUND   : '
ascii.MSG15:
	dc.b	'                                            '
	dc.b	'           ',0
	dc.b	1
	dc.b	0
	dc.b	$32
	dc.b	$46
	dc.b	'LEFT MOUSE',0
	dc.b	1
	dc.b	0
	dc.b	$32
	dc.b	$5A
	dc.b	'Clear System ',0
	dc.b	1
	dc.b	1
	dc.b	$F4
	dc.b	$46
	dc.b	'RIGHT MOUSE',0
	dc.b	1
	dc.b	1
	dc.b	$F4
	dc.b	$5A
	dc.b	'Continue',0,0
	dc.b	0
NORTHSTARVIRU.MSG:
	dc.b	'NORTH-STAR VIRUS'
SCAVIRUS.MSG:
	dc.b	'  SCA-VIRUS     '
BANDITVIRUS.MSG:
	dc.b	'  BANDIT-VIRUS  '
DASAVIRUSSYST.MSG:
	dc.b	'   DASA-VIRUS   '
SYSTEMNOTOKin.MSG:
	dc.b	'SYSTEM NOT OK. !'
intuitionlibr.MSG:
	dc.b	'intuition.library',0
doslibrary.MSG1:
	dc.b	'dos.library',0,0
	dc.b	0

	movem.l	D0/D1/A0/A1,-(SP)
	moveq	#0,D1
lbC0167DC:
	move.b	(A0)+,D0
	beq.w	lbC016824
	cmpi.w	#10,D0
	beq.w	lbC016802
	cmpi.w	#13,D0
	beq.w	lbC0167FA
lbC0167F2:
	jsr	$1AE5E4.L
	bra.s	lbC0167DC

lbC0167FA:
	addq.w	#1,D1
	cmpi.w	#$18,D1
	bne.s	lbC0167F2
lbC016802:
	moveq	#0,D1
	jsr	$1AEEA2.L
lbC01680A:
	jsr	$1A9780.L
	move.w	$1E269E.L,D0
	beq.s	lbC01680A
	tst.b	$1E26A1.L
	bne.w	lbC016824
	bra.s	lbC0167DC

lbC016824:
	movem.l	(SP)+,D0/D1/A0/A1
	rts

	movem.l	D0/D1/A0/A1,-(SP)
	lea	$1AC310.L,A1
	st	$1E2B34.L
	moveq	#0,D0
	move.w	#$FF,D1
lbC016840:
	tst.b	$1E26A1.L
	bne.w	lbC01687E
	lea	Registeroffse.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1AEE12.L
	lea	registername.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	A1,A0
	jsr	$1AB4A8.L
	jsr	lbC00F860(PC)
	movea.l	A0,A1
	jsr	$1AEECA.L
	addq.w	#2,D0
	dbra	D1,lbC016840
lbC01687E:
	sf	$1E2B34.L
	jsr	$1AEECA.L
	jsr	$1B06CA.L
	movem.l	(SP)+,D0/D1/A0/A1
	rts

	movem.l	D0/A0,-(SP)
	lea	$1AC310.L,A0
	lsr.w	#1,D0
lbC0168A2:
	subq.w	#1,D0
	bmi.w	lbC0168AE
	jsr	lbC00F860(PC)
	bra.s	lbC0168A2

lbC0168AE:
	jsr	$1AB4A8.L
	movem.l	(SP)+,D0/A0
	rts

	dc.b	'list of all amiga chipregisters:',$D
	dc.b	'================================',$D,0
Registeroffse.MSG:
	dc.b	'Register offset: ',0
registername.MSG:
	dc.b	' , register name: ',0

lbC016922:
	movem.l	D0/D1/A0/A6,-(SP)
	movea.l	4.W,A6
	clr.l	$2E(A6)
	clr.l	$2A(A6)
	clr.l	$32(A6)
	clr.l	$222(A6)
	clr.l	$226(A6)
	clr.l	$22A(A6)
	lea	$22(A6),A0
	clr.w	D0
	moveq	#$17,D1
lbC01694A:
	add.w	(A0)+,D0
	dbra	D1,lbC01694A
	not.w	D0
	move.w	D0,(A0)
	movem.l	(SP)+,D0/D1/A0/A6
	rts

lbC01695A:
	movem.l	D1-D7/A0-A6,-(SP)
	movea.l	4.L,A6
	movea.l	$2E(A6),A0
	jsr	$1BE87A.L
	bne.w	lbC016984
	movea.l	$226(A6),A0
	jsr	$1BE87A.L
	bne.w	lbC016984
	bra.w	lbC01699C

lbC016984:
	btst	#1,$1E2950.L
	beq.w	lbC016994
	bsr.w	lbC016922
lbC016994:
	moveq	#9,D0
lbC016996:
	movem.l	(SP)+,D1-D7/A0-A6
	rts

lbC01699C:
	moveq	#0,D0
	bra.s	lbC016996

	movem.l	D1/D2/A0/A1,-(SP)
	move.l	A0,D0
	beq.w	lbC0169E2
	moveq	#1,D0
	lea	-$400(A0),A0
	move.w	#$800,D1
	lea	$1E2848.L,A1
	move.l	#$646F732E,D2
lbC0169C0:
	move.b	(A0),(A1)
	move.b	1(A0),1(A1)
	move.b	2(A0),2(A1)
	move.b	3(A0),3(A1)
	addq.l	#1,A0
	cmp.l	(A1),D2
	beq.w	lbC0169E2
	dbra	D1,lbC0169C0
	moveq	#0,D0
lbC0169E2:
	movem.l	(SP)+,D1/D2/A0/A1
	tst.w	D0
	rts

lbC0169EA:
	movem.l	D1-D7/A0-A6,-(SP)
	jsr	$1B2DAC.L
	beq.w	lbC016A66
	moveq	#0,D0
	cmpi.l	#$1400,4.w
	bls.w	lbC016A22
	cmpi.l	#$C00000,4.w
	bls.w	lbC016A66
	cmpi.l	#$C01000,4.w
	bls.w	lbC016A22
	bra.w	lbC016A66

lbC016A22:
	bsr.w	lbC01695A
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
	bne.w	lbC016A66
lbC016A66:
	movem.l	(SP)+,D1-D7/A0-A6
	rts

	movem.l	D0/D1/A0,-(SP)
	move.w	#$200,$DFF096.L
	move.w	#$4000,$DFF09A.L
	jsr	$1B2078.L
	move.l	$1E2690.L,$68.w
	move.l	$1E2694.L,$6C.w
	bsr.w	lbC0169EA
	lea	Noknownvirusi.MSG(PC),A0
	jsr	$1B2078.L
	move.l	#$1A8686,$68.w
	move.l	#$1A868A,$6C.w
	move.w	#$C000,$DFF09A.L
	move.w	#$8200,$DFF096.L
	move.w	D0,D1
lbC016AC6:
	subq.w	#1,D0
	bmi.w	lbC016AD2
	jsr	lbC00F860(PC)
	bra.s	lbC016AC6

lbC016AD2:
	jsr	$1AB4A8.L
	tst.w	D1
	beq.w	lbC016B08
	lea	Virusinmemory.MSG(PC),A0
	jsr	$1AB4A8.L
	btst	#1,$1E2950.L
	beq.w	lbC016AFE
	lea	Virusinmemory.MSG0(PC),A0
	jsr	$1AB4A8.L
lbC016AFE:
	lea	Ifyourvirusis.MSG(PC),A0
	jsr	$1AB4A8.L
lbC016B08:
	jsr	$1B06CA.L
	movem.l	(SP)+,D0/D1/A0
	rts

	movem.l	D0/A0,-(SP)
	lea	Noknownvirusi.MSG(PC),A0
	move.b	$1E2AA1.L,D0
	beq.w	lbC016B3E
lbC016B26:
	bsr.w	lbC00F860
	subq.b	#1,D0
	bne.s	lbC016B26
	jsr	$1AB4A8.L
	lea	Virusatresetf.MSG(PC),A0
	jsr	$1AB4A8.L
lbC016B3E:
	movem.l	(SP)+,D0/A0
	rts

Noknownvirusi.MSG:
	dc.b	'No known virus in memory!',0
	dc.b	'Traveling Jack link-virus!',$D,0
	dc.b	'Centurion link-virus, check startup-sequence'
	dc.b	13
	dc.b	0
	dc.b	'Disater Master link-virus, check CLS in C: a'
	dc.b	'nd startup-sequence',$D,0
	dc.b	'Xeno link-virus, check files on your (hard)d'
	dc.b	'isk',$D,0
	dc.b	'Revenge ',0
	dc.b	'Revenge-Bootloader ',0
	dc.b	'Gadaffi ',0
	dc.b	'Maybe a Disk-Doctor ',0
	dc.b	'SCA like ',0
	dc.b	'Byte Warrior ',0
	dc.b	'IRQ (link-virus!) check 2nd file in s: or lo'
	dc.b	'ok at devs:',$D,0
	dc.b	'BSG-9 (link-virus!) check 1st file in s: or '
	dc.b	'look at dir-command',$D,0
	dc.b	'Lamer Exterminator ',0
	dc.b	'Byte Bandit ',0
	dc.b	'Library has changed (maybe a virus)',$D,0
	dc.b	'Reset-programm found which uses dos.library '
	dc.b	'(maybe a virus)',$D,0
Virusinmemory.MSG:
	dc.b	'Virus in memory found !!!!!',$D,0
Virusinmemory.MSG0:
	dc.b	'Virus in memory was killed (not Lamer/DiskDo'
	dc.b	'ctor)!',$D,0
Ifyourvirusis.MSG:
	dc.b	'If your virus is a bootblock-virus like:',$D
	dc.b	'SCA, Byte Bandit, Byte Warrior, Lamer Exterm'
	dc.b	'inator, Gadaffi, Disk Doctor',$D
	dc.b	'Install your bootdisk and check eventually o'
	dc.b	'ther disks.',$D
	dc.b	'Reboot with memory-clear option!',$D,0
Virusatresetf.MSG:
	dc.b	'Virus at reset found ! ! !',$D,0
trackdiskdevi.MSG:
	dc.b	'trackdisk.device',0

	movem.l	D1/A0-A2,-(SP)
	movea.l	A0,A2
	move.l	A1,D1
	move.l	(A2),D0
	beq.w	lbC016EDE
lbC016EC2:
	movea.l	D0,A2
	move.l	(A2),D0
	beq.w	lbC016EDE
	movea.l	10(A2),A0
	movea.l	D1,A1
lbC016ED0:
	cmpm.b	(A0)+,(A1)+
	bne.s	lbC016EC2
	tst.b	-1(A0)
	bne.s	lbC016ED0
	move.l	A2,D0
	movea.l	D1,A1
lbC016EDE:
	movem.l	(SP)+,D1/A0-A2
	rts

	movem.l	D0-D2/A0-A6,-(SP)
	lea	Execbasestruc.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	structlibrary.MSG(PC),A1
	lea	lbW017566(PC),A2
	movea.l	4.L,A6
lbC016F00:
	move.w	(A2)+,D2
	ext.l	D2
	bmi.w	lbC016FD0
	moveq	#$21,D0
	jsr	$1AE5E4.L
	moveq	#3,D1
	move.w	D2,D0
	jsr	$1B05D2.L
	jsr	$1AE598.L
	moveq	#5,D0
	jsr	$1AEEAE.L
	moveq	#$24,D0
	jsr	$1AE5E4.L
	move.w	D2,D0
	jsr	$1AE598.L
	moveq	#5,D0
	jsr	$1AEEAE.L
	moveq	#$24,D0
	jsr	$1AE5E4.L
	move.l	A6,D0
	add.l	D2,D0
	moveq	#6,D1
	jsr	$1AE598.L
	moveq	#5,D0
	jsr	$1AEEAE.L
	movea.l	A1,A0
	movea.l	A1,A5
	jsr	lbC00F860(PC)
	move.b	(A0)+,D0
	movea.l	A0,A1
	lea	0(A6,D2.W),A0
	cmpi.b	#1,D0
	bne.w	lbC016F8C
	jsr	$1ABF94.L
	jsr	$1A9A10.L
	moveq	#7,D0
	jsr	$1AEEAE.L
	bra.w	lbC016FBE

lbC016F8C:
	cmpi.b	#2,D0
	bne.w	lbC016FAC
	jsr	$1ADBB8.L
	jsr	$1AEE12.L
	moveq	#5,D0
	jsr	$1AEEAE.L
	bra.w	lbC016FBE

lbC016FAC:
	jsr	$1ADBFC.L
	jsr	$1B209E.L
	jsr	$1AEE96.L
lbC016FBE:
	movea.l	A5,A0
	jsr	$1AB4A8.L
	jsr	$1AEECA.L
	bra.w	lbC016F00

lbC016FD0:
	jsr	$1B06CA.L
	movem.l	(SP)+,D0-D2/A0-A6
	rts

lbC016FDC:
	movem.l	D1-D5/A0-A5,-(SP)
	move.w	D0,D3
	lea	structlibrary.MSG(PC),A0
	lea	lbW017566(PC),A1
	moveq	#0,D2
lbC016FEC:
	tst.w	(A1)
	bmi.w	lbC01706C
	cmp.w	(A1)+,D0
	beq.w	lbC016FFC
	addq.w	#1,D2
	bra.s	lbC016FEC

lbC016FFC:
	subq.w	#1,D2
	bmi.w	lbC01700A
	jsr	lbC00F860(PC)
	addq.w	#1,A0
	bra.s	lbC016FFC

lbC01700A:
	movea.l	A0,A1
	jsr	lbC00F860(PC)
	move.b	(A0),D1
	lea	$1E09D4.L,A3
	movea.l	4.L,A4
	suba.w	#$276,A4
	cmpi.b	#1,D1
	bne.w	lbC01703A
	move.b	0(A4,D3.W),D5
	cmp.b	0(A3,D3.W),D5
	beq.w	lbC01706C
	bra.w	lbC01705E

lbC01703A:
	cmpi.b	#2,D1
	bne.w	lbC017052
	move.w	0(A4,D3.W),D5
	cmp.w	0(A3,D3.W),D5
	beq.w	lbC01706C
	bra.w	lbC01705E

lbC017052:
	move.l	0(A4,D3.W),D5
	cmp.l	0(A3,D3.W),D5
	beq.w	lbC01706C
lbC01705E:
	movea.l	A1,A0
	jsr	$1AB4A8.L
	jsr	$1AEECA.L
lbC01706C:
	movem.l	(SP)+,D1-D5/A0-A5
	rts

Execbasestruc.MSG:
	dc.b	'Exec-base struct:',$D
	dc.b	'=================',$D
	dc.b	'offset (dec/hex)  address     value    name '
	dc.b	13
	dc.b	0
structlibrary.MSG:
	dc.b	'struct librarynode',0
	dc.b	4
	dc.b	'uword softver',0
	dc.b	2
	dc.b	'word lowmemchksum',0
	dc.b	2
	dc.b	'ulong chkbase',0
	dc.b	4
	dc.b	'aptr coldcapture (virus)',0
	dc.b	4
	dc.b	'aptr coolcapture (virus)',0
	dc.b	4
	dc.b	'aptr warmcapture (virus)',0
	dc.b	4
	dc.b	'aptr sysstkupper',0
	dc.b	4
	dc.b	'aptr sysstklower',0
	dc.b	4
	dc.b	'ulong maxlocmem',0
	dc.b	4
	dc.b	'aptr debugentry',0
	dc.b	4
	dc.b	'aptr debugdata',0
	dc.b	4
	dc.b	'aptr alertdata',0
	dc.b	4
	dc.b	'aptr maxextmem',0
	dc.b	4
	dc.b	'uword chksum',0
	dc.b	2
	dc.b	'int-tbe',0
	dc.b	4
	dc.b	'int-dskblk',0
	dc.b	4
	dc.b	'int-soft',0
	dc.b	4
	dc.b	'int-ports',0
	dc.b	4
	dc.b	'int-copper',0
	dc.b	4
	dc.b	'int-vertbank',0
	dc.b	4
	dc.b	'int-blitter',0
	dc.b	4
	dc.b	'int-audio0',0
	dc.b	4
	dc.b	'int-audio1',0
	dc.b	4
	dc.b	'int-audio2',0
	dc.b	4
	dc.b	'int-audio3',0
	dc.b	4
	dc.b	'int-rbf',0
	dc.b	4
	dc.b	'int-disksync',0
	dc.b	4
	dc.b	'int-extern',0
	dc.b	4
	dc.b	'int-intern',0
	dc.b	4
	dc.b	'int-nmi',0
	dc.b	4
	dc.b	'struct task *thistask',0
	dc.b	4
	dc.b	'ulong idlecount',0
	dc.b	4
	dc.b	'ulong dispcount',0
	dc.b	4
	dc.b	'uword quantum',0
	dc.b	2
	dc.b	'uword elapsed',0
	dc.b	2
	dc.b	'uword sysflags',0
	dc.b	2
	dc.b	'byte idnestcnt',0
	dc.b	1
	dc.b	'byte tdnestcnt',0
	dc.b	1
	dc.b	'uword attnflags',0
	dc.b	2
	dc.b	'uword attnresched',0
	dc.b	2
	dc.b	'aptr resmodules',0
	dc.b	4
	dc.b	'aptr tasktrapcode',0
	dc.b	4
	dc.b	'aptr taskexecptcode',0
	dc.b	4
	dc.b	'aptr taskexitcode',0
	dc.b	4
	dc.b	'ulong tasksigalloc',0
	dc.b	4
	dc.b	'uword tasktrapalloc',0
	dc.b	2
	dc.b	'struct list memlist',0
	dc.b	4
	dc.b	'struct list resourcelist',0
	dc.b	4
	dc.b	'struct list devicelist',0
	dc.b	4
	dc.b	'struct list intrlist',0
	dc.b	4
	dc.b	'struct list liblist',0
	dc.b	4
	dc.b	'struct list portlist',0
	dc.b	4
	dc.b	'struct list taskready',0
	dc.b	4
	dc.b	'struct list taskwait',0
	dc.b	4
	dc.b	'struct softintlist',0
	dc.b	4
	dc.b	'ulong lastalert',0
	dc.b	4
	dc.b	'ubyte vblankfrequency',0
	dc.b	1
	dc.b	'ubyte powersupplyfrequency',0
	dc.b	1
	dc.b	'struct list semaphorelist',0
	dc.b	4
	dc.b	'aptr kickmemptr (virus)',0
	dc.b	4
	dc.b	'aptr kicktagptr (virus)',0
	dc.b	4
	dc.b	'aptr kickchecksum (virus)',0
	dc.b	4
	dc.b	'ubyte execbase reserved(10)',0
	dc.b	4
	dc.b	'ubyte execbase newreserved(20)',0
	dc.b	4
lbW017566:
	dc.w	0
	dc.w	$22
	dc.w	$24
	dc.w	$26
	dc.w	$2A
	dc.w	$2E
	dc.w	$32
	dc.w	$36
	dc.w	$3A
	dc.w	$3E
	dc.w	$42
	dc.w	$46
	dc.w	$4A
	dc.w	$4E
	dc.w	$52
	dc.w	$54
	dc.w	$60
	dc.w	$6C
	dc.w	$78
	dc.w	$84
	dc.w	$90
	dc.w	$9C
	dc.w	$A8
	dc.w	$B4
	dc.w	$C0
	dc.w	$CC
	dc.w	$D8
	dc.w	$E4
	dc.w	$F0
	dc.w	$FC
	dc.w	$108
	dc.w	$114
	dc.w	$118
	dc.w	$11C
	dc.w	$120
	dc.w	$122
	dc.w	$124
	dc.w	$126
	dc.w	$127
	dc.w	$128
	dc.w	$12A
	dc.w	$12C
	dc.w	$130
	dc.w	$134
	dc.w	$138
	dc.w	$13C
	dc.w	$140
	dc.w	$142
	dc.w	$150
	dc.w	$15E
	dc.w	$16C
	dc.w	$17A
	dc.w	$188
	dc.w	$196
	dc.w	$1A4
	dc.w	$1B2
	dc.w	$202
	dc.w	$212
	dc.w	$213
	dc.w	$214
	dc.w	$222
	dc.w	$226
	dc.w	$22A
	dc.w	$22E
	dc.w	$238
	dc.w	$FFFF
	dc.w	$24
	dc.w	$26
	dc.w	$2A
	dc.w	$2E
	dc.w	$32
	dc.w	$3E
	dc.w	$42
	dc.w	$46
	dc.w	$4E
	dc.w	$52
	dc.w	$54
	dc.w	$12C
	dc.w	$142
	dc.w	$150
	dc.w	$15E
	dc.w	$222
	dc.w	$226
	dc.w	$22A
	dc.w	$FFFF

	clr.l	$1E269A.L
	move.w	#$F0,D0
	jsr	$1AEEAE.L
	clr.l	$1E269A.L
	lea	Pleaseenterno.MSG(PC),A0
	jsr	$1AB4A8.L
	st	$1E294E.L
	jsr	$1A9D80.L
	sf	$1E294E.L
	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
	move.l	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC0176C0
	lea	$5000.w,A0
	cmpi.l	#$10000,$1E2834.L
	bhi.w	lbC017674
	lea	$1ED468.L,A0
lbC017674:
	bsr.w	lbC01214E
	move.l	D1,D0
	lea	$1E26C8.L,A1
	bsr.w	lbC01394E
	bmi.w	lbC0176B4
	bsr.w	lbC0176CE
	bmi.w	lbC0176B4
	bsr.w	lbC017730
	bmi.w	lbC0176B4
	bsr.w	lbC01776C
	bmi.w	lbC0176B4
	bsr.w	lbC017786
	bmi.w	lbC0176B4
	bsr.w	lbC0177A0
	bmi.w	lbC0176B4
	bsr.w	lbC0139D8
lbC0176B4:
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	bpl.w	lbC0176C4
lbC0176C0:
	bsr.w	lbC012A96
lbC0176C4:
	bsr.w	lbC0122E0
	bsr.w	lbC0122E0
	rts

lbC0176CE:
	lea	$1E0916.L,A1
	move.l	#$464F524D,(A1)+
	clr.l	(A1)+
	move.l	#$38535658,(A1)+
	move.l	#$56484452,(A1)+
	move.l	#$14,(A1)+
	move.l	$1E2838.L,D1
	sub.l	$1E2834.L,D1
	move.l	D1,(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	move.l	#$369E9B,D0
	divu.w	$1E283C.L,D0
	move.w	D0,(A1)+
	move.w	#$100,(A1)+
	move.l	#$10000,(A1)+
	addi.l	#$72,D1
	lea	$1E0916.L,A2
	move.l	D1,4(A2)
	moveq	#$28,D0
	bsr.w	lbC013C80
	rts

lbC017730:
	lea	ANNO.MSG(PC),A2
	moveq	#$2E,D0
	bsr.w	lbC013C80
	rts

ANNO.MSG:
	dc.b	'ANNO',0,0
	dc.b	0
	dc.b	'(Ripped by Action Replay MK IV  - Amiga',0,0

lbC01776C:
	lea	ATAK.MSG(PC),A2
	moveq	#14,D0
	bsr.w	lbC013C80
	rts

ATAK.MSG:
	dc.b	'ATAK',0,0
	dc.b	0
	dc.b	6
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	1
	dc.b	0
	dc.b	0

lbC017786:
	lea	RLSE.MSG(PC),A2
	moveq	#14,D0
	bsr.w	lbC013C80
	rts

RLSE.MSG:
	dc.b	'RLSE',0,0
	dc.b	0
	dc.b	6
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	1
	dc.b	0
	dc.b	0

lbC0177A0:
	lea	$1E0916.L,A2
	move.l	#$424F4459,(A2)
	move.l	$1E2838.L,D1
	sub.l	$1E2834.L,D1
	move.l	D1,4(A2)
	moveq	#8,D0
	bsr.w	lbC013C80
	bmi.w	lbC0177D2
	movea.l	$1E2834.L,A2
	move.l	D1,D0
	bsr.w	lbC013C80
lbC0177D2:
	tst.w	D0
	rts

lbC0177D6:
	movem.l	D0-D2/A0,-(SP)
	lea	$8400.L,A0
	move.l	$1E2974.L,D2
	sub.l	A0,D2
	bsr.w	lbC012102
	move.l	D0,$1E2AEC.L
	move.l	D1,$1E2AF0.L
	move.l	A0,$1E2AE8.L
	lea	$C08400.L,A0
	move.l	$1E2978.L,D2
	beq.w	lbC017830
	sub.l	A0,D2
	bsr.w	lbC012102
	cmp.l	$1E2AEC.L,D0
	bls.w	lbC017830
	move.l	D0,$1E2AEC.L
	move.l	D1,$1E2AF0.L
	move.l	A0,$1E2AE8.L
lbC017830:
	tst.l	$1E2BC4.L
	beq.w	lbC017868
	movea.l	$1E2BC4.L,A0
	move.l	$1E2BC8.L,D2
	sub.l	A0,D2
	bsr.w	lbC012102
	cmp.l	$1E2AEC.L,D0
	bls.w	lbC017868
	move.l	D0,$1E2AEC.L
	move.l	D1,$1E2AF0.L
	move.l	A0,$1E2AE8.L
lbC017868:
	movem.l	(SP)+,D0-D2/A0
	st	$1E2AF6.L
	rts

	sf	$1E2834.L
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.w	D0,D1
	jsr	$1AF0E0.L
	moveq	#1,D2
	tst.b	$1E26AE.L
	beq.w	lbC0178A0
	move.w	D0,D2
lbC0178A0:
	subq.w	#1,D2
	move.w	D1,D3
	add.w	D2,D3
	cmpi.w	#$9F,D3
	bhi.w	lbC0138A2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0178DE
	bclr	#0,D0
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	st	$1E2834.L
	bra.w	lbC0179EA

lbC0178DE:
	tst.b	$1E2AF6.L
	bne.w	lbC0178EC
	bsr.w	lbC0177D6
lbC0178EC:
	move.l	$1E2AEC.L,D0
	divu.w	#$1600,D0
	cmp.w	D0,D2
	bls.w	lbC0179EA
	lea	Trackbufferho.MSG(PC),A0
	jsr	$1AB4A8.L
	andi.l	#$FFFF,D0
	jsr	$1B05D2.L
	move.l	D1,D3
	moveq	#3,D1
	jsr	$1AE598.L
	move.l	D3,D1
	tst.b	$1E2AFD.L
	bne.w	lbC01793E
	lea	tracksSuretok.MSG(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC01793E
	moveq	#-8,D0
	bra.w	lbC012A96

lbC01793E:
	st	$1E2AFD.L
	move.l	$1E2974.L,D0
	addi.l	#$C00000,D0
	cmp.l	$1E2978.L,D0
	bhi.w	lbC017972
	move.l	#$C08400,$1E2AE8.L
	move.l	$1E2978.L,$1E2AEC.L
	bra.w	lbC017986

lbC017972:
	move.l	#$8400,$1E2AE8.L
	move.l	$1E2974.L,$1E2AEC.L
lbC017986:
	move.l	$1E2AE8.L,D0
	sub.l	D0,$1E2AEC.L
	clr.l	$1E2AF0.L
	move.l	$1E2AEC.L,D0
	lsr.l	#2,D0
	movea.l	$1E2AE8.L,A0
lbC0179A6:
	clr.l	(A0)+
	subq.l	#1,D0
	bne.s	lbC0179A6
	move.l	$1E2AEC.L,D0
	divu.w	#$1600,D0
	cmp.w	D0,D2
	bls.w	lbC0179EA
	move.w	D0,D2
	lea	Canonlyreadam.MSG(PC),A0
	jsr	$1AB4A8.L
	andi.l	#$FFFF,D0
	jsr	$1B05D2.L
	move.l	D1,D3
	moveq	#3,D1
	jsr	$1AE598.L
	move.l	D3,D1
	lea	tracks.MSG(PC),A0
	jsr	$1AB4A8.L
lbC0179EA:
	tst.b	$1E2AF6.L
	beq.w	lbC017A58
	move.l	D1,D3
	lea	Trackbufferfr.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2AE8.L,D0
	jsr	$1A9A1C.L
	lea	to.MSG2(PC),A0
	jsr	$1AB4A8.L
	add.l	$1E2AEC.L,D0
	jsr	$1A9A1C.L
	lea	holding.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2AEC.L,D0
	divu.w	#$1600,D0
	ext.l	D0
	jsr	$1B05D2.L
	moveq	#3,D1
	jsr	$1AE598.L
	lea	tracks.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1AEECA.L
	move.l	D3,D1
lbC017A58:
	lea	$5000.w,A0
	bsr.w	lbC01214E
	tst.b	$1E2834.L
	bne.w	lbC017A80
	movea.l	$1E2AE8.L,A1
	move.b	D1,$1E2AF4.L
	move.w	D1,D0
	add.w	D2,D0
	move.b	D0,$1E2AF5.L
lbC017A80:
	bsr.w	lbC017A8E
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	rts

lbC017A8E:
	movem.l	D1-D7/A0-A6,-(SP)
	movea.l	A1,A2
lbC017A94:
	move.w	D1,D0
	jsr	$1BFAF0.L
	bsr.w	lbC012F7C
	bpl.w	lbC017B0A
	move.l	D0,-(SP)
	move.w	D1,D0
	bsr.w	lbC018170
	moveq	#4,D0
	jsr	$1AEEAE.L
	move.l	(SP)+,D0
	bsr.w	lbC012A9C
	jsr	$1AEECA.L
	cmpi.w	#$FFF8,D0
	beq.w	lbC017B02
	st	$1E2A9F.L
	move.w	D1,D0
	bsr.w	lbC012F7C
	bmi.w	lbC017AF0
	sf	$1E2A9F.L
	move.l	A0,-(SP)
	lea	butcouldberea.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	bra.w	lbC017B0A

lbC017AF0:
	sf	$1E2A9F.L
	adda.w	#$1600,A2
lbC017AFA:
	addq.w	#1,D1
	dbra	D2,lbC017A94
	moveq	#0,D0
lbC017B02:
	movem.l	(SP)+,D1-D7/A0-A6
	tst.w	D0
	rts

lbC017B0A:
	moveq	#10,D0
	lea	$1E29C2.L,A1
lbC017B12:
	movea.l	(A1)+,A3
	moveq	#$7F,D3
lbC017B16:
	move.l	(A3)+,(A2)+
	dbra	D3,lbC017B16
	dbra	D0,lbC017B12
	bra.s	lbC017AFA

Trackbufferho.MSG:
	dc.b	'Trackbuffer holds only !',0
tracksSuretok.MSG:
	dc.b	' tracks. Sure to kill running program? (y/n)'
	dc.b	13
	dc.b	0
Canonlyreadam.MSG:
	dc.b	'Can only read a maximum of !',0
tracks.MSG:
	dc.b	' tracks.',$D,0
butcouldberea.MSG:
	dc.b	' but could be read - data may be bad.',$D,0
Reading.MSG:
	dc.b	'Reading ',0
Destroying.MSG:
	dc.b	'Destroying ',0
Trackbufferfr.MSG:
	dc.b	'Trackbuffer from: ',0
to.MSG2:
	dc.b	' to: ',0
holding.MSG:
	dc.b	' holding !',0

lbC017BF0:
	movem.l	D0/D1,-(SP)
	jsr	$1AB4A8.L
	bsr.w	lbC018170
	clr.w	$1E269A.L
	movem.l	(SP)+,D0/D1
	rts

lbC017C0A:
	move.l	A0,-(SP)
	lea	Destroying.MSG(PC),A0
	bsr.s	lbC017BF0
	movea.l	(SP)+,A0
	rts

lbC017C16:
	move.l	A0,-(SP)
	lea	Reading.MSG(PC),A0
	bsr.s	lbC017BF0
	movea.l	(SP)+,A0
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D1
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	bclr	#0,D0
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	move.l	D2,D0
	mulu.w	#$1600,D0
	add.l	A1,D0
	cmpa.l	#$1D3082,A1
	bhi.w	lbC017C88
	cmpi.l	#$1A801E,D0
	bhi.w	lbC0138A2
lbC017C88:
	subq.w	#1,D2
	cmpi.w	#$9F,D1
	bhi.w	lbC0138A2
	move.w	D2,D3
	add.w	D1,D3
	cmpi.w	#$9F,D3
	bhi.w	lbC0138A2
	lea	$5000.w,A0
	bsr.w	lbC01214E
	bsr.w	lbC017CB6
	move.l	D0,-(SP)
	bsr.w	lbC0121AE
	move.l	(SP)+,D0
	bra.w	lbC012A96

lbC017CB6:
	movem.l	D1-D7/A0-A6,-(SP)
lbC017CBA:
	moveq	#9,D4
	movea.l	A1,A3
	movea.l	A0,A2
	moveq	#0,D3
lbC017CC2:
	clr.l	(A2)+
	move.b	#$FF,(A2)+
	move.b	D1,(A2)+
	move.b	D3,(A2)+
	clr.b	(A2)+
	moveq	#5,D0
lbC017CD0:
	clr.l	(A2)+
	dbra	D0,lbC017CD0
	moveq	#$7F,D0
lbC017CD8:
	move.l	(A1)+,(A2)+
	dbra	D0,lbC017CD8
	addq.w	#1,D3
	cmpi.w	#11,D3
	bne.s	lbC017CC2
	move.b	D1,$1E29B3.L
	move.b	$1E29B2.L,$1E29B4.L
lbC017CF6:
	movem.l	D0/A0,-(SP)
	lea	Writing.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
	move.b	D1,D0
	bsr.w	lbC018170
	clr.w	$1E269A.L
	movem.l	(SP)+,D0/A0
	bsr.w	lbC012FD4
	bpl.w	lbC017D44
	move.l	D0,-(SP)
	moveq	#0,D0
	move.w	D1,D0
	bsr.w	lbC018170
	moveq	#4,D0
	jsr	$1AEEAE.L
	move.l	(SP)+,D0
	bsr.w	lbC012A9C
	jsr	$1AEECA.L
	cmpi.w	#$FFF8,D0
	beq.w	lbC017D6C
lbC017D44:
	exg	A3,A1
	bsr.w	lbC017DA8
	exg	A3,A1
	bpl.w	lbC017D58
	dbra	D4,lbC017CF6
	bra.w	lbC017D6C

lbC017D58:
	addq.w	#1,D1
	moveq	#-8,D0
	tst.b	$1E26A1.L
	bne.w	lbC017D6C
	dbra	D2,lbC017CBA
	moveq	#0,D0
lbC017D6C:
	movem.l	(SP)+,D1-D7/A0-A6
	tst.w	D0
	rts

	dc.b	'Saving address must be greater than $8400',$D,0
Writing.MSG:
	dc.b	'Writing ',0

lbC017DA8:
	movem.l	D1/D2/A1-A3,-(SP)
	move.w	D1,D0
	movem.l	D0/A0,-(SP)
	lea	Vering.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
	move.b	D1,D0
	bsr.w	lbC018170
	clr.w	$1E269A.L
	movem.l	(SP)+,D0/A0
	sf	$1E2A9F.L
	bsr.w	lbC012F7C
	bmi.w	lbC017E00
	lea	$1E29C2.L,A2
	moveq	#10,D0
lbC017DE4:
	movea.l	(A2)+,A3
	move.w	#$1FF,D1
lbC017DEA:
	cmpm.b	(A1)+,(A3)+
	bne.w	lbC017E00
	dbra	D1,lbC017DEA
	dbra	D0,lbC017DE4
	moveq	#0,D0
	movem.l	(SP)+,D1/D2/A1-A3
	rts

lbC017E00:
	moveq	#-$1D,D0
	movem.l	(SP)+,D1/D2/A1-A3
	rts

Vering.MSG:
	dc.b	'Ver''ing ',0,0

	st	D2
	bra.w	lbC017E1A

	sf	D2
lbC017E1A:
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.w	D0,D4
	bmi.w	lbC0138A2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.w	D0,D5
	bmi.w	lbC0138A2
	cmpi.w	#3,D4
	bhi.w	lbC0138A2
	cmpi.w	#3,D5
	bhi.w	lbC0138A2
	moveq	#0,D6
	move.l	#$9F,D7
	moveq	#-13,D0
	btst	D4,$1E298F.L
	beq.w	lbC012A96
	btst	D5,$1E298F.L
	beq.w	lbC012A96
	sf	$1E294E.L
	move.l	$1E29F0.L,-(SP)
	tst.b	D2
	beq.w	lbC017E8C
	clr.l	$1E29F0.L
lbC017E8C:
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC017EAC
	move.b	(SP)+,$1E29B2.L
	move.l	(SP)+,$1E29F0.L
	st	$1E294E.L
	bra.w	lbC012A96

lbC017EAC:
	cmp.w	D4,D5
	beq.w	lbC017F50
	tst.b	$1E2AF6.L
	bne.w	lbC017EC0
	bsr.w	lbC0177D6
lbC017EC0:
	move.l	$1E2AEC.L,D0
	cmpi.l	#$1600,D0
	bls.w	lbC017F16
lbC017ED0:
	lea	$5000.w,A0
	bsr.w	lbC01214E
lbC017ED8:
	move.w	D6,D1
	moveq	#0,D2
	movea.l	$1E2AE8.L,A1
	move.b	D4,$1E29B2.L
	bsr.w	lbC017A8E
	bmi.w	lbC017EFE
	move.b	D5,$1E29B2.L
	bsr.w	lbC017CB6
	bpl.w	lbC017F0A
lbC017EFE:
	move.l	D0,-(SP)
	bsr.w	lbC0121AE
	move.l	(SP)+,D0
	tst.w	D0
	rts

lbC017F0A:
	addq.w	#1,D6
	cmp.w	D7,D6
	bls.s	lbC017ED8
	bsr.w	lbC0121AE
	rts

lbC017F16:
	tst.b	$1E2AFD.L
	bne.w	lbC017F30
	lea	Couldntfindfr.MSG(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	beq.w	lbC017F4C
lbC017F30:
	move.l	#$8400,$1E2AE8.L
	move.l	#$1600,$1E2AEC.L
	clr.l	$1E2AF0.L
	bra.s	lbC017ED0

lbC017F4C:
	moveq	#-8,D0
	rts

lbC017F50:
	move.b	$1E29B2.L,-(SP)
	move.b	D5,$1E29B2.L
	tst.b	$1E2AFD.L
	bne.w	lbC017F80
	lea	RunningProgra.MSG(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC017F80
	move.b	(SP)+,$1E29B2.L
	moveq	#-8,D0
	rts

lbC017F80:
	st	$1E2AFD.L
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	tst.l	$1E299A.L
	bne.w	lbC017FF8
	cmpi.l	#$100000,$1E299E.L
	beq.w	lbC017FF8
	moveq	#0,D1
	moveq	#$4F,D2
lbC017FAA:
	lea	Pleaseinserts.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC018112
	lea	$8400.L,A1
	lea	$5000.w,A0
	bsr.w	lbC017A8E
	bmi.w	lbC018080
	lea	Pleaseinsertd.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC018112
	lea	$5000.w,A0
	bsr.w	lbC017CB6
	bmi.w	lbC018080
	cmpi.w	#$50,D1
	beq.w	lbC017FF2
	moveq	#$50,D1
	moveq	#$4F,D2
	bra.s	lbC017FAA

lbC017FF2:
	moveq	#0,D0
	bra.w	lbC018080

lbC017FF8:
	lea	Pleaseinserts.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC018112
	lea	$5000.w,A0
	moveq	#0,D1
	moveq	#$4F,D2
	lea	$8400.L,A1
	bsr.w	lbC017A8E
	bmi.w	lbC018080
	lea	$80000.L,A1
	tst.l	$1E299A.L
	beq.w	lbC018032
	lea	$C00000.L,A1
lbC018032:
	moveq	#$50,D1
	moveq	#$4F,D2
	bsr.w	lbC017A8E
	bmi.w	lbC018080
	lea	Pleaseinsertd.MSG(PC),A0
	jsr	$1AB4A8.L
	bsr.w	lbC018112
	lea	$5000.w,A0
	lea	$8400.L,A1
	moveq	#0,D1
	moveq	#$4F,D2
	bsr.w	lbC017CB6
	bmi.w	lbC018080
	lea	$80000.L,A1
	tst.l	$1E299A.L
	beq.w	lbC018078
	lea	$C00000.L,A1
lbC018078:
	moveq	#$50,D1
	moveq	#$4F,D2
	bsr.w	lbC017CB6
lbC018080:
	lea	$5000.w,A0
	move.w	D0,-(SP)
	bsr.w	lbC0121AE
	move.w	(SP)+,D0
	move.b	(SP)+,$1E29B2.L
	tst.w	D0
	rts

RunningProgra.MSG:
	dc.b	'Running Program will be killed after copy. s'
	dc.b	'ure to copy? (y/n)',$D,0
Pleaseinserts.MSG:
	dc.b	'Please insert source disk',$D,0
Pleaseinsertd.MSG:
	dc.b	'Please insert destination disk',$D,0
	dc.b	0

lbC018112:
	jsr	$1A9780.L
	tst.w	$1E269E.L
	bne.s	lbC018112
lbC018120:
	jsr	$1A9780.L
	tst.w	$1E269E.L
	beq.s	lbC018120
	rts

Couldntfindfr.MSG:
	dc.b	'Couldn''t find free memory. Sure to kill run'
	dc.b	'ning program? (y/n)',$D,0

lbC018170:
	movem.l	D0/D1/A0,-(SP)
	lea	track.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	D0,-(SP)
	moveq	#0,D0
	move.w	(SP),D0
	lsr.w	#1,D0
	jsr	$1B05D2.L
	moveq	#2,D1
	jsr	$1AE598.L
	lea	head.MSG0(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
	move.w	(SP)+,D0
	andi.w	#1,D0
	moveq	#1,D1
	jsr	$1AE598.L
	movem.l	(SP)+,D0/D1/A0
	rts

track.MSG:
	dc.b	'track !',0
head.MSG0:
	dc.b	' head ',0,0

	move.l	(SP)+,$1E27E4.L
	clr.w	-(SP)
	bra.w	lbC0181DA

lbC0181D0:
	move.l	(SP)+,$1E27E4.L
	move.w	#$700,-(SP)
lbC0181DA:
	st	$1E2AFB.L
	jsr	$1A8B34.L
	move.w	SR,$1E27E0.L
	move.l	$80.W,$1E27D4.L
	move.l	$84.W,$1E27D8.L
	move.l	$88.W,$1E27DC.L
	move.l	lbL018226(PC),$80.w
	move.l	lbL01822A(PC),$84.w
	move.l	lbC01822E(PC),$88.w
	move.l	A0,-(SP)
	move.l	USP,A0
	move.l	#$80,-(A0)
	move.l	A0,USP
	movea.l	(SP)+,A0
	rte

lbL018226:
	dc.l	$390000
lbL01822A:
	dc.l	$BFD100

lbC01822E:
	bra.s	lbL018226

	bra.s	lbL018226

	move.l	$1E27D4.L,$80.w
	move.l	$1E27D8.L,$84.w
	move.l	$1E27DC.L,$88.w
	lea	6(SP),SP
	move.l	$1E27E4.L,-(SP)
	sf	$1E2AFB.L
	move.w	$1E27E0.L,SR
	rts

	sf	$1E2AFC.L
	sf	$1E294E.L
	move.b	$1E29B2.L,-(SP)
	move.b	$1E2995.L,$1E29B2.L
lbC01827E:
	jsr	$1A9780.L
	move.w	$1E269E.L,D0
	cmpi.w	#$8A,D0
	beq.w	lbC0182C4
	cmpi.w	#$8B,D0
	beq.w	lbC0182E0
	cmpi.w	#$8C,D0
	beq.w	lbC018306
	cmpi.w	#$8D,D0
	beq.w	lbC018370
	cmpi.w	#$8E,D0
	beq.w	lbC0183E2
	cmpi.w	#$8F,D0
	beq.w	lbC018440
	cmpi.w	#$93,D0
	beq.w	lbC0182D2
	bra.s	lbC01827E

lbC0182C4:
	st	$1E28AC.L
	move.b	(SP)+,$1E29B2.L
	rts

lbC0182D2:
	st	$1E294E.L
	move.b	(SP)+,$1E29B2.L
	rts

lbC0182E0:
	lea	$1E2608.L,A0
	movea.l	$30(A0),A0
	move.w	#15,D1
lbC0182EE:
	jsr	$1AF6C4.L
	jsr	$1AEEA2.L
	lea	$40(A0),A0
	dbra	D1,lbC0182EE
	bra.w	lbC0184D0

lbC018306:
	lea	lbC0163B6(PC),A1
	move.l	#$2A,D1
lbC018310:
	jsr	$1AEEA2.L
	lea	$5000.w,A0
	bsr.w	lbC01214E
	move.b	$1E29B2.L,-(SP)
	clr.b	$1E29B2.L
	bsr.w	lbC0162F8
	bpl.w	lbC01833E
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	bra.w	lbC018362

lbC01833E:
	bsr.w	lbC0121AE
	tst.w	D0
	bmi.w	lbC01835E
	lea	Normalbootblo.MSG(PC),A0
	cmpa.l	lbC0163B6(PC),A1
	beq.w	lbC018358
	lea	Virusprotecto.MSG(PC),A0
lbC018358:
	jsr	$1AB4A8.L
lbC01835E:
	bsr.w	lbC012A96
lbC018362:
	move.b	(SP)+,$1E29B2.L
	bsr.w	lbC0183B4
	bra.w	lbC01827E

lbC018370:
	lea	lbC0163E0(PC),A1
	move.l	#$3EC,D1
	bra.s	lbC018310

Normalbootblo.MSG:
	dc.b	'Normal bootblock installed',$D,0
Virusprotecto.MSG:
	dc.b	'Virus protector installed',$D,0
	dc.b	0

lbC0183B4:
	lea	$1E075E.L,A1
	movea.l	4.L,A0
	suba.w	#$276,A0
	move.w	#$12D,D1
lbC0183C8:
	move.l	(A1)+,D0
	jsr	$1ADBEA.L
	addq.l	#4,A0
	dbra	D1,lbC0183C8
	lea	Execbasehasbe.MSG(PC),A0
	jsr	$1AB4A8.L
	rts

lbC0183E2:
	bsr.s	lbC0183B4
	bra.w	lbC0182C4

Execbasehasbe.MSG:
	dc.b	'Execbase has been restored',$D,0
Bootblockchan.MSG:
	dc.b	13
	dc.b	'Bootblock changed following:',$D
	dc.b	'MEMORY: (0 - $80)',$D,0
execbase.MSG:
	dc.b	'execbase:',$D,0

lbC018440:
	lea	Bootblockchan.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#$1F,D2
	suba.l	A1,A1
	lea	$1E0C1A.L,A2
lbC018454:
	movea.l	A1,A0
	addq.w	#4,A1
	jsr	$1ADBFC.L
	cmp.l	(A2)+,D0
	beq.w	lbC018474
	move.l	A0,D0
	jsr	$1A9A1C.L
	moveq	#2,D0
	jsr	$1AEEAE.L
lbC018474:
	dbra	D2,lbC018454
	jsr	$1AEECA.L
	lea	execbase.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$1E075E.L,A4
	move.w	#$FD8A,D2
	movea.l	4.L,A3
	suba.w	#$276,A3
lbC01849C:
	movea.l	A4,A0
	addq.w	#1,A4
	jsr	$1ADBFC.L
	move.l	D0,D1
	movea.l	A3,A0
	addq.w	#1,A3
	jsr	$1ADBFC.L
	cmp.l	D0,D1
	beq.w	lbC0184BE
	move.w	D2,D0
	jsr	lbC016FDC(PC)
lbC0184BE:
	addq.w	#1,D2
	cmpi.w	#$244,D2
	ble.s	lbC01849C
	jsr	$1AEEA2.L
	bra.w	lbC0184D0

lbC0184D0:
	lea	$1ABA99.L,A0
	jsr	$1AB4A8.L
	bra.w	lbC01827E

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0184FC
	move.l	D0,$1E2B06.L
	sne	$1E2AFA.L
lbC0184FC:
	lea	Bootblockcode.MSG(PC),A0
	tst.l	$1E2AFA.L
	bne.w	lbC018512
	lea	Bootblockcode.MSG0(PC),A0
	bra.w	lbC01851A

lbC018512:
	bset	#2,$1E2950.L
lbC01851A:
	jsr	$1AB4A8.L
	tst.l	$1E2AFA.L
	beq.w	lbC018536
	move.l	$1E2B06.L,D0
	jsr	$1B209E.L
lbC018536:
	jsr	$1B06CA.L
	rts

Bootblockcode.MSG:
	dc.b	'Bootblockcode is now: ',0
Bootblockcode.MSG0:
	dc.b	'Bootblockcoder disabled',$D,0

	jsr	$1AF0E0.L
	move.l	$1E2B06.L,$1E2834.L
	tst.l	$1E26AE.L
	beq.w	lbC01858E
	move.l	D0,$1E2834.L
lbC01858E:
	lea	Suretoprotect.MSG(PC),A0
	jsr	$1AB4A8.L
	move.b	$1E29B2.L,D0
	moveq	#1,D1
	jsr	$1AE598.L
	lea	yn.MSG1(PC),A0
	jsr	$1AEE54.L
	tst.w	D0
	bne.w	lbC0185BC
	moveq	#-8,D0
	bra.w	lbC012A96

lbC0185BC:
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	moveq	#0,D0
	jsr	lbC012F16(PC)
	bmi.w	lbC0185EA
	addq.w	#8,A1
	move.l	$1E2834.L,D2
	eor.l	D2,(A1)
	eor.l	D2,-8(A1)
	st	$1E29B5.L
	jsr	lbC0121AE(PC)
	bra.w	lbC012A96

lbC0185EA:
	jsr	lbC012A96(PC)
	jsr	lbC0121AE(PC)
	bmi.w	lbC012A96
	rts

Suretoprotect.MSG:
	dc.b	'Sure to protect bootblock in drive DF',0
yn.MSG1:
	dc.b	':? (y/n)',$D,0

	bsr.w	lbC014D1E
	tst.w	D0
	beq.w	lbC0138A2
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	lea	$1E26C8.L,A1
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC014938
	bmi.w	lbC0186D4
	move.l	$1E2A88.L,D5
	beq.w	lbC0186D4
lbC018658:
	lea	$5000.w,A0
	lea	$1E2720.L,A2
	moveq	#1,D0
	bsr.w	lbC01453A
	bmi.w	lbC0186D4
	subq.w	#1,D5
	st	$1E2B34.L
	lea	$1E2720.L,A4
	move.b	(A4)+,D0
	cmpi.w	#9,D0
	bne.w	lbC0186A4
	move.w	$1E269A.L,D1
	addq.w	#7,D1
	andi.w	#$F8,D1
	sub.w	$1E269A.L,D1
	beq.w	lbC0186A4
	exg	D0,D1
	jsr	$1AEEAE.L
	exg	D0,D1
lbC0186A4:
	cmpi.w	#$20,D0
	blt.w	lbC0186B2
	jsr	$1AB4F6.L
lbC0186B2:
	jsr	$1AE5E4.L
	tst.b	$1E26A1.L
	bne.w	lbC0186C2
lbC0186C2:
	moveq	#-8,D0
	tst.b	$1E26A1.L
	bne.w	lbC0186D4
	tst.l	D5
	bne.s	lbC018658
	moveq	#0,D0
lbC0186D4:
	move.w	D0,D1
	lea	$5000.w,A0
	jsr	lbC0121AE(PC)
	move.w	D1,D0
	bsr.w	lbC012A96
	sf	$1E2B34.L
	move.b	(SP)+,$1E29B2.L
	rts

	movem.l	D0/A0/A1,-(SP)
	moveq	#0,D0
	moveq	#0,D1
	jsr	$1AEE1E.L
	cmpi.w	#$20,D0
	bne.w	lbC0187B4
	moveq	#$3F,D2
lbC01870A:
	sf	$1E2B33.L
	jsr	$1AEE1E.L
	st	$1E2B33.L
	tst.b	$1E26B3.L
	bne.w	lbC0187B4
	exg	A1,A0
	exg	D0,D1
	jsr	$1ABF94.L
	exg	D0,D1
	addq.l	#1,A0
	exg	A1,A0
	jsr	$1AB4F6.L
	cmpi.w	#$2E,D0
	bne.w	lbC01877C
	cmpi.w	#$1F,D1
	bls.w	lbC0187AA
	cmpi.w	#$7E,D1
	bhi.w	lbC0187AA
	cmpi.w	#$40,D1
	beq.w	lbC0187AA
	cmpi.w	#$5B,D1
	beq.w	lbC0187AA
	cmpi.w	#$5D,D1
	beq.w	lbC0187AA
	cmpi.w	#$7B,D1
	beq.w	lbC0187AA
	cmpi.w	#$7D,D1
	beq.w	lbC0187AA
lbC01877C:
	cmp.w	D0,D1
	beq.w	lbC0187AA
	cmpi.w	#$41,D0
	bcs.w	lbC01879C
	cmpi.w	#$5A,D0
	bhi.w	lbC01879C
	bclr	#5,D1
	cmp.w	D0,D1
	beq.w	lbC0187AA
lbC01879C:
	movea.l	A0,A2
	lea	-1(A1),A0
	jsr	$1AC0A8.L
	movea.l	A2,A0
lbC0187AA:
	dbra	D2,lbC01870A
	moveq	#0,D0
	bra.w	lbC0187B6

lbC0187B4:
	moveq	#-1,D0
lbC0187B6:
	movem.l	(SP)+,D0/A0/A1
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	bne.w	lbC0187D2
	move.b	$1E29B2.L,D0
lbC0187D2:
	btst	D0,$1E298F.L
	beq.w	lbC0138A2
	tst.w	D0
	bmi.w	lbC0138A2
	cmpi.w	#3,D0
	bhi.w	lbC0138A2
	tst.b	$1E2AF6.L
	bne.w	lbC0187F8
	jsr	lbC0177D6(PC)
lbC0187F8:
	cmpi.l	#$1A00,$1E2AEC.L
	bcs.w	lbC01886C
	move.b	$1E29B2.L,-(SP)
	move.b	D0,$1E29B2.L
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	move.w	#$9F,D4
	moveq	#0,D1
	sf	$1E294E.L
lbC018826:
	moveq	#0,D2
	lea	$5000.w,A0
	movea.l	$1E2AE8.L,A1
	bsr.w	lbC017C16
	bsr.w	lbC017A8E
	bpl.w	lbC01884A
	cmpi.w	#$FFF8,D0
	beq.w	lbC018852
	bsr.w	lbC012A96
lbC01884A:
	addq.w	#1,D1
	dbra	D4,lbC018826
	moveq	#0,D0
lbC018852:
	bsr.w	lbC012A96
	lea	$5000.w,A0
	jsr	lbC0121AE(PC)
	move.b	(SP)+,$1E29B2.L
	st	$1E294E.L
	rts

lbC01886C:
	bsr.w	lbC018878
	jsr	$1B06CA.L
	rts

lbC018878:
	move.l	A0,-(SP)
	lea	Outoffreememo.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	rts

Outoffreememo.MSG:
	dc.b	'Out of free memory error!',$D,0
	dc.b	0

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D1
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D3
	cmp.l	D1,D2
	bcs.w	lbC0138A2
	movea.l	D1,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	movea.l	D2,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
lbC018904:
	movea.l	D1,A0
	jsr	$1ABF94.L
	eor.b	D3,D0
	jsr	$1AC0A8.L
	addq.l	#1,D1
	cmp.l	D1,D2
	bgt.s	lbC018904
	jsr	$1B06CA.L
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D1
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	move.l	D0,D3
	cmp.l	D1,D2
	bcs.w	lbC0138A2
	movea.l	D1,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	movea.l	D2,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
lbC018982:
	movea.l	D1,A0
	jsr	$1ABF94.L
	add.b	D3,D0
	jsr	$1AC0A8.L
	addq.l	#1,D1
	cmp.l	D1,D2
	bgt.s	lbC018982
	jsr	$1B06CA.L
	rts

	st	$1E2834.L
	bra.w	lbC0189B0

	sf	$1E2834.L
lbC0189B0:
	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
	tst.w	D0
	bne.w	lbC0189CC
	moveq	#-14,D0
	bra.w	lbC012A96

lbC0189CC:
	move.l	D0,D2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0138A2
	exg	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	exg	D0,A1
	move.l	D0,D1
	sub.l	A1,D1
	bcs.w	lbC0138A2
	beq.w	lbC0138A2
	movea.l	A1,A2
	lea	$5000.w,A0
	bsr.w	lbC01214E
	lea	$1E26C8.L,A1
	move.l	D2,D0
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC01394E
	bmi.w	lbC018A6C
	move.l	D1,D5
lbC018A42:
	moveq	#$10,D4
	cmpi.l	#$10,D5
	bhi.w	lbC018A50
	move.l	D5,D4
lbC018A50:
	sub.l	D4,D5
	bsr.w	lbC018A8A
	bmi.w	lbC018A6C
	moveq	#-8,D0
	tst.b	$1E26A1.L
	bne.w	lbC018A6C
	tst.l	D5
	bne.s	lbC018A42
	moveq	#0,D0
lbC018A6C:
	move.w	D0,D1
	bsr.w	lbC0139D8
	move.b	(SP)+,$1E29B2.L
	tst.w	D1
	bpl.w	lbC018A80
	move.w	D1,D0
lbC018A80:
	bsr.w	lbC012A96
	bsr.w	lbC0121AE
	rts

lbC018A8A:
	movem.l	D1-D7/A1/A3-A6,-(SP)
	movea.l	A2,A4
	moveq	#5,D0
	lea	DCBDATAJ9.MSG(PC),A2
	tst.b	$1E2834.L
	bne.w	lbC018AA4
	lea	DATAJ9.MSG(PC),A2
lbC018AA4:
	jsr	lbC0145BE(PC)
	bmi.w	lbC018B1E
	movea.l	A0,A5
lbC018AAE:
	move.l	#$30303030,$1E27D4.L
	movea.l	A4,A0
	jsr	$1ABF94.L
	addq.l	#1,A0
	movea.l	A0,A4
	jsr	$1B05D2.L
	ror.w	#8,D0
	or.b	D0,$1E27D5.L
	clr.b	D0
	rol.w	#4,D0
	or.b	D0,$1E27D6.L
	clr.b	D0
	rol.w	#4,D0
	or.b	D0,$1E27D7.L
	lea	$1E27D5.L,A2
	moveq	#3,D0
	movea.l	A5,A0
	jsr	lbC0145BE(PC)
	bmi.w	lbC018B1E
	lea	J9.MSG(PC),A2
	moveq	#1,D0
	subq.w	#1,D4
	beq.w	lbC018B10
	jsr	lbC0145BE(PC)
	bmi.w	lbC018B1E
	movea.l	A0,A5
	bra.s	lbC018AAE

lbC018B10:
	addq.l	#1,A2
	jsr	lbC0145BE(PC)
	bmi.w	lbC018B1E
	movea.l	A4,A2
	moveq	#0,D0
lbC018B1E:
	movem.l	(SP)+,D1-D7/A1/A3-A6
	rts

DCBDATAJ9.MSG:
	dc.b	'DC.B '
DATAJ9.MSG:
	dc.b	'DATA '
J9.MSG:
	dc.b	',',$A

	tst.b	$1E2AF6.L
	bne.w	lbC018B3E
	bsr.w	lbC0177D6
lbC018B3E:
	lea	Diskmonbuffer.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2AE8.L,D0
	jsr	$1A9A1C.L
	lea	Diskmonbuffer.MSG0(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2AEC.L,D0
	add.l	$1E2AE8.L,D0
	jsr	$1A9A1C.L
	lea	Diskmonbuffer.MSG1(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2AEC.L,D0
	jsr	$1A9A1C.L
	jsr	$1B06CA.L
	rts

Diskmonbuffer.MSG:
	dc.b	'Disk-mon buffer  start: ',0
Diskmonbuffer.MSG1:
	dc.b	13
	dc.b	'Disk-mon buffer length: ',0
Diskmonbuffer.MSG0:
	dc.b	13
	dc.b	'Disk-mon buffer    end: ',0,0

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	bne.w	lbC018BF2
	move.b	$1E29B2.L,D0
lbC018BF2:
	btst	D0,$1E298F.L
	beq.w	lbC0138A2
	tst.w	D0
	bmi.w	lbC0138A2
	cmpi.w	#3,D0
	bhi.w	lbC0138A2
	lea	$DFF000.L,A5
	move.b	$1E29B2.L,-(SP)
	move.b	D0,$1E29B2.L
	bsr.w	lbC012228
	bmi.w	lbC018C98
	moveq	#0,D0
	sf	$1E294E.L
lbC018C2C:
	tst.b	$1E26A1.L
	bne.w	lbC018C96
	bsr.w	lbC017C0A
	bsr.w	lbC0123D2
	bsr.w	lbC0121FA
	btst	#3,$BFE001.L
	beq.w	lbC018CB4
	move.w	#$4000,$24(A5)
	move.w	#$7F00,$9E(A5)
	move.l	#$5000,$20(A5)
	move.w	#$C180,D5
	move.w	#2,$9C(A5)
	move.w	#$8010,$96(A5)
	move.w	D5,$24(A5)
	move.w	D5,$24(A5)
lbC018C7A:
	btst	#1,$1F(A5)
	beq.s	lbC018C7A
	move.w	#$4000,$24(A5)
	addq.w	#1,D0
	cmpi.w	#$F0,D0
	bne.s	lbC018C2C
	moveq	#0,D0
	bra.w	lbC018C98

lbC018C96:
	moveq	#-8,D0
lbC018C98:
	bsr.w	lbC01226E
	move.b	(SP)+,$1E29B2.L
	bsr.w	lbC012A96
	st	$1E294E.L
	move.w	#$10,$96(A5)
	rts

lbC018CB4:
	moveq	#-10,D0
	bra.s	lbC018C98

	lea	$1A8650.L,A0
	jsr	$1AB4A8.L
	jmp	$1B06CA.L

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	bne.w	lbC018CE0
	move.l	$1E276A.L,D0
lbC018CE0:
	tst.l	D0
	bne.w	lbC018CEC
	move.l	$1E2648.L,D0
lbC018CEC:
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC0138A2
	rts

	lea	$1E2B14.L,A0
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	$1E2bcc.L
	clr.l	$1E2BD0.L
	sf	$1E2B43.L
	sf	$1E2B00.L
	lea	$E80000.L,A0
	moveq	#$14,D1
lbC018D2C:
	move.w	(A0),D0
	andi.w	#$A000,D0
	cmpi.w	#$A000,D0
	bne.w	lbC018DF0
	move.w	2(A0),D0
	andi.w	#$7000,D0
	bne.w	lbC018DA6
	st	$1E2B00.L
	move.b	#$FF,$4C(A0)
	bra.w	lbC018DF0

lbC018D56:
	cmpi.w	#$6000,D0
	bne.w	lbC018DF0
	sf	$1E2B00.L
	sf	$1E2B43.L
	move.l	#$200000,$1E2B14.L
	move.l	#$200000,$1E2bcc.L
	move.l	#$1A801E,$1E2B18.L
	move.l	#$1A801E,$1E2BD0.L
	move.l	#$200000,$1E2B1C.L
	move.b	#$20,$48(A0)
	bra.w	lbC018DF0

lbC018DA6:
	cmpi.w	#$7000,D0
	bne.s	lbC018D56
	move.b	#$60,$48(A0)
	st	$1E2B00.L
	move.l	#$600000,$1E2B14.L
	move.l	#$600000,$1E2bcc.L
	move.l	#$A00000,$1E2B18.L
	move.l	#$A00000,$1E2BD0.L
	move.l	#$1A801E,$1E2B1C.L
	st	$1E2B43.L
lbC018DF0:
	move.b	#$FF,$4C(A0)
	dbra	D1,lbC018D2C
	bsr.w	lbC018EFC
	rts

	lea	$1E2B14.L,A0
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.l	$1E2bcc.L
	clr.l	$1E2BD0.L
	sf	$1E2B43.L
	sf	$1E2B00.L
	lea	$E80000.L,A0
	moveq	#$14,D1
lbC018E2C:
	move.w	(A0),D0
	andi.w	#$A000,D0
	cmpi.w	#$A000,D0
	bne.w	lbC018EF0
	move.w	2(A0),D0
	andi.w	#$7000,D0
	bne.w	lbC018EA6
	st	$1E2B00.L
	move.b	#$FF,$4C(A0)
	bra.w	lbC018EF0

lbC018E56:
	cmpi.w	#$6000,D0
	bne.w	lbC018EF0
	sf	$1E2B00.L
	sf	$1E2B43.L
	move.l	#$200000,$1E2B14.L
	move.l	#$200000,$1E2bcc.L
	move.l	#$1A801E,$1E2B18.L
	move.l	#$1A801E,$1E2BD0.L
	move.l	#$200000,$1E2B1C.L
	move.b	#$20,$48(A0)
	bra.w	lbC018EF0

lbC018EA6:
	cmpi.w	#$7000,D0
	bne.s	lbC018E56
	move.b	#$60,$48(A0)
	st	$1E2B00.L
	move.l	#$600000,$1E2B14.L
	move.l	#$600000,$1E2bcc.L
	move.l	#$A00000,$1E2B18.L
	move.l	#$A00000,$1E2BD0.L
	move.l	#$1A801E,$1E2B1C.L
	st	$1E2B43.L
lbC018EF0:
	move.b	#$FF,$4C(A0)
	dbra	D1,lbC018E2C
	rts

lbC018EFC:
	lea	$E80000.L,A0
	moveq	#$14,D1
	tst.b	$1E2B00.L
	beq.w	lbC018F60
lbC018F0E:
	move.w	(A0),D0
	andi.w	#$A000,D0
	cmpi.w	#$A000,D0
	bne.w	lbC018F56
	move.w	2(A0),D0
	andi.w	#$7000,D0
	bne.w	lbC018F32
	move.b	#$FF,$4C(A0)
	bra.w	lbC018F56

lbC018F32:
	cmpi.w	#$7000,D0
	bne.w	lbC018F44
	move.b	#$60,$48(A0)
	bra.w	lbC018F62

lbC018F44:
	cmpi.w	#$6000,D0
	bne.w	lbC018F56
	move.b	#$20,$48(A0)
	bra.w	lbC018F62

lbC018F56:
	move.b	#$FF,$4C(A0)
	dbra	D1,lbC018F0E
lbC018F60:
	rts

lbC018F62:
	move.b	#$FF,$4C(A0)
	dbra	D1,lbC018F62
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	sne	D4
	sf	$1E294E.L
	st	$1E2B2F.L
	lea	$DFF000.L,A5
	move.w	#$FF00,$34(A5)
	jsr	$1AED28.L
	lea	Megastickhand.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$1E2B4A.L,A0
	moveq	#4,D7
lbC018FAC:
	cmp.w	D0,D7
	beq.w	lbC018FC0
	move.w	D0,D7
	move.w	D0,$1E2B80.L
	jsr	$1C106A.L
lbC018FC0:
	tst.b	$1E26A1.L
	bne.w	lbC019020
	jsr	$1C0FC2.L
	tst.b	D4
	beq.w	lbC018FE0
	cmpi.w	#$1B,D0
	blt.w	lbC018FE0
	moveq	#-1,D0
lbC018FE0:
	tst.w	D0
	bpl.w	lbC019006
	move.w	$1E2698.L,D2
	cmpi.w	#$75,D2
	beq.w	lbC019020
	btst	#0,D2
	beq.s	lbC018FAC
	clr.b	0(A0,D6.W)
	jsr	$1C106A.L
	bra.s	lbC018FAC

lbC019006:
	move.w	$1E2698.L,D1
	btst	#0,D1
	beq.s	lbC018FAC
	move.b	D1,0(A0,D0.W)
	jsr	$1C106A.L
	move.w	D0,D6
	bra.s	lbC018FAC

lbC019020:
	st	$1E294E.L
	jsr	$1B06CA.L
	rts

Megastickhand.MSG:
	dc.b	'Megastickhandler: Press ESC to exit and acti'
	dc.b	'vate Megastick-handler',$D,$D
	dc.b	'Set direction and fire then press/release wa'
	dc.b	'nted key',$D
	dc.b	'To clear last key code press any key without'
	dc.b	' joystick direction',$D,0

	movem.l	D1/A0/A5,-(SP)
	lea	$DFF000.L,A5
	moveq	#0,D1
	btst	#7,$BFE001.L
	bne.w	lbC019102
	moveq	#9,D1
lbC019102:
	btst	#6,$16(A5)
	bne.w	lbC01910E
	moveq	#$12,D1
lbC01910E:
	lea	12(A5),A0
	jsr	$1C1034.L
	add.w	D0,D1
	cmpi.w	#4,D1
	bne.w	lbC019152
	moveq	#$1B,D1
	btst	#6,$BFE001.L
	bne.w	lbC019132
	moveq	#$24,D1
lbC019132:
	btst	#2,$16(A5)
	bne.w	lbC01913E
	moveq	#$2D,D1
lbC01913E:
	lea	10(A5),A0
	bsr.w	lbC01915A
	add.w	D0,D1
	cmpi.w	#$1F,D1
	bne.w	lbC019152
	moveq	#-1,D1
lbC019152:
	move.l	D1,D0
	movem.l	(SP)+,D1/A0/A5
	rts

lbC01915A:
	movem.l	D1/A0,-(SP)
	move.w	(A0),D1
	andi.w	#$303,D1
	moveq	#0,D0
	lea	lbW01917E(PC),A0
lbC01916A:
	cmp.w	(A0)+,D1
	beq.w	lbC019178
	addq.w	#1,D0
	cmpi.w	#8,D0
	bne.s	lbC01916A
lbC019178:
	movem.l	(SP)+,D1/A0
	rts

lbW01917E:
	dc.w	$200
	dc.w	$100
	dc.w	$103
	dc.w	$300
	dc.w	0
	dc.w	3
	dc.w	$301
	dc.w	1
	dc.w	2

	movem.l	D0-D4/A0/A6,-(SP)
	dc.w	$41FA
lbW019196:
	dc.w	$E4

	jsr	$1C34A6.L
	lea	lbW019286(PC),A0
	jsr	$1C34A6.L
	lea	lbW019292(PC),A0
	jsr	$1C34A6.L
	lea	lbB01929B(PC),A0
	jsr	$1C34A6.L
	lea	lbW0192A4(PC),A0
	jsr	$1C34A6.L
	lea	$1E2B4A.L,A0
	moveq	#5,D4
	lea	lbW019346(PC),A6
lbC0191D2:
	move.w	(A6)+,D0
	move.w	(A6)+,D1
	bsr.w	lbC01935E
	lea	9(A0),A0
	dbra	D4,lbC0191D2
	clr.w	$1E269A.L
	move.w	#$14,$1E269C.L
	lea	Joystickandfi.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1AEEAE.L
	clr.w	$1E269A.L
	move.w	$1E2B80.L,D0
	bpl.w	lbC01921E
	lea	Nodirectionor.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC019274

lbC01921E:
	lea	Player1.MSG(PC),A0
	cmpi.w	#$1B,D0
	bcs.w	lbC019232
	lea	Player2.MSG(PC),A0
	subi.w	#$1B,D0
lbC019232:
	jsr	$1AB4A8.L
	lea	NoFire.MSG(PC),A0
	cmpi.w	#9,D0
	bcs.w	lbC01925C
	subi.w	#9,D0
	lea	Fire0.MSG(PC),A0
	cmpi.w	#9,D0
	bcs.w	lbC01925C
	subi.w	#9,D0
	lea	Fire1.MSG(PC),A0
lbC01925C:
	jsr	$1AB4A8.L
	lea	upleft.MSG(PC),A0
	mulu.w	#11,D0
	lea	0(A0,D0.W),A0
	jsr	$1AB4A8.L
lbC019274:
	movem.l	(SP)+,D0-D4/A0/A6
	rts

lbW01927A:
	dc.w	$504
Player1.MSG:
	dc.b	'Player 1 ',0
lbW019286:
	dc.w	$2804
Player2.MSG:
	dc.b	'Player 2 ',0
lbW019292:
	dc.w	$170B
Fire0.MSG:
	dc.b	'Fire0 ',0
lbB01929B:
	dc.b	$17
	dc.b	$10
Fire1.MSG:
	dc.b	'Fire1 ',0
lbW0192A4:
	dc.w	$1706
NoFire.MSG:
	dc.b	'NoFire ',0
Joystickandfi.MSG:
	dc.b	'Joystick and fire position: ',$D,0
Nodirectionor.MSG:
	dc.b	'No direction or fire !',0
upleft.MSG:
	dc.b	'up-left   ',0
	dc.b	'up        ',0
	dc.b	'up-right  ',0
	dc.b	'left      ',0
	dc.b	'middle    ',0
	dc.b	'right     ',0
	dc.b	'down-left ',0
	dc.b	'down      ',0
	dc.b	'down-right',0
lbW019346:
	dc.w	5
	dc.w	5
	dc.w	5
	dc.w	10
	dc.w	5
	dc.w	15
	dc.w	$28
	dc.w	5
	dc.w	$28
	dc.w	10
	dc.w	$28
	dc.w	15

lbC01935E:
	movem.l	D0-D5/A0,-(SP)
	move.w	D0,$1E269A.L
	move.w	D1,$1E269C.L
	move.w	D0,D4
	move.w	D1,D5
	moveq	#2,D1
	moveq	#2,D2
lbC019376:
	moveq	#2,D3
lbC019378:
	move.b	(A0)+,D0
	jsr	$1AE598.L
	jsr	$1AEE96.L
	dbra	D3,lbC019378
	addq.w	#1,D5
	move.w	D4,$1E269A.L
	move.w	D5,$1E269C.L
	dbra	D2,lbC019376
	movem.l	(SP)+,D0-D5/A0
	rts

	lea	Megastickhand.MSG0(PC),A0
	tst.b	$1E2B2F.L
	beq.w	lbC0193B4
	lea	Megastickhand.MSG1(PC),A0
lbC0193B4:
	jsr	$1AB4A8.L
	sf	$1E2B2F.L
	jsr	$1B06CA.L
	rts

Megastickhand.MSG1:
	dc.b	'Megastickhandler removed!',$D,0
Megastickhand.MSG0:
	dc.b	'Megastickhandler is already removed!',$D,0
	dc.b	0

	lea	$1E2B4A.L,A0
	moveq	#$35,D0
lbC019412:
	clr.b	(A0)+
	dbra	D0,lbC019412
	lea	Joystickcodes.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

Joystickcodes.MSG:
	dc.b	'Joystickcodes cleared!',$D,0

	bsr.w	lbC014D1E
	tst.w	D0
	bne.w	lbC019452
	moveq	#-14,D0
	bra.w	lbC012A96

lbC019452:
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	lea	$1E26C8.L,A1
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC014938
	bmi.w	lbC0194AE
	cmpi.l	#$36,$1E2A88.L
	bne.w	lbC0194A2
	moveq	#$36,D0
	lea	$1E2B4A.L,A2
	bsr.w	lbC01453A
	bmi.w	lbC0194AE
	lea	Joystickcodes.MSG0(PC),A0
lbC019490:
	jsr	$1AB4A8.L
	st	$1E2B2F.L
	moveq	#0,D0
	bra.w	lbC0194AE

lbC0194A2:
	lea	Fileisnotajoy.MSG(PC),A0
	sf	$1E2B2F.L
	bra.s	lbC019490

lbC0194AE:
	move.w	D0,D1
	lea	$5000.w,A0
	jsr	lbC0121AE(PC)
	move.w	D1,D0
	bsr.w	lbC012A96
	move.b	(SP)+,$1E29B2.L
	rts

Joystickcodes.MSG0:
	dc.b	'Joystick codes loaded',$D,0
Fileisnotajoy.MSG:
	dc.b	'File is not a joystick code file',$D,0
	dc.b	0

	sf	$1E2B33.L
	bsr.w	lbC014D1E
	st	$1E2B33.L
	tst.w	D0
	bne.w	lbC01951C
	moveq	#-14,D0
	bra.w	lbC012A96

lbC01951C:
	move.l	D0,D2
	lea	$5000.w,A0
	jsr	lbC01214E(PC)
	lea	$1E26C8.L,A1
	move.l	D2,D0
	move.b	$1E29B2.L,-(SP)
	bsr.w	lbC01394E
	bmi.w	lbC01955C
	moveq	#$36,D0
	lea	$1E2B4A.L,A2
	bsr.w	lbC0145BE
	bmi.w	lbC01955C
	bsr.w	lbC0139D8
	lea	Joystickcodes.MSG1(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
lbC01955C:
	move.w	D0,D1
	lea	$5000.w,A0
	jsr	lbC0121AE(PC)
	move.w	D1,D0
	bsr.w	lbC012A96
	move.b	(SP)+,$1E29B2.L
	rts

Joystickcodes.MSG1:
	dc.b	'Joystick codes saved',$D,0

	movea.l	$F80004.L,A0
	move.w	#$2700,SR
	clr.l	4.L
	clr.l	0.L
	clr.l	$1E2718.L
	reset
	jmp	(A0)

	st	$1E2834.L
	bra.w	lbC0195BA

	sf	$1E2834.L
lbC0195BA:
	tst.b	$1E2A57.L
	bne.w	lbC0195CA
	jmp	$1B779E.L

lbC0195CA:
	moveq	#6,D0
	lea	lbC0195EC(PC),A0
	tst.b	$1E2834.L
	bne.w	lbC0195E0
	moveq	#4,D0
	lea	lbC0195F2(PC),A0
lbC0195E0:
	bsr.w	lbC0195F6
	jsr	$1B06CA.L
	rts

lbC0195EC:
	move.b	(A3),$11B(A5)
	move.w	(A0),-(A1)
lbC0195F2:
	move.b	(A4),$1B30(A5)
lbC0195F6:
	movem.l	D0/D1/A0,-(SP)
	subq.w	#1,D0
	move.w	D0,D1
lbC0195FE:
	move.b	(A0)+,D0
	jsr	$1B770E.L
	dbra	D1,lbC0195FE
	movem.l	(SP)+,D0/D1/A0
	rts

	tst.b	$1E2A57.L
	bne.w	lbC019620
	jmp	$1B779E.L

lbC019620:
	sf	$1E2B33.L
	jsr	$1AB44E.L
	st	$1E2B33.L
	tst.w	D0
	beq.w	lbC0138A2
	lea	$1E26C8.L,A0
	bsr.s	lbC0195F6
	jsr	$1B06CA.L
	rts

lbC019648:
	movem.l	D1/D6/A1/A3/A4,-(SP)
	clr.l	(A2)
	bsr.w	lbC012F16
	bmi.s	lbC01967A
	movea.l	A2,A3
	lea	$18(A1),A1
	moveq	#$47,D0
lbC01965C:
	move.l	(A1)+,(A3)+
	dbra	D0,lbC01965C
	exg	A3,A2
	movea.l	A2,A4
	clr.l	(A2)
	moveq	#0,D7
	moveq	#$47,D6
lbC01966C:
	move.l	(A3)+,D1
	bne.s	lbC019682
lbC019670:
	dbra	D6,lbC01966C
	moveq	#0,D0
	subq.w	#1,D7
	movea.l	A4,A2
lbC01967A:
	tst.w	D0
	movem.l	(SP)+,D1/D6/A1/A3/A4
	rts

lbC019682:
	move.l	D1,D0
	bsr.w	lbC012F16
	bmi.s	lbC01967A
	cmpi.l	#2,(A1)
	bne.s	lbC019670
	cmpi.l	#$FFFFFFFD,$1FC(A1)
	beq.s	lbC0196AA
	cmpi.l	#2,$1FC(A1)
	bne.s	lbC019670
	bset	#$1F,D1
lbC0196AA:
	move.l	D1,(A2)+
	move.l	A1,-(SP)
	lea	$1B0(A1),A1
	move.b	D7,(A2)+
	addq.w	#1,D7
	moveq	#0,D0
	move.b	(A1)+,D0
	subq.w	#1,D0
lbC0196BC:
	move.b	(A1)+,(A2)+
	dbra	D0,lbC0196BC
	clr.b	(A2)+
	move.l	A2,D0
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	movea.l	D0,A2
	clr.l	(A2)
	movea.l	(SP)+,A1
	move.l	$1F0(A1),D1
	beq.s	lbC019670
	bra.s	lbC019682

lbL0196DA:
	dc.l	$20002
	dc.l	$190002
	dc.l	2
	dc.l	$40019
	dc.l	$40000
	dc.l	$20006
	dc.l	$190006
	dc.l	2
	dc.l	$80019
	dc.l	$80000
	dc.l	$2000A
	dc.l	$19000A
	dc.l	2
	dc.l	$C0019
	dc.l	$C0000
	dc.l	$2000E
	dc.l	$19000E
	dc.l	2
	dc.l	$100019
	dc.l	$100000
	dc.l	$20013
	dc.l	$30013
	dc.l	$303A0000
	dc.l	$70013
	dc.l	$80013
	dc.l	$313A0000
	dc.l	$C0013
	dc.l	$D0013
	dc.l	$323A0000
	dc.l	$110013
	dc.l	$120013
	dc.l	$333A0000
	dc.l	$160013
	dc.l	$160013
	dc.l	$3C000019
	dc.l	$130019
	dc.l	$133E00
	dc.l	$20016
	dc.l	$70016
	dc.l	$20204F4B
	dc.l	11
	dc.l	$160010
	dc.l	$165061
	dc.l	$72656E74
	dc.l	$14
	dc.l	$160019
	dc.l	$164361
	dc.l	$6E63656C
	dc.l	$1E
	dc.l	$16004E
	dc.l	$164E61
	dc.l	$6D653A20
	dc.l	1
	dc.l	$1001A
	dc.l	$170000
	dc.l	$1E0013
	dc.l	$4E0013
	dc.l	$50617468
	dc.l	$3A200000
	dc.w	0

lbC0197C8:
	clr.b	$1E26C8.L
lbC0197CE:
	movem.l	D1-D7/A0-A6,-(SP)
	move.l	$1E2848.L,-(SP)
	move.b	$1E29B2.L,-(SP)
	lea	$1E8468.L,A0
	jsr	lbC01214E(PC)
	move.b	$1E2988.L,$1E2B3C.L
	beq.w	lbC019808
	move.w	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	bra.w	lbC01980E

lbC019808:
	jsr	$1B5B12.L
lbC01980E:
	lea	lbL0196DA(PC),A6
	exg	A0,A6
	jsr	$1B5A98.L
	move.l	#$240016,$1E269A.L
	move.l	A0,-(SP)
	lea	$1E26C8.L,A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	clr.w	$1E2B86.L
	move.w	#$FFFF,$1E2B88.L
	move.l	$1E2AA2.L,$1E2B82.L
	lea	$1E2AA6.L,A1
	moveq	#0,D0
	move.b	$1E29B2.L,D0
	tst.b	0(A1,D0.W)
	bne.s	lbC01986A
	move.l	#$370,$1E2B82.L
lbC01986A:
	jsr	$1C1ADC.L
	jsr	$1C1A44.L
	move.l	$1E2B82.L,D0
	lea	$1E075E.L,A2
	exg	A0,A6
	bsr.w	lbC019648
	exg	A0,A6
	tst.w	D0
	bpl.s	lbC019892
	bsr.w	lbC019B4C
lbC019892:
	jsr	lbC012290(PC)
	bsr.w	lbC019C44
lbC01989A:
	jsr	$1B5C54.L
	tst.l	D0
	bmi.s	lbC01989A
	tst.w	D0
	bpl.w	lbC0198B8
	neg.w	D0
	cmpi.w	#$45,D0
	beq.w	lbC019960
	bra.w	lbC019904

lbC0198B8:
	cmpi.w	#$11,D0
	bhi.s	lbC01989A
	bsr.w	lbC019C44
	cmpi.w	#$10,D0
	beq.w	lbC019960
	cmpi.w	#7,D0
	bls.w	lbC019982
	cmpi.w	#11,D0
	bls.w	lbC019A44
	cmpi.w	#12,D0
	beq.w	lbC019A6E
	cmpi.w	#13,D0
	beq.w	lbC019A8A
	cmpi.w	#14,D0
	beq.w	lbC019AD0
	cmpi.w	#15,D0
	beq.w	lbC019AAA
	cmpi.w	#$11,D0
	beq.w	lbC019932
	bra.s	lbC019892

lbC019904:
	moveq	#$2B,D6
	moveq	#$4F,D3
	move.l	#$240016,D7
	move.l	A1,-(SP)
	lea	$1E26C8.L,A1
	jsr	$1C1C42.L
	tst.b	(A1)
	movem.l	(SP)+,A1
	beq.w	lbC019892
	move.w	#$FFFF,$1E2B88.L
	bra.w	lbC019AD0

lbC019932:
	moveq	#$2B,D6
	moveq	#$4F,D3
	move.l	#$240016,D7
	move.l	A1,-(SP)
	lea	$1E26C8.L,A1
	jsr	$1C1C66.L
	tst.b	(A1)
	movem.l	(SP)+,A1
	beq.w	lbC019892
	move.w	#$FFFF,$1E2B88.L
	bra.w	lbC019AD0

lbC019960:
	tst.b	$1E2B3C.L
	bne.w	lbC019970
	jsr	$1B5BF8.L
lbC019970:
	exg	A0,A6
	lea	$1E8468.L,A0
	jsr	lbC0121AE(PC)
	moveq	#0,D0
	bra.w	lbC019B20

lbC019982:
	move.w	$1E2B86.L,D1
	add.w	D0,D1
	cmp.w	D7,D1
	bhi.w	lbC019892
	cmp.w	$1E2B88.L,D1
	beq.w	lbC019AD0
	move.w	D1,$1E2B88.L
	movea.l	A2,A1
lbC0199A2:
	cmp.b	4(A1),D1
	beq.s	lbC0199BA
	addq.l	#5,A1
lbC0199AA:
	tst.b	(A1)+
	bne.s	lbC0199AA
	exg	D0,A1
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A1
	bra.s	lbC0199A2

lbC0199BA:
	move.l	(A1),D0
	bmi.w	lbC019A06
	move.l	D0,D1
	lea	5(A1),A1
	lea	$1E26C8.L,A3
lbC0199CC:
	move.b	(A1)+,(A3)+
	bne.s	lbC0199CC
	lea	$1E26C8.L,A3
	clr.b	$2B(A3)
	exg	A0,A3
	move.l	#$240016,$1E269A.L
	moveq	#$2B,D0
	jsr	$1AEEAE.L
	move.l	#$240016,$1E269A.L
	jsr	$1AB4A8.L
	exg	A0,A3
	move.l	D1,D0
	bpl.w	lbC019892
lbC019A06:
	clr.w	$1E2B86.L
	move.w	#$FFFF,$1E2B88.L
	bclr	#$1F,D0
	move.l	D0,$1E2B82.L
	clr.l	(A2)
	move.l	D0,D1
	jsr	$1C1ADC.L
	bmi.w	lbC019A3C
	move.l	D1,D0
	lea	$1E075E.L,A2
	exg	A0,A6
	bsr.w	lbC019648
	exg	A0,A6
lbC019A3C:
	bsr.w	lbC019B4C
	bra.w	lbC019892

lbC019A44:
	subq.w	#8,D0
	btst	D0,$1E298F.L
	beq.w	lbC019892
	st	$1E29B3.L
	move.b	D0,$1E29B2.L
	jsr	$1C1A44.L
	bmi.w	lbC019892
	move.l	#$370,D0
	bra.s	lbC019A06

lbC019A6E:
	tst.w	$1E2B86.L
	beq.w	lbC019892
	move.w	#$FFFF,$1E2B88.L
	subq.w	#8,$1E2B86.L
	bra.w	lbC019892

lbC019A8A:
	move.w	$1E2B86.L,D0
	addq.w	#8,D0
	cmp.w	D7,D0
	bhi.w	lbC019892
	move.w	#$FFFF,$1E2B88.L
	move.w	D0,$1E2B86.L
	bra.w	lbC019892

lbC019AAA:
	exg	A0,A6
	move.l	$1E2B82.L,D0
	bsr.w	lbC012F16
	bpl.s	lbC019AC2
	exg	A0,A6
	bsr.w	lbC019B4C
	bra.w	lbC019892

lbC019AC2:
	exg	A0,A6
	move.l	$1F4(A1),D0
	beq.w	lbC019892
	bra.w	lbC019A06

lbC019AD0:
	moveq	#0,D0
	lea	$1E26C8.L,A2
	moveq	#-1,D0
lbC019ADA:
	addq.l	#1,D0
	move.b	(A2),D1
	cmpi.w	#$60,D1
	bls.w	lbC019AFC
	cmpi.w	#$7A,D1
	bhi.w	lbC019AFC
	tst.b	$1E2B33.L
	beq.w	lbC019AFC
	subi.w	#$20,D1
lbC019AFC:
	move.b	D1,(A2)+
	bne.s	lbC019ADA
	tst.b	$1E2B3C.L
	bne.w	lbC019B10
	jsr	$1B5BF8.L
lbC019B10:
	exg	A6,A0
	move.l	D0,-(SP)
	lea	$1E8468.L,A0
	jsr	lbC0121AE(PC)
	move.l	(SP)+,D0
lbC019B20:
	move.l	$1E2B82.L,$1E2AA2.L
	moveq	#0,D1
	move.b	$1E29B2.L,D1
	lea	$1E2AA6.L,A0
	st	0(A0,D1.W)
	lea	2(SP),SP
	move.l	(SP)+,$1E2848.L
	movem.l	(SP)+,D1-D7/A0-A6
	rts

lbC019B4C:
	move.l	$1E269A.L,-(SP)
	move.l	#$280002,$1E269A.L
	jsr	lbC012A9C(PC)
	move.l	(SP)+,$1E269A.L
	tst.w	D0
	rts

	exg	A6,A0
	sf	$1E2A9C.L
	jsr	lbC014392(PC)
	exg	A6,A0
	tst.w	D0
	bmi.s	lbC019B4C
	jsr	lbC0149E4(PC)
	move.l	D0,D2
	jsr	$1B05D2.L
	move.l	$1E269A.L,-(SP)
	move.l	#$230005,$1E269A.L
	moveq	#4,D1
	jsr	$1AE598.L
	move.l	A0,-(SP)
	lea	blocksfree.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	#$6E0,D0
	sub.l	D2,D0
	mulu.w	#$3E8,D0
	divu.w	#$6E0,D0
	ext.l	D0
	jsr	$1B05D2.L
	roxr.l	#4,D0
	moveq	#2,D1
	cmpi.w	#$100,D0
	bne.w	lbC019BD2
	moveq	#3,D1
lbC019BD2:
	jsr	$1AE598.L
	move.w	#$2E,D0
	jsr	$1AE5E4.L
	roxl.l	#4,D0
	moveq	#1,D1
	jsr	$1AE598.L
	lea	ofdiskused.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	move.l	(SP)+,$1E269A.L
	moveq	#0,D0
	rts

	move.l	A0,-(SP)
	move.l	$1E2AA2.L,-(SP)
	move.l	$1E2B82.L,$1E2AA2.L
	move.l	#$240013,$1E269A.L
	moveq	#$2B,D0
	jsr	$1AEEAE.L
	move.l	#$240013,$1E269A.L
	exg	A0,A6
	jsr	lbC014B46(PC)
	exg	A0,A6
	move.l	(SP)+,$1E2AA2.L
	movea.l	(SP)+,A0
	tst.w	D0
	rts

lbC019C44:
	lea	lbL0196DA(PC),A0
	movem.l	D0-D2/A0-A2,-(SP)
	moveq	#3,D1
	moveq	#11,D0
lbC019C50:
	btst	D1,$1E298F.L
	bne.w	lbC019C60
	jsr	$1B5E4C.L
lbC019C60:
	subq.w	#1,D0
	dbra	D1,lbC019C50
	movea.l	A2,A1
lbC019C68:
	tst.l	(A1)
	beq.w	lbC019C90
	addq.l	#4,A1
	move.w	$1E2B86.L,D0
	cmp.b	(A1)+,D0
	beq.w	lbC019C8C
lbC019C7C:
	tst.b	(A1)+
	bne.s	lbC019C7C
	exg	D0,A1
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A1
	bra.s	lbC019C68

lbC019C8C:
	lea	-5(A1),A1
lbC019C90:
	move.l	$1E269A.L,-(SP)
	move.l	#$20002,$1E269A.L
	moveq	#0,D2
lbC019CA2:
	lea	ascii.MSG16(PC),A0
	tst.l	(A1)
	beq.w	lbC019D42
	bmi.w	lbC019CB4
	lea	ascii.MSG17(PC),A0
lbC019CB4:
	moveq	#0,D1
	lea	4(A1),A1
	move.b	(A1)+,D1
	cmp.w	$1E2B88.L,D1
	beq.w	lbC019CF4
	jsr	$1AB4A8.L
	movea.l	A1,A0
	move.b	$15(A0),-(SP)
	clr.b	$15(A0)
	move.l	$1E269A.L,-(SP)
	moveq	#$15,D0
	jsr	$1AEEAE.L
	move.l	(SP)+,$1E269A.L
	jsr	$1AB4A8.L
	move.b	(SP)+,$15(A0)
lbC019CF4:
	addq.w	#2,$1E269C.L
	move.w	#2,$1E269A.L
	clr.l	$1E26A8.L
	cmp.w	$1E2B88.L,D1
	bne.w	lbC019D1E
	move.w	D2,D0
	lea	lbL0196DA(PC),A0
	jsr	$1B5E20.L
lbC019D1E:
	tst.b	(A1)+
	bne.s	lbC019D1E
	exg	D0,A1
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A1
lbC019D2C:
	addq.w	#1,D2
	cmpi.w	#7,D2
	bls.w	lbC019CA2
	move.l	(SP)+,$1E269A.L
	movem.l	(SP)+,D0-D2/A0-A2
	rts

lbC019D42:
	moveq	#$18,D0
	jsr	$1AEEAE.L
	addq.w	#2,$1E269C.L
	move.w	#2,$1E269A.L
	clr.l	$1E26A8.L
	bra.s	lbC019D2C

ascii.MSG16:
	dc.b	'(*)',0
ascii.MSG17:
	dc.b	'   ',0

	movem.l	D0-D7/A0-A3,-(SP)
	lsl.b	#1,D0
	not.b	D0
	bset	#0,D0
	move.w	D0,$1E2698.L
	jsr	$1A97BC.L
	clr.w	$1E2698.L
	movea.l	D0,A3
	bra.w	lbC019D92

lbC019D8C:
	movem.l	D0-D7/A0-A3,-(SP)
	suba.l	A3,A3
lbC019D92:
	jsr	$1C1F58.L
	st	$1E294E.L
	move.l	$1E269A.L,-(SP)
	move.l	D7,$1E269A.L
	move.l	D7,$1E26A8.L
	moveq	#0,D4
	moveq	#0,D2
lbC019DB4:
	move.l	$1E269A.L,-(SP)
	move.l	D7,$1E269A.L
	move.w	D6,D0
	jsr	$1AEEAE.L
	move.l	D7,$1E269A.L
	movea.l	A1,A0
	lea	0(A0,D2.W),A0
	move.b	0(A0,D6.W),-(SP)
	clr.b	0(A0,D6.W)
	jsr	$1AB4A8.L
	move.b	(SP)+,0(A0,D6.W)
	move.l	(SP)+,$1E269A.L
	jsr	$1A8DFC.L
	movea.l	A1,A0
	moveq	#-1,D5
lbC019DF6:
	addq.w	#1,D5
	tst.b	(A0)+
	bne.s	lbC019DF6
lbC019DFC:
	move.l	A3,D0
	beq.w	lbC019E08
	suba.l	A3,A3
	bra.w	lbC019E12

lbC019E08:
	jsr	$1A9780.L
	tst.w	D0
	beq.s	lbC019DFC
lbC019E12:
	cmpi.w	#$1F,D0
	bls.w	lbC019E62
	cmpi.w	#$7F,D0
	bls.w	lbC019E2A
	cmpi.w	#$9F,D0
	bls.w	lbC019E62
lbC019E2A:
	cmp.w	D3,D5
	beq.s	lbC019DB4
	movea.l	A1,A0
	move.w	D3,D1
lbC019E32:
	move.b	-1(A0,D1.W),0(A0,D1.W)
	subq.w	#1,D1
	cmp.w	D4,D1
	bne.s	lbC019E32
	clr.b	0(A0,D3.W)
	move.b	D0,0(A0,D4.W)
	addq.w	#1,D4
	move.w	D2,D0
	add.w	D6,D0
	cmp.w	D0,D4
	bls.w	lbC019E58
	addq.w	#1,D2
	bra.w	lbC019DB4

lbC019E58:
	addq.w	#1,$1E269A.L
	bra.w	lbC019DB4

lbC019E62:
	cmpi.w	#13,D0
	beq.w	lbC019F1A
	cmpi.w	#8,D0
	beq.w	lbC019E8E
	cmpi.w	#$84,D0
	beq.w	lbC019EBC
	cmpi.w	#$82,D0
	beq.w	lbC019EDA
	cmpi.w	#$83,D0
	beq.w	lbC019EF8
	bra.w	lbC019DB4

lbC019E8E:
	tst.w	D4
	beq.w	lbC019DB4
	move.w	D4,D0
	movea.l	A1,A0
lbC019E98:
	move.b	0(A0,D0.W),-1(A0,D0.W)
	addq.w	#1,D0
	cmp.w	D3,D0
	bls.s	lbC019E98
	subq.w	#1,D4
	cmp.w	D2,D4
	bge.w	lbC019EB2
	subq.w	#1,D2
	bra.w	lbC019DB4

lbC019EB2:
	subq.w	#1,$1E269A.L
	bra.w	lbC019DB4

lbC019EBC:
	cmp.w	D5,D4
	bcc.w	lbC019DB4
	addq.w	#1,D4
	move.w	D2,D0
	add.w	D6,D0
	cmp.w	D0,D4
	bls.w	lbC019ED2
	addq.w	#1,D2
	bra.s	lbC019E8E

lbC019ED2:
	addq.w	#1,$1E269A.L
	bra.s	lbC019E8E

lbC019EDA:
	tst.w	D4
	beq.w	lbC019DB4
	subq.w	#1,D4
	cmp.w	D2,D4
	bge.w	lbC019EEE
	subq.w	#1,D2
	bra.w	lbC019DB4

lbC019EEE:
	subq.w	#1,$1E269A.L
	bra.w	lbC019DB4

lbC019EF8:
	cmp.w	D5,D4
	bcc.w	lbC019DB4
	addq.w	#1,D4
	move.w	D2,D0
	add.w	D6,D0
	cmp.w	D0,D4
	bls.w	lbC019F10
	addq.w	#1,D2
	bra.w	lbC019DB4

lbC019F10:
	addq.w	#1,$1E269A.L
	bra.w	lbC019DB4

lbC019F1A:
	sf	$1E294E.L
	lea	$1E45E8.L,A0
	move.w	#$280,D0
	mulu.w	$1E269C.L,D0
	add.w	$1E269A.L,D0
	addi.w	#$230,D0
	cmpi.b	#$FF,0(A0,D0.W)
	bne.w	lbC019F48
	sf	0(A0,D0.W)
lbC019F48:
	move.l	(SP)+,$1E269A.L
	jsr	$1C1F8A.L
	movem.l	(SP)+,D0-D7/A0-A3
	rts

	st	$1E28AC.L
	tst.b	$1E296C.L
	bne.w	lbC019F70
	jmp	$1B57D2.L

lbC019F70:
	sf	$1E294E.L
	sf	$1E2AF6.L
	lea	$DFF000.L,A5
	jsr	lbC0135E2(PC)
	move.w	#$200,$96(A5)
	move.w	#$4000,$9A(A5)
	jsr	$1B2078.L
	jsr	$1B9FE6.L
	move.l	D0,D5
	move.l	D1,D6
	move.l	A0,D7
	cmpi.l	#$400,D0
	bls.w	lbC01A058
	movea.l	A0,A1
	jsr	lbC0159F6(PC)
	suba.l	A0,A0
	movea.l	$1E29A2.L,A1
	move.l	#$1FFFF,D0
lbC019FC2:
	move.l	(A0),D1
	move.l	(A1),(A0)+
	move.l	D1,(A1)+
	subq.l	#1,D0
	bpl.s	lbC019FC2
	move.l	$1E2BC0.L,D0
	beq.w	lbC019FE8
	movea.l	D0,A0
	move.l	#$1FFFF,D0
lbC019FDE:
	move.l	(A0),D1
	move.l	(A1),(A0)+
	move.l	D1,(A1)+
	subq.l	#1,D0
	bpl.s	lbC019FDE
lbC019FE8:
	movea.l	$1E2ACC.L,A1
	jsr	lbC015A32(PC)
	bpl.w	lbC019FFC
	jmp	$1B57A6.L

lbC019FFC:
	tst.w	D0
	beq.w	lbC01A00C
	lea	Warningdrivec.MSG0(PC),A0
	jsr	$1AB4A8.L
lbC01A00C:
	movea.l	$1E2ACC.L,A0
	move.l	$1E2AC4.L,D0
	lsr.l	#2,D0
	move.l	$1E2AC8.L,D1
lbC01A020:
	move.l	D1,(A0)+
	subq.l	#1,D0
	bne.s	lbC01A020
	jsr	$1B2078.L
	jsr	$1B06CA.L
	move.l	D5,$1E2AC4.L
	move.l	D6,$1E2AC8.L
	move.l	D7,$1E2ACC.L
	move.w	#$C000,$9A(A5)
	move.w	#$8200,$96(A5)
	st	$1E294E.L
	rts

lbC01A058:
	lea	$1B5668.L,A0
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	jsr	$1B2078.L
	move.w	#$C000,$9A(A5)
	move.w	#$8200,$96(A5)
	rts

	move.l	A5,-(SP)
	lea	$DFF000.L,A5
	move.w	#$20,$9A(A5)
	move.w	#$20,$9C(A5)
lbC01A092:
	btst	#5,$1F(A5)
	beq.s	lbC01A092
	move.w	#$20,$96(A5)
	jsr	$1B0C0C.L
	move.w	#$8020,$9A(A5)
	movea.l	(SP)+,A5
	rts

	move.l	A5,-(SP)
	lea	$DFF000.L,A5
	move.w	#$20,$9A(A5)
	move.w	#$20,$9C(A5)
lbC01A0C4:
	btst	#5,$1F(A5)
	beq.s	lbC01A0C4
	move.w	#$8020,$96(A5)
	move.w	#$8020,$9A(A5)
	movea.l	(SP)+,A5
	rts

lbC01A0DC:
	tst.b	$1E2B37.L
	bne.w	lbC01A0F6
	jsr	$1B2DAC.L
	tst.w	D0
	bne.w	lbC01A108
	moveq	#-1,D0
	rts

lbC01A0F6:
	move.w	#$100,$DFF096.L
	jsr	$1B2078.L
	moveq	#0,D0
	rts

lbC01A108:
	tst.b	$1E2AF6.L
	beq.w	lbC01A118
	jsr	$1A8AA6.L
lbC01A118:
	lea	$120.w,A1
	move.l	lbL01A160(PC),(A1)+
	move.l	lbL01A164(PC),(A1)+
	move.l	lbC01A168(PC),(A1)+
	movea.l	4.W,A0
	lea	-$36(A0),A0
	addq.l	#2,A0
	jsr	$1ADBFC.L
	move.l	D0,(A1)+
	move.l	(SP)+,(A1)+
	move.l	#$120,D0
	jsr	$1ADBEA.L
	st	$1E2B36.L
	st	$1E28AC.L
	movea.l	$1E2968.L,SP
	jmp	$1A9E14.L

lbL01A160:
	dc.l	$390000
lbL01A164:
	dc.l	$BFD100

lbC01A168:
	bra.s	lbL01A160

	bra.s	lbL01A160

	sf	$1E2B36.L
	movea.l	4.L,A0
	lea	-$36(A0),A0
	lea	$120.L,A1
	clr.l	(A1)+
	clr.l	(A1)+
	clr.l	(A1)+
	addq.l	#2,A0
	move.l	(A1),D0
	jsr	$1ADBEA.L
	subq.l	#2,A0
	clr.l	(A1)+
	pea	$1A9E14.L
	move.l	(A1),-(SP)
	clr.l	(A1)+
	cmpi.l	#$120,$1E2648.L
	bne.w	lbC01A1D6
	move.l	$1E2648.L,$1E2834.L
	move.l	A0,$1E2648.L
	st	$1E2B37.L
	move.w	#$100,$DFF096.L
	jsr	$1B2078.L
	moveq	#0,D0
	rts

lbC01A1D6:
	moveq	#-1,D0
	rts

lbC01A1DA:
	jsr	$1B2078.L
	move.w	#$8100,$DFF096.L
	rts

	cmpi.b	#$13,$1E2C45.L
	bls.w	lbC01A206
	lea	WrongTrackdis.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1B06CA.L

lbC01A206:
	st	$1E27E8.L
	sf	$1E2838.L
lbC01A212:
	jsr	$1ADB8C.L
	tst.b	$1E26B3.L
	bne.w	lbC01A290
	moveq	#5,D1
	cmpi.b	#$55,D0
	beq.w	lbC01A270
	moveq	#3,D1
	cmpi.b	#$4E,D0
	beq.w	lbC01A270
	moveq	#0,D1
	cmpi.b	#$42,D0
	beq.w	lbC01A270
	moveq	#1,D1
	cmpi.b	#$56,D0
	beq.w	lbC01A270
	moveq	#2,D1
	cmpi.b	#$53,D0
	beq.w	lbC01A270
	moveq	#4,D1
	cmpi.b	#$51,D0
	beq.w	lbC01A270
	cmpi.b	#$41,D0
	bne.w	lbC01BBC8
	move.b	#$2F,$1E2838.L
	bra.s	lbC01A212

lbC01A270:
	bset	D1,$1E2838.L
	bra.s	lbC01A212

	move.b	$1E2B40.L,$1E2838.L
	addi.b	#$27,$1E2838.L
	sf	$1E27E8.L
lbC01A290:
	tst.b	$1E2838.L
	beq.w	lbC01A2A2
	bset	#0,$1E2838.L
lbC01A2A2:
	tst.b	$1E27E8.L
	beq.w	lbC01A2BE
	jsr	lbC01A0DC(PC)
	bpl.w	lbC01A2BE
	lea	Multitaskings.MSG(PC),A0
	jmp	$1AB4A8.L

lbC01A2BE:
	lea	ARPTS_Hook.MSG(PC),A1
	movea.l	4.L,A6
	jsr	$1C2A26.L
	move.l	D0,$1E2834.L
	bne.w	lbC01A352
	tst.b	$1E2838.L
	beq.w	lbC01A3E8
	move.l	#$42,D0
	move.l	#$10001,D1
	movea.l	4.L,A6
	pea	-$C6(A6)
	jsr	lbC0181D0(PC)
	lea	Couldntalloca.MSG(PC),A0
	move.l	D0,$1E2834.L
	beq.w	lbC01A3FE
	movea.l	D0,A0
	lea	$36(A0),A1
	lea	ARPTS_Hook.MSG(PC),A2
lbC01A314:
	move.b	(A2)+,(A1)+
	bne.s	lbC01A314
	lea	$36(A0),A1
	move.l	A1,10(A0)
	move.b	#15,8(A0)
	movea.l	$1E2834.L,A0
	movea.l	4.L,A6
	pea	-$22E(A6)
	jsr	lbC0181D0(PC)
	lea	$214(A6),A0
	movea.l	$1E2834.L,A1
	movea.l	4.L,A6
	pea	-$10E(A6)
	jsr	lbC0181D0(PC)
lbC01A352:
	movea.l	$1E2834.L,A2
	movea.l	$2E(A2),A3
	move.l	A3,D0
	bne.w	lbC01A36A
	move.l	#10,$32(A2)
lbC01A36A:
	lea	Anotherunknow.MSG(PC),A0
	cmpi.l	#10,$32(A2)
	bne.w	lbC01A3FE
	move.l	A3,D0
	beq.w	lbC01A38A
	tst.b	$1E2838.L
	beq.w	lbC01A3E8
lbC01A38A:
	jsr	$1C28D6.L
	bmi.w	lbC01A3FE
	btst	#4,$1E2838.L
	beq.w	lbC01A3B4
	jsr	$1C2846.L
	jsr	$1C23C6.L
	lea	Trackdiskpatc.MSG(PC),A0
	bra.w	lbC01A3FE

lbC01A3B4:
	jsr	$1C2846.L
	movea.l	$1E2834.L,A0
	move.l	$2E(A0),D0
	jsr	$1C25AC.L
	bmi.w	lbC01A3FE
	movea.l	$1E2834.L,A0
	move.l	D0,$2E(A0)
	movea.l	D0,A1
	adda.l	#0,A1
	move.l	A0,(A1)
	jsr	$1C287C.L
lbC01A3E8:
	tst.b	$1E27E8.L
	beq.w	lbC01A3FC
	jsr	lbC01A1DA(PC)
	jsr	$1C2472.L
lbC01A3FC:
	rts

lbC01A3FE:
	tst.b	$1E27E8.L
	beq.s	lbC01A3FC
	jsr	lbC01A1DA(PC)
	jsr	$1AB4A8.L
	rts

Multitaskings.MSG:
	dc.b	'Multitasking surface not active',$D,0
Couldntalloca.MSG:
	dc.b	'Could''nt allocate (enough?) systemmemory',$D,0
Anotherunknow.MSG:
	dc.b	'Another unknown trackdisk-patch is already r'
	dc.b	'unning',$D,0
Trackdiskpatc.MSG:
	dc.b	'Trackdiskpatch removed',$D,0
WrongTrackdis.MSG:
	dc.b	'Wrong Trackdisk-Version (not 33 or 34), not '
	dc.b	'changed',$D,0
ARPTS_Hook.MSG:
	dc.b	'ARP TS_Hook',0,0
	dc.b	0

	move.l	$1E2834.L,D0
	beq.w	lbC01A564
	movea.l	D0,A0
	move.l	$2E(A0),D0
	beq.w	lbC01A536
	movea.l	D0,A1
	move.l	A1,-(SP)
	move.l	$82(A1),D0
	beq.w	lbC01A522
	movea.l	D0,A1
	move.l	#$640C,D0
	movea.l	4.L,A6
	pea	-$D2(A6)
	jsr	lbC0181D0(PC)
lbC01A522:
	movea.l	(SP)+,A1
	move.l	$B8(A1),D0
	movea.l	4.L,A6
	pea	-$D2(A6)
	jsr	lbC0181D0(PC)
lbC01A536:
	movea.l	$1E2834.L,A1
	movea.l	4.L,A6
	pea	-$FC(A6)
	jsr	lbC0181D0(PC)
	movea.l	$1E2834.L,A1
	move.l	#$42,D0
	movea.l	4.L,A6
	pea	-$D2(A6)
	jsr	lbC0181D0(PC)
lbC01A564:
	rts

Cannotaccesst.MSG:
	dc.b	'Cannot access trackdisk.device - drive(s) in'
	dc.b	' use:',$D

	lea	Trackdiskstat.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	Trackdiskdevi_.MSG(PC),A0
	move.l	$1E2834.L,D0
	bne.w	lbC01A5B8
lbC01A5B0:
	jsr	$1AB4A8.L
	rts

lbC01A5B8:
	movea.l	D0,A0
	move.l	$2E(A0),D0
	beq.s	lbC01A5B0
	movea.l	D0,A0
	move.l	$82(A0),D0
	move.l	$76(A0),D0
	move.b	$6C(A0),D0
	lea	Bugsfixed.MSG(PC),A0
	btst	#0,D0
	beq.w	lbC01A5E0
	jsr	$1AB4A8.L
lbC01A5E0:
	lea	Noclickinstal.MSG(PC),A0
	btst	#3,D0
	beq.w	lbC01A5F2
	jsr	$1AB4A8.L
lbC01A5F2:
	lea	Verifieswrite.MSG(PC),A0
	btst	#1,D0
	beq.w	lbC01A604
	jsr	$1AB4A8.L
lbC01A604:
	lea	Readsdamagedt.MSG(PC),A0
	btst	#2,D0
	beq.w	lbC01A616
	jsr	$1AB4A8.L
lbC01A616:
	lea	UpdatesTracks.MSG(PC),A0
	btst	#5,D0
	beq.w	lbC01A628
	jsr	$1AB4A8.L
lbC01A628:
	jsr	$1B06CA.L
	rts

Trackdiskstat.MSG:
	dc.b	'Trackdisk status report:',$D,0
Trackdiskdevi_.MSG:
	dc.b	'Trackdisk.device is running unchanged.',$D,0
Noclickinstal.MSG:
	dc.b	'Noclick installed. ',$D,0
Verifieswrite.MSG:
	dc.b	'Verifies writes. ',$D,0
Bugsfixed.MSG:
	dc.b	'Bugs fixed. ',$D,0
Readsdamagedt.MSG:
	dc.b	'Reads damaged tracks. ',$D,0
UpdatesTracks.MSG:
	dc.b	'Updates Tracks.',$D,0
	dc.b	0

	move.l	D0,-(SP)
	lea	intuitionlibr.MSG(PC),A1
	lea	$17A(A6),A0
	jsr	$1C29C6.L
	lea	Cantfindintui.MSG(PC),A0
	move.l	D0,$1E283C.L
	beq.w	lbC01A8A0
	lea	trackdiskdevi.MSG(PC),A1
	jsr	$1C29F2.L
	lea	Cantfindprope.MSG(PC),A0
	move.l	D0,$1E2840.L
	beq.w	lbC01A8A0
	movea.l	D0,A1
	cmpi.b	#$21,11(A1)
	beq.w	lbC01A7C4
	cmpi.b	#$22,11(A1)
	bne.w	lbC01A8A0
	move.l	6(A1),D0
	sub.l	2(A1),D0
	move.l	D0,$1E2844.L
	move.l	D0,D1
	move.l	(SP),D0
	bne.w	lbC01A756
	move.l	D1,D0
	addi.l	#$904,D0
	addi.l	#$BC,D0
	move.l	#$10001,D1
	movea.l	4.L,A6
	pea	-$C6(A6)
	jsr	lbC0181D0(PC)
lbC01A756:
	lea	Couldntalloca.MSG(PC),A0
	move.l	D0,$1E2848.L
	beq.w	lbC01A8A0
	movea.l	D0,A1
	move.l	A1,$14(A1)
	move.l	A1,$2A(A1)
	move.l	A1,$40(A1)
	move.l	A1,$56(A1)
	move.l	$1E283C.L,$B4(A1)
	move.l	$1E2844.L,D0
	addi.l	#$904,D0
	addi.l	#$BC,D0
	move.l	D0,$B8(A1)
	move.l	$1E2840.L,$6E(A1)
	move.l	$1E2844.L,$72(A1)
	lea	lbC01AB54(PC),A2
	movea.l	$1E2848.L,A3
	adda.l	#$BC,A3
	move.l	A3,$7A(A1)
	move.l	#$904,$7E(A1)
	move.w	#$481,D0
lbC01A7C4:
	move.w	(A2)+,(A3)+
	dbra	D0,lbC01A7C4
	move.l	A3,$76(A1)
	movea.l	$1E2840.L,A2
	move.l	$1E2844.L,D0
	lsr.w	#1,D0
	subq.w	#1,D0
lbC01A7DE:
	move.w	(A2)+,(A3)+
	dbra	D0,lbC01A7DE
	jsr	$1C2B2A.L
	jsr	$1C2B4C.L
	movea.l	$1E2848.L,A0
	movea.l	$76(A0),A0
	lea	lbL01AB5C(PC),A1
	btst	#0,$1E2838.L
	beq.w	lbC01A810
	jsr	$1C2BE0.L
lbC01A810:
	lea	lbL01AB78(PC),A1
	btst	#3,$1E2838.L
	beq.w	lbC01A826
	jsr	$1C2BE0.L
lbC01A826:
	lea	lbC01AB86(PC),A1
	btst	#2,$1E2838.L
	beq.w	lbC01A83C
	jsr	$1C2BE0.L
lbC01A83C:
	lea	lbL01ABC8(PC),A1
	btst	#1,$1E2838.L
	beq.w	lbC01A852
	jsr	$1C2BE0.L
lbC01A852:
	lea	lbL01AC14(PC),A1
	btst	#5,$1E2838.L
	beq.w	lbC01A868
	jsr	$1C2BE0.L
lbC01A868:
	movea.l	$1E2848.L,A0
	lea	$86(A0),A0
	movea.l	4.L,A6
	pea	-$22E(A6)
	jsr	lbC0181D0(PC)
	jsr	$1C27C2.L
	bmi.w	lbC01A8A0
	move.l	$1E2848.L,D0
	movea.l	D0,A0
	move.b	$1E2838.L,$6C(A0)
	addq.l	#4,SP
	moveq	#0,D1
	rts

lbC01A8A0:
	move.l	(SP)+,D0
	moveq	#-1,D0
	rts

Cantfindintui.MSG:
	dc.b	'Can''t find intuition.library',$D,0
Cantfindprope.MSG:
	dc.b	'Can''t find proper trackdisk.device',$D,0

	btst	#2,$1E2838.L
	bne.w	lbC01A932
	btst	#1,$1E2838.L
	bne.w	lbC01A932
	movea.l	$1E2848.L,A0
	move.l	$82(A0),D0
	beq.w	lbC01A92E
	movea.l	D0,A1
	move.l	#$640C,D0
	movea.l	4.L,A6
	pea	-$D2(A6)
	jsr	lbC0181D0(PC)
	movea.l	$1E2848.L,A0
	clr.l	$82(A0)
lbC01A92E:
	moveq	#0,D0
	rts

lbC01A932:
	movea.l	$1E2848.L,A0
	move.l	$82(A0),D0
	bne.s	lbC01A92E
	move.l	#$640C,D0
	move.l	#2,D1
	movea.l	4.L,A6
	pea	-$C6(A6)
	jsr	lbC0181D0(PC)
	movea.l	$1E2848.L,A0
	move.l	D0,$82(A0)
	bne.s	lbC01A92E
	lea	Couldntalloca.MSG(PC),A0
	moveq	#-1,D0
	rts

	movea.l	$1E2834.L,A0
	move.l	$2E(A0),D0
	beq.w	lbC01A9A0
	movea.l	D0,A0
	lea	4(A0),A1
lbC01A980:
	move.l	(A1),D0
	beq.w	lbC01A9A0
	clr.l	(A1)+
	movea.l	D0,A2
	movea.l	12(A2),A3
	movea.l	$3E(A3),A4
	move.l	4(A2),-$14(A4)
	move.l	8(A2),$58(A3)
	bra.s	lbC01A980

lbC01A9A0:
	rts

	movea.l	$1E2848.L,A2
	lea	4(A2),A3
	lea	$14(A2),A4
	lea	$1E075E.L,A0
lbC01A9B6:
	move.l	(A0)+,D0
	beq.w	lbC01A9FA
	movea.l	D0,A1
	move.l	A4,(A3)+
	move.l	$6E(A2),D0
	addi.l	#$1592,D0
	move.l	$76(A2),D1
	addi.l	#$1592,D1
	move.l	D0,4(A4)
	movea.l	$3E(A1),A5
	move.l	D1,-$14(A5)
	move.l	$58(A1),8(A4)
	move.w	#10,$14(A4)
	move.l	A4,$58(A1)
	move.l	A1,12(A4)
	adda.w	#$16,A4
	bra.s	lbC01A9B6

lbC01A9FA:
	rts

	move.l	$1E2834.L,D0
	beq.w	lbC01AA1A
	movea.l	D0,A0
	move.l	$2E(A0),D0
	beq.w	lbC01AA1A
	movea.l	D0,A0
	move.l	$76(A0),D0
	bra.w	lbC01AA3E

lbC01AA1A:
	lea	trackdiskdevi.MSG(PC),A1
	lea	$1E075E.L,A0
	movea.l	$12C(A6),A2
lbC01AA28:
	move.l	(A2)+,(A0)+
	bne.s	lbC01AA28
	move.l	A1,$1E2844.L
	jsr	$1C29F2.L
	move.l	D0,$1E2848.L
lbC01AA3E:
	lea	Cantfindprope.MSG(PC),A0
	move.l	D0,D6
	beq.w	lbC01AA8C
	addi.l	#$1592,D6
	lea	$1E075E.L,A2
	moveq	#3,D7
	lea	$1A4(A6),A0
lbC01AA5A:
	lea	trackdiskdevi.MSG(PC),A1
	movem.l	D6/D7/A2,-(SP)
	jsr	$1C29C6.L
	movem.l	(SP)+,D6/D7/A2
	movea.l	D0,A0
	move.l	D0,(A2)+
	beq.w	lbC01AA90
	movea.l	$3E(A0),A3
	cmp.l	-$14(A3),D6
	bne.w	lbC01AA88
	dbra	D7,lbC01AA5A
lbC01AA84:
	moveq	#0,D0
	rts

lbC01AA88:
	lea	Cannotaccesst.MSG(PC),A0
lbC01AA8C:
	moveq	#-1,D0
	rts

lbC01AA90:
	lea	$196(A6),A0
	subq.l	#4,A2
lbC01AA96:
	lea	trackdiskdevi.MSG(PC),A1
	movem.l	D6/D7/A2,-(SP)
	jsr	$1C29C6.L
	movem.l	(SP)+,D6/D7/A2
	movea.l	D0,A0
	move.l	D0,(A2)+
	beq.w	lbC01AABE
	movea.l	$3E(A0),A3
	cmp.l	-$14(A3),D6
	bne.s	lbC01AA88
	dbra	D7,lbC01AA96
lbC01AABE:
	lea	$114(A6),A0
	movea.l	(A0),A0
lbC01AAC4:
	lea	trackdiskdevi.MSG(PC),A1
	movem.l	D6/D7/A2,-(SP)
	jsr	$1C29C6.L
	movem.l	(SP)+,D6/D7/A2
	movea.l	D0,A0
	move.l	D0,(A2)+
	beq.s	lbC01AA84
	movea.l	$3E(A0),A3
	cmp.l	-$14(A3),D6
	bne.s	lbC01AA88
	dbra	D7,lbC01AAC4
	bra.s	lbC01AA84

lbC01AAEC:
	move.l	A2,-(SP)
	movea.l	A0,A2
	move.l	A1,D1
	move.l	(A2),D0
	beq.w	lbC01AB12
lbC01AAF8:
	movea.l	D0,A2
	move.l	(A2),D0
	beq.w	lbC01AB12
	movea.l	10(A2),A0
	movea.l	D1,A1
lbC01AB06:
	cmpm.b	(A0)+,(A1)+
	bne.s	lbC01AAF8
	tst.b	-1(A0)
	bne.s	lbC01AB06
	move.l	A2,D0
lbC01AB12:
	movea.l	D1,A1
	movea.l	(SP)+,A2
	rts

	movem.l	A2/A3,-(SP)
	movea.l	$12C(A6),A2
	movea.l	A1,A3
lbC01AB22:
	move.l	(A2)+,D0
	beq.w	lbC01AB46
	bgt.w	lbC01AB34
	bclr	#$1F,D0
	movea.l	D0,A2
	bra.s	lbC01AB22

lbC01AB34:
	movea.l	D0,A1
	movea.l	A3,A0
	movea.l	14(A1),A1
lbC01AB3C:
	cmpm.b	(A0)+,(A1)+
	bne.s	lbC01AB22
	tst.b	-1(A0)
	bne.s	lbC01AB3C
lbC01AB46:
	movem.l	(SP)+,A2/A3
	rts

	lea	$214(A6),A0
	jmp	lbC01AAEC(PC)

lbC01AB54:
	bset	#1,$41(A3)
	rts

lbL01AB5C:
	dc.l	$1A380003
	dc.l	$C800000
	dc.l	$800000E6
	dc.l	$10016
	dc.l	$10400002
	dc.l	$6100EBF6
	dc.l	0
lbL01AB78:
	dc.l	$1040003
	dc.l	$6100F5F6
	dc.l	$4E710000
	dc.w	0

lbC01AB86:
	move.b	2.w,(A0)+
	bra.w	lbW019196

	dc.l	$EC80001
	dc.l	$663A0F04
	dc.l	$12246B
	dc.l	$44206B
	dc.l	$4E0C2A
	dc.l	$3001D
	dc.l	$6600EC36
	dc.l	$C28000B
	dc.l	$36516
	dc.l	$15680003
	dc.l	$1F6000
	dc.l	$116102A
	dc.l	$26D00
	dc.l	$FED80000
	dc.w	0
lbL01ABC8:
	dc.l	$7C40002
	dc.l	$6100F4A2
	dc.l	$EDC0002
	dc.l	$6100ED8A
	dc.l	$11D60002
	dc.l	$6100EA90
	dc.l	$15D20002
	dc.l	$6100E694
	dc.l	$16FE0002
	dc.l	$48E7BE20
	dc.l	$18FA0002
	dc.l	$4CDF047E
	dc.l	$180E0002
	dc.l	$6100E3C4
	dc.l	$8640006
	dc.l	$30822748
	dc.l	$4E6100
	dc.l	$F3F84E71
	dc.l	0
lbL01AC14:
	dc.l	$BD60002
	dc.l	$6000F00A
	dc.l	$A40002
	dc.l	$6000FB52
	dc.l	0
lbW01AC28:
	dc.w	$7A2
	dc.w	$7AA
	dc.w	$828
	dc.w	$7C0
	dc.w	$7D2
	dc.w	$7DA
	dc.w	$7FE
	dc.w	$806
	dc.w	$870
	dc.w	$874
	dc.w	$878
	dc.w	$884
	dc.w	$888
	dc.w	$848
	dc.w	$84C
	dc.w	$850
	dc.w	$85C
	dc.w	$860
	dc.w	$890
	dc.w	0

	movea.l	$1E2848.L,A0
	movea.l	$7A(A0),A0
	lea	lbW01AC28(PC),A1
lbC01AC5E:
	move.w	(A1)+,D0
	beq.w	lbC01AC70
	move.l	A0,D1
	add.l	0(A0,D0.W),D1
	move.l	D1,0(A0,D0.W)
	bra.s	lbC01AC5E

lbC01AC70:
	rts

	movea.l	$1E2848.L,A0
	movea.l	$76(A0),A1
	move.l	$6E(A0),D0
	sub.l	A1,D0
	lea	lbW01AC94(PC),A0
	bra.w	lbC01AC8E

lbC01AC8A:
	sub.l	D0,0(A1,D1.W)
lbC01AC8E:
	move.w	(A0)+,D1
	bne.s	lbC01AC8A
	rts

lbW01AC94:
	dc.w	2
	dc.w	6
	dc.w	14
	dc.w	$12
	dc.w	$16
	dc.w	$324
	dc.w	$32A
	dc.w	$3C0
	dc.w	$91C
	dc.w	$940
	dc.w	$966
	dc.w	$980
	dc.w	$994
	dc.w	$9B6
	dc.w	$9C4
	dc.w	$9CC
	dc.w	$A00
	dc.w	$A04
	dc.w	$A08
	dc.w	$A0C
	dc.w	$A10
	dc.w	$A14
	dc.w	$A1C
	dc.w	$A20
	dc.w	$A24
	dc.w	$A28
	dc.w	$A2C
	dc.w	$A30
	dc.w	$A34
	dc.w	$A38
	dc.w	$A3C
	dc.w	$A40
	dc.w	$A44
	dc.w	$A48
	dc.w	$A4C
	dc.w	$A50
	dc.w	$A54
	dc.w	$A58
	dc.w	$A5C
	dc.w	$A60
	dc.w	$A64
	dc.w	$A68
	dc.w	$A6C
	dc.w	$A70
	dc.w	$127E
	dc.w	$12EA
	dc.w	$1316
	dc.w	$1352
	dc.w	$1386
	dc.w	$13E4
	dc.w	$1446
	dc.w	$1690
	dc.w	$16B8
	dc.w	$195A
	dc.w	$19A2
	dc.w	$19B2
	dc.w	0

	movem.l	A2,-(SP)
	movea.l	A0,A2
lbC01AD0C:
	movea.l	A2,A0
	move.w	(A1)+,D0
	adda.w	D0,A0
	move.w	(A1)+,D1
	beq.s	lbC01AD20
	bra.s	lbC01AD1A

lbC01AD18:
	move.w	(A1)+,(A0)+
lbC01AD1A:
	dbra	D1,lbC01AD18
	bra.s	lbC01AD0C

lbC01AD20:
	movem.l	(SP)+,A2
	rts

lbC01AD26:
	movem.l	D1/D2,-(SP)
	move.l	$1E2BD0.L,D0
	beq.w	lbC01AD56
	movea.l	$1E2bcc.L,A0
	move.l	$1E2BC8.L,D2
	beq.w	lbC01AD50
	sub.l	D2,D0
	beq.w	lbC01AD56
	movea.l	D2,A0
	bra.w	lbC01AD9C

lbC01AD50:
	sub.l	A0,D0
	bra.w	lbC01AD9C

lbC01AD56:
	move.l	$1E299A.L,D0
	beq.w	lbC01AD80
	move.l	$1E2978.L,D1
	bne.w	lbC01AD70
	move.l	#$C00000,D1
lbC01AD70:
	sub.l	D1,D0
	beq.w	lbC01AD80
	lea	$C00000.L,A0
	bra.w	lbC01AD9C

lbC01AD80:
	move.l	$1E299E.L,D0
	sub.l	$1E2974.L,D0
	beq.w	lbC01AD9A
	lea	$80000.L,A0
	bra.w	lbC01AD9C

lbC01AD9A:
	moveq	#0,D0
lbC01AD9C:
	movem.l	(SP)+,D1/D2
	rts

	sf	$1E2B38.L
	jsr	$1B06CA.L
	rts

	tst.b	$1E2B38.L
	beq.w	lbC01ADF6
	lea	Listofdeeptra.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2B8A.L,A0
	movea.l	A0,A1
	adda.l	#$7FFFA,A1
lbC01ADD2:
	move.l	(A0)+,D0
	bmi.w	lbC01ADF0
	tst.b	$1E26A1.L
	bne.w	lbC01ADF6
	jsr	$1A9A1C.L
	moveq	#2,D0
	jsr	$1AEEAE.L
lbC01ADF0:
	addq.w	#2,A0
	cmpa.l	A0,A1
	bgt.s	lbC01ADD2
lbC01ADF6:
	jsr	$1B06CA.L
	rts

Listofdeeptra.MSG:
	dc.b	'List of deeptraineraddresses:',$D,0
	dc.b	0

	moveq	#0,D1
	bra.w	lbC01AE26

	moveq	#1,D1
lbC01AE26:
	tst.b	$1E2B38.L
	bne.w	lbC01AF38
	bsr.w	lbC01AD26
	move.l	D0,D3
	movea.l	A0,A3
	tst.l	D0
	bne.w	lbC01AE50
	lea	Noworkmemory.MSG(PC),A0
lbC01AE42:
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

lbC01AE50:
	lea	Selectonly512.MSG(PC),A0
	cmpi.l	#$80000,$1E2974.L
	bne.s	lbC01AE42
	tst.l	$1E2978.L
	bne.s	lbC01AE42
	tst.l	$1E2BC8.L
	bne.s	lbC01AE42
	st	$1E2B38.L
	move.l	A3,$1E2B8A.L
	clr.l	$1E26C0.L
	suba.l	A0,A0
	movea.l	A3,A1
	adda.l	#$7FFFA,A3
lbC01AE8C:
	move.l	A0,(A1)+
	jsr	$1ABF94.L
	move.b	D0,(A1)+
	move.b	D0,(A1)+
	addq.w	#1,A0
	cmpa.l	A1,A3
	bgt.s	lbC01AE8C
	move.l	A0,$1E26C0.L
	lea	Changenowyour.MSG(PC),A0
	bra.s	lbC01AE42

Noworkmemory.MSG:
	dc.b	'No work memory',$D,0
Selectonly512.MSG:
	dc.b	'Select only 512k chip memory',$D,0
Changenowyour.MSG:
	dc.b	'Change now your counter',$D,0
RestoreTDSorc.MSG:
	dc.b	'Restore (TDS) or change (TDC) now your count'
	dc.b	'er',$D,0
Possibleaddre.MSG0:
	dc.b	'Possible addresses: ',$D,0
	dc.b	0

lbC01AF38:
	tst.w	D1
	beq.w	lbC01B032
	sf	$1E2834.L
	lea	Possibleaddre.MSG0(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2B8A.L,A2
	movea.l	A2,A4
	moveq	#-1,D5
	adda.l	#$7FFFA,A4
lbC01AF5E:
	movea.l	(A2)+,A0
	jsr	$1ABF94.L
	cmpm.b	(A2)+,(A2)+
	beq.w	lbC01AF9C
	cmp.b	-1(A2),D0
	bne.w	lbC01AF9C
	move.b	D0,-2(A2)
	tst.b	$1E26A1.L
	bne.w	lbC01AF92
	move.l	A0,D0
	jsr	$1A9A1C.L
	moveq	#2,D0
	jsr	$1AEEAE.L
lbC01AF92:
	st	$1E2834.L
	bra.w	lbC01AFA0

lbC01AF9C:
	move.l	D5,-6(A2)
lbC01AFA0:
	cmpa.l	A2,A4
	bgt.s	lbC01AF5E
	jsr	$1AEECA.L
	tst.b	$1E2834.L
	bne.w	lbC01AFC0
	lea	$1B011D.L,A0
	jsr	$1AB4A8.L
lbC01AFC0:
	movea.l	$1E26C0.L,A3
	movea.l	$1E2B8A.L,A2
	move.l	#$80000,D5
	movea.l	A2,A4
	adda.l	#$7FFFA,A4
lbC01AFDA:
	cmp.l	A3,D5
	beq.w	lbC01B006
	tst.l	(A2)
	bmi.w	lbC01AFEC
	addq.w	#6,A2
	bra.w	lbC01B002

lbC01AFEC:
	move.l	A3,(A2)+
	movea.l	A3,A0
	jsr	$1ABF94.L
	move.b	D0,(A2)+
	move.b	D0,(A2)+
	addq.w	#1,A3
	st	$1E2834.L
lbC01B002:
	cmpa.l	A2,A4
	bgt.s	lbC01AFDA
lbC01B006:
	move.l	A3,$1E26C0.L
	tst.b	$1E2834.L
	bne.w	lbC01B026
	lea	lbC01B02E(PC),A0
	jsr	$1AB4A8.L
	sf	$1E2B38.L
lbC01B026:
	lea	Changenowyour.MSG(PC),A0
	bsr.w	lbC01B108
lbC01B02E:
	bra.w	lbC01AE42

lbC01B032:
	movea.l	$1E2B8A.L,A3
	movea.l	A3,A4
	adda.l	#$7FFFA,A4
	moveq	#-1,D5
lbC01B042:
	movea.l	(A3)+,A0
	jsr	$1ABF94.L
	move.b	D0,(A3)+
	cmp.b	(A3)+,D0
	bne.w	lbC01B056
	move.l	D5,-6(A3)
lbC01B056:
	cmpa.l	A3,A4
	bgt.s	lbC01B042
	movea.l	$1E26C0.L,A3
	movea.l	$1E2B8A.L,A2
	move.l	#$80000,D5
lbC01B06C:
	cmp.l	A3,D5
	beq.w	lbC01B092
	tst.l	(A2)
	bmi.w	lbC01B07E
	addq.w	#6,A2
	bra.w	lbC01B08E

lbC01B07E:
	move.l	A3,(A2)+
	movea.l	A3,A0
	jsr	$1ABF94.L
	move.b	D0,(A2)+
	move.b	D0,(A2)+
	addq.w	#1,A3
lbC01B08E:
	cmpa.l	A2,A4
	bgt.s	lbC01B06C
lbC01B092:
	move.l	A3,$1E26C0.L
	lea	RestoreTDSorc.MSG(PC),A0
	bsr.w	lbC01B108
	bra.w	lbC01AE42

	tst.b	$1E2B38.L
lbC01B0AA:
	beq.w	lbC01BBC8
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.s	lbC01B0AA
	movea.l	D0,A1
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.s	lbC01B0AA
	movea.l	D0,A2
	cmpa.l	A1,A2
	bcs.s	lbC01B0AA
	movea.l	$1E2B8A.L,A0
	movea.l	A0,A3
	adda.l	#$7FFFA,A3
lbC01B0E0:
	move.l	(A0)+,D0
	bmi.w	lbC01B0FA
	cmp.l	A1,D0
	bcs.w	lbC01B0FA
	cmp.l	A2,D0
	bge.w	lbC01B0FA
	move.l	#$FFFFFFFF,-4(A0)
lbC01B0FA:
	addq.w	#2,A0
	cmpa.l	A0,A3
	bgt.s	lbC01B0E0
	jsr	$1B06CA.L
	rts

lbC01B108:
	movem.l	D0/A0,-(SP)
	lea	$1B012D.L,A0
	jsr	$1AB4A8.L
	move.l	$1E26C0.L,D0
	jsr	$1A9A1C.L
	jsr	$1AEECA.L
	movem.l	(SP)+,D0/A0
	rts

	tst.b	$1E2B46.L
	beq.w	lbC01B142
	lea	Cannotsetmemw.MSG(PC),A0
	bra.w	lbC01B182

lbC01B142:
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC01B266
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC01BBC8
	moveq	#4,D2
	lea	$1E2B8E.L,A0
lbC01B16C:
	tst.l	(A0)+
	bmi.w	lbC01B190
	cmp.l	-4(A0),D0
	beq.w	lbC01B190
	dbra	D2,lbC01B16C
	lea	Allmemwatchpo.MSG(PC),A0
lbC01B182:
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

lbC01B190:
	move.l	D0,-4(A0)
	lea	Memwatchpoint.MSG(PC),A0
	bra.s	lbC01B182

Allmemwatchpo.MSG:
	dc.b	'All memwatchpoints occupied',$D,0
Memwatchpoint.MSG:
	dc.b	'Memwatchpoint set',$D,0
Cannotsetmemw.MSG:
	dc.b	'Cannot set memwatchpoint: trace active!',$D,0
	dc.b	0

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC01BBC8
	lea	$1E2B8E.L,A0
	moveq	#4,D1
lbC01B20C:
	cmp.l	(A0)+,D0
	beq.w	lbC01B228
	dbra	D1,lbC01B20C
	lea	Memwatchpoint.MSG0(PC),A0
lbC01B21A:
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

lbC01B228:
	move.l	#$FFFFFFFF,-4(A0)
	lea	Memwatchpoint.MSG1(PC),A0
	bra.s	lbC01B21A

Memwatchpoint.MSG1:
	dc.b	'Memwatchpoint deleted',$D,0
Memwatchpoint.MSG0:
	dc.b	'Memwatchpoint not found',$D,0

lbC01B266:
	lea	Listofmemwatc.MSG(PC),A0
	jsr	$1AB4A8.L
	lea	$1E2B8E.L,A0
	moveq	#4,D1
lbC01B278:
	move.l	(A0)+,D0
	bmi.w	lbC01B28C
	jsr	$1A9A1C.L
	moveq	#2,D0
	jsr	$1AEEAE.L
lbC01B28C:
	dbra	D1,lbC01B278
	jsr	$1B06CA.L
	rts

Listofmemwatc.MSG:
	dc.b	'List of memwatchpoints: ',0,0

	lea	Allmemwatchpo.MSG0(PC),A0
	jsr	$1AB4A8.L
	moveq	#4,D0
	lea	$1E2B8E.L,A0
lbC01B2C4:
	move.l	#$FFFFFFFF,(A0)+
	dbra	D0,lbC01B2C4
	jsr	$1B06CA.L
	rts

Allmemwatchpo.MSG0:
	dc.b	'All memwatchpoints deleted!',$D,0
	dc.b	0

	lea	$1E2B8E.L,A2
	movea.l	A2,A3
	moveq	#4,D1
lbC01B2FE:
	tst.l	(A2)+
	bpl.w	lbC01B348
	dbra	D1,lbC01B2FE
	tst.b	$1E2B39.L
	beq.w	lbC01B340
	moveq	#3,D1
	lea	$15A.w,A0
lbC01B318:
	cmpi.w	#$4E73,(A0)
	beq.w	lbC01B328
	lea	10(A0),A0
	dbra	D1,lbC01B318
lbC01B328:
	move.l	#$8970007,(A0)+
	move.w	#$4E73,(A0)+
	lea	$130.w,A0
	move.l	#$8970007,(A0)+
	move.w	#$4E73,(A0)+
lbC01B340:
	sf	$1E2B39.L
	rts

lbC01B348:
	st	$1E2B39.L
	moveq	#4,D3
	move.w	#$EC,D4
	lea	$130.w,A2
	move.l	#$46,$BC.w
	move.w	#$4E73,$46.w
	move.l	#$4E714E71,(A2)+
	move.l	#$4E4F4E71,(A2)+
	move.w	#$4E71,(A2)+
lbC01B376:
	move.l	(A3)+,D0
	bpl.w	lbC01B3A0
lbC01B37C:
	dbra	D3,lbC01B376
	lea	lbC01B3BE(PC),A0
	lea	lbC01B3D6(PC),A1
lbC01B388:
	move.w	(A0)+,(A2)+
	cmpa.l	A0,A1
	bne.s	lbC01B388
	ori.w	#$8000,$1E264C.L
	move.l	#$13A,$24.w
	rts

lbC01B3A0:
	movea.l	D0,A0
	moveq	#0,D0
	jsr	$1ABF94.L
	move.w	#$C39,(A2)+
	move.w	D0,(A2)+
	move.l	A0,(A2)+
	move.b	#$66,(A2)+
	move.b	D4,(A2)+
	subi.w	#10,D4
	bra.s	lbC01B37C

lbC01B3BE:
	move.l	A0,-(SP)
	movea.l	6(SP),A0
	cmpi.w	#$4E73,(A0)
	bne.w	lbC01B3D2
	bset	#7,4(SP)
lbC01B3D2:
	movea.l	(SP)+,A0
	rte

lbC01B3D6:
	rts

	move.w	0.w,-(SP)
	jsr	lbC01AD26(PC)
	movea.l	$1E2974.L,A5
	lea	$DFF000.L,A6
	cmp.l	A5,D0
	bcs.w	lbC01B594
	movea.l	A0,A4
	movea.l	A4,A1
	move.w	#$2700,SR
	suba.l	A0,A0
	move.w	#$7FF,D1
	cmpa.l	#$100000,A5
	bne.w	lbC01B40E
	move.w	#$FFF,D1
lbC01B40E:
	moveq	#$3F,D2
lbC01B410:
	move.l	(A0)+,(A1)+
	dbra	D2,lbC01B410
	move.w	#0,$2C(A6)
	dbra	D1,lbC01B40E
	suba.l	A0,A0
lbC01B422:
	moveq	#$3F,D0
lbC01B424:
	move.l	#$849CF89C,(A0)+
	dbra	D0,lbC01B424
	move.w	#0,$2C(A6)
	cmpa.l	A0,A5
	bne.s	lbC01B422
	suba.l	A0,A0
	moveq	#12,D7
	move.b	#$7F,$BFED01.L
	tst.b	$BFED01.L
	move.b	#$7F,$BFDD00.L
	tst.b	$BFDD00.L
	move.l	#$3000,$2A(A6)
	move.w	#$7FFF,$9C(A6)
lbC01B466:
	move.w	#$8280,$96(A6)
	move.w	#$280,$96(A6)
	tst.w	$1E(A6)
	beq.s	lbC01B466
	move.l	4(A6),D0
	move.l	#0,$2A(A6)
	andi.l	#$1FF00,D0
	seq	$1E2B3B.L
	btst	#2,$1E(A6)
	beq.w	lbC01B49C
	addq.w	#2,A0
lbC01B49C:
	movea.l	A0,A2
	moveq	#0,D0
lbC01B4A0:
	moveq	#$3F,D1
lbC01B4A2:
	ori.w	#$8000,D0
	move.w	#$FE9C,(A0)+
	move.w	D0,(A0)+
	addq.w	#1,D0
	dbra	D1,lbC01B4A2
	move.w	#0,$2C(A6)
	cmpa.l	A0,A5
	bgt.s	lbC01B4A0
	move.b	#$7F,$BFED01.L
	tst.b	$BFED01.L
	move.b	#$7F,$BFDD00.L
	tst.b	$BFDD00.L
	move.w	#$3000,$2C(A6)
	move.w	#$7FFF,$9C(A6)
	move.w	#$8280,$96(A6)
	move.w	#$280,$96(A6)
	moveq	#0,D0
	move.w	$1E(A6),D0
	andi.w	#$7FFF,D0
	lsl.l	#2,D0
	lea	0(A2,D0.L),A2
	movea.l	A2,A0
	moveq	#0,D0
lbC01B504:
	ori.w	#$8000,D0
	movea.l	A0,A1
	move.w	#$3E8,D1
lbC01B50E:
	move.w	#$FE9C,(A1)+
	move.w	D0,(A1)+
	move.w	#$3000,$2C(A6)
	dbra	D1,lbC01B50E
	addq.w	#1,D0
	adda.l	#$20000,A0
	cmpa.l	A0,A5
	bgt.s	lbC01B504
	moveq	#-1,D2
lbC01B52C:
	move.w	#$3000,$2C(A6)
	move.w	#$7FFF,$9C(A6)
	move.w	#$8280,$96(A6)
	move.w	#$280,$96(A6)
	move.w	$1E(A6),D0
	andi.w	#$7FFF,D0
	cmpi.w	#7,D0
	bgt.s	lbC01B52C
	cmp.w	D0,D2
	beq.w	lbC01B55C
	move.w	D0,D2
	bra.s	lbC01B52C

lbC01B55C:
	move.l	#$2000,D1
	mulu.w	D0,D1
	mulu.w	#$10,D1
	sub.l	D7,D1
	lea	0(A2,D1.L),A2
	move.l	A2,$1E2BA2.L
	suba.l	A0,A0
lbC01B576:
	move.l	(A4)+,(A0)+
	cmpa.l	A0,A5
	bgt.s	lbC01B576
	move.w	#$7FFF,$9C(A6)
	jsr	$1B9F84.L
	move.w	#$2000,SR
lbC01B58C:
	move.w	(SP)+,0.L
	rts

lbC01B594:
	st	$1E2B3D.L
	bra.s	lbC01B58C

	move.w	#$20,$DFF1DC.L
	jsr	$1B06CA.L
	rts

	move.w	#0,$DFF1DC.L
	jsr	$1B06CA.L
	rts

	move.w	D1,-(SP)
lbC01B5BE:
	jsr	$1AE5E4.L
	subq.w	#1,D1
	bne.s	lbC01B5BE
	move.w	(SP)+,D1
	rts

lbC01B5CC:
	move.l	A0,-(SP)
	move.b	(A0)+,$1E269B.L
	move.b	(A0)+,$1E269D.L
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	rts

lbL01B5E4:
	dc.l	$20005
	dc.l	$30005
	dc.l	$7E000006
	dc.l	$50006
	dc.l	$53100
	dc.l	$90005
	dc.l	$90005
	dc.l	$3200000C
	dc.l	$5000C
	dc.l	$53300
	dc.l	$F0005
	dc.l	$F0005
	dc.l	$34000012
	dc.l	$50012
	dc.l	$53500
	dc.l	$150005
	dc.l	$150005
	dc.l	$36000018
	dc.l	$50018
	dc.l	$53700
	dc.l	$1B0005
	dc.l	$1B0005
	dc.l	$3800001E
	dc.l	$5001E
	dc.l	$53900
	dc.l	$210005
	dc.l	$210005
	dc.l	$30000024
	dc.l	$50024
	dc.l	$52D00
	dc.l	$270005
	dc.l	$270005
	dc.l	$3D00002A
	dc.l	$5002A
	dc.l	$55C00
	dc.l	$20005
	dc.l	$30005
	dc.l	$42
	dc.l	$D0045
	dc.l	$D2030
	dc.l	7
	dc.l	$70007
	dc.l	$75100
	dc.l	$A0007
	dc.l	$A0007
	dc.l	$5700000D
	dc.l	$7000D
	dc.l	$74500
	dc.l	$100007
	dc.l	$100007
	dc.l	$52000013
	dc.l	$70013
	dc.l	$75400
	dc.l	$160007
	dc.l	$160007
	dc.l	$59000019
	dc.l	$70019
	dc.l	$75500
	dc.l	$1C0007
	dc.l	$1C0007
	dc.l	$4900001F
	dc.l	$7001F
	dc.l	$74F00
	dc.l	$220007
	dc.l	$220007
	dc.l	$50000025
	dc.l	$70025
	dc.l	$75B00
	dc.l	$280007
	dc.l	$280007
	dc.l	$5D000002
	dc.l	$50003
	dc.l	$50000
	dc.l	$42000B
	dc.l	$42000B
	dc.l	$31000045
	dc.l	$B0045
	dc.l	$B3200
	dc.l	$48000B
	dc.l	$48000B
	dc.l	$33000009
	dc.l	$90009
	dc.l	$94100
	dc.l	$C0009
	dc.l	$C0009
	dc.l	$5300000F
	dc.l	$9000F
	dc.l	$94400
	dc.l	$120009
	dc.l	$120009
	dc.l	$46000015
	dc.l	$90015
	dc.l	$94700
	dc.l	$180009
	dc.l	$180009
	dc.l	$4800001B
	dc.l	$9001B
	dc.l	$94A00
	dc.l	$1E0009
	dc.l	$1E0009
	dc.l	$4B000021
	dc.l	$90021
	dc.l	$94C00
	dc.l	$240009
	dc.l	$240009
	dc.l	$3B000027
	dc.l	$90027
	dc.l	$92700
	dc.l	$2A0009
	dc.l	$2A0009
	dc.l	$23000002
	dc.l	$50003
	dc.l	$50000
	dc.l	$420009
	dc.l	$420009
	dc.l	$34000045
	dc.l	$90045
	dc.l	$93500
	dc.l	$480009
	dc.l	$480009
	dc.l	$36000007
	dc.l	$B0007
	dc.l	$B3C00
	dc.l	$A000B
	dc.l	$A000B
	dc.l	$5A00000D
	dc.l	$B000D
	dc.l	$B5800
	dc.l	$10000B
	dc.l	$10000B
	dc.l	$43000013
	dc.l	$B0013
	dc.l	$B5600
	dc.l	$16000B
	dc.l	$16000B
	dc.l	$42000019
	dc.l	$B0019
	dc.l	$B4E00
	dc.l	$1C000B
	dc.l	$1C000B
	dc.l	$4D00001F
	dc.l	$B001F
	dc.l	$B2C00
	dc.l	$22000B
	dc.l	$22000B
	dc.l	$2E000025
	dc.l	$B0025
	dc.l	$B2F00
	dc.l	$20005
	dc.l	$30005
	dc.l	$48
	dc.l	$D0048
	dc.l	$D2E00
	dc.l	$420007
	dc.l	$420007
	dc.l	$37000045
	dc.l	$70045
	dc.l	$73800
	dc.l	$480007
	dc.l	$480007
	dc.l	$3900000A
	dc.l	$D0022
	dc.l	$D2020
	dc.l	$20202020
	dc.l	$20202053
	dc.l	$70616365
	dc.l	$2D
	dc.l	$5002D
	dc.l	$56200
	dc.l	$20007
	dc.l	$40007
	dc.l	$54616200
	dc.l	$4B000B
	dc.l	$4B000D
	dc.l	$52657400
	dc.l	$2D0007
	dc.l	$2D0009
	dc.l	$52657400
	dc.l	$20002
	dc.l	$20002
	dc.l	$65000033
	dc.l	$50036
	dc.l	$54465
	dc.l	$6C000002
	dc.l	$50003
	dc.l	$50000
	dc.l	$20005
	dc.l	$30005
	dc.l	2
	dc.l	$50003
	dc.l	$50000
	dc.l	$4B0007
	dc.l	$4B0007
	dc.l	$2D000002
	dc.l	$50003
	dc.l	$50000
	dc.l	$370009
	dc.l	$380009
	dc.l	$55410000
	dc.l	$37000B
	dc.l	$38000B
	dc.l	$44410000
	dc.l	$3B000B
	dc.l	$3C000B
	dc.l	$52410000
	dc.l	$33000B
	dc.l	$34000B
	dc.l	$4C410000
	dc.l	$60002
	dc.l	$70002
	dc.l	$46310000
	dc.l	$A0002
	dc.l	$B0002
	dc.l	$46320000
	dc.l	$E0002
	dc.l	$F0002
	dc.l	$46330000
	dc.l	$120002
	dc.l	$130002
	dc.l	$46340000
	dc.l	$160002
	dc.l	$170002
	dc.l	$46350000
	dc.l	$1B0002
	dc.l	$1C0002
	dc.l	$46360000
	dc.l	$1F0002
	dc.l	$200002
	dc.l	$46370000
	dc.l	$230002
	dc.l	$240002
	dc.l	$46380000
	dc.l	$270002
	dc.l	$280002
	dc.l	$46390000
	dc.l	$2B0002
	dc.l	$2C0002
	dc.l	$46300000
	dc.l	$420005
	dc.l	$420005
	dc.l	$5B000045
	dc.l	$50045
	dc.l	$55D00
	dc.l	$480005
	dc.l	$480005
	dc.l	$2F00004B
	dc.l	$5004B
	dc.l	$52A00
	dc.l	$4B0009
	dc.l	$4B0009
	dc.l	$2B000039
	dc.l	$5003C
	dc.l	$54865
	dc.l	$6C700000
	dc.l	$2000B
	dc.l	$4000B
	dc.l	$53687400
	dc.l	$28000B
	dc.l	$2D000B
	dc.l	$53686966
	dc.l	$74000006
	dc.l	$90006
	dc.l	$96F00
	dc.l	$20009
	dc.l	$30009
	dc.l	$43740000
	dc.l	$2000D
	dc.l	$3000D
	dc.l	$416C0000
	dc.l	$29000D
	dc.l	$2A000D
	dc.l	$416C0000
	dc.l	$6000D
	dc.l	$7000D
	dc.l	$416D0000
	dc.l	$25000D
	dc.l	$26000D
	dc.l	$416D0000
lbW01BA3C:
	dc.w	2
	dc.w	$12
	dc.w	8
	dc.w	$12
	dc.b	'Install',0,0
	dc.b	13
	dc.b	0
	dc.b	$12
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$12
	dc.b	' Save',0,0
	dc.b	$18
	dc.b	0
	dc.b	$12
	dc.b	0
	dc.b	$1E
	dc.b	0
	dc.b	$12
	dc.b	' Load',0,0
	dc.b	'#',0
	dc.b	$12
	dc.b	0
	dc.b	$29
	dc.b	0
	dc.b	$12
	dc.b	' Exit',0,0
	dc.b	1
	dc.b	0
	dc.b	1
	dc.b	0
	dc.b	$4C
	dc.b	0
	dc.b	14
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	1
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$2A
	dc.b	0
	dc.b	$16
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	0
ascii.MSG20:
	dc.b	0
	dc.b	12
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	14
	dc.b	0
	dc.b	$11
	dc.b	'Sht',0,0
	dc.b	$10
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$12
	dc.b	0
	dc.b	$11
	dc.b	'Alt',0,0
	dc.b	$14
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$16
	dc.b	0
	dc.b	$11
	dc.b	'Ctl',0,0
	dc.b	$19
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	' ',0
	dc.b	$11
	dc.b	'CapsLock',0,0
	dc.b	0
	dc.b	$22
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$2B
	dc.b	0
	dc.b	$11
	dc.b	'Repeatable',0,0
	dc.b	0
	dc.b	12
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	$13
	dc.b	'String',0,0
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$15
	dc.b	0
	dc.b	$13
	dc.b	'NOP',0,0
	dc.b	$17
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$1C
	dc.b	0
	dc.b	$13
	dc.b	'DownUp',0,0
	dc.b	0
	dc.b	$1F
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$24
	dc.b	0
	dc.b	$13
	dc.b	'  OK',0,0
	dc.b	0
	dc.b	$26
	dc.b	0
	dc.b	$13
	dc.b	0
	dc.b	$2B
	dc.b	0
	dc.b	$13
	dc.b	'Cancel',0,0
	dc.b	0
	dc.b	12
	dc.b	0
	dc.b	$16
	dc.b	0
	dc.b	$2B
	dc.b	0
	dc.b	$16
	dc.b	0
	dc.b	0
	dc.b	0
	dc.b	1
	dc.b	0
	dc.b	$10
	dc.b	0
	dc.b	$2C
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	0
	dc.b	$80
	dc.b	2
	dc.b	0
	dc.b	$11
	dc.b	0
	dc.b	7
	dc.b	0
	dc.b	$11
	dc.b	'Code:',0
	dc.b	$80
	dc.b	2
	dc.b	0
	dc.b	$16
	dc.b	0
	dc.b	8
	dc.b	0
	dc.b	$16
	dc.b	'String:',0,0
	dc.b	$2E
	dc.b	0
	dc.b	$10
	dc.b	0
	dc.b	$4C
	dc.b	0
	dc.b	$17
	dc.b	0
	dc.b	0
	dc.b	$80
	dc.b	$2E
	dc.b	0
	dc.b	$10
	dc.b	0
	dc.b	$34
	dc.b	0
	dc.b	$17
	dc.b	'NoQual:    Sh:    Al:  AlSh:    Ct:  CtSh:  '
	dc.b	'CtAl:CtAlSh:',0,0
Scanningmemor.MSG:
	dc.b	'Scanning memory for buffer, please wait.',$D,0

lbC01BBC8:
	jmp	$1B06A8.L

lbC01BBCE:
	movem.l	D0/A0,-(SP)
	lea	lbL01B5E4(PC),A0
	tst.l	$1E2BA8.L
	bne.w	lbC01BBE8
	moveq	#$68,D0
	jsr	$1B5E4C.L
lbC01BBE8:
	movem.l	(SP)+,D0/A0
	rts

	jsr	lbC01A0DC(PC)
	bpl.w	lbC01BC04
	lea	Multitaskings.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC01BC08

lbC01BC04:
	jsr	lbC01A1DA(PC)
lbC01BC08:
	tst.b	$1E2AF6.L
	bne.w	lbC01BC20
	lea	Scanningmemor.MSG(PC),A0
	jsr	$1AB4A8.L
	jsr	lbC0177D6(PC)
lbC01BC20:
	lea	Cantallocenou.MSG(PC),A1
	cmpi.l	#$5000,$1E2AEC.L
	bls.w	lbC01BE1C
	jsr	$1C505A.L
	bpl.w	lbC01BC4A
	movea.l	A1,A0
	jsr	$1AB4A8.L
	jsr	lbC018112(PC)
	suba.l	A1,A1
lbC01BC4A:
	move.l	A1,$1E2BA8.L
	tst.l	$1E2BA8.L
	beq.w	lbC01BC76
	jsr	$1C4BB0.L
	bpl.w	lbC01BC78
	movea.l	A1,A0
	jsr	$1AB4A8.L
	jsr	lbC018112(PC)
	clr.l	$1E2BA8.L
lbC01BC76:
	suba.l	A3,A3
lbC01BC78:
	move.l	A3,$1E2844.L
	lea	lbL01B5E4(PC),A0
	jsr	$1B5B12.L
	jsr	$1B5A98.L
	jsr	lbC01BBCE(PC)
	clr.b	$1E2834.L
lbC01BC98:
	lea	lbW01BA3C(PC),A0
	jsr	$1B5A98.L
	jsr	lbC01BBCE(PC)
	lea	Statusok.MSG(PC),A0
	jsr	lbC01B5CC(PC)
	lea	lbL01B5E4(PC),A0
	move.w	#$200,D4
	tst.l	$1E2844.L
	bne.w	lbC01BCC6
	moveq	#$6A,D0
	bra.w	lbC01BCD8

lbC01BCC6:
	jsr	$1B5C54.L
	tst.l	D0
	bmi.s	lbC01BC98
	tst.w	D0
	bpl.w	lbC01BCD8
	neg.w	D0
lbC01BCD8:
	cmpi.w	#$6B,D0
	bhi.s	lbC01BC98
	lea	lbL01B5E4(PC),A0
	cmpi.w	#$6B,D0
	beq.w	lbC01BDE8
	cmpi.w	#$68,D0
	bne.w	lbC01BD06
	tst.l	$1E2BA8.L
	beq.s	lbC01BC98
	jsr	$1C4200.L
	bpl.s	lbC01BC98
	bra.w	lbC01BE06

lbC01BD06:
	cmpi.w	#$69,D0
	bne.w	lbC01BD22
	clr.b	$1E2834.L
	jsr	$1C400E.L
	bpl.w	lbC01BC98
	bra.w	lbC01BE06

lbC01BD22:
	cmpi.w	#$6A,D0
	bne.w	lbC01BD48
	clr.b	$1E2834.L
	jsr	$1C3EA4.L
	bpl.w	lbC01BC98
	tst.l	$1E2BA8.L
	beq.w	lbC01BDE8
	bra.w	lbC01BE06

lbC01BD48:
	cmpi.w	#$5F,D0
	bls.w	lbC01BDBA
	cmpi.w	#$62,D0
	bhi.w	lbC01BD7C
	bchg	#0,$1E2834.L
	moveq	#$62,D0
	jsr	$1B5E20.L
	moveq	#$60,D0
	jsr	$1B5E20.L
	moveq	#$61,D0
	jsr	$1B5E20.L
	bra.w	lbC01BC98

lbC01BD7C:
	cmpi.w	#$63,D0
	bhi.w	lbC01BD96
	bchg	#2,$1E2834.L
	jsr	$1B5E20.L
	bra.w	lbC01BC98

lbC01BD96:
	cmpi.w	#$65,D0
	bhi.w	lbC01BDBA
	bchg	#1,$1E2834.L
	moveq	#$65,D0
	jsr	$1B5E20.L
	moveq	#$64,D0
	jsr	$1B5E20.L
	bra.w	lbC01BC98

lbC01BDBA:
	move.w	D0,$1E2836.L
	jsr	$1B5E20.L
	jsr	$1C439C.L
	bpl.w	lbC01BDD8
	lea	Stringtoolong.MSG(PC),A0
	bra.w	lbC01BDF2

lbC01BDD8:
	move.w	$1E2836.L,D0
	jsr	$1B5E20.L
	bra.w	lbC01BC98

lbC01BDE8:
	jsr	$1B5BF8.L
	bra.w	lbC01BE24

lbC01BDF2:
	move.l	A0,-(SP)
	lea	lbL01B5E4(PC),A0
	move.w	$1E2836.L,D0
	jsr	$1B5E20.L
	movea.l	(SP)+,A0
lbC01BE06:
	jsr	lbC01B5CC(PC)
	jsr	lbC018112(PC)
	clr.w	$1E2698.L
	lea	lbL01B5E4(PC),A0
	bra.w	lbC01BC98

lbC01BE1C:
	movea.l	A1,A0
	jsr	$1AB4A8.L
lbC01BE24:
	rts

Cantallocenou.MSG:
	dc.b	'Can''t alloc enough memory',$D,0
Kickstartvers.MSG:
	dc.b	'Kickstartversion 2.0 !',$D
Cantfinddefau.MSG:
	dc.b	'Can''t find default keymap',$D,0
lbB01BE73:
	dc.b	2
	dc.b	$15
keymapcorrupt.MSG:
	dc.b	'keymap corrupt',$D,0
Stringtoolong.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'String too long - key may be corrupt',0
	dc.b	2
	dc.b	$15
	dc.b	'not yet implemented',$D,0
Statusok.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'Status: o.k.                        ',0
FatalErrorcou.MSG:
	dc.b	'Fatal Error - couldnot install keymap',$D,0
Failedkeymapt.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'Failed - keymap too large',$D,0
Notenoughmemo.MSG:
	dc.b	'Not enough memory to install!',$D,0
Keymapinstall.MSG:
	dc.b	'Keymap installed succesfully!',$D,0
Diskerror.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'Disk error !',0
Keymapsavedsu.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'Keymap saved successfully',$D,0
Unrecognizedf.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'Unrecognized file structure',0
Filenameexpec.MSG:
	dc.b	2
	dc.b	$15
	dc.b	'Filename expected',0

	movem.l	D1-D5/A1/A2,-(SP)
	sf	$1E2B33.L
	jsr	lbC0197C8(PC)
	st	$1E2B33.L
	tst.w	D0
	bne.w	lbC01BFEE
	lea	Filenameexpec.MSG(PC),A0
	moveq	#-1,D0
	bra.w	lbC01C0FC

lbC01BFEE:
	move.w	D0,D1
	move.w	#$100,$DFF096.L
	lea	$5000.w,A0
	jsr	$1BA028.L
	moveq	#0,D0
	move.w	D1,D0
	lea	$1E26C8.L,A1
	jsr	$1BC812.L
	bpl.w	lbC01C026
lbC01C016:
	jsr	$1BA088.L
lbC01C01C:
	lea	Diskerror.MSG(PC),A0
	moveq	#-1,D0
	bra.w	lbC01C0FC

lbC01C026:
	cmpi.l	#$5000,$1E2A88.L
	bls.w	lbC01C044
	jsr	$1BA088.L
	lea	Failedkeymapt.MSG(PC),A0
	moveq	#-1,D0
	bra.w	lbC01C0FC

lbC01C044:
	move.l	$1E2A88.L,D0
	lea	$1E45E8.L,A2
	jsr	$1BC5E0.L
	bmi.s	lbC01C016
	jsr	$1BA088.L
	bmi.s	lbC01C01C
	lea	$1E45E8.L,A0
	cmpi.l	#$3F3,(A0)
	beq.w	lbC01C07A
lbC01C070:
	lea	Unrecognizedf.MSG(PC),A0
	moveq	#-1,D0
	bra.w	lbC01C0FC

lbC01C07A:
	lea	$18(A0),A0
	cmpi.l	#$3E9,(A0)+
	bne.s	lbC01C070
	move.l	(A0)+,D0
	lsl.w	#2,D0
	subi.w	#15,D0
	cmpi.w	#$3400,D0
	bhi.s	lbC01C070
	lea	14(A0),A0
	lea	$100E.L,A1
lbC01C09E:
	move.b	(A0)+,(A1)+
	dbra	D0,lbC01C09E
	move.l	A0,D0
	btst	#0,D0
	bne.s	lbC01C070
	cmpi.l	#$3EC,(A0)+
	bne.s	lbC01C070
	lea	$1E45E8.L,A1
	move.l	(A0)+,D0
	subq.l	#1,D0
	tst.l	(A0)+
	bne.s	lbC01C070
lbC01C0C2:
	move.l	(A0)+,D1
	move.l	A1,D2
	add.l	D2,0(A1,D1.L)
	dbra	D0,lbC01C0C2
	tst.l	(A0)+
	bne.s	lbC01C070
	cmpi.l	#$3F2,(A0)+
	bne.s	lbC01C070
	lea	$100E.L,A1
	jsr	$1C4BA6.L
	bpl.w	lbC01C0F4
	lea	lbB01BE73(PC),A0
	moveq	#-1,D0
	bra.w	lbC01C0FC

lbC01C0F4:
	move.l	A3,$1E2844.L
	moveq	#0,D0
lbC01C0FC:
	movem.l	D0/D1/A0,-(SP)
	move.w	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	lea	lbL01B5E4(PC),A0
	jsr	$1B5A98.L
	jsr	lbC01BBCE(PC)
	move.w	#$8100,$DFF096.L
	movem.l	(SP)+,D0/D1/A0
	movem.l	(SP)+,D1-D5/A1/A2
	tst.l	D0
	rts

	moveq	#0,D0
	bra.s	lbC01C0FC

	movem.l	D1-D5/A1/A2,-(SP)
	sf	$1E2B33.L
	jsr	lbC0197C8(PC)
	st	$1E2B33.L
	tst.w	D0
	beq.w	lbC01C322
	move.w	D0,$1E2840.L
	move.w	#$100,$DFF096.L
	move.l	$1E2844.L,D0
	sub.l	$1E2AE8.L,D0
	subi.l	#$80,D0
	addi.l	#14,D0
	moveq	#0,D1
	move.w	$1E2840.L,D1
	add.l	D1,D0
	addq.l	#1,D0
	addq.l	#3,D0
	andi.w	#$FFFC,D0
	lsr.l	#2,D0
	move.l	D0,$1E2BAC.L
	lea	$1E45E8.L,A0
	move.l	#$3F3,(A0)+
	clr.l	(A0)+
	move.l	#1,(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	move.l	$1E2BAC.L,(A0)+
	move.l	#$3E9,(A0)+
	move.l	$1E2BAC.L,(A0)+
	clr.l	(A0)+
	clr.l	(A0)+
	clr.w	(A0)+
	move.l	$1E2844.L,D0
	sub.l	$1E2AE8.L,D0
	subi.l	#$80,D0
	move.w	D0,D1
	addi.l	#14,D0
	move.l	D0,(A0)+
	movea.l	$1E2AE8.L,A1
	lea	$80(A1),A1
	subq.w	#1,D1
	move.l	A0,$1E2BB0.L
	move.l	A1,$1E2BB4.L
lbC01C1F2:
	move.b	(A1)+,(A0)+
	dbra	D1,lbC01C1F2
	move.w	$1E2840.L,D0
	subq.w	#1,D0
	lea	$1E26C8.L,A1
lbC01C206:
	move.b	(A1)+,(A0)+
	dbra	D0,lbC01C206
	clr.b	(A0)+
	move.l	A0,D0
	addq.l	#3,D0
	andi.w	#$FFFC,D0
	movea.l	D0,A0
	move.l	#$3EC,(A0)+
	movea.l	A0,A2
	lea	4(A0),A0
	clr.l	(A0)+
	moveq	#1,D3
	move.l	#10,(A0)+
	moveq	#14,D0
	movea.l	$1E2BB0.L,A1
	moveq	#14,D1
	sub.l	$1E2BB4.L,D1
	lea	-14(A1),A1
	moveq	#7,D2
lbC01C244:
	add.l	D1,0(A1,D0.W)
	move.l	D0,(A0)+
	addq.w	#1,D3
	addq.w	#4,D0
	dbra	D2,lbC01C244
	move.w	#$B6,D0
	move.w	#$4E,D4
	moveq	#0,D2
lbC01C25C:
	btst	#6,0(A1,D4.W)
	beq.w	lbC01C26E
	add.l	D1,0(A1,D0.W)
	move.l	D0,(A0)+
	addq.w	#1,D3
lbC01C26E:
	addq.w	#4,D0
	addq.w	#1,D4
	addq.w	#1,D2
	cmpi.w	#$67,D2
	bls.s	lbC01C25C
	move.l	D3,(A2)
	clr.l	(A0)+
	move.l	#$3F2,(A0)+
	move.l	A0,D0
	subi.l	#$1000,D0
	move.w	D0,$1E2BAC.L
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	$1E26C8.L,A1
	moveq	#0,D0
	move.w	$1E2840.L,D0
	jsr	$1BB828.L
	bpl.w	lbC01C2C2
lbC01C2B4:
	jsr	$1BA088.L
	lea	Diskerror.MSG(PC),A0
	bra.w	lbC01C2EC

lbC01C2C2:
	lea	$1E45E8.L,A2
	moveq	#0,D0
	move.w	$1E2BAC.L,D0
	jsr	$1BBB5A.L
	bmi.s	lbC01C2B4
	jsr	$1BB8B2.L
	bmi.s	lbC01C2B4
	jsr	$1BA088.L
	bmi.s	lbC01C2B4
	lea	Keymapsavedsu.MSG(PC),A0
lbC01C2EC:
	moveq	#-1,D0
lbC01C2EE:
	movem.l	D0/D1/A0,-(SP)
	move.w	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	lea	lbL01B5E4(PC),A0
	jsr	$1B5A98.L
	jsr	lbC01BBCE(PC)
	move.w	#$8100,$DFF096.L
	movem.l	(SP)+,D0/D1/A0
	movem.l	(SP)+,D1-D5/A1/A2
	tst.l	D0
	rts

lbC01C322:
	moveq	#0,D0
	bra.s	lbC01C2EE

	lea	$1E45E8.L,A0
	move.l	$1E2844.L,D0
	sub.l	$1E2AE8.L,D0
	subi.l	#$80,D0
	cmpi.w	#$4000,D0
	bls.w	lbC01C374
	lea	Failedkeymapt.MSG(PC),A0
	moveq	#-1,D0
	rts

lbC01C34E:
	move.l	A0,-(SP)
	jsr	lbC01A1DA(PC)
	movea.l	(SP)+,A0
lbC01C356:
	move.w	#$8100,$DFF096.L
	move.l	A0,-(SP)
	jsr	$1B5BF8.L
	movea.l	(SP)+,A0
	jsr	$1AB4A8.L
	lea	4(SP),SP
	rts

lbC01C374:
	move.w	#$100,$DFF096.L
	move.w	D0,$1E2BAC.L
	subq.w	#1,D0
	movea.l	$1E2AE8.L,A1
	lea	$80(A1),A1
	move.l	A1,$1E2BB4.L
lbC01C394:
	move.b	(A1)+,(A0)+
	dbra	D0,lbC01C394
	jsr	$1A8AA6.L
	jsr	lbC01A0DC(PC)
	bpl.w	lbC01C3AE
	lea	FatalErrorcou.MSG(PC),A0
	bra.s	lbC01C356

lbC01C3AE:
	movea.l	4.L,A6
	moveq	#0,D0
	move.w	$1E2BAC.L,D0
	move.l	#$10001,D1
	movea.l	4.L,A6
	pea	-$C6(A6)
	jsr	lbC0181D0(PC)
	lea	Notenoughmemo.MSG(PC),A0
	move.l	D0,$1E2BB0.L
	beq.w	lbC01C34E
	jsr	lbC01A1DA(PC)
	move.w	#$100,$DFF096.L
	move.w	$1E2BAC.L,D1
	movea.l	$1E2BB0.L,A0
	lea	$1E45E8.L,A1
	subq.w	#1,D1
lbC01C3FE:
	move.b	(A1)+,D0
	jsr	$1AC0A8.L
	lea	1(A0),A0
	dbra	D1,lbC01C3FE
	jsr	$1C4320.L
	movea.l	$1E2BA8.L,A1
	movea.l	$1E2BB0.L,A2
	moveq	#7,D1
lbC01C422:
	movea.l	A2,A0
	jsr	$1ADBFC.L
	movea.l	A1,A0
	jsr	$1ADBEA.L
	lea	4(A1),A1
	lea	4(A2),A2
	dbra	D1,lbC01C422
	lea	Keymapinstall.MSG(PC),A0
	bra.w	lbC01C356

	movem.l	D0-D2/A0-A2,-(SP)
	movea.l	$1E2BB0.L,A0
	move.l	A0,D1
	sub.l	$1E2BB4.L,D1
	moveq	#7,D2
lbC01C45A:
	jsr	$1ADBFC.L
	add.l	D1,D0
	jsr	$1ADBEA.L
	lea	4(A0),A0
	dbra	D2,lbC01C45A
	movea.l	$1E2BB0.L,A0
	jsr	$1ADBFC.L
	movea.l	D0,A1
	lea	4(A0),A0
	jsr	$1ADBFC.L
	movea.l	D0,A2
	moveq	#0,D2
lbC01C48C:
	movea.l	A1,A0
	jsr	$1ABF94.L
	btst	#6,D0
	beq.w	lbC01C4AC
	movea.l	A2,A0
	jsr	$1ADBFC.L
	add.l	D1,D0
	jsr	$1ADBEA.L
lbC01C4AC:
	lea	1(A1),A1
	lea	4(A2),A2
	addq.w	#1,D2
	cmpi.w	#$67,D2
	bls.s	lbC01C48C
	movem.l	(SP)+,D0-D2/A0-A2
	rts

	movem.l	D1-D7/A0-A5,-(SP)
	move.w	#$7C,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	lea	ascii.MSG20(PC),A0
	jsr	$1B5A98.L
	movea.l	$1E2AE8.L,A2
	lea	$80(A2),A2
	move.w	$1E2836.L,D1
	swap	D1
	jsr	$1C4FD8.L
	movea.l	0(A2,D7.W),A1
	move.b	0(A1,D1.W),$1E2838.L
	movea.l	4(A2,D7.W),A1
	lea	0(A1,D6.W),A1
	move.l	A1,$1E283C.L
	movea.l	8(A2,D7.W),A1
	move.w	D1,D2
	move.w	D2,D3
	lsr.w	#3,D2
	andi.w	#7,D3
	btst	D3,0(A1,D2.W)
	sne	$1E2841.L
	movea.l	12(A2,D7.W),A1
	btst	D3,0(A1,D2.W)
	sne	$1E2840.L
	jsr	$1C483E.L
	jsr	$1C48AC.L
	moveq	#0,D0
	move.b	$1E2834.L,D0
	lea	$1E0A5E.L,A1
	clr.w	$1E269A.L
	jsr	$1C4B30.L
	bpl.w	lbC01C562
	moveq	#0,D0
lbC01C562:
	lea	$1E0B5E.L,A0
	clr.b	0(A0,D0.W)
	tst.w	D0
	beq.w	lbC01C578
	jsr	$1C4A68.L
lbC01C578:
	lea	$1E0B5E.L,A1
	move.b	$1E2838.L,$1E2839.L
lbC01C588:
	moveq	#$7F,D3
	moveq	#$20,D6
	move.l	#$C0016,D7
	jsr	lbC019D8C(PC)
lbC01C596:
	lea	ascii.MSG20(PC),A0
	move.w	#$200,D4
	jsr	$1B5C54.L
	tst.l	D0
	bmi.s	lbC01C596
	tst.w	D0
	bpl.w	lbC01C5C2
	neg.w	D0
	cmpi.w	#$44,D0
	beq.w	lbC01C654
	cmpi.w	#$45,D0
	beq.w	lbC01C63C
	bra.s	lbC01C596

lbC01C5C2:
	cmpi.w	#2,D0
	bhi.w	lbC01C5D8
	bchg	D0,$1E2839.L
lbC01C5D0:
	jsr	$1B5E20.L
	bra.s	lbC01C596

lbC01C5D8:
	cmpi.w	#3,D0
	bne.w	lbC01C5E8
	not.b	$1E2841.L
	bra.s	lbC01C5D0

lbC01C5E8:
	cmpi.w	#4,D0
	bne.w	lbC01C5F8
	not.b	$1E2840.L
	bra.s	lbC01C5D0

lbC01C5F8:
	cmpi.w	#5,D0
	bne.w	lbC01C602
	bra.s	lbC01C596

lbC01C602:
	cmpi.w	#6,D0
	bne.w	lbC01C614
	bchg	#7,$1E2839.L
	bra.s	lbC01C5D0

lbC01C614:
	cmpi.w	#7,D0
	bne.w	lbC01C620
	bra.w	lbC01C596

lbC01C620:
	cmpi.w	#8,D0
	beq.w	lbC01C654
	cmpi.w	#9,D0
	beq.w	lbC01C63C
	cmpi.w	#10,D0
	bhi.w	lbC01C596
	bra.w	lbC01C588

lbC01C63C:
	moveq	#0,D0
lbC01C63E:
	move.l	D0,-(SP)
	move.w	#$7C,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	move.l	(SP)+,D0
	bra.w	lbC01C8D8

lbC01C654:
	lea	$1E0B5E.L,A1
	jsr	$1C47BA.L
	move.w	D0,$1E283A.L
	moveq	#0,D1
	btst	#6,$1E2838.L
	beq.w	lbC01C706
	movea.l	$1E283C.L,A1
	movea.l	(A1),A1
	movea.l	A1,A2
	movea.l	A1,A3
	moveq	#0,D0
	moveq	#0,D1
	moveq	#0,D2
	move.b	1(A1),D1
	lsr.w	#1,D1
	subq.w	#1,D1
lbC01C68E:
	move.b	(A1),D2
	add.w	D2,D0
	lea	2(A1),A1
	dbra	D1,lbC01C68E
	lea	0(A1,D0.W),A1
	exg	D0,A1
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A1
lbC01C6A8:
	cmpa.l	$1E2844.L,A1
	beq.w	lbC01C6B6
	move.b	(A1)+,(A2)+
	bra.s	lbC01C6A8

lbC01C6B6:
	move.l	A2,$1E2844.L
	move.l	A1,D0
	sub.l	A2,D0
	movea.l	$1E2AE8.L,A2
	lea	$80(A2),A2
	moveq	#0,D1
	swap	D1
	jsr	$1C4FD8.L
	movea.l	0(A2,D7.W),A1
	lea	0(A1,D1.W),A1
	movea.l	4(A2,D7.W),A2
	lea	0(A2,D6.W),A2
	moveq	#-1,D1
lbC01C6E6:
	addq.w	#1,D1
	cmpi.w	#$67,D1
	bhi.w	lbC01C706
	btst	#6,(A1)+
	beq.w	lbC01C700
	cmpa.l	(A2),A3
	bge.w	lbC01C700
	sub.l	D0,(A2)
lbC01C700:
	lea	4(A2),A2
	bra.s	lbC01C6E6

lbC01C706:
	movea.l	$1E2AE8.L,A2
	lea	$80(A2),A2
	move.w	$1E2836.L,D1
	swap	D1
	jsr	$1C4FD8.L
	movem.l	D2/D3,-(SP)
	move.w	D1,D2
	move.w	D1,D3
	lsr.w	#3,D2
	andi.w	#7,D3
	movea.l	8(A2,D7.W),A5
	bclr	D3,0(A5,D2.W)
	tst.b	$1E2841.L
	beq.w	lbC01C742
	bset	D3,0(A5,D2.W)
lbC01C742:
	movea.l	12(A2,D7.W),A5
	bclr	D3,0(A5,D2.W)
	tst.b	$1E2840.L
	beq.w	lbC01C758
	bset	D3,0(A5,D2.W)
lbC01C758:
	movem.l	(SP)+,D2/D3
	movea.l	0(A2,D7.W),A1
	lea	0(A1,D1.W),A1
	movea.l	4(A2,D7.W),A2
	lea	0(A2,D6.W),A2
	move.l	$1E2844.L,(A2)
	bset	#6,$1E2839.L
	move.b	$1E2839.L,D0
	or.b	$1E2834.L,D0
	move.b	D0,(A1)
	move.w	D0,D5
	andi.w	#7,D5
	moveq	#0,D3
	move.b	$1E2838.L,D3
	move.l	D3,D4
	andi.w	#7,D3
	andi.w	#$40,D4
	moveq	#0,D2
	lea	$1E0A5E.L,A3
	movea.l	$1E2844.L,A4
	movea.l	A4,A0
	moveq	#1,D6
	btst	#0,D5
	beq.w	lbC01C7BC
	lsl.w	#1,D6
lbC01C7BC:
	btst	#1,D5
	beq.w	lbC01C7C6
	lsl.w	#1,D6
lbC01C7C6:
	btst	#2,D5
	beq.w	lbC01C7D0
	lsl.w	#1,D6
lbC01C7D0:
	lsl.w	#1,D6
	sf	$1E2835.L
lbC01C7D8:
	move.w	D2,D1
	and.w	D5,D1
	cmp.w	D1,D2
	bne.w	lbC01C7FC
	cmp.b	$1E2834.L,D2
	beq.w	lbC01C896
	jsr	$1C4EFA.L
	tst.w	D0
	bpl.w	lbC01C826
	clr.b	(A0)+
	move.b	D6,(A0)+
lbC01C7FC:
	addq.w	#1,D2
	cmpi.w	#7,D2
	bls.s	lbC01C7D8
	move.l	A4,D0
	add.l	D6,D0
	exg	D0,D0
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,D0
	move.l	D0,$1E2844.L
	tst.b	$1E2835.L
	bne.w	lbC01C8D2
	bra.w	lbC01C63C

lbC01C826:
	btst	#6,D4
	beq.w	lbC01C862
	movea.l	(A3),A5
	move.w	D0,D7
	moveq	#0,D0
	moveq	#0,D1
	move.b	0(A5,D7.W),D0
	beq.w	lbC01C846
	cmpi.w	#$7F,D6
	bhi.w	lbC01C8C6
lbC01C846:
	move.b	1(A5,D7.W),D1
	move.b	D0,(A0)+
	move.b	D6,(A0)+
	lea	0(A5,D1.W),A5
	subq.w	#1,D0
	bmi.s	lbC01C7FC
lbC01C856:
	move.b	(A5)+,0(A4,D6.W)
	addq.w	#1,D6
	dbra	D0,lbC01C856
	bra.s	lbC01C7FC

lbC01C862:
	cmpi.w	#$7F,D6
	bhi.w	lbC01C8C6
	move.b	#1,(A0)+
	move.b	D6,(A0)+
	move.b	0(A3,D0.W),D7
	cmpi.b	#7,D3
	bne.w	lbC01C88C
	btst	#2,D2
	beq.w	lbC01C88C
	bclr	#5,D7
	bclr	#6,D7
lbC01C88C:
	move.b	D7,0(A4,D6.W)
	addq.w	#1,D6
	bra.w	lbC01C7FC

lbC01C896:
	move.w	$1E283A.L,D0
	beq.w	lbC01C8A8
	cmpi.w	#$7F,D6
	bhi.w	lbC01C8C6
lbC01C8A8:
	move.b	D0,(A0)+
	move.b	D6,(A0)+
	lea	$1E0B5E.L,A5
	subq.w	#1,D0
	bmi.w	lbC01C7FC
lbC01C8B8:
	move.b	(A5)+,0(A4,D6.W)
	addq.w	#1,D6
	dbra	D0,lbC01C8B8
	bra.w	lbC01C7FC

lbC01C8C6:
	clr.w	(A0)+
	st	$1E2835.L
	bra.w	lbC01C7FC

lbC01C8D2:
	moveq	#-1,D0
	bra.w	lbC01C63E

lbC01C8D8:
	tst.l	D0
	movem.l	(SP)+,D1-D7/A0-A5
	rts

	movem.l	D1/D2/A0-A2,-(SP)
	moveq	#0,D1
	movea.l	A1,A0
lbC01C8E8:
	tst.b	(A1)
	beq.w	lbC01C95C
	cmpi.b	#$3C,(A1)
	bne.w	lbC01C944
	move.b	1(A1),D0
	jsr	$1AEE3E.L
	cmpi.b	#$52,D0
	beq.w	lbC01C94A
	cmpi.b	#$24,D0
	bne.w	lbC01C944
	addq.w	#2,A1
	moveq	#0,D2
lbC01C914:
	move.b	(A1),D0
	beq.w	lbC01C936
	addq.l	#1,A1
	jsr	$1AEE3E.L
	jsr	$1AE5D0.L
	or.b	D0,D2
	cmpi.b	#$3E,(A1)
	beq.w	lbC01C936
	lsl.b	#4,D2
	bra.s	lbC01C914

lbC01C936:
	move.b	D2,(A0)+
	addq.w	#1,D1
	tst.b	(A1)
	beq.w	lbC01C95C
	addq.l	#1,A1
	bra.s	lbC01C8E8

lbC01C944:
	move.b	(A1)+,(A0)+
	addq.w	#1,D1
	bra.s	lbC01C8E8

lbC01C94A:
	cmpi.b	#$3E,2(A1)
	bne.s	lbC01C944
	addq.l	#3,A1
	move.b	#13,(A0)+
	addq.w	#1,D1
	bra.s	lbC01C8E8

lbC01C95C:
	move.l	D1,D0
	movem.l	(SP)+,D1/D2/A0-A2
	rts

	movem.l	D0-D3/A0-A3,-(SP)
	move.b	$1E2838.L,D1
	btst	#7,D1
	beq.w	lbC01C982
	clr.l	$1E0A5E.L
lbC01C97C:
	movem.l	(SP)+,D0-D3/A0-A3
	rts

lbC01C982:
	btst	#6,D1
	bne.w	lbC01C998
	movea.l	$1E283C.L,A0
	move.l	(A0),$1E0A5E.L
	bra.s	lbC01C97C

lbC01C998:
	movea.l	$1E283C.L,A0
	movea.l	(A0),A1
	moveq	#0,D0
	move.b	1(A1),D0
	lsr.w	#1,D0
	subq.w	#1,D0
	moveq	#0,D1
	moveq	#0,D2
	lea	$1E075E.L,A3
lbC01C9B4:
	move.b	(A1),D2
	add.w	D2,D1
	move.w	(A1)+,(A3)+
	dbra	D0,lbC01C9B4
	subq.w	#1,D1
lbC01C9C0:
	move.b	(A1)+,(A3)+
	dbra	D1,lbC01C9C0
	move.l	#$1E075E,$1E0A5E.L
	bra.s	lbC01C97C

	movem.l	D0-D5/A0/A1,-(SP)
	move.l	#$80011,$1E269A.L
	move.w	$1E2836.L,D0
	jsr	$1A9A10.L
	lea	ascii.MSG20(PC),A0
	moveq	#0,D0
	btst	#0,$1E2838.L
	beq.w	lbC01CA04
	jsr	$1B5E20.L
lbC01CA04:
	moveq	#1,D0
	btst	#1,$1E2838.L
	beq.w	lbC01CA18
	jsr	$1B5E20.L
lbC01CA18:
	moveq	#2,D0
	btst	#2,$1E2838.L
	beq.w	lbC01CA2C
	jsr	$1B5E20.L
lbC01CA2C:
	moveq	#3,D0
	btst	#0,$1E2841.L
	beq.w	lbC01CA40
	jsr	$1B5E20.L
lbC01CA40:
	moveq	#4,D0
	btst	#0,$1E2840.L
	beq.w	lbC01CA54
	jsr	$1B5E20.L
lbC01CA54:
	moveq	#5,D0
	btst	#6,$1E2838.L
	beq.w	lbC01CA68
	jsr	$1B5E20.L
lbC01CA68:
	moveq	#6,D0
	btst	#7,$1E2838.L
	beq.w	lbC01CA7C
	jsr	$1B5E20.L
lbC01CA7C:
	moveq	#7,D0
	btst	#3,$1E2838.L
	beq.w	lbC01CA90
	jsr	$1B5E20.L
lbC01CA90:
	moveq	#0,D2
	moveq	#0,D3
	move.b	$1E2838.L,D3
	move.l	D3,D4
	btst	#7,D4
	beq.w	lbC01CAE2
	moveq	#7,D1
	move.l	#$360010,$1E269A.L
lbC01CAB0:
	moveq	#$16,D0
	jsr	$1AEEAE.L
	move.w	#$36,$1E269A.L
	lea	notused.MSG(PC),A0
	jsr	$1AB4A8.L
	move.w	#$36,$1E269A.L
	addq.w	#1,$1E269C.L
	dbra	D1,lbC01CAB0
	movem.l	(SP)+,D0-D5/A0/A1
	rts

lbC01CAE2:
	andi.w	#7,D3
	andi.w	#$40,D4
	move.l	#$360010,$1E269A.L
	moveq	#7,D5
lbC01CAF6:
	moveq	#$16,D0
	jsr	$1AEEAE.L
	move.w	#$36,$1E269A.L
	lea	$1E0A5E.L,A1
	move.l	D2,D0
	jsr	$1C4B30.L
	bpl.w	lbC01CB3C
	lea	notused.MSG(PC),A0
	jsr	$1AB4A8.L
lbC01CB22:
	move.w	#$36,$1E269A.L
	addq.w	#1,$1E269C.L
	addq.w	#1,D2
	dbra	D5,lbC01CAF6
	movem.l	(SP)+,D0-D5/A0/A1
	rts

lbC01CB3C:
	tst.w	D0
	beq.s	lbC01CB22
	jsr	$1C4A68.L
	movea.l	A1,A0
	clr.b	$16(A0)
	jsr	$1AB4A8.L
	bra.s	lbC01CB22

notused.MSG:
	dc.b	'<not used>',0,0

lbC01CB60:
	move.w	D0,-(SP)
	lsr.b	#4,D0
	jsr	$1C4A54.L
	move.w	(SP),D0
	andi.w	#15,D0
	jsr	$1C4A54.L
	move.w	(SP)+,D0
	rts

	addi.b	#$30,D0
	cmpi.b	#$39,D0
	bls.w	lbC01CB8A
	addi.b	#$27,D0
lbC01CB8A:
	move.b	D0,(A0)+
	rts

	movem.l	D0-D2/A0,-(SP)
	move.w	D0,D1
	subq.w	#1,D1
	lea	$1E0B5E.L,A0
lbC01CB9C:
	moveq	#0,D0
	move.b	(A1)+,D0
	cmpi.b	#13,D0
	beq.w	lbC01CC44
	cmpi.b	#10,D0
	beq.w	lbC01CC44
	cmpi.b	#$1F,D0
	bls.w	lbC01CC20
	move.w	#$80,D2
	cmpi.b	#$C4,D0
	beq.w	lbC01CC30
	move.w	#$81,D2
	cmpi.b	#$E4,D0
	beq.w	lbC01CC30
	move.w	#$82,D2
	cmpi.b	#$D6,D0
	beq.w	lbC01CC30
	move.w	#$83,D2
	cmpi.b	#$F6,D0
	beq.w	lbC01CC30
	move.w	#$84,D2
	cmpi.b	#$DC,D0
	beq.w	lbC01CC30
	move.w	#$85,D2
	cmpi.b	#$FC,D0
	beq.w	lbC01CC30
	move.w	#$86,D2
	cmpi.b	#$DF,D0
	beq.w	lbC01CC30
	move.w	#$87,D2
	cmpi.b	#$A7,D0
	beq.w	lbC01CC30
	cmpi.b	#$7F,D0
	bls.w	lbC01CC30
lbC01CC20:
	move.b	#$3C,(A0)+
	move.b	#$24,(A0)+
	jsr	lbC01CB60(PC)
	move.b	#$3E,D0
lbC01CC30:
	move.b	D0,(A0)+
lbC01CC32:
	dbra	D1,lbC01CB9C
	clr.b	(A0)+
	lea	$1E0B5E.L,A1
	movem.l	(SP)+,D0-D2/A0
	rts

lbC01CC44:
	move.b	#$3C,(A0)+
	move.b	#$72,(A0)+
	move.b	#$3E,(A0)+
	bra.s	lbC01CC32

	move.w	D2,D0
	bra.s	lbC01CC30

	movem.l	D1-D3,-(SP)
	moveq	#0,D2
	move.b	D0,D2
	moveq	#0,D3
	move.b	$1E2838.L,D3
	move.l	D3,D4
	andi.w	#7,D3
	andi.w	#$40,D4
	jsr	$1C4EFA.L
	bpl.w	lbC01CC80
	movem.l	(SP)+,D1-D3
	rts

lbC01CC80:
	btst	#6,D4
	bne.w	lbC01CCB2
	move.b	0(A1,D0.W),$1E0B5E.L
	lea	$1E0B5E.L,A1
	cmpi.w	#7,D3
	bne.w	lbC01CCAA
	btst	#2,D2
	beq.w	lbC01CCAA
	andi.b	#$9F,(A1)
lbC01CCAA:
	moveq	#1,D0
	movem.l	(SP)+,D1-D3
	rts

lbC01CCB2:
	moveq	#0,D1
	moveq	#0,D2
	movea.l	(A1),A1
	move.b	0(A1,D0.W),D1
	move.b	1(A1,D0.W),D2
	lea	0(A1,D2.W),A1
	move.l	D1,D0
	movem.l	(SP)+,D1-D3
	rts

	st	$1E2720.L
	bra.w	lbC01CCDC

	sf	$1E2720.L
lbC01CCDC:
	movem.l	D1/A0-A2/A4,-(SP)
	movea.l	$1E2AE8.L,A2
	lea	$80(A2),A2
	lea	$20(A2),A3
	move.l	A3,8(A2)
	lea	8(A1),A0
	moveq	#7,D1
	jsr	$1C4C56.L
	bne.w	lbC01CD70
	move.l	A3,12(A2)
	lea	12(A1),A0
	moveq	#7,D1
	jsr	$1C4C56.L
	bne.w	lbC01CD70
	move.l	A3,$18(A2)
	lea	$18(A1),A0
	moveq	#7,D1
	jsr	$1C4C56.L
	bne.w	lbC01CD70
	move.l	A3,$1C(A2)
	lea	$1C(A1),A0
	moveq	#7,D1
	jsr	$1C4C56.L
	bne.w	lbC01CD70
	move.l	A3,(A2)
	lea	(A1),A0
	lea	$40(A3),A3
	move.l	A3,$10(A2)
	lea	$28(A3),A3
	move.l	A3,4(A2)
	lea	$100(A3),A3
	move.l	A3,$14(A2)
	lea	$A0(A3),A3
	jsr	$1C4C78.L
	bmi.w	lbC01CD70
	movem.l	(SP)+,D1/A0-A2/A4
	moveq	#0,D0
	rts

lbC01CD70:
	movem.l	(SP)+,D1/A0-A2/A4
	lea	keymapcorrupt.MSG(PC),A1
	moveq	#-1,D0
	rts

	jsr	$1C4FFE.L
	bne.w	lbC01CD9C
	movea.l	D0,A0
lbC01CD88:
	jsr	$1C5030.L
	bne.w	lbC01CD9C
	move.b	D0,(A3)+
	addq.w	#1,A0
	dbra	D1,lbC01CD88
	moveq	#0,D0
lbC01CD9C:
	rts

	moveq	#0,D1
lbC01CDA0:
	swap	D1
	jsr	$1C4FD8.L
	lea	0(A1,D7.W),A0
	jsr	$1C4FFE.L
	bne.w	lbC01CDE8
	movea.l	D0,A0
	move.b	0(A0,D1.W),D0
	andi.w	#$E0,D0
	beq.w	lbC01CDEC
	move.b	D0,D2
	andi.w	#$20,D2
	cmp.w	D0,D2
	beq.w	lbC01CF10
	move.b	D0,D2
	andi.w	#$40,D2
	cmp.w	D0,D2
	beq.w	lbC01CE34
	move.b	D0,D2
	andi.w	#$C0,D2
	cmp.w	D0,D2
	beq.w	lbC01CE20
lbC01CDE8:
	moveq	#-1,D0
	rts

lbC01CDEC:
	move.b	0(A0,D1.W),D0
	movea.l	0(A2,D7.W),A0
	move.b	D0,0(A0,D1.W)
	lea	4(A1,D7.W),A0
	jsr	$1C4FFE.L
	bne.s	lbC01CDE8
	movea.l	D0,A0
	move.l	0(A0,D6.W),D0
	movea.l	4(A2,D7.W),A0
	move.l	D0,0(A0,D6.W)
lbC01CE12:
	swap	D1
	addq.w	#1,D1
	cmpi.w	#$67,D1
	bls.s	lbC01CDA0
	moveq	#0,D0
	rts

lbC01CE20:
	movea.l	0(A2,D7.W),A0
	move.b	#$80,0(A0,D1.W)
	movea.l	4(A2,D7.W),A0
	clr.l	0(A0,D6.W)
	bra.s	lbC01CE12

lbC01CE34:
	moveq	#0,D2
	moveq	#0,D3
	move.b	0(A0,D1.W),D3
	movea.l	0(A2,D7.W),A0
	move.b	D3,0(A0,D1.W)
	movea.l	4(A2,D7.W),A0
	move.l	A3,0(A0,D6.W)
	andi.w	#7,D3
	moveq	#$40,D4
	moveq	#2,D5
	btst	#0,D3
	beq.w	lbC01CE5E
	lsl.w	#1,D5
lbC01CE5E:
	btst	#2,D3
	beq.w	lbC01CE68
	lsl.w	#1,D5
lbC01CE68:
	btst	#1,D3
	beq.w	lbC01CE72
	lsl.w	#1,D5
lbC01CE72:
	lea	0(A3,D5.W),A4
	lea	4(A1,D7.W),A0
	jsr	$1C4FFE.L
	bne.w	lbC01CDE8
	movea.l	D0,A0
	lea	0(A0,D6.W),A0
	jsr	$1C4FFE.L
	bne.w	lbC01CDE8
	movea.l	D0,A5
lbC01CE96:
	jsr	$1C4EFA.L
	movea.l	A5,A0
	lea	0(A0,D0.W),A0
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	move.b	D0,(A3)+
	moveq	#0,D6
	move.b	D0,D6
	addq.w	#1,A0
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	move.b	D5,(A3)+
	movea.l	A5,A0
	ext.w	D0
	lea	0(A0,D0.W),A0
	add.w	D6,D5
	subq.w	#1,D6
	bmi.w	lbC01CEE2
lbC01CED0:
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	move.b	D0,(A4)+
	addq.w	#1,A0
	dbra	D6,lbC01CED0
lbC01CEE2:
	addq.w	#1,D2
	cmpi.w	#7,D2
	bhi.w	lbC01CEFA
	move.w	D3,-(SP)
	and.w	D2,D3
	cmp.w	D2,D3
	movem.w	(SP)+,D3
	beq.s	lbC01CE96
	bra.s	lbC01CEE2

lbC01CEFA:
	movea.l	A4,A3
	exg	D0,A3
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A3
	bra.w	lbC01CE12

	clr.b	(A3)+
	move.b	D5,(A3)+
	bra.s	lbC01CEE2

lbC01CF10:
	moveq	#0,D2
	moveq	#0,D3
	move.b	0(A0,D1.W),D3
	movea.l	0(A2,D7.W),A0
	move.b	D3,0(A0,D1.W)
	andi.b	#7,0(A0,D1.W)
	bset	#6,0(A0,D1.W)
	movea.l	4(A2,D7.W),A0
	move.l	A3,0(A0,D6.W)
	andi.w	#7,D3
	moveq	#$40,D4
	moveq	#2,D5
	btst	#0,D3
	beq.w	lbC01CF46
	lsl.w	#1,D5
lbC01CF46:
	btst	#2,D3
	beq.w	lbC01CF50
	lsl.w	#1,D5
lbC01CF50:
	btst	#1,D3
	beq.w	lbC01CF5A
	lsl.w	#1,D5
lbC01CF5A:
	lea	0(A3,D5.W),A4
	lea	4(A1,D7.W),A0
	jsr	$1C4FFE.L
	bne.w	lbC01CDE8
	movea.l	D0,A0
	lea	0(A0,D6.W),A0
	jsr	$1C4FFE.L
	bne.w	lbC01CDE8
	movea.l	D0,A5
lbC01CF7E:
	jsr	$1C4EFA.L
	movea.l	A5,A0
	lea	0(A0,D0.W),A0
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	tst.b	D0
	bne.w	lbC01CFB4
	addq.w	#1,A0
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	move.b	#1,(A3)+
	move.b	D5,(A3)+
	move.b	D0,(A4)+
	addq.w	#1,D5
	bra.w	lbC01CFF2

lbC01CFB4:
	cmpi.b	#1,D0
	bne.w	lbC01CFE6
	addq.w	#1,A0
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	ext.w	D0
	lea	0(A5,D0.W),A0
	jsr	$1C5030.L
	bne.w	lbC01CDE8
	move.b	#1,(A3)+
	move.b	D5,(A3)+
	move.b	D0,(A4)+
	addq.w	#1,D5
	bra.w	lbC01CFF2

lbC01CFE6:
	cmpi.b	#8,D0
	bne.w	lbC01CDE8
	clr.b	(A3)+
	move.b	D5,(A3)+
lbC01CFF2:
	addq.w	#1,D2
	cmpi.w	#7,D2
	bhi.w	lbC01D00C
	move.w	D3,-(SP)
	and.w	D2,D3
	cmp.w	D2,D3
	movem.w	(SP)+,D3
	beq.w	lbC01CF7E
	bra.s	lbC01CFF2

lbC01D00C:
	movea.l	A4,A3
	exg	D0,A3
	addq.l	#1,D0
	andi.w	#$FFFE,D0
	exg	D0,A3
	bra.w	lbC01CE12

	clr.w	(A3)+
	bra.s	lbC01CFF2

	move.l	D2,-(SP)
	move.w	D2,D0
	and.w	D3,D2
	cmp.w	D0,D2
	beq.w	lbC01D032
	move.l	(SP)+,D2
	moveq	#-1,D0
	rts

lbC01D032:
	movem.l	D3/A0,-(SP)
	andi.w	#7,D3
	lea	lbL01D066(PC),A0
	tst.b	D4
	beq.w	lbC01D048
	lea	lbL01D0B2(PC),A0
lbC01D048:
	moveq	#0,D0
	move.b	D3,D0
	lsl.w	#2,D0
	movea.l	0(A0,D0.W),A0
	moveq	#0,D0
	move.b	D2,D0
	lea	0(A0,D0.W),A0
	moveq	#0,D0
	move.b	(A0),D0
	movem.l	(SP)+,D3/A0
	move.l	(SP)+,D2
	rts

lbL01D066:
	dc.l	$1C4F60
	dc.l	$1C4F61
	dc.l	$1C4F63
	dc.l	$1C4F67
	dc.l	$1C4F6B
	dc.l	$1C4F73
	dc.l	$1C4F7B
	dc.l	$1C4F83
	dc.l	$3030203
	dc.l	$20003
	dc.l	$2010003
	dc.l	2
	dc.l	3
	dc.l	$2000001
	dc.l	3
	dc.l	$20001
	dc.l	3
	dc.l	$2010003
	dc.l	$2010000
lbL01D0B2:
	dc.l	$1C4FAC
	dc.l	$1C4FAD
	dc.l	$1C4FAF
	dc.l	$1C4FB3
	dc.l	$1C4FB7
	dc.l	$1C4FBF
	dc.l	$1C4FC7
	dc.l	$1C4FCF
	dc.l	$200
	dc.l	$20000
	dc.l	$2040600
	dc.l	2
	dc.l	0
	dc.l	$2000004
	dc.l	$6000000
	dc.l	$20004
	dc.l	$60000
	dc.l	$2040608
	dc.l	$A0C0E00

	swap	D1
	move.w	D1,-(SP)
	swap	D1
	move.w	(SP)+,D1
	move.l	#0,D7
	cmpi.w	#$3F,D1
	bls.w	lbC01D11E
	move.l	#$10,D7
	subi.w	#$40,D1
lbC01D11E:
	move.w	D1,D6
	lsl.w	#2,D6
	rts

	tst.b	$1E2720.L
	bne.w	lbC01D136
lbC01D12E:
	jsr	$1B2E50.L
	rts

lbC01D136:
	move.l	A0,D0
	btst	#0,D0
	bne.s	lbC01D12E
	cmpi.l	#$FFF,D0
	bls.s	lbC01D12E
	cmpi.l	#$5000,D0
	bhi.s	lbC01D12E
	move.l	(A0),D0
	ori.w	#4,SR
	rts

	tst.b	$1E2720.L
	bne.w	lbC01D168
lbC01D160:
	jsr	$1B2E0E.L
	rts

lbC01D168:
	cmpa.l	#$FFF,A0
	bls.s	lbC01D160
	cmpa.l	#$5000,A0
	bhi.s	lbC01D160
	move.b	(A0),D0
	ori.w	#4,SR
	rts

	movem.l	A0/A2/A3/A6,-(SP)
	cmpi.b	#$13,$1E2C45.L
	beq.w	lbC01D198
	lea	Kickstartvers.MSG(PC),A1
	bra.w	lbC01D1A8

lbC01D198:
	jsr	$1B2DAC.L
	tst.w	D0
	bne.w	lbC01D1B0
lbC01D1A4:
	lea	Cantfinddefau.MSG(PC),A1
lbC01D1A8:
	movem.l	(SP)+,A0/A2/A3/A6
	moveq	#-1,D0
	rts

lbC01D1B0:
	movea.l	4.L,A6
	lea	$15E(A6),A0
lbC01D1BA:
	jsr	$1B2E50.L
	bne.s	lbC01D1A4
	movea.l	D0,A3
	movea.l	A3,A1
	lea	10(A1),A0
	jsr	$1B2E50.L
	bne.s	lbC01D1A4
	movea.l	D0,A0
	lea	consoledevice.MSG(PC),A2
lbC01D1D8:
	jsr	$1B2E0E.L
	bne.s	lbC01D1A4
	addq.w	#1,A0
	tst.b	D0
	beq.w	lbC01D1F8
	cmp.b	(A2)+,D0
	beq.s	lbC01D1D8
lbC01D1EC:
	movea.l	A3,A0
	tst.b	$1E26A1.L
	bne.s	lbC01D1A4
	bra.s	lbC01D1BA

lbC01D1F8:
	tst.b	(A2)
	bne.s	lbC01D1EC
	lea	$98(A3),A1
	movem.l	(SP)+,A0/A2/A3/A6
	moveq	#0,D0
	rts

consoledevice.MSG:
	dc.b	'console.device',0,0

	sf	$1E2B33.L
	jsr	$1BCC02.L
	st	$1E2B33.L
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01D29A
	lea	Newnametoolon.MSG(PC),A0
	cmpi.w	#$1E,D1
	bls.w	lbC01D248
	jsr	$1AB4A8.L
	rts

lbC01D248:
	lea	$5000.w,A0
	jsr	$1BA028.L
	move.l	#$370,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D290
	movea.l	A1,A3
	lea	$1B0(A1),A1
	move.b	D1,(A1)+
	subq.w	#1,D1
	lea	$1E26C8.L,A2
lbC01D272:
	move.b	(A2)+,(A1)+
	dbra	D1,lbC01D272
	movea.l	A3,A1
	jsr	$1BB64A.L
	st	$1E29B5.L
	jsr	$1BA088.L
	bra.w	lbC01D29A

lbC01D290:
	move.w	D0,D1
	jsr	$1BA088.L
	move.w	D1,D0
lbC01D29A:
	jsr	$1BA970.L
	rts

Newnametoolon.MSG:
	dc.b	'New name too long!',$D,0

	move.b	$1E29B2.L,-(SP)
	sf	$1E2B33.L
	jsr	$1BCBF8.L
	st	$1E2B33.L
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01D45A
	movea.l	A0,A6
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	$1E26C8.L,A1
	movea.l	A1,A2
	move.w	D1,D0
	jsr	$1BE0C8.L
	bmi.w	lbC01D450
	move.w	D2,D0
	jsr	$1BC234.L
	move.w	D0,D6
	move.w	D2,D0
	jsr	$1BC162.L
	bmi.w	lbC01D450
	move.l	D1,D4
	move.l	D4,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D450
	move.l	$1F4(A1),D5
	exg	A0,A6
	sf	$1E2B33.L
	jsr	$1BCC02.L
	st	$1E2B33.L
	exg	A0,A6
	move.w	D0,$1E2834.L
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01D450
	cmpi.w	#$1E,D1
	bls.w	lbC01D35E
	lea	Newnametoolon.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
	bra.w	lbC01D450

lbC01D35E:
	lea	$1E26C8.L,A1
	move.w	D1,D0
	movem.l	D1,-(SP)
	move.l	D5,D1
	jsr	$1BC162.L
	movem.l	(SP)+,D1
	bmi.w	lbC01D380
	moveq	#-$1A,D0
	bra.w	lbC01D450

lbC01D380:
	move.w	D1,D0
	jsr	$1BC234.L
	move.w	D0,D7
	lsl.w	#2,D6
	lsl.w	#2,D7
	move.l	D4,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D450
	move.l	$1F0(A1),D1
	move.l	D5,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D450
	moveq	#-$15,D0
	move.l	$18(A1,D6.W),D2
	beq.w	lbC01D450
	cmp.l	D2,D4
	bne.w	lbC01D3CE
	move.l	D1,$18(A1,D6.W)
	jsr	$1BB64A.L
	st	$1E29B5.L
	bra.w	lbC01D3F8

lbC01D3CE:
	move.l	D2,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D450
	moveq	#-$15,D0
	move.l	$1F0(A1),D2
	beq.w	lbC01D450
	cmp.l	D2,D4
	bne.s	lbC01D3CE
	move.l	D1,$1F0(A1)
	jsr	$1BB64A.L
	st	$1E29B5.L
lbC01D3F8:
	move.l	D5,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D450
	move.l	$18(A1,D7.W),D2
	move.l	D4,$18(A1,D7.W)
	jsr	$1BB64A.L
	st	$1E29B5.L
	move.l	D4,D0
	jsr	$1BADF0.L
	bmi.w	lbC01D450
	move.l	D2,$1F0(A1)
	move.w	$1E2834.L,D0
	lea	$1B0(A1),A2
	move.b	D0,(A2)+
	subq.w	#1,D0
	lea	$1E26C8.L,A3
lbC01D43C:
	move.b	(A3)+,(A2)+
	dbra	D0,lbC01D43C
	jsr	$1BB64A.L
	st	$1E29B5.L
	moveq	#0,D0
lbC01D450:
	move.w	D0,D1
	jsr	$1BA088.L
	move.w	D1,D0
lbC01D45A:
	jsr	$1BA970.L
	move.b	(SP)+,$1E29B2.L
	rts

	move.b	$1E2A56.L,-(SP)
	move.w	$1E269A.L,-(SP)
	move.l	D0,-(SP)
	sf	$1E2A56.L
	clr.w	$1E269A.L
	moveq	#$4F,D0
	jsr	$1AEEAE.L
	move.l	(SP)+,D0
	move.w	(SP)+,$1E269A.L
	move.b	(SP)+,$1E2A56.L
	rts

	move.l	D1,-(SP)
	subq.w	#1,D0
lbC01D49E:
	move.l	$DFF004.L,D1
	andi.l	#$1FFFF,D1
	cmpi.l	#$100,D1
	bgt.s	lbC01D49E
	dbra	D0,lbC01D49E
	move.l	(SP)+,D1
	rts

lbC01D4BA:
	jsr	$1A9780.L
	tst.b	$1E269F.L
	bne.s	lbC01D4BA
	rts

	movem.l	D0/A0,-(SP)
lbC01D4CE:
	subq.w	#1,D0
	bmi.w	lbC01D4DA
lbC01D4D4:
	tst.b	(A0)+
	bne.s	lbC01D4D4
	bra.s	lbC01D4CE

lbC01D4DA:
	jsr	$1AB4A8.L
	movem.l	(SP)+,D0/A0
	rts

	tst.b	$1E2AF6.L
	bne.w	lbC01D4F4
	jsr	lbC0177D6(PC)
lbC01D4F4:
	jsr	$1BCBF8.L
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01D714
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	$1E26C8.L,A1
	move.w	D1,D0
	move.b	$1E29B2.L,-(SP)
	jsr	$1BC812.L
	bmi.w	lbC01D600
	move.l	$1E2AEC.L,D0
	cmp.l	$1E2A88.L,D0
	bcc.w	lbC01D544
	lea	dmonbuffertoo.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC01D600

lbC01D544:
	movea.l	$1E2AE8.L,A2
	lea	$5000.w,A0
	move.l	$1E2A88.L,D0
	jsr	$1BC414.L
	move.l	$1E2AE8.L,$1E2834.L
	move.l	$1E2A88.L,D0
	add.l	D0,$1E2834.L
	move.l	$1E2AE8.L,$1E2838.L
	move.l	$1E2838.L,$1E2840.L
	move.l	$1E2838.L,$1E283C.L
	move.l	$1E2AE8.L,D0
	add.l	D0,$1E283C.L
	clr.w	$1E2844.L
	st	$1E2B05.L
	jsr	$1C54FE.L
lbC01D5AC:
	jsr	$1A9780.L
	move.w	D0,D7
	jsr	$1A8DFC.L
	cmpi.w	#$81,D7
	beq.w	lbC01D728
	cmpi.w	#$80,D7
	beq.w	lbC01D71A
	cmpi.w	#$82,D7
	beq.w	lbC01D756
	cmpi.w	#$83,D7
	beq.w	lbC01D7EA
	tst.b	$1E26A1.L
	beq.s	lbC01D5AC
	moveq	#0,D0
	bra.w	lbC01D600

dmonbuffertoo.MSG:
	dc.b	'dmonbuffer too small!',$D,0
	dc.b	0

lbC01D600:
	move.b	(SP)+,$1E29B2.L
	jsr	$1BA970.L
	lea	$5000.w,A0
	jsr	$1BA088.L
	jsr	$1B06CA.L
	sf	$1E2B05.L
	rts

lbC01D624:
	moveq	#0,D0
	move.w	$1E2844.L,D2
	jsr	$1AED28.L
	sf	$1E2848.L
	movea.l	$1E2840.L,A0
	move.w	D2,D1
lbC01D640:
	subq.w	#1,D1
	bmi.w	lbC01D67E
	cmpa.l	$1E2834.L,A0
	beq.w	lbC01D702
	cmpa.l	$1E2838.L,A0
	bne.w	lbC01D660
	move.l	$1E269A.L,D7
lbC01D660:
	move.b	(A0)+,D0
	cmpi.w	#10,D0
	bne.s	lbC01D640
	jsr	$1AEEA2.L
	move.w	D2,D1
	cmpi.w	#$18,$1E269C.L
	bne.s	lbC01D640
	bra.w	lbC01D70C

lbC01D67E:
	cmpa.l	$1E2834.L,A0
	beq.w	lbC01D702
	cmpa.l	$1E2838.L,A0
	bne.w	lbC01D698
	move.l	$1E269A.L,D7
lbC01D698:
	move.b	(A0)+,D0
	cmpi.w	#10,D0
	bne.w	lbC01D6D4
	tst.b	$1E2848.L
	bne.w	lbC01D6B6
	move.w	#$95,D0
	jsr	$1AE5E4.L
lbC01D6B6:
	sf	$1E2848.L
	jsr	$1AEECA.L
	move.w	D2,D1
	cmpi.w	#$18,$1E269C.L
	bne.w	lbC01D640
	bra.w	lbC01D70C

lbC01D6D4:
	cmpi.w	#$4F,$1E269A.L
	bne.w	lbC01D6F0
	move.w	#$96,D0
	jsr	$1AE5E4.L
	st	$1E2848.L
lbC01D6F0:
	tst.b	$1E2848.L
	bne.s	lbC01D67E
	jsr	$1AE5E4.L
	bra.w	lbC01D67E

lbC01D702:
	move.w	#$94,D0
	jsr	$1AE5E4.L
lbC01D70C:
	move.l	D7,$1E269A.L
	rts

lbC01D714:
	jmp	$1BA970.L

lbC01D71A:
	addq.w	#1,$1E2844.L
	jsr	lbC01D624(PC)
	bra.w	lbC01D5AC

lbC01D728:
	cmpi.w	#$18,$1E269C.L
	bne.w	lbC01D73A
	jsr	$1C5734.L
lbC01D73A:
	move.w	$1E269A.L,D4
	add.w	$1E2844.L,D4
	movea.l	$1E2838.L,A0
	addq.w	#1,$1E269C.L
	bra.w	lbC01D5AC

lbC01D756:
	move.l	$1E2838.L,D0
	cmp.l	$1E2834.L,D0
	beq.w	lbC01D5AC
	subq.l	#1,$1E2838.L
	subq.w	#1,$1E269A.L
	bpl.w	lbC01D5AC
	tst.w	$1E2844.L
	beq.w	lbC01D790
	subi.w	#$28,$1E2844.L
	jsr	lbC01D624(PC)
	bra.w	lbC01D5AC

lbC01D790:
	moveq	#0,D2
	movea.l	$1E2838.L,A0
lbC01D798:
	cmpa.l	$1E2840.L,A0
	beq.w	lbC01D7AE
	cmpi.b	#10,-(A0)
	beq.w	lbC01D7AE
	addq.w	#1,D2
	bra.s	lbC01D798

lbC01D7AE:
	tst.w	$1E269C.L
	beq.w	lbC01D7E6
	subq.w	#1,$1E269C.L
	cmpi.w	#$4E,D2
	bhi.w	lbC01D7D0
	move.w	D2,$1E269A.L
	bra.w	lbC01D5AC

lbC01D7D0:
	addi.w	#$28,$1E2844.L
	subi.w	#$28,D2
	cmpi.w	#$4E,D2
	bhi.s	lbC01D7D0
	jsr	lbC01D624(PC)
lbC01D7E6:
	bra.w	lbC01D5AC

lbC01D7EA:
	move.l	$1E2838.L,D0
	cmp.l	$1E2834.L,D0
	beq.w	lbC01D5AC
	addq.l	#1,$1E2838.L
	movea.l	$1E2838.L,A0
	cmpi.b	#10,-1(A0)
	beq.w	lbC01D83C
	addq.w	#1,$1E269A.L
	cmpi.w	#$4F,$1E269A.L
	bne.w	lbC01D5AC
	cmpi.b	#10,-1(A0)
	beq.w	lbC01D83C
	addi.w	#$28,$1E2844.L
	jsr	lbC01D624(PC)
	bra.w	lbC01D5AC

lbC01D83C:
	jsr	$1AEEA2.L
	tst.w	$1E2844.L
	beq.w	lbC01D856
	clr.w	$1E2844.L
	jsr	lbC01D624(PC)
lbC01D856:
	bra.w	lbC01D5AC

	movea.l	$1E2838.L,A0
lbC01D860:
	cmpa.l	$1E2834.L,A0
	beq.w	lbC01D87C
	cmpi.b	#10,(A0)+
	bne.s	lbC01D860
	jsr	$1A9002.L
	move.w	$1E2844.L,D2
lbC01D87C:
	movem.l	A0/A1,-(SP)
	lea	$1E26C8.L,A0
lbC01D886:
	move.b	(A1)+,(A0)+
	bne.s	lbC01D886
	movem.l	(SP)+,A0/A1
	rts

AARpref.MSG:
	dc.b	'AA'
	dc.b	'R.pref',0,0

	movem.l	D0-D3/A0-A3,-(SP)
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	AARpref.MSG(PC),A1
	jsr	lbC01D87C(PC)
	jsr	lbC0197CE(PC)
	move.w	#$100,$DFF096.L
	tst.w	D0
	beq.w	lbC01D922
	lea	$1E26C8.L,A1
	jsr	$1BC812.L
	bmi.w	lbC01D922
	lea	$1E45E8.L,A2
	move.l	$1E2A88.L,D0
	cmpi.w	#$400,D0
	bhi.w	lbC01D922
	jsr	$1BC5E0.L
	bmi.w	lbC01D922
	lea	$1E45E8.L,A1
	cmpi.l	#$70726566,(A1)+
	bne.w	lbC01D922
	lea	lbL01DA26(PC),A2
lbC01D904:
	move.l	(A2)+,D0
	beq.w	lbC01D918
	movea.l	D0,A3
	move.w	(A2)+,D0
	subq.w	#1,D0
lbC01D910:
	move.b	(A1)+,(A3)+
	dbra	D0,lbC01D910
	bra.s	lbC01D904

lbC01D918:
	jsr	$1BA088.L
	bpl.w	lbC01D944
lbC01D922:
	move.l	D0,-(SP)
	move.l	#$9C40,D0
lbC01D92A:
	move.l	$DFF006.L,$DFF180.L
	subq.l	#1,D0
	bpl.s	lbC01D92A
	move.l	(SP)+,D0
	lea	$5000.w,A0
	jsr	$1BA088.L
lbC01D944:
	move.w	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	move.w	#$8100,$DFF096.L
	movem.l	(SP)+,D0-D3/A0-A3
	rts

	movem.l	D0-D3/A0-A3,-(SP)
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	AARpref.MSG(PC),A1
	jsr	lbC01D87C(PC)
	jsr	lbC0197CE(PC)
	move.w	#$100,$DFF096.L
	tst.w	D0
	beq.w	lbC01D9E8
	lea	$1E26C8.L,A1
	jsr	$1BB828.L
	bmi.w	lbC01D9E8
	moveq	#4,D1
	lea	$1E45E8.L,A1
	move.l	#$70726566,(A1)+
	lea	lbL01DA26(PC),A2
lbC01D9AA:
	move.l	(A2)+,D0
	beq.w	lbC01D9C0
	movea.l	D0,A3
	move.w	(A2)+,D0
	add.w	D0,D1
	subq.w	#1,D0
lbC01D9B8:
	move.b	(A3)+,(A1)+
	dbra	D0,lbC01D9B8
	bra.s	lbC01D9AA

lbC01D9C0:
	lea	$1E45E8.L,A2
	moveq	#0,D0
	move.w	D1,D0
	jsr	$1BBB5A.L
	bmi.w	lbC01D9E8
	jsr	$1BB8B2.L
	bmi.w	lbC01D9E8
	jsr	$1BA088.L
	bpl.w	lbC01DA0A
lbC01D9E8:
	move.l	D0,-(SP)
	move.l	#$9C40,D0
lbC01D9F0:
	move.l	$DFF006.L,$DFF180.L
	subq.l	#1,D0
	bpl.s	lbC01D9F0
	move.l	(SP)+,D0
	lea	$5000.w,A0
	jsr	$1BA088.L
lbC01DA0A:
	move.w	#0,D0
	move.w	#$C7,D1
	jsr	$1B9B8A.L
	move.w	#$8100,$DFF096.L
	movem.l	(SP)+,D0-D3/A0-A3
	rts

lbL01DA26:
	dc.l	$1E2996
	dc.w	2
	dc.l	$1E2B14
	dc.w	12
	dc.l	$1E2B00
	dc.w	1
	dc.l	$1E2B02
	dc.w	1
	dc.l	$1E2B3A
	dc.w	1
	dc.l	$1E2B3E
	dc.w	3
	dc.l	$1E2970
	dc.w	4
	dc.l	$1E294F
	dc.w	2
	dc.l	$1E2AFA
	dc.w	1
	dc.l	$1E2B06
	dc.w	4
	dc.l	$1E29F0
	dc.w	$14
	dc.l	$1E2990
	dc.w	2
	dc.l	$1E2950
	dc.w	1
	dc.l	$1E2954
	dc.w	1
	dc.l	$1E2B43
	dc.w	1
	dc.l	$1E2B20
	dc.w	4
	dc.l	$1E2C44
	dc.w	1
	dc.l	0

	move.b	$1E29B2.L,-(SP)
	sf	$1E2B33.L
	jsr	$1BCBF8.L
	st	$1E2B33.L
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01DBEC
	movea.l	A0,A6
	tst.b	$1E2AF6.L
	bne.w	lbC01DAC2
	jsr	lbC0177D6(PC)
lbC01DAC2:
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	$1E26C8.L,A1
	move.w	D1,D6
	move.w	D6,D0
	movea.l	A1,A2
	jsr	$1BE0C8.L
	bmi.w	lbC01DBDA
	move.w	D2,D0
	lea	$1E27D4.L,A2
	movea.l	A1,A3
	move.b	D2,(A2)+
	subq.w	#1,D2
lbC01DAF0:
	move.b	(A3)+,(A2)+
	dbra	D2,lbC01DAF0
	move.w	D6,D0
	lea	$1E26C8.L,A1
	jsr	$1BC812.L
	bmi.w	lbC01DBDA
	move.l	$1E2A88.L,D0
	cmp.l	$1E2AEC.L,D0
	bhi.w	lbC01DC00
	movea.l	$1E2AE8.L,A2
	jsr	$1BC5E0.L
	bmi.w	lbC01DBDA
	exg	A0,A6
	sf	$1E2B33.L
	jsr	$1BCBF8.L
	st	$1E2B33.L
	exg	A0,A6
	move.w	D0,D6
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC01DBDA
	move.w	D6,D0
	lea	$1E26C8.L,A2
	jsr	$1BE0A8.L
	bmi.w	lbC01DB88
	lea	$1E26C8.L,A2
	lea	0(A2,D6.W),A2
	lea	$1E27D4.L,A3
	moveq	#0,D3
	move.b	(A3)+,D3
	add.w	D3,D6
	cmpi.b	#$3A,-1(A2)
	beq.w	lbC01DB80
	addq.w	#1,D6
	move.b	#$2F,(A2)+
lbC01DB80:
	subq.w	#1,D3
lbC01DB82:
	move.b	(A3)+,(A2)+
	dbra	D3,lbC01DB82
lbC01DB88:
	move.w	D6,D0
lbC01DB8A:
	lea	$1E26C8.L,A1
	jsr	$1BB828.L
	bpl.w	lbC01DBBE
lbC01DB9A:
	jsr	$1BA970.L
	jsr	lbC018112(PC)
	sf	$1E2B33.L
	jsr	lbC0197C8(PC)
	st	$1E2B33.L
	tst.w	D0
	bne.s	lbC01DB8A
	moveq	#-14,D0
	bra.w	lbC01DBDA

lbC01DBBE:
	movea.l	$1E2AE8.L,A2
	move.l	$1E2A88.L,D0
	jsr	$1BBB5A.L
	bmi.s	lbC01DB9A
	jsr	$1BB8B2.L
	bmi.s	lbC01DB9A
lbC01DBDA:
	move.w	D0,D1
	lea	$5000.w,A0
	jsr	$1BA088.L
	bmi.w	lbC01DBEC
	move.w	D1,D0
lbC01DBEC:
	jsr	$1BA970.L
	jsr	$1B06CA.L
	move.b	(SP)+,$1E29B2.L
	rts

lbC01DC00:
	lea	Filetoolargef.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D0
	bra.s	lbC01DBDA

Filetoolargef.MSG:
	dc.b	'File too large for dmon-buffer!',$D,0
	dc.b	13
	dc.b	'Shortcuts for some commands:',$D
	dc.b	'============================',$D,$D
	dc.b	'interrupts <--> int',$D
	dc.b	'exceptions <--> exc',$D
	dc.b	'normalchar <--> nchar',$D
	dc.b	'setexcept  <--> sexc',$D
	dc.b	'libraries  <--> lib',$D
	dc.b	'resources  <--> res',$D
	dc.b	'killvirus  <--> kvir',$D
	dc.b	'diskcheck  <--> dchk',$D
	dc.b	'megastick  <--> mst',$D
	dc.b	'smallchar  <--> schar',$D
	dc.b	'chipregs   <--> creg',$D
	dc.b	'execbase   <--> exec',$D
	dc.b	'bootcode   <--> bcode',$D
	dc.b	'bootprot   <--> bprot',$D
	dc.b	'diskwipe   <--> dwipe',$D
	dc.b	'codecopy   <--> ccopy',$D
	dc.b	'clrstick   <--> cst',$D
	dc.b	'safedisk   <--> sdisk',$D
	dc.b	'makedir    <--> mdir',$A
	dc.b	'install    <--> inst',$D
	dc.b	'devices    <--> dev',$D
	dc.b	'tracker    <--> srip',$D
	dc.b	'nostick    <--> nst',$D
	dc.b	'relabel    <--> rel',$D
	dc.b	'rename     <--> ren',$D
	dc.b	'delete     <--> del',$D
	dc.b	'lstick     <--> lst',$D
	dc.b	'sstick     <--> sst',$D
	dc.b	'setmap     <--> key',$D
	dc.b	'trans      <--> i',$D
	dc.b	'comp       <--> v',$D,0
	dc.b	13
	dc.b	'COMMANDS + SYNTAX (space for next page):',$D
	dc.b	'========================================',$D,$D
	dc.b	'Commands for system information:',$D
	dc.b	'--------------------------------',$D
	dc.b	'interrupts: Show execbase interrupt-lists   '
	dc.b	'     - interrupts',$D
	dc.b	'exceptions: Show exception- and interruptvec'
	dc.b	'tors - exceptions',$D
	dc.b	'  execbase: Show whole execbasestructure    '
	dc.b	'     - execbase',$D
	dc.b	'     avail: Show free memory                '
	dc.b	'     - avail',$D
	dc.b	'      info: Show important systemparameters '
	dc.b	'     - info (picnr)',$D
	dc.b	' libraries: Show execbase library-list      '
	dc.b	'     - libraries',$D
	dc.b	' resources: Show execbase resource-list     '
	dc.b	'     - resources',$D
	dc.b	'  chipregs: Show name + offset of chipregist'
	dc.b	'ers  - chipregs',$D
	dc.b	'     dchip: Explain function of chipregister'
	dc.b	'     - dchip registername',$D
	dc.b	'   devices: Show execbase device-list       '
	dc.b	'     - devices',$D
	dc.b	'     tasks: show execbase task-lists        '
	dc.b	'     - tasks',$D
	dc.b	'     ports: Show execbase port-list         '
	dc.b	'     - ports',$D,$A
	dc.b	'Disk and diskcoding commands:',$D
	dc.b	'-----------------------------',$D
	dc.b	'  bootcode: Show/set bootblock codenumber   '
	dc.b	'     - bootcode (codenumber)',$D
	dc.b	'  bootprot: Code bootblock of active drive  '
	dc.b	'     - bootprot (codenumber)',$D
	dc.b	'      code: Show/set disk codenumbers       '
	dc.b	'     - code (drive codenumber)',$D
	dc.b	'     dcopy: Backup amigados disks           '
	dc.b	'     - dcopy source dest',$D
	dc.b	'     burst: Turbo-Burstnibbler              '
	dc.b	'     - burst (drive)',$D
	dc.b	'  codecopy: Diskcopy + decode source + code '
	dc.b	'dest - codecopy source dest',$D
	dc.b	'  safedisk: Patch/show state of trackdisk.de'
	dc.b	'vice - safedisk (a/b/s/n/u/v/q)',$D
	dc.b	'        cd: Show/change current module-path '
	dc.b	'     - cd (path)',$D
	dc.b	'       dir: Show disk-directory             '
	dc.b	'     - dir (path)',$D
	dc.b	'      dira: Show whole disk-directory       '
	dc.b	'     - dira (path)',$D
	dc.b	'      copy: Make copy of a File             '
	dc.b	'     - copy (path)source,dest',$D
	dc.b	'   makedir: Create directory                '
	dc.b	'     - makedir path',$D
	dc.b	'    delete: Delete file                     '
	dc.b	'     - delete (path)filename',$D
	dc.b	'    format: Format disk in active drive (FFS'
	dc.b	')    - format (name)(,ffs)',$D
	dc.b	'   formatq: Format disk quick (FFS)         '
	dc.b	'     - formatq (name)(,ffs)',$D
	dc.b	'   formatv: Format disk and verify format (F'
	dc.b	'FS)  - formatv (name)(,ffs)',$D
	dc.b	'   install: Install disk in active drive    '
	dc.b	'     - install (bootblocknr.)',$D
	dc.b	' diskcheck: Checks disk for errors          '
	dc.b	'     - diskcheck (drive)',$D
	dc.b	'  diskwipe: Clears a disk very fast         '
	dc.b	'     - diskwipe (drive)',$D
	dc.b	'      type: Type file on screen             '
	dc.b	'     - type (path)filename',$D
	dc.b	'    rename: Rename file                     '
	dc.b	'     - rename (path)oldname,newname',$D
	dc.b	'   relabel: Change/set diskname             '
	dc.b	'     - relabel diskname',$D,$A
	dc.b	'Freezer and ripper commands:',$D
	dc.b	'----------------------------',$D
	dc.b	'        sa: Save current program to disk    '
	dc.b	'     - sa (path)name(,crate)',$D
	dc.b	'        sr: Save current program and start  '
	dc.b	'     - sr (path)name(,crate)',$D
	dc.b	'        la: Load freezefile from disk       '
	dc.b	'     - la (path)name',$D
	dc.b	'        lr: Load freezefile from disk and st'
	dc.b	'art  - lr (path)name',$D
	dc.b	'   sloader: Save loader to active drive     '
	dc.b	'     - sloader',$D
	dc.b	'        lq: Load all from ramdisk           '
	dc.b	'     - lq',$D
	dc.b	'       lqr: Load all from ramdisk and restar'
	dc.b	't    - lqr',$D
	dc.b	'        sq: Save all to ramdisk             '
	dc.b	'     - sq',$D
	dc.b	'       sqr: Save all to ramdisk and restart '
	dc.b	'     - sqr',$D
	dc.b	'       exq: Exchange prg with ramdisk prg   '
	dc.b	'     - exq',$D
	dc.b	'      exqr: Exchange prg with ramdisk prg + '
	dc.b	'run  - exqr',$D
	dc.b	'     sqmem: En/disable savequick in fastmemo'
	dc.b	'ry   - sqmem (0/start)',$D
	dc.b	'   tracker: Rips soundtracker-modules in mem'
	dc.b	'ory  - tracker (start)',$D
	dc.b	'      scan: Scan memory for samples         '
	dc.b	'     - scan',$D
	dc.b	'        sp: Save current picture to disk    '
	dc.b	'     - sp (path)name(,nr hight)',$D
	dc.b	'         p: Show current picture/mempeeker  '
	dc.b	'     - p (picnr)',$D
	dc.b	'       spm: Save picture of memory-peeker   '
	dc.b	'     - spm (path)name',$D,$A
	dc.b	'Diskmonitor commands:',$D
	dc.b	'---------------------',$D
	dc.b	'        rt: Read tracks from active drive   '
	dc.b	'     - rt strack (num dest)',$D
	dc.b	'        wt: Write tracks to active drive    '
	dc.b	'     - wt strack num source',$D
	dc.b	'      dmon: Get/display disk-mon buffer     '
	dc.b	'     - dmon',$D
	dc.b	'   clrdmon: Restore disk-mon buffer         '
	dc.b	'     - clrdmon',$D
	dc.b	'   bootchk: Set correct bootblockchecksum   '
	dc.b	'     - bootchk sectoraddr.',$D
	dc.b	'   datachk: Set correct datachecksum        '
	dc.b	'     - datachk sectoraddr.',$D
	dc.b	'    bamchk: Set correct bitmapchecksum      '
	dc.b	'     - bamchk sectoraddr.',$D,$D
	dc.b	'Trainer commands:',$D
	dc.b	'-----------------',$D
	dc.b	'        ts: Start trainer/trainermode       '
	dc.b	'     - ts startlives startaddress',$D
	dc.b	'         t: Show addresses/continue trainer '
	dc.b	'     - t (aktlives)',$D
	dc.b	'        tx: Exit trainermode                '
	dc.b	'     - tx',$D
	dc.b	'        tf: Search for decrementing opcodes '
	dc.b	'     - tf address',$D
	dc.b	'       tfd: Search and remove decrement opco'
	dc.b	'des  - tfd address',$D
	dc.b	'        pc: Show current picture + energy co'
	dc.b	'unt  - pc (picnr)',$D
	dc.b	'       tds: Deep trainer start count        '
	dc.b	'     - tds',$D
	dc.b	'       tdc: Deep trainer change count       '
	dc.b	'     - tdc',$D
	dc.b	'       tdd: Deep trainer delete addresses   '
	dc.b	'     - tdd start end',$D
	dc.b	'        td: Display deep trainer addresses  '
	dc.b	'     - td',$D
	dc.b	'       tdi: Display probable trainer address'
	dc.b	'es   - tdi',$D
	dc.b	'       tdx: Exit old deep trainer           '
	dc.b	'     - tdx',$D,$A
	dc.b	'Misc. commands',$D
	dc.b	'--------------',$D
	dc.b	'   ramtest: Checks memoryblock for harderror'
	dc.b	's    - ramtest start end',$D
	dc.b	'      pack: Packs memory                    '
	dc.b	'     - pack start end dest crrate',$D
	dc.b	'    unpack: Unpacks with pack-command packed'
	dc.b	' mem - unpack dest endofpacked',$D
	dc.b	'     color: Set/show module-editor colors   '
	dc.b	'     - color (back pen)',$D
	dc.b	'    rcolor: Reset module-editor colors      '
	dc.b	'     - rcolor',$D
	dc.b	'        tm: Show remarks about curr. program'
	dc.b	'     - tm',$D
	dc.b	'       tms: Set remark about curr. programad'
	dc.b	'dr.  - tms addr',$D
	dc.b	'       tmd: Delete remark about program     '
	dc.b	'     - tmd addr',$D
	dc.b	'       spr: Show/edit sprites               '
	dc.b	'     - spr nr|addr (nr|addr)',$D
	dc.b	'   version: Show cartridge-version          '
	dc.b	'     - version',$D
	dc.b	' megastick: Joystick-handler (1 = only playe'
	dc.b	'r 1) - megastick (1)',$D
	dc.b	'   nostick: Remove joystick-handler         '
	dc.b	'     - nostick',$D
	dc.b	'  clrstick: Clear all joystick-handler codes'
	dc.b	'     - clrstick',$D
	dc.b	'    lstick: Load joystick-handler data      '
	dc.b	'     - lstick (path)name',$D
	dc.b	'    sstick: Save joystick-handler data      '
	dc.b	'     - sstick (path)name',$D
	dc.b	'     reset: Exit MK III and reset Amiga     '
	dc.b	'     - reset',$D
	dc.b	'       pal: Switch to ECS PAL mode          '
	dc.b	'     - pal',$D
	dc.b	'      ntsc: Switch to ECS NTSC mode         '
	dc.b	'     - ntsc',$D
	dc.b	'    setmap: Keymap editor                   '
	dc.b	'     - setmap',$D
	dc.b	'    setcop: Copper specify for Exit of ARIV '
	dc.b	'     - setcop (address)',$D
	dc.b	'     ascii: Show ASCII-Table                '
	dc.b	'     - ascii',$D
	dc.b	'     alert: Display alert (guru) list       '
	dc.b	'     - alert (guru-number)',$D,$A
	dc.b	'Printer commands:',$D
	dc.b	'-----------------',$D
	dc.b	' smallchar: Aktivate very small printer char'
	dc.b	's   - smallchar',$D
	dc.b	'normalchar: Normal printerchars             '
	dc.b	'    - normalchar',$D
	dc.b	'       prt: Print string                    '
	dc.b	'    - prt string',$D,$D
	dc.b	'Virus commands:',$D
	dc.b	'---------------',$D
	dc.b	'    virus: Search virus in memory           '
	dc.b	'     - virus',$D
	dc.b	'killvirus: Search and remove virus in memory'
	dc.b	'     - killvirus',$D,$D
	dc.b	'Monitor command:',$D
	dc.b	'----------------',$D
	dc.b	' setexcept: Set exception handler (no more g'
	dc.b	'uru) - setexcept',$D
	dc.b	'      comp: Compare memoryblocks            '
	dc.b	'     - comp start end dest',$D
	dc.b	'        lm: Load file to memory             '
	dc.b	'     - lm (path)name,dest',$D
	dc.b	'        sm: Save memoryblock to disk        '
	dc.b	'     - sm (path)name,start end',$D
	dc.b	'      smdc: Save memoryblock to disk as dc.b'
	dc.b	'     - sm (path)name,start end',$D
	dc.b	'    smdata: Save memoryblock to disk as data'
	dc.b	'     - sm (path)name,start end',$D
	dc.b	'         a: Start mc68000 assembler         '
	dc.b	'     - a address',$D
	dc.b	'         b: Show current breakpoints        '
	dc.b	'     - b address',$D
	dc.b	'        bs: Set breakpoint                  '
	dc.b	'     - bs address',$D
	dc.b	'        bd: Delete breakpoint               '
	dc.b	'     - bd address',$D
	dc.b	'       bda: Delete all breakpoints          '
	dc.b	'     - bda',$D
	dc.b	'        mw: Display memwatchpoints          '
	dc.b	'     - mw',$D
	dc.b	'        ms: Set memwatchpoint               '
	dc.b	'     - ms address',$D
	dc.b	'        md: Delete memwatchpoint            '
	dc.b	'     - md address',$D
	dc.b	'       mda: Delete all memwatchpoints       '
	dc.b	'     - mda',$D
	dc.b	'        tr: Trace current program (not subs)'
	dc.b	'     - tr (steps)',$D
	dc.b	'        st: Trace current program (also subs'
	dc.b	')    - st (steps)',$D
	dc.b	'         x: Restart current program         '
	dc.b	'     - x',$D
	dc.b	'         c: Copperassembler/disassembler    '
	dc.b	'     - c 1|2|address',$D
	dc.b	'      robd: Enable/Disable Rob Northen MODE '
	dc.b	'     - robd',$D
	dc.b	'         d: MC68000 disassembler            '
	dc.b	'     - d (0|address)',$D
	dc.b	'         e: Show/edit chipregisters         '
	dc.b	'     - e (offset)',$D
	dc.b	'         f: Search for string (casesensitive'
	dc.b	')    - f string(,start end)',$D
	dc.b	'        fa: Search for adr addressing opcode'
	dc.b	'     - fa address (start end)',$D
	dc.b	'       faq: Fastsearch for adr addressing op'
	dc.b	'code - faq adr (start end)',$D
	dc.b	'        fr: Search for relative-string      '
	dc.b	'     - fr string(,start end)',$D
	dc.b	'        fs: Search string (not casesensitive'
	dc.b	')    - fs string(,start end)',$D
	dc.b	'         g: Restart program at address      '
	dc.b	'     - g (address)',$D
	dc.b	'     trans: Copy memoryblock                '
	dc.b	'     - trans start end dest',$D
	dc.b	'        ws: Write string to memory          '
	dc.b	'     - ws string, address',$D
	dc.b	'         m: Show/edit memory as bytes       '
	dc.b	'     - m address',$D
	dc.b	'   memcode: Codes memory (eor.b)            '
	dc.b	'     - memcode start end code',$D
	dc.b	'       add: Adds value to memory-range      '
	dc.b	'     - add start end value',$D
	dc.b	'         n: Show/edit memory as ascii       '
	dc.b	'     - n address',$D
	dc.b	'        no: Show/set ascii-dump offset      '
	dc.b	'     - no (offset)',$D
	dc.b	'        nq: Display memory quick as ascii   '
	dc.b	'     - nq address',$D
	dc.b	'         o: Fill memoryblock with string    '
	dc.b	'     - o string, start end',$D
	dc.b	'         r: Show/edit processor registers   '
	dc.b	'     - r (reg value)',$D
	dc.b	'         w: Show/edit cia''s                '
	dc.b	'      - w (register)',$D
	dc.b	'         y: Show/edit memory as binary      '
	dc.b	'     - y address',$D
	dc.b	'        ys: Show/set datawidth for the y com'
	dc.b	'mand - ys (bytes)',$D
	dc.b	'         ?: Calculator                      '
	dc.b	'     - ? (+|-|*|/ value)',$D,$A
	dc.b	'Number formats:',$D
	dc.b	'---------------',$D
	dc.b	'hexadecimal:  $12ab or 12ab',$D,$D
	dc.b	'decimal:      -!15 , !880',$D,$D
	dc.b	'binary:       %001110101 , -%101',$D,$D
	dc.b	'register:     \d0,..,\d7,\a0,..,\a7,\pc,\sp('
	dc.b	'=usp) \b(=Dmon-Buffer)',$D,$D
	dc.b	'diskmonitor (if using rt and wt commands wit'
	dc.b	'h diskbuffer):',$D
	dc.b	' a) t = track (!0 - !159), s = sector (!0 - '
	dc.b	'!10), o = offset (!0 - !511)',$D
	dc.b	' b) s = sector (!0 - !1760) , o = offset (!0'
	dc.b	' - !511)',$D,$D
	dc.b	' Example to read/display rootblock:',$D
	dc.b	'     rt !75 !10',$D
	dc.b	'     m t!80 or m t!80s0 or m t$50s0o0 or m t'
	dc.b	'50s0o0 or m s!880 or m s370',$D,$A
	dc.b	'Editor-tools:',$D
	dc.b	'-------------',$D
	dc.b	'HELP   : This short help',$D,$D
	dc.b	'SH HELP: Show shortcuts for some commands',$D
	dc.b	'SHIFT  : No Scroll/pause',$D,$D
	dc.b	'TAB    : Insert space(s)',$D
	dc.b	'ESC    : Escape any command (not t/ts !)',$D
	dc.b	'F1     : Clr + cursor home',$D
	dc.b	'SH F1  : Cursor home',$D
	dc.b	'F2     : Restore screen from second screen',$D
	dc.b	'SH F2  : Save screen to second screen',$D
	dc.b	'F3     : Preferences+system control',$D
	dc.b	'F4     : Repeat last command',$D
	dc.b	'F5     : Print screen',$D
	dc.b	'F6     : Switch printerdump on/off',$D
	dc.b	'F7     : Switch overwrite/insert mode',$D
	dc.b	'F8     : Show instructions for the mempeeker'
	dc.b	13
	dc.b	'F9     : Switch german & usa keyboard',$D
	dc.b	'F10    : Switch screen',$D
	dc.b	'POWER-LED is off = ready to execute commands'
	dc.b	'!',$D
	dc.b	'Press left mousebutton to abort printer outp'
	dc.b	'ut',$D
	dc.b	'Use cursorkeys in combination with shift too'
	dc.b	13
	dc.b	'============================================'
	dc.b	13
	dc.b	0
	dc.b	13
	dc.b	'Instructions for the mempeeker v2.2',$D
	dc.b	'===============================',$D
	dc.b	'      a - Autoplane',$D
	dc.b	'      b - Brightness plus',$D
	dc.b	'SHIFT b - Brightness minus',$D
	dc.b	'      c - Colorreg plus',$D
	dc.b	'      d - Dual playfield mode on',$D
	dc.b	'SHIFT d - Dual playfield mode off',$D
	dc.b	'      e - Right border plus',$D
	dc.b	'SHIFT e - Right border minus',$D
	dc.b	'      f - Fast plane up',$D
	dc.b	'SHIFT f - Fast plane down',$D
	dc.b	'      g - Interlace mode on',$D
	dc.b	'SHIFT g - Interlace mode off',$D
	dc.b	'      h - Hold and modify (ham) on',$D
	dc.b	'SHIFT h - Hold and modify (ham) off',$D
	dc.b	'      i - Invert all colors',$D
	dc.b	'      l - Lores mode on',$D
	dc.b	'SHIFT l - Hires mode on',$D
	dc.b	'      m - Modulo 1+2 plus',$D
	dc.b	'      n - Modulo 1+2 minus',$D
	dc.b	'      o - Modulo 1 minus',$D
	dc.b	'SHIFT o - Modulo 2 minus',$D
	dc.b	'      p - Modulo 1 plus',$D
	dc.b	'SHIFT p - Modulo 2 plus',$D
	dc.b	'      q - Clr modulo 1+2',$D
	dc.b	'      r - Rotate planepointer',$D
	dc.b	'      s - Left border minus',$D
	dc.b	'SHIFT s - Left border plus',$D
	dc.b	'      w - White helpscreen',$D
	dc.b	'SHIFT w - Black helpscreen',$D
	dc.b	'      x - Colorreg minus',$D
	dc.b	'      y - Switch diw and ddf mode',$D
	dc.b	'      0 - Unlock all planes',$D
	dc.b	'SHIFT 0 - Lock all planes',$D
	dc.b	'      1 - Lock plane 1',$D
	dc.b	'SHIFT 1 - Unlock plane 1',$D
	dc.b	'      2 - Lock plane 2',$D
	dc.b	'SHIFT 2 - Unlock plane 2',$D
	dc.b	'      3 - Lock plane 3',$D
	dc.b	'SHIFT 3 - Unlock plane 3',$D
	dc.b	'      4 - Lock plane 4',$D
	dc.b	'SHIFT 4 - Unlock plane 4',$D
	dc.b	'      5 - Lock plane 5',$D
	dc.b	'SHIFT 5 - Unlock plane 5',$D
	dc.b	'      6 - Lock plane 6',$D
	dc.b	'SHIFT 6 - Unlock plane 6',$D
	dc.b	'      7 - Red color plus',$D
	dc.b	'SHIFT 7 - Red color minus',$D
	dc.b	'      8 - Blue color plus',$D
	dc.b	'SHIFT 8 - Blue color minus',$D
	dc.b	'      9 - Green color plus',$D
	dc.b	'SHIFT 9 - Green color minus',$D
	dc.b	'      + - 1 bitplane plus',$D
	dc.b	'      - - 1 bitplane minus',$D
	dc.b	'      = - Set all bitplanes to bitplane1',$D
	dc.b	'    F1  - Default colors',$D
	dc.b	'    F2  - Random colors',$D
	dc.b	'   F10  - Set chosen picture into current pr'
	dc.b	'ogram',$D
	dc.b	'   LEFT - Rotate picture left',$D
	dc.b	'  RIGHT - Rotate picture right',$D
	dc.b	'     UP - Scroll picture up',$D
	dc.b	'SHFT UP - Scroll picture up fast',$D
	dc.b	'   DOWN - Scroll picture down',$D
	dc.b	'SH DOWN - Scroll picture down fast',$D
	dc.b	'    DEL - Hide helpscreen',$D
	dc.b	'LEFT MOUSEBUTTON  - Picture heigth plus',$D
	dc.b	'RIGHT MOUSEBUTTON - Picture heigth minus',$D
	dc.b	'Set helpscreen with mouse on position',$D,$D
	dc.b	'    ESC - Quit mempeeker',$D
	dc.b	'   HELP - Show helpscreen',$D,$D
	dc.b	'To save mempeeker-picture quit mempeeker and'
	dc.b	' save picture with spm command',$D,0
	dc.b	0

	movem.l	D0/D1/A0/A1,-(SP)
	cmpi.l	#15,$1E2B1C.L
	bls.w	lbC021176
	moveq	#$20,D0
	move.l	#$10001,D1
	movea.l	4.L,A6
	pea	-$C6(A6)
	jsr	$1C00AA.L
	tst.l	D0
	beq.w	lbC021176
	move.l	$1E2B1C.L,D1
	lsr.l	#2,D1
	subq.l	#1,D1
	movea.l	$1E2B14.L,A0
	movea.l	4.L,A6
	lea	$142(A6),A0
	move.l	(A0),D1
	move.l	D0,(A0)
	movea.l	D0,A1
	move.l	D1,(A1)
	move.l	A0,4(A1)
	move.w	#$A14,8(A1)
	clr.l	10(A1)
	move.w	#5,14(A1)
	move.l	$1E2B14.L,$10(A1)
	move.l	$1E2B14.L,$14(A1)
	move.l	$1E2B18.L,$18(A1)
	move.l	$1E2B1C.L,D0
	subq.l	#8,D0
	move.l	D0,$1C(A1)
	movea.l	$10(A1),A0
	clr.l	(A0)
	move.l	D0,4(A0)
lbC021176:
	movem.l	(SP)+,D0/D1/A0/A1
	rts

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC0211CE
	tst.l	D0
	bne.w	lbC02119C
	sf	$1E2B01.L
	bra.w	lbC0211FC

lbC02119C:
	cmpi.l	#$80000,D0
	bls.w	lbC01BBC8
	movea.l	D0,A1
	jsr	$1AB580.L
	tst.b	$1E26BC.L
	bne.w	lbC01BBC8
	sf	$1E2B01.L
	move.l	D0,$1E2B20.L
	beq.w	lbC0211CE
	st	$1E2B01.L
lbC0211CE:
	lea	Noexpansionme.MSG(PC),A0
	tst.b	$1E2B01.L
	bne.w	lbC0211E6
	jsr	$1AB4A8.L
	bra.w	lbC0211FC

lbC0211E6:
	lea	Savequickuses.MSG(PC),A0
	jsr	$1AB4A8.L
	move.l	$1E2B20.L,D0
	jsr	$1A9A1C.L
lbC0211FC:
	jsr	$1B06CA.L
	rts

Noexpansionme.MSG:
	dc.b	'No expansion memory for savequick!',$D,0
Savequickuses.MSG:
	dc.b	'Savequick uses expansion memory from: ',0,0

	lea	$1E2B8E.L,A2
	moveq	#4,D1
lbC021258:
	tst.l	(A2)+
	bpl.w	lbC0212B2
	dbra	D1,lbC021258
	tst.b	$1E2B46.L
	bne.w	lbC0212A0
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	bne.w	lbC02127E
	moveq	#1,D0
lbC02127E:
	move.l	D0,$1E2BDC.L
	bne.w	lbC021292
	move.l	#1,$1E2BDC.L
lbC021292:
	st	$1E28AC.L
	sf	$1E2B47.L
	rts

lbC0212A0:
	lea	Tracealreadya.MSG(PC),A0
lbC0212A4:
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

lbC0212B2:
	lea	Cannottraceme.MSG(PC),A0
	bra.s	lbC0212A4

Tracealreadya.MSG:
	dc.b	'Trace already active: quit modul to finish a'
	dc.b	'ctual trace!',$D,0
Cannottraceme.MSG:
	dc.b	'Cannot trace: memwatchpoints active!',$D,0

	lea	$1E2B8E.L,A2
	moveq	#4,D1
lbC021320:
	tst.l	(A2)+
	bpl.w	lbC02137A
	dbra	D1,lbC021320
	tst.b	$1E2B46.L
	bne.w	lbC021368
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	bne.w	lbC021346
	moveq	#1,D0
lbC021346:
	move.l	D0,$1E2BDC.L
	bne.w	lbC02135A
	move.l	#1,$1E2BDC.L
lbC02135A:
	st	$1E28AC.L
	st	$1E2B47.L
	rts

lbC021368:
	lea	Tracealreadya.MSG(PC),A0
lbC02136C:
	jsr	$1AB4A8.L
	jsr	$1B06CA.L
	rts

lbC02137A:
	lea	Cannottraceme.MSG(PC),A0
	bra.s	lbC02136C

	tst.l	$1E2BDC.L
	beq.w	lbC02142C
	move.l	$24.W,$1E3148.L
	move.l	#$150,$24.w
	bset	#7,$1E264C.L
	st	$1E2B46.L
	sf	$1E2B48.L
	tst.b	$1E2B47.L
	beq.w	lbC02142C
	movem.l	D0/A0,-(SP)
	movea.l	$1E2648.L,A0
	move.w	(A0),D0
	andi.w	#$FFC0,D0
	cmpi.w	#$4E80,D0
	bne.w	lbC02140A
	move.w	(A0),D0
	cmpi.w	#$4EB9,D0
	bne.w	lbC0213E0
	moveq	#6,D0
	bra.w	lbC0213F4

lbC0213E0:
	andi.w	#$FFF8,D0
	cmpi.w	#$4E90,D0
	bne.w	lbC0213F2
	moveq	#2,D0
	bra.w	lbC0213F4

lbC0213F2:
	moveq	#4,D0
lbC0213F4:
	add.l	A0,D0
	move.l	D0,$1E2C30.L
	st	$1E2B48.L
	movem.l	(SP)+,D0/A0
	bra.w	lbC02142C

lbC02140A:
	move.w	(A0),D0
	andi.w	#$FF00,D0
	cmpi.w	#$6100,D0
	bne.w	lbC021428
	cmpi.w	#$6100,(A0)
	bne.w	lbC021424
	moveq	#4,D0
	bra.s	lbC0213F4

lbC021424:
	moveq	#2,D0
	bra.s	lbC0213F4

lbC021428:
	movem.l	(SP)+,D0/A0
lbC02142C:
	rts

	tst.b	$1E2B46.L
	beq.w	lbC021488
	bclr	#7,$1E264C.L
	tst.l	$1E2BDC.L
	bne.w	lbC02147E
	jsr	$1AAEBC.L
	sf	$1E296F.L
	move.l	$1E2648.L,D0
	jsr	$1AABA0.L
	jsr	$1AEEA2.L
	sf	$1E2B46.L
	move.l	$1E3148.L,$24.w
	clr.l	$1E2BDC.L
	rts

lbC02147E:
	move.l	#1,$1E2BDC.L
lbC021488:
	rts

	clr.w	$1E269A.L
	move.w	#$4E,D1
	lea	$1E2BE0.L,A1
	sf	$1E294E.L
lbC0214A0:
	move.b	(A1)+,D0
	jsr	$1AE5E4.L
	dbra	D1,lbC0214A0
	st	$1E294E.L
	clr.w	$1E269A.L
	move.w	$1E269C.L,D0
	cmpi.w	#$18,D0
	bne.w	lbC0214C8
	subq.w	#1,D0
lbC0214C8:
	mulu.w	#$50,D0
	movea.l	$1E26A2.L,A0
	lea	0(A0,D0.W),A0
	moveq	#$4F,D7
	movea.l	$1E2968.L,SP
	jsr	$1AEEA2.L
	jmp	$1A9E2E.L

	tst.b	$1E2B38.L
	beq.w	lbC02153E
	lea	Listofprobabl.MSG(PC),A0
	jsr	$1AB4A8.L
	movea.l	$1E2B8A.L,A0
	movea.l	A0,A1
	adda.l	#$7FFFA,A1
	moveq	#0,D6
lbC02150E:
	move.l	(A0)+,D0
	bmi.w	lbC021538
	tst.b	$1E26A1.L
	bne.w	lbC02153E
	cmp.l	D0,D6
	bls.w	lbC021536
	jsr	$1A9A1C.L
	jsr	$1AEE96.L
	jsr	$1AEE96.L
lbC021536:
	move.l	D0,D6
lbC021538:
	addq.w	#2,A0
	cmpa.l	A0,A1
	bgt.s	lbC02150E
lbC02153E:
	jsr	$1B06CA.L
	rts

Listofprobabl.MSG:
	dc.b	'List of probable deeptraineraddresses:',$D,0

	lea	ASCIITable012.MSG(PC),A0
	jsr	$1AB4A8.L
	moveq	#0,D1
	moveq	#0,D0
lbC02157C:
	moveq	#15,D2
	move.w	D1,D0
	jsr	$1C94E0.L
lbC021586:
	jsr	$1AEE96.L
	moveq	#15,D0
	sub.w	D2,D0
	mulu.w	#$10,D0
	add.w	D1,D0
	jsr	$1AB4F6.L
	jsr	$1AE5E4.L
	dbra	D2,lbC021586
	addq.w	#1,D1
	jsr	$1AEECA.L
	cmpi.w	#$10,D1
	bne.s	lbC02157C
	jsr	$1B06CA.L
	rts

ASCIITable012.MSG:
	dc.b	'ASCII-Table',$D
	dc.b	'===========',$D,$D
	dc.b	'  0 1 2 3 4 5 6 7 8 9 A B C D E F',$D,0

lbC0215F8:
	jsr	$1AEE96.L
	jsr	$1AEE96.L
	rts

	move.l	D1,-(SP)
	moveq	#1,D1
	jsr	$1AE598.L
	move.l	(SP)+,D1
	rts

lbC021614:
	jmp	$1B06A8.L

lbL02161A:
	dc.l	0
	dc.l	2
	dc.l	3
	dc.l	4
	dc.l	5
	dc.l	6
	dc.l	7
	dc.l	8
	dc.l	9
	dc.l	10
	dc.l	11
	dc.l	$10000
	dc.l	$20000
	dc.l	$30000
	dc.l	$40000
	dc.l	$50000
	dc.l	$60000
	dc.l	$70000
	dc.l	$8001
	dc.l	$8002
	dc.l	$8003
	dc.l	$8004
	dc.l	$8005
	dc.l	$8006
	dc.l	$8007
	dc.l	$8008
	dc.l	$8009
	dc.l	$800A
	dc.l	$8010
	dc.l	$8011
	dc.l	$8012
	dc.l	$8013
	dc.l	$8014
	dc.l	$8015
	dc.l	$8020
	dc.l	$8021
	dc.l	$8022
	dc.l	$8030
	dc.l	$8031
	dc.l	$1000000
	dc.l	$81000001
	dc.l	$81000002
	dc.l	$81000003
	dc.l	$81000004
	dc.l	$81000005
	dc.l	$81000006
	dc.l	$81000007
	dc.l	$81000008
	dc.l	$81000009
	dc.l	$8100000A
	dc.l	$2000000
	dc.l	$82010000
	dc.l	$82010006
	dc.l	$82010007
	dc.l	$2010009
	dc.l	$8201000A
	dc.l	$8201000B
	dc.l	$82010030
	dc.l	$82011234
	dc.l	$3000000
	dc.l	$83010000
	dc.l	$4000000
	dc.l	$84000001
	dc.l	$4000001
	dc.l	$84010002
	dc.l	$4010003
	dc.l	$4010004
	dc.l	$84010005
	dc.l	$84000006
	dc.l	$84010007
	dc.l	$84010008
	dc.l	$84000009
	dc.l	$8401000A
	dc.l	$8401000B
	dc.l	$8400000C
	dc.l	$8400000D
	dc.l	$8400000E
	dc.l	$8400000F
	dc.l	$5000000
	dc.l	$6000000
	dc.l	$7000000
	dc.l	$7010001
	dc.l	$7000002
	dc.l	$7000003
	dc.l	$7000004
	dc.l	$7000005
	dc.l	$7000006
	dc.l	$7000007
	dc.l	$7000008
	dc.l	$7000009
	dc.l	$700000A
	dc.l	$700000B
	dc.l	$700000C
	dc.l	$8000000
	dc.l	$8000001
	dc.l	$9000000
	dc.l	$A000000
	dc.l	$A000001
	dc.l	$10000000
	dc.l	$11000000
	dc.l	$12000000
	dc.l	$13000000
	dc.l	$14000000
	dc.l	$14000001
	dc.l	$14000002
	dc.l	$15000000
	dc.l	$15000001
	dc.l	$15000002
	dc.l	$20000000
	dc.l	$21000000
	dc.l	$21000001
	dc.l	$21000002
	dc.l	$22000000
	dc.l	$30000000
	dc.l	$30000001
	dc.l	$31000000
	dc.l	$32000000
	dc.l	$FFFFFFFF
M68000.MSG:
	dc.b	'M68000',0
	dc.b	'bus error',0
	dc.b	'address error',0
	dc.b	'illegal instruction',0
	dc.b	'division by zero',0
	dc.b	'chk instruction',0
	dc.b	'trapv instruction',0
	dc.b	'privilege violage',0
	dc.b	'single step mode',0
	dc.b	'linea emulation',0
	dc.b	'linef emulation',0
	dc.b	'no memory',0
	dc.b	'make library',0
	dc.b	'open library',0
	dc.b	'open device',0
	dc.b	'open resource',0
	dc.b	'io error',0
	dc.b	'no io signal',0
	dc.b	'exec library',0
	dc.b	'gfx library',0
	dc.b	'layers library',0
	dc.b	'intuition library',0
	dc.b	'math library',0
	dc.b	'clist library',0
	dc.b	'dos library',0
	dc.b	'ram library',0
	dc.b	'icon library',0
	dc.b	'expansion library',0
	dc.b	'audio device',0
	dc.b	'console device',0
	dc.b	'gameport device',0
	dc.b	'keyboard device',0
	dc.b	'trackdisk device',0
	dc.b	'timer device',0
	dc.b	'cia resource',0
	dc.b	'disk resource',0
	dc.b	'misc resource',0
	dc.b	'boot strap',0
	dc.b	'workbench',0
	dc.b	'exec library',0
	dc.b	'68000 exception vector checksum',0
	dc.b	'execbase checksum',0
	dc.b	'library checksum',0
	dc.b	'make library (no memory)',0
	dc.b	'memory list',0
	dc.b	'interrupt server (no memory)',0
	dc.b	'initstruct of an aptr source',0
	dc.b	'a semaphore is in illegal state',0
	dc.b	'free memory',0
	dc.b	'illegal m68000 exception taken',0
	dc.b	'graphics library',0
	dc.b	'no special',0
	dc.b	'long frame',0
	dc.b	'short frame',0
	dc.b	'text tmpras',0
	dc.b	'bltbitmap',0
	dc.b	'regions',0
	dc.b	'makevport',0
	dc.b	'emergency memory',0
	dc.b	'layers library',0
	dc.b	'no special',0
	dc.b	'intuition library',0
	dc.b	'unknown gadget type',0
	dc.b	'unknown gadget type',0
	dc.b	'create port',0
	dc.b	'item plane alloc',0
	dc.b	'sub alloc',0
	dc.b	'plane alloc',0
	dc.b	'item box top < relzero',0
	dc.b	'open screen',0
	dc.b	'open screen (raster alloc)',0
	dc.b	'open sys screen (unknown type)',0
	dc.b	'add sw gadgets',0
	dc.b	'open window',0
	dc.b	'bad state return entering intuition',0
	dc.b	'bad message received by idcmp',0
	dc.b	'weird echo',0
	dc.b	'could not open console device',0
	dc.b	'math library',0
	dc.b	'clist library',0
	dc.b	'dos library',0
	dc.b	'startup',0
	dc.b	'no endtask',0
	dc.b	'qpkt failure',0
	dc.b	'unexpected packet received',0
	dc.b	'freevec failed',0
	dc.b	'disk block sequence error',0
	dc.b	'bitmap corrupt',0
	dc.b	'key already free',0
	dc.b	'invalid checksum',0
	dc.b	'disk error',0
	dc.b	'key out of range',0
	dc.b	'bad overlay',0
	dc.b	'ram library',0
	dc.b	'illegal overlays',0
	dc.b	'icon library',0
	dc.b	'expansion library',0
	dc.b	'bad expansion free',0
	dc.b	'audio device',0
	dc.b	'console device',0
	dc.b	'game port device',0
	dc.b	'keyboard device',0
	dc.b	'trackdisk device',0
	dc.b	'calibrate: seek error',0
	dc.b	'delay: error on timer wait',0
	dc.b	'timer device',0
	dc.b	'bad request',0
	dc.b	'no power supply ticks',0
	dc.b	'cia resource',0
	dc.b	'disk resource',0
	dc.b	'get until: already has disk',0
	dc.b	'interrupt: no active unit',0
	dc.b	'misc resource',0
	dc.b	'bootstrap',0
	dc.b	'boot code returned an error',0
	dc.b	'workbench',0
	dc.b	'diskcopy',0,0
	dc.b	0

lbC021F5E:
	movem.l	D0/D1/D7/A0-A2,-(SP)
	move.l	D0,D7
	lea	lbL02161A(PC),A2
	cmpi.l	#11,D7
	bls.w	lbC02203E
	lea	deadend.MSG(PC),A0
	btst	#$1F,D7
	beq.w	lbC021F82
	lea	recovery.MSG(PC),A0
lbC021F82:
	jsr	$1AB4A8.L
	andi.l	#$7F000000,D0
	move.l	D0,D1
	beq.w	lbC021FC8
	cmp.l	D7,D1
	beq.w	lbC021FC8
	moveq	#0,D0
	lea	lbL02161A(PC),A1
lbC021FA0:
	cmp.l	(A1),D1
	beq.w	lbC021FB2
	addq.w	#1,D0
	cmpi.l	#$FFFFFFFF,(A1)+
	bne.s	lbC021FA0
	moveq	#-1,D0
lbC021FB2:
	tst.l	D0
	bmi.w	lbC021FC8
	jsr	$1C9F4C.L
	lea	M68000.MSG(PC),A0
	jsr	$1C53A4.L
lbC021FC8:
	move.l	D7,D1
	moveq	#0,D0
	lea	lbL02161A(PC),A1
lbC021FD0:
	cmp.l	(A1),D1
	beq.w	lbC021FE2
	addq.w	#1,D0
	cmpi.l	#$FFFFFFFF,(A1)+
	bne.s	lbC021FD0
	moveq	#-1,D0
lbC021FE2:
	tst.l	D0
	bmi.w	lbC021FF8
	jsr	$1C9F4C.L
	lea	M68000.MSG(PC),A0
	jsr	$1C53A4.L
lbC021FF8:
	move.l	D7,D1
	andi.l	#$F0000,D1
	beq.w	lbC022038
	cmp.l	D7,D1
	beq.w	lbC022038
	moveq	#0,D0
	lea	lbL02161A(PC),A1
lbC022010:
	cmp.l	(A1),D1
	beq.w	lbC022022
	addq.w	#1,D0
	cmpi.l	#$FFFFFFFF,(A1)+
	bne.s	lbC022010
	moveq	#-1,D0
lbC022022:
	tst.l	D0
	bmi.w	lbC022038
	jsr	$1C9F4C.L
	lea	M68000.MSG(PC),A0
	jsr	$1C53A4.L
lbC022038:
	movem.l	(SP)+,D0/D1/D7/A0-A2
	rts

lbC02203E:
	cmpi.w	#1,D0
	beq.s	lbC022038
	lea	M68000.MSG(PC),A0
	jsr	$1AB4A8.L
	subq.w	#1,D0
	bmi.s	lbC022038
	jsr	$1C9F4C.L
	jsr	$1C53A4.L
	bra.s	lbC022038

deadend.MSG:
	dc.b	'dead end',0
recovery.MSG:
	dc.b	'recovery',0

	move.l	A0,-(SP)
	lea	ascii.MSG18(PC),A0
	jsr	$1AB4A8.L
	movea.l	(SP)+,A0
	rts

ascii.MSG18:
	dc.b	', ',0,0

	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	bne.w	lbC0220C6
	lea	lbL02161A(PC),A0
lbC02209A:
	move.l	(A0)+,D0
	cmpi.l	#$FFFFFFFF,D0
	beq.w	lbC0220CA
	tst.b	$1E26A1.L
	bne.w	lbC0220CA
	jsr	$1B209E.L
	jsr	lbC0215F8(PC)
	jsr	lbC021F5E(PC)
	jsr	$1AEECA.L
	bra.s	lbC02209A

lbC0220C6:
	jsr	lbC021F5E(PC)
lbC0220CA:
	jsr	$1B06CA.L
	rts

	jsr	$1ADB8C.L
	tst.b	$1E26B3.L
	bne.w	lbC021614
	jsr	$1AFE58.L
	lea	$1AC310.L,A2
	moveq	#0,D1
	move.w	#$FF,D2
lbC0220F4:
	movea.l	A0,A1
lbC0220F6:
	tst.b	(A2)
	beq.w	lbC02211E
	move.b	(A1)+,D0
	jsr	$1AEE3E.L
	move.w	D0,D4
	move.b	(A2)+,D0
	jsr	$1AEE3E.L
	cmp.b	D4,D0
	beq.s	lbC0220F6
lbC022112:
	tst.b	(A2)+
	bne.s	lbC022112
	addq.w	#2,D1
	dbra	D2,lbC0220F4
	moveq	#-1,D1
lbC02211E:
	tst.w	D1
	bpl.w	lbC022132
	lea	unknownchipre.MSG(PC),A0
	jsr	$1AB4A8.L
	bra.w	lbC022142

lbC022132:
	add.w	D1,D1
	lea	lbL022160(PC),A0
	movea.l	0(A0,D1.W),A0
	jsr	$1AB4A8.L
lbC022142:
	jsr	$1B06CA.L
	rts

unknownchipre.MSG:
	dc.b	'unknown chipregname!',0,0
lbL022160:
	dc.l	$1CA43A
	dc.l	$1CA459
	dc.l	$1CA6C6
	dc.l	$1CA72F
	dc.l	$1CA79A
	dc.l	$1CA7B0
	dc.l	$1CA7B0
	dc.l	$1CA832
	dc.l	$1CAA98
	dc.l	$1CA7B0
	dc.l	$1CA7B0
	dc.l	$1CAC7D
	dc.l	$1CAD7E
	dc.l	$1CAF63
	dc.l	$1CB042
	dc.l	$1CB042
	dc.l	$1CB2A9
	dc.l	$1CB2A9
	dc.l	$1CB2C3
	dc.l	$1CA79A
	dc.l	$1CB360
	dc.l	$1CA6C6
	dc.l	$1CA72F
	dc.l	$1CB371
	dc.l	$1CB3C3
	dc.l	$1CB447
	dc.l	$1CAC7D
	dc.l	$1CB4C6
	dc.l	$1CB551
	dc.l	$1CB574
	dc.l	$1CB593
	dc.l	$1CB5AF
	dc.l	$1CB5D5
	dc.l	$1CB5D5
	dc.l	$1CBA29
	dc.l	$1CBA48
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA66
	dc.l	$1CBA8E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB34
	dc.l	$1CBB34
	dc.l	$1CBB34
	dc.l	$1CBB34
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB64
	dc.l	$1CBB64
	dc.l	$1CBB64
	dc.l	$1CBB5B
	dc.l	$1CBB0E
	dc.l	$1CBB5B
	dc.l	$1CBB0E
	dc.l	$1CBB82
	dc.l	$1CBB96
	dc.l	$1CBB96
	dc.l	$1CBB96
	dc.l	$1CBB96
	dc.l	$1CBBB0
	dc.l	$1CBBB0
	dc.l	$1CBBC0
	dc.l	$1CBBDB
	dc.l	$1CBBDB
	dc.l	$1CBC5E
	dc.l	$1CBC5E
	dc.l	$1CA459
	dc.l	$1CBCE5
	dc.l	$1CB042
	dc.l	$1CB042
	dc.l	$1CAA98
	dc.l	$1CBF01
	dc.l	$1CBF01
	dc.l	$1CBF19
	dc.l	$1CBF2F
	dc.l	$1CBF45
	dc.l	$1CBF5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBF01
	dc.l	$1CBF01
	dc.l	$1CBF19
	dc.l	$1CBF2F
	dc.l	$1CBF45
	dc.l	$1CBF5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBF01
	dc.l	$1CBF01
	dc.l	$1CBF19
	dc.l	$1CBF2F
	dc.l	$1CBF45
	dc.l	$1CBF5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBF01
	dc.l	$1CBF01
	dc.l	$1CBF19
	dc.l	$1CBF2F
	dc.l	$1CBF45
	dc.l	$1CBF5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBF6F
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBF82
	dc.l	$1CBF82
	dc.l	$1CBF82
	dc.l	$1CBB0E
	dc.l	$1CC273
	dc.l	$1CC273
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CC285
	dc.l	$1CC285
	dc.l	$1CC285
	dc.l	$1CC285
	dc.l	$1CC285
	dc.l	$1CC285
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC295
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC2A5
	dc.l	$1CC323
	dc.l	$1CC418
	dc.l	$1CC418
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CC434
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB0E
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CBB5B
	dc.l	$1CC4AC
	dc.b	'data result of blitter, dummy',$D,0
	dc.b	'control of the dma channels',$D
	dc.b	'Bit Function    Description',$D
	dc.b	'15  set/clr     Set/clr control bit',$D
	dc.b	'14  bbusy       Blitter busy status bit (rea'
	dc.b	'd only)',$D
	dc.b	'13  bzero       Blitter logic zero status bi'
	dc.b	't',$D
	dc.b	'12  x',$D
	dc.b	'11  x',$D
	dc.b	'10  bltpri      Blitter DMA priority',$D
	dc.b	'09  dmaen       Enable all DMA below',$D
	dc.b	'08  bplen       Bit plane DMA enable',$D
	dc.b	'07  copen       Copper DMA enable',$D
	dc.b	'06  blten       Blitter DMA enable',$D
	dc.b	'05  spren       Sprite DMA enable',$D
	dc.b	'04  dsken       Disk DMA enable',$D
	dc.b	'03  aud3en      Audio channel 3 DMA enable',$D
	dc.b	'02  aud2en      Audio channel 2 DMA enable',$D
	dc.b	'01  aud1en      Audio channel 1 DMA enable',$D
	dc.b	'00  aud0en      Audio channel 0 DMA enable',$D,0
	dc.b	'BIT 15,14,13,12,11,10,09,08,07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'USE LOF                                     '
	dc.b	'     V8',$D,0
	dc.b	'BIT# 15,14,13,12,11,10,09,03,07,06,05,04,03,'
	dc.b	'02,01,00',$D
	dc.b	'USE  V7 V6 V5 V4 V3 V2 V1 V0,H8 H7 H6 H5 H4 '
	dc.b	'H3 H2 H1',$D,0
	dc.b	'disk DMA data buffer',$D,0
	dc.b	'mouse/joystick counter',$D
	dc.b	'BIT  15,14,13,12,11,10,09,08 07,06,05,04,03,'
	dc.b	'02,01,00',$D
	dc.b	'MDAT Y7 Y6 Y5 Y4 Y3 Y2 Y1 Y0 X7 X6 X5 X4 X3 '
	dc.b	'X2 X1 X0',$D,0
	dc.b	'collision detection register',$D
	dc.b	'BIT COLLISIONS REGISTERED',$D
	dc.b	'15  not used',$D
	dc.b	'14  Sprite 4 (or 5) to sprite 6 (or 7)',$D
	dc.b	'13  Sprite 2 (or 3) to sprite 6 (or 7)',$D
	dc.b	'12  Sprite 2 (or 3) to sprite 4 (or 5)',$D
	dc.b	'11  Sprite 0 (or 1) to sprite 6 (or 7)',$D
	dc.b	'10  Sprite 0 (or 1) to sprite 4 (or 5)',$D
	dc.b	'09  Sprite 0 (or 1) to sprite 2 (or 3)',$D
	dc.b	'08  Playfield 2 to sprite 6 (or 7)',$D
	dc.b	'07  Playfield 2 to sprite 4 (or 5)',$D
	dc.b	'06  Playfield 2 to sprite 2 (or 3)',$D
	dc.b	'05  Playfield 2 to sprite 0 (or 1)',$D
	dc.b	'04  Playfield 1 to sprite 6 (or 7)',$D
	dc.b	'03  Playfield 1 to sprite 4 (or 5)',$D
	dc.b	'02  Playfield 1 to sprite 2 (or 3)',$D
	dc.b	'01  Playfield 1 to sprite 0 (or 1)',$D
	dc.b	'00  Playfield 1 to playfield 2',$D,0
	dc.b	'BIT USE',$D
	dc.b	'15  SET/CLR   Set/clear control bit',$D
	dc.b	'14  PRECOMPHI',$D
	dc.b	'13  PRECOMPLO',$D
	dc.b	'12  MFMPREC   1=MFM, 0=GCR',$D
	dc.b	'11  UARTBRK   1=UART break',$D
	dc.b	'10  WORDSYNC  1=SYNC ON',$D
	dc.b	'09  MSBSYNC   1=MSBSYNC ON',$D
	dc.b	'08  FAST      1=fast, 0=slow',$D
	dc.b	'07  USE3PN    ch 3 mod nothing',$D
	dc.b	'06  USE2P3    ch 2 mod per of cha 3',$D
	dc.b	'05  USE1P2    ch 1 mod per of cha 2',$D
	dc.b	'04  USE0P1    ch 0 mod per of cha 1',$D
	dc.b	'03  USE3VN    ch 3 mod nothing',$D
	dc.b	'02  USE2V3    ch 2 mod vol of cha 3',$D
	dc.b	'01  USE1V2    ch 1 mod vol of cha 2',$D
	dc.b	'00  USE0V1    ch 0 mod vol of cha 1',$D,0
	dc.b	'BIT FUNCT   DESCRIPTION',$D
	dc.b	'15  OUTRY   Output enable',$D
	dc.b	'14  DATRY   I/O data',$D
	dc.b	'13  OUTRX   Output enable',$D
	dc.b	'12  DATRX   I/O data',$D
	dc.b	'11  OUTLY   Output enable',$D
	dc.b	'10  DATLY   I/O data',$D
	dc.b	'09  OUTLX   Output enable',$D
	dc.b	'08  DATLX   I/O data',$D
	dc.b	'07-01 0     Reserved',$D
	dc.b	'00  START   Start pots',$D,0
	dc.b	'Serial port data/status',$D
	dc.b	'BIT SYM          FUNCTION',$D
	dc.b	'15  OVRUN        overrun.',$D
	dc.b	'14  RBF          buffer full',$D
	dc.b	'13  TBE          buffer empty',$D
	dc.b	'12  TSRE         shift register empty',$D
	dc.b	'11  RXD          RXD pin',$D
	dc.b	'10  0            Not used',$D
	dc.b	'09  STP          Stop bit',$D
	dc.b	'08  STP-DB8      Stop bit',$D
	dc.b	'07  DB7          Data bit',$D
	dc.b	'06  DB6          Data bit',$D
	dc.b	'05  DBS          Data bit',$D
	dc.b	'04  DB4          Data bit',$D
	dc.b	'03  DB3          Data bit',$D
	dc.b	'02  DB2          Data bit',$D
	dc.b	'01  DB1          Data bit',$D
	dc.b	'00  DB0          Data bit',$D,0
	dc.b	'Disk data byte/status',$D
	dc.b	'BIT   FUNCTION  DESCRIPTION',$D
	dc.b	'15    DSKBYT    Byte ready',$D
	dc.b	'14    DMAON     1=Diskdma on',$D
	dc.b	'13    DISKWRITE 1=Diskwrite on',$D
	dc.b	'12    WORDEQUAL 1=Sync found',$D
	dc.b	'11-08 X         Not used',$D
	dc.b	'07-00 DATA      Disk byte data',$D,0
	dc.b	'Interrupt bits',$D
	dc.b	'BIT FUNCT  LEVEL  DESCRIPTION',$D
	dc.b	'15  SET/CLR       Set/clear control bit',$D
	dc.b	'14  INTEN         Master bit',$D
	dc.b	'13  EXTER    6    External interrupt',$D
	dc.b	'12  DSKSYN   5    Disk sync',$D
	dc.b	'11  RBF      5    Serial buffer full',$D
	dc.b	'10  AUD3     4    Channel 3 finished',$D
	dc.b	'09  AUD2     4    Channel 2 finished',$D
	dc.b	'08  AUDl     4    Channel 1 finished',$D
	dc.b	'07  AUD0     4    Channel 0 finished',$D
	dc.b	'06  BLIT     3    Blitter finished',$D
	dc.b	'05  VERTB    3    Vertical blank',$D
	dc.b	'04  COPER    3    Copper',$D
	dc.b	'03  PORTS    2    I/O ports and timers',$D
	dc.b	'02  SOFT     1    Software interrupt',$D
	dc.b	'01  DSKBLK   1    Disk block finished',$D
	dc.b	'00  TBE      1    Serial port buffer empty',$D,0
	dc.b	'Address of disk DMA data',$D,0
	dc.b	'Length of disk DMA data',$D
	dc.b	'BIT  FUNCTION       DESCRIPTION',$D
	dc.b	'15   DMAEN          Disk DMA enable',$D
	dc.b	'14   WRITE          1=write',$D
	dc.b	'13-0 LENGTH         Length in words',$D,0
	dc.b	'Refresh pointer',$D,0
	dc.b	'Copper control register',$D
	dc.b	'BIT NAME      FUNCTION',$D
	dc.b	'01  CDANG     1=Access to blitter',$D,0
	dc.b	'Serial port data/stop bits',$D
	dc.b	'BIT 15,14,13,12,11,10,09,08,07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'USE  0  0  0  0  0  0  S D8 D7 D6 D5 D4 D3 D'
	dc.b	'2 D1 D0',$D,0
	dc.b	'Serial port period/control',$D
	dc.b	'BIT   SYM        FUNCTION',$D
	dc.b	'15    LONG       1=Serial receive 9-bit word'
	dc.b	'.',$D
	dc.b	'14-00 RATE       Baud rate',$D,0
	dc.b	'Write all joystick/mouse counters',$D
	dc.b	'BIT 15,14,13,12,11,10,09,08 07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'DAT Y7 Y6 Y5 Y4 Y3 Y2 xx xx X7 X6 X5 X4 X3 X'
	dc.b	'2 xx xx',$D,0
	dc.b	'Strobe for horizontal sync vb/equ',$D,0
	dc.b	'Strobe for horizontal sync vb',$D,0
	dc.b	'Strobe for horizontal sync',$D,0
	dc.b	'Strobe for horizontal sync long line',$D,0
	dc.b	'Blitter control register 0',$D
	dc.b	'BIT BLTCON0    BLTCON1  BLTCON0   BLTCON1',$D
	dc.b	'Area mode               Line Mode',$D
	dc.b	'15    ASH3      BSH3    START3    TEXTURE3',$D
	dc.b	'14    ASH2      BSH2    START2    TEXTURE2',$D
	dc.b	'13    ASH1      BSH1    START1    TEXTURE1',$D
	dc.b	'12    ASA0      BSH0    START0    TEXTURE0',$D
	dc.b	'11    USEA        X     1         0',$D
	dc.b	'10    USEB        X     0         0',$D
	dc.b	'09    USEC        X     1         0',$D
	dc.b	'08    USED        X     1         0',$D
	dc.b	'07    LF7         X     LF7       0',$D
	dc.b	'06    LF6         X     LF6       SIGN',$D
	dc.b	'05    LF5         X     LF5       0',$D
	dc.b	'04    LF4       EFE     LF4       SUD',$D
	dc.b	'03    LF3       IFE     LF3       SUL',$D
	dc.b	'02    LF2       FCI     LF2       AUL',$D
	dc.b	'01    LF1       DESC    LF1       SING',$D
	dc.b	'00    LF0       LINE(0) LF0       LINE(1)',$D,$D
	dc.b	'ASH 3-0 Shift value of A source',$D
	dc.b	'BSH 3-0 Shift value of B source',$D
	dc.b	'USEA use source A',$D
	dc.b	'USEB use source B',$D
	dc.b	'USEC use source C',$D
	dc.b	'USED use destination D',$D
	dc.b	'LF 7-0 Logic minterms',$D
	dc.b	'EFE Exclusive fill',$D
	dc.b	'IFE Inclusive fill',$D
	dc.b	'FCI Fill carry input',$D
	dc.b	'DESC Descending control bit',$D
	dc.b	'LINE Line mode',$D
	dc.b	'START 3-0 Starting point',$D
	dc.b	'SIGN Sign flag',$D
	dc.b	'SING Single bit',$D
	dc.b	'SUD Up or down bit',$D
	dc.b	'SUL Up or left bit',$D
	dc.b	'AUL Always up or left',$D,0
	dc.b	'Blitter first-word mask for A',$D,0
	dc.b	'Blitter last-word mask for A',$D,0
	dc.b	'Blitter address for source/destination',$D,0
	dc.b	'Blitter start and size',$D
	dc.b	'BIT 15,19,13,12,11,10,09,08,07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'    h9 h8 h7 h6 h5 h4 h3 h2 h1 h0,w5 w4 w3 w'
	dc.b	'2 w1 w0',$D,0
	dc.b	'Sorry no information! (ECS register)',$D,0
	dc.b	'Blitter modulo for source/destination',$D,0
	dc.b	'Unused!',$D,0
	dc.b	'Blitter source data register',$D,0
	dc.b	'Disk sync register',$D,0
	dc.b	'Copper location register',$D,0
	dc.b	'Copper restart',$D,0
	dc.b	'Copper instruction, dummy',$D,0
	dc.b	'Display window start/stop',$D
	dc.b	'BIT 15,14,13,12,11,10,09,08,07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'USE V7 V6 V5 V4 V3 V2 V1 V0 H7 H6 H5 H4 H3 H'
	dc.b	'2 H1 H0',$D,0
	dc.b	'Display data fetch start/stop',$D
	dc.b	'BIT 15,14,13,12,11,10,09,08,07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'USE  0  0  0  0  0  0  0  0 H8 H7 H6 H5 H4 H'
	dc.b	'3  0  0',$D,0
	dc.b	'Collision control',$D
	dc.b	'BIT FUNCTION   DESCRIPTION',$D
	dc.b	'15  ENSP7     Enable sprite 7/6',$D
	dc.b	'14  ENSP5     Enable sprite 5/4',$D
	dc.b	'13  ENSP3     Enable sprite 3/2',$D
	dc.b	'12  ENSP1     Enable sprite 1/0',$D
	dc.b	'11  ENBP6     Enable plane 6',$D
	dc.b	'10  ENBP5     Enable plane 5',$D
	dc.b	'09  ENBP4     Enable plane 4',$D
	dc.b	'08  ENBP3     Enable plane 3',$D
	dc.b	'07  ENBP2     Enable plane 2',$D
	dc.b	'06  ENBP1     Enable plane 1',$D
	dc.b	'05  NVBP6     Match for plane 6',$D
	dc.b	'04  MVBP5     Match for plane 5',$D
	dc.b	'03  MVBP4     Match for plane 4',$D
	dc.b	'02  MVBP3     Match for plane 3',$D
	dc.b	'01  MVBP2     Match for plane 2',$D
	dc.b	'00  MVBP1     Match for plane 1',$D,0
	dc.b	'Audio channel location',$D,0
	dc.b	'Audio channel length',$D,0
	dc.b	'Audio channel period',$D,0
	dc.b	'Audio channel volume',$D,0
	dc.b	'Audio channel data',$D,0
	dc.b	'Bit plane pointer',$D,0
	dc.b	'Bit plane control register',$D
	dc.b	'BIT BPLCON0 BPLCON1 BPLCON2',$D
	dc.b	'15  HIRES   X       X',$D
	dc.b	'14  BPU2    X       X',$D
	dc.b	'13  BPU1    X       X',$D
	dc.b	'12  BPU0    X       X',$D
	dc.b	'11  HOMOD   X       X',$D
	dc.b	'10  DBLPF   X       X',$D
	dc.b	'09  COLOR   X       X',$D
	dc.b	'08  GAUD    X       X',$D
	dc.b	'07  X       PF2H3   X',$D
	dc.b	'06  X       PF2H2   PF2PRI',$D
	dc.b	'05  X       PF2H1   PF2P2',$D
	dc.b	'04  X       PF2H0   PF2P1',$D
	dc.b	'03  LPEN    PF1H3   PF2P0',$D
	dc.b	'02  LACE    PF1H2   PF1P2',$D
	dc.b	'01  ERSY    PF1H1   PF1P1',$D
	dc.b	'00  X       PF1H0   PF1lP0',$D,$D
	dc.b	'HIRES Hires mode',$D
	dc.b	'BPU   # of bit planes',$D
	dc.b	'HOMOD HAM  mode',$D
	dc.b	'DBLPF Double playfield',$D
	dc.b	'COLOR Composite video',$D
	dc.b	'GAUD  Genlock audio',$D
	dc.b	'LPEN  Lightpen',$D
	dc.b	'LACE  Interlace mode',$D
	dc.b	'ERSY  External resync',$D
	dc.b	'PF2PR Playfield 2 > 1',$D
	dc.b	'PF2P  Playfield 2 priority',$D
	dc.b	'PF1P  Playfield 1 priority',$D
	dc.b	'PF2H  Playfield 2 scroll code',$D
	dc.b	'PFlH  Playfield 1 scroll code',$D,0
	dc.b	'Bit plane modulo',$D,0
	dc.b	'Bit plane data',$D,0
	dc.b	'Sprite pointer',$D,0
	dc.b	'Sprite start position data',$D
	dc.b	'BIT   SYM      FUNCTION',$D
	dc.b	'15-08 SV7-SV0  Start vertical value',$D
	dc.b	'07-00 SH8-SH1  Start horizontal value',$D,0
	dc.b	'Sprite vert stop position and control data',$D
	dc.b	'BIT   SYM       FUNCTION',$D
	dc.b	'15-08 EV7-EV0   End vertical value',$D
	dc.b	'07    ATT       Attach bit',$D
	dc.b	'06-04 X',$D
	dc.b	'02    SV8       Start vertical MSB',$D
	dc.b	'01    EV8       End  vertical MSB',$D
	dc.b	'00    SH0       Start horizontal LSB',$D,0
	dc.b	'Sprite image data register',$D,0
	dc.b	'Color table xx',$D
	dc.b	'BIT 15,14,13,12,11,10,09,08,07,06,05,04,03,0'
	dc.b	'2,01,00',$D
	dc.b	'RGB  X  X  X  X R3 R2 B1 R0 G3 G2 G1 G0 B3 B'
	dc.b	'2 B1 B0',$D,0
	dc.b	'No operation',$D,0

	move.l	A1,-(SP)
	moveq	#0,D0
	jsr	$1BADF0.L
	bmi.w	lbC024614
	moveq	#0,D0
	clr.b	$1E2C46.L
	cmpi.l	#$444F5300,(A1)
	beq.w	lbC024614
	move.b	#1,$1E2C46.L
	cmpi.l	#$444F5301,(A1)
	beq.w	lbC024614
	moveq	#-$22,D0
lbC024614:
	movea.l	(SP)+,A1
	tst.w	D0
	rts

	jsr	$1BCBF8.L
	move.w	D0,D1
	moveq	#-14,D0
	tst.w	D1
	beq.w	lbC0246AA
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC021614
	movea.l	D0,A2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC021614
	move.l	D0,D2
	jsr	$1AF0E0.L
	tst.b	$1E26AE.L
	beq.w	lbC021614
	move.l	D0,D3
	lea	$5000.w,A0
	jsr	$1BA028.L
	lea	$1E26C8.L,A1
	move.w	D1,D0
	move.b	$1E29B2.L,-(SP)
	jsr	$1BC812.L
	bmi.w	lbC024696
	move.l	D2,D0
	jsr	$1BC414.L
	bmi.w	lbC024696
	move.l	D3,D0
	jsr	$1BC414.L
lbC024696:
	move.b	(SP)+,$1E29B2.L
	jsr	$1BA970.L
	jsr	$1BA088.L
	rts

lbC0246AA:
	jmp	$1BA970.L

	cmpa.l	#$420,A0
	beq.w	lbC024A9A
	move.l	D0,D1
	swap	D1
	tst.w	D1
	beq.w	lbC024A9A
	cmpi.w	#$FFFE,D0
	bne.s	lbC0246E0
	move.w	D1,D2
	andi.w	#$FF,D2
	cmpi.w	#1,D2
	beq.w	lbC024A96
	cmpi.w	#$FFFF,D1
	beq.w	lbC024A9A
lbC0246E0:
	cmpi.w	#$80,D1
	bne.s	lbC0246F2
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0246F2:
	cmpi.w	#$84,D1
	bne.s	lbC024704
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024704:
	cmpi.w	#$E0,D1
	bne.s	lbC024716
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024716:
	cmpi.w	#$E4,D1
	bne.s	lbC024728
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024728:
	cmpi.w	#$E8,D1
	bne.s	lbC02473A
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02473A:
	cmpi.w	#$EC,D1
	bne.s	lbC02474C
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02474C:
	cmpi.w	#$F0,D1
	bne.s	lbC02475E
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02475E:
	cmpi.w	#$F4,D1
	bne.s	lbC024770
	cmpi.w	#$20,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024770:
	cmpi.w	#$92,D1
	bne.s	lbC024782
	cmpi.w	#$90,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024782:
	cmpi.w	#$94,D1
	bne.s	lbC024794
	cmpi.w	#$100,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024794:
	cmpi.w	#$96,D1
	bne.s	lbC0247A6
	cmpi.w	#$9000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0247A6:
	cmpi.w	#$180,D1
	bne.s	lbC0247B8
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0247B8:
	cmpi.w	#$182,D1
	bne.s	lbC0247CA
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0247CA:
	cmpi.w	#$184,D1
	bne.s	lbC0247DC
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0247DC:
	cmpi.w	#$186,D1
	bne.s	lbC0247EE
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0247EE:
	cmpi.w	#$188,D1
	bne.s	lbC024800
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024800:
	cmpi.w	#$18A,D1
	bne.s	lbC024812
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024812:
	cmpi.w	#$18C,D1
	bne.s	lbC024824
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024824:
	cmpi.w	#$18E,D1
	bne.s	lbC024836
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024836:
	cmpi.w	#$190,D1
	bne.s	lbC024848
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024848:
	cmpi.w	#$192,D1
	bne.s	lbC02485A
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02485A:
	cmpi.w	#$194,D1
	bne.s	lbC02486C
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02486C:
	cmpi.w	#$196,D1
	bne.s	lbC02487E
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02487E:
	cmpi.w	#$198,D1
	bne.s	lbC024890
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024890:
	cmpi.w	#$19A,D1
	bne.s	lbC0248A2
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0248A2:
	cmpi.w	#$19C,D1
	bne.s	lbC0248B4
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0248B4:
	cmpi.w	#$19E,D1
	bne.s	lbC0248C6
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0248C6:
	cmpi.w	#$1A0,D1
	bne.s	lbC0248D8
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0248D8:
	cmpi.w	#$1A2,D1
	bne.s	lbC0248EA
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0248EA:
	cmpi.w	#$1A4,D1
	bne.s	lbC0248FC
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0248FC:
	cmpi.w	#$1A6,D1
	bne.s	lbC02490E
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02490E:
	cmpi.w	#$1A8,D1
	bne.s	lbC024920
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024920:
	cmpi.w	#$1AA,D1
	bne.s	lbC024932
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024932:
	cmpi.w	#$1AC,D1
	bne.s	lbC024944
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024944:
	cmpi.w	#$1AE,D1
	bne.s	lbC024956
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024956:
	cmpi.w	#$1B0,D1
	bne.s	lbC024968
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024968:
	cmpi.w	#$1B2,D1
	bne.s	lbC02497A
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02497A:
	cmpi.w	#$1B4,D1
	bne.s	lbC02498C
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02498C:
	cmpi.w	#$1B6,D1
	bne.s	lbC02499E
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC02499E:
	cmpi.w	#$1B8,D1
	bne.s	lbC0249B0
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0249B0:
	cmpi.w	#$1BA,D1
	bne.s	lbC0249C2
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0249C2:
	cmpi.w	#$1BC,D1
	bne.s	lbC0249D4
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0249D4:
	cmpi.w	#$1BE,D1
	bne.s	lbC0249E6
	cmpi.w	#$1000,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0249E6:
	cmpi.w	#$1E4,D1
	bne.s	lbC0249F8
	cmpi.w	#$7F00,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC0249F8:
	cmpi.w	#$1FC,D1
	bne.s	lbC024A0A
	cmpi.w	#$10,D0
	bgt.w	lbC024A9A
	bra.w	lbC024A96

lbC024A0A:
	cmpi.w	#$100,D1
	beq.w	lbC024A96
	cmpi.w	#$102,D1
	beq.w	lbC024A96
	cmpi.w	#$104,D1
	beq.w	lbC024A96
	cmpi.w	#$106,D1
	beq.w	lbC024A96
	cmpi.w	#$108,D1
	beq.w	lbC024A96
	cmpi.w	#$10A,D1
	beq.w	lbC024A96
	cmpi.w	#$10C,D1
	beq.w	lbC024A96
	cmpi.w	#$1DC,D1
	beq.w	lbC024A96
	cmpi.w	#$1E4,D1
	beq.w	lbC024A96
	cmpi.w	#$1FC,D1
	beq.w	lbC024A96
	cmpi.w	#$88,D1
	beq.w	lbC024A96
	cmpi.w	#$8A,D1
	beq.w	lbC024A96
	cmpi.w	#$8E,D1
	beq.w	lbC024A96
	cmpi.w	#$90,D1
	beq.w	lbC024A96
	cmpi.w	#$96,D1
	beq.w	lbC024A96
	cmpi.w	#$9A,D1
	beq.w	lbC024A96
	cmpi.w	#$9C,D1
	beq.w	lbC024A96
	bra.w	lbC024A9A

lbC024A96:
	moveq	#0,D0
	rts

lbC024A9A:
	moveq	#-1,D0
	rts

	cmpi.w	#12,D0
	bne.s	lbC024AB4
	lea	_USP.MSG0(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024AB4:
	cmpi.w	#13,D0
	bne.s	lbC024ACA
	lea	_CCR.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024ACA:
	cmpi.w	#14,D0
	bne.s	lbC024AE0
	lea	_SR.MSG0(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024AE0:
	cmpi.w	#$12,D0
	bne.s	lbC024AF6
	lea	CACR.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024AF6:
	cmpi.w	#$13,D0
	bne.s	lbC024B0C
	lea	VBR.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B0C:
	cmpi.w	#$14,D0
	bne.s	lbC024B22
	lea	SFC.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B22:
	cmpi.w	#$15,D0
	bne.s	lbC024B38
	lea	DFC.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B38:
	cmpi.w	#$16,D0
	bne.s	lbC024B4E
	lea	CAAR.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B4E:
	cmpi.w	#$17,D0
	bne.s	lbC024B64
	lea	MSP.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B64:
	cmpi.w	#$18,D0
	bne.s	lbC024B7A
	lea	ISP.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B7A:
	cmpi.w	#$19,D0
	bne.s	lbC024B90
	lea	TC.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024B90:
	cmpi.w	#$1A,D0
	bne.s	lbC024BA6
	lea	ITT0.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024BA6:
	cmpi.w	#$1B,D0
	bne.s	lbC024BBC
	lea	ITT1.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024BBC:
	cmpi.w	#$1C,D0
	bne.s	lbC024BD2
	lea	DTT0.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024BD2:
	cmpi.w	#$1D,D0
	bne.s	lbC024BE8
	lea	DTT1.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024BE8:
	cmpi.w	#$1E,D0
	bne.s	lbC024BFE
	lea	MMUSR.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024BFE:
	cmpi.w	#$1F,D0
	bne.s	lbC024C14
	lea	URP.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024C14:
	cmpi.w	#$20,D0
	bne.s	lbC024C2A
	lea	SRP.MSG(PC),A0
	jsr	$1AB4A8.L
	jmp	$1ADF20.L

lbC024C2A:
	jmp	$1ADEBA.L

_USP.MSG0:
	dc.b	'USP',0
_CCR.MSG:
	dc.b	'CCR',0
_SR.MSG0:
	dc.b	'SR',0,0
CACR.MSG:
	dc.b	'CACR',0
VBR.MSG:
	dc.b	'VBR',0
SFC.MSG:
	dc.b	'SFC',0
DFC.MSG:
	dc.b	'DFC',0
CAAR.MSG:
	dc.b	'CAAR',0
MSP.MSG:
	dc.b	'MSP',0
ISP.MSG:
	dc.b	'ISP',0
TC.MSG:
	dc.b	'TC',0
ITT0.MSG:
	dc.b	'ITT0',0
ITT1.MSG:
	dc.b	'ITT1',0
DTT0.MSG:
	dc.b	'DTT0',0
DTT1.MSG:
	dc.b	'DTT1',0
MMUSR.MSG:
	dc.b	'MMUSR',0
URP.MSG:
	dc.b	'URP',0
SRP.MSG:
	dc.b	'SRP',0,0

	movem.l	A1-A3,-(SP)
	move.l	D7,D0
	andi.w	#$FFFE,D0
	cmpi.w	#$4E7A,D0
	bne.w	lbC024D4A
	move.w	#$50,$1E2720.L
	moveq	#0,D1
	move.l	D7,D0
	andi.w	#1,D0
	beq.s	lbC024CA6
	moveq	#1,D1
lbC024CA6:
	lea	$1E2724.L,A1
	lea	$1E2736.L,A2
	tst.w	D1
	beq.s	lbC024CC2
	lea	$1E2736.L,A1
	lea	$1E2724.L,A2
lbC024CC2:
	jsr	$1ADBB8.L
	addq.l	#2,A0
	move.l	D0,D7
	andi.w	#$FFF,D0
	moveq	#15,D1
	lea	lbL024CE2(PC),A3
lbC024CD6:
	cmp.w	(A3)+,D0
	beq.s	lbC024D22
	dbra	D1,lbC024CD6
	bra.w	lbC024D4A

lbL024CE2:
	dc.l	$20801
	dc.l	1
	dc.l	$8000802
	dc.l	$8030804
	dc.l	$30004
	dc.l	$50006
	dc.l	$70805
	dc.l	$8060807
	dc.l	$120013
	dc.l	$140015
	dc.l	$C0016
	dc.l	$170018
	dc.l	$19001A
	dc.l	$1B001C
	dc.l	$1D001E
	dc.l	$1F0020

lbC024D22:
	move.w	$1E(A3),(A1)
	move.l	D7,D0
	andi.w	#$F000,D0
	rol.w	#4,D0
	moveq	#0,D1
	cmpi.w	#8,D0
	blt.s	lbC024D3A
	moveq	#1,D1
	subq.w	#8,D0
lbC024D3A:
	move.w	D1,(A2)
	ext.l	D0
	move.l	D0,2(A2)
	movem.l	(SP)+,A1-A3
	moveq	#1,D0
	rts

lbC024D4A:
	movem.l	(SP)+,A1-A3
	moveq	#0,D0
	rts

	addq.l	#1,$1E31DC.L
	jsr	$1A8208.L
	move.l	8.W,-(SP)
	rts

	addq.l	#1,$1E31E0.L
	jsr	$1A8208.L
	move.l	12.W,-(SP)
	rts

	addq.l	#1,$1E31E4.L
	jsr	$1A8208.L
	move.l	$10.W,-(SP)
	rts

	addq.l	#1,$1E31E8.L
	jsr	$1A8208.L
	move.l	$14.W,-(SP)
	rts

	addq.l	#1,$1E31EC.L
	jsr	$1A8208.L
	move.l	$18.W,-(SP)
	rts

	addq.l	#1,$1E31F0.L
	jsr	$1A8208.L
	move.l	$1C.W,-(SP)
	rts

	addq.l	#1,$1E31F4.L
	jsr	$1A8208.L
	move.l	$20.W,-(SP)
	rts

	addq.l	#1,$1E31F8.L
	jsr	$1A8208.L
	move.l	$28.W,-(SP)
	rts

	addq.l	#1,$1E31FC.L
	jsr	$1A8208.L
	move.l	$2C.W,-(SP)
	rts

	addq.l	#1,$1E31D8.L
	cmpi.l	#$150,$24.w
	bne.s	lbC024E16
	jsr	$1A869C.L
	bge.s	lbC024E14
	move.l	$1E3148.L,-(SP)
	rts

lbC024E14:
	rte

lbC024E16:
	cmpi.l	#$13A,$24.w
	beq.s	lbC024E26
	jsr	$1A8208.L
lbC024E26:
	move.l	$24.W,-(SP)
	rts

	addq.l	#1,$1E3178.L
	jsr	$1A8146.L
	move.l	$60.W,-(SP)
	rts

	addq.l	#1,$1E317C.L
	jsr	$1A8146.L
	move.l	$64.W,-(SP)
	rts

	addq.l	#1,$1E3180.L
	jsr	$1A8146.L
	move.l	$68.W,-(SP)
	rts

	addq.l	#1,$1E3184.L
	jsr	$1A8146.L
	move.l	$6C.W,-(SP)
	rts

	addq.l	#1,$1E3188.L
	jsr	$1A8146.L
	move.l	$70.W,-(SP)
	rts

	addq.l	#1,$1E318C.L
	jsr	$1A8146.L
	move.l	$74.W,-(SP)
	rts

	addq.l	#1,$1E3190.L
	jsr	$1A8146.L
	move.l	$78.W,-(SP)
	rts

	addq.l	#1,$1E3194.L
	jsr	$1A8146.L
	move.l	$7C.W,-(SP)
	rts

	addq.l	#1,$1E3198.L
	cmpi.l	#$40,$80.w
	beq.s	lbC024ED2
	jsr	$1A8208.L
lbC024ED2:
	move.l	$80.W,-(SP)
	rts

	addq.l	#1,$1E319C.L
	cmpi.l	#$40,$84.w
	beq.s	lbC024EEE
	jsr	$1A8208.L
lbC024EEE:
	move.l	$84.W,-(SP)
	rts

	addq.l	#1,$1E31A0.L
	cmpi.l	#$40,$88.w
	beq.s	lbC024F0A
	jsr	$1A8208.L
lbC024F0A:
	move.l	$88.W,-(SP)
	rts

	addq.l	#1,$1E31A4.L
	cmpi.l	#$40,$8C.w
	beq.s	lbC024F26
	jsr	$1A8208.L
lbC024F26:
	move.l	$8C.W,-(SP)
	rts

	addq.l	#1,$1E31A8.L
	cmpi.l	#$40,$90.w
	beq.s	lbC024F42
	jsr	$1A8208.L
lbC024F42:
	move.l	$90.W,-(SP)
	rts

	addq.l	#1,$1E31AC.L
	cmpi.l	#$40,$94.w
	beq.s	lbC024F5E
	jsr	$1A8208.L
lbC024F5E:
	move.l	$94.W,-(SP)
	rts

	addq.l	#1,$1E31B0.L
	cmpi.l	#$40,$98.w
	beq.s	lbC024F7A
	jsr	$1A8208.L
lbC024F7A:
	move.l	$98.W,-(SP)
	rts

	addq.l	#1,$1E31B4.L
	cmpi.l	#$40,$9C.w
	beq.s	lbC024F96
	jsr	$1A8208.L
lbC024F96:
	move.l	$9C.W,-(SP)
	rts

	addq.l	#1,$1E31B8.L
	cmpi.l	#$40,$A0.w
	beq.s	lbC024FB2
	jsr	$1A8208.L
lbC024FB2:
	move.l	$A0.W,-(SP)
	rts

	addq.l	#1,$1E31BC.L
	cmpi.l	#$40,$A4.w
	beq.s	lbC024FCE
	jsr	$1A8208.L
lbC024FCE:
	move.l	$A4.W,-(SP)
	rts

	addq.l	#1,$1E31C0.L
	cmpi.l	#$40,$A8.w
	beq.s	lbC024FEA
	jsr	$1A8208.L
lbC024FEA:
	move.l	$A8.W,-(SP)
	rts

	addq.l	#1,$1E31C4.L
	cmpi.l	#$40,$AC.w
	beq.s	lbC025006
	jsr	$1A8208.L
lbC025006:
	move.l	$AC.W,-(SP)
	rts

	addq.l	#1,$1E31C8.L
	cmpi.l	#$40,$B0.w
	beq.s	lbC025022
	jsr	$1A8208.L
lbC025022:
	move.l	$B0.W,-(SP)
	rts

	addq.l	#1,$1E31CC.L
	cmpi.l	#$40,$B4.w
	beq.s	lbC02503E
	jsr	$1A8208.L
lbC02503E:
	move.l	$B4.W,-(SP)
	rts

	addq.l	#1,$1E31D0.L
	cmpi.l	#$40,$B8.w
	beq.s	lbC02505A
	jsr	$1A8208.L
lbC02505A:
	move.l	$B8.W,-(SP)
	rts

	addq.l	#1,$1E31D4.L
	cmpi.l	#$40,$BC.w
	beq.s	lbC025076
	jsr	$1A8208.L
lbC025076:
	move.l	$BC.W,-(SP)
	rts

	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3FE
	dc.l	$7003F
	dc.l	$E0007003
	dc.l	$FF0001FE
	dc.l	$801800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3FF
	dc.l	$7003F
	dc.l	$F0007003
	dc.l	$FFC007FF
	dc.l	$80C03800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$303
	dc.l	$D8030
	dc.l	$3000D803
	dc.l	$1E00F87
	dc.l	$C0E07000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$301
	dc.l	$800D8030
	dc.l	$1800D803
	dc.l	$701C00
	dc.l	$E0606000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$301
	dc.l	$80188030
	dc.l	$18018803
	dc.l	$301800
	dc.l	$6030C000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$301
	dc.l	$8018C030
	dc.l	$18018C03
	dc.l	$383800
	dc.l	$7039C000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$301
	dc.l	$8018C030
	dc.l	$18018C03
	dc.l	$183000
	dc.l	$301F8000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$303
	dc.l	$306030
	dc.l	$30030603
	dc.l	$183000
	dc.l	$300F0000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3FF
	dc.l	$30603F
	dc.l	$F0030603
	dc.l	$183000
	dc.l	$30060000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3FE
	dc.l	$30603F
	dc.l	$E0030603
	dc.l	$183000
	dc.l	$30060000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$603030
	dc.l	$70060303
	dc.l	$183000
	dc.l	$300F0000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$7FF030
	dc.l	$3007FF03
	dc.l	$183000
	dc.l	$301F8000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$7FF030
	dc.l	$1807FF03
	dc.l	$183000
	dc.l	$30198000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$C01830
	dc.l	$180C0183
	dc.l	$383800
	dc.l	$7039C000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$C01830
	dc.l	$180C0183
	dc.l	$301800
	dc.l	$6070E000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$C01830
	dc.l	$180C0183
	dc.l	$701C00
	dc.l	$E0606000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$1800C30
	dc.l	$181800C3
	dc.l	$1E00F87
	dc.l	$C0C03000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$1800C30
	dc.l	$181800C3
	dc.l	$FFC007FF
	dc.l	$80C03800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$300
	dc.l	$1800C30
	dc.l	$181800C3
	dc.l	$FF0001FE
	dc.l	$801800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3F800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FC0000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FFF00
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$FFF8000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1F
	dc.l	$FFFC07FF
	dc.l	$FF000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$FFF
	dc.l	$FE03FFFF
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$3F
	dc.l	$FFE3F8FF
	dc.l	$FF800000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FFF
	dc.l	$F1FC7FFF
	dc.l	$C0000000
	dc.l	0
	dc.l	0
	dc.l	$60
	dc.l	0
	dc.l	$C00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000
	dc.l	0
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$6F
	dc.l	$FF7FFFDF
	dc.l	$FEC00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$37FF
	dc.l	$BFFFEFFF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$6F
	dc.l	$FCFFFFE7
	dc.l	$FEC00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$37FE
	dc.l	$7FFFF3FF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$6F
	dc.l	$FB9FF83B
	dc.l	$6E00000
	dc.l	0
	dc.l	$70000000
	dc.l	$3000000
	dc.l	0
	dc.l	$1FF00000
	dc.l	$180
	dc.l	0
	dc.l	$C0C006
	dc.l	0
	dc.l	$FF00FF87
	dc.l	$FE00E000
	dc.l	0
	dc.l	$37FD
	dc.l	$CFFC1D83
	dc.l	$70000000
	dc.l	0
	dc.l	0
	dc.l	$6F
	dc.l	$FB3FFE1B
	dc.l	$6F00000
	dc.l	0
	dc.l	$70000000
	dc.l	$C3000000
	dc.l	0
	dc.l	$1FF80000
	dc.l	$180
	dc.l	0
	dc.l	$C0C006
	dc.l	0
	dc.l	$FFC0FF87
	dc.l	$FE00E000
	dc.l	0
	dc.l	$37FD
	dc.l	$9FFF0D83
	dc.l	$78000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$F67FFF0F
	dc.l	$86F80000
	dc.l	0
	dc.l	$D8000000
	dc.l	$C3000000
	dc.l	0
	dc.l	$18180000
	dc.l	$180
	dc.l	0
	dc.l	$C0E00E
	dc.l	0
	dc.l	$C1C0C000
	dc.l	$6001B000
	dc.l	0
	dc.l	$7FFB
	dc.l	$3FFF87C3
	dc.l	$7C000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$FC7FFF8F
	dc.l	$C6F80000
	dc.l	0
	dc.l	$D8000000
	dc.l	$C0000000
	dc.l	0
	dc.l	$180C0000
	dc.l	$180
	dc.l	0
	dc.l	$C0600C
	dc.l	0
	dc.l	$C060C000
	dc.l	$6001B000
	dc.l	0
	dc.l	$7FFE
	dc.l	$3FFFC7E3
	dc.l	$7C000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$FC7FFFCF
	dc.l	$E7F00000
	dc.l	1
	dc.l	$88000000
	dc.l	$C0000000
	dc.l	0
	dc.l	$180C0000
	dc.l	$180
	dc.l	0
	dc.l	$C0701C
	dc.l	0
	dc.l	$C060C000
	dc.l	$60031000
	dc.l	0
	dc.l	$7FFE
	dc.l	$3FFFE7F3
	dc.l	$F8000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$DE7FFFE7
	dc.l	$E7E00000
	dc.l	1
	dc.l	$8C007F03
	dc.l	$F300FC01
	dc.l	$9C000000
	dc.l	$180C00F0
	dc.l	$33E0180
	dc.l	$3F006030
	dc.l	$C03018
	dc.l	0
	dc.l	$C060C000
	dc.l	$60031800
	dc.l	0
	dc.l	$7FEF
	dc.l	$3FFFF3F3
	dc.l	$F0000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$DE7E0FE3
	dc.l	$FFC00000
	dc.l	1
	dc.l	$8C00FF83
	dc.l	$F301FE01
	dc.l	$BF000000
	dc.l	$180C03FC
	dc.l	$3FF0180
	dc.l	$7F806030
	dc.l	$C03018
	dc.l	0
	dc.l	$C060C000
	dc.l	$60031800
	dc.l	0
	dc.l	$7E6F
	dc.l	$3F07F1FF
	dc.l	$E0000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$DE7E07F3
	dc.l	$FFC00000
	dc.l	3
	dc.l	$601E1C0
	dc.l	$C3038701
	dc.l	$E3000000
	dc.l	$1818070E
	dc.l	$3C38180
	dc.l	$C1C06030
	dc.l	$C03838
	dc.l	0
	dc.l	$C0C0C000
	dc.l	$60060C00
	dc.l	0
	dc.l	$7E6F
	dc.l	$3F03F9FF
	dc.l	$E0000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$BE7E03F1
	dc.l	$FEC00000
	dc.l	3
	dc.l	$60380C0
	dc.l	$C3070381
	dc.l	$C1800000
	dc.l	$1FF80E06
	dc.l	$381C180
	dc.l	$C0C03060
	dc.l	$C01830
	dc.l	0
	dc.l	$FF80FF00
	dc.l	$60060C00
	dc.l	0
	dc.l	$7FDF
	dc.l	$3F01F8FF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$BC7E03F1
	dc.l	$BEC00000
	dc.l	3
	dc.l	$6030000
	dc.l	$C3060181
	dc.l	$81800000
	dc.l	$1FF00C03
	dc.l	$300C180
	dc.l	$C03060
	dc.l	$C01830
	dc.l	0
	dc.l	$FFC0FF00
	dc.l	$60060C00
	dc.l	0
	dc.l	$7FDE
	dc.l	$3F01F8DF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$FC7E03F1
	dc.l	$BEC00000
	dc.l	6
	dc.l	$3030000
	dc.l	$C3060181
	dc.l	$81800000
	dc.l	$18380C03
	dc.l	$300C180
	dc.l	$1FC038E0
	dc.l	$C01C70
	dc.l	0
	dc.l	$C060C000
	dc.l	$600C0600
	dc.l	0
	dc.l	$7FFE
	dc.l	$3F01F8DF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$F87E03F1
	dc.l	$BEC00000
	dc.l	7
	dc.l	$FF030000
	dc.l	$C3060181
	dc.l	$81800000
	dc.l	$18180FFF
	dc.l	$300C180
	dc.l	$7FC018C0
	dc.l	$C00C60
	dc.l	0
	dc.l	$C030C000
	dc.l	$600FFE00
	dc.l	0
	dc.l	$7FFC
	dc.l	$3F01F8DF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$B07E03F1
	dc.l	$BEC00000
	dc.l	7
	dc.l	$FF030000
	dc.l	$C3060181
	dc.l	$81800000
	dc.l	$180C0FFF
	dc.l	$300C180
	dc.l	$F0C018C0
	dc.l	$C00C60
	dc.l	0
	dc.l	$C030C000
	dc.l	$600FFE00
	dc.l	0
	dc.l	$7FD8
	dc.l	$3F01F8DF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FF
	dc.l	$B07E03F1
	dc.l	$FEC00000
	dc.l	12
	dc.l	$1830000
	dc.l	$C3060181
	dc.l	$81800000
	dc.l	$180C0C00
	dc.l	$300C181
	dc.l	$C0C00D80
	dc.l	$C00EE0
	dc.l	0
	dc.l	$C030C000
	dc.l	$60180300
	dc.l	0
	dc.l	$7FD8
	dc.l	$3F01F8FF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FD
	dc.l	$B07E03F1
	dc.l	$FEC00000
	dc.l	12
	dc.l	$1830000
	dc.l	$C3060181
	dc.l	$81800000
	dc.l	$180C0C00
	dc.l	$300C181
	dc.l	$80C00D80
	dc.l	$C006C0
	dc.l	0
	dc.l	$C030C000
	dc.l	$60180300
	dc.l	0
	dc.l	$7ED8
	dc.l	$3F01F8FF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$D87E07F3
	dc.l	$FFC00000
	dc.l	12
	dc.l	$18380C0
	dc.l	$C3070381
	dc.l	$81800000
	dc.l	$180C0E03
	dc.l	$381C181
	dc.l	$81C00780
	dc.l	$C006C0
	dc.l	0
	dc.l	$C070C000
	dc.l	$60180300
	dc.l	0
	dc.l	$7E6C
	dc.l	$3F03F9FF
	dc.l	$E0000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$D87E0FE7
	dc.l	$FFE00000
	dc.l	$18
	dc.l	$C1E1C0
	dc.l	$C3038701
	dc.l	$81800000
	dc.l	$180C0707
	dc.l	$3C38181
	dc.l	$C3C00700
	dc.l	$C00380
	dc.l	0
	dc.l	$C0E0C000
	dc.l	$60300180
	dc.l	0
	dc.l	$7E6C
	dc.l	$3F07F3FF
	dc.l	$F0000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$D87FFFE7
	dc.l	$E7E00000
	dc.l	$18
	dc.l	$C0FF80
	dc.l	$F301FE01
	dc.l	$81800000
	dc.l	$180C03FE
	dc.l	$3FF0180
	dc.l	$FEE00300
	dc.l	$C00380
	dc.l	0
	dc.l	$FFC0FF80
	dc.l	$60300180
	dc.l	0
	dc.l	$7E6C
	dc.l	$3FFFF3F3
	dc.l	$F0000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$6C7FFFCF
	dc.l	$C6F00000
	dc.l	$18
	dc.l	$C07F00
	dc.l	$7300FC01
	dc.l	$81800000
	dc.l	$180C00F8
	dc.l	$33E0180
	dc.l	$7C600300
	dc.l	$C00380
	dc.l	0
	dc.l	$FF00FF80
	dc.l	$60300180
	dc.l	0
	dc.l	$7E36
	dc.l	$3FFFE7E3
	dc.l	$78000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$6C7FFF8F
	dc.l	$C6F80000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000000
	dc.l	$600
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$7E36
	dc.l	$3FFFC7E3
	dc.l	$7C000000
	dc.l	0
	dc.l	0
	dc.l	$FC
	dc.l	$367FFF0F
	dc.l	$86F80000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000000
	dc.l	$600
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$7E1B
	dc.l	$3FFF87C3
	dc.l	$7C000000
	dc.l	0
	dc.l	0
	dc.l	$6C
	dc.l	$1B3FFE1B
	dc.l	$6F00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000000
	dc.l	$C00
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$360D
	dc.l	$9FFF0D83
	dc.l	$78000000
	dc.l	0
	dc.l	0
	dc.l	$6F
	dc.l	$FBFFFFFB
	dc.l	$FEE00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000000
	dc.l	$3C00
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$37FD
	dc.l	$FFFFFDFF
	dc.l	$70000000
	dc.l	0
	dc.l	0
	dc.l	$6F
	dc.l	$FCFFFFE7
	dc.l	$FEC00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000000
	dc.l	$3800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$37FE
	dc.l	$7FFFF3FF
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$60
	dc.l	0
	dc.l	$C00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3000
	dc.l	0
	dc.l	$60000000
	dc.l	0
	dc.l	0
	dc.l	$3F
	dc.l	$FF9FFF3F
	dc.l	$FF800000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FFF
	dc.l	$CFFF9FFF
	dc.l	$C0000000
	dc.l	0
	dc.l	0
	dc.l	$1F
	dc.l	$FFE3F8FF
	dc.l	$FF000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$FFF
	dc.l	$F1FC7FFF
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$7C07C0
	dc.l	0
	dc.l	0
	dc.l	$1C000000
	dc.l	0
	dc.l	0
	dc.l	$1800C3FE
	dc.l	$7FC00F0
	dc.l	$1800FF00
	dc.l	$38030000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3E03E000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FFF00
	dc.l	0
	dc.l	0
	dc.l	$1C001F00
	dc.l	$F001F00
	dc.l	$3E000000
	dc.l	$1800C3FE
	dc.l	$7FE03FC
	dc.l	$1803FFC0
	dc.l	$3C030000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$FFF8000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3F800
	dc.l	0
	dc.l	0
	dc.l	$36001F00
	dc.l	$3FC03F80
	dc.l	$7F000000
	dc.l	$1C01C300
	dc.l	$606030E
	dc.l	$1807C3E0
	dc.l	$3C030000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FC0000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$36000300
	dc.l	$30E071C0
	dc.l	$E3800000
	dc.l	$C018300
	dc.l	$6030606
	dc.l	$180E0070
	dc.l	$36030000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$62000300
	dc.l	$606060C0
	dc.l	$C1800000
	dc.l	$E038300
	dc.l	$6030606
	dc.l	$180C0030
	dc.l	$37030000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$63000300
	dc.l	$603060C0
	dc.l	$C1800000
	dc.l	$6030300
	dc.l	$6030600
	dc.l	$181C0038
	dc.l	$33030000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$63000300
	dc.l	$6030C061
	dc.l	$80C00000
	dc.l	$6030300
	dc.l	$6030700
	dc.l	$18180018
	dc.l	$33830000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$C1800300
	dc.l	$30C061
	dc.l	$80C00000
	dc.l	$7070300
	dc.l	$60603C0
	dc.l	$18180018
	dc.l	$31830000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$C1800300
	dc.l	$60C061
	dc.l	$80C00000
	dc.l	$30603FC
	dc.l	$7FE01F0
	dc.l	$18180018
	dc.l	$31C30000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$C1800300
	dc.l	$E0C061
	dc.l	$80C00000
	dc.l	$30603FC
	dc.l	$7FC0078
	dc.l	$18180018
	dc.l	$30C30000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	1
	dc.l	$80C00300
	dc.l	$1C0C061
	dc.l	$80C00000
	dc.l	$38E0300
	dc.l	$60E001C
	dc.l	$18180018
	dc.l	$30E30780
	dc.l	$6400000
	dc.l	$20000
	dc.l	$800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	1
	dc.l	$FFC00300
	dc.l	$780C061
	dc.l	$80C00000
	dc.l	$18C0300
	dc.l	$606000E
	dc.l	$18180018
	dc.l	$30630440
	dc.l	$4400000
	dc.l	$20000
	dc.l	$800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	1
	dc.l	$FFC00300
	dc.l	$E00C061
	dc.l	$80C00000
	dc.l	$18C0300
	dc.l	$6030006
	dc.l	$18180018
	dc.l	$30730407
	dc.l	$EE88470
	dc.l	$A182C070
	dc.l	$60C0E800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	3
	dc.l	$600300
	dc.l	$1C00C061
	dc.l	$80C00000
	dc.l	$1DC0300
	dc.l	$6030606
	dc.l	$181C0038
	dc.l	$3033060C
	dc.l	$8448C898
	dc.l	$C6432098
	dc.l	$B3219800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	3
	dc.l	$600300
	dc.l	$380060C0
	dc.l	$C1800000
	dc.l	$D80300
	dc.l	$6030606
	dc.l	$180C0030
	dc.l	$303B0188
	dc.l	$4448C808
	dc.l	$84221008
	dc.l	$82110800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	3
	dc.l	$600300
	dc.l	$700060C0
	dc.l	$C1800000
	dc.l	$D80300
	dc.l	$6030606
	dc.l	$180E0070
	dc.l	$301B00C8
	dc.l	$444548F8
	dc.l	$87E210F8
	dc.l	$E3F10800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	6
	dc.l	$300300
	dc.l	$600071C0
	dc.l	$E3800000
	dc.l	$700300
	dc.l	$603030E
	dc.l	$1807C3E0
	dc.l	$300F0448
	dc.l	$44455188
	dc.l	$84021188
	dc.l	$32010800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	6
	dc.l	$300300
	dc.l	$7FF03F80
	dc.l	$7F000000
	dc.l	$7003FE
	dc.l	$60303FC
	dc.l	$1803FFC0
	dc.l	$300F0448
	dc.l	$C4473118
	dc.l	$84223118
	dc.l	$92111800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	6
	dc.l	$300300
	dc.l	$7FF01F00
	dc.l	$3E000000
	dc.l	$7003FE
	dc.l	$60300F0
	dc.l	$1800FF00
	dc.l	$30070787
	dc.l	$846230E8
	dc.l	$83C3E0E8
	dc.l	$E1E0F800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$F0
	dc.l	4
	dc.l	$202000
	dc.l	0
	dc.l	$1E020780
	dc.l	$40F80782
	dc.l	$20000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$F0400000
	dc.l	6
	dc.l	4
	dc.l	$100000
	dc.l	$3C4000
	dc.l	$8080000
	dc.l	$2000000
	dc.l	$108
	dc.l	0
	dc.l	$202018
	dc.l	$E0E0E00
	dc.l	$11050440
	dc.l	$A0840842
	dc.l	$20000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	1
	dc.l	$8400000
	dc.l	9
	dc.l	4
	dc.l	$100000
	dc.l	$224000
	dc.l	$8080000
	dc.l	$2000000
	dc.l	$200
	dc.l	$382C1154
	dc.l	$342C7008
	dc.l	$11111100
	dc.l	$11050440
	dc.l	$A0821022
	dc.l	$20000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	2
	dc.l	$583C16
	dc.l	$6838209
	dc.l	$2216034
	dc.l	$1E387040
	dc.l	$224783
	dc.l	$C90B0784
	dc.l	$46400000
	dc.l	$200
	dc.l	$44321164
	dc.l	$4C322008
	dc.l	$11110100
	dc.l	$11088441
	dc.l	$10821021
	dc.l	$40000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	2
	dc.l	$644219
	dc.l	$9844506
	dc.l	$221904C
	dc.l	$211088A2
	dc.l	$224844
	dc.l	$2A0C8844
	dc.l	$46800000
	dc.l	$200
	dc.l	$44221144
	dc.l	$44222008
	dc.l	$F0F0600
	dc.l	$1E088781
	dc.l	$10821020
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	2
	dc.l	$440211
	dc.l	$884440A
	dc.l	$2211044
	dc.l	$1108880
	dc.l	$3C4044
	dc.l	$C088042
	dc.l	$4B000000
	dc.l	$200
	dc.l	$44220A44
	dc.l	$44222008
	dc.l	$1010100
	dc.l	$100F8481
	dc.l	$F0821021
	dc.l	$40000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	2
	dc.l	$443E11
	dc.l	$887C211
	dc.l	$42211044
	dc.l	$1F10F840
	dc.l	$2247C4
	dc.l	$C0887C2
	dc.l	$4B000000
	dc.l	$200
	dc.l	$44220A44
	dc.l	$44222008
	dc.l	$2021100
	dc.l	$10104442
	dc.l	$8821022
	dc.l	$20000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	2
	dc.l	$444211
	dc.l	$8840110
	dc.l	$82211044
	dc.l	$21108020
	dc.l	$224844
	dc.l	$A088842
	dc.l	$AA800000
	dc.l	$108
	dc.l	$44320A44
	dc.l	$4C222008
	dc.l	$2021100
	dc.l	$10104442
	dc.l	$8840842
	dc.l	$20000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	1
	dc.l	$8444211
	dc.l	$9844511
	dc.l	$8261904C
	dc.l	$211088A0
	dc.l	$224844
	dc.l	$29088841
	dc.l	$12400000
	dc.l	$F0
	dc.l	$382C0444
	dc.l	$34222008
	dc.l	$4040E00
	dc.l	$10104442
	dc.l	$8F80782
	dc.l	$20000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$F0443D11
	dc.l	$683820E
	dc.l	$41A16034
	dc.l	$1E907042
	dc.l	$3C47A3
	dc.l	$C88887A1
	dc.l	$12200000
	dc.l	0
	dc.l	$200400
	dc.l	$4000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$800000
	dc.l	$10000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$200800
	dc.l	$44000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$8800000
	dc.l	$10000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$201000
	dc.l	$38000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$7000000
	dc.l	$10000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3F800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FC0000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1C0700
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$E038000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1F
	dc.l	$FFFFFFFF
	dc.l	$FF000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$FFF
	dc.l	$FFFFFFFF
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$800020
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$800
	dc.l	$40001000
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$3000018
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$801
	dc.l	$80000C00
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$4000004
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$802
	dc.l	$200
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$4000004
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$802
	dc.l	$200
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$3F
	dc.l	$E81FF802
	dc.l	$1600000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FF4
	dc.l	$FFC0100
	dc.l	$B0000000
	dc.l	0
	dc.l	0
	dc.l	$3F
	dc.l	$F01FFE03
	dc.l	$1E00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FF8
	dc.l	$FFF0180
	dc.l	$F0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$30180F03
	dc.l	$81C00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1818
	dc.l	$C0781C0
	dc.l	$E0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$38180381
	dc.l	$81800000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$181C
	dc.l	$C01C0C0
	dc.l	$C0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$38180180
	dc.l	$C3000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$181C
	dc.l	$C00C061
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$381801C0
	dc.l	$E7000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$181C
	dc.l	$C00E073
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$581800C0
	dc.l	$7F000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$182C
	dc.l	$C00603F
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$701800C0
	dc.l	$7D000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1838
	dc.l	$C00603E
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$3F
	dc.l	$F01800C0
	dc.l	$59000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FF8
	dc.l	$C00602C
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$3F
	dc.l	$E01800C0
	dc.l	$59000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FF0
	dc.l	$C00602C
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$401800C0
	dc.l	$7D000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1820
	dc.l	$C00603E
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$401800C0
	dc.l	$7F000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1820
	dc.l	$C00603F
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$401800C0
	dc.l	$67000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1820
	dc.l	$C006033
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$201801C0
	dc.l	$E7000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1810
	dc.l	$C00E073
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$20180181
	dc.l	$C3800000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1810
	dc.l	$C00C0E1
	dc.l	$C0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$20180381
	dc.l	$81800000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1810
	dc.l	$C01C0C0
	dc.l	$C0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$10180F03
	dc.l	$1C00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1808
	dc.l	$C078180
	dc.l	$E0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$101FFE03
	dc.l	$1E00000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1808
	dc.l	$FFF0180
	dc.l	$F0000000
	dc.l	0
	dc.l	0
	dc.l	$30
	dc.l	$81FF802
	dc.l	$1600000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1804
	dc.l	$FFC0100
	dc.l	$B0000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$4000004
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$802
	dc.l	$200
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$4000004
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$802
	dc.l	$200
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$10
	dc.l	$3000018
	dc.l	$1000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$801
	dc.l	$80000C00
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	$1F
	dc.l	$FFFFFFFF
	dc.l	$FF000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$FFF
	dc.l	$FFFFFFFF
	dc.l	$80000000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$6000C0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$30006000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1C0700
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$E038000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$3F800
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	$1FC0000
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0
	dc.l	0