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

bouncecode4

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: bouncecode4
Read OK:
File size: 11D5 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
  1705 JMP IRQ
  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
  1782 BEQ STEX
  1785 LDA #$01
  1790 STEX 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 #$FF
  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
  2255 L270 LDA $D000,X
  2260 CMP #$41
  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
  2525 L310 LDA $D000,X
  2530 CMP #$32
  2540 BCS L320
  2550 LDA #$01
  2560 STA YS,Y
  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 $EA31
  2800 L1000 LDA #$00
  2803 STA $D01E
  2808 LDA $D01E
  2810 LDA $D01E
  2820 AND YST
  2830 RTS
  2850 IRQ SEI
  2860 LDA #<L220
  2870 STA $0314
  2880 LDA #>L220
  2890 STA $0315
  2900 CLI
  2910 IQRLOP JMP IQRLOP
  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 $D015_�JMP IRQ��; LINE 220 (MAIN PROGRAM LOOP)��L220 LDX #$00��LDY #$01��L220LOP STX XST��STY YST��TXA��ASL A��STA ADRP��LDA $D010��� YST�BEQ STEX�LDA #$01"�STEX STA EX4L230 LDX ADRPDLDA $D000,XQCMP #$FF^&BNE L240i0LDA EXv:BNE L240�DLDX XST�NLDA XS,X�XCMP #$01�bBNE L240�lLDA $D010�v�A YST��STA $D010��LDA #$02��STA EX��LDX ADRP�LDA #$00�STA $D000,X$�L240 LDX ADRP4�LDA $D000,XA�BNE L250L�LDA EXY�CMP #$01f�BNE L250r�LDX XST�LDA XS,X��CMP #$FF��BNE L250�LDX ADRP�LDA #$FF�STA $D000,X� LDA $D010�*SEC�4SBC YST�>STA $D010HLDA #$02RSTA EX\L250 LDX ADRP)fLDY XST9pLDA $D000,XAzCLCN�ADC XS,Y^�STA $D000,Xp�L260 CMP #$1A}�BCS L270��LDA EX��BNE L270��LDA #$01��STA XS,Y��L270 LDA $D000,X��CMP #$41��BCC L280��LDA EX��BEQ L280	LDA #$FF	STA XS,Y#	L280 JSR L10000.	CMP #$00=8	BEQ L290JB	LDA XS,YWL	CMP #$01eV	BEQ L280Br`	LDA #$01�j	JMP L280C�t	L280B LDA #$FF�~	L280C STA XS,Y��	L290 INX��	LDA $D000,X��	CLC��	ADC YS,Y��	STA $D000,X��	L300 CMP #$E6�	BCC L310�	LDA #$FF!�	STA YS,Y6�	L310 LDA $D000,XC�	CMP #$32P�	BCS L320]�	LDA #$01j
STA YS,Y}

