1------- FILE F8SC.asm LEVEL 1 PASS 2
2      1  10000 ????						;;A bankswitching demo for the F8SC scheme.  2 4K banks of ROM + 128 bytes of RAM
3      2  10000 ????						;;By: Rick Skrbina 3/29/09
4      3  10000 ????
5      4  10000 ????				       processor	6502
6------- FILE vcs.h LEVEL 2 PASS 2
7      0  10000 ????				       include	"vcs.h"
8      1  10000 ????						;
9      2  10000 ????						; VCS system equates
10      3  10000 ????						;
11      4  10000 ????						; Vertical blank registers
12      5  10000 ????						;
13      6  10000 ????		00 00	    VSYNC      =	$00
14      7  10000 ????		00 02	    VS_Enable  =	2
15      8  10000 ????						;
16      9  10000 ????		00 01	    VBLANK     =	$01
17     10  10000 ????		00 02	    VB_Enable  =	2
18     11  10000 ????		00 00	    VB_Disable =	0
19     12  10000 ????		00 40	    VB_LatchEnable =	64
20     13  10000 ????		00 00	    VB_LatchDisable =	0
21     14  10000 ????		00 80	    VB_DumpPots =	128
22     15  10000 ????						; I don't know a good name to un-dump the pots,
23     16  10000 ????						; at least that makes sense.
24     17  10000 ????
25     18  10000 ????		00 02	    WSYNC      =	$02
26     19  10000 ????		00 03	    RSYNC      =	$03	;for sadists
27     20  10000 ????						;
28     21  10000 ????						; Size registers for players and missiles
29     22  10000 ????						;
30     23  10000 ????		00 04	    NUSIZ0     =	$04
31     24  10000 ????		00 05	    NUSIZ1     =	$05
32     25  10000 ????		00 00	    P_Single   =	0
33     26  10000 ????		00 01	    P_TwoClose =	1
34     27  10000 ????		00 02	    P_TwoMedium =	2
35     28  10000 ????		00 03	    P_ThreeClose =	3
36     29  10000 ????		00 04	    P_TwoFar   =	4
37     30  10000 ????		00 05	    P_Double   =	5
38     31  10000 ????		00 06	    P_ThreeMedium =	6
39     32  10000 ????		00 07	    P_Quad     =	7
40     33  10000 ????
41     34  10000 ????		00 00	    M_Single   =	$00
42     35  10000 ????		00 10	    M_Double   =	$10
43     36  10000 ????		00 20	    M_Quad     =	$20
44     37  10000 ????		00 40	    M_Oct      =	$40
45     38  10000 ????
46     39  10000 ????						;
47     40  10000 ????						; Color registers
48     41  10000 ????						;
49     42  10000 ????		00 06	    COLUP0     =	$06
50     43  10000 ????		00 07	    COLUP1     =	$07
51     44  10000 ????		00 08	    COLUPF     =	$08
52     45  10000 ????		00 09	    COLUBK     =	$09
53     46  10000 ????
54     47  10000 ????						;
55     48  10000 ????						; Playfield Control
56     49  10000 ????						;
57     50  10000 ????		00 0a	    CTRLPF     =	$0A
58     51  10000 ????		00 01	    PF_Reflect =	$01
59     52  10000 ????		00 02	    PF_Score   =	$02
60     53  10000 ????		00 04	    PF_Priority =	$04
61     54  10000 ????						; Use missile equates to set ball width.
62     55  10000 ????
63     56  10000 ????		00 0b	    REFP0      =	$0B
64     57  10000 ????		00 0c	    REFP1      =	$0C
65     58  10000 ????		00 08	    P_Reflect  =	$08
66     59  10000 ????
67     60  10000 ????		00 0d	    PF0        =	$0D
68     61  10000 ????		00 0e	    PF1        =	$0E
69     62  10000 ????		00 0f	    PF2        =	$0F
70     63  10000 ????		00 10	    RESP0      =	$10
71     64  10000 ????		00 11	    RESP1      =	$11
72     65  10000 ????		00 12	    RESM0      =	$12
73     66  10000 ????		00 13	    RESM1      =	$13
74     67  10000 ????		00 14	    RESBL      =	$14
75     68  10000 ????		00 15	    AUDC0      =	$15
76     69  10000 ????		00 16	    AUDC1      =	$16
77     70  10000 ????		00 17	    AUDF0      =	$17
78     71  10000 ????		00 18	    AUDF1      =	$18
79     72  10000 ????		00 19	    AUDV0      =	$19
80     73  10000 ????		00 1a	    AUDV1      =	$1A	;duh
81     74  10000 ????
82     75  10000 ????						;
83     76  10000 ????						; Players
84     77  10000 ????						;
85     78  10000 ????		00 1b	    GRP0       =	$1B
86     79  10000 ????		00 1c	    GRP1       =	$1C
87     80  10000 ????
88     81  10000 ????						;
89     82  10000 ????						; Single-bit objects
90     83  10000 ????						;
91     84  10000 ????		00 1d	    ENAM0      =	$1D
92     85  10000 ????		00 1e	    ENAM1      =	$1E
93     86  10000 ????		00 1f	    ENABL      =	$1F
94     87  10000 ????		00 02	    M_Enable   =	2
95     88  10000 ????
96     89  10000 ????		00 20	    HMP0       =	$20
97     90  10000 ????		00 21	    HMP1       =	$21
98     91  10000 ????		00 22	    HMM0       =	$22
99     92  10000 ????		00 23	    HMM1       =	$23
100     93  10000 ????		00 24	    HMBL       =	$24
101     94  10000 ????
102     95  10000 ????						; Miscellaneous
103     96  10000 ????		00 25	    VDELP0     =	$25
104     97  10000 ????		00 26	    VDEL01     =	$26
105     98  10000 ????		00 26	    VDELP1     =	$26
106     99  10000 ????		00 27	    VDELBL     =	$27
107    100  10000 ????		00 28	    RESMP0     =	$28
108    101  10000 ????		00 29	    RESMP1     =	$29
109    102  10000 ????		00 2a	    HMOVE      =	$2A
110    103  10000 ????		00 2b	    HMCLR      =	$2B
111    104  10000 ????		00 2c	    CXCLR      =	$2C
112    105  10000 ????		00 30	    CXM0P      =	$30
113    106  10000 ????		00 31	    CXM1P      =	$31
114    107  10000 ????		00 32	    CXP0FB     =	$32
115    108  10000 ????		00 33	    CXP1FB     =	$33
116    109  10000 ????		00 34	    CXM0FB     =	$34
117    110  10000 ????		00 35	    CXM1FB     =	$35
118    111  10000 ????		00 36	    CXBLPF     =	$36
119    112  10000 ????		00 37	    CXPPMM     =	$37
120    113  10000 ????		00 38	    INPT0      =	$38
121    114  10000 ????		00 39	    INPT1      =	$39
122    115  10000 ????		00 3a	    INPT2      =	$3A
123    116  10000 ????		00 3b	    INPT3      =	$3B
124    117  10000 ????		00 3c	    INPT4      =	$3C
125    118  10000 ????		00 3d	    INPT5      =	$3D
126    119  10000 ????
127    120  10000 ????						;
128    121  10000 ????						; Switch A equates.
129    122  10000 ????						;
130    123  10000 ????						; There are more elegant ways than using all eight of these.  :-)
131    124  10000 ????						;
132    125  10000 ????		02 80	    SWCHA      =	$0280
133    126  10000 ????		00 80	    J0_Right   =	$80
134    127  10000 ????		00 40	    J0_Left    =	$40
135    128  10000 ????		00 20	    J0_Down    =	$20
136    129  10000 ????		00 10	    J0_Up      =	$10
137    130  10000 ????		00 08	    J1_Right   =	$08
138    131  10000 ????		00 04	    J1_Left    =	$04
139    132  10000 ????		00 02	    J1_Down    =	$02
140    133  10000 ????		00 01	    J1_up      =	$01
141    134  10000 ????						;
142    135  10000 ????						; Switch B equates
143    136  10000 ????						;
144    137  10000 ????		02 82	    SWCHB      =	$0282
145    138  10000 ????		00 80	    P0_Diff    =	$80
146    139  10000 ????		00 40	    P1_Diff    =	$40
147    140  10000 ????		00 08	    Con_Color  =	$08
148    141  10000 ????		00 02	    Con_Select =	$02
149    142  10000 ????		00 01	    Con_Start  =	$01
150    143  10000 ????
151    144  10000 ????						;
152    145  10000 ????						; Timer
153    146  10000 ????						;
154    147  10000 ????		02 80	    SWCHA      =	$0280
155    148  10000 ????		02 81	    SWACNT     =	$0281
156    149  10000 ????		02 82	    SWCHB      =	$0282
157    150  10000 ????		02 83	    SWBCNT     =	$0283
158    151  10000 ????		02 84	    INTIM      =	$0284
159    152  10000 ????		02 94	    TIM1T      =	$0294
160    153  10000 ????		02 95	    TIM8T      =	$0295
161    154  10000 ????		02 96	    TIM64T     =	$0296
162    155  10000 ????		02 97	    TIM1024T   =	$0297
163    156  10000 ????
164    157  10000 ????
165------- FILE F8SC.asm
166------- FILE macro.h LEVEL 2 PASS 2
167      0  10000 ????				       include	"macro.h"
168      1  10000 ????						; MACRO.H
169      2  10000 ????						; Version 1.06, 3/SEPTEMBER/2004
170      3  10000 ????
171      4  10000 ????		00 6a	    VERSION_MACRO =	106
172      5  10000 ????
173      6  10000 ????						;
174      7  10000 ????						; THIS FILE IS EXPLICITLY SUPPORTED AS A DASM-PREFERRED COMPANION FILE
175      8  10000 ????						; PLEASE DO *NOT* REDISTRIBUTE MODIFIED VERSIONS OF THIS FILE!
176      9  10000 ????						;
177     10  10000 ????						; This file defines DASM macros useful for development for the Atari 2600.
178     11  10000 ????						; It is distributed as a companion machine-specific support package
179     12  10000 ????						; for the DASM compiler. Updates to this file, DASM, and associated tools are
180     13  10000 ????						; available at at http://www.atari2600.org/dasm
181     14  10000 ????						;
182     15  10000 ????						; Many thanks to the people who have contributed.  If you take issue with the
183     16  10000 ????						; contents, or would like to add something, please write to me
184     17  10000 ????						; (atari2600@taswegian.com) with your contribution.
185     18  10000 ????						;
186     19  10000 ????						; Latest Revisions...
187     20  10000 ????						;
188     21  10000 ????						; 1.06  03/SEP/2004	 - nice revision of VERTICAL_BLANK (Edwin Blink)
189     22  10000 ????						; 1.05  14/NOV/2003	 - Added VERSION_MACRO equate (which will reflect 100x version #)
190     23  10000 ????						;			   This will allow conditional code to verify MACRO.H being
191     24  10000 ????						;			   used for code assembly.
192     25  10000 ????						; 1.04  13/NOV/2003	 - SET_POINTER macro added (16-bit address load)
193     26  10000 ????						;
194     27  10000 ????						; 1.03  23/JUN/2003	 - CLEAN_START macro added - clears TIA, RAM, registers
195     28  10000 ????						;
196     29  10000 ????						; 1.02  14/JUN/2003	 - VERTICAL_SYNC macro added
197     30  10000 ????						;			   (standardised macro for vertical synch code)
198     31  10000 ????						; 1.01  22/MAR/2003	 - SLEEP macro added.
199     32  10000 ????						;			 - NO_ILLEGAL_OPCODES switch implemented
200     33  10000 ????						; 1.0	22/MAR/2003		Initial release
201     34  10000 ????
202     35  10000 ????						; Note: These macros use illegal opcodes.  To disable illegal opcode usage,
203     36  10000 ????						;   define the symbol NO_ILLEGAL_OPCODES (-DNO_ILLEGAL_OPCODES=1 on command-line).
204     37  10000 ????						;   If you do not allow illegal opcode usage, you must include this file
205     38  10000 ????						;   *after* including VCS.H (as the non-illegal opcodes access hardware
206     39  10000 ????						;   registers and require them to be defined first).
207     40  10000 ????
208     41  10000 ????						; Available macros...
209     42  10000 ????						;   SLEEP n		 - sleep for n cycles
210     43  10000 ????						;   VERTICAL_SYNC	 - correct 3 scanline vertical synch code
211     44  10000 ????						;   CLEAN_START	 - set machine to known state on startup
212     45  10000 ????						;   SET_POINTER	 - load a 16-bit absolute to a 16-bit variable
213     46  10000 ????
214     47  10000 ????						;-------------------------------------------------------------------------------
215     48  10000 ????						; SLEEP duration
216     49  10000 ????						; Original author: Thomas Jentzsch
217     50  10000 ????						; Inserts code which takes the specified number of cycles to execute.	This is
218     51  10000 ????						; useful for code where precise timing is required.
219     52  10000 ????						; ILLEGAL-OPCODE VERSION DOES NOT AFFECT FLAGS OR REGISTERS.
220     53  10000 ????						; LEGAL OPCODE VERSION MAY AFFECT FLAGS
221     54  10000 ????						; Uses illegal opcode (DASM 2.20.01 onwards).
222     55  10000 ????
223     56  10000 ????				       MAC	sleep
224     57  10000 ????			    .CYCLES    SET	{1}
225     58  10000 ????
226     59  10000 ????				       IF	.CYCLES < 2
227     60  10000 ????				       ECHO	"MACRO ERROR: 'SLEEP': Duration must be > 1"
228     61  10000 ????				       ERR
229     62  10000 ????				       ENDIF
230     63  10000 ????
231     64  10000 ????				       IF	.CYCLES & 1
232     65  10000 ????				       IFNCONST	NO_ILLEGAL_OPCODES
233     66  10000 ????				       nop	0
234     67  10000 ????				       ELSE
235     68  10000 ????				       bit	VSYNC
236     69  10000 ????				       ENDIF
237     70  10000 ????			    .CYCLES    SET	.CYCLES - 3
238     71  10000 ????				       ENDIF
239     72  10000 ????
240     73  10000 ????				       REPEAT	.CYCLES / 2
241     74  10000 ????				       nop
242     75  10000 ????				       REPEND
243     76  10000 ????				       ENDM		;usage: SLEEP n (n>1)
244     77  10000 ????
245     78  10000 ????						;-------------------------------------------------------------------------------
246     79  10000 ????						; VERTICAL_SYNC
247     80  10000 ????						; revised version by Edwin Blink -- saves bytes!
248     81  10000 ????						; Inserts the code required for a proper 3 scanline vertical sync sequence
249     82  10000 ????						; Note: Alters the accumulator
250     83  10000 ????
251     84  10000 ????						; OUT: A = 0
252     85  10000 ????
253     86  10000 ????				       MAC	vertical_sync
254     87  10000 ????				       lda	#%1110	; each '1' bits generate a VSYNC ON line (bits 1..3)
255     88  10000 ????			    .VSLP1     sta	WSYNC	; 1st '0' bit resets Vsync, 2nd '0' bit exit loop
256     89  10000 ????				       sta	VSYNC
257     90  10000 ????				       lsr
258     91  10000 ????				       bne	.VSLP1	; branch until VYSNC has been reset
259     92  10000 ????				       ENDM
260     93  10000 ????
261     94  10000 ????						;-------------------------------------------------------------------------------
262     95  10000 ????						; CLEAN_START
263     96  10000 ????						; Original author: Andrew Davie
264     97  10000 ????						; Standardised start-up code, clears stack, all TIA registers and RAM to 0
265     98  10000 ????						; Sets stack pointer to $FF, and all registers to 0
266     99  10000 ????						; Sets decimal mode off, sets interrupt flag (kind of un-necessary)
267    100  10000 ????						; Use as very first section of code on boot (ie: at reset)
268    101  10000 ????						; Code written to minimise total ROM usage - uses weird 6502 knowledge :)
269    102  10000 ????
270    103  10000 ????				       MAC	clean_start
271    104  10000 ????				       sei
272    105  10000 ????				       cld
273    106  10000 ????
274    107  10000 ????				       ldx	#0
275    108  10000 ????				       txa
276    109  10000 ????				       tay
277    110  10000 ????			    .CLEAR_STACK dex
278    111  10000 ????				       txs
279    112  10000 ????				       pha
280    113  10000 ????				       bne	.CLEAR_STACK	; SP=$FF, X = A = Y = 0
281    114  10000 ????
282    115  10000 ????				       ENDM
283    116  10000 ????
284    117  10000 ????						;-------------------------------------------------------
285    118  10000 ????						; SET_POINTER
286    119  10000 ????						; Original author: Manuel Rotschkar
287    120  10000 ????						;
288    121  10000 ????						; Sets a 2 byte RAM pointer to an absolute address.
289    122  10000 ????						;
290    123  10000 ????						; Usage: SET_POINTER pointer, address
291    124  10000 ????						; Example: SET_POINTER SpritePTR, SpriteData
292    125  10000 ????						;
293    126  10000 ????						; Note: Alters the accumulator, NZ flags
294    127  10000 ????						; IN 1: 2 byte RAM location reserved for pointer
295    128  10000 ????						; IN 2: absolute address
296    129  10000 ????
297    130  10000 ????				       MAC	set_pointer
298    131  10000 ????			    .POINTER   SET	{1}
299    132  10000 ????			    .ADDRESS   SET	{2}
300    133  10000 ????
301    134  10000 ????				       LDA	#<.ADDRESS	; Get Lowbyte of Address
302    135  10000 ????				       STA	.POINTER	; Store in pointer
303    136  10000 ????				       LDA	#>.ADDRESS	; Get Hibyte of Address
304    137  10000 ????				       STA	.POINTER+1	; Store in pointer+1
305    138  10000 ????
306    139  10000 ????				       ENDM
307    140  10000 ????
308    141  10000 ????						;-------------------------------------------------------
309    142  10000 ????						; BOUNDARY byte#
310    143  10000 ????						; Original author: Denis Debro (borrowed from Bob Smith / Thomas)
311    144  10000 ????						;
312    145  10000 ????						; Push data to a certain position inside a page and keep count of how
313    146  10000 ????						; many free bytes the programmer will have.
314    147  10000 ????						;
315    148  10000 ????						; eg: BOUNDARY 5    ; position at byte #5 in page
316    149  10000 ????
317    150  10000 ????			    __DASM__TOTAL_FREE_MEMORY SET	0
318    151  10000 ????			    .FREE_BYTES SET	0
319    152  10000 ????				       MAC	boundary
320    153  10000 ????				       REPEAT	256
321    154  10000 ????				       IF	<. % {1} = 0
322    155  10000 ????				       MEXIT
323    156  10000 ????				       ELSE
324    157  10000 ????			    .FREE_BYTES SET	.FREE_BYTES + 1
325    158  10000 ????				       .byte	$00
326    159  10000 ????				       ENDIF
327    160  10000 ????				       REPEND
328    161  10000 ????			    __DASM__TOTAL_FREE_MEMORY SET	__DASM__TOTAL_FREE_MEMORY + .FREE_BYTES
329    162  10000 ????				       ENDM
330    163  10000 ????
331    164  10000 ????
332    165  10000 ????						; EOF
333------- FILE F8SC.asm
334      7  10000 ????
335      8  10000 ????		10 80	    PF_Color_Read equ	PF_Color_Write+128
336      9 U0080 ????				      seg.u	vars
337     10 U0080					      org	$80
338     11 U0080
339     12 U0080
340     13 U0080
341     14 U1001 ????				      seg.u	SC_RAM_vars
342     15 U1000					      org	$1000
343     16 U1000		       00	   PF_Color_Write ds	1
344     17 U1001
345     18  f000 ????				      seg	Bank_0
346     19  f000 ????
347     20  e000					      org	$E000
348     21  e000					      rorg	$F000
349     22  e000
350     23  e000					      repeat	256
351     24  e000		       00		      .byte.b	$00
352     23  e000					      repend
353     24  e001		       00		      .byte.b	$00
354     23  e001					      repend
355     24  e002		       00		      .byte.b	$00
356     23  e002					      repend
357     24  e003		       00		      .byte.b	$00
358     23  e003					      repend
359     24  e004		       00		      .byte.b	$00
360     23  e004					      repend
361     24  e005		       00		      .byte.b	$00
362     23  e005					      repend
363     24  e006		       00		      .byte.b	$00
364     23  e006					      repend
365     24  e007		       00		      .byte.b	$00
366     23  e007					      repend
367     24  e008		       00		      .byte.b	$00
368     23  e008					      repend
369     24  e009		       00		      .byte.b	$00
370     23  e009					      repend
371     24  e00a		       00		      .byte.b	$00
372     23  e00a					      repend
373     24  e00b		       00		      .byte.b	$00
374     23  e00b					      repend
375     24  e00c		       00		      .byte.b	$00
376     23  e00c					      repend
377     24  e00d		       00		      .byte.b	$00
378     23  e00d					      repend
379     24  e00e		       00		      .byte.b	$00
380     23  e00e					      repend
381     24  e00f		       00		      .byte.b	$00
382     23  e00f					      repend
383     24  e010		       00		      .byte.b	$00
384     23  e010					      repend
385     24  e011		       00		      .byte.b	$00
386     23  e011					      repend
387     24  e012		       00		      .byte.b	$00
388     23  e012					      repend
389     24  e013		       00		      .byte.b	$00
390     23  e013					      repend
391     24  e014		       00		      .byte.b	$00
392     23  e014					      repend
393     24  e015		       00		      .byte.b	$00
394     23  e015					      repend
395     24  e016		       00		      .byte.b	$00
396     23  e016					      repend
397     24  e017		       00		      .byte.b	$00
398     23  e017					      repend
399     24  e018		       00		      .byte.b	$00
400     23  e018					      repend
401     24  e019		       00		      .byte.b	$00
402     23  e019					      repend
403     24  e01a		       00		      .byte.b	$00
404     23  e01a					      repend
405     24  e01b		       00		      .byte.b	$00
406     23  e01b					      repend
407     24  e01c		       00		      .byte.b	$00
408     23  e01c					      repend
409     24  e01d		       00		      .byte.b	$00
410     23  e01d					      repend
411     24  e01e		       00		      .byte.b	$00
412     23  e01e					      repend
413     24  e01f		       00		      .byte.b	$00
414     23  e01f					      repend
415     24  e020		       00		      .byte.b	$00
416     23  e020					      repend
417     24  e021		       00		      .byte.b	$00
418     23  e021					      repend
419     24  e022		       00		      .byte.b	$00
420     23  e022					      repend
421     24  e023		       00		      .byte.b	$00
422     23  e023					      repend
423     24  e024		       00		      .byte.b	$00
424     23  e024					      repend
425     24  e025		       00		      .byte.b	$00
426     23  e025					      repend
427     24  e026		       00		      .byte.b	$00
428     23  e026					      repend
429     24  e027		       00		      .byte.b	$00
430     23  e027					      repend
431     24  e028		       00		      .byte.b	$00
432     23  e028					      repend
433     24  e029		       00		      .byte.b	$00
434     23  e029					      repend
435     24  e02a		       00		      .byte.b	$00
436     23  e02a					      repend
437     24  e02b		       00		      .byte.b	$00
438     23  e02b					      repend
439     24  e02c		       00		      .byte.b	$00
440     23  e02c					      repend
441     24  e02d		       00		      .byte.b	$00
442     23  e02d					      repend
443     24  e02e		       00		      .byte.b	$00
444     23  e02e					      repend
445     24  e02f		       00		      .byte.b	$00
446     23  e02f					      repend
447     24  e030		       00		      .byte.b	$00
448     23  e030					      repend
449     24  e031		       00		      .byte.b	$00
450     23  e031					      repend
451     24  e032		       00		      .byte.b	$00
452     23  e032					      repend
453     24  e033		       00		      .byte.b	$00
454     23  e033					      repend
455     24  e034		       00		      .byte.b	$00
456     23  e034					      repend
457     24  e035		       00		      .byte.b	$00
458     23  e035					      repend
459     24  e036		       00		      .byte.b	$00
460     23  e036					      repend
461     24  e037		       00		      .byte.b	$00
462     23  e037					      repend
463     24  e038		       00		      .byte.b	$00
464     23  e038					      repend
465     24  e039		       00		      .byte.b	$00
466     23  e039					      repend
467     24  e03a		       00		      .byte.b	$00
468     23  e03a					      repend
469     24  e03b		       00		      .byte.b	$00
470     23  e03b					      repend
471     24  e03c		       00		      .byte.b	$00
472     23  e03c					      repend
473     24  e03d		       00		      .byte.b	$00
474     23  e03d					      repend
475     24  e03e		       00		      .byte.b	$00
476     23  e03e					      repend
477     24  e03f		       00		      .byte.b	$00
478     23  e03f					      repend
479     24  e040		       00		      .byte.b	$00
480     23  e040					      repend
481     24  e041		       00		      .byte.b	$00
482     23  e041					      repend
483     24  e042		       00		      .byte.b	$00
484     23  e042					      repend
485     24  e043		       00		      .byte.b	$00
486     23  e043					      repend
487     24  e044		       00		      .byte.b	$00
488     23  e044					      repend
489     24  e045		       00		      .byte.b	$00
490     23  e045					      repend
491     24  e046		       00		      .byte.b	$00
492     23  e046					      repend
493     24  e047		       00		      .byte.b	$00
494     23  e047					      repend
495     24  e048		       00		      .byte.b	$00
496     23  e048					      repend
497     24  e049		       00		      .byte.b	$00
498     23  e049					      repend
499     24  e04a		       00		      .byte.b	$00
500     23  e04a					      repend
501     24  e04b		       00		      .byte.b	$00
502     23  e04b					      repend
503     24  e04c		       00		      .byte.b	$00
504     23  e04c					      repend
505     24  e04d		       00		      .byte.b	$00
506     23  e04d					      repend
507     24  e04e		       00		      .byte.b	$00
508     23  e04e					      repend
509     24  e04f		       00		      .byte.b	$00
510     23  e04f					      repend
511     24  e050		       00		      .byte.b	$00
512     23  e050					      repend
513     24  e051		       00		      .byte.b	$00
514     23  e051					      repend
515     24  e052		       00		      .byte.b	$00
516     23  e052					      repend
517     24  e053		       00		      .byte.b	$00
518     23  e053					      repend
519     24  e054		       00		      .byte.b	$00
520     23  e054					      repend
521     24  e055		       00		      .byte.b	$00
522     23  e055					      repend
523     24  e056		       00		      .byte.b	$00
524     23  e056					      repend
525     24  e057		       00		      .byte.b	$00
526     23  e057					      repend
527     24  e058		       00		      .byte.b	$00
528     23  e058					      repend
529     24  e059		       00		      .byte.b	$00
530     23  e059					      repend
531     24  e05a		       00		      .byte.b	$00
532     23  e05a					      repend
533     24  e05b		       00		      .byte.b	$00
534     23  e05b					      repend
535     24  e05c		       00		      .byte.b	$00
536     23  e05c					      repend
537     24  e05d		       00		      .byte.b	$00
538     23  e05d					      repend
539     24  e05e		       00		      .byte.b	$00
540     23  e05e					      repend
541     24  e05f		       00		      .byte.b	$00
542     23  e05f					      repend
543     24  e060		       00		      .byte.b	$00
544     23  e060					      repend
545     24  e061		       00		      .byte.b	$00
546     23  e061					      repend
547     24  e062		       00		      .byte.b	$00
548     23  e062					      repend
549     24  e063		       00		      .byte.b	$00
550     23  e063					      repend
551     24  e064		       00		      .byte.b	$00
552     23  e064					      repend
553     24  e065		       00		      .byte.b	$00
554     23  e065					      repend
555     24  e066		       00		      .byte.b	$00
556     23  e066					      repend
557     24  e067		       00		      .byte.b	$00
558     23  e067					      repend
559     24  e068		       00		      .byte.b	$00
560     23  e068					      repend
561     24  e069		       00		      .byte.b	$00
562     23  e069					      repend
563     24  e06a		       00		      .byte.b	$00
564     23  e06a					      repend
565     24  e06b		       00		      .byte.b	$00
566     23  e06b					      repend
567     24  e06c		       00		      .byte.b	$00
568     23  e06c					      repend
569     24  e06d		       00		      .byte.b	$00
570     23  e06d					      repend
571     24  e06e		       00		      .byte.b	$00
572     23  e06e					      repend
573     24  e06f		       00		      .byte.b	$00
574     23  e06f					      repend
575     24  e070		       00		      .byte.b	$00
576     23  e070					      repend
577     24  e071		       00		      .byte.b	$00
578     23  e071					      repend
579     24  e072		       00		      .byte.b	$00
580     23  e072					      repend
581     24  e073		       00		      .byte.b	$00
582     23  e073					      repend
583     24  e074		       00		      .byte.b	$00
584     23  e074					      repend
585     24  e075		       00		      .byte.b	$00
586     23  e075					      repend
587     24  e076		       00		      .byte.b	$00
588     23  e076					      repend
589     24  e077		       00		      .byte.b	$00
590     23  e077					      repend
591     24  e078		       00		      .byte.b	$00
592     23  e078					      repend
593     24  e079		       00		      .byte.b	$00
594     23  e079					      repend
595     24  e07a		       00		      .byte.b	$00
596     23  e07a					      repend
597     24  e07b		       00		      .byte.b	$00
598     23  e07b					      repend
599     24  e07c		       00		      .byte.b	$00
600     23  e07c					      repend
601     24  e07d		       00		      .byte.b	$00
602     23  e07d					      repend
603     24  e07e		       00		      .byte.b	$00
604     23  e07e					      repend
605     24  e07f		       00		      .byte.b	$00
606     23  e07f					      repend
607     24  e080		       00		      .byte.b	$00
608     23  e080					      repend
609     24  e081		       00		      .byte.b	$00
610     23  e081					      repend
611     24  e082		       00		      .byte.b	$00
612     23  e082					      repend
613     24  e083		       00		      .byte.b	$00
614     23  e083					      repend
615     24  e084		       00		      .byte.b	$00
616     23  e084					      repend
617     24  e085		       00		      .byte.b	$00
618     23  e085					      repend
619     24  e086		       00		      .byte.b	$00
620     23  e086					      repend
621     24  e087		       00		      .byte.b	$00
622     23  e087					      repend
623     24  e088		       00		      .byte.b	$00
624     23  e088					      repend
625     24  e089		       00		      .byte.b	$00
626     23  e089					      repend
627     24  e08a		       00		      .byte.b	$00
628     23  e08a					      repend
629     24  e08b		       00		      .byte.b	$00
630     23  e08b					      repend
631     24  e08c		       00		      .byte.b	$00
632     23  e08c					      repend
633     24  e08d		       00		      .byte.b	$00
634     23  e08d					      repend
635     24  e08e		       00		      .byte.b	$00
636     23  e08e					      repend
637     24  e08f		       00		      .byte.b	$00
638     23  e08f					      repend
639     24  e090		       00		      .byte.b	$00
640     23  e090					      repend
641     24  e091		       00		      .byte.b	$00
642     23  e091					      repend
643     24  e092		       00		      .byte.b	$00
644     23  e092					      repend
645     24  e093		       00		      .byte.b	$00
646     23  e093					      repend
647     24  e094		       00		      .byte.b	$00
648     23  e094					      repend
649     24  e095		       00		      .byte.b	$00
650     23  e095					      repend
651     24  e096		       00		      .byte.b	$00
652     23  e096					      repend
653     24  e097		       00		      .byte.b	$00
654     23  e097					      repend
655     24  e098		       00		      .byte.b	$00
656     23  e098					      repend
657     24  e099		       00		      .byte.b	$00
658     23  e099					      repend
659     24  e09a		       00		      .byte.b	$00
660     23  e09a					      repend
661     24  e09b		       00		      .byte.b	$00
662     23  e09b					      repend
663     24  e09c		       00		      .byte.b	$00
664     23  e09c					      repend
665     24  e09d		       00		      .byte.b	$00
666     23  e09d					      repend
667     24  e09e		       00		      .byte.b	$00
668     23  e09e					      repend
669     24  e09f		       00		      .byte.b	$00
670     23  e09f					      repend
671     24  e0a0		       00		      .byte.b	$00
672     23  e0a0					      repend
673     24  e0a1		       00		      .byte.b	$00
674     23  e0a1					      repend
675     24  e0a2		       00		      .byte.b	$00
676     23  e0a2					      repend
677     24  e0a3		       00		      .byte.b	$00
678     23  e0a3					      repend
679     24  e0a4		       00		      .byte.b	$00
680     23  e0a4					      repend
681     24  e0a5		       00		      .byte.b	$00
682     23  e0a5					      repend
683     24  e0a6		       00		      .byte.b	$00
684     23  e0a6					      repend
685     24  e0a7		       00		      .byte.b	$00
686     23  e0a7					      repend
687     24  e0a8		       00		      .byte.b	$00
688     23  e0a8					      repend
689     24  e0a9		       00		      .byte.b	$00
690     23  e0a9					      repend
691     24  e0aa		       00		      .byte.b	$00
692     23  e0aa					      repend
693     24  e0ab		       00		      .byte.b	$00
694     23  e0ab					      repend
695     24  e0ac		       00		      .byte.b	$00
696     23  e0ac					      repend
697     24  e0ad		       00		      .byte.b	$00
698     23  e0ad					      repend
699     24  e0ae		       00		      .byte.b	$00
700     23  e0ae					      repend
701     24  e0af		       00		      .byte.b	$00
702     23  e0af					      repend
703     24  e0b0		       00		      .byte.b	$00
704     23  e0b0					      repend
705     24  e0b1		       00		      .byte.b	$00
706     23  e0b1					      repend
707     24  e0b2		       00		      .byte.b	$00
708     23  e0b2					      repend
709     24  e0b3		       00		      .byte.b	$00
710     23  e0b3					      repend
711     24  e0b4		       00		      .byte.b	$00
712     23  e0b4					      repend
713     24  e0b5		       00		      .byte.b	$00
714     23  e0b5					      repend
715     24  e0b6		       00		      .byte.b	$00
716     23  e0b6					      repend
717     24  e0b7		       00		      .byte.b	$00
718     23  e0b7					      repend
719     24  e0b8		       00		      .byte.b	$00
720     23  e0b8					      repend
721     24  e0b9		       00		      .byte.b	$00
722     23  e0b9					      repend
723     24  e0ba		       00		      .byte.b	$00
724     23  e0ba					      repend
725     24  e0bb		       00		      .byte.b	$00
726     23  e0bb					      repend
727     24  e0bc		       00		      .byte.b	$00
728     23  e0bc					      repend
729     24  e0bd		       00		      .byte.b	$00
730     23  e0bd					      repend
731     24  e0be		       00		      .byte.b	$00
732     23  e0be					      repend
733     24  e0bf		       00		      .byte.b	$00
734     23  e0bf					      repend
735     24  e0c0		       00		      .byte.b	$00
736     23  e0c0					      repend
737     24  e0c1		       00		      .byte.b	$00
738     23  e0c1					      repend
739     24  e0c2		       00		      .byte.b	$00
740     23  e0c2					      repend
741     24  e0c3		       00		      .byte.b	$00
742     23  e0c3					      repend
743     24  e0c4		       00		      .byte.b	$00
744     23  e0c4					      repend
745     24  e0c5		       00		      .byte.b	$00
746     23  e0c5					      repend
747     24  e0c6		       00		      .byte.b	$00
748     23  e0c6					      repend
749     24  e0c7		       00		      .byte.b	$00
750     23  e0c7					      repend
751     24  e0c8		       00		      .byte.b	$00
752     23  e0c8					      repend
753     24  e0c9		       00		      .byte.b	$00
754     23  e0c9					      repend
755     24  e0ca		       00		      .byte.b	$00
756     23  e0ca					      repend
757     24  e0cb		       00		      .byte.b	$00
758     23  e0cb					      repend
759     24  e0cc		       00		      .byte.b	$00
760     23  e0cc					      repend
761     24  e0cd		       00		      .byte.b	$00
762     23  e0cd					      repend
763     24  e0ce		       00		      .byte.b	$00
764     23  e0ce					      repend
765     24  e0cf		       00		      .byte.b	$00
766     23  e0cf					      repend
767     24  e0d0		       00		      .byte.b	$00
768     23  e0d0					      repend
769     24  e0d1		       00		      .byte.b	$00
770     23  e0d1					      repend
771     24  e0d2		       00		      .byte.b	$00
772     23  e0d2					      repend
773     24  e0d3		       00		      .byte.b	$00
774     23  e0d3					      repend
775     24  e0d4		       00		      .byte.b	$00
776     23  e0d4					      repend
777     24  e0d5		       00		      .byte.b	$00
778     23  e0d5					      repend
779     24  e0d6		       00		      .byte.b	$00
780     23  e0d6					      repend
781     24  e0d7		       00		      .byte.b	$00
782     23  e0d7					      repend
783     24  e0d8		       00		      .byte.b	$00
784     23  e0d8					      repend
785     24  e0d9		       00		      .byte.b	$00
786     23  e0d9					      repend
787     24  e0da		       00		      .byte.b	$00
788     23  e0da					      repend
789     24  e0db		       00		      .byte.b	$00
790     23  e0db					      repend
791     24  e0dc		       00		      .byte.b	$00
792     23  e0dc					      repend
793     24  e0dd		       00		      .byte.b	$00
794     23  e0dd					      repend
795     24  e0de		       00		      .byte.b	$00
796     23  e0de					      repend
797     24  e0df		       00		      .byte.b	$00
798     23  e0df					      repend
799     24  e0e0		       00		      .byte.b	$00
800     23  e0e0					      repend
801     24  e0e1		       00		      .byte.b	$00
802     23  e0e1					      repend
803     24  e0e2		       00		      .byte.b	$00
804     23  e0e2					      repend
805     24  e0e3		       00		      .byte.b	$00
806     23  e0e3					      repend
807     24  e0e4		       00		      .byte.b	$00
808     23  e0e4					      repend
809     24  e0e5		       00		      .byte.b	$00
810     23  e0e5					      repend
811     24  e0e6		       00		      .byte.b	$00
812     23  e0e6					      repend
813     24  e0e7		       00		      .byte.b	$00
814     23  e0e7					      repend
815     24  e0e8		       00		      .byte.b	$00
816     23  e0e8					      repend
817     24  e0e9		       00		      .byte.b	$00
818     23  e0e9					      repend
819     24  e0ea		       00		      .byte.b	$00
820     23  e0ea					      repend
821     24  e0eb		       00		      .byte.b	$00
822     23  e0eb					      repend
823     24  e0ec		       00		      .byte.b	$00
824     23  e0ec					      repend
825     24  e0ed		       00		      .byte.b	$00
826     23  e0ed					      repend
827     24  e0ee		       00		      .byte.b	$00
828     23  e0ee					      repend
829     24  e0ef		       00		      .byte.b	$00
830     23  e0ef					      repend
831     24  e0f0		       00		      .byte.b	$00
832     23  e0f0					      repend
833     24  e0f1		       00		      .byte.b	$00
834     23  e0f1					      repend
835     24  e0f2		       00		      .byte.b	$00
836     23  e0f2					      repend
837     24  e0f3		       00		      .byte.b	$00
838     23  e0f3					      repend
839     24  e0f4		       00		      .byte.b	$00
840     23  e0f4					      repend
841     24  e0f5		       00		      .byte.b	$00
842     23  e0f5					      repend
843     24  e0f6		       00		      .byte.b	$00
844     23  e0f6					      repend
845     24  e0f7		       00		      .byte.b	$00
846     23  e0f7					      repend
847     24  e0f8		       00		      .byte.b	$00
848     23  e0f8					      repend
849     24  e0f9		       00		      .byte.b	$00
850     23  e0f9					      repend
851     24  e0fa		       00		      .byte.b	$00
852     23  e0fa					      repend
853     24  e0fb		       00		      .byte.b	$00
854     23  e0fb					      repend
855     24  e0fc		       00		      .byte.b	$00
856     23  e0fc					      repend
857     24  e0fd		       00		      .byte.b	$00
858     23  e0fd					      repend
859     24  e0fe		       00		      .byte.b	$00
860     23  e0fe					      repend
861     24  e0ff		       00		      .byte.b	$00
862     25  e100					      repend
863     26  e100
864     27  e100				   Start_0
865     28  e100		       ea		      nop
866     29  e101		       ea		      nop
867     30  e102		       ea		      nop
868     31  e103
869      0  e103					      CLEAN_START
870      1  e103		       78		      sei
871      2  e104		       d8		      cld
872      3  e105
873      4  e105		       a2 00		      ldx	#0
874      5  e107		       8a		      txa
875      6  e108		       a8		      tay
876      7  e109		       ca	   .CLEAR_STACK dex
877      8  e10a		       9a		      txs
878      9  e10b		       48		      pha
879     10  e10c		       d0 fb		      bne	.CLEAR_STACK
880     11  e10e
881     33  e10e							;	jsr Call_1
882     34  e10e		       a9 ff		      lda	#$FF
883     35  e110		       85 0e		      sta	PF1
884     36  e112				   StartFrame
885     37  e112		       a9 02		      lda	#2
886     38  e114		       85 01		      sta	VBLANK
887     39  e116		       85 00		      sta	VSYNC
888     40  e118
889     41  e118		       85 02		      sta	WSYNC
890     42  e11a		       85 02		      sta	WSYNC
891     43  e11c		       85 02		      sta	WSYNC
892     44  e11e
893     45  e11e		       a9 00		      lda	#0
894     46  e120		       85 00		      sta	VSYNC
895     47  e122
896     48  e122		       a0 25		      ldy	#37
897     49  e124				   Vert
898     50  e124		       85 02		      sta	WSYNC
899     51  e126		       88		      dey
900     52  e127		       d0 fb		      bne	Vert
901     53  e129
902     54  e129		       a9 00		      lda	#0
903     55  e12b		       85 01		      sta	VBLANK
904     56  e12d
905     57  e12d		       a0 c0		      ldy	#192
906     58  e12f				   Pic
907     59  e12f		       85 02		      sta	WSYNC
908     60  e131		       88		      dey
909     61  e132		       d0 fb		      bne	Pic
910     62  e134
911     63  e134		       a9 02		      lda	#2
912     64  e136		       85 01		      sta	VBLANK
913     65  e138
914     66  e138		       a0 1e		      ldy	#30
915     67  e13a				   Over
916     68  e13a		       85 02		      sta	WSYNC
917     69  e13c		       88		      dey
918     70  e13d		       d0 fb		      bne	Over
919     71  e13f
920     72  e13f		       20 e0 ff 	      jsr	Call_1
921     73  e142
922     74  e142		       ad 80 10 	      lda	PF_Color_Read
923     75  e145		       85 08		      sta	COLUPF
924     76  e147
925     77  e147
926     78  e147		       4c 12 f1 	      jmp	StartFrame
927     79  e14a
928     80  e14a
929     81  e14a
930     82  e14a
931     83  efe0					      org	$EFE0
932     84  efe0					      rorg	$FFE0
933     85  efe0				   Call_1
934     86  efe0		       8e f9 ff 	      stx	$FFF9
935     87  efe3
936     88  efe3		       ea		      nop
937     89  efe4		       ea		      nop
938     90  efe5		       ea		      nop
939     91  efe6		       ea		      nop
940     92  efe7		       ea		      nop
941     93  efe8		       ea		      nop
942     94  efe9
943     95  efe9		       60		      rts
944     96  efea
945     97  eff8					      org	$EFF8
946     98  eff8					      rorg	$FFF8
947     99  eff8		       ff ff		      .word.w	$FFFF
948    100  effa		       00 f1		      .word.w	Start_0
949    101  effc		       00 f1		      .word.w	Start_0
950    102  effe		       00 f1		      .word.w	Start_0
951    103  f000
952    104  10000 ????				       seg	Bank_1
953    105  10000 ????
954    106  f000					      org	$F000
955    107  f000					      rorg	$F000
956    108  f000
957    109  f000					      repeat	256
958    110  f000		       00		      .byte.b	$00
959    109  f000					      repend
960    110  f001		       00		      .byte.b	$00
961    109  f001					      repend
962    110  f002		       00		      .byte.b	$00
963    109  f002					      repend
964    110  f003		       00		      .byte.b	$00
965    109  f003					      repend
966    110  f004		       00		      .byte.b	$00
967    109  f004					      repend
968    110  f005		       00		      .byte.b	$00
969    109  f005					      repend
970    110  f006		       00		      .byte.b	$00
971    109  f006					      repend
972    110  f007		       00		      .byte.b	$00
973    109  f007					      repend
974    110  f008		       00		      .byte.b	$00
975    109  f008					      repend
976    110  f009		       00		      .byte.b	$00
977    109  f009					      repend
978    110  f00a		       00		      .byte.b	$00
979    109  f00a					      repend
980    110  f00b		       00		      .byte.b	$00
981    109  f00b					      repend
982    110  f00c		       00		      .byte.b	$00
983    109  f00c					      repend
984    110  f00d		       00		      .byte.b	$00
985    109  f00d					      repend
986    110  f00e		       00		      .byte.b	$00
987    109  f00e					      repend
988    110  f00f		       00		      .byte.b	$00
989    109  f00f					      repend
990    110  f010		       00		      .byte.b	$00
991    109  f010					      repend
992    110  f011		       00		      .byte.b	$00
993    109  f011					      repend
994    110  f012		       00		      .byte.b	$00
995    109  f012					      repend
996    110  f013		       00		      .byte.b	$00
997    109  f013					      repend
998    110  f014		       00		      .byte.b	$00
999    109  f014					      repend
1000    110  f015		       00		      .byte.b	$00
1001    109  f015					      repend
1002    110  f016		       00		      .byte.b	$00
1003    109  f016					      repend
1004    110  f017		       00		      .byte.b	$00
1005    109  f017					      repend
1006    110  f018		       00		      .byte.b	$00
1007    109  f018					      repend
1008    110  f019		       00		      .byte.b	$00
1009    109  f019					      repend
1010    110  f01a		       00		      .byte.b	$00
1011    109  f01a					      repend
1012    110  f01b		       00		      .byte.b	$00
1013    109  f01b					      repend
1014    110  f01c		       00		      .byte.b	$00
1015    109  f01c					      repend
1016    110  f01d		       00		      .byte.b	$00
1017    109  f01d					      repend
1018    110  f01e		       00		      .byte.b	$00
1019    109  f01e					      repend
1020    110  f01f		       00		      .byte.b	$00
1021    109  f01f					      repend
1022    110  f020		       00		      .byte.b	$00
1023    109  f020					      repend
1024    110  f021		       00		      .byte.b	$00
1025    109  f021					      repend
1026    110  f022		       00		      .byte.b	$00
1027    109  f022					      repend
1028    110  f023		       00		      .byte.b	$00
1029    109  f023					      repend
1030    110  f024		       00		      .byte.b	$00
1031    109  f024					      repend
1032    110  f025		       00		      .byte.b	$00
1033    109  f025					      repend
1034    110  f026		       00		      .byte.b	$00
1035    109  f026					      repend
1036    110  f027		       00		      .byte.b	$00
1037    109  f027					      repend
1038    110  f028		       00		      .byte.b	$00
1039    109  f028					      repend
1040    110  f029		       00		      .byte.b	$00
1041    109  f029					      repend
1042    110  f02a		       00		      .byte.b	$00
1043    109  f02a					      repend
1044    110  f02b		       00		      .byte.b	$00
1045    109  f02b					      repend
1046    110  f02c		       00		      .byte.b	$00
1047    109  f02c					      repend
1048    110  f02d		       00		      .byte.b	$00
1049    109  f02d					      repend
1050    110  f02e		       00		      .byte.b	$00
1051    109  f02e					      repend
1052    110  f02f		       00		      .byte.b	$00
1053    109  f02f					      repend
1054    110  f030		       00		      .byte.b	$00
1055    109  f030					      repend
1056    110  f031		       00		      .byte.b	$00
1057    109  f031					      repend
1058    110  f032		       00		      .byte.b	$00
1059    109  f032					      repend
1060    110  f033		       00		      .byte.b	$00
1061    109  f033					      repend
1062    110  f034		       00		      .byte.b	$00
1063    109  f034					      repend
1064    110  f035		       00		      .byte.b	$00
1065    109  f035					      repend
1066    110  f036		       00		      .byte.b	$00
1067    109  f036					      repend
1068    110  f037		       00		      .byte.b	$00
1069    109  f037					      repend
1070    110  f038		       00		      .byte.b	$00
1071    109  f038					      repend
1072    110  f039		       00		      .byte.b	$00
1073    109  f039					      repend
1074    110  f03a		       00		      .byte.b	$00
1075    109  f03a					      repend
1076    110  f03b		       00		      .byte.b	$00
1077    109  f03b					      repend
1078    110  f03c		       00		      .byte.b	$00
1079    109  f03c					      repend
1080    110  f03d		       00		      .byte.b	$00
1081    109  f03d					      repend
1082    110  f03e		       00		      .byte.b	$00
1083    109  f03e					      repend
1084    110  f03f		       00		      .byte.b	$00
1085    109  f03f					      repend
1086    110  f040		       00		      .byte.b	$00
1087    109  f040					      repend
1088    110  f041		       00		      .byte.b	$00
1089    109  f041					      repend
1090    110  f042		       00		      .byte.b	$00
1091    109  f042					      repend
1092    110  f043		       00		      .byte.b	$00
1093    109  f043					      repend
1094    110  f044		       00		      .byte.b	$00
1095    109  f044					      repend
1096    110  f045		       00		      .byte.b	$00
1097    109  f045					      repend
1098    110  f046		       00		      .byte.b	$00
1099    109  f046					      repend
1100    110  f047		       00		      .byte.b	$00
1101    109  f047					      repend
1102    110  f048		       00		      .byte.b	$00
1103    109  f048					      repend
1104    110  f049		       00		      .byte.b	$00
1105    109  f049					      repend
1106    110  f04a		       00		      .byte.b	$00
1107    109  f04a					      repend
1108    110  f04b		       00		      .byte.b	$00
1109    109  f04b					      repend
1110    110  f04c		       00		      .byte.b	$00
1111    109  f04c					      repend
1112    110  f04d		       00		      .byte.b	$00
1113    109  f04d					      repend
1114    110  f04e		       00		      .byte.b	$00
1115    109  f04e					      repend
1116    110  f04f		       00		      .byte.b	$00
1117    109  f04f					      repend
1118    110  f050		       00		      .byte.b	$00
1119    109  f050					      repend
1120    110  f051		       00		      .byte.b	$00
1121    109  f051					      repend
1122    110  f052		       00		      .byte.b	$00
1123    109  f052					      repend
1124    110  f053		       00		      .byte.b	$00
1125    109  f053					      repend
1126    110  f054		       00		      .byte.b	$00
1127    109  f054					      repend
1128    110  f055		       00		      .byte.b	$00
1129    109  f055					      repend
1130    110  f056		       00		      .byte.b	$00
1131    109  f056					      repend
1132    110  f057		       00		      .byte.b	$00
1133    109  f057					      repend
1134    110  f058		       00		      .byte.b	$00
1135    109  f058					      repend
1136    110  f059		       00		      .byte.b	$00
1137    109  f059					      repend
1138    110  f05a		       00		      .byte.b	$00
1139    109  f05a					      repend
1140    110  f05b		       00		      .byte.b	$00
1141    109  f05b					      repend
1142    110  f05c		       00		      .byte.b	$00
1143    109  f05c					      repend
1144    110  f05d		       00		      .byte.b	$00
1145    109  f05d					      repend
1146    110  f05e		       00		      .byte.b	$00
1147    109  f05e					      repend
1148    110  f05f		       00		      .byte.b	$00
1149    109  f05f					      repend
1150    110  f060		       00		      .byte.b	$00
1151    109  f060					      repend
1152    110  f061		       00		      .byte.b	$00
1153    109  f061					      repend
1154    110  f062		       00		      .byte.b	$00
1155    109  f062					      repend
1156    110  f063		       00		      .byte.b	$00
1157    109  f063					      repend
1158    110  f064		       00		      .byte.b	$00
1159    109  f064					      repend
1160    110  f065		       00		      .byte.b	$00
1161    109  f065					      repend
1162    110  f066		       00		      .byte.b	$00
1163    109  f066					      repend
1164    110  f067		       00		      .byte.b	$00
1165    109  f067					      repend
1166    110  f068		       00		      .byte.b	$00
1167    109  f068					      repend
1168    110  f069		       00		      .byte.b	$00
1169    109  f069					      repend
1170    110  f06a		       00		      .byte.b	$00
1171    109  f06a					      repend
1172    110  f06b		       00		      .byte.b	$00
1173    109  f06b					      repend
1174    110  f06c		       00		      .byte.b	$00
1175    109  f06c					      repend
1176    110  f06d		       00		      .byte.b	$00
1177    109  f06d					      repend
1178    110  f06e		       00		      .byte.b	$00
1179    109  f06e					      repend
1180    110  f06f		       00		      .byte.b	$00
1181    109  f06f					      repend
1182    110  f070		       00		      .byte.b	$00
1183    109  f070					      repend
1184    110  f071		       00		      .byte.b	$00
1185    109  f071					      repend
1186    110  f072		       00		      .byte.b	$00
1187    109  f072					      repend
1188    110  f073		       00		      .byte.b	$00
1189    109  f073					      repend
1190    110  f074		       00		      .byte.b	$00
1191    109  f074					      repend
1192    110  f075		       00		      .byte.b	$00
1193    109  f075					      repend
1194    110  f076		       00		      .byte.b	$00
1195    109  f076					      repend
1196    110  f077		       00		      .byte.b	$00
1197    109  f077					      repend
1198    110  f078		       00		      .byte.b	$00
1199    109  f078					      repend
1200    110  f079		       00		      .byte.b	$00
1201    109  f079					      repend
1202    110  f07a		       00		      .byte.b	$00
1203    109  f07a					      repend
1204    110  f07b		       00		      .byte.b	$00
1205    109  f07b					      repend
1206    110  f07c		       00		      .byte.b	$00
1207    109  f07c					      repend
1208    110  f07d		       00		      .byte.b	$00
1209    109  f07d					      repend
1210    110  f07e		       00		      .byte.b	$00
1211    109  f07e					      repend
1212    110  f07f		       00		      .byte.b	$00
1213    109  f07f					      repend
1214    110  f080		       00		      .byte.b	$00
1215    109  f080					      repend
1216    110  f081		       00		      .byte.b	$00
1217    109  f081					      repend
1218    110  f082		       00		      .byte.b	$00
1219    109  f082					      repend
1220    110  f083		       00		      .byte.b	$00
1221    109  f083					      repend
1222    110  f084		       00		      .byte.b	$00
1223    109  f084					      repend
1224    110  f085		       00		      .byte.b	$00
1225    109  f085					      repend
1226    110  f086		       00		      .byte.b	$00
1227    109  f086					      repend
1228    110  f087		       00		      .byte.b	$00
1229    109  f087					      repend
1230    110  f088		       00		      .byte.b	$00
1231    109  f088					      repend
1232    110  f089		       00		      .byte.b	$00
1233    109  f089					      repend
1234    110  f08a		       00		      .byte.b	$00
1235    109  f08a					      repend
1236    110  f08b		       00		      .byte.b	$00
1237    109  f08b					      repend
1238    110  f08c		       00		      .byte.b	$00
1239    109  f08c					      repend
1240    110  f08d		       00		      .byte.b	$00
1241    109  f08d					      repend
1242    110  f08e		       00		      .byte.b	$00
1243    109  f08e					      repend
1244    110  f08f		       00		      .byte.b	$00
1245    109  f08f					      repend
1246    110  f090		       00		      .byte.b	$00
1247    109  f090					      repend
1248    110  f091		       00		      .byte.b	$00
1249    109  f091					      repend
1250    110  f092		       00		      .byte.b	$00
1251    109  f092					      repend
1252    110  f093		       00		      .byte.b	$00
1253    109  f093					      repend
1254    110  f094		       00		      .byte.b	$00
1255    109  f094					      repend
1256    110  f095		       00		      .byte.b	$00
1257    109  f095					      repend
1258    110  f096		       00		      .byte.b	$00
1259    109  f096					      repend
1260    110  f097		       00		      .byte.b	$00
1261    109  f097					      repend
1262    110  f098		       00		      .byte.b	$00
1263    109  f098					      repend
1264    110  f099		       00		      .byte.b	$00
1265    109  f099					      repend
1266    110  f09a		       00		      .byte.b	$00
1267    109  f09a					      repend
1268    110  f09b		       00		      .byte.b	$00
1269    109  f09b					      repend
1270    110  f09c		       00		      .byte.b	$00
1271    109  f09c					      repend
1272    110  f09d		       00		      .byte.b	$00
1273    109  f09d					      repend
1274    110  f09e		       00		      .byte.b	$00
1275    109  f09e					      repend
1276    110  f09f		       00		      .byte.b	$00
1277    109  f09f					      repend
1278    110  f0a0		       00		      .byte.b	$00
1279    109  f0a0					      repend
1280    110  f0a1		       00		      .byte.b	$00
1281    109  f0a1					      repend
1282    110  f0a2		       00		      .byte.b	$00
1283    109  f0a2					      repend
1284    110  f0a3		       00		      .byte.b	$00
1285    109  f0a3					      repend
1286    110  f0a4		       00		      .byte.b	$00
1287    109  f0a4					      repend
1288    110  f0a5		       00		      .byte.b	$00
1289    109  f0a5					      repend
1290    110  f0a6		       00		      .byte.b	$00
1291    109  f0a6					      repend
1292    110  f0a7		       00		      .byte.b	$00
1293    109  f0a7					      repend
1294    110  f0a8		       00		      .byte.b	$00
1295    109  f0a8					      repend
1296    110  f0a9		       00		      .byte.b	$00
1297    109  f0a9					      repend
1298    110  f0aa		       00		      .byte.b	$00
1299    109  f0aa					      repend
1300    110  f0ab		       00		      .byte.b	$00
1301    109  f0ab					      repend
1302    110  f0ac		       00		      .byte.b	$00
1303    109  f0ac					      repend
1304    110  f0ad		       00		      .byte.b	$00
1305    109  f0ad					      repend
1306    110  f0ae		       00		      .byte.b	$00
1307    109  f0ae					      repend
1308    110  f0af		       00		      .byte.b	$00
1309    109  f0af					      repend
1310    110  f0b0		       00		      .byte.b	$00
1311    109  f0b0					      repend
1312    110  f0b1		       00		      .byte.b	$00
1313    109  f0b1					      repend
1314    110  f0b2		       00		      .byte.b	$00
1315    109  f0b2					      repend
1316    110  f0b3		       00		      .byte.b	$00
1317    109  f0b3					      repend
1318    110  f0b4		       00		      .byte.b	$00
1319    109  f0b4					      repend
1320    110  f0b5		       00		      .byte.b	$00
1321    109  f0b5					      repend
1322    110  f0b6		       00		      .byte.b	$00
1323    109  f0b6					      repend
1324    110  f0b7		       00		      .byte.b	$00
1325    109  f0b7					      repend
1326    110  f0b8		       00		      .byte.b	$00
1327    109  f0b8					      repend
1328    110  f0b9		       00		      .byte.b	$00
1329    109  f0b9					      repend
1330    110  f0ba		       00		      .byte.b	$00
1331    109  f0ba					      repend
1332    110  f0bb		       00		      .byte.b	$00
1333    109  f0bb					      repend
1334    110  f0bc		       00		      .byte.b	$00
1335    109  f0bc					      repend
1336    110  f0bd		       00		      .byte.b	$00
1337    109  f0bd					      repend
1338    110  f0be		       00		      .byte.b	$00
1339    109  f0be					      repend
1340    110  f0bf		       00		      .byte.b	$00
1341    109  f0bf					      repend
1342    110  f0c0		       00		      .byte.b	$00
1343    109  f0c0					      repend
1344    110  f0c1		       00		      .byte.b	$00
1345    109  f0c1					      repend
1346    110  f0c2		       00		      .byte.b	$00
1347    109  f0c2					      repend
1348    110  f0c3		       00		      .byte.b	$00
1349    109  f0c3					      repend
1350    110  f0c4		       00		      .byte.b	$00
1351    109  f0c4					      repend
1352    110  f0c5		       00		      .byte.b	$00
1353    109  f0c5					      repend
1354    110  f0c6		       00		      .byte.b	$00
1355    109  f0c6					      repend
1356    110  f0c7		       00		      .byte.b	$00
1357    109  f0c7					      repend
1358    110  f0c8		       00		      .byte.b	$00
1359    109  f0c8					      repend
1360    110  f0c9		       00		      .byte.b	$00
1361    109  f0c9					      repend
1362    110  f0ca		       00		      .byte.b	$00
1363    109  f0ca					      repend
1364    110  f0cb		       00		      .byte.b	$00
1365    109  f0cb					      repend
1366    110  f0cc		       00		      .byte.b	$00
1367    109  f0cc					      repend
1368    110  f0cd		       00		      .byte.b	$00
1369    109  f0cd					      repend
1370    110  f0ce		       00		      .byte.b	$00
1371    109  f0ce					      repend
1372    110  f0cf		       00		      .byte.b	$00
1373    109  f0cf					      repend
1374    110  f0d0		       00		      .byte.b	$00
1375    109  f0d0					      repend
1376    110  f0d1		       00		      .byte.b	$00
1377    109  f0d1					      repend
1378    110  f0d2		       00		      .byte.b	$00
1379    109  f0d2					      repend
1380    110  f0d3		       00		      .byte.b	$00
1381    109  f0d3					      repend
1382    110  f0d4		       00		      .byte.b	$00
1383    109  f0d4					      repend
1384    110  f0d5		       00		      .byte.b	$00
1385    109  f0d5					      repend
1386    110  f0d6		       00		      .byte.b	$00
1387    109  f0d6					      repend
1388    110  f0d7		       00		      .byte.b	$00
1389    109  f0d7					      repend
1390    110  f0d8		       00		      .byte.b	$00
1391    109  f0d8					      repend
1392    110  f0d9		       00		      .byte.b	$00
1393    109  f0d9					      repend
1394    110  f0da		       00		      .byte.b	$00
1395    109  f0da					      repend
1396    110  f0db		       00		      .byte.b	$00
1397    109  f0db					      repend
1398    110  f0dc		       00		      .byte.b	$00
1399    109  f0dc					      repend
1400    110  f0dd		       00		      .byte.b	$00
1401    109  f0dd					      repend
1402    110  f0de		       00		      .byte.b	$00
1403    109  f0de					      repend
1404    110  f0df		       00		      .byte.b	$00
1405    109  f0df					      repend
1406    110  f0e0		       00		      .byte.b	$00
1407    109  f0e0					      repend
1408    110  f0e1		       00		      .byte.b	$00
1409    109  f0e1					      repend
1410    110  f0e2		       00		      .byte.b	$00
1411    109  f0e2					      repend
1412    110  f0e3		       00		      .byte.b	$00
1413    109  f0e3					      repend
1414    110  f0e4		       00		      .byte.b	$00
1415    109  f0e4					      repend
1416    110  f0e5		       00		      .byte.b	$00
1417    109  f0e5					      repend
1418    110  f0e6		       00		      .byte.b	$00
1419    109  f0e6					      repend
1420    110  f0e7		       00		      .byte.b	$00
1421    109  f0e7					      repend
1422    110  f0e8		       00		      .byte.b	$00
1423    109  f0e8					      repend
1424    110  f0e9		       00		      .byte.b	$00
1425    109  f0e9					      repend
1426    110  f0ea		       00		      .byte.b	$00
1427    109  f0ea					      repend
1428    110  f0eb		       00		      .byte.b	$00
1429    109  f0eb					      repend
1430    110  f0ec		       00		      .byte.b	$00
1431    109  f0ec					      repend
1432    110  f0ed		       00		      .byte.b	$00
1433    109  f0ed					      repend
1434    110  f0ee		       00		      .byte.b	$00
1435    109  f0ee					      repend
1436    110  f0ef		       00		      .byte.b	$00
1437    109  f0ef					      repend
1438    110  f0f0		       00		      .byte.b	$00
1439    109  f0f0					      repend
1440    110  f0f1		       00		      .byte.b	$00
1441    109  f0f1					      repend
1442    110  f0f2		       00		      .byte.b	$00
1443    109  f0f2					      repend
1444    110  f0f3		       00		      .byte.b	$00
1445    109  f0f3					      repend
1446    110  f0f4		       00		      .byte.b	$00
1447    109  f0f4					      repend
1448    110  f0f5		       00		      .byte.b	$00
1449    109  f0f5					      repend
1450    110  f0f6		       00		      .byte.b	$00
1451    109  f0f6					      repend
1452    110  f0f7		       00		      .byte.b	$00
1453    109  f0f7					      repend
1454    110  f0f8		       00		      .byte.b	$00
1455    109  f0f8					      repend
1456    110  f0f9		       00		      .byte.b	$00
1457    109  f0f9					      repend
1458    110  f0fa		       00		      .byte.b	$00
1459    109  f0fa					      repend
1460    110  f0fb		       00		      .byte.b	$00
1461    109  f0fb					      repend
1462    110  f0fc		       00		      .byte.b	$00
1463    109  f0fc					      repend
1464    110  f0fd		       00		      .byte.b	$00
1465    109  f0fd					      repend
1466    110  f0fe		       00		      .byte.b	$00
1467    109  f0fe					      repend
1468    110  f0ff		       00		      .byte.b	$00
1469    111  f100					      repend
1470    112  f100
1471    113  f100				   Init_1
1472    114  f100		       8d f8 ff 	      sta	$FFF8
1473    115  f103				   Bank1_Sub
1474    116  f103							;	lda #$0F
1475    117  f103							;	sta COLUPF
1476    118  f103							;	inc PF_Color
1477    119  f103		       18		      clc
1478    120  f104		       ad 80 10 	      lda	PF_Color_Read
1479    121  f107		       69 01		      adc	#1
1480    122  f109		       8d 00 10 	      sta	PF_Color_Write
1481    123  f10c		       60		      rts
1482    124  f10d
1483    125  ffe3					      org	$FFE3
1484    126  ffe3					      rorg	$FFE3
1485    127  ffe3		       20 03 f1 	      jsr	Bank1_Sub
1486    128  ffe6		       8e f8 ff 	      stx	$FFF8
1487    129  ffe9
1488    130  fff8					      org	$FFF8
1489    131  fff8		       ff ff		      .word.w	$FFFF
1490    132  fffa		       00 f1		      .word.w	Init_1
1491    133  fffc		       00 f1		      .word.w	Init_1
1492    134  fffe		       00 f1		      .word.w	Init_1
1493    135  10000
1494