Home » Personal collection » Commodore disks » disk45a_galaxy64.d64 » bouncecode2

bouncecode2

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Commodore disks » disk45a_galaxy64.d64
Filename: bouncecode2
Read OK:
File size: 1108 bytes
Load address: 0801
Exec address: 0000
File contents
    10 REM              BOUNCE
    20 REM          BY DOMINIC FORD
    30 REM
    40 REM  BASIC        - 1ST  JUNE 1993
    50 REM  MACHINE CODE - 13TH MAY  1995
    70 GOTO 6000
   100 *=$3C80
   110 XS=$3C00
   120 YS=$3C08
   130 XP=$3C10
   140 YP=$3C18
   150 RND=$0002
   160 XST=$3C20
   170 YST=$3C21
   180 ADRP=$3C22
   190 EX=$3C23
   200 ; LINE 10 (SEE PRINTOUT OF BASIC)
   210 L10 LDA #$93
   220 JSR $AB47
   230 LDA #$13
   240 JSR $AB47
   250 LDA #$09
   260 STA $D020
   270 LDA #$00
   280 STA $D021
   290 LDA #$05
   300 STA $DBE7
   310 ; LINE 20
   320 L20 LDX #$00
   330 WOOPNT LDY #$05
   340 WOOLOP LDA WOOZY,Y
   350 JSR $AB47
   360 DEY
   370 BNE WOOLOP
   380 INX
   390 CPX #$C7
   400 BNE WOOPNT
   410 LDY #$05
   420 WOOB LDA WOOZY,Y
   430 JSR $AB47
   440 DEY
   450 CPY #$01
   460 BNE WOOB
   470 ; LINE 30
   480 L30 LDA #$19
   490 STA $07E7
   500 LDA #$00
   510 STA $D015
   520 ; LINE 40
   530 L40 STA $D017
   540 STA $D01D
   550 STA $D010
   560 ; LINE 50
   570 L50 STA $D01C
   580 STA $D01B
   590 ; LINE 60 (NOTHING)
   600 ; LINE 70 (NOTHING)
   610 ; LINE 80+90
   620 L80 LDX #$08
   630 LDA #$F1
   640 POSLOP STA $07F7,X
   650 DEX
   660 BNE POSLOP
   670 ; LINE 100
   680 L100 LDX #$01
   690 COLLOP TXA
   700 STA $D026,X
   710 INX
   720 CPX #$09
   730 BNE COLLOP
   740 ; LINE 110
   750 L110 LDA #$00
   755 STA $FD
   760 ; LINE 120
   770 L120 LDA #<L120B
   780 STA $FB
   790 LDA #>L120B
   800 STA $FC
   810 RTS
   820 L120B LDA $02
   830 CMP #$38
   840 BCC L120
   850 CMP #$AA
   860 BCS L120
   870 LDX $FD
   880 STA YP,X
   890 TAY
   900 TXA
   910 ASL A
   920 TAX
   930 TYA
   940 STA $D001,X
   950 ; LINE 130
   960 L130 LDA #<L130B
   970 STA $FB
   980 LDA #>L130B
   990 STA $FC
  1000 RTS
  1010 WOOZY TXT "!YZOOW"
  1020 L130B LDA $02
  1030 CMP #$38
  1040 BCC L130
  1050 LDX $FD
  1060 STA XP,X
  1070 TAY
  1080 TXA
  1090 ASL A
  1100 TAX
  1110 TYA
  1120 STA $D000,X
  1130 LDX $FD
  1140 INX
  1150 STX $FD
  1160 CPX #$08
  1170 BNE L120
  1180 LDA #$00
  1190 STA $D01E
  1200 ; LINE 140
  1210 L140 LDX #$00
  1220 STX $FD
  1230 F140L LDA XP,X
  1240 TAY
  1250 TXA
  1260 ASL A
  1270 TAX
  1280 TYA
  1290 STA $D000,X
  1300 ; LINE 145
  1310 L145 LDX $FD
  1320 LDA YP,X
  1330 TAY
  1340 TXA
  1350 ASL A
  1360 TAX
  1370 TYA
  1380 STA $D001,X
  1390 LDX $FD
  1400 INX
  1410 STX $FD
  1420 CPX #$08
  1430 BNE F140L
  1440 ; LINE 150
  1450 L150 LDA $D01E
  1460 BNE L110
  1470 ; LINE 160
  1480 L160 LDA #$00
  1490 STA $D015
  1500 LDX #$00
  1510 L170 LDA $A2
  1520 AND #$01
  1530 CMP #$01
  1540 BEQ L170B
  1550 LDA #$FF
  1560 L170B STA XS,X
  1570 ; LINE 180
  1580 L180 LDA $A1
  1590 AND #$01
  1600 CMP #$01
  1610 BEQ L180B
  1620 LDA #$FF
  1630 L180B STA YS,X
  1640 ; LINE 190 (NOTHING)
  1650 ; LINE 200 (NOTHING)
  1660 L210 INX
  1670 CPX #$08
  1680 BNE L170
  1690 LDA #$FF
  1700 STA $D015
  1710 ; LINE 220 (MAIN PROGRAM LOOP)
  1720 L220 LDX #$00
  1725 LDY #$01
  1730 L220LOP STX XST
  1735 STY YST
  1740 TXA
  1750 ASL A
  1760 STA ADRP
  1770 LDA $D010
  1780 AND YST
  1790 STA EX
  1800 L230 LDX ADRP
  1810 LDA $D000,X
  1820 CMP #$FF
  1830 BNE L240
  1840 LDA EX
  1850 BNE L240
  1860 LDX XST
  1870 LDA XS,X
  1880 CMP #$01
  1890 BNE L240
  1900 LDA $D010
  1910 ORA YST
  1920 STA $D010
  1930 LDA #$02
  1940 STA EX
  1942 LDX ADRP
  1944 LDA #$00
  1946 STA $D000,X
  1950 L240 LDX ADRP
  1960 LDA $D000,X
  1970 BNE L250
  1980 LDA EX
  1990 CMP #$01
  2000 BNE L250
  2010 LDX XST
  2020 LDA XS,X
  2030 CMP #$00
  2040 BNE L250
  2050 LDX ADRP
  2060 LDA #$FF
  2070 STA $D000,X
  2080 LDA $D010
  2090 SEC
  2100 SBC YST
  2110 STA $D010
  2120 LDA #$02
  2130 STA EX
  2140 L250 LDX ADRP
  2150 LDY XST
  2160 LDA $D000,X
  2170 CLC
  2180 ADC XS,Y
  2190 STA $D000,X
  2200 L260 CMP #$1A
  2210 BCS L270
  2220 LDA EX
  2230 BNE L270
  2240 LDA #$01
  2250 STA XS,Y
  2260 L270 CMP #$2D
  2270 BCC L280
  2280 LDA EX
  2300 BEQ L280
  2310 LDA #$FF
  2320 STA XS,Y
  2330 L280 JSR L1000
  2350 CMP #$00
  2360 BEQ L290
  2370 LDA XS,Y
  2380 CMP #$01
  2390 BEQ L280B
  2400 LDA #$01
  2410 JMP L280C
  2420 L280B LDA #$FF
  2430 L280C STA XS,Y
  2440 L290 INX
  2450 LDA $D000,X
  2460 CLC
  2470 ADC YS,Y
  2480 STA $D000,X
  2490 L300 CMP #$E6
  2500 BCC L310
  2510 LDA #$FF
  2520 STA YS,Y
  2530 L310 CMP #$32
  2540 BCS L320
  2550 LDA #$01
  2560 STA YS
  2570 L320 JSR L1000
  2590 CMP #$00
  2600 BEQ L330
  2610 LDA YS,Y
  2620 CMP #$01
  2630 BEQ L320B
  2640 LDA #$01
  2650 JMP L320C
  2660 L320B LDA #$FF
  2670 L320C STA YS,Y
  2680 L330 LDX XST
  2690 INX
  2700 LDA YST
  2710 ASL A
  2720 TAY
  2730 CPX #$08
  2740 BEQ L330B
  2750 JMP L220LOP
  2760 L330B JMP L220
  2800 L1000 LDA $D01E
  2810 LDA $D01E
  2820 AND YST
  2830 RTS
  5000 ; SPRITE DATA (340-400)
  5005 *=$3C40
  5010 TXT 0,127,0,1,255,192,7,255,224
  5020 TXT 15,255,240,31,255,248,63,255
  5030 TXT 252,63,255,252,127,255,254,127
  5040 TXT 255,254,127,255,254,127,255
  5050 TXT 254,127,255,254,127,255,254
  5060 TXT 127,255,254,63,255,252,63,255
  5070 TXT 252,31,255,248,31,255,248,15
  5080 TXT 255,240,7,255,224,1,255,128
  5100 END
  6000 REM CONTROLLER
  6020 SYS $3C80
  6030 POKE 2,INT(RND(1)*255)
  6040 SYS (PEEK($FB)+PEEK($FC)*256)
  6050 GOTO 6030


