#
; NUCLEAR FIRE - MAIN PROGRAM9; BY DOMINIC FORDN; DECEMBER '94 -Z(��$C000j�; VARIABLESy�DEAD�$CF40��CLOCK�$CF41��EFDAT�$CF42�N��$CF43�MHI�$3F�VDAT�$BC01�$�=$CF45�.XP�$CF44�8YP�$CF47�BMEMS�$41
	LMEMR�$22	VBT�$CF48	`XPS�$CF49*	jYPS�$CF4A9	tBTFB�$CF4BH	~XPTL�$CF4CW	�YPTL�$CF4Dg	�XSSTE�$CF4Ew	�YSSTE�$CF4F�	�MTAB�$CF50�	�STPAGE�$CF51�	�AS�RE�$CF52�	�XS�RE�$CF53�	�YS�RE�$CF54�	�IRQ��$CF55�	�ILSTATE�$CF57�	�; MUSIC ROUTINES

�MUS� SEI
�LDA #�M�PLAY(
�STA IRQ�9
�LDA #�M�PLAYH
�STA IRQ��1R
LDA �`
STA MHI�1l
LDA �+1x
 STA MHI�
*LDA #$00�
4STA N��
>JSR �UP�
HCLI�
RRTS�
\MUSOFF SEI�
fLDA #$31�
pSTA IRQ��
zLDA #$EA�
�STA IRQ��1�
�CLI
�RTS�M�PLAY JSR STACK!�LDA N�+�BEQ �9�JMP $EA31H�� LDY #$00X�LDA (MHI),Yc�� #$01o�BEQ �MA|�LDA #$07���MA TAX�	LDA (MHI),Y�	LSR A�	STA N��$	CMP #$06�.	BNE MR��8	LDA VDAT,X�B	STA $D404,X�L	TAY�V	INY�`	TYA
j	STA $D404,Xt	JSR DESTACK+~	JMP $EA31?�	STACK STA AS�REM�	STX XS�RE[�	STY YS�REc�	RTS{�	DESTACK JSR EFFECTS��	UNSTACK LDA AS�RE��	LDX XS�RE��	LDY YS�RE�
RTS�

MR� INY�
LDA (MHI),Y�
STA $D400,X�(
INY�2
LDA (MHI),Y	
<
STA $D401,X
F
JSR DESTACK'
P
JMP $EA318
Z
�UP LDX VDAT@
d
INXN
n
STX $D404]
x
LDX VDAT�7e
�
INXs
�
STX $D40B{
�
RTS�
�
EFFECTS� SEI�
�
LDA #�EFF�LY�
�
STA $0314�
�
LDA #�EFF�LY�
�
STA $0315�
�
CLI�
�
RTS�
�
EFF�LY JSR STACK�
�
JSR DESTACK
�
JMP $EA31"�; MAIN GAME LOOP4�MAIN LDA #$00A�STA DEADO�STA EFDAT\�JSR MUS�n�JSR FULLSDISPz�LDA $A2��CLC��ADC CLOCK�STA CLOCK�MAINLOP JSR YOU�JSR M�STERS�&JSR PANEL�0LDA DEAD�:BNE GAMEOVER�DLDA CLOCKNTRLOP CMP $A2XBCC TRLOP$bCLC1lADC #$03?vSTA CLOCKO�JMP MAINLOPe�GAMEOVER JSR GAM�|�; GRAPHIC ROUTINES��DISPBLOCK JSR INITDB��JSR STACK��LDX YPS��YPLOPD CPX #$00��BEQ YPDCNT��DEX��LDA MEMS��CLC��ADC #$50	�STA MEMS�BCC YPLOPD'INC MEMS�16JMP YPLOPDIYPDCNT LDA XPSS"ASL A[,CLCh6ADC MEMSu@STA MEMS�JBCC XPCNT�TINC MEMS�1�^XPCNT LDA YP�hLSR A�r;LSR A�|CLC��ADC #$0C��STA MEMR�1��LDA YP��� #$03��LSR A�R� A�;ROR A�STA MEMR(�LDA XP2�LSR A<�LSR AD�CLCQ�ADC MEMR^STA MEMRoLDA (MEMR),YzSTA BT�&LDA XP�0� #$03�:TAX�DLDA YP�NLSR A�XCLC�bADC #$34�lSTA MEMR�1�vLDA YP��� #$01��LSR A��R� A�STA MEMR�LDA XP�LSR A$�CLC1�ADC MEMR>�STA MEMRO�LDA (MEMR),Y\�STA BTFBd�TXAo�� #$01}BNE FBN�T�LDA #$0F�JMP FBNROT� FBN�T LDA #$F0�!� BTFB�"LSR A�#LSR A�$LSR A�%LSR A�&JMP FBNR��4FBNROT � BTFB>FBNR� STA BTFBHLDA BT/RDTBL CPX #$00=\BEQ DTBL�GfLSR AQpLSR AYzDEXf�JMP DTBLw�DTBL� � #$03��ASL A��ASL A��ASL A��ASL A��ASL A��CLC��ADC BTFB��STA BT��ASL A��;ASL A��;CLC��;ADC #$40STA (MEMS),YCLCADC #$01#INY4$STA (MEMS),Y<.CLCILADC #$1FVVLDY #$28g`STA (MEMS),YoeCLC|jADC #$01�tINY�~STA (MEMS),Y��LDA MEMS�1��CLC��ADC #$54��STA MEMS�1��LDY #$00��LDA BT��STA (MEMS),Y��INY
�STA (MEMS),Y�LDY #$28(�STA (MEMS),Y0�INYASTA (MEMS),YQJMP UNSTACKe2INITDB LDA #$04t<STA MEMS�1�FLDY #$00�PSTY MEMS�ZLDA XPTL�dCLC�nADC XPS�xSTA XP��LDA YPTL��CLC��ADC YPS��STA YP��RTSp; SCROLLER ROUTINESuDOWNMEM LDY #$00+zLDA ($FB),Y;�STA ($FD),YG�INC $FDS�LDA $FDc�BNE DOWNMEMo�INC $FE{�LDA $FE��CMP STPAGE��BNE DOWNMEM��LDA $D018��E� #$10��STA $D018��RTS��RSCROLL JSR STACK��LDX XSSTE��DEX��TXA	�� #$07�STA XSSTE�CLC,�ADC #$10:�STA $D016GCMP #$17X
BEQ RSCRDISPmSLDC JMP UNSTACK�(RSCRDISP LDA #$04�2STA $FE�<LDA #$08�FSTA STPAGE�PLDA #$00�ZSTA $FD�dLDA #$01�nSTA MTAB�xJSR DOWNMEM��DEC XPTL�LDA #$12�LDX #$00!�STA XPS7�RSSCRDISP STX YPSI�JSR DISPBLOCKQ�INX^�CPX #$0Ap�BNE RSSCRDISP}JMP SLDC�(#; INTERLACING ROUTINES�2#ILACE� SEI�<#LDA #��ERLACE�F#STA $0314�P#LDA #��ERLACE�Z#STA $0315�d#CLI�n#RTSx#ILACEOFF SEI�#LDA #�ILACEQUIT*�#STA $0314>�#LDA #�ILACEQUITL�#STA $0315Y�#LDA #$64g�#STA $D018o�#CLIw�#RTS��#�ERLACE LDA ILSTATE��#BEQ INZERO��#LDA #$00��#STA ILSTATE��#LDA #$62�$STA $D018�$LDA #$15�$STA $D016
"$ILACEQUIT JMP (IRQ�)!,$INZERO INC ILSTATE.6$LDA #$60<@$STA $D018IJ$LDA #$14WT$STA $D016f^$JMP (IRQ�)z'; TEMP ROUTINES�'EFFECTS NOP�'FULLSDISP NOP�'YOU NOP�'M�STERS NOP�'PANEL NOP�'GAM� NOP

#HJ@; nuclear fire - main program@9HT@; by dominic ford@nH.@; december '94 -@zH(@..$c000@JH.C; variables@YH.Cdead.$cf40@.H.Cclock.$cf41@.H.Cefdat.$cf42@.HFDn..$cf43@.HPDmhi.$3f@.HZDvdat.$bc01@.H$D.=$cf45@.H.Dxp.$cf44@.H8Dyp.$cf47@.HbDmems.$41@AIlDmemr.$22@NIvDbt.$cf48@£I.Dxps.$cf49@*IJDyps.$cf4a@9ITDbtfb.$cf4b@hI.Dxptl.$cf4c@wI.Dyptl.$cf4d@GI.Dxsste.$cf4e@WI.Dysste.$cf4f@.I.Dmtab.$cf50@.I.Dstpage.$cf51@.I.Das.re.$cf52@.I.Dxs.re.$cf53@.I.Dys.re.$cf54@.I.Dirq..$cf55@.I.Dilstate.$cf57@.I.G; music routines@JJ.Gmus. sei@[J.Glda #.m.play@(J.Gsta irq.@9J.Glda #.m.play@hJ.Gsta irq..1@rJBHlda .@.JLHsta mhi.1@LJVHlda .+1@XJ Hsta mhi@.J*Hlda #$00@.J4Hsta n.@.J>Hjsr .up@.JhHcli@.JrHrts@.J£Hmusoff sei@.JFHlda #$31@.JPHsta irq.@.JZHlda #$ea@.J.Hsta irq..1@.J.Hcli@AK.Hrts@VK.Hm.play jsr stack@!K.Hlda n.@+K.Hbeq .@9K.Hjmp $ea31@hK.H. ldy #$00@xK.Hlda (mhi),y@CK.H. #$01@OK.Hbeq .ma@.K.Hlda #$07@.K.H.ma tax@.KFIlda (mhi),y@.KPIlsr a@.KZIsta n.@.K$Icmp #$06@.K.Ibne mr.@.K8Ilda vdat,x@.KbIsta $d404,x@.KlItay@.KvIiny@.K.Itya@MLJIsta $d404,x@]LTIjsr destack@+L.Ijmp $ea31@?L.Istack sta as.re@mL.Istx xs.re@[L.Isty ys.re@CL.Irts@.L.Idestack jsr effects@.L.Iunstack lda as.re@.L.Ildx xs.re@.L.Ildy ys.re@.L@Jrts@.LJJmr. iny@.LTJlda (mhi),y@.L.Jsta $d400,x@.L(Jiny@.L2Jlda (mhi),y@IM<Jsta $d401,x@YMfJjsr destack@'MpJjmp $ea31@8MzJ.up ldx vdat@@MDJinx@nMNJstx $d404@]MXJldx vdat.7@EM.Jinx@SM.Jstx $d40b@.M.Jrts@.M.Jeffects. sei@.M.Jlda #.eff.ly@.M.Jsta $0314@.M.Jlda #.eff.ly@.M.Jsta $0315@.M.Jcli@.M.Jrts@.M.Jeff.ly jsr stack@.M.Jjsr destack@MN.Jjmp $ea31@"N.K; main game loop@4N.Kmain lda #$00@aN.Ksta dead@oN.Ksta efdat@£N.Kjsr mus.@NN.Kjsr fullsdisp@ZN.Klda $a2@.N.Kclc@.N.Kadc clock@.NHLsta clock@.NRLmainlop jsr you@.N£Ljsr m.sters@.N&Ljsr panel@.N0Llda dead@.N:Lbne gameover@.NdLlda clock@NOnLtrlop cmp $a2@£OxLbcc trlop@$OBLclc@1OLLadc #$03@?OVLsta clock@oO.Ljmp mainlop@EO.Lgameover jsr gam.@.O.O; graphic routines@.O.Odispblock jsr initdb@.O.Ojsr stack@.O.Oldx yps@.O.Oyplopd cpx #$00@.O.Obeq ypdcnt@.O.Odex@.O.Olda mems@.O.Oclc@.O.Oadc #$50@IP.Osta mems@XP.Obcc yplopd@'PDPinc mems.1@6PNPjmp yplopd@iPXPypdcnt lda xps@sP"Pasl a@[P,Pclc@HP6Padc mems@UP@Psta mems@.PjPbcc xpcnt@.PtPinc mems.1@.P.Pxpcnt lda yp@.PHPlsr a@.PRP;lsr a@.P.Pclc@.P.Padc #$0c@.P.Psta memr.1@.P.Plda yp@.P.P. #$03@.P.Plsr a@EQ.Pr. a@PQ.P;ror a@]Q.Psta memr@(Q.Plda xp@2Q.Plsr a@<Q.Plsr a@dQ.Pclc@qQ.Padc memr@.QHQsta memr@OQRQlda (memr),y@ZQ£Qsta bt@.Q&Qlda xp@.Q0Q. #$03@.Q:Qtax@.QdQlda yp@.QnQlsr a@.QxQclc@.QBQadc #$34@.QLQsta memr.1@.QVQlda yp@.Q.Q. #$01@.Q.Qlsr a@.Q.Qr. a@GR.Qsta memr@RR.Qlda xp@£R.Qlsr a@$R.Qclc@1R.Qadc memr@>R.Qsta memr@oR.Qlda (memr),y@£R.Qsta btfb@DR.Qtxa@OR.Q. #$01@.RBRbne fbn.t@.RLRlda #$0f@.RVRjmp fbnrot@.R Rfbn.t lda #$f0@.R!R. btfb@.R"Rlsr a@.R#Rlsr a@.R$Rlsr a@.R%Rlsr a@.R&Rjmp fbnr.@.R4Rfbnrot . btfb@RS>Rfbnr. sta btfb@]ShRlda bt@/SrRdtbl cpx #$00@=S£Rbeq dtbl.@gSFRlsr a@qSPRlsr a@ySZRdex@FS.Rjmp dtbl@WS.Rdtbl. . #$03@.S.Rasl a@.S.Rasl a@.S.Rasl a@.S.Rasl a@.S.Rasl a@.S.Rclc@.S.Radc btfb@.S.Rsta bt@.S.Rasl a@.S.R;asl a@.S.R;clc@.S.R;adc #$40@FTFSsta (mems),y@NTKSclc@[TPSadc #$01@#TZSiny@4T$Ssta (mems),y@<T.Sclc@iTlSadc #$1f@vTvSldy #$28@GT.Ssta (mems),y@OTESclc@.TJSadc #$01@.TTSiny@.T.Ssta (mems),y@.T.Slda mems.1@.T.Sclc@.T.Sadc #$54@.T.Ssta mems.1@.T.Sldy #$00@.T.Slda bt@.T.Ssta (mems),y@.T.Siny@JU.Ssta (mems),y@WU.Sldy #$28@(U.Ssta (mems),y@0U.Siny@aU@Tsta (mems),y@qU.Tjmp unstack@EU2Tinitdb lda #$04@TU<Tsta mems.1@.UfTldy #$00@.UpTsty mems@.UzTlda xptl@.UDTclc@.UNTadc xps@.UXTsta xp@.U.Tlda yptl@.U.Tclc@.U.Tadc yps@.U.Tsta yp@.U.Trts@FVPW; scroller routines@[VUWdownmem ldy #$00@+VZWlda ($fb),y@;V.Wsta ($fd),y@gV.Winc $fd@sV.Wlda $fd@CV.Wbne downmem@OV.Winc $fe@.V.Wlda $fe@.V.Wcmp stpage@.V.Wbne downmem@.V.Wlda $d018@.V.We. #$10@.V.Wsta $d018@.V.Wrts@.V.Xrscroll jsr stack@.V.Xldx xsste@.V.Xdex@.V.Xtxa@IW.X. #$07@WW.Xsta xsste@.W.Xclc@,W.Xadc #$10@:W.Xsta $d016@gW@Ycmp #$17@xWJYbeq rscrdisp@MWTYsldc jmp unstack@.W(Yrscrdisp lda #$04@.W2Ysta $fe@.W<Ylda #$08@.WfYsta stpage@.WpYlda #$00@.WzYsta $fd@.WDYlda #$01@.WNYsta mtab@.WXYjsr downmem@.W.Ydec xptl@HX.Ylda #$12@UX.Yldx #$00@!X.Ysta xps@7X.Yrsscrdisp stx yps@iX.Yjsr dispblock@qX.Yinx@.X.Ycpx #$0a@PX.Ybne rsscrdisp@.XDZjmp sldc@.X(#; interlacing routines@.X2#ilace. sei@.X<#lda #..erlace@.Xf#sta $0314@.Xp#lda #..erlace@.Xz#sta $0315@.XD#cli@.XN#rts@HYX#ilaceoff sei@£Y.#lda #.ilacequit@*Y.#sta $0314@>Y.#lda #.ilacequit@lY.#sta $0315@yY.#lda #$64@GY.#sta $d018@OY.#cli@WY.#rts@.Y.#.erlace lda ilstate@.Y.#beq inzero@.Y.#lda #$00@.Y.#sta ilstate@.Y.#lda #$62@.YD$sta $d018@.YN$lda #$15@.YX$sta $d016@JZ"$ilacequit jmp (irq.)@!Z,$inzero inc ilstate@.Z6$lda #$60@<Z@$sta $d018@iZj$lda #$14@wZt$sta $d016@FZ.$jmp (irq.)@ZZP'; temp routines@.ZQ'effects nop@.ZR'fullsdisp nop@.ZS'you nop@.ZT'm.sters nop@.ZU'panel nop@.ZV'gam. nop@@@

00000000  23 08 0a 00 3b 20 4e 55  43 4c 45 41 52 20 46 49  |#...; NUCLEAR FI|
00000010  52 45 20 2d 20 4d 41 49  4e 20 50 52 4f 47 52 41  |RE - MAIN PROGRA|
00000020  4d 00 39 08 14 00 3b 20  42 59 20 44 4f 4d 49 4e  |M.9...; BY DOMIN|
00000030  49 43 20 46 4f 52 44 00  4e 08 1e 00 3b 20 44 45  |IC FORD.N...; DE|
00000040  43 45 4d 42 45 52 20 27  39 34 20 2d 00 5a 08 28  |CEMBER '94 -.Z.(|
00000050  00 ac b2 24 43 30 30 30  00 6a 08 e8 03 3b 20 56  |...$C000.j...; V|
00000060  41 52 49 41 42 4c 45 53  00 79 08 ed 03 44 45 41  |ARIABLES.y...DEA|
00000070  44 b2 24 43 46 34 30 00  89 08 f2 03 43 4c 4f 43  |D.$CF40.....CLOC|
00000080  4b b2 24 43 46 34 31 00  99 08 fc 03 45 46 44 41  |K.$CF41.....EFDA|
00000090  54 b2 24 43 46 34 32 00  a6 08 06 04 4e 92 b2 24  |T.$CF42.....N..$|
000000a0  43 46 34 33 00 b2 08 10  04 4d 48 49 b2 24 33 46  |CF43.....MHI.$3F|
000000b0  00 c1 08 1a 04 56 44 41  54 b2 24 42 43 30 31 00  |.....VDAT.$BC01.|
000000c0  cd 08 24 04 83 3d 24 43  46 34 35 00 da 08 2e 04  |..$..=$CF45.....|
000000d0  58 50 b2 24 43 46 34 34  00 e7 08 38 04 59 50 b2  |XP.$CF44...8.YP.|
000000e0  24 43 46 34 37 00 f4 08  42 04 4d 45 4d 53 b2 24  |$CF47...B.MEMS.$|
000000f0  34 31 00 01 09 4c 04 4d  45 4d 52 b2 24 32 32 00  |41...L.MEMR.$22.|
00000100  0e 09 56 04 42 54 b2 24  43 46 34 38 00 1c 09 60  |..V.BT.$CF48...`|
00000110  04 58 50 53 b2 24 43 46  34 39 00 2a 09 6a 04 59  |.XPS.$CF49.*.j.Y|
00000120  50 53 b2 24 43 46 34 41  00 39 09 74 04 42 54 46  |PS.$CF4A.9.t.BTF|
00000130  42 b2 24 43 46 34 42 00  48 09 7e 04 58 50 54 4c  |B.$CF4B.H.~.XPTL|
00000140  b2 24 43 46 34 43 00 57  09 88 04 59 50 54 4c b2  |.$CF4C.W...YPTL.|
00000150  24 43 46 34 44 00 67 09  92 04 58 53 53 54 45 b2  |$CF4D.g...XSSTE.|
00000160  24 43 46 34 45 00 77 09  9c 04 59 53 53 54 45 b2  |$CF4E.w...YSSTE.|
00000170  24 43 46 34 46 00 86 09  a6 04 4d 54 41 42 b2 24  |$CF4F.....MTAB.$|
00000180  43 46 35 30 00 97 09 b0  04 53 54 50 41 47 45 b2  |CF50.....STPAGE.|
00000190  24 43 46 35 31 00 a7 09  ba 04 41 53 a4 52 45 b2  |$CF51.....AS.RE.|
000001a0  24 43 46 35 32 00 b7 09  c4 04 58 53 a4 52 45 b2  |$CF52.....XS.RE.|
000001b0  24 43 46 35 33 00 c7 09  ce 04 59 53 a4 52 45 b2  |$CF53.....YS.RE.|
000001c0  24 43 46 35 34 00 d6 09  d8 04 49 52 51 9a b2 24  |$CF54.....IRQ..$|
000001d0  43 46 35 35 00 e8 09 e2  04 49 4c 53 54 41 54 45  |CF55.....ILSTATE|
000001e0  b2 24 43 46 35 37 00 fd  09 d0 07 3b 20 4d 55 53  |.$CF57.....; MUS|
000001f0  49 43 20 52 4f 55 54 49  4e 45 53 00 0a 0a d5 07  |IC ROUTINES.....|
00000200  4d 55 53 91 20 53 45 49  00 1b 0a da 07 4c 44 41  |MUS. SEI.....LDA|
00000210  20 23 b3 4d 83 50 4c 41  59 00 28 0a e4 07 53 54  | #.M.PLAY.(...ST|
00000220  41 20 49 52 51 9a 00 39  0a ee 07 4c 44 41 20 23  |A IRQ..9...LDA #|
00000230  b1 4d 83 50 4c 41 59 00  48 0a f8 07 53 54 41 20  |.M.PLAY.H...STA |
00000240  49 52 51 9a aa 31 00 52  0a 02 08 4c 44 41 20 83  |IRQ..1.R...LDA .|
00000250  00 60 0a 0c 08 53 54 41  20 4d 48 49 aa 31 00 6c  |.`...STA MHI.1.l|
00000260  0a 16 08 4c 44 41 20 83  2b 31 00 78 0a 20 08 53  |...LDA .+1.x. .S|
00000270  54 41 20 4d 48 49 00 85  0a 2a 08 4c 44 41 20 23  |TA MHI...*.LDA #|
00000280  24 30 30 00 90 0a 34 08  53 54 41 20 4e 92 00 9c  |$00...4.STA N...|
00000290  0a 3e 08 4a 53 52 20 e8  55 50 00 a4 0a 48 08 43  |.>.JSR .UP...H.C|
000002a0  4c 49 00 ac 0a 52 08 52  54 53 00 bb 0a 5c 08 4d  |LI...R.RTS...\.M|
000002b0  55 53 4f 46 46 20 53 45  49 00 c8 0a 66 08 4c 44  |USOFF SEI...f.LD|
000002c0  41 20 23 24 33 31 00 d5  0a 70 08 53 54 41 20 49  |A #$31...p.STA I|
000002d0  52 51 9a 00 e2 0a 7a 08  4c 44 41 20 23 24 45 41  |RQ....z.LDA #$EA|
000002e0  00 f1 0a 84 08 53 54 41  20 49 52 51 9a aa 31 00  |.....STA IRQ..1.|
000002f0  f9 0a 8e 08 43 4c 49 00  01 0b 98 08 52 54 53 00  |....CLI.....RTS.|
00000300  16 0b a2 08 4d 83 50 4c  41 59 20 4a 53 52 20 53  |....M.PLAY JSR S|
00000310  54 41 43 4b 00 21 0b ac  08 4c 44 41 20 4e 92 00  |TACK.!...LDA N..|
00000320  2b 0b b6 08 42 45 51 20  87 00 39 0b c0 08 4a 4d  |+...BEQ ..9...JM|
00000330  50 20 24 45 41 33 31 00  48 0b ca 08 87 20 4c 44  |P $EA31.H.... LD|
00000340  59 20 23 24 30 30 00 58  0b d4 08 4c 44 41 20 28  |Y #$00.X...LDA (|
00000350  4d 48 49 29 2c 59 00 63  0b de 08 af 20 23 24 30  |MHI),Y.c.... #$0|
00000360  31 00 6f 0b e8 08 42 45  51 20 9a 4d 41 00 7c 0b  |1.o...BEQ .MA.|.|
00000370  f2 08 4c 44 41 20 23 24  30 37 00 88 0b fc 08 9a  |..LDA #$07......|
00000380  4d 41 20 54 41 58 00 98  0b 06 09 4c 44 41 20 28  |MA TAX.....LDA (|
00000390  4d 48 49 29 2c 59 00 a2  0b 10 09 4c 53 52 20 41  |MHI),Y.....LSR A|
000003a0  00 ad 0b 1a 09 53 54 41  20 4e 92 00 ba 0b 24 09  |.....STA N....$.|
000003b0  43 4d 50 20 23 24 30 36  00 c6 0b 2e 09 42 4e 45  |CMP #$06.....BNE|
000003c0  20 4d 52 9a 00 d5 0b 38  09 4c 44 41 20 56 44 41  | MR....8.LDA VDA|
000003d0  54 2c 58 00 e5 0b 42 09  53 54 41 20 24 44 34 30  |T,X...B.STA $D40|
000003e0  34 2c 58 00 ed 0b 4c 09  54 41 59 00 f5 0b 56 09  |4,X...L.TAY...V.|
000003f0  49 4e 59 00 fd 0b 60 09  54 59 41 00 0d 0c 6a 09  |INY...`.TYA...j.|
00000400  53 54 41 20 24 44 34 30  34 2c 58 00 1d 0c 74 09  |STA $D404,X...t.|
00000410  4a 53 52 20 44 45 53 54  41 43 4b 00 2b 0c 7e 09  |JSR DESTACK.+.~.|
00000420  4a 4d 50 20 24 45 41 33  31 00 3f 0c 88 09 53 54  |JMP $EA31.?...ST|
00000430  41 43 4b 20 53 54 41 20  41 53 a4 52 45 00 4d 0c  |ACK STA AS.RE.M.|
00000440  92 09 53 54 58 20 58 53  a4 52 45 00 5b 0c 9c 09  |..STX XS.RE.[...|
00000450  53 54 59 20 59 53 a4 52  45 00 63 0c ba 09 52 54  |STY YS.RE.c...RT|
00000460  53 00 7b 0c c4 09 44 45  53 54 41 43 4b 20 4a 53  |S.{...DESTACK JS|
00000470  52 20 45 46 46 45 43 54  53 00 91 0c ce 09 55 4e  |R EFFECTS.....UN|
00000480  53 54 41 43 4b 20 4c 44  41 20 41 53 a4 52 45 00  |STACK LDA AS.RE.|
00000490  9f 0c d8 09 4c 44 58 20  58 53 a4 52 45 00 ad 0c  |....LDX XS.RE...|
000004a0  e2 09 4c 44 59 20 59 53  a4 52 45 00 b5 0c 00 0a  |..LDY YS.RE.....|
000004b0  52 54 53 00 c1 0c 0a 0a  4d 52 9a 20 49 4e 59 00  |RTS.....MR. INY.|
000004c0  d1 0c 14 0a 4c 44 41 20  28 4d 48 49 29 2c 59 00  |....LDA (MHI),Y.|
000004d0  e1 0c 1e 0a 53 54 41 20  24 44 34 30 30 2c 58 00  |....STA $D400,X.|
000004e0  e9 0c 28 0a 49 4e 59 00  f9 0c 32 0a 4c 44 41 20  |..(.INY...2.LDA |
000004f0  28 4d 48 49 29 2c 59 00  09 0d 3c 0a 53 54 41 20  |(MHI),Y...<.STA |
00000500  24 44 34 30 31 2c 58 00  19 0d 46 0a 4a 53 52 20  |$D401,X...F.JSR |
00000510  44 45 53 54 41 43 4b 00  27 0d 50 0a 4a 4d 50 20  |DESTACK.'.P.JMP |
00000520  24 45 41 33 31 00 38 0d  5a 0a e8 55 50 20 4c 44  |$EA31.8.Z..UP LD|
00000530  58 20 56 44 41 54 00 40  0d 64 0a 49 4e 58 00 4e  |X VDAT.@.d.INX.N|
00000540  0d 6e 0a 53 54 58 20 24  44 34 30 34 00 5d 0d 78  |.n.STX $D404.].x|
00000550  0a 4c 44 58 20 56 44 41  54 aa 37 00 65 0d 82 0a  |.LDX VDAT.7.e...|
00000560  49 4e 58 00 73 0d 8c 0a  53 54 58 20 24 44 34 30  |INX.s...STX $D40|
00000570  42 00 7b 0d 96 0a 52 54  53 00 8c 0d a0 0a 45 46  |B.{...RTS.....EF|
00000580  46 45 43 54 53 91 20 53  45 49 00 9d 0d aa 0a 4c  |FECTS. SEI.....L|
00000590  44 41 20 23 b3 45 46 46  91 4c 59 00 ab 0d b4 0a  |DA #.EFF.LY.....|
000005a0  53 54 41 20 24 30 33 31  34 00 bc 0d be 0a 4c 44  |STA $0314.....LD|
000005b0  41 20 23 b1 45 46 46 91  4c 59 00 ca 0d c8 0a 53  |A #.EFF.LY.....S|
000005c0  54 41 20 24 30 33 31 35  00 d2 0d d2 0a 43 4c 49  |TA $0315.....CLI|
000005d0  00 da 0d dc 0a 52 54 53  00 ef 0d e6 0a 45 46 46  |.....RTS.....EFF|
000005e0  91 4c 59 20 4a 53 52 20  53 54 41 43 4b 00 ff 0d  |.LY JSR STACK...|
000005f0  f0 0a 4a 53 52 20 44 45  53 54 41 43 4b 00 0d 0e  |..JSR DESTACK...|
00000600  fa 0a 4a 4d 50 20 24 45  41 33 31 00 22 0e b8 0b  |..JMP $EA31."...|
00000610  3b 20 4d 41 49 4e 20 47  41 4d 45 20 4c 4f 4f 50  |; MAIN GAME LOOP|
00000620  00 34 0e bd 0b 4d 41 49  4e 20 4c 44 41 20 23 24  |.4...MAIN LDA #$|
00000630  30 30 00 41 0e c2 0b 53  54 41 20 44 45 41 44 00  |00.A...STA DEAD.|
00000640  4f 0e cc 0b 53 54 41 20  45 46 44 41 54 00 5c 0e  |O...STA EFDAT.\.|
00000650  d6 0b 4a 53 52 20 4d 55  53 91 00 6e 0e e0 0b 4a  |..JSR MUS..n...J|
00000660  53 52 20 46 55 4c 4c 53  44 49 53 50 00 7a 0e ea  |SR FULLSDISP.z..|
00000670  0b 4c 44 41 20 24 41 32  00 82 0e f4 0b 43 4c 43  |.LDA $A2.....CLC|
00000680  00 90 0e fe 0b 41 44 43  20 43 4c 4f 43 4b 00 9e  |.....ADC CLOCK..|
00000690  0e 08 0c 53 54 41 20 43  4c 4f 43 4b 00 b2 0e 12  |...STA CLOCK....|
000006a0  0c 4d 41 49 4e 4c 4f 50  20 4a 53 52 20 59 4f 55  |.MAINLOP JSR YOU|
000006b0  00 c2 0e 1c 0c 4a 53 52  20 4d 91 53 54 45 52 53  |.....JSR M.STERS|
000006c0  00 d0 0e 26 0c 4a 53 52  20 50 41 4e 45 4c 00 dd  |...&.JSR PANEL..|
000006d0  0e 30 0c 4c 44 41 20 44  45 41 44 00 ee 0e 3a 0c  |.0.LDA DEAD...:.|
000006e0  42 4e 45 20 47 41 4d 45  4f 56 45 52 00 fc 0e 44  |BNE GAMEOVER...D|
000006f0  0c 4c 44 41 20 43 4c 4f  43 4b 00 0e 0f 4e 0c 54  |.LDA CLOCK...N.T|
00000700  52 4c 4f 50 20 43 4d 50  20 24 41 32 00 1c 0f 58  |RLOP CMP $A2...X|
00000710  0c 42 43 43 20 54 52 4c  4f 50 00 24 0f 62 0c 43  |.BCC TRLOP.$.b.C|
00000720  4c 43 00 31 0f 6c 0c 41  44 43 20 23 24 30 33 00  |LC.1.l.ADC #$03.|
00000730  3f 0f 76 0c 53 54 41 20  43 4c 4f 43 4b 00 4f 0f  |?.v.STA CLOCK.O.|
00000740  80 0c 4a 4d 50 20 4d 41  49 4e 4c 4f 50 00 65 0f  |..JMP MAINLOP.e.|
00000750  8a 0c 47 41 4d 45 4f 56  45 52 20 4a 53 52 20 47  |..GAMEOVER JSR G|
00000760  41 4d 80 00 7c 0f a0 0f  3b 20 47 52 41 50 48 49  |AM..|...; GRAPHI|
00000770  43 20 52 4f 55 54 49 4e  45 53 00 95 0f a5 0f 44  |C ROUTINES.....D|
00000780  49 53 50 42 4c 4f 43 4b  20 4a 53 52 20 49 4e 49  |ISPBLOCK JSR INI|
00000790  54 44 42 00 a3 0f a7 0f  4a 53 52 20 53 54 41 43  |TDB.....JSR STAC|
000007a0  4b 00 af 0f aa 0f 4c 44  58 20 59 50 53 00 c3 0f  |K.....LDX YPS...|
000007b0  b4 0f 59 50 4c 4f 50 44  20 43 50 58 20 23 24 30  |..YPLOPD CPX #$0|
000007c0  30 00 d2 0f be 0f 42 45  51 20 59 50 44 43 4e 54  |0.....BEQ YPDCNT|
000007d0  00 da 0f c8 0f 44 45 58  00 e7 0f d2 0f 4c 44 41  |.....DEX.....LDA|
000007e0  20 4d 45 4d 53 00 ef 0f  dc 0f 43 4c 43 00 fc 0f  | MEMS.....CLC...|
000007f0  e6 0f 41 44 43 20 23 24  35 30 00 09 10 f2 0f 53  |..ADC #$50.....S|
00000800  54 41 20 4d 45 4d 53 00  18 10 fa 0f 42 43 43 20  |TA MEMS.....BCC |
00000810  59 50 4c 4f 50 44 00 27  10 04 10 49 4e 43 20 4d  |YPLOPD.'...INC M|
00000820  45 4d 53 aa 31 00 36 10  0e 10 4a 4d 50 20 59 50  |EMS.1.6...JMP YP|
00000830  4c 4f 50 44 00 49 10 18  10 59 50 44 43 4e 54 20  |LOPD.I...YPDCNT |
00000840  4c 44 41 20 58 50 53 00  53 10 22 10 41 53 4c 20  |LDA XPS.S.".ASL |
00000850  41 00 5b 10 2c 10 43 4c  43 00 68 10 36 10 41 44  |A.[.,.CLC.h.6.AD|
00000860  43 20 4d 45 4d 53 00 75  10 40 10 53 54 41 20 4d  |C MEMS.u.@.STA M|
00000870  45 4d 53 00 83 10 4a 10  42 43 43 20 58 50 43 4e  |EMS...J.BCC XPCN|
00000880  54 00 92 10 54 10 49 4e  43 20 4d 45 4d 53 aa 31  |T...T.INC MEMS.1|
00000890  00 a3 10 5e 10 58 50 43  4e 54 20 4c 44 41 20 59  |...^.XPCNT LDA Y|
000008a0  50 00 ad 10 68 10 4c 53  52 20 41 00 b8 10 72 10  |P...h.LSR A...r.|
000008b0  3b 4c 53 52 20 41 00 c0  10 7c 10 43 4c 43 00 cd  |;LSR A...|.CLC..|
000008c0  10 86 10 41 44 43 20 23  24 30 43 00 dc 10 90 10  |...ADC #$0C.....|
000008d0  53 54 41 20 4d 45 4d 52  aa 31 00 e7 10 9a 10 4c  |STA MEMR.1.....L|
000008e0  44 41 20 59 50 00 f2 10  a4 10 af 20 23 24 30 33  |DA YP...... #$03|
000008f0  00 fc 10 ae 10 4c 53 52  20 41 00 05 11 b8 10 52  |.....LSR A.....R|
00000900  b0 20 41 00 10 11 c2 10  3b 52 4f 52 20 41 00 1d  |. A.....;ROR A..|
00000910  11 cc 10 53 54 41 20 4d  45 4d 52 00 28 11 d6 10  |...STA MEMR.(...|
00000920  4c 44 41 20 58 50 00 32  11 e0 10 4c 53 52 20 41  |LDA XP.2...LSR A|
00000930  00 3c 11 ea 10 4c 53 52  20 41 00 44 11 f4 10 43  |.<...LSR A.D...C|
00000940  4c 43 00 51 11 fe 10 41  44 43 20 4d 45 4d 52 00  |LC.Q...ADC MEMR.|
00000950  5e 11 08 11 53 54 41 20  4d 45 4d 52 00 6f 11 12  |^...STA MEMR.o..|
00000960  11 4c 44 41 20 28 4d 45  4d 52 29 2c 59 00 7a 11  |.LDA (MEMR),Y.z.|
00000970  1c 11 53 54 41 20 42 54  00 85 11 26 11 4c 44 41  |..STA BT...&.LDA|
00000980  20 58 50 00 90 11 30 11  af 20 23 24 30 33 00 98  | XP...0.. #$03..|
00000990  11 3a 11 54 41 58 00 a3  11 44 11 4c 44 41 20 59  |.:.TAX...D.LDA Y|
000009a0  50 00 ad 11 4e 11 4c 53  52 20 41 00 b5 11 58 11  |P...N.LSR A...X.|
000009b0  43 4c 43 00 c2 11 62 11  41 44 43 20 23 24 33 34  |CLC...b.ADC #$34|
000009c0  00 d1 11 6c 11 53 54 41  20 4d 45 4d 52 aa 31 00  |...l.STA MEMR.1.|
000009d0  dc 11 76 11 4c 44 41 20  59 50 00 e7 11 80 11 af  |..v.LDA YP......|
000009e0  20 23 24 30 31 00 f1 11  8a 11 4c 53 52 20 41 00  | #$01.....LSR A.|
000009f0  fa 11 94 11 52 b0 20 41  00 07 12 9e 11 53 54 41  |....R. A.....STA|
00000a00  20 4d 45 4d 52 00 12 12  a8 11 4c 44 41 20 58 50  | MEMR.....LDA XP|
00000a10  00 1c 12 b2 11 4c 53 52  20 41 00 24 12 bc 11 43  |.....LSR A.$...C|
00000a20  4c 43 00 31 12 c6 11 41  44 43 20 4d 45 4d 52 00  |LC.1...ADC MEMR.|
00000a30  3e 12 d0 11 53 54 41 20  4d 45 4d 52 00 4f 12 da  |>...STA MEMR.O..|
00000a40  11 4c 44 41 20 28 4d 45  4d 52 29 2c 59 00 5c 12  |.LDA (MEMR),Y.\.|
00000a50  e4 11 53 54 41 20 42 54  46 42 00 64 12 ee 11 54  |..STA BTFB.d...T|
00000a60  58 41 00 6f 12 f8 11 af  20 23 24 30 31 00 7d 12  |XA.o.... #$01.}.|
00000a70  02 12 42 4e 45 20 46 42  4e b0 54 00 8a 12 0c 12  |..BNE FBN.T.....|
00000a80  4c 44 41 20 23 24 30 46  00 99 12 16 12 4a 4d 50  |LDA #$0F.....JMP|
00000a90  20 46 42 4e 52 4f 54 00  ac 12 20 12 46 42 4e b0  | FBNROT... .FBN.|
00000aa0  54 20 4c 44 41 20 23 24  46 30 00 b7 12 21 12 af  |T LDA #$F0...!..|
00000ab0  20 42 54 46 42 00 c1 12  22 12 4c 53 52 20 41 00  | BTFB...".LSR A.|
00000ac0  cb 12 23 12 4c 53 52 20  41 00 d5 12 24 12 4c 53  |..#.LSR A...$.LS|
00000ad0  52 20 41 00 df 12 25 12  4c 53 52 20 41 00 ed 12  |R A...%.LSR A...|
00000ae0  26 12 4a 4d 50 20 46 42  4e 52 a4 00 ff 12 34 12  |&.JMP FBNR....4.|
00000af0  46 42 4e 52 4f 54 20 af  20 42 54 46 42 00 12 13  |FBNROT . BTFB...|
00000b00  3e 12 46 42 4e 52 a4 20  53 54 41 20 42 54 46 42  |>.FBNR. STA BTFB|
00000b10  00 1d 13 48 12 4c 44 41  20 42 54 00 2f 13 52 12  |...H.LDA BT./.R.|
00000b20  44 54 42 4c 20 43 50 58  20 23 24 30 30 00 3d 13  |DTBL CPX #$00.=.|
00000b30  5c 12 42 45 51 20 44 54  42 4c 9a 00 47 13 66 12  |\.BEQ DTBL..G.f.|
00000b40  4c 53 52 20 41 00 51 13  70 12 4c 53 52 20 41 00  |LSR A.Q.p.LSR A.|
00000b50  59 13 7a 12 44 45 58 00  66 13 84 12 4a 4d 50 20  |Y.z.DEX.f...JMP |
00000b60  44 54 42 4c 00 77 13 8e  12 44 54 42 4c 9a 20 af  |DTBL.w...DTBL. .|
00000b70  20 23 24 30 33 00 81 13  98 12 41 53 4c 20 41 00  | #$03.....ASL A.|
00000b80  8b 13 a2 12 41 53 4c 20  41 00 95 13 ac 12 41 53  |....ASL A.....AS|
00000b90  4c 20 41 00 9f 13 b1 12  41 53 4c 20 41 00 a9 13  |L A.....ASL A...|
00000ba0  b6 12 41 53 4c 20 41 00  b1 13 c0 12 43 4c 43 00  |..ASL A.....CLC.|
00000bb0  be 13 ca 12 41 44 43 20  42 54 46 42 00 c9 13 d4  |....ADC BTFB....|
00000bc0  12 53 54 41 20 42 54 00  d3 13 de 12 41 53 4c 20  |.STA BT.....ASL |
00000bd0  41 00 de 13 e8 12 3b 41  53 4c 20 41 00 e7 13 f2  |A.....;ASL A....|
00000be0  12 3b 43 4c 43 00 f5 13  fc 12 3b 41 44 43 20 23  |.;CLC.....;ADC #|
00000bf0  24 34 30 00 06 14 06 13  53 54 41 20 28 4d 45 4d  |$40.....STA (MEM|
00000c00  53 29 2c 59 00 0e 14 0b  13 43 4c 43 00 1b 14 10  |S),Y.....CLC....|
00000c10  13 41 44 43 20 23 24 30  31 00 23 14 1a 13 49 4e  |.ADC #$01.#...IN|
00000c20  59 00 34 14 24 13 53 54  41 20 28 4d 45 4d 53 29  |Y.4.$.STA (MEMS)|
00000c30  2c 59 00 3c 14 2e 13 43  4c 43 00 49 14 4c 13 41  |,Y.<...CLC.I.L.A|
00000c40  44 43 20 23 24 31 46 00  56 14 56 13 4c 44 59 20  |DC #$1F.V.V.LDY |
00000c50  23 24 32 38 00 67 14 60  13 53 54 41 20 28 4d 45  |#$28.g.`.STA (ME|
00000c60  4d 53 29 2c 59 00 6f 14  65 13 43 4c 43 00 7c 14  |MS),Y.o.e.CLC.|.|
00000c70  6a 13 41 44 43 20 23 24  30 31 00 84 14 74 13 49  |j.ADC #$01...t.I|
00000c80  4e 59 00 95 14 7e 13 53  54 41 20 28 4d 45 4d 53  |NY...~.STA (MEMS|
00000c90  29 2c 59 00 a4 14 88 13  4c 44 41 20 4d 45 4d 53  |),Y.....LDA MEMS|
00000ca0  aa 31 00 ac 14 92 13 43  4c 43 00 b9 14 9c 13 41  |.1.....CLC.....A|
00000cb0  44 43 20 23 24 35 34 00  c8 14 a6 13 53 54 41 20  |DC #$54.....STA |
00000cc0  4d 45 4d 53 aa 31 00 d5  14 b0 13 4c 44 59 20 23  |MEMS.1.....LDY #|
00000cd0  24 30 30 00 e0 14 ba 13  4c 44 41 20 42 54 00 f1  |$00.....LDA BT..|
00000ce0  14 c4 13 53 54 41 20 28  4d 45 4d 53 29 2c 59 00  |...STA (MEMS),Y.|
00000cf0  f9 14 ce 13 49 4e 59 00  0a 15 d8 13 53 54 41 20  |....INY.....STA |
00000d00  28 4d 45 4d 53 29 2c 59  00 17 15 e2 13 4c 44 59  |(MEMS),Y.....LDY|
00000d10  20 23 24 32 38 00 28 15  ec 13 53 54 41 20 28 4d  | #$28.(...STA (M|
00000d20  45 4d 53 29 2c 59 00 30  15 f6 13 49 4e 59 00 41  |EMS),Y.0...INY.A|
00000d30  15 00 14 53 54 41 20 28  4d 45 4d 53 29 2c 59 00  |...STA (MEMS),Y.|
00000d40  51 15 1e 14 4a 4d 50 20  55 4e 53 54 41 43 4b 00  |Q...JMP UNSTACK.|
00000d50  65 15 32 14 49 4e 49 54  44 42 20 4c 44 41 20 23  |e.2.INITDB LDA #|
00000d60  24 30 34 00 74 15 3c 14  53 54 41 20 4d 45 4d 53  |$04.t.<.STA MEMS|
00000d70  aa 31 00 81 15 46 14 4c  44 59 20 23 24 30 30 00  |.1...F.LDY #$00.|
00000d80  8e 15 50 14 53 54 59 20  4d 45 4d 53 00 9b 15 5a  |..P.STY MEMS...Z|
00000d90  14 4c 44 41 20 58 50 54  4c 00 a3 15 64 14 43 4c  |.LDA XPTL...d.CL|
00000da0  43 00 af 15 6e 14 41 44  43 20 58 50 53 00 ba 15  |C...n.ADC XPS...|
00000db0  78 14 53 54 41 20 58 50  00 c7 15 82 14 4c 44 41  |x.STA XP.....LDA|
00000dc0  20 59 50 54 4c 00 cf 15  8c 14 43 4c 43 00 db 15  | YPTL.....CLC...|
00000dd0  96 14 41 44 43 20 59 50  53 00 e6 15 a0 14 53 54  |..ADC YPS.....ST|
00000de0  41 20 59 50 00 ee 15 aa  14 52 54 53 00 06 16 70  |A YP.....RTS...p|
00000df0  17 3b 20 53 43 52 4f 4c  4c 45 52 20 52 4f 55 54  |.; SCROLLER ROUT|
00000e00  49 4e 45 53 00 1b 16 75  17 44 4f 57 4e 4d 45 4d  |INES...u.DOWNMEM|
00000e10  20 4c 44 59 20 23 24 30  30 00 2b 16 7a 17 4c 44  | LDY #$00.+.z.LD|
00000e20  41 20 28 24 46 42 29 2c  59 00 3b 16 8e 17 53 54  |A ($FB),Y.;...ST|
00000e30  41 20 28 24 46 44 29 2c  59 00 47 16 98 17 49 4e  |A ($FD),Y.G...IN|
00000e40  43 20 24 46 44 00 53 16  a2 17 4c 44 41 20 24 46  |C $FD.S...LDA $F|
00000e50  44 00 63 16 ac 17 42 4e  45 20 44 4f 57 4e 4d 45  |D.c...BNE DOWNME|
00000e60  4d 00 6f 16 b6 17 49 4e  43 20 24 46 45 00 7b 16  |M.o...INC $FE.{.|
00000e70  c0 17 4c 44 41 20 24 46  45 00 8a 16 ca 17 43 4d  |..LDA $FE.....CM|
00000e80  50 20 53 54 50 41 47 45  00 9a 16 d4 17 42 4e 45  |P STPAGE.....BNE|
00000e90  20 44 4f 57 4e 4d 45 4d  00 a8 16 de 17 4c 44 41  | DOWNMEM.....LDA|
00000ea0  20 24 44 30 31 38 00 b4  16 e8 17 45 b0 20 23 24  | $D018.....E. #$|
00000eb0  31 30 00 c2 16 f2 17 53  54 41 20 24 44 30 31 38  |10.....STA $D018|
00000ec0  00 ca 16 fc 17 52 54 53  00 e0 16 a6 18 52 53 43  |.....RTS.....RSC|
00000ed0  52 4f 4c 4c 20 4a 53 52  20 53 54 41 43 4b 00 ee  |ROLL JSR STACK..|
00000ee0  16 b0 18 4c 44 58 20 58  53 53 54 45 00 f6 16 ba  |...LDX XSSTE....|
00000ef0  18 44 45 58 00 fe 16 c4  18 54 58 41 00 09 17 ce  |.DEX.....TXA....|
00000f00  18 af 20 23 24 30 37 00  17 17 d8 18 53 54 41 20  |.. #$07.....STA |
00000f10  58 53 53 54 45 00 1f 17  e2 18 43 4c 43 00 2c 17  |XSSTE.....CLC.,.|
00000f20  ec 18 41 44 43 20 23 24  31 30 00 3a 17 f6 18 53  |..ADC #$10.:...S|
00000f30  54 41 20 24 44 30 31 36  00 47 17 00 19 43 4d 50  |TA $D016.G...CMP|
00000f40  20 23 24 31 37 00 58 17  0a 19 42 45 51 20 52 53  | #$17.X...BEQ RS|
00000f50  43 52 44 49 53 50 00 6d  17 14 19 53 4c 44 43 20  |CRDISP.m...SLDC |
00000f60  4a 4d 50 20 55 4e 53 54  41 43 4b 00 83 17 28 19  |JMP UNSTACK...(.|
00000f70  52 53 43 52 44 49 53 50  20 4c 44 41 20 23 24 30  |RSCRDISP LDA #$0|
00000f80  34 00 8f 17 32 19 53 54  41 20 24 46 45 00 9c 17  |4...2.STA $FE...|
00000f90  3c 19 4c 44 41 20 23 24  30 38 00 ab 17 46 19 53  |<.LDA #$08...F.S|
00000fa0  54 41 20 53 54 50 41 47  45 00 b8 17 50 19 4c 44  |TA STPAGE...P.LD|
00000fb0  41 20 23 24 30 30 00 c4  17 5a 19 53 54 41 20 24  |A #$00...Z.STA $|
00000fc0  46 44 00 d1 17 64 19 4c  44 41 20 23 24 30 31 00  |FD...d.LDA #$01.|
00000fd0  de 17 6e 19 53 54 41 20  4d 54 41 42 00 ee 17 78  |..n.STA MTAB...x|
00000fe0  19 4a 53 52 20 44 4f 57  4e 4d 45 4d 00 fb 17 af  |.JSR DOWNMEM....|
00000ff0  19 44 45 43 20 58 50 54  4c 00 08 18 b4 19 4c 44  |.DEC XPTL.....LD|
00001000  41 20 23 24 31 32 00 15  18 be 19 4c 44 58 20 23  |A #$12.....LDX #|
00001010  24 30 30 00 21 18 c8 19  53 54 41 20 58 50 53 00  |$00.!...STA XPS.|
00001020  37 18 d2 19 52 53 53 43  52 44 49 53 50 20 53 54  |7...RSSCRDISP ST|
00001030  58 20 59 50 53 00 49 18  dc 19 4a 53 52 20 44 49  |X YPS.I...JSR DI|
00001040  53 50 42 4c 4f 43 4b 00  51 18 e6 19 49 4e 58 00  |SPBLOCK.Q...INX.|
00001050  5e 18 f0 19 43 50 58 20  23 24 30 41 00 70 18 fa  |^...CPX #$0A.p..|
00001060  19 42 4e 45 20 52 53 53  43 52 44 49 53 50 00 7d  |.BNE RSSCRDISP.}|
00001070  18 04 1a 4a 4d 50 20 53  4c 44 43 00 98 18 28 23  |...JMP SLDC...(#|
00001080  3b 20 49 4e 54 45 52 4c  41 43 49 4e 47 20 52 4f  |; INTERLACING RO|
00001090  55 54 49 4e 45 53 00 a7  18 32 23 49 4c 41 43 45  |UTINES...2#ILACE|
000010a0  91 20 53 45 49 00 b9 18  3c 23 4c 44 41 20 23 b3  |. SEI...<#LDA #.|
000010b0  b5 45 52 4c 41 43 45 00  c7 18 46 23 53 54 41 20  |.ERLACE...F#STA |
000010c0  24 30 33 31 34 00 d9 18  50 23 4c 44 41 20 23 b1  |$0314...P#LDA #.|
000010d0  b5 45 52 4c 41 43 45 00  e7 18 5a 23 53 54 41 20  |.ERLACE...Z#STA |
000010e0  24 30 33 31 35 00 ef 18  64 23 43 4c 49 00 f7 18  |$0315...d#CLI...|
000010f0  6e 23 52 54 53 00 08 19  78 23 49 4c 41 43 45 4f  |n#RTS...x#ILACEO|
00001100  46 46 20 53 45 49 00 1c  19 82 23 4c 44 41 20 23  |FF SEI....#LDA #|
00001110  b3 49 4c 41 43 45 51 55  49 54 00 2a 19 8c 23 53  |.ILACEQUIT.*..#S|
00001120  54 41 20 24 30 33 31 34  00 3e 19 96 23 4c 44 41  |TA $0314.>..#LDA|
00001130  20 23 b1 49 4c 41 43 45  51 55 49 54 00 4c 19 a0  | #.ILACEQUIT.L..|
00001140  23 53 54 41 20 24 30 33  31 35 00 59 19 aa 23 4c  |#STA $0315.Y..#L|
00001150  44 41 20 23 24 36 34 00  67 19 b4 23 53 54 41 20  |DA #$64.g..#STA |
00001160  24 44 30 31 38 00 6f 19  be 23 43 4c 49 00 77 19  |$D018.o..#CLI.w.|
00001170  c8 23 52 54 53 00 8f 19  d2 23 b5 45 52 4c 41 43  |.#RTS....#.ERLAC|
00001180  45 20 4c 44 41 20 49 4c  53 54 41 54 45 00 9e 19  |E LDA ILSTATE...|
00001190  dc 23 42 45 51 20 49 4e  5a 45 52 4f 00 ab 19 e6  |.#BEQ INZERO....|
000011a0  23 4c 44 41 20 23 24 30  30 00 bb 19 f0 23 53 54  |#LDA #$00....#ST|
000011b0  41 20 49 4c 53 54 41 54  45 00 c8 19 fa 23 4c 44  |A ILSTATE....#LD|
000011c0  41 20 23 24 36 32 00 d6  19 04 24 53 54 41 20 24  |A #$62....$STA $|
000011d0  44 30 31 38 00 e3 19 0e  24 4c 44 41 20 23 24 31  |D018....$LDA #$1|
000011e0  35 00 f1 19 18 24 53 54  41 20 24 44 30 31 36 00  |5....$STA $D016.|
000011f0  0a 1a 22 24 49 4c 41 43  45 51 55 49 54 20 4a 4d  |.."$ILACEQUIT JM|
00001200  50 20 28 49 52 51 9a 29  00 21 1a 2c 24 49 4e 5a  |P (IRQ.).!.,$INZ|
00001210  45 52 4f 20 49 4e 43 20  49 4c 53 54 41 54 45 00  |ERO INC ILSTATE.|
00001220  2e 1a 36 24 4c 44 41 20  23 24 36 30 00 3c 1a 40  |..6$LDA #$60.<.@|
00001230  24 53 54 41 20 24 44 30  31 38 00 49 1a 4a 24 4c  |$STA $D018.I.J$L|
00001240  44 41 20 23 24 31 34 00  57 1a 54 24 53 54 41 20  |DA #$14.W.T$STA |
00001250  24 44 30 31 36 00 66 1a  5e 24 4a 4d 50 20 28 49  |$D016.f.^$JMP (I|
00001260  52 51 9a 29 00 7a 1a 10  27 3b 20 54 45 4d 50 20  |RQ.).z..'; TEMP |
00001270  52 4f 55 54 49 4e 45 53  00 8a 1a 11 27 45 46 46  |ROUTINES....'EFF|
00001280  45 43 54 53 20 4e 4f 50  00 9c 1a 12 27 46 55 4c  |ECTS NOP....'FUL|
00001290  4c 53 44 49 53 50 20 4e  4f 50 00 a8 1a 13 27 59  |LSDISP NOP....'Y|
000012a0  4f 55 20 4e 4f 50 00 b8  1a 14 27 4d 91 53 54 45  |OU NOP....'M.STE|
000012b0  52 53 20 4e 4f 50 00 c6  1a 15 27 50 41 4e 45 4c  |RS NOP....'PANEL|
000012c0  20 4e 4f 50 00 d3 1a 16  27 47 41 4d 80 20 4e 4f  | NOP....'GAM. NO|
000012d0  50 00 00 00                                       |P...|
000012d4