; GAME DESIGNER;0; DECEMBER '94 �<(��$C000L�; VARIABLESYXP�$CF82f$YP�$CF83t.XPB�$CF84�8YPB�$CF85�BTYPE�$CF86�LXP��$CF87�VYP��$CF88��; DISPLAY SCREEN BLOCKS��DISP LDA XP��TAX��LDA YP��TAY	�STX XPB	�STY YPB&	�DISPLOP JSR DISPBLOCK2	INC XPB>	
LDA XPBF	SECS	SBC #$14^	(CMP XPn	2BNE DISPLOPz	PSTA XPB�	ZINC YPB�	dLDA YPB�	nSEC�	xSBC #$0A�	�CMP YP�	�BNE DISPLOP�	�JMP DFIN�	�DISPBLOCK LDA XPB�	�STA $FB�	�LDA YPB
�CLC
�ADC #$30&
�CBNOADD STA $FCK
LDA #$04 ; ?????????????????????W
STA $FEc
LDA XPBk
6SECv
@SBC XP�
JASL A�
TSTA $FD�
^LDA YPB�
|SEC�
�SBC YP�
�PHA�
�ASL A�
�DBYALOP BEQ DBYAFIN�
�TAX�
�LDA $FD�
�CLC�
�ADC #$28
�STA $FD�LDA $FE#�ADC #$00/�STA $FE7�DEX?�TXAOJMP DBYALOPdDBYAFIN LDY #$00tLDA ($FB),Y&� #$3F�0STA ($FD),Y�:�A #$40�DINY�NSTA ($FD),Y�XE� #$C0�bLDY #$28�lSTA ($FD),Y�v�A #$40��INY�STA ($FD),Y�LDA ($FB),Y�� #$80#�TAX+�PLA3�TAY;�TXAK�STA $CFE0,YS�RTSb�DFIN LDA �p�STA $0798|��A #$40��STA $0799��A #$80�STA $07C1�E� #$40� STA $07C0�"LDA XP��$ASL A�&ASL A�(ASL A�*ASL A�,ADC #$18

.STA $D000
0LDA YP�#
2ASL A-
4ASL A7
6ASL AA
8ASL AN
:ADC #$32\
<STA $D001i
>LDA #$01w
@STA $D015�
BSTA $D027�
DLDA #$3F�
FSTA $07F8�
HLDA XP��
MLSR A�
RLSR A�
\LSR A�
^LSR A�
a� #$01�
fSTA $D010�
kRTSp; SET CHARACTER TYPE!zSETCHAR LDA XP)�CLC5�ADC XP�A�STA $FBL�LDA YPT�CLC`�ADC YP�m�ADC #$30y�STA $FC��LDA TYPE��LDY #$00��STA ($FB),Y��JSR DISP��JMP LOOP�XUPTYPE INC TYPE�bLDA TYPE�l� #$3F�vSTA TYPE{JSR DISP�JMP LOOP$�DOTYPE DEC TYPE1�LDA TYPE<�� #$3FI�STA TYPEV�JSR DISPc�JMP LOOPv@START LDA #$00�JSTA $D020�TSTA $D021�^STA XP�hSTA YP�rSTA XP��|STA YP���STA TYPE��JSR DISP��LOOP LDA $C5��CMP #$40�BEQ LOOP�CMP #$01"�BEQ SETCHAR/�CMP #$28>�BEQ UPTYPEK�CMP #$2BZ�BEQ DOTYPEg�CMP #$0Ct�BEQ LEFT��CMP #$17��BEQ RIGHT� CMP #$32� BEQ UP� CMP #$37�& BEQ DOWN�0 KLOP LDA $C5�: CMP #$40�D BEQ LOOP�N JMP KLOP
(#LEFT LDA XP�2#BEQ LEFTS$<#DEC XP�1F#JSR DISP>P#JMP LOOPPZ#RIGHT LDA XP�]d#CMP #$13ln#BEQ RIGHTSxx#INC XP���#JSR DISP��#JMP LOOP��#UP LDA YP���#BEQ UPS��#DEC YP���#JSR DISP��#JMP LOOP��#DOWN LDA YP���#CMP #$09��#BEQ DOWNS�#INC YP��#JSR DISP%�#JMP LOOP6%LEFTS LDA XPC&%BEQ LOOPN0%DEC XP[:%JSR DISPhD%JMP LOOPzN%RIGHTS LDA XP�X%CMP #$EC�b%BEQ LOOP�l%INC XP�v%JSR DISP��%JMP LOOP��%UPS LDA YP��%BEQ LOOPTR��%DEC YP��%JSR DISP��%JMP LOOP
�%DOWNS LDA YP�%CMP #$76)�%BEQ LOOPTR4�%INC YPA�%JSR DISPN�%JMP LOOPbH&LOOPTR JMP LOOPq'; SPRITE �}'��$0FC0�$'TXT $A8,$15,0,0,0,0,128,1�.'TXT 0,0,0,0,128,1,0,0�8'TXT 0,0,0,0,0,0,0,0�B'TXT 0,0,0,0,0,0,0,0L'TXT 0,128,1,0,0,0,0,128,1V'TXT 0,0,0,0,$A8,$15,05`'TXT 0,0,0,0,0,0,0,0Mj'TXT 0,0,0,0,0,0,0,0