�              BOUNCE:�          BY DOMINIC FORD@�e(�  BASIC        - 1ST  JUNE 1993�2�  MACHINE CODE - 13TH MAY  1995�F� 6000�d��$3C80�nXS�$3C00�xYS�$3C08��XP�$3C10��YP�$3C18����$0002��XST�$3C20��YST�$3C21	�ADRP�$3C22	�EX�$3C23;	�; LINE 10 (SEE �OUT OF BASIC)L	�L10 LDA #$93Z	�JSR $AB47g	�LDA #$13u	�JSR $AB47�	�LDA #$09�	STA $D020�	LDA #$00�	STA $D021�	"LDA #$05�	,STA $DBE7�	6; LINE 20�	@L20 LDX #$00�	JWOOPNT LDY #$05
TWOOLOP LDA WOOZY,Y
^JSR $AB47&
hDEY5
rBNE WOOLOP=
|INXJ
�CPX #$C7Y
�BNE WOOPNTf
�LDY #$05{
�WOOB LDA WOOZY,Y�
�JSR $AB47�
�DEY�
�CPY #$01�
�BNE WOOB�
�; LINE 30�
�L30 LDA #$19�
�STA $07E7�
�LDA #$00�
�STA $D015; LINE 40L40 STA $D017!STA $D01D/&STA $D010=0; LINE 50O:L50 STA $D01C]DSTA $D01BsN; LINE 60 (�HING)�X; LINE 70 (�HING)�b; LINE 80�90�lL80 LDX #$08�vLDA #$F1���LOP STA $07F7,X��DEX��BNE �LOP��; LINE 100�L100 LDX #$01�COLLOP TXA"�STA $D026,X*�INX7�CPX #$09F�BNE COLLOPU�; LINE 110g�L110 LDA #$00s�STA $FD��; LINE 120�L120 LDA #�L120B�STA $FB�LDA #�L120B� STA $FC�*RTS�4L120B LDA $02�>CMP #$38�HBCC L120
RCMP #$AA

