* Gunfight.256 b. Fox/Tqa

ct	equ	$76

	org	$76
start	lsr	^1d
	ldx	#$12
c	lda	pm0,x
	sta	pmg+$84,x
	rol	@	+
a	ror	pmg+$384,x
	asl	@
	bne	a
	dex
	bpl	c
	mvy	#$3c	$22f
	sty	$26f
	sty	^47

m
q	ldx	#5
w	lda	z:h,x
	cmp:rne	^4b
	mva	z:b,x	^1a
	dex
	bpl	w

	asl	ct
	bne	q
	rol	ct	+
	rol	z:tim	-
	rol	z:tim+1
	bcc	q
	inc	z:tim
	mva	frq3-$3c,y	^20
	mva	ctl3-$3c,y	^21
	seq:iny
	cmp	#$10
	bne	q
x	inx
	mva	z:gm2,x	pmg+$284,x
	mva	gm3,x	pmg+$384,x
	cmp	#$70
	bne	x
	beq	m	!

tim	dta	a(%1011100001001111)

h	dta	$68,$4c,$34,$24,$1c,$3
b	dta	$0a,$fa,$f8,$f6,$86,$82

gm2	dta	$e0,$80,$a0,$e0,$00,$88,$d8,$f8,$a8,$88,$00,$00,$00,$00,$07,$0f
	dta	$07,$02,$00,$00,$20,$64,$42,$c0
gm3	dta	$77,$52,$52,$72,$00,$1D,$11,$1D,$10,$1D,$00,$28,$BA,$7C,$38,$78
	dta	$38,$90,$fe,$3a,$ba,$fa,$f8,$70
pm0	dta	$14,$5d,$3e,$1c,$1e,$1c,$08,$3f,$7e,$dc,$dc,$7c,$3c,$14,$36,$36
	dta	$66,$46,$63

frq3	dta	$79,$00,$79,$5b,$00
	dta	$80,$60,$40,$20,$79,$00,$5b,$48
ctl3	dta	$a8,$a0,$a8,$a8,$a0
	dta	$10,$0c,$08,$04,$a8,$a0,$a8,$a8,$00

pmg	equ	$3c00

	org	$2c0
	dta	$42,$04,$04,$42

	org	pmg+$187
	dta	$e0,$f0,$e0,$00,$07,$04,$08,$00,$e0

	org	pmg+$287
	dta	$07,$0f,$07,$00,$e0,$20,$10,$00,$07

	org	^00
	dta	$50,$53,$ad,$b0

	end