UHJ@; game designer@[HT@;@0H.@; december '94 .@<H(@..$c000@lH.C; variables@yHZDxp.$cf82@FH$Dyp.$cf83@TH.Dxpb.$cf84@.H8Dypb.$cf85@.HbDtype.$cf86@.HlDxp..$cf87@.HvDyp..$cf88@.H.S; display screen blocks@.H.Sdisp lda xp@.H.Stax@.H.Slda yp@.H.Stay@@I.Sstx xpb@LI.Ssty ypb@&I.Sdisplop jsr dispblock@2I@Tinc xpb@>IJTlda xpb@fITTsec@sI.Tsbc #$14@.I(Tcmp xp@NI2Tbne displop@ZIpTsta xpb@.IzTinc ypb@.IDTlda ypb@.INTsec@.IXTsbc #$0a@.I.Tcmp yp@.I.Tbne displop@.I.Tjmp dfin@.I.Tdispblock lda xpb@.I.Tsta $fb@.I.Tlda ypb@EJ.Tclc@RJ.Tadc #$30@&J.Tcbnoadd sta $fc@kJDUlda #$04 ; ?????????????????????@wJNUsta $fe@CJXUlda xpb@KJ6Usec@VJ@Usbc xp@.JjUasl a@.JtUsta $fd@.J.Ulda ypb@.J.Usec@.J.Usbc yp@.J.Upha@.J.Uasl a@.J.Udbyalop beq dbyafin@.J.Utax@.J.Ulda $fd@.J.Uclc@.J.Uadc #$28@JK.Usta $fd@VK.Ulda $fe@#K.Uadc #$00@/K.Usta $fe@7K.Udex@?K.Utxa@oKHVjmp dbyalop@DKRVdbyafin ldy #$00@TK£Vlda ($fb),y@.K&V. #$3f@.K0Vsta ($fd),y@.K:V.a #$40@.KdViny@.KnVsta ($fd),y@.KxVe. #$c0@.KBVldy #$28@.KLVsta ($fd),y@.KVV.a #$40@.K.Viny@@L.Vsta ($fd),y@PL.Vlda ($fb),y@[L.V. #$80@#L.Vtax@+L.Vpla@3L.Vtay@;L.Vtxa@kL.Vsta $cfe0,y@sL.Vrts@BL.Vdfin lda .@PL.Vsta $0798@.L.V.a #$40@.L.Vsta $0799@.LBW.a #$80@.LLWsta $07c1@.LVWe. #$40@.L Wsta $07c0@.L"Wlda xp.@.L$Wasl a@.L&Wasl a@.L(Wasl a@.L*Wasl a@.L,Wadc #$18@MM.Wsta $d000@YM0Wlda yp.@#M2Wasl a@-M4Wasl a@7M6Wasl a@aM8Wasl a@nM:Wadc #$32@£M<Wsta $d001@IM>Wlda #$01@WM@Wsta $d015@.MbWsta $d027@.MdWlda #$3f@.MfWsta $07f8@.MhWlda xp.@.MmWlsr a@.MrWlsr a@.M£Wlsr a@.M.Wlsr a@.MAW. #$01@.MFWsta $d010@.MKWrts@NNPW; set character type@!NZWsetchar lda xp@)N.Wclc@5N.Wadc xp.@aN.Wsta $fb@lN.Wlda yp@tN.Wclc@.N.Wadc yp.@MN.Wadc #$30@YN.Wsta $fc@.N.Wlda type@.N.Wldy #$00@.N.Wsta ($fb),y@.N.Wjsr disp@.N.Wjmp loop@.Nx[uptype inc type@.NB[lda type@.NL[. #$3f@.NV[sta type@CO.[jsr disp@PO.[jmp loop@$O.[dotype dec type@1O.[lda type@<O.[. #$3f@iO.[sta type@vO.[jsr disp@CO.[jmp loop@VO@.start lda #$00@.Oj.sta $d020@.Ot.sta $d021@.O..sta xp@.OH.sta yp@.OR.sta xp.@.O..sta yp.@.O..sta type@.O..jsr disp@.O..loop lda $c5@.O..cmp #$40@EP..beq loop@RP..cmp #$01@"P..beq setchar@/P..cmp #$28@>P..beq uptype@kP..cmp #$2b@zP..beq dotype@GP..cmp #$0c@TP..beq left@.P..cmp #$17@.P..beq right@.PH cmp #$32@.PR beq up@.P£ cmp #$37@.P& beq down@.P0 klop lda $c5@.P: cmp #$40@.Pd beq loop@.Pn jmp klop@JQ(#left lda xp.@XQ2#beq lefts@$Q<#dec xp.@1Qf#jsr disp@>Qp#jmp loop@pQz#right lda xp.@]QD#cmp #$13@LQN#beq rights@XQX#inc xp.@.Q.#jsr disp@.Q.#jmp loop@.Q.#up lda yp.@.Q.#beq ups@.Q.#dec yp.@.Q.#jsr disp@.Q.#jmp loop@.Q.#down lda yp.@.Q.#cmp #$09@.Q.#beq downs@KR.#inc yp.@XR.#jsr disp@%R.#jmp loop@6R£%lefts lda xp@cR&%beq loop@nR0%dec xp@[R:%jsr disp@HRd%jmp loop@ZRn%rights lda xp@.Rx%cmp #$ec@.RB%beq loop@.RL%inc xp@.RV%jsr disp@.R.%jmp loop@.R.%ups lda yp@.R.%beq looptr@.R.%dec yp@.R.%jsr disp@.R.%jmp loop@MS.%downs lda yp@ZS.%cmp #$76@)S.%beq looptr@4S.%inc yp@aS.%jsr disp@nS.%jmp loop@BSh&looptr jmp loop@QSP'; sprite .@.SZ'..$0fc0@.S$'txt $a8,$15,0,0,0,0,128,1@.S.'txt 0,0,0,0,128,1,0,0@.S8'txt 0,0,0,0,0,0,0,0@.Sb'txt 0,0,0,0,0,0,0,0@CTl'txt 0,128,1,0,0,0,0,128,1@]Tv'txt 0,0,0,0,$a8,$15,0@5T.'txt 0,0,0,0,0,0,0,0@mTJ'txt 0,0,0,0,0,0,0,0@@@