\BCS L120
fLDX $FD&
pSTA YP,X.
zTAY6
�TXA@
�ASL AH
�TAXP
�TYA`
�STA $D001,Xo
�; LINE 130�
�L130 LDA #�L130B�
�STA $FB�
�LDA #�L130B�
�STA $FC�
�RTS�
�WOOZY TXT "!YZOOW"�
�L130B LDA $02�
CMP #$38�
BCC L130LDX $FD$STA XP,X.TAY 8TXA*BASL A2LTAX:VTYAJ`STA $D000,XVjLDX $FD^tINXj~STX $FDw�CPX #$08��BNE L120��LDA #$00��STA $D01E��; LINE 140��L140 LDX #$00��STX $FD��F140L LDA XP,X��TAY��TXA��ASL A�TAX	TYA
STA $D000,X(; LINE 1459L145 LDX $FDF(LDA YP,XN2TAYV<TXA`FASL AhPTAXpZTYA�dSTA $D001,X�nLDX $FD�xINX��STX $FD��CPX #$08��BNE F140L��; LINE 150��L150 LDA $D01E��BNE L110��; LINE 160�L160 LDA #$00�STA $D015&�LDX #$007�L170 LDA $A2B�� #$01O�CMP #$01]BEQ L170BjLDA #$FF}L170B STA XS,X�"; LINE 180�,L180 LDA $A1�6� #$01�@CMP #$01�JBEQ L180B�TLDA #$FF�^L180B STA YS,X�h; LINE 190 (�HING)r; LINE 200 (�HING)|L210 INX+�CPX #$088�BNE L170E�LDA #$FFS�STA $D015v�; LINE 220 (MAIN PROGRAM LOOP)��L220 LDX #$00��LDY #$01��L220LOP STX XST��STY YST��TXA��ASL A��STA ADRP��LDA $D010��� YST��STA EX	L230 LDX ADRPLDA $D000,X&CMP #$FF3&BNE L240>0LDA EXK:BNE L240WDLDX XSTdNLDA XS,XqXCMP #$01~bBNE L240�lLDA $D010�v�A YST��STA $D010��LDA #$02��STA EX��LDX ADRP��LDA #$00��STA $D000,X��L240 LDX ADRP	�LDA $D000,X�BNE L250!�LDA EX.�CMP #$01;�BNE L250G�LDX XSTT�LDA XS,Xa�CMP #$00n�BNE L250{LDX ADRP�LDA #$FF�STA $D000,X� LDA $D010�*SEC�4SBC YST�>STA $D010�HLDA #$02�RSTA EX�\L250 LDX ADRP�fLDY XSTpLDA $D000,XzCLC#�ADC XS,Y3�STA $D000,XE�L260 CMP #$1AR�BCS L270]�LDA EXj�BNE L270w�LDA #$01��STA XS,Y��L270 CMP #$2D��BCC L280��LDA EX��BEQ L280�	LDA #$FF�	STA XS,Y�	L280 JSR L1000�.	CMP #$008	BEQ L290B	LDA XS,YL	CMP #$01*V	BEQ L280B7`	LDA #$01Ej	JMP L280CXt	L280B LDA #$FFk~	L280C STA XS,Yx�	L290 INX��	LDA $D000,X��	CLC��	ADC YS,Y��	STA $D000,X��	L300 CMP #$E6��	BCC L310��	LDA #$FF��	STA YS,Y��	L310 CMP #$32�	BCS L320�	LDA #$01
STA YS0

L320 JSR L1000=
CMP #$00J(
BEQ L330W2
LDA YS,Yd<
CMP #$01rF
BEQ L320BP
LDA #$01�Z
JMP L320C�d
L320B LDA #$FF�n
L320C STA YS,Y�x
L330 LDX XST��
INX��
LDA YST��
ASL A��
TAY��
CPX #$08�
BEQ L330B�
JMP L220LOP(�
L330B JMP L220<�
L1000 LDA $D01EJ�
LDA $D01ET� YST\RTSx�; SPRITE DATA (340-400)����$3C40��TXT 0,127,0,1,255,192,7,255,224��TXT 15,255,240,31,255,248,63,255��TXT 252,63,255,252,127,255,254,127�TXT 255,254,127,255,254,127,255<�TXT 254,127,255,254,127,255,254b�TXT 127,255,254,63,255,252,63,255��TXT 252,31,255,248,31,255,248,15��TXT 255,240,7,255,224,1,255,128����p� CONTROLLER��� $3C80��� 2,�(�(1)�255)��� (�($FB)��($FC)�256)�� 6030
[HJ@.              bounce@:HT@.          by dominic ford@@H.@.@EH(@.  basic        - 1st  june 1993@.H2@.  machine code - 13th may  1995@.Hf@. 6000@.HD@..$3c80@.HN@xs.$3c00@.HX@ys.$3c08@.H.@xp.$3c10@.H.@yp.$3c18@.H.@..$0002@.H.@xst.$3c20@.H.@yst.$3c21@LI.@adrp.$3c22@YI.@ex.$3c23@;I.@; line 10 (see .out of basic)@lI.@l10 lda #$93@zI.@jsr $ab47@GI.@lda #$13@UI.@jsr $ab47@.I.@lda #$09@.IDAsta $d020@.INAlda #$00@.IXAsta $d021@.I"Alda #$05@.I,Asta $dbe7@.I6A; line 20@.I@Al20 ldx #$00@.IjAwoopnt ldy #$05@PJtAwoolop lda woozy,y@.J.Ajsr $ab47@&JHAdey@5JRAbne woolop@=J.Ainx@jJ.Acpx #$c7@yJ.Abne woopnt@FJ.Aldy #$05@.J.Awoob lda woozy,y@.J.Ajsr $ab47@.J.Adey@.J.Acpy #$01@.J.Abne woob@.J.A; line 30@.J.Al30 lda #$19@.J.Asta $07e7@.J.Alda #$00@.J.Asta $d015@AKHB; line 40@SKRBl40 sta $d017@!K£Bsta $d01d@/K&Bsta $d010@=K0B; line 50@oK:Bl50 sta $d01c@]KdBsta $d01b@SKnB; line 60 (.hing)@.KxB; line 70 (.hing)@.KBB; line 80.90@.KLBl80 ldx #$08@.KVBlda #$f1@.K.B.lop sta $07f7,x@.K.Bdex@.K.Bbne .lop@.K.B; line 100@CL.Bl100 ldx #$01@RL.Bcollop txa@"L.Bsta $d026,x@*L.Binx@7L.Bcpx #$09@fL.Bbne collop@uL.B; line 110@GL.Bl110 lda #$00@SL.Bsta $fd@.L.B; line 120@.LBCl120 lda #.l120b@.LLCsta $fb@.LVClda #.l120b@.L Csta $fc@.L*Crts@.L4Cl120b lda $02@.L>Ccmp #$38@.LhCbcc l120@@MrCcmp #$aa@MM£Cbcs l120@YMFCldx $fd@&MPCsta yp,x@.MZCtay@6M.Ctxa@@M.Casl a@hM.Ctax@pM.Ctya@.M.Csta $d001,x@OM.C; line 130@.M.Cl130 lda #.l130b@.M.Csta $fb@.M.Clda #.l130b@.M.Csta $fc@.M.Crts@.M.Cwoozy txt "!yzoow"@.M.Cl130b lda $02@.MFDcmp #$38@.MPDbcc l130@CNZDldx $fd@PN$Dsta xp,x@XN.Dtay@ N8Dtxa@*NbDasl a@2NlDtax@:NvDtya@jN.Dsta $d000,x@vNJDldx $fd@.NTDinx@JN.Dstx $fd@WN.Dcpx #$08@.N.Dbne l120@.N.Dlda #$00@.N.Dsta $d01e@.N.D; line 140@.N.Dl140 ldx #$00@.N.Dstx $fd@.N.Df140l lda xp,x@.N.Dtay@.N.Dtxa@.N.Dasl a@AO.Dtax@IO@Etya@YOJEsta $d000,x@(OTE; line 145@9O.El145 ldx $fd@fO(Elda yp,x@nO2Etay@vO<Etxa@.OfEasl a@HOpEtax@POzEtya@.ODEsta $d001,x@.ONEldx $fd@.OXEinx@.O.Estx $fd@.O.Ecpx #$08@.O.Ebne f140l@.O.E; line 150@.O.El150 lda $d01e@.O.Ebne l110@.O.E; line 160@KP.El160 lda #$00@YP.Esta $d015@&P.Eldx #$00@7P.El170 lda $a2@bP.E. #$01@oP.Ecmp #$01@]PDFbeq l170b@JPNFlda #$ff@.PXFl170b sta xs,x@.P"F; line 180@.P,Fl180 lda $a1@.P6F. #$01@.P@Fcmp #$01@.PjFbeq l180b@.PtFlda #$ff@.P.Fl180b sta ys,x@.PHF; line 190 (.hing)@QQRF; line 200 (.hing)@.Q.Fl210 inx@+Q.Fcpx #$08@8Q.Fbne l170@eQ.Flda #$ff@sQ.Fsta $d015@VQ.F; line 220 (main program loop)@.Q.Fl220 ldx #$00@.Q.Fldy #$01@.Q.Fl220lop stx xst@.Q.Fsty yst@.Q.Ftxa@.Q.Fasl a@.Q.Fsta adrp@.Q.Flda $d010@.Q.F. yst@.Q.Fsta ex@IRHGl230 ldx adrp@YRRGlda $d000,x@&R£Gcmp #$ff@3R&Gbne l240@>R0Glda ex@kR:Gbne l240@wRdGldx xst@DRnGlda xs,x@QRxGcmp #$01@.RBGbne l240@.RLGlda $d010@.RVG.a yst@.R.Gsta $d010@.R.Glda #$02@.R.Gsta ex@.R.Gldx adrp@.R.Glda #$00@.R.Gsta $d000,x@.R.Gl240 ldx adrp@IS.Glda $d000,x@VS.Gbne l250@!S.Glda ex@.S.Gcmp #$01@;S.Gbne l250@gS.Gldx xst@tS.Glda xs,x@AS.Gcmp #$00@NS.Gbne l250@.SBHldx adrp@.SLHlda #$ff@.SVHsta $d000,x@.S Hlda $d010@.S*Hsec@.S4Hsbc yst@.S>Hsta $d010@.ShHlda #$02@.SrHsta ex@.S£Hl250 ldx adrp@.SFHldy xst@NTPHlda $d000,x@VTZHclc@#T.Hadc xs,y@3T.Hsta $d000,x@eT.Hl260 cmp #$1a@rT.Hbcs l270@]T.Hlda ex@JT.Hbne l270@WT.Hlda #$01@.T.Hsta xs,y@.T.Hl270 cmp #$2d@.T.Hbcc l280@.T.Hlda ex@.T.Hbeq l280@.TFIlda #$ff@.TPIsta xs,y@.TZIl280 jsr l1000@.T.Icmp #$00@BU8Ibeq l290@OUbIlda xs,y@£UlIcmp #$01@*UvIbeq l280b@7U.Ilda #$01@eUJIjmp l280c@xUTIl280b lda #$ff@KU.Il280c sta xs,y@XU.Il290 inx@.U.Ilda $d000,x@.U.Iclc@.U.Iadc ys,y@.U.Ista $d000,x@.U.Il300 cmp #$e6@.U.Ibcc l310@.U.Ilda #$ff@.U.Ista ys,y@.U.Il310 cmp #$32@EV.Ibcs l320@RV.Ilda #$01@]V@Jsta ys@0VJJl320 jsr l1000@=V.Jcmp #$00@jV(Jbeq l330@wV2Jlda ys,y@DV<Jcmp #$01@RVfJbeq l320b@.VpJlda #$01@.VzJjmp l320c@.VDJl320b lda #$ff@.VNJl320c sta ys,y@.VXJl330 ldx xst@.V.Jinx@.V.Jlda yst@.V.Jasl a@.V.Jtay@.V.Jcpx #$08@EW.Jbeq l330b@UW.Jjmp l220lop@(W.Jl330b jmp l220@<W.Jl1000 lda $d01e@jW.Jlda $d01e@tWDK. yst@£WNKrts@XW.S; sprite data (340-400)@.W.S..$3c40@.W.Stxt 0,127,0,1,255,192,7,255,224@.W.Stxt 15,255,240,31,255,248,63,255@.W.Stxt 252,63,255,252,127,255,254,127@XX.Stxt 255,254,127,255,254,127,255@<X.Stxt 254,127,255,254,127,255,254@BX.Stxt 127,255,254,63,255,252,63,255@.X.Stxt 252,31,255,248,31,255,248,15@.X.Stxt 255,240,7,255,224,1,255,128@.X.S.@.XPW. controller@.X.W. $3c80@.X.W. 2,.(.(1).255)@.X.W. (.($fb)..($fc).256)@GY.W. 6030@@@
00000000  1b 08 0a 00 8f 20 20 20  20 20 20 20 20 20 20 20  |.....           |
00000010  20 20 20 42 4f 55 4e 43  45 00 3a 08 14 00 8f 20  |   BOUNCE.:.... |
00000020  20 20 20 20 20 20 20 20  20 42 59 20 44 4f 4d 49  |         BY DOMI|
00000030  4e 49 43 20 46 4f 52 44  00 40 08 1e 00 8f 00 65  |NIC FORD.@.....e|
00000040  08 28 00 8f 20 20 42 41  53 49 43 20 20 20 20 20  |.(..  BASIC     |
00000050  20 20 20 2d 20 31 53 54  20 20 4a 55 4e 45 20 31  |   - 1ST  JUNE 1|
00000060  39 39 33 00 8a 08 32 00  8f 20 20 4d 41 43 48 49  |993...2..  MACHI|
00000070  4e 45 20 43 4f 44 45 20  2d 20 31 33 54 48 20 4d  |NE CODE - 13TH M|
00000080  41 59 20 20 31 39 39 35  00 95 08 46 00 89 20 36  |AY  1995...F.. 6|
00000090  30 30 30 00 a1 08 64 00  ac b2 24 33 43 38 30 00  |000...d...$3C80.|
000000a0  ae 08 6e 00 58 53 b2 24  33 43 30 30 00 bb 08 78  |..n.XS.$3C00...x|
000000b0  00 59 53 b2 24 33 43 30  38 00 c8 08 82 00 58 50  |.YS.$3C08.....XP|
000000c0  b2 24 33 43 31 30 00 d5  08 8c 00 59 50 b2 24 33  |.$3C10.....YP.$3|
000000d0  43 31 38 00 e1 08 96 00  bb b2 24 30 30 30 32 00  |C18.......$0002.|
000000e0  ef 08 a0 00 58 53 54 b2  24 33 43 32 30 00 fd 08  |....XST.$3C20...|
000000f0  aa 00 59 53 54 b2 24 33  43 32 31 00 0c 09 b4 00  |..YST.$3C21.....|
00000100  41 44 52 50 b2 24 33 43  32 32 00 19 09 be 00 45  |ADRP.$3C22.....E|
00000110  58 b2 24 33 43 32 33 00  3b 09 c8 00 3b 20 4c 49  |X.$3C23.;...; LI|
00000120  4e 45 20 31 30 20 28 53  45 45 20 99 4f 55 54 20  |NE 10 (SEE .OUT |
00000130  4f 46 20 42 41 53 49 43  29 00 4c 09 d2 00 4c 31  |OF BASIC).L...L1|
00000140  30 20 4c 44 41 20 23 24  39 33 00 5a 09 dc 00 4a  |0 LDA #$93.Z...J|
00000150  53 52 20 24 41 42 34 37  00 67 09 e6 00 4c 44 41  |SR $AB47.g...LDA|
00000160  20 23 24 31 33 00 75 09  f0 00 4a 53 52 20 24 41  | #$13.u...JSR $A|
00000170  42 34 37 00 82 09 fa 00  4c 44 41 20 23 24 30 39  |B47.....LDA #$09|
00000180  00 90 09 04 01 53 54 41  20 24 44 30 32 30 00 9d  |.....STA $D020..|
00000190  09 0e 01 4c 44 41 20 23  24 30 30 00 ab 09 18 01  |...LDA #$00.....|
000001a0  53 54 41 20 24 44 30 32  31 00 b8 09 22 01 4c 44  |STA $D021...".LD|
000001b0  41 20 23 24 30 35 00 c6  09 2c 01 53 54 41 20 24  |A #$05...,.STA $|
000001c0  44 42 45 37 00 d4 09 36  01 3b 20 4c 49 4e 45 20  |DBE7...6.; LINE |
000001d0  32 30 00 e5 09 40 01 4c  32 30 20 4c 44 58 20 23  |20...@.L20 LDX #|
000001e0  24 30 30 00 f9 09 4a 01  57 4f 4f 50 4e 54 20 4c  |$00...J.WOOPNT L|
000001f0  44 59 20 23 24 30 35 00  10 0a 54 01 57 4f 4f 4c  |DY #$05...T.WOOL|
00000200  4f 50 20 4c 44 41 20 57  4f 4f 5a 59 2c 59 00 1e  |OP LDA WOOZY,Y..|
00000210  0a 5e 01 4a 53 52 20 24  41 42 34 37 00 26 0a 68  |.^.JSR $AB47.&.h|
00000220  01 44 45 59 00 35 0a 72  01 42 4e 45 20 57 4f 4f  |.DEY.5.r.BNE WOO|
00000230  4c 4f 50 00 3d 0a 7c 01  49 4e 58 00 4a 0a 86 01  |LOP.=.|.INX.J...|
00000240  43 50 58 20 23 24 43 37  00 59 0a 90 01 42 4e 45  |CPX #$C7.Y...BNE|
00000250  20 57 4f 4f 50 4e 54 00  66 0a 9a 01 4c 44 59 20  | WOOPNT.f...LDY |
00000260  23 24 30 35 00 7b 0a a4  01 57 4f 4f 42 20 4c 44  |#$05.{...WOOB LD|
00000270  41 20 57 4f 4f 5a 59 2c  59 00 89 0a ae 01 4a 53  |A WOOZY,Y.....JS|
00000280  52 20 24 41 42 34 37 00  91 0a b8 01 44 45 59 00  |R $AB47.....DEY.|
00000290  9e 0a c2 01 43 50 59 20  23 24 30 31 00 ab 0a cc  |....CPY #$01....|
000002a0  01 42 4e 45 20 57 4f 4f  42 00 b9 0a d6 01 3b 20  |.BNE WOOB.....; |
000002b0  4c 49 4e 45 20 33 30 00  ca 0a e0 01 4c 33 30 20  |LINE 30.....L30 |
000002c0  4c 44 41 20 23 24 31 39  00 d8 0a ea 01 53 54 41  |LDA #$19.....STA|
000002d0  20 24 30 37 45 37 00 e5  0a f4 01 4c 44 41 20 23  | $07E7.....LDA #|
000002e0  24 30 30 00 f3 0a fe 01  53 54 41 20 24 44 30 31  |$00.....STA $D01|
000002f0  35 00 01 0b 08 02 3b 20  4c 49 4e 45 20 34 30 00  |5.....; LINE 40.|
00000300  13 0b 12 02 4c 34 30 20  53 54 41 20 24 44 30 31  |....L40 STA $D01|
00000310  37 00 21 0b 1c 02 53 54  41 20 24 44 30 31 44 00  |7.!...STA $D01D.|
00000320  2f 0b 26 02 53 54 41 20  24 44 30 31 30 00 3d 0b  |/.&.STA $D010.=.|
00000330  30 02 3b 20 4c 49 4e 45  20 35 30 00 4f 0b 3a 02  |0.; LINE 50.O.:.|
00000340  4c 35 30 20 53 54 41 20  24 44 30 31 43 00 5d 0b  |L50 STA $D01C.].|
00000350  44 02 53 54 41 20 24 44  30 31 42 00 73 0b 4e 02  |D.STA $D01B.s.N.|
00000360  3b 20 4c 49 4e 45 20 36  30 20 28 a8 48 49 4e 47  |; LINE 60 (.HING|
00000370  29 00 89 0b 58 02 3b 20  4c 49 4e 45 20 37 30 20  |)...X.; LINE 70 |
00000380  28 a8 48 49 4e 47 29 00  9a 0b 62 02 3b 20 4c 49  |(.HING)...b.; LI|
00000390  4e 45 20 38 30 aa 39 30  00 ab 0b 6c 02 4c 38 30  |NE 80.90...l.L80|
000003a0  20 4c 44 58 20 23 24 30  38 00 b8 0b 76 02 4c 44  | LDX #$08...v.LD|
000003b0  41 20 23 24 46 31 00 cd  0b 80 02 b9 4c 4f 50 20  |A #$F1......LOP |
000003c0  53 54 41 20 24 30 37 46  37 2c 58 00 d5 0b 8a 02  |STA $07F7,X.....|
000003d0  44 45 58 00 e2 0b 94 02  42 4e 45 20 b9 4c 4f 50  |DEX.....BNE .LOP|
000003e0  00 f1 0b 9e 02 3b 20 4c  49 4e 45 20 31 30 30 00  |.....; LINE 100.|
000003f0  03 0c a8 02 4c 31 30 30  20 4c 44 58 20 23 24 30  |....L100 LDX #$0|
00000400  31 00 12 0c b2 02 43 4f  4c 4c 4f 50 20 54 58 41  |1.....COLLOP TXA|
00000410  00 22 0c bc 02 53 54 41  20 24 44 30 32 36 2c 58  |."...STA $D026,X|
00000420  00 2a 0c c6 02 49 4e 58  00 37 0c d0 02 43 50 58  |.*...INX.7...CPX|
00000430  20 23 24 30 39 00 46 0c  da 02 42 4e 45 20 43 4f  | #$09.F...BNE CO|
00000440  4c 4c 4f 50 00 55 0c e4  02 3b 20 4c 49 4e 45 20  |LLOP.U...; LINE |
00000450  31 31 30 00 67 0c ee 02  4c 31 31 30 20 4c 44 41  |110.g...L110 LDA|
00000460  20 23 24 30 30 00 73 0c  f3 02 53 54 41 20 24 46  | #$00.s...STA $F|
00000470  44 00 82 0c f8 02 3b 20  4c 49 4e 45 20 31 32 30  |D.....; LINE 120|
00000480  00 97 0c 02 03 4c 31 32  30 20 4c 44 41 20 23 b3  |.....L120 LDA #.|
00000490  4c 31 32 30 42 00 a3 0c  0c 03 53 54 41 20 24 46  |L120B.....STA $F|
000004a0  42 00 b3 0c 16 03 4c 44  41 20 23 b1 4c 31 32 30  |B.....LDA #.L120|
000004b0  42 00 bf 0c 20 03 53 54  41 20 24 46 43 00 c7 0c  |B... .STA $FC...|
000004c0  2a 03 52 54 53 00 d9 0c  34 03 4c 31 32 30 42 20  |*.RTS...4.L120B |
000004d0  4c 44 41 20 24 30 32 00  e6 0c 3e 03 43 4d 50 20  |LDA $02...>.CMP |
000004e0  23 24 33 38 00 f3 0c 48  03 42 43 43 20 4c 31 32  |#$38...H.BCC L12|
000004f0  30 00 00 0d 52 03 43 4d  50 20 23 24 41 41 00 0d  |0...R.CMP #$AA..|
00000500  0d 5c 03 42 43 53 20 4c  31 32 30 00 19 0d 66 03  |.\.BCS L120...f.|
00000510  4c 44 58 20 24 46 44 00  26 0d 70 03 53 54 41 20  |LDX $FD.&.p.STA |
00000520  59 50 2c 58 00 2e 0d 7a  03 54 41 59 00 36 0d 84  |YP,X...z.TAY.6..|
00000530  03 54 58 41 00 40 0d 8e  03 41 53 4c 20 41 00 48  |.TXA.@...ASL A.H|
00000540  0d 98 03 54 41 58 00 50  0d a2 03 54 59 41 00 60  |...TAX.P...TYA.`|
00000550  0d ac 03 53 54 41 20 24  44 30 30 31 2c 58 00 6f  |...STA $D001,X.o|
00000560  0d b6 03 3b 20 4c 49 4e  45 20 31 33 30 00 84 0d  |...; LINE 130...|
00000570  c0 03 4c 31 33 30 20 4c  44 41 20 23 b3 4c 31 33  |..L130 LDA #.L13|
00000580  30 42 00 90 0d ca 03 53  54 41 20 24 46 42 00 a0  |0B.....STA $FB..|
00000590  0d d4 03 4c 44 41 20 23  b1 4c 31 33 30 42 00 ac  |...LDA #.L130B..|
000005a0  0d de 03 53 54 41 20 24  46 43 00 b4 0d e8 03 52  |...STA $FC.....R|
000005b0  54 53 00 cb 0d f2 03 57  4f 4f 5a 59 20 54 58 54  |TS.....WOOZY TXT|
000005c0  20 22 21 59 5a 4f 4f 57  22 00 dd 0d fc 03 4c 31  | "!YZOOW".....L1|
000005d0  33 30 42 20 4c 44 41 20  24 30 32 00 ea 0d 06 04  |30B LDA $02.....|
000005e0  43 4d 50 20 23 24 33 38  00 f7 0d 10 04 42 43 43  |CMP #$38.....BCC|
000005f0  20 4c 31 33 30 00 03 0e  1a 04 4c 44 58 20 24 46  | L130.....LDX $F|
00000600  44 00 10 0e 24 04 53 54  41 20 58 50 2c 58 00 18  |D...$.STA XP,X..|
00000610  0e 2e 04 54 41 59 00 20  0e 38 04 54 58 41 00 2a  |...TAY. .8.TXA.*|
00000620  0e 42 04 41 53 4c 20 41  00 32 0e 4c 04 54 41 58  |.B.ASL A.2.L.TAX|
00000630  00 3a 0e 56 04 54 59 41  00 4a 0e 60 04 53 54 41  |.:.V.TYA.J.`.STA|
00000640  20 24 44 30 30 30 2c 58  00 56 0e 6a 04 4c 44 58  | $D000,X.V.j.LDX|
00000650  20 24 46 44 00 5e 0e 74  04 49 4e 58 00 6a 0e 7e  | $FD.^.t.INX.j.~|
00000660  04 53 54 58 20 24 46 44  00 77 0e 88 04 43 50 58  |.STX $FD.w...CPX|
00000670  20 23 24 30 38 00 84 0e  92 04 42 4e 45 20 4c 31  | #$08.....BNE L1|
00000680  32 30 00 91 0e 9c 04 4c  44 41 20 23 24 30 30 00  |20.....LDA #$00.|
00000690  9f 0e a6 04 53 54 41 20  24 44 30 31 45 00 ae 0e  |....STA $D01E...|
000006a0  b0 04 3b 20 4c 49 4e 45  20 31 34 30 00 c0 0e ba  |..; LINE 140....|
000006b0  04 4c 31 34 30 20 4c 44  58 20 23 24 30 30 00 cc  |.L140 LDX #$00..|
000006c0  0e c4 04 53 54 58 20 24  46 44 00 df 0e ce 04 46  |...STX $FD.....F|
000006d0  31 34 30 4c 20 4c 44 41  20 58 50 2c 58 00 e7 0e  |140L LDA XP,X...|
000006e0  d8 04 54 41 59 00 ef 0e  e2 04 54 58 41 00 f9 0e  |..TAY.....TXA...|
000006f0  ec 04 41 53 4c 20 41 00  01 0f f6 04 54 41 58 00  |..ASL A.....TAX.|
00000700  09 0f 00 05 54 59 41 00  19 0f 0a 05 53 54 41 20  |....TYA.....STA |
00000710  24 44 30 30 30 2c 58 00  28 0f 14 05 3b 20 4c 49  |$D000,X.(...; LI|
00000720  4e 45 20 31 34 35 00 39  0f 1e 05 4c 31 34 35 20  |NE 145.9...L145 |
00000730  4c 44 58 20 24 46 44 00  46 0f 28 05 4c 44 41 20  |LDX $FD.F.(.LDA |
00000740  59 50 2c 58 00 4e 0f 32  05 54 41 59 00 56 0f 3c  |YP,X.N.2.TAY.V.<|
00000750  05 54 58 41 00 60 0f 46  05 41 53 4c 20 41 00 68  |.TXA.`.F.ASL A.h|
00000760  0f 50 05 54 41 58 00 70  0f 5a 05 54 59 41 00 80  |.P.TAX.p.Z.TYA..|
00000770  0f 64 05 53 54 41 20 24  44 30 30 31 2c 58 00 8c  |.d.STA $D001,X..|
00000780  0f 6e 05 4c 44 58 20 24  46 44 00 94 0f 78 05 49  |.n.LDX $FD...x.I|
00000790  4e 58 00 a0 0f 82 05 53  54 58 20 24 46 44 00 ad  |NX.....STX $FD..|
000007a0  0f 8c 05 43 50 58 20 23  24 30 38 00 bb 0f 96 05  |...CPX #$08.....|
000007b0  42 4e 45 20 46 31 34 30  4c 00 ca 0f a0 05 3b 20  |BNE F140L.....; |
000007c0  4c 49 4e 45 20 31 35 30  00 dd 0f aa 05 4c 31 35  |LINE 150.....L15|
000007d0  30 20 4c 44 41 20 24 44  30 31 45 00 ea 0f b4 05  |0 LDA $D01E.....|
000007e0  42 4e 45 20 4c 31 31 30  00 f9 0f be 05 3b 20 4c  |BNE L110.....; L|
000007f0  49 4e 45 20 31 36 30 00  0b 10 c8 05 4c 31 36 30  |INE 160.....L160|
00000800  20 4c 44 41 20 23 24 30  30 00 19 10 d2 05 53 54  | LDA #$00.....ST|
00000810  41 20 24 44 30 31 35 00  26 10 dc 05 4c 44 58 20  |A $D015.&...LDX |
00000820  23 24 30 30 00 37 10 e6  05 4c 31 37 30 20 4c 44  |#$00.7...L170 LD|
00000830  41 20 24 41 32 00 42 10  f0 05 af 20 23 24 30 31  |A $A2.B.... #$01|
00000840  00 4f 10 fa 05 43 4d 50  20 23 24 30 31 00 5d 10  |.O...CMP #$01.].|
00000850  04 06 42 45 51 20 4c 31  37 30 42 00 6a 10 0e 06  |..BEQ L170B.j...|
00000860  4c 44 41 20 23 24 46 46  00 7d 10 18 06 4c 31 37  |LDA #$FF.}...L17|
00000870  30 42 20 53 54 41 20 58  53 2c 58 00 8c 10 22 06  |0B STA XS,X...".|
00000880  3b 20 4c 49 4e 45 20 31  38 30 00 9d 10 2c 06 4c  |; LINE 180...,.L|
00000890  31 38 30 20 4c 44 41 20  24 41 31 00 a8 10 36 06  |180 LDA $A1...6.|
000008a0  af 20 23 24 30 31 00 b5  10 40 06 43 4d 50 20 23  |. #$01...@.CMP #|
000008b0  24 30 31 00 c3 10 4a 06  42 45 51 20 4c 31 38 30  |$01...J.BEQ L180|
000008c0  42 00 d0 10 54 06 4c 44  41 20 23 24 46 46 00 e3  |B...T.LDA #$FF..|
000008d0  10 5e 06 4c 31 38 30 42  20 53 54 41 20 59 53 2c  |.^.L180B STA YS,|
000008e0  58 00 fa 10 68 06 3b 20  4c 49 4e 45 20 31 39 30  |X...h.; LINE 190|
000008f0  20 28 a8 48 49 4e 47 29  00 11 11 72 06 3b 20 4c  | (.HING)...r.; L|
00000900  49 4e 45 20 32 30 30 20  28 a8 48 49 4e 47 29 00  |INE 200 (.HING).|
00000910  1e 11 7c 06 4c 32 31 30  20 49 4e 58 00 2b 11 86  |..|.L210 INX.+..|
00000920  06 43 50 58 20 23 24 30  38 00 38 11 90 06 42 4e  |.CPX #$08.8...BN|
00000930  45 20 4c 31 37 30 00 45  11 9a 06 4c 44 41 20 23  |E L170.E...LDA #|
00000940  24 46 46 00 53 11 a4 06  53 54 41 20 24 44 30 31  |$FF.S...STA $D01|
00000950  35 00 76 11 ae 06 3b 20  4c 49 4e 45 20 32 32 30  |5.v...; LINE 220|
00000960  20 28 4d 41 49 4e 20 50  52 4f 47 52 41 4d 20 4c  | (MAIN PROGRAM L|
00000970  4f 4f 50 29 00 88 11 b8  06 4c 32 32 30 20 4c 44  |OOP).....L220 LD|
00000980  58 20 23 24 30 30 00 95  11 bd 06 4c 44 59 20 23  |X #$00.....LDY #|
00000990  24 30 31 00 a9 11 c2 06  4c 32 32 30 4c 4f 50 20  |$01.....L220LOP |
000009a0  53 54 58 20 58 53 54 00  b5 11 c7 06 53 54 59 20  |STX XST.....STY |
000009b0  59 53 54 00 bd 11 cc 06  54 58 41 00 c7 11 d6 06  |YST.....TXA.....|
000009c0  41 53 4c 20 41 00 d4 11  e0 06 53 54 41 20 41 44  |ASL A.....STA AD|
000009d0  52 50 00 e2 11 ea 06 4c  44 41 20 24 44 30 31 30  |RP.....LDA $D010|
000009e0  00 ec 11 f4 06 af 20 59  53 54 00 f7 11 fe 06 53  |...... YST.....S|
000009f0  54 41 20 45 58 00 09 12  08 07 4c 32 33 30 20 4c  |TA EX.....L230 L|
00000a00  44 58 20 41 44 52 50 00  19 12 12 07 4c 44 41 20  |DX ADRP.....LDA |
00000a10  24 44 30 30 30 2c 58 00  26 12 1c 07 43 4d 50 20  |$D000,X.&...CMP |
00000a20  23 24 46 46 00 33 12 26  07 42 4e 45 20 4c 32 34  |#$FF.3.&.BNE L24|
00000a30  30 00 3e 12 30 07 4c 44  41 20 45 58 00 4b 12 3a  |0.>.0.LDA EX.K.:|
00000a40  07 42 4e 45 20 4c 32 34  30 00 57 12 44 07 4c 44  |.BNE L240.W.D.LD|
00000a50  58 20 58 53 54 00 64 12  4e 07 4c 44 41 20 58 53  |X XST.d.N.LDA XS|
00000a60  2c 58 00 71 12 58 07 43  4d 50 20 23 24 30 31 00  |,X.q.X.CMP #$01.|
00000a70  7e 12 62 07 42 4e 45 20  4c 32 34 30 00 8c 12 6c  |~.b.BNE L240...l|
00000a80  07 4c 44 41 20 24 44 30  31 30 00 97 12 76 07 b0  |.LDA $D010...v..|
00000a90  41 20 59 53 54 00 a5 12  80 07 53 54 41 20 24 44  |A YST.....STA $D|
00000aa0  30 31 30 00 b2 12 8a 07  4c 44 41 20 23 24 30 32  |010.....LDA #$02|
00000ab0  00 bd 12 94 07 53 54 41  20 45 58 00 ca 12 96 07  |.....STA EX.....|
00000ac0  4c 44 58 20 41 44 52 50  00 d7 12 98 07 4c 44 41  |LDX ADRP.....LDA|
00000ad0  20 23 24 30 30 00 e7 12  9a 07 53 54 41 20 24 44  | #$00.....STA $D|
00000ae0  30 30 30 2c 58 00 f9 12  9e 07 4c 32 34 30 20 4c  |000,X.....L240 L|
00000af0  44 58 20 41 44 52 50 00  09 13 a8 07 4c 44 41 20  |DX ADRP.....LDA |
00000b00  24 44 30 30 30 2c 58 00  16 13 b2 07 42 4e 45 20  |$D000,X.....BNE |
00000b10  4c 32 35 30 00 21 13 bc  07 4c 44 41 20 45 58 00  |L250.!...LDA EX.|
00000b20  2e 13 c6 07 43 4d 50 20  23 24 30 31 00 3b 13 d0  |....CMP #$01.;..|
00000b30  07 42 4e 45 20 4c 32 35  30 00 47 13 da 07 4c 44  |.BNE L250.G...LD|
00000b40  58 20 58 53 54 00 54 13  e4 07 4c 44 41 20 58 53  |X XST.T...LDA XS|
00000b50  2c 58 00 61 13 ee 07 43  4d 50 20 23 24 30 30 00  |,X.a...CMP #$00.|
00000b60  6e 13 f8 07 42 4e 45 20  4c 32 35 30 00 7b 13 02  |n...BNE L250.{..|
00000b70  08 4c 44 58 20 41 44 52  50 00 88 13 0c 08 4c 44  |.LDX ADRP.....LD|
00000b80  41 20 23 24 46 46 00 98  13 16 08 53 54 41 20 24  |A #$FF.....STA $|
00000b90  44 30 30 30 2c 58 00 a6  13 20 08 4c 44 41 20 24  |D000,X... .LDA $|
00000ba0  44 30 31 30 00 ae 13 2a  08 53 45 43 00 ba 13 34  |D010...*.SEC...4|
00000bb0  08 53 42 43 20 59 53 54  00 c8 13 3e 08 53 54 41  |.SBC YST...>.STA|
00000bc0  20 24 44 30 31 30 00 d5  13 48 08 4c 44 41 20 23  | $D010...H.LDA #|
00000bd0  24 30 32 00 e0 13 52 08  53 54 41 20 45 58 00 f2  |$02...R.STA EX..|
00000be0  13 5c 08 4c 32 35 30 20  4c 44 58 20 41 44 52 50  |.\.L250 LDX ADRP|
00000bf0  00 fe 13 66 08 4c 44 59  20 58 53 54 00 0e 14 70  |...f.LDY XST...p|
00000c00  08 4c 44 41 20 24 44 30  30 30 2c 58 00 16 14 7a  |.LDA $D000,X...z|
00000c10  08 43 4c 43 00 23 14 84  08 41 44 43 20 58 53 2c  |.CLC.#...ADC XS,|
00000c20  59 00 33 14 8e 08 53 54  41 20 24 44 30 30 30 2c  |Y.3...STA $D000,|
00000c30  58 00 45 14 98 08 4c 32  36 30 20 43 4d 50 20 23  |X.E...L260 CMP #|
00000c40  24 31 41 00 52 14 a2 08  42 43 53 20 4c 32 37 30  |$1A.R...BCS L270|
00000c50  00 5d 14 ac 08 4c 44 41  20 45 58 00 6a 14 b6 08  |.]...LDA EX.j...|
00000c60  42 4e 45 20 4c 32 37 30  00 77 14 c0 08 4c 44 41  |BNE L270.w...LDA|
00000c70  20 23 24 30 31 00 84 14  ca 08 53 54 41 20 58 53  | #$01.....STA XS|
00000c80  2c 59 00 96 14 d4 08 4c  32 37 30 20 43 4d 50 20  |,Y.....L270 CMP |
00000c90  23 24 32 44 00 a3 14 de  08 42 43 43 20 4c 32 38  |#$2D.....BCC L28|
00000ca0  30 00 ae 14 e8 08 4c 44  41 20 45 58 00 bb 14 fc  |0.....LDA EX....|
00000cb0  08 42 45 51 20 4c 32 38  30 00 c8 14 06 09 4c 44  |.BEQ L280.....LD|
00000cc0  41 20 23 24 46 46 00 d5  14 10 09 53 54 41 20 58  |A #$FF.....STA X|
00000cd0  53 2c 59 00 e8 14 1a 09  4c 32 38 30 20 4a 53 52  |S,Y.....L280 JSR|
00000ce0  20 4c 31 30 30 30 00 f5  14 2e 09 43 4d 50 20 23  | L1000.....CMP #|
00000cf0  24 30 30 00 02 15 38 09  42 45 51 20 4c 32 39 30  |$00...8.BEQ L290|
00000d00  00 0f 15 42 09 4c 44 41  20 58 53 2c 59 00 1c 15  |...B.LDA XS,Y...|
00000d10  4c 09 43 4d 50 20 23 24  30 31 00 2a 15 56 09 42  |L.CMP #$01.*.V.B|
00000d20  45 51 20 4c 32 38 30 42  00 37 15 60 09 4c 44 41  |EQ L280B.7.`.LDA|
00000d30  20 23 24 30 31 00 45 15  6a 09 4a 4d 50 20 4c 32  | #$01.E.j.JMP L2|
00000d40  38 30 43 00 58 15 74 09  4c 32 38 30 42 20 4c 44  |80C.X.t.L280B LD|
00000d50  41 20 23 24 46 46 00 6b  15 7e 09 4c 32 38 30 43  |A #$FF.k.~.L280C|
00000d60  20 53 54 41 20 58 53 2c  59 00 78 15 88 09 4c 32  | STA XS,Y.x...L2|
00000d70  39 30 20 49 4e 58 00 88  15 92 09 4c 44 41 20 24  |90 INX.....LDA $|
00000d80  44 30 30 30 2c 58 00 90  15 9c 09 43 4c 43 00 9d  |D000,X.....CLC..|
00000d90  15 a6 09 41 44 43 20 59  53 2c 59 00 ad 15 b0 09  |...ADC YS,Y.....|
00000da0  53 54 41 20 24 44 30 30  30 2c 58 00 bf 15 ba 09  |STA $D000,X.....|
00000db0  4c 33 30 30 20 43 4d 50  20 23 24 45 36 00 cc 15  |L300 CMP #$E6...|
00000dc0  c4 09 42 43 43 20 4c 33  31 30 00 d9 15 ce 09 4c  |..BCC L310.....L|
00000dd0  44 41 20 23 24 46 46 00  e6 15 d8 09 53 54 41 20  |DA #$FF.....STA |
00000de0  59 53 2c 59 00 f8 15 e2  09 4c 33 31 30 20 43 4d  |YS,Y.....L310 CM|
00000df0  50 20 23 24 33 32 00 05  16 ec 09 42 43 53 20 4c  |P #$32.....BCS L|
00000e00  33 32 30 00 12 16 f6 09  4c 44 41 20 23 24 30 31  |320.....LDA #$01|
00000e10  00 1d 16 00 0a 53 54 41  20 59 53 00 30 16 0a 0a  |.....STA YS.0...|
00000e20  4c 33 32 30 20 4a 53 52  20 4c 31 30 30 30 00 3d  |L320 JSR L1000.=|
00000e30  16 1e 0a 43 4d 50 20 23  24 30 30 00 4a 16 28 0a  |...CMP #$00.J.(.|
00000e40  42 45 51 20 4c 33 33 30  00 57 16 32 0a 4c 44 41  |BEQ L330.W.2.LDA|
00000e50  20 59 53 2c 59 00 64 16  3c 0a 43 4d 50 20 23 24  | YS,Y.d.<.CMP #$|
00000e60  30 31 00 72 16 46 0a 42  45 51 20 4c 33 32 30 42  |01.r.F.BEQ L320B|
00000e70  00 7f 16 50 0a 4c 44 41  20 23 24 30 31 00 8d 16  |...P.LDA #$01...|
00000e80  5a 0a 4a 4d 50 20 4c 33  32 30 43 00 a0 16 64 0a  |Z.JMP L320C...d.|
00000e90  4c 33 32 30 42 20 4c 44  41 20 23 24 46 46 00 b3  |L320B LDA #$FF..|
00000ea0  16 6e 0a 4c 33 32 30 43  20 53 54 41 20 59 53 2c  |.n.L320C STA YS,|
00000eb0  59 00 c4 16 78 0a 4c 33  33 30 20 4c 44 58 20 58  |Y...x.L330 LDX X|
00000ec0  53 54 00 cc 16 82 0a 49  4e 58 00 d8 16 8c 0a 4c  |ST.....INX.....L|
00000ed0  44 41 20 59 53 54 00 e2  16 96 0a 41 53 4c 20 41  |DA YST.....ASL A|
00000ee0  00 ea 16 a0 0a 54 41 59  00 f7 16 aa 0a 43 50 58  |.....TAY.....CPX|
00000ef0  20 23 24 30 38 00 05 17  b4 0a 42 45 51 20 4c 33  | #$08.....BEQ L3|
00000f00  33 30 42 00 15 17 be 0a  4a 4d 50 20 4c 32 32 30  |30B.....JMP L220|
00000f10  4c 4f 50 00 28 17 c8 0a  4c 33 33 30 42 20 4a 4d  |LOP.(...L330B JM|
00000f20  50 20 4c 32 32 30 00 3c  17 f0 0a 4c 31 30 30 30  |P L220.<...L1000|
00000f30  20 4c 44 41 20 24 44 30  31 45 00 4a 17 fa 0a 4c  | LDA $D01E.J...L|
00000f40  44 41 20 24 44 30 31 45  00 54 17 04 0b af 20 59  |DA $D01E.T.... Y|
00000f50  53 54 00 5c 17 0e 0b 52  54 53 00 78 17 88 13 3b  |ST.\...RTS.x...;|
00000f60  20 53 50 52 49 54 45 20  44 41 54 41 20 28 33 34  | SPRITE DATA (34|
00000f70  30 2d 34 30 30 29 00 84  17 8d 13 ac b2 24 33 43  |0-400).......$3C|
00000f80  34 30 00 a8 17 92 13 54  58 54 20 30 2c 31 32 37  |40.....TXT 0,127|
00000f90  2c 30 2c 31 2c 32 35 35  2c 31 39 32 2c 37 2c 32  |,0,1,255,192,7,2|
00000fa0  35 35 2c 32 32 34 00 cd  17 9c 13 54 58 54 20 31  |55,224.....TXT 1|
00000fb0  35 2c 32 35 35 2c 32 34  30 2c 33 31 2c 32 35 35  |5,255,240,31,255|
00000fc0  2c 32 34 38 2c 36 33 2c  32 35 35 00 f4 17 a6 13  |,248,63,255.....|
00000fd0  54 58 54 20 32 35 32 2c  36 33 2c 32 35 35 2c 32  |TXT 252,63,255,2|
00000fe0  35 32 2c 31 32 37 2c 32  35 35 2c 32 35 34 2c 31  |52,127,255,254,1|
00000ff0  32 37 00 18 18 b0 13 54  58 54 20 32 35 35 2c 32  |27.....TXT 255,2|
00001000  35 34 2c 31 32 37 2c 32  35 35 2c 32 35 34 2c 31  |54,127,255,254,1|
00001010  32 37 2c 32 35 35 00 3c  18 ba 13 54 58 54 20 32  |27,255.<...TXT 2|
00001020  35 34 2c 31 32 37 2c 32  35 35 2c 32 35 34 2c 31  |54,127,255,254,1|
00001030  32 37 2c 32 35 35 2c 32  35 34 00 62 18 c4 13 54  |27,255,254.b...T|
00001040  58 54 20 31 32 37 2c 32  35 35 2c 32 35 34 2c 36  |XT 127,255,254,6|
00001050  33 2c 32 35 35 2c 32 35  32 2c 36 33 2c 32 35 35  |3,255,252,63,255|
00001060  00 87 18 ce 13 54 58 54  20 32 35 32 2c 33 31 2c  |.....TXT 252,31,|
00001070  32 35 35 2c 32 34 38 2c  33 31 2c 32 35 35 2c 32  |255,248,31,255,2|
00001080  34 38 2c 31 35 00 ab 18  d8 13 54 58 54 20 32 35  |48,15.....TXT 25|
00001090  35 2c 32 34 30 2c 37 2c  32 35 35 2c 32 32 34 2c  |5,240,7,255,224,|
000010a0  31 2c 32 35 35 2c 31 32  38 00 b1 18 ec 13 80 00  |1,255,128.......|
000010b0  c2 18 70 17 8f 20 43 4f  4e 54 52 4f 4c 4c 45 52  |..p.. CONTROLLER|
000010c0  00 ce 18 84 17 9e 20 24  33 43 38 30 00 e2 18 8e  |...... $3C80....|
000010d0  17 97 20 32 2c b5 28 bb  28 31 29 ac 32 35 35 29  |.. 2,.(.(1).255)|
000010e0  00 fc 18 98 17 9e 20 28  c2 28 24 46 42 29 aa c2  |...... (.($FB)..|
000010f0  28 24 46 43 29 ac 32 35  36 29 00 07 19 a2 17 89  |($FC).256)......|
00001100  20 36 30 33 30 00 00 00                           | 6030...|
00001108