L320 JSR L1000�
CMP #$00�(
BEQ L330�2
LDA YS,Y�<
CMP #$01�F
BEQ L320B�P
LDA #$01�Z
JMP L320C�d
L320B LDA #$FFn
L320C STA YS,Yx
L330 LDX XST�
INX%�
LDA YST/�
ASL A7�
TAYD�
CPX #$08R�
BEQ L330Bb�
JMP L220LOPv�
L330B JMP $EA31��
L1000 LDA #$00��
STA $D01E��
LDA $D01E��
LDA $D01E�� YST�RTS�"IRQ SEI�,LDA #�L220�6STA $0314�@LDA #�L220JSTA $0315TCLI)^IQRLOP JMP IQRLOPE�; SPRITE DATA (340-400)Q���$3C40u�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,254/�TXT 127,255,254,63,255,252,63,255T�TXT 252,31,255,248,31,255,248,15x�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@.Q.Fjmp irq@.Q.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@ER.Fbeq stex@RR.Flda #$01@"R.Fstex sta ex@4RHGl230 ldx adrp@dRRGlda $d000,x@qR£Gcmp #$ff@.R&Gbne l240@IR0Glda ex@VR:Gbne l240@.RdGldx xst@.RnGlda xs,x@.RxGcmp #$01@.RBGbne l240@.RLGlda $d010@.RVG.a yst@.R.Gsta $d010@.R.Glda #$02@.R.Gsta ex@.R.Gldx adrp@BS.Glda #$00@RS.Gsta $d000,x@$S.Gl240 ldx adrp@4S.Glda $d000,x@aS.Gbne l250@lS.Glda ex@yS.Gcmp #$01@FS.Gbne l250@RS.Gldx xst@.S.Glda xs,x@.S.Gcmp #$ff@.S.Gbne l250@.SBHldx adrp@.SLHlda #$ff@.SVHsta $d000,x@.S Hlda $d010@.S*Hsec@.S4Hsbc yst@.S>Hsta $d010@@ThHlda #$02@KTrHsta ex@]T£Hl250 ldx adrp@)TFHldy xst@9TPHlda $d000,x@aTZHclc@nT.Hadc xs,y@.T.Hsta $d000,x@PT.Hl260 cmp #$1a@.T.Hbcs l270@.T.Hlda ex@.T.Hbne l270@.T.Hlda #$01@.T.Hsta xs,y@.T.Hl270 lda $d000,x@.T.Hcmp #$41@.T.Hbcc l280@.T.Hlda ex@.T.Hbeq l280@CUFIlda #$ff@PUPIsta xs,y@#UZIl280 jsr l1000@0U.Icmp #$00@=U8Ibeq l290@jUbIlda xs,y@wUlIcmp #$01@EUvIbeq l280b@RU.Ilda #$01@.UJIjmp l280c@.UTIl280b lda #$ff@.U.Il280c sta xs,y@.U.Il290 inx@.U.Ilda $d000,x@.U.Iclc@.U.Iadc ys,y@.U.Ista $d000,x@.U.Il300 cmp #$e6@GV.Ibcc l310@TV.Ilda #$ff@!V.Ista ys,y@6V.Il310 lda $d000,x@cV.Icmp #$32@pV.Ibcs l320@]V.Ilda #$01@JV@Jsta ys,y@.VJJl320 jsr l1000@.V.Jcmp #$00@.V(Jbeq l330@.V2Jlda ys,y@.V<Jcmp #$01@.VfJbeq l320b@.VpJlda #$01@.VzJjmp l320c@.VDJl320b lda #$ff@@WNJl320c sta ys,y@QWXJl330 ldx xst@YW.Jinx@%W.Jlda yst@/W.Jasl a@7W.Jtay@dW.Jcpx #$08@rW.Jbeq l330b@BW.Jjmp l220lop@VW.Jl330b jmp $ea31@.W.Jl1000 lda #$00@.W.Jsta $d01e@.W.Jlda $d01e@.W.Jlda $d01e@.WDK. yst@.WNKrts@.W"Kirq sei@.W,Klda #.l220@.W6Ksta $0314@.W@Klda #.l220@KXjKsta $0315@SXtKcli@)X.Kiqrlop jmp iqrlop@eX.S; sprite data (340-400)@qX.S..$3c40@UX.Stxt 0,127,0,1,255,192,7,255,224@.X.Stxt 15,255,240,31,255,248,63,255@.X.Stxt 252,63,255,252,127,255,254,127@.X.Stxt 255,254,127,255,254,127,255@IY.Stxt 254,127,255,254,127,255,254@/Y.Stxt 127,255,254,63,255,252,63,255@tY.Stxt 252,31,255,248,31,255,248,15@XY.Stxt 255,240,7,255,224,1,255,128@.Y.S.@.YPW. controller@.Y.W. $3c80@.Y.W. 2,.(.(1).255)@.Y.W. (.($fb)..($fc).256)@.Y.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 5f 11 a9 06 4a 4d  50 20 49 52 51 00 82 11  |5._...JMP IRQ...|
00000960  ae 06 3b 20 4c 49 4e 45  20 32 32 30 20 28 4d 41  |..; LINE 220 (MA|
00000970  49 4e 20 50 52 4f 47 52  41 4d 20 4c 4f 4f 50 29  |IN PROGRAM LOOP)|
00000980  00 94 11 b8 06 4c 32 32  30 20 4c 44 58 20 23 24  |.....L220 LDX #$|
00000990  30 30 00 a1 11 bd 06 4c  44 59 20 23 24 30 31 00  |00.....LDY #$01.|
000009a0  b5 11 c2 06 4c 32 32 30  4c 4f 50 20 53 54 58 20  |....L220LOP STX |
000009b0  58 53 54 00 c1 11 c7 06  53 54 59 20 59 53 54 00  |XST.....STY YST.|
000009c0  c9 11 cc 06 54 58 41 00  d3 11 d6 06 41 53 4c 20  |....TXA.....ASL |
000009d0  41 00 e0 11 e0 06 53 54  41 20 41 44 52 50 00 ee  |A.....STA ADRP..|
000009e0  11 ea 06 4c 44 41 20 24  44 30 31 30 00 f8 11 f4  |...LDA $D010....|
000009f0  06 af 20 59 53 54 00 05  12 f6 06 42 45 51 20 53  |.. YST.....BEQ S|
00000a00  54 45 58 00 12 12 f9 06  4c 44 41 20 23 24 30 31  |TEX.....LDA #$01|
00000a10  00 22 12 fe 06 53 54 45  58 20 53 54 41 20 45 58  |."...STEX STA EX|
00000a20  00 34 12 08 07 4c 32 33  30 20 4c 44 58 20 41 44  |.4...L230 LDX AD|
00000a30  52 50 00 44 12 12 07 4c  44 41 20 24 44 30 30 30  |RP.D...LDA $D000|
00000a40  2c 58 00 51 12 1c 07 43  4d 50 20 23 24 46 46 00  |,X.Q...CMP #$FF.|
00000a50  5e 12 26 07 42 4e 45 20  4c 32 34 30 00 69 12 30  |^.&.BNE L240.i.0|
00000a60  07 4c 44 41 20 45 58 00  76 12 3a 07 42 4e 45 20  |.LDA EX.v.:.BNE |
00000a70  4c 32 34 30 00 82 12 44  07 4c 44 58 20 58 53 54  |L240...D.LDX XST|
00000a80  00 8f 12 4e 07 4c 44 41  20 58 53 2c 58 00 9c 12  |...N.LDA XS,X...|
00000a90  58 07 43 4d 50 20 23 24  30 31 00 a9 12 62 07 42  |X.CMP #$01...b.B|
00000aa0  4e 45 20 4c 32 34 30 00  b7 12 6c 07 4c 44 41 20  |NE L240...l.LDA |
00000ab0  24 44 30 31 30 00 c2 12  76 07 b0 41 20 59 53 54  |$D010...v..A YST|
00000ac0  00 d0 12 80 07 53 54 41  20 24 44 30 31 30 00 dd  |.....STA $D010..|
00000ad0  12 8a 07 4c 44 41 20 23  24 30 32 00 e8 12 94 07  |...LDA #$02.....|
00000ae0  53 54 41 20 45 58 00 f5  12 96 07 4c 44 58 20 41  |STA EX.....LDX A|
00000af0  44 52 50 00 02 13 98 07  4c 44 41 20 23 24 30 30  |DRP.....LDA #$00|
00000b00  00 12 13 9a 07 53 54 41  20 24 44 30 30 30 2c 58  |.....STA $D000,X|
00000b10  00 24 13 9e 07 4c 32 34  30 20 4c 44 58 20 41 44  |.$...L240 LDX AD|
00000b20  52 50 00 34 13 a8 07 4c  44 41 20 24 44 30 30 30  |RP.4...LDA $D000|
00000b30  2c 58 00 41 13 b2 07 42  4e 45 20 4c 32 35 30 00  |,X.A...BNE L250.|
00000b40  4c 13 bc 07 4c 44 41 20  45 58 00 59 13 c6 07 43  |L...LDA EX.Y...C|
00000b50  4d 50 20 23 24 30 31 00  66 13 d0 07 42 4e 45 20  |MP #$01.f...BNE |
00000b60  4c 32 35 30 00 72 13 da  07 4c 44 58 20 58 53 54  |L250.r...LDX XST|
00000b70  00 7f 13 e4 07 4c 44 41  20 58 53 2c 58 00 8c 13  |.....LDA XS,X...|
00000b80  ee 07 43 4d 50 20 23 24  46 46 00 99 13 f8 07 42  |..CMP #$FF.....B|
00000b90  4e 45 20 4c 32 35 30 00  a6 13 02 08 4c 44 58 20  |NE L250.....LDX |
00000ba0  41 44 52 50 00 b3 13 0c  08 4c 44 41 20 23 24 46  |ADRP.....LDA #$F|
00000bb0  46 00 c3 13 16 08 53 54  41 20 24 44 30 30 30 2c  |F.....STA $D000,|
00000bc0  58 00 d1 13 20 08 4c 44  41 20 24 44 30 31 30 00  |X... .LDA $D010.|
00000bd0  d9 13 2a 08 53 45 43 00  e5 13 34 08 53 42 43 20  |..*.SEC...4.SBC |
00000be0  59 53 54 00 f3 13 3e 08  53 54 41 20 24 44 30 31  |YST...>.STA $D01|
00000bf0  30 00 00 14 48 08 4c 44  41 20 23 24 30 32 00 0b  |0...H.LDA #$02..|
00000c00  14 52 08 53 54 41 20 45  58 00 1d 14 5c 08 4c 32  |.R.STA EX...\.L2|
00000c10  35 30 20 4c 44 58 20 41  44 52 50 00 29 14 66 08  |50 LDX ADRP.).f.|
00000c20  4c 44 59 20 58 53 54 00  39 14 70 08 4c 44 41 20  |LDY XST.9.p.LDA |
00000c30  24 44 30 30 30 2c 58 00  41 14 7a 08 43 4c 43 00  |$D000,X.A.z.CLC.|
00000c40  4e 14 84 08 41 44 43 20  58 53 2c 59 00 5e 14 8e  |N...ADC XS,Y.^..|
00000c50  08 53 54 41 20 24 44 30  30 30 2c 58 00 70 14 98  |.STA $D000,X.p..|
00000c60  08 4c 32 36 30 20 43 4d  50 20 23 24 31 41 00 7d  |.L260 CMP #$1A.}|
00000c70  14 a2 08 42 43 53 20 4c  32 37 30 00 88 14 ac 08  |...BCS L270.....|
00000c80  4c 44 41 20 45 58 00 95  14 b6 08 42 4e 45 20 4c  |LDA EX.....BNE L|
00000c90  32 37 30 00 a2 14 c0 08  4c 44 41 20 23 24 30 31  |270.....LDA #$01|
00000ca0  00 af 14 ca 08 53 54 41  20 58 53 2c 59 00 c4 14  |.....STA XS,Y...|
00000cb0  cf 08 4c 32 37 30 20 4c  44 41 20 24 44 30 30 30  |..L270 LDA $D000|
00000cc0  2c 58 00 d1 14 d4 08 43  4d 50 20 23 24 34 31 00  |,X.....CMP #$41.|
00000cd0  de 14 de 08 42 43 43 20  4c 32 38 30 00 e9 14 e8  |....BCC L280....|
00000ce0  08 4c 44 41 20 45 58 00  f6 14 fc 08 42 45 51 20  |.LDA EX.....BEQ |
00000cf0  4c 32 38 30 00 03 15 06  09 4c 44 41 20 23 24 46  |L280.....LDA #$F|
00000d00  46 00 10 15 10 09 53 54  41 20 58 53 2c 59 00 23  |F.....STA XS,Y.#|
00000d10  15 1a 09 4c 32 38 30 20  4a 53 52 20 4c 31 30 30  |...L280 JSR L100|
00000d20  30 00 30 15 2e 09 43 4d  50 20 23 24 30 30 00 3d  |0.0...CMP #$00.=|
00000d30  15 38 09 42 45 51 20 4c  32 39 30 00 4a 15 42 09  |.8.BEQ L290.J.B.|
00000d40  4c 44 41 20 58 53 2c 59  00 57 15 4c 09 43 4d 50  |LDA XS,Y.W.L.CMP|
00000d50  20 23 24 30 31 00 65 15  56 09 42 45 51 20 4c 32  | #$01.e.V.BEQ L2|
00000d60  38 30 42 00 72 15 60 09  4c 44 41 20 23 24 30 31  |80B.r.`.LDA #$01|
00000d70  00 80 15 6a 09 4a 4d 50  20 4c 32 38 30 43 00 93  |...j.JMP L280C..|
00000d80  15 74 09 4c 32 38 30 42  20 4c 44 41 20 23 24 46  |.t.L280B LDA #$F|
00000d90  46 00 a6 15 7e 09 4c 32  38 30 43 20 53 54 41 20  |F...~.L280C STA |
00000da0  58 53 2c 59 00 b3 15 88  09 4c 32 39 30 20 49 4e  |XS,Y.....L290 IN|
00000db0  58 00 c3 15 92 09 4c 44  41 20 24 44 30 30 30 2c  |X.....LDA $D000,|
00000dc0  58 00 cb 15 9c 09 43 4c  43 00 d8 15 a6 09 41 44  |X.....CLC.....AD|
00000dd0  43 20 59 53 2c 59 00 e8  15 b0 09 53 54 41 20 24  |C YS,Y.....STA $|
00000de0  44 30 30 30 2c 58 00 fa  15 ba 09 4c 33 30 30 20  |D000,X.....L300 |
00000df0  43 4d 50 20 23 24 45 36  00 07 16 c4 09 42 43 43  |CMP #$E6.....BCC|
00000e00  20 4c 33 31 30 00 14 16  ce 09 4c 44 41 20 23 24  | L310.....LDA #$|
00000e10  46 46 00 21 16 d8 09 53  54 41 20 59 53 2c 59 00  |FF.!...STA YS,Y.|
00000e20  36 16 dd 09 4c 33 31 30  20 4c 44 41 20 24 44 30  |6...L310 LDA $D0|
00000e30  30 30 2c 58 00 43 16 e2  09 43 4d 50 20 23 24 33  |00,X.C...CMP #$3|
00000e40  32 00 50 16 ec 09 42 43  53 20 4c 33 32 30 00 5d  |2.P...BCS L320.]|
00000e50  16 f6 09 4c 44 41 20 23  24 30 31 00 6a 16 00 0a  |...LDA #$01.j...|
00000e60  53 54 41 20 59 53 2c 59  00 7d 16 0a 0a 4c 33 32  |STA YS,Y.}...L32|
00000e70  30 20 4a 53 52 20 4c 31  30 30 30 00 8a 16 1e 0a  |0 JSR L1000.....|
00000e80  43 4d 50 20 23 24 30 30  00 97 16 28 0a 42 45 51  |CMP #$00...(.BEQ|
00000e90  20 4c 33 33 30 00 a4 16  32 0a 4c 44 41 20 59 53  | L330...2.LDA YS|
00000ea0  2c 59 00 b1 16 3c 0a 43  4d 50 20 23 24 30 31 00  |,Y...<.CMP #$01.|
00000eb0  bf 16 46 0a 42 45 51 20  4c 33 32 30 42 00 cc 16  |..F.BEQ L320B...|
00000ec0  50 0a 4c 44 41 20 23 24  30 31 00 da 16 5a 0a 4a  |P.LDA #$01...Z.J|
00000ed0  4d 50 20 4c 33 32 30 43  00 ed 16 64 0a 4c 33 32  |MP L320C...d.L32|
00000ee0  30 42 20 4c 44 41 20 23  24 46 46 00 00 17 6e 0a  |0B LDA #$FF...n.|
00000ef0  4c 33 32 30 43 20 53 54  41 20 59 53 2c 59 00 11  |L320C STA YS,Y..|
00000f00  17 78 0a 4c 33 33 30 20  4c 44 58 20 58 53 54 00  |.x.L330 LDX XST.|
00000f10  19 17 82 0a 49 4e 58 00  25 17 8c 0a 4c 44 41 20  |....INX.%...LDA |
00000f20  59 53 54 00 2f 17 96 0a  41 53 4c 20 41 00 37 17  |YST./...ASL A.7.|
00000f30  a0 0a 54 41 59 00 44 17  aa 0a 43 50 58 20 23 24  |..TAY.D...CPX #$|
00000f40  30 38 00 52 17 b4 0a 42  45 51 20 4c 33 33 30 42  |08.R...BEQ L330B|
00000f50  00 62 17 be 0a 4a 4d 50  20 4c 32 32 30 4c 4f 50  |.b...JMP L220LOP|
00000f60  00 76 17 c8 0a 4c 33 33  30 42 20 4a 4d 50 20 24  |.v...L330B JMP $|
00000f70  45 41 33 31 00 89 17 f0  0a 4c 31 30 30 30 20 4c  |EA31.....L1000 L|
00000f80  44 41 20 23 24 30 30 00  97 17 f3 0a 53 54 41 20  |DA #$00.....STA |
00000f90  24 44 30 31 45 00 a5 17  f8 0a 4c 44 41 20 24 44  |$D01E.....LDA $D|
00000fa0  30 31 45 00 b3 17 fa 0a  4c 44 41 20 24 44 30 31  |01E.....LDA $D01|
00000fb0  45 00 bd 17 04 0b af 20  59 53 54 00 c5 17 0e 0b  |E...... YST.....|
00000fc0  52 54 53 00 d1 17 22 0b  49 52 51 20 53 45 49 00  |RTS...".IRQ SEI.|
00000fd0  e0 17 2c 0b 4c 44 41 20  23 b3 4c 32 32 30 00 ee  |..,.LDA #.L220..|
00000fe0  17 36 0b 53 54 41 20 24  30 33 31 34 00 fd 17 40  |.6.STA $0314...@|
00000ff0  0b 4c 44 41 20 23 b1 4c  32 32 30 00 0b 18 4a 0b  |.LDA #.L220...J.|
00001000  53 54 41 20 24 30 33 31  35 00 13 18 54 0b 43 4c  |STA $0315...T.CL|
00001010  49 00 29 18 5e 0b 49 51  52 4c 4f 50 20 4a 4d 50  |I.).^.IQRLOP JMP|
00001020  20 49 51 52 4c 4f 50 00  45 18 88 13 3b 20 53 50  | IQRLOP.E...; SP|
00001030  52 49 54 45 20 44 41 54  41 20 28 33 34 30 2d 34  |RITE DATA (340-4|
00001040  30 30 29 00 51 18 8d 13  ac b2 24 33 43 34 30 00  |00).Q.....$3C40.|
00001050  75 18 92 13 54 58 54 20  30 2c 31 32 37 2c 30 2c  |u...TXT 0,127,0,|
00001060  31 2c 32 35 35 2c 31 39  32 2c 37 2c 32 35 35 2c  |1,255,192,7,255,|
00001070  32 32 34 00 9a 18 9c 13  54 58 54 20 31 35 2c 32  |224.....TXT 15,2|
00001080  35 35 2c 32 34 30 2c 33  31 2c 32 35 35 2c 32 34  |55,240,31,255,24|
00001090  38 2c 36 33 2c 32 35 35  00 c1 18 a6 13 54 58 54  |8,63,255.....TXT|
000010a0  20 32 35 32 2c 36 33 2c  32 35 35 2c 32 35 32 2c  | 252,63,255,252,|
000010b0  31 32 37 2c 32 35 35 2c  32 35 34 2c 31 32 37 00  |127,255,254,127.|
000010c0  e5 18 b0 13 54 58 54 20  32 35 35 2c 32 35 34 2c  |....TXT 255,254,|
000010d0  31 32 37 2c 32 35 35 2c  32 35 34 2c 31 32 37 2c  |127,255,254,127,|
000010e0  32 35 35 00 09 19 ba 13  54 58 54 20 32 35 34 2c  |255.....TXT 254,|
000010f0  31 32 37 2c 32 35 35 2c  32 35 34 2c 31 32 37 2c  |127,255,254,127,|
00001100  32 35 35 2c 32 35 34 00  2f 19 c4 13 54 58 54 20  |255,254./...TXT |
00001110  31 32 37 2c 32 35 35 2c  32 35 34 2c 36 33 2c 32  |127,255,254,63,2|
00001120  35 35 2c 32 35 32 2c 36  33 2c 32 35 35 00 54 19  |55,252,63,255.T.|
00001130  ce 13 54 58 54 20 32 35  32 2c 33 31 2c 32 35 35  |..TXT 252,31,255|
00001140  2c 32 34 38 2c 33 31 2c  32 35 35 2c 32 34 38 2c  |,248,31,255,248,|
00001150  31 35 00 78 19 d8 13 54  58 54 20 32 35 35 2c 32  |15.x...TXT 255,2|
00001160  34 30 2c 37 2c 32 35 35  2c 32 32 34 2c 31 2c 32  |40,7,255,224,1,2|
00001170  35 35 2c 31 32 38 00 7e  19 ec 13 80 00 8f 19 70  |55,128.~.......p|
00001180  17 8f 20 43 4f 4e 54 52  4f 4c 4c 45 52 00 9b 19  |.. CONTROLLER...|
00001190  84 17 9e 20 24 33 43 38  30 00 af 19 8e 17 97 20  |... $3C80...... |
000011a0  32 2c b5 28 bb 28 31 29  ac 32 35 35 29 00 c9 19  |2,.(.(1).255)...|
000011b0  98 17 9e 20 28 c2 28 24  46 42 29 aa c2 28 24 46  |... (.($FB)..($F|
000011c0  43 29 ac 32 35 36 29 00  d4 19 a2 17 89 20 36 30  |C).256)...... 60|
000011d0  33 30 00 00 00                                    |30...|
000011d5