
begin:
	move.w	#$7fff,$dff096
	move.w	#$7fff,$dff09a

	move.w	#$0020,$dff1dc

	move.w	#$000,$dff180

	lea	end(pc),a2
	lea	start(pc),a1
	sub.l	a1,a2
	add.l	#$80000,a2
	move.l	a2,a1
	lea	start(pc),a0
	move.w	#end-start-1,d7
.copy:
	move.b	(a0)+,(a1)+
	dbf	d7,.copy
	jmp	(a2)

start:
	lea	file,a0
.again:
	move.l	a0,a2
	move.l	(a2)+,d7
	beq.s	.start
	move.l	(a2)+,a1
	move.l	d7,d0
	addq.l	#3,d0
	lsr.l	#2,d0
.copyfile:
	move.l	(a2)+,(a1)+
	dbf	d0,.copyfile

	add.l	d7,a0
	bra.s	.again
.start:
	move.l	(a2)+,a0
	jmp	(a0)	
end:

file:

file1:
	dc.l	fileend1-file1
	dc.l	$a00
	incbin	work:objects/t3.obj
fileend1:
file2:
	dc.l	fileend2-file2
	dc.l	$5d000
	incbin	work:objects/t3.score.gfx
fileend2:
	dc.l	0
	dc.l	$a00