00000000  15 08 0a 00 3b 20 47 41  4d 45 20 44 45 53 49 47  |....; GAME DESIG|
00000010  4e 45 52 00 1b 08 14 00  3b 00 30 08 1e 00 3b 20  |NER.....;.0...; |
00000020  44 45 43 45 4d 42 45 52  20 27 39 34 20 ab 00 3c  |DECEMBER '94 ..<|
00000030  08 28 00 ac b2 24 43 30  30 30 00 4c 08 e8 03 3b  |.(...$C000.L...;|
00000040  20 56 41 52 49 41 42 4c  45 53 00 59 08 1a 04 58  | VARIABLES.Y...X|
00000050  50 b2 24 43 46 38 32 00  66 08 24 04 59 50 b2 24  |P.$CF82.f.$.YP.$|
00000060  43 46 38 33 00 74 08 2e  04 58 50 42 b2 24 43 46  |CF83.t...XPB.$CF|
00000070  38 34 00 82 08 38 04 59  50 42 b2 24 43 46 38 35  |84...8.YPB.$CF85|
00000080  00 91 08 42 04 54 59 50  45 b2 24 43 46 38 36 00  |...B.TYPE.$CF86.|
00000090  9f 08 4c 04 58 50 91 b2  24 43 46 38 37 00 ad 08  |..L.XP..$CF87...|
000000a0  56 04 59 50 91 b2 24 43  46 38 38 00 c9 08 88 13  |V.YP..$CF88.....|
000000b0  3b 20 44 49 53 50 4c 41  59 20 53 43 52 45 45 4e  |; DISPLAY SCREEN|
000000c0  20 42 4c 4f 43 4b 53 00  d9 08 92 13 44 49 53 50  | BLOCKS.....DISP|
000000d0  20 4c 44 41 20 58 50 00  e1 08 b0 13 54 41 58 00  | LDA XP.....TAX.|
000000e0  ec 08 ba 13 4c 44 41 20  59 50 00 f4 08 d8 13 54  |....LDA YP.....T|
000000f0  41 59 00 00 09 e2 13 53  54 58 20 58 50 42 00 0c  |AY.....STX XPB..|
00000100  09 ec 13 53 54 59 20 59  50 42 00 26 09 f6 13 44  |...STY YPB.&...D|
00000110  49 53 50 4c 4f 50 20 4a  53 52 20 44 49 53 50 42  |ISPLOP JSR DISPB|
00000120  4c 4f 43 4b 00 32 09 00  14 49 4e 43 20 58 50 42  |LOCK.2...INC XPB|
00000130  00 3e 09 0a 14 4c 44 41  20 58 50 42 00 46 09 14  |.>...LDA XPB.F..|
00000140  14 53 45 43 00 53 09 1e  14 53 42 43 20 23 24 31  |.SEC.S...SBC #$1|
00000150  34 00 5e 09 28 14 43 4d  50 20 58 50 00 6e 09 32  |4.^.(.CMP XP.n.2|
00000160  14 42 4e 45 20 44 49 53  50 4c 4f 50 00 7a 09 50  |.BNE DISPLOP.z.P|
00000170  14 53 54 41 20 58 50 42  00 86 09 5a 14 49 4e 43  |.STA XPB...Z.INC|
00000180  20 59 50 42 00 92 09 64  14 4c 44 41 20 59 50 42  | YPB...d.LDA YPB|
00000190  00 9a 09 6e 14 53 45 43  00 a7 09 78 14 53 42 43  |...n.SEC...x.SBC|
000001a0  20 23 24 30 41 00 b2 09  82 14 43 4d 50 20 59 50  | #$0A.....CMP YP|
000001b0  00 c2 09 8c 14 42 4e 45  20 44 49 53 50 4c 4f 50  |.....BNE DISPLOP|
000001c0  00 cf 09 96 14 4a 4d 50  20 44 46 49 4e 00 e5 09  |.....JMP DFIN...|
000001d0  a0 14 44 49 53 50 42 4c  4f 43 4b 20 4c 44 41 20  |..DISPBLOCK LDA |
000001e0  58 50 42 00 f1 09 aa 14  53 54 41 20 24 46 42 00  |XPB.....STA $FB.|
000001f0  fd 09 b4 14 4c 44 41 20  59 50 42 00 05 0a e6 14  |....LDA YPB.....|
00000200  43 4c 43 00 12 0a f0 14  41 44 43 20 23 24 33 30  |CLC.....ADC #$30|
00000210  00 26 0a fa 14 43 42 4e  4f 41 44 44 20 53 54 41  |.&...CBNOADD STA|
00000220  20 24 46 43 00 4b 0a 04  15 4c 44 41 20 23 24 30  | $FC.K...LDA #$0|
00000230  34 20 3b 20 3f 3f 3f 3f  3f 3f 3f 3f 3f 3f 3f 3f  |4 ; ????????????|
00000240  3f 3f 3f 3f 3f 3f 3f 3f  3f 00 57 0a 0e 15 53 54  |?????????.W...ST|
00000250  41 20 24 46 45 00 63 0a  18 15 4c 44 41 20 58 50  |A $FE.c...LDA XP|
00000260  42 00 6b 0a 36 15 53 45  43 00 76 0a 40 15 53 42  |B.k.6.SEC.v.@.SB|
00000270  43 20 58 50 00 80 0a 4a  15 41 53 4c 20 41 00 8c  |C XP...J.ASL A..|
00000280  0a 54 15 53 54 41 20 24  46 44 00 98 0a 5e 15 4c  |.T.STA $FD...^.L|
00000290  44 41 20 59 50 42 00 a0  0a 7c 15 53 45 43 00 ab  |DA YPB...|.SEC..|
000002a0  0a 86 15 53 42 43 20 59  50 00 b3 0a 8b 15 50 48  |...SBC YP.....PH|
000002b0  41 00 bd 0a 90 15 41 53  4c 20 41 00 d5 0a 9a 15  |A.....ASL A.....|
000002c0  44 42 59 41 4c 4f 50 20  42 45 51 20 44 42 59 41  |DBYALOP BEQ DBYA|
000002d0  46 49 4e 00 dd 0a a4 15  54 41 58 00 e9 0a ae 15  |FIN.....TAX.....|
000002e0  4c 44 41 20 24 46 44 00  f1 0a b8 15 43 4c 43 00  |LDA $FD.....CLC.|
000002f0  fe 0a c2 15 41 44 43 20  23 24 32 38 00 0a 0b cc  |....ADC #$28....|
00000300  15 53 54 41 20 24 46 44  00 16 0b d6 15 4c 44 41  |.STA $FD.....LDA|
00000310  20 24 46 45 00 23 0b e0  15 41 44 43 20 23 24 30  | $FE.#...ADC #$0|
00000320  30 00 2f 0b ea 15 53 54  41 20 24 46 45 00 37 0b  |0./...STA $FE.7.|
00000330  f4 15 44 45 58 00 3f 0b  fe 15 54 58 41 00 4f 0b  |..DEX.?...TXA.O.|
00000340  08 16 4a 4d 50 20 44 42  59 41 4c 4f 50 00 64 0b  |..JMP DBYALOP.d.|
00000350  12 16 44 42 59 41 46 49  4e 20 4c 44 59 20 23 24  |..DBYAFIN LDY #$|
00000360  30 30 00 74 0b 1c 16 4c  44 41 20 28 24 46 42 29  |00.t...LDA ($FB)|
00000370  2c 59 00 7f 0b 26 16 af  20 23 24 33 46 00 8f 0b  |,Y...&.. #$3F...|
00000380  30 16 53 54 41 20 28 24  46 44 29 2c 59 00 9b 0b  |0.STA ($FD),Y...|
00000390  3a 16 b0 41 20 23 24 34  30 00 a3 0b 44 16 49 4e  |:..A #$40...D.IN|
000003a0  59 00 b3 0b 4e 16 53 54  41 20 28 24 46 44 29 2c  |Y...N.STA ($FD),|
000003b0  59 00 bf 0b 58 16 45 b0  20 23 24 43 30 00 cc 0b  |Y...X.E. #$C0...|
000003c0  62 16 4c 44 59 20 23 24  32 38 00 dc 0b 6c 16 53  |b.LDY #$28...l.S|
000003d0  54 41 20 28 24 46 44 29  2c 59 00 e8 0b 76 16 b0  |TA ($FD),Y...v..|
000003e0  41 20 23 24 34 30 00 f0  0b 80 16 49 4e 59 00 00  |A #$40.....INY..|
000003f0  0c 8a 16 53 54 41 20 28  24 46 44 29 2c 59 00 10  |...STA ($FD),Y..|
00000400  0c 94 16 4c 44 41 20 28  24 46 42 29 2c 59 00 1b  |...LDA ($FB),Y..|
00000410  0c 9e 16 af 20 23 24 38  30 00 23 0c a8 16 54 41  |.... #$80.#...TA|
00000420  58 00 2b 0c b2 16 50 4c  41 00 33 0c bc 16 54 41  |X.+...PLA.3...TA|
00000430  59 00 3b 0c c6 16 54 58  41 00 4b 0c d0 16 53 54  |Y.;...TXA.K...ST|
00000440  41 20 24 43 46 45 30 2c  59 00 53 0c d5 16 52 54  |A $CFE0,Y.S...RT|
00000450  53 00 62 0c da 16 44 46  49 4e 20 4c 44 41 20 dd  |S.b...DFIN LDA .|
00000460  00 70 0c e4 16 53 54 41  20 24 30 37 39 38 00 7c  |.p...STA $0798.||
00000470  0c ee 16 b0 41 20 23 24  34 30 00 8a 0c f8 16 53  |....A #$40.....S|
00000480  54 41 20 24 30 37 39 39  00 96 0c 02 17 b0 41 20  |TA $0799......A |
00000490  23 24 38 30 00 a4 0c 0c  17 53 54 41 20 24 30 37  |#$80.....STA $07|
000004a0  43 31 00 b0 0c 16 17 45  b0 20 23 24 34 30 00 be  |C1.....E. #$40..|
000004b0  0c 20 17 53 54 41 20 24  30 37 43 30 00 ca 0c 22  |. .STA $07C0..."|
000004c0  17 4c 44 41 20 58 50 91  00 d4 0c 24 17 41 53 4c  |.LDA XP....$.ASL|
000004d0  20 41 00 de 0c 26 17 41  53 4c 20 41 00 e8 0c 28  | A...&.ASL A...(|
000004e0  17 41 53 4c 20 41 00 f2  0c 2a 17 41 53 4c 20 41  |.ASL A...*.ASL A|
000004f0  00 ff 0c 2c 17 41 44 43  20 23 24 31 38 00 0d 0d  |...,.ADC #$18...|
00000500  2e 17 53 54 41 20 24 44  30 30 30 00 19 0d 30 17  |..STA $D000...0.|
00000510  4c 44 41 20 59 50 91 00  23 0d 32 17 41 53 4c 20  |LDA YP..#.2.ASL |
00000520  41 00 2d 0d 34 17 41 53  4c 20 41 00 37 0d 36 17  |A.-.4.ASL A.7.6.|
00000530  41 53 4c 20 41 00 41 0d  38 17 41 53 4c 20 41 00  |ASL A.A.8.ASL A.|
00000540  4e 0d 3a 17 41 44 43 20  23 24 33 32 00 5c 0d 3c  |N.:.ADC #$32.\.<|
00000550  17 53 54 41 20 24 44 30  30 31 00 69 0d 3e 17 4c  |.STA $D001.i.>.L|
00000560  44 41 20 23 24 30 31 00  77 0d 40 17 53 54 41 20  |DA #$01.w.@.STA |
00000570  24 44 30 31 35 00 85 0d  42 17 53 54 41 20 24 44  |$D015...B.STA $D|
00000580  30 32 37 00 92 0d 44 17  4c 44 41 20 23 24 33 46  |027...D.LDA #$3F|
00000590  00 a0 0d 46 17 53 54 41  20 24 30 37 46 38 00 ac  |...F.STA $07F8..|
000005a0  0d 48 17 4c 44 41 20 58  50 91 00 b6 0d 4d 17 4c  |.H.LDA XP....M.L|
000005b0  53 52 20 41 00 c0 0d 52  17 4c 53 52 20 41 00 ca  |SR A...R.LSR A..|
000005c0  0d 5c 17 4c 53 52 20 41  00 d4 0d 5e 17 4c 53 52  |.\.LSR A...^.LSR|
000005d0  20 41 00 df 0d 61 17 af  20 23 24 30 31 00 ed 0d  | A...a.. #$01...|
000005e0  66 17 53 54 41 20 24 44  30 31 30 00 f5 0d 6b 17  |f.STA $D010...k.|
000005f0  52 54 53 00 0e 0e 70 17  3b 20 53 45 54 20 43 48  |RTS...p.; SET CH|
00000600  41 52 41 43 54 45 52 20  54 59 50 45 00 21 0e 7a  |ARACTER TYPE.!.z|
00000610  17 53 45 54 43 48 41 52  20 4c 44 41 20 58 50 00  |.SETCHAR LDA XP.|
00000620  29 0e 84 17 43 4c 43 00  35 0e 8e 17 41 44 43 20  |)...CLC.5...ADC |
00000630  58 50 91 00 41 0e 98 17  53 54 41 20 24 46 42 00  |XP..A...STA $FB.|
00000640  4c 0e a2 17 4c 44 41 20  59 50 00 54 0e ac 17 43  |L...LDA YP.T...C|
00000650  4c 43 00 60 0e b6 17 41  44 43 20 59 50 91 00 6d  |LC.`...ADC YP..m|
00000660  0e c0 17 41 44 43 20 23  24 33 30 00 79 0e ca 17  |...ADC #$30.y...|
00000670  53 54 41 20 24 46 43 00  86 0e d4 17 4c 44 41 20  |STA $FC.....LDA |
00000680  54 59 50 45 00 93 0e de  17 4c 44 59 20 23 24 30  |TYPE.....LDY #$0|
00000690  30 00 a3 0e e8 17 53 54  41 20 28 24 46 42 29 2c  |0.....STA ($FB),|
000006a0  59 00 b0 0e f2 17 4a 53  52 20 44 49 53 50 00 bd  |Y.....JSR DISP..|
000006b0  0e fc 17 4a 4d 50 20 4c  4f 4f 50 00 d1 0e 58 1b  |...JMP LOOP...X.|
000006c0  55 50 54 59 50 45 20 49  4e 43 20 54 59 50 45 00  |UPTYPE INC TYPE.|
000006d0  de 0e 62 1b 4c 44 41 20  54 59 50 45 00 e9 0e 6c  |..b.LDA TYPE...l|
000006e0  1b af 20 23 24 33 46 00  f6 0e 76 1b 53 54 41 20  |.. #$3F...v.STA |
000006f0  54 59 50 45 00 03 0f 7b  1b 4a 53 52 20 44 49 53  |TYPE...{.JSR DIS|
00000700  50 00 10 0f 80 1b 4a 4d  50 20 4c 4f 4f 50 00 24  |P.....JMP LOOP.$|
00000710  0f 8a 1b 44 4f 54 59 50  45 20 44 45 43 20 54 59  |...DOTYPE DEC TY|
00000720  50 45 00 31 0f 94 1b 4c  44 41 20 54 59 50 45 00  |PE.1...LDA TYPE.|
00000730  3c 0f 9e 1b af 20 23 24  33 46 00 49 0f a8 1b 53  |<.... #$3F.I...S|
00000740  54 41 20 54 59 50 45 00  56 0f ad 1b 4a 53 52 20  |TA TYPE.V...JSR |
00000750  44 49 53 50 00 63 0f b2  1b 4a 4d 50 20 4c 4f 4f  |DISP.c...JMP LOO|
00000760  50 00 76 0f 40 1f 53 54  41 52 54 20 4c 44 41 20  |P.v.@.START LDA |
00000770  23 24 30 30 00 84 0f 4a  1f 53 54 41 20 24 44 30  |#$00...J.STA $D0|
00000780  32 30 00 92 0f 54 1f 53  54 41 20 24 44 30 32 31  |20...T.STA $D021|
00000790  00 9d 0f 5e 1f 53 54 41  20 58 50 00 a8 0f 68 1f  |...^.STA XP...h.|
000007a0  53 54 41 20 59 50 00 b4  0f 72 1f 53 54 41 20 58  |STA YP...r.STA X|
000007b0  50 91 00 c0 0f 7c 1f 53  54 41 20 59 50 91 00 cd  |P....|.STA YP...|
000007c0  0f 86 1f 53 54 41 20 54  59 50 45 00 da 0f 90 1f  |...STA TYPE.....|
000007d0  4a 53 52 20 44 49 53 50  00 eb 0f 9a 1f 4c 4f 4f  |JSR DISP.....LOO|
000007e0  50 20 4c 44 41 20 24 43  35 00 f8 0f 9c 1f 43 4d  |P LDA $C5.....CM|
000007f0  50 20 23 24 34 30 00 05  10 9e 1f 42 45 51 20 4c  |P #$40.....BEQ L|
00000800  4f 4f 50 00 12 10 a4 1f  43 4d 50 20 23 24 30 31  |OOP.....CMP #$01|
00000810  00 22 10 ae 1f 42 45 51  20 53 45 54 43 48 41 52  |."...BEQ SETCHAR|
00000820  00 2f 10 b8 1f 43 4d 50  20 23 24 32 38 00 3e 10  |./...CMP #$28.>.|
00000830  c2 1f 42 45 51 20 55 50  54 59 50 45 00 4b 10 cc  |..BEQ UPTYPE.K..|
00000840  1f 43 4d 50 20 23 24 32  42 00 5a 10 d6 1f 42 45  |.CMP #$2B.Z...BE|
00000850  51 20 44 4f 54 59 50 45  00 67 10 e0 1f 43 4d 50  |Q DOTYPE.g...CMP|
00000860  20 23 24 30 43 00 74 10  ea 1f 42 45 51 20 4c 45  | #$0C.t...BEQ LE|
00000870  46 54 00 81 10 f4 1f 43  4d 50 20 23 24 31 37 00  |FT.....CMP #$17.|
00000880  8f 10 fe 1f 42 45 51 20  52 49 47 48 54 00 9c 10  |....BEQ RIGHT...|
00000890  08 20 43 4d 50 20 23 24  33 32 00 a7 10 12 20 42  |. CMP #$32.... B|
000008a0  45 51 20 55 50 00 b4 10  1c 20 43 4d 50 20 23 24  |EQ UP.... CMP #$|
000008b0  33 37 00 c1 10 26 20 42  45 51 20 44 4f 57 4e 00  |37...& BEQ DOWN.|
000008c0  d2 10 30 20 4b 4c 4f 50  20 4c 44 41 20 24 43 35  |..0 KLOP LDA $C5|
000008d0  00 df 10 3a 20 43 4d 50  20 23 24 34 30 00 ec 10  |...: CMP #$40...|
000008e0  44 20 42 45 51 20 4c 4f  4f 50 00 f9 10 4e 20 4a  |D BEQ LOOP...N J|
000008f0  4d 50 20 4b 4c 4f 50 00  0a 11 28 23 4c 45 46 54  |MP KLOP...(#LEFT|
00000900  20 4c 44 41 20 58 50 91  00 18 11 32 23 42 45 51  | LDA XP....2#BEQ|
00000910  20 4c 45 46 54 53 00 24  11 3c 23 44 45 43 20 58  | LEFTS.$.<#DEC X|
00000920  50 91 00 31 11 46 23 4a  53 52 20 44 49 53 50 00  |P..1.F#JSR DISP.|
00000930  3e 11 50 23 4a 4d 50 20  4c 4f 4f 50 00 50 11 5a  |>.P#JMP LOOP.P.Z|
00000940  23 52 49 47 48 54 20 4c  44 41 20 58 50 91 00 5d  |#RIGHT LDA XP..]|
00000950  11 64 23 43 4d 50 20 23  24 31 33 00 6c 11 6e 23  |.d#CMP #$13.l.n#|
00000960  42 45 51 20 52 49 47 48  54 53 00 78 11 78 23 49  |BEQ RIGHTS.x.x#I|
00000970  4e 43 20 58 50 91 00 85  11 82 23 4a 53 52 20 44  |NC XP.....#JSR D|
00000980  49 53 50 00 92 11 8c 23  4a 4d 50 20 4c 4f 4f 50  |ISP....#JMP LOOP|
00000990  00 a1 11 96 23 55 50 20  4c 44 41 20 59 50 91 00  |....#UP LDA YP..|
000009a0  ad 11 a0 23 42 45 51 20  55 50 53 00 b9 11 aa 23  |...#BEQ UPS....#|
000009b0  44 45 43 20 59 50 91 00  c6 11 b4 23 4a 53 52 20  |DEC YP.....#JSR |
000009c0  44 49 53 50 00 d3 11 be  23 4a 4d 50 20 4c 4f 4f  |DISP....#JMP LOO|
000009d0  50 00 e4 11 c8 23 44 4f  57 4e 20 4c 44 41 20 59  |P....#DOWN LDA Y|
000009e0  50 91 00 f1 11 d2 23 43  4d 50 20 23 24 30 39 00  |P.....#CMP #$09.|
000009f0  ff 11 dc 23 42 45 51 20  44 4f 57 4e 53 00 0b 12  |...#BEQ DOWNS...|
00000a00  e6 23 49 4e 43 20 59 50  91 00 18 12 f0 23 4a 53  |.#INC YP.....#JS|
00000a10  52 20 44 49 53 50 00 25  12 fa 23 4a 4d 50 20 4c  |R DISP.%..#JMP L|
00000a20  4f 4f 50 00 36 12 1c 25  4c 45 46 54 53 20 4c 44  |OOP.6..%LEFTS LD|
00000a30  41 20 58 50 00 43 12 26  25 42 45 51 20 4c 4f 4f  |A XP.C.&%BEQ LOO|
00000a40  50 00 4e 12 30 25 44 45  43 20 58 50 00 5b 12 3a  |P.N.0%DEC XP.[.:|
00000a50  25 4a 53 52 20 44 49 53  50 00 68 12 44 25 4a 4d  |%JSR DISP.h.D%JM|
00000a60  50 20 4c 4f 4f 50 00 7a  12 4e 25 52 49 47 48 54  |P LOOP.z.N%RIGHT|
00000a70  53 20 4c 44 41 20 58 50  00 87 12 58 25 43 4d 50  |S LDA XP...X%CMP|
00000a80  20 23 24 45 43 00 94 12  62 25 42 45 51 20 4c 4f  | #$EC...b%BEQ LO|
00000a90  4f 50 00 9f 12 6c 25 49  4e 43 20 58 50 00 ac 12  |OP...l%INC XP...|
00000aa0  76 25 4a 53 52 20 44 49  53 50 00 b9 12 80 25 4a  |v%JSR DISP....%J|
00000ab0  4d 50 20 4c 4f 4f 50 00  c8 12 8a 25 55 50 53 20  |MP LOOP....%UPS |
00000ac0  4c 44 41 20 59 50 00 d7  12 94 25 42 45 51 20 4c  |LDA YP....%BEQ L|
00000ad0  4f 4f 50 54 52 00 e2 12  9e 25 44 45 43 20 59 50  |OOPTR....%DEC YP|
00000ae0  00 ef 12 a8 25 4a 53 52  20 44 49 53 50 00 fc 12  |....%JSR DISP...|
00000af0  b2 25 4a 4d 50 20 4c 4f  4f 50 00 0d 13 bc 25 44  |.%JMP LOOP....%D|
00000b00  4f 57 4e 53 20 4c 44 41  20 59 50 00 1a 13 c6 25  |OWNS LDA YP....%|
00000b10  43 4d 50 20 23 24 37 36  00 29 13 d0 25 42 45 51  |CMP #$76.)..%BEQ|
00000b20  20 4c 4f 4f 50 54 52 00  34 13 da 25 49 4e 43 20  | LOOPTR.4..%INC |
00000b30  59 50 00 41 13 e4 25 4a  53 52 20 44 49 53 50 00  |YP.A..%JSR DISP.|
00000b40  4e 13 ee 25 4a 4d 50 20  4c 4f 4f 50 00 62 13 48  |N..%JMP LOOP.b.H|
00000b50  26 4c 4f 4f 50 54 52 20  4a 4d 50 20 4c 4f 4f 50  |&LOOPTR JMP LOOP|
00000b60  00 71 13 10 27 3b 20 53  50 52 49 54 45 20 83 00  |.q..'; SPRITE ..|
00000b70  7d 13 1a 27 ac b2 24 30  46 43 30 00 9b 13 24 27  |}..'..$0FC0...$'|
00000b80  54 58 54 20 24 41 38 2c  24 31 35 2c 30 2c 30 2c  |TXT $A8,$15,0,0,|
00000b90  30 2c 30 2c 31 32 38 2c  31 00 b5 13 2e 27 54 58  |0,0,128,1....'TX|
00000ba0  54 20 30 2c 30 2c 30 2c  30 2c 31 32 38 2c 31 2c  |T 0,0,0,0,128,1,|
00000bb0  30 2c 30 00 cd 13 38 27  54 58 54 20 30 2c 30 2c  |0,0...8'TXT 0,0,|
00000bc0  30 2c 30 2c 30 2c 30 2c  30 2c 30 00 e5 13 42 27  |0,0,0,0,0,0...B'|
00000bd0  54 58 54 20 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |TXT 0,0,0,0,0,0,|
00000be0  30 2c 30 00 03 14 4c 27  54 58 54 20 30 2c 31 32  |0,0...L'TXT 0,12|
00000bf0  38 2c 31 2c 30 2c 30 2c  30 2c 30 2c 31 32 38 2c  |8,1,0,0,0,0,128,|
00000c00  31 00 1d 14 56 27 54 58  54 20 30 2c 30 2c 30 2c  |1...V'TXT 0,0,0,|
00000c10  30 2c 24 41 38 2c 24 31  35 2c 30 00 35 14 60 27  |0,$A8,$15,0.5.`'|
00000c20  54 58 54 20 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |TXT 0,0,0,0,0,0,|
00000c30  30 2c 30 00 4d 14 6a 27  54 58 54 20 30 2c 30 2c  |0,0.M.j'TXT 0,0,|
00000c40  30 2c 30 2c 30 2c 30 2c  30 2c 30 00 00 00        |0,0,0,0,0,0...|
00000c4e