6502/wudsn-ide
1
0
Fork 0
mirror of https://github.com/peterdell/wudsn-ide.git synced 2025-01-02 05:30:15 +00:00
Code Issues Projects Releases Wiki Activity
492892ebbc
wudsn-ide/com.wudsn.ide.ref/HEX/Atari8/MADS/MADS-Relocated.lst
peterdell 492892ebbc Initial commit
2018-12-30 16:52:33 +01:00

6456 lines
258 KiB
Plaintext
Raw Blame History

mads 2.0.6 build 58 (28 Jan 17)
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
1 /*
2 Engine sterujacy klockami dla GETRIS'a
3 v1.1 by TeBe/Madteam
4 changes: 07.03.2006 (relocatable version)
5 */
5
6
7 = A000 buf equ $a000
8 = 0020 width equ 32
9
10 = 0080 height equ 128
11
12 = 00FF znak equ $ff
13
14 = 0080 kloc equ $80 ;(2)
15 = 0082 kloc_tmp equ kloc+2 ;(2)
16 = 0084 klocek_nr equ kloc_tmp+2 ;(1)
17 = 0085 pos_x equ klocek_nr+1 ;(1)
18 = 0086 pos_y equ pos_x+1 ;(1)
19 = 0087 old equ pos_y+1 ;(1)
20
21 = 0000 pf smb 'PRINTF'
22
23 blk update symbols
24
25 FFFF> 01,0000-2A37> 4D + .RELOC
26
27 .public main
28 .public end_address
29
30
31 01,0000 ant
32 01,0000 4F 00 A0 dta $4f,a(buf)
33 01,0003 0F 0F 0F 0F 0F + :height-1 dta $f
34 01,0082 41 00 00 dta $41,a(ant)
35
36 01,0085 main
37
38 01,0085 .proc init
39 01,0085 A9 00 lda #0
40 01,0087 85 85 sta pos_x
41 01,0089 8D F4 00 sta faza+1
42 01,008C 85 86 sta pos_y
43
44 01,008E 20 F9 27 jsr get_kloc
45
46 01,0091 A2 80 ldx #height
47 01,0093 A9 FF loop1 lda #znak
48 01,0095 A0 00 ldy #0
49 01,0097 91 80 sta (kloc),y
50 01,0099 A0 1F ldy #width-1
51 01,009B 91 80 sta (kloc),y
52
53 01,009D A5 80 lda kloc
54 01,009F 18 clc
55 01,00A0 69 20 adc #width
56 01,00A2 85 80 sta kloc
57 01,00A4 90 02 bcc _skp
58 01,00A6 E6 81 inc kloc+1
59 01,00A8 _skp
60 01,00A8 CA dex
61 01,00A9 D0 E8 bne loop1
62
63 01,00AB A9 7F lda #height-1
64 01,00AD 85 86 sta pos_y
65 01,00AF 20 F9 27 jsr get_kloc
66
67 01,00B2 A9 FF lda #znak
68 01,00B4 A0 1F ldy #width-1
69 01,00B6 91 80 loop2 sta (kloc),y
70 01,00B8 88 dey
71 01,00B9 10 FB bpl loop2
72
73 01,00BB A9 0E lda #width/2-2
74 01,00BD 85 85 sta pos_x
75 01,00BF A9 00 lda #0
76 01,00C1 85 86 sta pos_y
77
78 01,00C3 20 F9 27 jsr get_kloc
79
80 01,00C6 AD 0B D4 lda $d40b
81 01,00C9 D0 FB bne *-3
82
83 01,00CB 78 sei
84 01,00CC A9 00 lda #0
85 01,00CE 8D 0E D4 sta $d40e
86 01,00D1 A9 FE lda #$fe
87 01,00D3 8D 01 D3 sta $d301
88
89 01,00D6 A9 2A 8D FA FF + mwa #nmi $fffa
90
91 01,00E0 A9 40 lda #$40
92 01,00E2 8D 0E D4 sta $d40e
93
94 01,00E5 20 0B 28 jsr losuj_klocek
95
96 .endp
97
98
99 /*
100 LET'S GO
101 */
101
102
103 01,00E8 loop
104 01,00E8 A2 08 wait ldx #8
105 01,00EA A5 14 hh lda 20
106 01,00EC C5 14 cmp 20
107 01,00EE F0 FC beq *-2
108
109 01,00F0 CA dex
110 01,00F1 D0 F7 bne hh
111
112
113 01,00F3 A9 00 faza lda #0
114 01,00F5 F0 25 beq cont
115
116 01,00F7 AD 34 2A lda delay
117 01,00FA 8D E9 00 sta wait+1
118
119 01,00FD A9 0E lda #width/2-2
120 01,00FF 85 85 sta pos_x
121 01,0101 A9 00 lda #0
122 01,0103 85 86 sta pos_y
123 01,0105 8D F4 00 sta faza+1
124 01,0108 8D 22 01 sta w_dol+1
125 01,010B 8D 33 2A sta read_joy
126 01,010E 8D 5B 01 sta r_d300+1
127
128 01,0111 20 0B 28 jsr losuj_klocek
129
130 01,0114 20 F9 27 jsr get_kloc
131
132 01,0117 20 F0 01 jsr test_posY
133 01,011A D0 77 bne stop ; brak mozliwosci ruchu GAME OVER
134
135 01,011C cont
136 01,011C A2 00 ldx #" "
137 01,011E 20 13 02 jsr put_klocek
138
139 ;--- w dol do konca
140 01,0121 A9 00 w_dol lda #0
141 01,0123 F0 21 beq _skip2
142
143 01,0125 20 F0 01 jsr test_posY
144 01,0128 8D F4 00 sta faza+1
145 01,012B D0 5E bne _skip
146 01,012D 20 F0 01 jsr test_posY
147 01,0130 8D F4 00 sta faza+1
148 01,0133 D0 56 bne _skip
149 01,0135 20 F0 01 jsr test_posY
150 01,0138 8D F4 00 sta faza+1
151 01,013B D0 4E bne _skip
152 01,013D 20 F0 01 jsr test_posY
153 01,0140 8D F4 00 sta faza+1
154 01,0143 4C 8B 01 jmp _skip
155
156 01,0146 _skip2
157
158 ;--- zmiana pozycji Y klocka
159 01,0146 20 F0 01 jsr test_posY
160 01,0149 8D F4 00 sta faza+1
161 01,014C D0 3D bne _skip
162
163 ;--- zmiana fazy klocka
164 01,014E A9 00 r_d010 lda #0
165 01,0150 D0 08 bne _skip_trig
166
167 01,0152 20 9C 01 jsr test_faza
168 01,0155 A9 FF lda #$ff
169 01,0157 8D 4F 01 sta r_d010+1
170
171 01,015A _skip_trig
172
173 ;--- zmiana pozycji X klocka
174 01,015A A9 00 r_d300 lda #0
175 01,015C C9 07 cmp #7
176 01,015E D0 08 bne _nxt1
177
178 01,0160 A2 01 ldx #1
179 01,0162 20 C5 01 jsr test_posX
180 01,0165 4C 83 01 jmp _end_joy
181
182 01,0168 _nxt1
183 01,0168 C9 0B cmp #11
184 01,016A D0 08 bne _nxt2
185
186 01,016C A2 FF ldx #$ff
187 01,016E 20 C5 01 jsr test_posX
188 01,0171 4C 83 01 jmp _end_joy
189
190 01,0174 _nxt2
191 01,0174 C9 0D cmp #13
192 01,0176 D0 13 bne _skip
193
194 01,0178 8D 22 01 sta w_dol+1
195 01,017B A9 01 lda #1
196 01,017D 8D E9 00 sta wait+1
197 01,0180 4C 8B 01 jmp _skip
198
199 01,0183 _end_joy
200 01,0183 A9 00 lda #0
201 01,0185 8D 33 2A sta read_joy
202 01,0188 8D 5B 01 sta r_d300+1
203
204 01,018B _skip
205 01,018B A2 FF ldx #znak
206 01,018D 20 13 02 jsr put_klocek
207
208 01,0190 4C E8 00 jmp loop
209
210
211 01,0193 AD 0A D2 stop lda $d20a
212 01,0196 8D 1A D0 sta $d01a
213 01,0199 4C 93 01 jmp stop
214
215 /*
216 Sprawdz mozliwosc zmiany fazy klocka
217 */
217
218 01,019C .proc test_faza
219
220 01,019C A6 84 ldx klocek_nr
221 01,019E 86 87 stx old
222
223 01,01A0 E8 inx
224 01,01A1 8A txa
225 01,01A2 29 03 and #3
226 01,01A4 0D 32 2A ora maska
227 01,01A7 85 84 sta klocek_nr
228
229 01,01A9 A8 tay
230 01,01AA B9 E8 28 lda l_test,y
231 01,01AD 8D B9 01 sta jump+1
232 01,01B0 B9 0C 29 lda h_test,y
233 01,01B3 8D BA 01 sta jump+2
234
235 01,01B6 A9 00 lda #0
236 01,01B8 20 FF FF jump jsr $ffff
237 01,01BB F0 07 beq ok
238
239 01,01BD A5 87 lda old
240 01,01BF 85 84 sta klocek_nr
241
242 01,01C1 A9 FF lda #$ff
243 01,01C3 60 rts
244
245 01,01C4 60 ok rts
246 .endp
247
248
249 /*
250 Sprawdz mozliwosc zmiany pozycji X klocka
251 */
251
252 01,01C5 .proc test_posX
253
254 01,01C5 A5 85 lda pos_x
255 01,01C7 85 87 sta old
256
257 01,01C9 8A txa
258 01,01CA 18 clc
259 01,01CB 65 85 adc pos_x
260 01,01CD 85 85 sta pos_x
261
262 01,01CF 20 F9 27 jsr get_kloc
263
264 01,01D2 A4 84 ldy klocek_nr
265 01,01D4 B9 E8 28 lda l_test,y
266 01,01D7 8D E3 01 sta jump+1
267 01,01DA B9 0C 29 lda h_test,y
268 01,01DD 8D E4 01 sta jump+2
269
270 01,01E0 A9 00 lda #0
271 01,01E2 20 FF FF jump jsr $ffff
272 01,01E5 F0 08 beq ok
273
274 01,01E7 A5 87 lda old
275 01,01E9 85 85 sta pos_x
276
277 01,01EB 20 F9 27 jsr get_kloc
278 01,01EE 60 rts
279
280 01,01EF 60 ok rts
281 .endp
282
283
284 /*
285 Sprawdz mozliwosc zmiany pozycji Y klocka
286 */
286
287 01,01F0 .proc test_posY
288
289 01,01F0 E6 86 inc pos_y
290
291 01,01F2 20 F9 27 jsr get_kloc
292
293 01,01F5 A4 84 ldy klocek_nr
294 01,01F7 B9 E8 28 lda l_test,y
295 01,01FA 8D 06 02 sta jump+1
296 01,01FD B9 0C 29 lda h_test,y
297 01,0200 8D 07 02 sta jump+2
298
299 01,0203 A9 00 lda #0
300 01,0205 20 FF FF jump jsr $ffff
301 01,0208 F0 08 beq ok
302
303 01,020A C6 86 dec pos_y
304 01,020C 20 F9 27 jsr get_kloc
305
306 01,020F A9 FF lda #$ff
307 01,0211 60 rts
308
309 01,0212 60 ok rts
310 .endp
311
312
313 /*
314 Skok do odpowiedniej procedury klocka
315 */
315
316 01,0213 .proc put_klocek
317 01,0213 A4 84 ldy klocek_nr
318 01,0215 B9 A0 28 lda l_klocek,y
319 01,0218 8D 23 02 sta jump+1
320 01,021B B9 C4 28 lda h_klocek,y
321 01,021E 8D 24 02 sta jump+2
322
323 01,0221 8A txa
324 01,0222 4C FF FF jump jmp $ffff
325 .endp
326
327
328 /*
329 Procedury dla konkretnej fazy klocka
330 */
330
331
332 .macro sta_kloc
333 tax
334
335 .if :1=0
336 mwa kloc kloc_tmp
337
338 .elseif :1=1
339 mwa kloc kloc_tmp
340 inw kloc_tmp
341
342 .else
343 lda kloc
344 clc
345 adc <:1
346 sta kloc_tmp
347 lda kloc+1
348 adc >:1
349 sta kloc_tmp+1
350
351 .endif
352
353 txa
354
355 ldy #0
356 sta (kloc_tmp),y
357 ldy #width
358 sta (kloc_tmp),y
359 ldy #width*2
360 sta (kloc_tmp),y
361 ldy #width*3
362 sta (kloc_tmp),y
363 ldy #width*4
364 sta (kloc_tmp),y
365 ldy #width*5
366 sta (kloc_tmp),y
367 ldy #width*6
368 sta (kloc_tmp),y
369 ldy #width*7
370 sta (kloc_tmp),y
371 .endm
372
373
374 .macro lda_kloc
375 tax
376
377 .if :1=0
378 mwa kloc kloc_tmp
379
380 .elseif :1=1
381 mwa kloc kloc_tmp
382 inw kloc_tmp
383
384 .else
385 lda kloc
386 clc
387 adc <:1
388 sta kloc_tmp
389 lda kloc+1
390 adc >:1
391 sta kloc_tmp+1
392
393 .endif
394
395 ldy #0
396 txa
397
398 ora (kloc_tmp),y
399 ldy #width
400 ora (kloc_tmp),y
401 ldy #width*2
402 ora (kloc_tmp),y
403 ldy #width*3
404 ora (kloc_tmp),y
405 ldy #width*4
406 ora (kloc_tmp),y
407 ldy #width*5
408 ora (kloc_tmp),y
409 ldy #width*6
410 ora (kloc_tmp),y
411 ldy #width*7
412 ora (kloc_tmp),y
413 .endm
414
415
416 * KLOCEK 1 (2 fazy)
417 ; ' * '
418 ; ' * '
419 ; ' * '
420 01,0225 .proc klocek1_0
421 01,0225 sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0225 AA tax
7 01,0226 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,022E E6 82 D0 02 E6 + inw kloc_tmp
21 01,0234 8A txa
23 01,0235 A0 00 ldy #0
24 01,0237 91 82 sta (kloc_tmp),y
25 01,0239 A0 20 ldy #width
26 01,023B 91 82 sta (kloc_tmp),y
27 01,023D A0 40 ldy #width*2
28 01,023F 91 82 sta (kloc_tmp),y
29 01,0241 A0 60 ldy #width*3
30 01,0243 91 82 sta (kloc_tmp),y
31 01,0245 A0 80 ldy #width*4
32 01,0247 91 82 sta (kloc_tmp),y
33 01,0249 A0 A0 ldy #width*5
34 01,024B 91 82 sta (kloc_tmp),y
35 01,024D A0 C0 ldy #width*6
36 01,024F 91 82 sta (kloc_tmp),y
37 01,0251 A0 E0 ldy #width*7
38 01,0253 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
422 01,0255 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0255 AA tax
11 01,0256 A5 80 lda kloc
12 01,0258 18 clc
13 01,0259 69 01 adc <1+WIDTH*8
14 01,025B 85 82 sta kloc_tmp
15 01,025D A5 81 lda kloc+1
16 01,025F 69 01 adc >1+WIDTH*8
17 01,0261 85 83 sta kloc_tmp+1
21 01,0263 8A txa
23 01,0264 A0 00 ldy #0
24 01,0266 91 82 sta (kloc_tmp),y
25 01,0268 A0 20 ldy #width
26 01,026A 91 82 sta (kloc_tmp),y
27 01,026C A0 40 ldy #width*2
28 01,026E 91 82 sta (kloc_tmp),y
29 01,0270 A0 60 ldy #width*3
30 01,0272 91 82 sta (kloc_tmp),y
31 01,0274 A0 80 ldy #width*4
32 01,0276 91 82 sta (kloc_tmp),y
33 01,0278 A0 A0 ldy #width*5
34 01,027A 91 82 sta (kloc_tmp),y
35 01,027C A0 C0 ldy #width*6
36 01,027E 91 82 sta (kloc_tmp),y
37 01,0280 A0 E0 ldy #width*7
38 01,0282 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
423 01,0284 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0284 AA tax
11 01,0285 A5 80 lda kloc
12 01,0287 18 clc
13 01,0288 69 01 adc <1+WIDTH*2*8
14 01,028A 85 82 sta kloc_tmp
15 01,028C A5 81 lda kloc+1
16 01,028E 69 02 adc >1+WIDTH*2*8
17 01,0290 85 83 sta kloc_tmp+1
21 01,0292 8A txa
23 01,0293 A0 00 ldy #0
24 01,0295 91 82 sta (kloc_tmp),y
25 01,0297 A0 20 ldy #width
26 01,0299 91 82 sta (kloc_tmp),y
27 01,029B A0 40 ldy #width*2
28 01,029D 91 82 sta (kloc_tmp),y
29 01,029F A0 60 ldy #width*3
30 01,02A1 91 82 sta (kloc_tmp),y
31 01,02A3 A0 80 ldy #width*4
32 01,02A5 91 82 sta (kloc_tmp),y
33 01,02A7 A0 A0 ldy #width*5
34 01,02A9 91 82 sta (kloc_tmp),y
35 01,02AB A0 C0 ldy #width*6
36 01,02AD 91 82 sta (kloc_tmp),y
37 01,02AF A0 E0 ldy #width*7
38 01,02B1 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
424 01,02B3 60 rts
425
426 01,02B4 test
427 01,02B4 lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,02B4 AA tax
7 01,02B5 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,02BD E6 82 D0 02 E6 + inw kloc_tmp
21 01,02C3 A0 00 ldy #0
22 01,02C5 8A txa
24 01,02C6 11 82 ora (kloc_tmp),y
25 01,02C8 A0 20 ldy #width
26 01,02CA 11 82 ora (kloc_tmp),y
27 01,02CC A0 40 ldy #width*2
28 01,02CE 11 82 ora (kloc_tmp),y
29 01,02D0 A0 60 ldy #width*3
30 01,02D2 11 82 ora (kloc_tmp),y
31 01,02D4 A0 80 ldy #width*4
32 01,02D6 11 82 ora (kloc_tmp),y
33 01,02D8 A0 A0 ldy #width*5
34 01,02DA 11 82 ora (kloc_tmp),y
35 01,02DC A0 C0 ldy #width*6
36 01,02DE 11 82 ora (kloc_tmp),y
37 01,02E0 A0 E0 ldy #width*7
38 01,02E2 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
428 01,02E4 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,02E4 AA tax
11 01,02E5 A5 80 lda kloc
12 01,02E7 18 clc
13 01,02E8 69 01 adc <1+WIDTH*8
14 01,02EA 85 82 sta kloc_tmp
15 01,02EC A5 81 lda kloc+1
16 01,02EE 69 01 adc >1+WIDTH*8
17 01,02F0 85 83 sta kloc_tmp+1
21 01,02F2 A0 00 ldy #0
22 01,02F4 8A txa
24 01,02F5 11 82 ora (kloc_tmp),y
25 01,02F7 A0 20 ldy #width
26 01,02F9 11 82 ora (kloc_tmp),y
27 01,02FB A0 40 ldy #width*2
28 01,02FD 11 82 ora (kloc_tmp),y
29 01,02FF A0 60 ldy #width*3
30 01,0301 11 82 ora (kloc_tmp),y
31 01,0303 A0 80 ldy #width*4
32 01,0305 11 82 ora (kloc_tmp),y
33 01,0307 A0 A0 ldy #width*5
34 01,0309 11 82 ora (kloc_tmp),y
35 01,030B A0 C0 ldy #width*6
36 01,030D 11 82 ora (kloc_tmp),y
37 01,030F A0 E0 ldy #width*7
38 01,0311 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
429 01,0313 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0313 AA tax
11 01,0314 A5 80 lda kloc
12 01,0316 18 clc
13 01,0317 69 01 adc <1+WIDTH*2*8
14 01,0319 85 82 sta kloc_tmp
15 01,031B A5 81 lda kloc+1
16 01,031D 69 02 adc >1+WIDTH*2*8
17 01,031F 85 83 sta kloc_tmp+1
21 01,0321 A0 00 ldy #0
22 01,0323 8A txa
24 01,0324 11 82 ora (kloc_tmp),y
25 01,0326 A0 20 ldy #width
26 01,0328 11 82 ora (kloc_tmp),y
27 01,032A A0 40 ldy #width*2
28 01,032C 11 82 ora (kloc_tmp),y
29 01,032E A0 60 ldy #width*3
30 01,0330 11 82 ora (kloc_tmp),y
31 01,0332 A0 80 ldy #width*4
32 01,0334 11 82 ora (kloc_tmp),y
33 01,0336 A0 A0 ldy #width*5
34 01,0338 11 82 ora (kloc_tmp),y
35 01,033A A0 C0 ldy #width*6
36 01,033C 11 82 ora (kloc_tmp),y
37 01,033E A0 E0 ldy #width*7
38 01,0340 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
430 01,0342 60 rts
431 .endp
432
433
434 ; ' '
435 ; '***'
436 ; ' '
437 01,0343 .proc klocek1_1
438 01,0343 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0343 AA tax
11 01,0344 A5 80 lda kloc
12 01,0346 18 clc
13 01,0347 69 00 adc <WIDTH*8
14 01,0349 85 82 sta kloc_tmp
15 01,034B A5 81 lda kloc+1
16 01,034D 69 01 adc >WIDTH*8
17 01,034F 85 83 sta kloc_tmp+1
21 01,0351 8A txa
23 01,0352 A0 00 ldy #0
24 01,0354 91 82 sta (kloc_tmp),y
25 01,0356 A0 20 ldy #width
26 01,0358 91 82 sta (kloc_tmp),y
27 01,035A A0 40 ldy #width*2
28 01,035C 91 82 sta (kloc_tmp),y
29 01,035E A0 60 ldy #width*3
30 01,0360 91 82 sta (kloc_tmp),y
31 01,0362 A0 80 ldy #width*4
32 01,0364 91 82 sta (kloc_tmp),y
33 01,0366 A0 A0 ldy #width*5
34 01,0368 91 82 sta (kloc_tmp),y
35 01,036A A0 C0 ldy #width*6
36 01,036C 91 82 sta (kloc_tmp),y
37 01,036E A0 E0 ldy #width*7
38 01,0370 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
439 01,0372 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0372 AA tax
11 01,0373 A5 80 lda kloc
12 01,0375 18 clc
13 01,0376 69 01 adc <1+WIDTH*8
14 01,0378 85 82 sta kloc_tmp
15 01,037A A5 81 lda kloc+1
16 01,037C 69 01 adc >1+WIDTH*8
17 01,037E 85 83 sta kloc_tmp+1
21 01,0380 8A txa
23 01,0381 A0 00 ldy #0
24 01,0383 91 82 sta (kloc_tmp),y
25 01,0385 A0 20 ldy #width
26 01,0387 91 82 sta (kloc_tmp),y
27 01,0389 A0 40 ldy #width*2
28 01,038B 91 82 sta (kloc_tmp),y
29 01,038D A0 60 ldy #width*3
30 01,038F 91 82 sta (kloc_tmp),y
31 01,0391 A0 80 ldy #width*4
32 01,0393 91 82 sta (kloc_tmp),y
33 01,0395 A0 A0 ldy #width*5
34 01,0397 91 82 sta (kloc_tmp),y
35 01,0399 A0 C0 ldy #width*6
36 01,039B 91 82 sta (kloc_tmp),y
37 01,039D A0 E0 ldy #width*7
38 01,039F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
440 01,03A1 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,03A1 AA tax
11 01,03A2 A5 80 lda kloc
12 01,03A4 18 clc
13 01,03A5 69 02 adc <2+WIDTH*8
14 01,03A7 85 82 sta kloc_tmp
15 01,03A9 A5 81 lda kloc+1
16 01,03AB 69 01 adc >2+WIDTH*8
17 01,03AD 85 83 sta kloc_tmp+1
21 01,03AF 8A txa
23 01,03B0 A0 00 ldy #0
24 01,03B2 91 82 sta (kloc_tmp),y
25 01,03B4 A0 20 ldy #width
26 01,03B6 91 82 sta (kloc_tmp),y
27 01,03B8 A0 40 ldy #width*2
28 01,03BA 91 82 sta (kloc_tmp),y
29 01,03BC A0 60 ldy #width*3
30 01,03BE 91 82 sta (kloc_tmp),y
31 01,03C0 A0 80 ldy #width*4
32 01,03C2 91 82 sta (kloc_tmp),y
33 01,03C4 A0 A0 ldy #width*5
34 01,03C6 91 82 sta (kloc_tmp),y
35 01,03C8 A0 C0 ldy #width*6
36 01,03CA 91 82 sta (kloc_tmp),y
37 01,03CC A0 E0 ldy #width*7
38 01,03CE 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
441 01,03D0 60 rts
442
443 01,03D1 test
444 01,03D1 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,03D1 AA tax
11 01,03D2 A5 80 lda kloc
12 01,03D4 18 clc
13 01,03D5 69 00 adc <WIDTH*8
14 01,03D7 85 82 sta kloc_tmp
15 01,03D9 A5 81 lda kloc+1
16 01,03DB 69 01 adc >WIDTH*8
17 01,03DD 85 83 sta kloc_tmp+1
21 01,03DF A0 00 ldy #0
22 01,03E1 8A txa
24 01,03E2 11 82 ora (kloc_tmp),y
25 01,03E4 A0 20 ldy #width
26 01,03E6 11 82 ora (kloc_tmp),y
27 01,03E8 A0 40 ldy #width*2
28 01,03EA 11 82 ora (kloc_tmp),y
29 01,03EC A0 60 ldy #width*3
30 01,03EE 11 82 ora (kloc_tmp),y
31 01,03F0 A0 80 ldy #width*4
32 01,03F2 11 82 ora (kloc_tmp),y
33 01,03F4 A0 A0 ldy #width*5
34 01,03F6 11 82 ora (kloc_tmp),y
35 01,03F8 A0 C0 ldy #width*6
36 01,03FA 11 82 ora (kloc_tmp),y
37 01,03FC A0 E0 ldy #width*7
38 01,03FE 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
445 01,0400 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0400 AA tax
11 01,0401 A5 80 lda kloc
12 01,0403 18 clc
13 01,0404 69 01 adc <1+WIDTH*8
14 01,0406 85 82 sta kloc_tmp
15 01,0408 A5 81 lda kloc+1
16 01,040A 69 01 adc >1+WIDTH*8
17 01,040C 85 83 sta kloc_tmp+1
21 01,040E A0 00 ldy #0
22 01,0410 8A txa
24 01,0411 11 82 ora (kloc_tmp),y
25 01,0413 A0 20 ldy #width
26 01,0415 11 82 ora (kloc_tmp),y
27 01,0417 A0 40 ldy #width*2
28 01,0419 11 82 ora (kloc_tmp),y
29 01,041B A0 60 ldy #width*3
30 01,041D 11 82 ora (kloc_tmp),y
31 01,041F A0 80 ldy #width*4
32 01,0421 11 82 ora (kloc_tmp),y
33 01,0423 A0 A0 ldy #width*5
34 01,0425 11 82 ora (kloc_tmp),y
35 01,0427 A0 C0 ldy #width*6
36 01,0429 11 82 ora (kloc_tmp),y
37 01,042B A0 E0 ldy #width*7
38 01,042D 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
446 01,042F lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,042F AA tax
11 01,0430 A5 80 lda kloc
12 01,0432 18 clc
13 01,0433 69 02 adc <2+WIDTH*8
14 01,0435 85 82 sta kloc_tmp
15 01,0437 A5 81 lda kloc+1
16 01,0439 69 01 adc >2+WIDTH*8
17 01,043B 85 83 sta kloc_tmp+1
21 01,043D A0 00 ldy #0
22 01,043F 8A txa
24 01,0440 11 82 ora (kloc_tmp),y
25 01,0442 A0 20 ldy #width
26 01,0444 11 82 ora (kloc_tmp),y
27 01,0446 A0 40 ldy #width*2
28 01,0448 11 82 ora (kloc_tmp),y
29 01,044A A0 60 ldy #width*3
30 01,044C 11 82 ora (kloc_tmp),y
31 01,044E A0 80 ldy #width*4
32 01,0450 11 82 ora (kloc_tmp),y
33 01,0452 A0 A0 ldy #width*5
34 01,0454 11 82 ora (kloc_tmp),y
35 01,0456 A0 C0 ldy #width*6
36 01,0458 11 82 ora (kloc_tmp),y
37 01,045A A0 E0 ldy #width*7
38 01,045C 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
447 01,045E 60 rts
448 .endp
449
450
451 * KLOCEK 2 (4 fazy)
452 ; ' * '
453 ; ' * '
454 ; ' **'
455 01,045F .proc klocek2_0
456 01,045F sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,045F AA tax
7 01,0460 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,0468 E6 82 D0 02 E6 + inw kloc_tmp
21 01,046E 8A txa
23 01,046F A0 00 ldy #0
24 01,0471 91 82 sta (kloc_tmp),y
25 01,0473 A0 20 ldy #width
26 01,0475 91 82 sta (kloc_tmp),y
27 01,0477 A0 40 ldy #width*2
28 01,0479 91 82 sta (kloc_tmp),y
29 01,047B A0 60 ldy #width*3
30 01,047D 91 82 sta (kloc_tmp),y
31 01,047F A0 80 ldy #width*4
32 01,0481 91 82 sta (kloc_tmp),y
33 01,0483 A0 A0 ldy #width*5
34 01,0485 91 82 sta (kloc_tmp),y
35 01,0487 A0 C0 ldy #width*6
36 01,0489 91 82 sta (kloc_tmp),y
37 01,048B A0 E0 ldy #width*7
38 01,048D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
457 01,048F sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,048F AA tax
11 01,0490 A5 80 lda kloc
12 01,0492 18 clc
13 01,0493 69 01 adc <1+WIDTH*8
14 01,0495 85 82 sta kloc_tmp
15 01,0497 A5 81 lda kloc+1
16 01,0499 69 01 adc >1+WIDTH*8
17 01,049B 85 83 sta kloc_tmp+1
21 01,049D 8A txa
23 01,049E A0 00 ldy #0
24 01,04A0 91 82 sta (kloc_tmp),y
25 01,04A2 A0 20 ldy #width
26 01,04A4 91 82 sta (kloc_tmp),y
27 01,04A6 A0 40 ldy #width*2
28 01,04A8 91 82 sta (kloc_tmp),y
29 01,04AA A0 60 ldy #width*3
30 01,04AC 91 82 sta (kloc_tmp),y
31 01,04AE A0 80 ldy #width*4
32 01,04B0 91 82 sta (kloc_tmp),y
33 01,04B2 A0 A0 ldy #width*5
34 01,04B4 91 82 sta (kloc_tmp),y
35 01,04B6 A0 C0 ldy #width*6
36 01,04B8 91 82 sta (kloc_tmp),y
37 01,04BA A0 E0 ldy #width*7
38 01,04BC 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
458 01,04BE sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,04BE AA tax
11 01,04BF A5 80 lda kloc
12 01,04C1 18 clc
13 01,04C2 69 01 adc <1+WIDTH*2*8
14 01,04C4 85 82 sta kloc_tmp
15 01,04C6 A5 81 lda kloc+1
16 01,04C8 69 02 adc >1+WIDTH*2*8
17 01,04CA 85 83 sta kloc_tmp+1
21 01,04CC 8A txa
23 01,04CD A0 00 ldy #0
24 01,04CF 91 82 sta (kloc_tmp),y
25 01,04D1 A0 20 ldy #width
26 01,04D3 91 82 sta (kloc_tmp),y
27 01,04D5 A0 40 ldy #width*2
28 01,04D7 91 82 sta (kloc_tmp),y
29 01,04D9 A0 60 ldy #width*3
30 01,04DB 91 82 sta (kloc_tmp),y
31 01,04DD A0 80 ldy #width*4
32 01,04DF 91 82 sta (kloc_tmp),y
33 01,04E1 A0 A0 ldy #width*5
34 01,04E3 91 82 sta (kloc_tmp),y
35 01,04E5 A0 C0 ldy #width*6
36 01,04E7 91 82 sta (kloc_tmp),y
37 01,04E9 A0 E0 ldy #width*7
38 01,04EB 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
459 01,04ED sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,04ED AA tax
11 01,04EE A5 80 lda kloc
12 01,04F0 18 clc
13 01,04F1 69 02 adc <2+WIDTH*2*8
14 01,04F3 85 82 sta kloc_tmp
15 01,04F5 A5 81 lda kloc+1
16 01,04F7 69 02 adc >2+WIDTH*2*8
17 01,04F9 85 83 sta kloc_tmp+1
21 01,04FB 8A txa
23 01,04FC A0 00 ldy #0
24 01,04FE 91 82 sta (kloc_tmp),y
25 01,0500 A0 20 ldy #width
26 01,0502 91 82 sta (kloc_tmp),y
27 01,0504 A0 40 ldy #width*2
28 01,0506 91 82 sta (kloc_tmp),y
29 01,0508 A0 60 ldy #width*3
30 01,050A 91 82 sta (kloc_tmp),y
31 01,050C A0 80 ldy #width*4
32 01,050E 91 82 sta (kloc_tmp),y
33 01,0510 A0 A0 ldy #width*5
34 01,0512 91 82 sta (kloc_tmp),y
35 01,0514 A0 C0 ldy #width*6
36 01,0516 91 82 sta (kloc_tmp),y
37 01,0518 A0 E0 ldy #width*7
38 01,051A 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
460 01,051C 60 rts
461
462 01,051D test
463 01,051D lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,051D AA tax
7 01,051E A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,0526 E6 82 D0 02 E6 + inw kloc_tmp
21 01,052C A0 00 ldy #0
22 01,052E 8A txa
24 01,052F 11 82 ora (kloc_tmp),y
25 01,0531 A0 20 ldy #width
26 01,0533 11 82 ora (kloc_tmp),y
27 01,0535 A0 40 ldy #width*2
28 01,0537 11 82 ora (kloc_tmp),y
29 01,0539 A0 60 ldy #width*3
30 01,053B 11 82 ora (kloc_tmp),y
31 01,053D A0 80 ldy #width*4
32 01,053F 11 82 ora (kloc_tmp),y
33 01,0541 A0 A0 ldy #width*5
34 01,0543 11 82 ora (kloc_tmp),y
35 01,0545 A0 C0 ldy #width*6
36 01,0547 11 82 ora (kloc_tmp),y
37 01,0549 A0 E0 ldy #width*7
38 01,054B 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
464 01,054D lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,054D AA tax
11 01,054E A5 80 lda kloc
12 01,0550 18 clc
13 01,0551 69 01 adc <1+WIDTH*8
14 01,0553 85 82 sta kloc_tmp
15 01,0555 A5 81 lda kloc+1
16 01,0557 69 01 adc >1+WIDTH*8
17 01,0559 85 83 sta kloc_tmp+1
21 01,055B A0 00 ldy #0
22 01,055D 8A txa
24 01,055E 11 82 ora (kloc_tmp),y
25 01,0560 A0 20 ldy #width
26 01,0562 11 82 ora (kloc_tmp),y
27 01,0564 A0 40 ldy #width*2
28 01,0566 11 82 ora (kloc_tmp),y
29 01,0568 A0 60 ldy #width*3
30 01,056A 11 82 ora (kloc_tmp),y
31 01,056C A0 80 ldy #width*4
32 01,056E 11 82 ora (kloc_tmp),y
33 01,0570 A0 A0 ldy #width*5
34 01,0572 11 82 ora (kloc_tmp),y
35 01,0574 A0 C0 ldy #width*6
36 01,0576 11 82 ora (kloc_tmp),y
37 01,0578 A0 E0 ldy #width*7
38 01,057A 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
465 01,057C lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,057C AA tax
11 01,057D A5 80 lda kloc
12 01,057F 18 clc
13 01,0580 69 01 adc <1+WIDTH*2*8
14 01,0582 85 82 sta kloc_tmp
15 01,0584 A5 81 lda kloc+1
16 01,0586 69 02 adc >1+WIDTH*2*8
17 01,0588 85 83 sta kloc_tmp+1
21 01,058A A0 00 ldy #0
22 01,058C 8A txa
24 01,058D 11 82 ora (kloc_tmp),y
25 01,058F A0 20 ldy #width
26 01,0591 11 82 ora (kloc_tmp),y
27 01,0593 A0 40 ldy #width*2
28 01,0595 11 82 ora (kloc_tmp),y
29 01,0597 A0 60 ldy #width*3
30 01,0599 11 82 ora (kloc_tmp),y
31 01,059B A0 80 ldy #width*4
32 01,059D 11 82 ora (kloc_tmp),y
33 01,059F A0 A0 ldy #width*5
34 01,05A1 11 82 ora (kloc_tmp),y
35 01,05A3 A0 C0 ldy #width*6
36 01,05A5 11 82 ora (kloc_tmp),y
37 01,05A7 A0 E0 ldy #width*7
38 01,05A9 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
466 01,05AB lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,05AB AA tax
11 01,05AC A5 80 lda kloc
12 01,05AE 18 clc
13 01,05AF 69 02 adc <2+WIDTH*2*8
14 01,05B1 85 82 sta kloc_tmp
15 01,05B3 A5 81 lda kloc+1
16 01,05B5 69 02 adc >2+WIDTH*2*8
17 01,05B7 85 83 sta kloc_tmp+1
21 01,05B9 A0 00 ldy #0
22 01,05BB 8A txa
24 01,05BC 11 82 ora (kloc_tmp),y
25 01,05BE A0 20 ldy #width
26 01,05C0 11 82 ora (kloc_tmp),y
27 01,05C2 A0 40 ldy #width*2
28 01,05C4 11 82 ora (kloc_tmp),y
29 01,05C6 A0 60 ldy #width*3
30 01,05C8 11 82 ora (kloc_tmp),y
31 01,05CA A0 80 ldy #width*4
32 01,05CC 11 82 ora (kloc_tmp),y
33 01,05CE A0 A0 ldy #width*5
34 01,05D0 11 82 ora (kloc_tmp),y
35 01,05D2 A0 C0 ldy #width*6
36 01,05D4 11 82 ora (kloc_tmp),y
37 01,05D6 A0 E0 ldy #width*7
38 01,05D8 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
467 01,05DA 60 rts
468 .endp
469
470
471 ; ' '
472 ; '***'
473 ; '* '
474 01,05DB .proc klocek2_1
475 01,05DB sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,05DB AA tax
11 01,05DC A5 80 lda kloc
12 01,05DE 18 clc
13 01,05DF 69 00 adc <WIDTH*8
14 01,05E1 85 82 sta kloc_tmp
15 01,05E3 A5 81 lda kloc+1
16 01,05E5 69 01 adc >WIDTH*8
17 01,05E7 85 83 sta kloc_tmp+1
21 01,05E9 8A txa
23 01,05EA A0 00 ldy #0
24 01,05EC 91 82 sta (kloc_tmp),y
25 01,05EE A0 20 ldy #width
26 01,05F0 91 82 sta (kloc_tmp),y
27 01,05F2 A0 40 ldy #width*2
28 01,05F4 91 82 sta (kloc_tmp),y
29 01,05F6 A0 60 ldy #width*3
30 01,05F8 91 82 sta (kloc_tmp),y
31 01,05FA A0 80 ldy #width*4
32 01,05FC 91 82 sta (kloc_tmp),y
33 01,05FE A0 A0 ldy #width*5
34 01,0600 91 82 sta (kloc_tmp),y
35 01,0602 A0 C0 ldy #width*6
36 01,0604 91 82 sta (kloc_tmp),y
37 01,0606 A0 E0 ldy #width*7
38 01,0608 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
476 01,060A sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,060A AA tax
11 01,060B A5 80 lda kloc
12 01,060D 18 clc
13 01,060E 69 01 adc <1+WIDTH*8
14 01,0610 85 82 sta kloc_tmp
15 01,0612 A5 81 lda kloc+1
16 01,0614 69 01 adc >1+WIDTH*8
17 01,0616 85 83 sta kloc_tmp+1
21 01,0618 8A txa
23 01,0619 A0 00 ldy #0
24 01,061B 91 82 sta (kloc_tmp),y
25 01,061D A0 20 ldy #width
26 01,061F 91 82 sta (kloc_tmp),y
27 01,0621 A0 40 ldy #width*2
28 01,0623 91 82 sta (kloc_tmp),y
29 01,0625 A0 60 ldy #width*3
30 01,0627 91 82 sta (kloc_tmp),y
31 01,0629 A0 80 ldy #width*4
32 01,062B 91 82 sta (kloc_tmp),y
33 01,062D A0 A0 ldy #width*5
34 01,062F 91 82 sta (kloc_tmp),y
35 01,0631 A0 C0 ldy #width*6
36 01,0633 91 82 sta (kloc_tmp),y
37 01,0635 A0 E0 ldy #width*7
38 01,0637 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
477 01,0639 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0639 AA tax
11 01,063A A5 80 lda kloc
12 01,063C 18 clc
13 01,063D 69 02 adc <2+WIDTH*8
14 01,063F 85 82 sta kloc_tmp
15 01,0641 A5 81 lda kloc+1
16 01,0643 69 01 adc >2+WIDTH*8
17 01,0645 85 83 sta kloc_tmp+1
21 01,0647 8A txa
23 01,0648 A0 00 ldy #0
24 01,064A 91 82 sta (kloc_tmp),y
25 01,064C A0 20 ldy #width
26 01,064E 91 82 sta (kloc_tmp),y
27 01,0650 A0 40 ldy #width*2
28 01,0652 91 82 sta (kloc_tmp),y
29 01,0654 A0 60 ldy #width*3
30 01,0656 91 82 sta (kloc_tmp),y
31 01,0658 A0 80 ldy #width*4
32 01,065A 91 82 sta (kloc_tmp),y
33 01,065C A0 A0 ldy #width*5
34 01,065E 91 82 sta (kloc_tmp),y
35 01,0660 A0 C0 ldy #width*6
36 01,0662 91 82 sta (kloc_tmp),y
37 01,0664 A0 E0 ldy #width*7
38 01,0666 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
478 01,0668 sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0668 AA tax
11 01,0669 A5 80 lda kloc
12 01,066B 18 clc
13 01,066C 69 00 adc <WIDTH*2*8
14 01,066E 85 82 sta kloc_tmp
15 01,0670 A5 81 lda kloc+1
16 01,0672 69 02 adc >WIDTH*2*8
17 01,0674 85 83 sta kloc_tmp+1
21 01,0676 8A txa
23 01,0677 A0 00 ldy #0
24 01,0679 91 82 sta (kloc_tmp),y
25 01,067B A0 20 ldy #width
26 01,067D 91 82 sta (kloc_tmp),y
27 01,067F A0 40 ldy #width*2
28 01,0681 91 82 sta (kloc_tmp),y
29 01,0683 A0 60 ldy #width*3
30 01,0685 91 82 sta (kloc_tmp),y
31 01,0687 A0 80 ldy #width*4
32 01,0689 91 82 sta (kloc_tmp),y
33 01,068B A0 A0 ldy #width*5
34 01,068D 91 82 sta (kloc_tmp),y
35 01,068F A0 C0 ldy #width*6
36 01,0691 91 82 sta (kloc_tmp),y
37 01,0693 A0 E0 ldy #width*7
38 01,0695 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
479 01,0697 60 rts
480
481 01,0698 test
482 01,0698 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0698 AA tax
11 01,0699 A5 80 lda kloc
12 01,069B 18 clc
13 01,069C 69 00 adc <WIDTH*8
14 01,069E 85 82 sta kloc_tmp
15 01,06A0 A5 81 lda kloc+1
16 01,06A2 69 01 adc >WIDTH*8
17 01,06A4 85 83 sta kloc_tmp+1
21 01,06A6 A0 00 ldy #0
22 01,06A8 8A txa
24 01,06A9 11 82 ora (kloc_tmp),y
25 01,06AB A0 20 ldy #width
26 01,06AD 11 82 ora (kloc_tmp),y
27 01,06AF A0 40 ldy #width*2
28 01,06B1 11 82 ora (kloc_tmp),y
29 01,06B3 A0 60 ldy #width*3
30 01,06B5 11 82 ora (kloc_tmp),y
31 01,06B7 A0 80 ldy #width*4
32 01,06B9 11 82 ora (kloc_tmp),y
33 01,06BB A0 A0 ldy #width*5
34 01,06BD 11 82 ora (kloc_tmp),y
35 01,06BF A0 C0 ldy #width*6
36 01,06C1 11 82 ora (kloc_tmp),y
37 01,06C3 A0 E0 ldy #width*7
38 01,06C5 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
483 01,06C7 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,06C7 AA tax
11 01,06C8 A5 80 lda kloc
12 01,06CA 18 clc
13 01,06CB 69 01 adc <1+WIDTH*8
14 01,06CD 85 82 sta kloc_tmp
15 01,06CF A5 81 lda kloc+1
16 01,06D1 69 01 adc >1+WIDTH*8
17 01,06D3 85 83 sta kloc_tmp+1
21 01,06D5 A0 00 ldy #0
22 01,06D7 8A txa
24 01,06D8 11 82 ora (kloc_tmp),y
25 01,06DA A0 20 ldy #width
26 01,06DC 11 82 ora (kloc_tmp),y
27 01,06DE A0 40 ldy #width*2
28 01,06E0 11 82 ora (kloc_tmp),y
29 01,06E2 A0 60 ldy #width*3
30 01,06E4 11 82 ora (kloc_tmp),y
31 01,06E6 A0 80 ldy #width*4
32 01,06E8 11 82 ora (kloc_tmp),y
33 01,06EA A0 A0 ldy #width*5
34 01,06EC 11 82 ora (kloc_tmp),y
35 01,06EE A0 C0 ldy #width*6
36 01,06F0 11 82 ora (kloc_tmp),y
37 01,06F2 A0 E0 ldy #width*7
38 01,06F4 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
484 01,06F6 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,06F6 AA tax
11 01,06F7 A5 80 lda kloc
12 01,06F9 18 clc
13 01,06FA 69 02 adc <2+WIDTH*8
14 01,06FC 85 82 sta kloc_tmp
15 01,06FE A5 81 lda kloc+1
16 01,0700 69 01 adc >2+WIDTH*8
17 01,0702 85 83 sta kloc_tmp+1
21 01,0704 A0 00 ldy #0
22 01,0706 8A txa
24 01,0707 11 82 ora (kloc_tmp),y
25 01,0709 A0 20 ldy #width
26 01,070B 11 82 ora (kloc_tmp),y
27 01,070D A0 40 ldy #width*2
28 01,070F 11 82 ora (kloc_tmp),y
29 01,0711 A0 60 ldy #width*3
30 01,0713 11 82 ora (kloc_tmp),y
31 01,0715 A0 80 ldy #width*4
32 01,0717 11 82 ora (kloc_tmp),y
33 01,0719 A0 A0 ldy #width*5
34 01,071B 11 82 ora (kloc_tmp),y
35 01,071D A0 C0 ldy #width*6
36 01,071F 11 82 ora (kloc_tmp),y
37 01,0721 A0 E0 ldy #width*7
38 01,0723 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
485 01,0725 lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0725 AA tax
11 01,0726 A5 80 lda kloc
12 01,0728 18 clc
13 01,0729 69 00 adc <WIDTH*2*8
14 01,072B 85 82 sta kloc_tmp
15 01,072D A5 81 lda kloc+1
16 01,072F 69 02 adc >WIDTH*2*8
17 01,0731 85 83 sta kloc_tmp+1
21 01,0733 A0 00 ldy #0
22 01,0735 8A txa
24 01,0736 11 82 ora (kloc_tmp),y
25 01,0738 A0 20 ldy #width
26 01,073A 11 82 ora (kloc_tmp),y
27 01,073C A0 40 ldy #width*2
28 01,073E 11 82 ora (kloc_tmp),y
29 01,0740 A0 60 ldy #width*3
30 01,0742 11 82 ora (kloc_tmp),y
31 01,0744 A0 80 ldy #width*4
32 01,0746 11 82 ora (kloc_tmp),y
33 01,0748 A0 A0 ldy #width*5
34 01,074A 11 82 ora (kloc_tmp),y
35 01,074C A0 C0 ldy #width*6
36 01,074E 11 82 ora (kloc_tmp),y
37 01,0750 A0 E0 ldy #width*7
38 01,0752 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
486 01,0754 60 rts
487 .endp
488
489
490 ; '** '
491 ; ' * '
492 ; ' * '
493 01,0755 .proc klocek2_2
494 01,0755 sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0755 AA tax
4 01,0756 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,075E 8A txa
23 01,075F A0 00 ldy #0
24 01,0761 91 82 sta (kloc_tmp),y
25 01,0763 A0 20 ldy #width
26 01,0765 91 82 sta (kloc_tmp),y
27 01,0767 A0 40 ldy #width*2
28 01,0769 91 82 sta (kloc_tmp),y
29 01,076B A0 60 ldy #width*3
30 01,076D 91 82 sta (kloc_tmp),y
31 01,076F A0 80 ldy #width*4
32 01,0771 91 82 sta (kloc_tmp),y
33 01,0773 A0 A0 ldy #width*5
34 01,0775 91 82 sta (kloc_tmp),y
35 01,0777 A0 C0 ldy #width*6
36 01,0779 91 82 sta (kloc_tmp),y
37 01,077B A0 E0 ldy #width*7
38 01,077D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
495 01,077F sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,077F AA tax
7 01,0780 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,0788 E6 82 D0 02 E6 + inw kloc_tmp
21 01,078E 8A txa
23 01,078F A0 00 ldy #0
24 01,0791 91 82 sta (kloc_tmp),y
25 01,0793 A0 20 ldy #width
26 01,0795 91 82 sta (kloc_tmp),y
27 01,0797 A0 40 ldy #width*2
28 01,0799 91 82 sta (kloc_tmp),y
29 01,079B A0 60 ldy #width*3
30 01,079D 91 82 sta (kloc_tmp),y
31 01,079F A0 80 ldy #width*4
32 01,07A1 91 82 sta (kloc_tmp),y
33 01,07A3 A0 A0 ldy #width*5
34 01,07A5 91 82 sta (kloc_tmp),y
35 01,07A7 A0 C0 ldy #width*6
36 01,07A9 91 82 sta (kloc_tmp),y
37 01,07AB A0 E0 ldy #width*7
38 01,07AD 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
496 01,07AF sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,07AF AA tax
11 01,07B0 A5 80 lda kloc
12 01,07B2 18 clc
13 01,07B3 69 01 adc <1+WIDTH*8
14 01,07B5 85 82 sta kloc_tmp
15 01,07B7 A5 81 lda kloc+1
16 01,07B9 69 01 adc >1+WIDTH*8
17 01,07BB 85 83 sta kloc_tmp+1
21 01,07BD 8A txa
23 01,07BE A0 00 ldy #0
24 01,07C0 91 82 sta (kloc_tmp),y
25 01,07C2 A0 20 ldy #width
26 01,07C4 91 82 sta (kloc_tmp),y
27 01,07C6 A0 40 ldy #width*2
28 01,07C8 91 82 sta (kloc_tmp),y
29 01,07CA A0 60 ldy #width*3
30 01,07CC 91 82 sta (kloc_tmp),y
31 01,07CE A0 80 ldy #width*4
32 01,07D0 91 82 sta (kloc_tmp),y
33 01,07D2 A0 A0 ldy #width*5
34 01,07D4 91 82 sta (kloc_tmp),y
35 01,07D6 A0 C0 ldy #width*6
36 01,07D8 91 82 sta (kloc_tmp),y
37 01,07DA A0 E0 ldy #width*7
38 01,07DC 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
497 01,07DE sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,07DE AA tax
11 01,07DF A5 80 lda kloc
12 01,07E1 18 clc
13 01,07E2 69 01 adc <1+WIDTH*2*8
14 01,07E4 85 82 sta kloc_tmp
15 01,07E6 A5 81 lda kloc+1
16 01,07E8 69 02 adc >1+WIDTH*2*8
17 01,07EA 85 83 sta kloc_tmp+1
21 01,07EC 8A txa
23 01,07ED A0 00 ldy #0
24 01,07EF 91 82 sta (kloc_tmp),y
25 01,07F1 A0 20 ldy #width
26 01,07F3 91 82 sta (kloc_tmp),y
27 01,07F5 A0 40 ldy #width*2
28 01,07F7 91 82 sta (kloc_tmp),y
29 01,07F9 A0 60 ldy #width*3
30 01,07FB 91 82 sta (kloc_tmp),y
31 01,07FD A0 80 ldy #width*4
32 01,07FF 91 82 sta (kloc_tmp),y
33 01,0801 A0 A0 ldy #width*5
34 01,0803 91 82 sta (kloc_tmp),y
35 01,0805 A0 C0 ldy #width*6
36 01,0807 91 82 sta (kloc_tmp),y
37 01,0809 A0 E0 ldy #width*7
38 01,080B 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
498 01,080D 60 rts
499
500 01,080E test
501 01,080E lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,080E AA tax
4 01,080F A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,0817 A0 00 ldy #0
22 01,0819 8A txa
24 01,081A 11 82 ora (kloc_tmp),y
25 01,081C A0 20 ldy #width
26 01,081E 11 82 ora (kloc_tmp),y
27 01,0820 A0 40 ldy #width*2
28 01,0822 11 82 ora (kloc_tmp),y
29 01,0824 A0 60 ldy #width*3
30 01,0826 11 82 ora (kloc_tmp),y
31 01,0828 A0 80 ldy #width*4
32 01,082A 11 82 ora (kloc_tmp),y
33 01,082C A0 A0 ldy #width*5
34 01,082E 11 82 ora (kloc_tmp),y
35 01,0830 A0 C0 ldy #width*6
36 01,0832 11 82 ora (kloc_tmp),y
37 01,0834 A0 E0 ldy #width*7
38 01,0836 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
502 01,0838 lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0838 AA tax
7 01,0839 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,0841 E6 82 D0 02 E6 + inw kloc_tmp
21 01,0847 A0 00 ldy #0
22 01,0849 8A txa
24 01,084A 11 82 ora (kloc_tmp),y
25 01,084C A0 20 ldy #width
26 01,084E 11 82 ora (kloc_tmp),y
27 01,0850 A0 40 ldy #width*2
28 01,0852 11 82 ora (kloc_tmp),y
29 01,0854 A0 60 ldy #width*3
30 01,0856 11 82 ora (kloc_tmp),y
31 01,0858 A0 80 ldy #width*4
32 01,085A 11 82 ora (kloc_tmp),y
33 01,085C A0 A0 ldy #width*5
34 01,085E 11 82 ora (kloc_tmp),y
35 01,0860 A0 C0 ldy #width*6
36 01,0862 11 82 ora (kloc_tmp),y
37 01,0864 A0 E0 ldy #width*7
38 01,0866 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
503 01,0868 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0868 AA tax
11 01,0869 A5 80 lda kloc
12 01,086B 18 clc
13 01,086C 69 01 adc <1+WIDTH*8
14 01,086E 85 82 sta kloc_tmp
15 01,0870 A5 81 lda kloc+1
16 01,0872 69 01 adc >1+WIDTH*8
17 01,0874 85 83 sta kloc_tmp+1
21 01,0876 A0 00 ldy #0
22 01,0878 8A txa
24 01,0879 11 82 ora (kloc_tmp),y
25 01,087B A0 20 ldy #width
26 01,087D 11 82 ora (kloc_tmp),y
27 01,087F A0 40 ldy #width*2
28 01,0881 11 82 ora (kloc_tmp),y
29 01,0883 A0 60 ldy #width*3
30 01,0885 11 82 ora (kloc_tmp),y
31 01,0887 A0 80 ldy #width*4
32 01,0889 11 82 ora (kloc_tmp),y
33 01,088B A0 A0 ldy #width*5
34 01,088D 11 82 ora (kloc_tmp),y
35 01,088F A0 C0 ldy #width*6
36 01,0891 11 82 ora (kloc_tmp),y
37 01,0893 A0 E0 ldy #width*7
38 01,0895 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
504 01,0897 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0897 AA tax
11 01,0898 A5 80 lda kloc
12 01,089A 18 clc
13 01,089B 69 01 adc <1+WIDTH*2*8
14 01,089D 85 82 sta kloc_tmp
15 01,089F A5 81 lda kloc+1
16 01,08A1 69 02 adc >1+WIDTH*2*8
17 01,08A3 85 83 sta kloc_tmp+1
21 01,08A5 A0 00 ldy #0
22 01,08A7 8A txa
24 01,08A8 11 82 ora (kloc_tmp),y
25 01,08AA A0 20 ldy #width
26 01,08AC 11 82 ora (kloc_tmp),y
27 01,08AE A0 40 ldy #width*2
28 01,08B0 11 82 ora (kloc_tmp),y
29 01,08B2 A0 60 ldy #width*3
30 01,08B4 11 82 ora (kloc_tmp),y
31 01,08B6 A0 80 ldy #width*4
32 01,08B8 11 82 ora (kloc_tmp),y
33 01,08BA A0 A0 ldy #width*5
34 01,08BC 11 82 ora (kloc_tmp),y
35 01,08BE A0 C0 ldy #width*6
36 01,08C0 11 82 ora (kloc_tmp),y
37 01,08C2 A0 E0 ldy #width*7
38 01,08C4 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
505 01,08C6 60 rts
506 .endp
507
508
509 ; ' *'
510 ; '***'
511 ; ' '
512 01,08C7 .proc klocek2_3
513 01,08C7 sta_kloc 2
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,08C7 AA tax
11 01,08C8 A5 80 lda kloc
12 01,08CA 18 clc
13 01,08CB 69 02 adc <2
14 01,08CD 85 82 sta kloc_tmp
15 01,08CF A5 81 lda kloc+1
16 01,08D1 69 00 adc >2
17 01,08D3 85 83 sta kloc_tmp+1
21 01,08D5 8A txa
23 01,08D6 A0 00 ldy #0
24 01,08D8 91 82 sta (kloc_tmp),y
25 01,08DA A0 20 ldy #width
26 01,08DC 91 82 sta (kloc_tmp),y
27 01,08DE A0 40 ldy #width*2
28 01,08E0 91 82 sta (kloc_tmp),y
29 01,08E2 A0 60 ldy #width*3
30 01,08E4 91 82 sta (kloc_tmp),y
31 01,08E6 A0 80 ldy #width*4
32 01,08E8 91 82 sta (kloc_tmp),y
33 01,08EA A0 A0 ldy #width*5
34 01,08EC 91 82 sta (kloc_tmp),y
35 01,08EE A0 C0 ldy #width*6
36 01,08F0 91 82 sta (kloc_tmp),y
37 01,08F2 A0 E0 ldy #width*7
38 01,08F4 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
514 01,08F6 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,08F6 AA tax
11 01,08F7 A5 80 lda kloc
12 01,08F9 18 clc
13 01,08FA 69 00 adc <WIDTH*8
14 01,08FC 85 82 sta kloc_tmp
15 01,08FE A5 81 lda kloc+1
16 01,0900 69 01 adc >WIDTH*8
17 01,0902 85 83 sta kloc_tmp+1
21 01,0904 8A txa
23 01,0905 A0 00 ldy #0
24 01,0907 91 82 sta (kloc_tmp),y
25 01,0909 A0 20 ldy #width
26 01,090B 91 82 sta (kloc_tmp),y
27 01,090D A0 40 ldy #width*2
28 01,090F 91 82 sta (kloc_tmp),y
29 01,0911 A0 60 ldy #width*3
30 01,0913 91 82 sta (kloc_tmp),y
31 01,0915 A0 80 ldy #width*4
32 01,0917 91 82 sta (kloc_tmp),y
33 01,0919 A0 A0 ldy #width*5
34 01,091B 91 82 sta (kloc_tmp),y
35 01,091D A0 C0 ldy #width*6
36 01,091F 91 82 sta (kloc_tmp),y
37 01,0921 A0 E0 ldy #width*7
38 01,0923 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
515 01,0925 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0925 AA tax
11 01,0926 A5 80 lda kloc
12 01,0928 18 clc
13 01,0929 69 01 adc <1+WIDTH*8
14 01,092B 85 82 sta kloc_tmp
15 01,092D A5 81 lda kloc+1
16 01,092F 69 01 adc >1+WIDTH*8
17 01,0931 85 83 sta kloc_tmp+1
21 01,0933 8A txa
23 01,0934 A0 00 ldy #0
24 01,0936 91 82 sta (kloc_tmp),y
25 01,0938 A0 20 ldy #width
26 01,093A 91 82 sta (kloc_tmp),y
27 01,093C A0 40 ldy #width*2
28 01,093E 91 82 sta (kloc_tmp),y
29 01,0940 A0 60 ldy #width*3
30 01,0942 91 82 sta (kloc_tmp),y
31 01,0944 A0 80 ldy #width*4
32 01,0946 91 82 sta (kloc_tmp),y
33 01,0948 A0 A0 ldy #width*5
34 01,094A 91 82 sta (kloc_tmp),y
35 01,094C A0 C0 ldy #width*6
36 01,094E 91 82 sta (kloc_tmp),y
37 01,0950 A0 E0 ldy #width*7
38 01,0952 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
516 01,0954 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0954 AA tax
11 01,0955 A5 80 lda kloc
12 01,0957 18 clc
13 01,0958 69 02 adc <2+WIDTH*8
14 01,095A 85 82 sta kloc_tmp
15 01,095C A5 81 lda kloc+1
16 01,095E 69 01 adc >2+WIDTH*8
17 01,0960 85 83 sta kloc_tmp+1
21 01,0962 8A txa
23 01,0963 A0 00 ldy #0
24 01,0965 91 82 sta (kloc_tmp),y
25 01,0967 A0 20 ldy #width
26 01,0969 91 82 sta (kloc_tmp),y
27 01,096B A0 40 ldy #width*2
28 01,096D 91 82 sta (kloc_tmp),y
29 01,096F A0 60 ldy #width*3
30 01,0971 91 82 sta (kloc_tmp),y
31 01,0973 A0 80 ldy #width*4
32 01,0975 91 82 sta (kloc_tmp),y
33 01,0977 A0 A0 ldy #width*5
34 01,0979 91 82 sta (kloc_tmp),y
35 01,097B A0 C0 ldy #width*6
36 01,097D 91 82 sta (kloc_tmp),y
37 01,097F A0 E0 ldy #width*7
38 01,0981 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
517 01,0983 60 rts
518
519 01,0984 test
520 01,0984 lda_kloc 2
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0984 AA tax
11 01,0985 A5 80 lda kloc
12 01,0987 18 clc
13 01,0988 69 02 adc <2
14 01,098A 85 82 sta kloc_tmp
15 01,098C A5 81 lda kloc+1
16 01,098E 69 00 adc >2
17 01,0990 85 83 sta kloc_tmp+1
21 01,0992 A0 00 ldy #0
22 01,0994 8A txa
24 01,0995 11 82 ora (kloc_tmp),y
25 01,0997 A0 20 ldy #width
26 01,0999 11 82 ora (kloc_tmp),y
27 01,099B A0 40 ldy #width*2
28 01,099D 11 82 ora (kloc_tmp),y
29 01,099F A0 60 ldy #width*3
30 01,09A1 11 82 ora (kloc_tmp),y
31 01,09A3 A0 80 ldy #width*4
32 01,09A5 11 82 ora (kloc_tmp),y
33 01,09A7 A0 A0 ldy #width*5
34 01,09A9 11 82 ora (kloc_tmp),y
35 01,09AB A0 C0 ldy #width*6
36 01,09AD 11 82 ora (kloc_tmp),y
37 01,09AF A0 E0 ldy #width*7
38 01,09B1 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
521 01,09B3 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,09B3 AA tax
11 01,09B4 A5 80 lda kloc
12 01,09B6 18 clc
13 01,09B7 69 00 adc <WIDTH*8
14 01,09B9 85 82 sta kloc_tmp
15 01,09BB A5 81 lda kloc+1
16 01,09BD 69 01 adc >WIDTH*8
17 01,09BF 85 83 sta kloc_tmp+1
21 01,09C1 A0 00 ldy #0
22 01,09C3 8A txa
24 01,09C4 11 82 ora (kloc_tmp),y
25 01,09C6 A0 20 ldy #width
26 01,09C8 11 82 ora (kloc_tmp),y
27 01,09CA A0 40 ldy #width*2
28 01,09CC 11 82 ora (kloc_tmp),y
29 01,09CE A0 60 ldy #width*3
30 01,09D0 11 82 ora (kloc_tmp),y
31 01,09D2 A0 80 ldy #width*4
32 01,09D4 11 82 ora (kloc_tmp),y
33 01,09D6 A0 A0 ldy #width*5
34 01,09D8 11 82 ora (kloc_tmp),y
35 01,09DA A0 C0 ldy #width*6
36 01,09DC 11 82 ora (kloc_tmp),y
37 01,09DE A0 E0 ldy #width*7
38 01,09E0 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
522 01,09E2 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,09E2 AA tax
11 01,09E3 A5 80 lda kloc
12 01,09E5 18 clc
13 01,09E6 69 01 adc <1+WIDTH*8
14 01,09E8 85 82 sta kloc_tmp
15 01,09EA A5 81 lda kloc+1
16 01,09EC 69 01 adc >1+WIDTH*8
17 01,09EE 85 83 sta kloc_tmp+1
21 01,09F0 A0 00 ldy #0
22 01,09F2 8A txa
24 01,09F3 11 82 ora (kloc_tmp),y
25 01,09F5 A0 20 ldy #width
26 01,09F7 11 82 ora (kloc_tmp),y
27 01,09F9 A0 40 ldy #width*2
28 01,09FB 11 82 ora (kloc_tmp),y
29 01,09FD A0 60 ldy #width*3
30 01,09FF 11 82 ora (kloc_tmp),y
31 01,0A01 A0 80 ldy #width*4
32 01,0A03 11 82 ora (kloc_tmp),y
33 01,0A05 A0 A0 ldy #width*5
34 01,0A07 11 82 ora (kloc_tmp),y
35 01,0A09 A0 C0 ldy #width*6
36 01,0A0B 11 82 ora (kloc_tmp),y
37 01,0A0D A0 E0 ldy #width*7
38 01,0A0F 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
523 01,0A11 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0A11 AA tax
11 01,0A12 A5 80 lda kloc
12 01,0A14 18 clc
13 01,0A15 69 02 adc <2+WIDTH*8
14 01,0A17 85 82 sta kloc_tmp
15 01,0A19 A5 81 lda kloc+1
16 01,0A1B 69 01 adc >2+WIDTH*8
17 01,0A1D 85 83 sta kloc_tmp+1
21 01,0A1F A0 00 ldy #0
22 01,0A21 8A txa
24 01,0A22 11 82 ora (kloc_tmp),y
25 01,0A24 A0 20 ldy #width
26 01,0A26 11 82 ora (kloc_tmp),y
27 01,0A28 A0 40 ldy #width*2
28 01,0A2A 11 82 ora (kloc_tmp),y
29 01,0A2C A0 60 ldy #width*3
30 01,0A2E 11 82 ora (kloc_tmp),y
31 01,0A30 A0 80 ldy #width*4
32 01,0A32 11 82 ora (kloc_tmp),y
33 01,0A34 A0 A0 ldy #width*5
34 01,0A36 11 82 ora (kloc_tmp),y
35 01,0A38 A0 C0 ldy #width*6
36 01,0A3A 11 82 ora (kloc_tmp),y
37 01,0A3C A0 E0 ldy #width*7
38 01,0A3E 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
524 01,0A40 60 rts
525 .endp
526
527
528 * KLOCEK 3 (1 faza)
529 ; ' '
530 ; ' **'
531 ; ' **'
532 01,0A41 .proc klocek3_0
533 01,0A41 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0A41 AA tax
11 01,0A42 A5 80 lda kloc
12 01,0A44 18 clc
13 01,0A45 69 01 adc <1+WIDTH*8
14 01,0A47 85 82 sta kloc_tmp
15 01,0A49 A5 81 lda kloc+1
16 01,0A4B 69 01 adc >1+WIDTH*8
17 01,0A4D 85 83 sta kloc_tmp+1
21 01,0A4F 8A txa
23 01,0A50 A0 00 ldy #0
24 01,0A52 91 82 sta (kloc_tmp),y
25 01,0A54 A0 20 ldy #width
26 01,0A56 91 82 sta (kloc_tmp),y
27 01,0A58 A0 40 ldy #width*2
28 01,0A5A 91 82 sta (kloc_tmp),y
29 01,0A5C A0 60 ldy #width*3
30 01,0A5E 91 82 sta (kloc_tmp),y
31 01,0A60 A0 80 ldy #width*4
32 01,0A62 91 82 sta (kloc_tmp),y
33 01,0A64 A0 A0 ldy #width*5
34 01,0A66 91 82 sta (kloc_tmp),y
35 01,0A68 A0 C0 ldy #width*6
36 01,0A6A 91 82 sta (kloc_tmp),y
37 01,0A6C A0 E0 ldy #width*7
38 01,0A6E 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
534 01,0A70 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0A70 AA tax
11 01,0A71 A5 80 lda kloc
12 01,0A73 18 clc
13 01,0A74 69 02 adc <2+WIDTH*8
14 01,0A76 85 82 sta kloc_tmp
15 01,0A78 A5 81 lda kloc+1
16 01,0A7A 69 01 adc >2+WIDTH*8
17 01,0A7C 85 83 sta kloc_tmp+1
21 01,0A7E 8A txa
23 01,0A7F A0 00 ldy #0
24 01,0A81 91 82 sta (kloc_tmp),y
25 01,0A83 A0 20 ldy #width
26 01,0A85 91 82 sta (kloc_tmp),y
27 01,0A87 A0 40 ldy #width*2
28 01,0A89 91 82 sta (kloc_tmp),y
29 01,0A8B A0 60 ldy #width*3
30 01,0A8D 91 82 sta (kloc_tmp),y
31 01,0A8F A0 80 ldy #width*4
32 01,0A91 91 82 sta (kloc_tmp),y
33 01,0A93 A0 A0 ldy #width*5
34 01,0A95 91 82 sta (kloc_tmp),y
35 01,0A97 A0 C0 ldy #width*6
36 01,0A99 91 82 sta (kloc_tmp),y
37 01,0A9B A0 E0 ldy #width*7
38 01,0A9D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
535 01,0A9F sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0A9F AA tax
11 01,0AA0 A5 80 lda kloc
12 01,0AA2 18 clc
13 01,0AA3 69 01 adc <1+WIDTH*2*8
14 01,0AA5 85 82 sta kloc_tmp
15 01,0AA7 A5 81 lda kloc+1
16 01,0AA9 69 02 adc >1+WIDTH*2*8
17 01,0AAB 85 83 sta kloc_tmp+1
21 01,0AAD 8A txa
23 01,0AAE A0 00 ldy #0
24 01,0AB0 91 82 sta (kloc_tmp),y
25 01,0AB2 A0 20 ldy #width
26 01,0AB4 91 82 sta (kloc_tmp),y
27 01,0AB6 A0 40 ldy #width*2
28 01,0AB8 91 82 sta (kloc_tmp),y
29 01,0ABA A0 60 ldy #width*3
30 01,0ABC 91 82 sta (kloc_tmp),y
31 01,0ABE A0 80 ldy #width*4
32 01,0AC0 91 82 sta (kloc_tmp),y
33 01,0AC2 A0 A0 ldy #width*5
34 01,0AC4 91 82 sta (kloc_tmp),y
35 01,0AC6 A0 C0 ldy #width*6
36 01,0AC8 91 82 sta (kloc_tmp),y
37 01,0ACA A0 E0 ldy #width*7
38 01,0ACC 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
536 01,0ACE sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0ACE AA tax
11 01,0ACF A5 80 lda kloc
12 01,0AD1 18 clc
13 01,0AD2 69 02 adc <2+WIDTH*2*8
14 01,0AD4 85 82 sta kloc_tmp
15 01,0AD6 A5 81 lda kloc+1
16 01,0AD8 69 02 adc >2+WIDTH*2*8
17 01,0ADA 85 83 sta kloc_tmp+1
21 01,0ADC 8A txa
23 01,0ADD A0 00 ldy #0
24 01,0ADF 91 82 sta (kloc_tmp),y
25 01,0AE1 A0 20 ldy #width
26 01,0AE3 91 82 sta (kloc_tmp),y
27 01,0AE5 A0 40 ldy #width*2
28 01,0AE7 91 82 sta (kloc_tmp),y
29 01,0AE9 A0 60 ldy #width*3
30 01,0AEB 91 82 sta (kloc_tmp),y
31 01,0AED A0 80 ldy #width*4
32 01,0AEF 91 82 sta (kloc_tmp),y
33 01,0AF1 A0 A0 ldy #width*5
34 01,0AF3 91 82 sta (kloc_tmp),y
35 01,0AF5 A0 C0 ldy #width*6
36 01,0AF7 91 82 sta (kloc_tmp),y
37 01,0AF9 A0 E0 ldy #width*7
38 01,0AFB 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
537 01,0AFD 60 rts
538
539 01,0AFE test
540 01,0AFE lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0AFE AA tax
11 01,0AFF A5 80 lda kloc
12 01,0B01 18 clc
13 01,0B02 69 01 adc <1+WIDTH*8
14 01,0B04 85 82 sta kloc_tmp
15 01,0B06 A5 81 lda kloc+1
16 01,0B08 69 01 adc >1+WIDTH*8
17 01,0B0A 85 83 sta kloc_tmp+1
21 01,0B0C A0 00 ldy #0
22 01,0B0E 8A txa
24 01,0B0F 11 82 ora (kloc_tmp),y
25 01,0B11 A0 20 ldy #width
26 01,0B13 11 82 ora (kloc_tmp),y
27 01,0B15 A0 40 ldy #width*2
28 01,0B17 11 82 ora (kloc_tmp),y
29 01,0B19 A0 60 ldy #width*3
30 01,0B1B 11 82 ora (kloc_tmp),y
31 01,0B1D A0 80 ldy #width*4
32 01,0B1F 11 82 ora (kloc_tmp),y
33 01,0B21 A0 A0 ldy #width*5
34 01,0B23 11 82 ora (kloc_tmp),y
35 01,0B25 A0 C0 ldy #width*6
36 01,0B27 11 82 ora (kloc_tmp),y
37 01,0B29 A0 E0 ldy #width*7
38 01,0B2B 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
541 01,0B2D lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0B2D AA tax
11 01,0B2E A5 80 lda kloc
12 01,0B30 18 clc
13 01,0B31 69 02 adc <2+WIDTH*8
14 01,0B33 85 82 sta kloc_tmp
15 01,0B35 A5 81 lda kloc+1
16 01,0B37 69 01 adc >2+WIDTH*8
17 01,0B39 85 83 sta kloc_tmp+1
21 01,0B3B A0 00 ldy #0
22 01,0B3D 8A txa
24 01,0B3E 11 82 ora (kloc_tmp),y
25 01,0B40 A0 20 ldy #width
26 01,0B42 11 82 ora (kloc_tmp),y
27 01,0B44 A0 40 ldy #width*2
28 01,0B46 11 82 ora (kloc_tmp),y
29 01,0B48 A0 60 ldy #width*3
30 01,0B4A 11 82 ora (kloc_tmp),y
31 01,0B4C A0 80 ldy #width*4
32 01,0B4E 11 82 ora (kloc_tmp),y
33 01,0B50 A0 A0 ldy #width*5
34 01,0B52 11 82 ora (kloc_tmp),y
35 01,0B54 A0 C0 ldy #width*6
36 01,0B56 11 82 ora (kloc_tmp),y
37 01,0B58 A0 E0 ldy #width*7
38 01,0B5A 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
542 01,0B5C lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0B5C AA tax
11 01,0B5D A5 80 lda kloc
12 01,0B5F 18 clc
13 01,0B60 69 01 adc <1+WIDTH*2*8
14 01,0B62 85 82 sta kloc_tmp
15 01,0B64 A5 81 lda kloc+1
16 01,0B66 69 02 adc >1+WIDTH*2*8
17 01,0B68 85 83 sta kloc_tmp+1
21 01,0B6A A0 00 ldy #0
22 01,0B6C 8A txa
24 01,0B6D 11 82 ora (kloc_tmp),y
25 01,0B6F A0 20 ldy #width
26 01,0B71 11 82 ora (kloc_tmp),y
27 01,0B73 A0 40 ldy #width*2
28 01,0B75 11 82 ora (kloc_tmp),y
29 01,0B77 A0 60 ldy #width*3
30 01,0B79 11 82 ora (kloc_tmp),y
31 01,0B7B A0 80 ldy #width*4
32 01,0B7D 11 82 ora (kloc_tmp),y
33 01,0B7F A0 A0 ldy #width*5
34 01,0B81 11 82 ora (kloc_tmp),y
35 01,0B83 A0 C0 ldy #width*6
36 01,0B85 11 82 ora (kloc_tmp),y
37 01,0B87 A0 E0 ldy #width*7
38 01,0B89 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
543 01,0B8B lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0B8B AA tax
11 01,0B8C A5 80 lda kloc
12 01,0B8E 18 clc
13 01,0B8F 69 02 adc <2+WIDTH*2*8
14 01,0B91 85 82 sta kloc_tmp
15 01,0B93 A5 81 lda kloc+1
16 01,0B95 69 02 adc >2+WIDTH*2*8
17 01,0B97 85 83 sta kloc_tmp+1
21 01,0B99 A0 00 ldy #0
22 01,0B9B 8A txa
24 01,0B9C 11 82 ora (kloc_tmp),y
25 01,0B9E A0 20 ldy #width
26 01,0BA0 11 82 ora (kloc_tmp),y
27 01,0BA2 A0 40 ldy #width*2
28 01,0BA4 11 82 ora (kloc_tmp),y
29 01,0BA6 A0 60 ldy #width*3
30 01,0BA8 11 82 ora (kloc_tmp),y
31 01,0BAA A0 80 ldy #width*4
32 01,0BAC 11 82 ora (kloc_tmp),y
33 01,0BAE A0 A0 ldy #width*5
34 01,0BB0 11 82 ora (kloc_tmp),y
35 01,0BB2 A0 C0 ldy #width*6
36 01,0BB4 11 82 ora (kloc_tmp),y
37 01,0BB6 A0 E0 ldy #width*7
38 01,0BB8 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
544 01,0BBA 60 rts
545 .endp
546
547
548 * KLOCEK 4 (2 fazy)
549 ; ' '
550 ; ' **'
551 ; '** '
552 01,0BBB .proc klocek4_0
553 01,0BBB sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0BBB AA tax
11 01,0BBC A5 80 lda kloc
12 01,0BBE 18 clc
13 01,0BBF 69 01 adc <1+WIDTH*8
14 01,0BC1 85 82 sta kloc_tmp
15 01,0BC3 A5 81 lda kloc+1
16 01,0BC5 69 01 adc >1+WIDTH*8
17 01,0BC7 85 83 sta kloc_tmp+1
21 01,0BC9 8A txa
23 01,0BCA A0 00 ldy #0
24 01,0BCC 91 82 sta (kloc_tmp),y
25 01,0BCE A0 20 ldy #width
26 01,0BD0 91 82 sta (kloc_tmp),y
27 01,0BD2 A0 40 ldy #width*2
28 01,0BD4 91 82 sta (kloc_tmp),y
29 01,0BD6 A0 60 ldy #width*3
30 01,0BD8 91 82 sta (kloc_tmp),y
31 01,0BDA A0 80 ldy #width*4
32 01,0BDC 91 82 sta (kloc_tmp),y
33 01,0BDE A0 A0 ldy #width*5
34 01,0BE0 91 82 sta (kloc_tmp),y
35 01,0BE2 A0 C0 ldy #width*6
36 01,0BE4 91 82 sta (kloc_tmp),y
37 01,0BE6 A0 E0 ldy #width*7
38 01,0BE8 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
554 01,0BEA sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0BEA AA tax
11 01,0BEB A5 80 lda kloc
12 01,0BED 18 clc
13 01,0BEE 69 02 adc <2+WIDTH*8
14 01,0BF0 85 82 sta kloc_tmp
15 01,0BF2 A5 81 lda kloc+1
16 01,0BF4 69 01 adc >2+WIDTH*8
17 01,0BF6 85 83 sta kloc_tmp+1
21 01,0BF8 8A txa
23 01,0BF9 A0 00 ldy #0
24 01,0BFB 91 82 sta (kloc_tmp),y
25 01,0BFD A0 20 ldy #width
26 01,0BFF 91 82 sta (kloc_tmp),y
27 01,0C01 A0 40 ldy #width*2
28 01,0C03 91 82 sta (kloc_tmp),y
29 01,0C05 A0 60 ldy #width*3
30 01,0C07 91 82 sta (kloc_tmp),y
31 01,0C09 A0 80 ldy #width*4
32 01,0C0B 91 82 sta (kloc_tmp),y
33 01,0C0D A0 A0 ldy #width*5
34 01,0C0F 91 82 sta (kloc_tmp),y
35 01,0C11 A0 C0 ldy #width*6
36 01,0C13 91 82 sta (kloc_tmp),y
37 01,0C15 A0 E0 ldy #width*7
38 01,0C17 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
555 01,0C19 sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0C19 AA tax
11 01,0C1A A5 80 lda kloc
12 01,0C1C 18 clc
13 01,0C1D 69 00 adc <WIDTH*2*8
14 01,0C1F 85 82 sta kloc_tmp
15 01,0C21 A5 81 lda kloc+1
16 01,0C23 69 02 adc >WIDTH*2*8
17 01,0C25 85 83 sta kloc_tmp+1
21 01,0C27 8A txa
23 01,0C28 A0 00 ldy #0
24 01,0C2A 91 82 sta (kloc_tmp),y
25 01,0C2C A0 20 ldy #width
26 01,0C2E 91 82 sta (kloc_tmp),y
27 01,0C30 A0 40 ldy #width*2
28 01,0C32 91 82 sta (kloc_tmp),y
29 01,0C34 A0 60 ldy #width*3
30 01,0C36 91 82 sta (kloc_tmp),y
31 01,0C38 A0 80 ldy #width*4
32 01,0C3A 91 82 sta (kloc_tmp),y
33 01,0C3C A0 A0 ldy #width*5
34 01,0C3E 91 82 sta (kloc_tmp),y
35 01,0C40 A0 C0 ldy #width*6
36 01,0C42 91 82 sta (kloc_tmp),y
37 01,0C44 A0 E0 ldy #width*7
38 01,0C46 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
556 01,0C48 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0C48 AA tax
11 01,0C49 A5 80 lda kloc
12 01,0C4B 18 clc
13 01,0C4C 69 01 adc <1+WIDTH*2*8
14 01,0C4E 85 82 sta kloc_tmp
15 01,0C50 A5 81 lda kloc+1
16 01,0C52 69 02 adc >1+WIDTH*2*8
17 01,0C54 85 83 sta kloc_tmp+1
21 01,0C56 8A txa
23 01,0C57 A0 00 ldy #0
24 01,0C59 91 82 sta (kloc_tmp),y
25 01,0C5B A0 20 ldy #width
26 01,0C5D 91 82 sta (kloc_tmp),y
27 01,0C5F A0 40 ldy #width*2
28 01,0C61 91 82 sta (kloc_tmp),y
29 01,0C63 A0 60 ldy #width*3
30 01,0C65 91 82 sta (kloc_tmp),y
31 01,0C67 A0 80 ldy #width*4
32 01,0C69 91 82 sta (kloc_tmp),y
33 01,0C6B A0 A0 ldy #width*5
34 01,0C6D 91 82 sta (kloc_tmp),y
35 01,0C6F A0 C0 ldy #width*6
36 01,0C71 91 82 sta (kloc_tmp),y
37 01,0C73 A0 E0 ldy #width*7
38 01,0C75 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
557 01,0C77 60 rts
558
559 01,0C78 test
560 01,0C78 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0C78 AA tax
11 01,0C79 A5 80 lda kloc
12 01,0C7B 18 clc
13 01,0C7C 69 01 adc <1+WIDTH*8
14 01,0C7E 85 82 sta kloc_tmp
15 01,0C80 A5 81 lda kloc+1
16 01,0C82 69 01 adc >1+WIDTH*8
17 01,0C84 85 83 sta kloc_tmp+1
21 01,0C86 A0 00 ldy #0
22 01,0C88 8A txa
24 01,0C89 11 82 ora (kloc_tmp),y
25 01,0C8B A0 20 ldy #width
26 01,0C8D 11 82 ora (kloc_tmp),y
27 01,0C8F A0 40 ldy #width*2
28 01,0C91 11 82 ora (kloc_tmp),y
29 01,0C93 A0 60 ldy #width*3
30 01,0C95 11 82 ora (kloc_tmp),y
31 01,0C97 A0 80 ldy #width*4
32 01,0C99 11 82 ora (kloc_tmp),y
33 01,0C9B A0 A0 ldy #width*5
34 01,0C9D 11 82 ora (kloc_tmp),y
35 01,0C9F A0 C0 ldy #width*6
36 01,0CA1 11 82 ora (kloc_tmp),y
37 01,0CA3 A0 E0 ldy #width*7
38 01,0CA5 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
561 01,0CA7 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0CA7 AA tax
11 01,0CA8 A5 80 lda kloc
12 01,0CAA 18 clc
13 01,0CAB 69 02 adc <2+WIDTH*8
14 01,0CAD 85 82 sta kloc_tmp
15 01,0CAF A5 81 lda kloc+1
16 01,0CB1 69 01 adc >2+WIDTH*8
17 01,0CB3 85 83 sta kloc_tmp+1
21 01,0CB5 A0 00 ldy #0
22 01,0CB7 8A txa
24 01,0CB8 11 82 ora (kloc_tmp),y
25 01,0CBA A0 20 ldy #width
26 01,0CBC 11 82 ora (kloc_tmp),y
27 01,0CBE A0 40 ldy #width*2
28 01,0CC0 11 82 ora (kloc_tmp),y
29 01,0CC2 A0 60 ldy #width*3
30 01,0CC4 11 82 ora (kloc_tmp),y
31 01,0CC6 A0 80 ldy #width*4
32 01,0CC8 11 82 ora (kloc_tmp),y
33 01,0CCA A0 A0 ldy #width*5
34 01,0CCC 11 82 ora (kloc_tmp),y
35 01,0CCE A0 C0 ldy #width*6
36 01,0CD0 11 82 ora (kloc_tmp),y
37 01,0CD2 A0 E0 ldy #width*7
38 01,0CD4 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
562 01,0CD6 lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0CD6 AA tax
11 01,0CD7 A5 80 lda kloc
12 01,0CD9 18 clc
13 01,0CDA 69 00 adc <WIDTH*2*8
14 01,0CDC 85 82 sta kloc_tmp
15 01,0CDE A5 81 lda kloc+1
16 01,0CE0 69 02 adc >WIDTH*2*8
17 01,0CE2 85 83 sta kloc_tmp+1
21 01,0CE4 A0 00 ldy #0
22 01,0CE6 8A txa
24 01,0CE7 11 82 ora (kloc_tmp),y
25 01,0CE9 A0 20 ldy #width
26 01,0CEB 11 82 ora (kloc_tmp),y
27 01,0CED A0 40 ldy #width*2
28 01,0CEF 11 82 ora (kloc_tmp),y
29 01,0CF1 A0 60 ldy #width*3
30 01,0CF3 11 82 ora (kloc_tmp),y
31 01,0CF5 A0 80 ldy #width*4
32 01,0CF7 11 82 ora (kloc_tmp),y
33 01,0CF9 A0 A0 ldy #width*5
34 01,0CFB 11 82 ora (kloc_tmp),y
35 01,0CFD A0 C0 ldy #width*6
36 01,0CFF 11 82 ora (kloc_tmp),y
37 01,0D01 A0 E0 ldy #width*7
38 01,0D03 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
563 01,0D05 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0D05 AA tax
11 01,0D06 A5 80 lda kloc
12 01,0D08 18 clc
13 01,0D09 69 01 adc <1+WIDTH*2*8
14 01,0D0B 85 82 sta kloc_tmp
15 01,0D0D A5 81 lda kloc+1
16 01,0D0F 69 02 adc >1+WIDTH*2*8
17 01,0D11 85 83 sta kloc_tmp+1
21 01,0D13 A0 00 ldy #0
22 01,0D15 8A txa
24 01,0D16 11 82 ora (kloc_tmp),y
25 01,0D18 A0 20 ldy #width
26 01,0D1A 11 82 ora (kloc_tmp),y
27 01,0D1C A0 40 ldy #width*2
28 01,0D1E 11 82 ora (kloc_tmp),y
29 01,0D20 A0 60 ldy #width*3
30 01,0D22 11 82 ora (kloc_tmp),y
31 01,0D24 A0 80 ldy #width*4
32 01,0D26 11 82 ora (kloc_tmp),y
33 01,0D28 A0 A0 ldy #width*5
34 01,0D2A 11 82 ora (kloc_tmp),y
35 01,0D2C A0 C0 ldy #width*6
36 01,0D2E 11 82 ora (kloc_tmp),y
37 01,0D30 A0 E0 ldy #width*7
38 01,0D32 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
564 01,0D34 60 rts
565 .endp
566
567
568 ; '* '
569 ; '** '
570 ; ' * '
571 01,0D35 .proc klocek4_1
572 01,0D35 sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0D35 AA tax
4 01,0D36 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,0D3E 8A txa
23 01,0D3F A0 00 ldy #0
24 01,0D41 91 82 sta (kloc_tmp),y
25 01,0D43 A0 20 ldy #width
26 01,0D45 91 82 sta (kloc_tmp),y
27 01,0D47 A0 40 ldy #width*2
28 01,0D49 91 82 sta (kloc_tmp),y
29 01,0D4B A0 60 ldy #width*3
30 01,0D4D 91 82 sta (kloc_tmp),y
31 01,0D4F A0 80 ldy #width*4
32 01,0D51 91 82 sta (kloc_tmp),y
33 01,0D53 A0 A0 ldy #width*5
34 01,0D55 91 82 sta (kloc_tmp),y
35 01,0D57 A0 C0 ldy #width*6
36 01,0D59 91 82 sta (kloc_tmp),y
37 01,0D5B A0 E0 ldy #width*7
38 01,0D5D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
573 01,0D5F sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0D5F AA tax
11 01,0D60 A5 80 lda kloc
12 01,0D62 18 clc
13 01,0D63 69 00 adc <WIDTH*8
14 01,0D65 85 82 sta kloc_tmp
15 01,0D67 A5 81 lda kloc+1
16 01,0D69 69 01 adc >WIDTH*8
17 01,0D6B 85 83 sta kloc_tmp+1
21 01,0D6D 8A txa
23 01,0D6E A0 00 ldy #0
24 01,0D70 91 82 sta (kloc_tmp),y
25 01,0D72 A0 20 ldy #width
26 01,0D74 91 82 sta (kloc_tmp),y
27 01,0D76 A0 40 ldy #width*2
28 01,0D78 91 82 sta (kloc_tmp),y
29 01,0D7A A0 60 ldy #width*3
30 01,0D7C 91 82 sta (kloc_tmp),y
31 01,0D7E A0 80 ldy #width*4
32 01,0D80 91 82 sta (kloc_tmp),y
33 01,0D82 A0 A0 ldy #width*5
34 01,0D84 91 82 sta (kloc_tmp),y
35 01,0D86 A0 C0 ldy #width*6
36 01,0D88 91 82 sta (kloc_tmp),y
37 01,0D8A A0 E0 ldy #width*7
38 01,0D8C 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
574 01,0D8E sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0D8E AA tax
11 01,0D8F A5 80 lda kloc
12 01,0D91 18 clc
13 01,0D92 69 01 adc <1+WIDTH*8
14 01,0D94 85 82 sta kloc_tmp
15 01,0D96 A5 81 lda kloc+1
16 01,0D98 69 01 adc >1+WIDTH*8
17 01,0D9A 85 83 sta kloc_tmp+1
21 01,0D9C 8A txa
23 01,0D9D A0 00 ldy #0
24 01,0D9F 91 82 sta (kloc_tmp),y
25 01,0DA1 A0 20 ldy #width
26 01,0DA3 91 82 sta (kloc_tmp),y
27 01,0DA5 A0 40 ldy #width*2
28 01,0DA7 91 82 sta (kloc_tmp),y
29 01,0DA9 A0 60 ldy #width*3
30 01,0DAB 91 82 sta (kloc_tmp),y
31 01,0DAD A0 80 ldy #width*4
32 01,0DAF 91 82 sta (kloc_tmp),y
33 01,0DB1 A0 A0 ldy #width*5
34 01,0DB3 91 82 sta (kloc_tmp),y
35 01,0DB5 A0 C0 ldy #width*6
36 01,0DB7 91 82 sta (kloc_tmp),y
37 01,0DB9 A0 E0 ldy #width*7
38 01,0DBB 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
575 01,0DBD sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0DBD AA tax
11 01,0DBE A5 80 lda kloc
12 01,0DC0 18 clc
13 01,0DC1 69 01 adc <1+WIDTH*2*8
14 01,0DC3 85 82 sta kloc_tmp
15 01,0DC5 A5 81 lda kloc+1
16 01,0DC7 69 02 adc >1+WIDTH*2*8
17 01,0DC9 85 83 sta kloc_tmp+1
21 01,0DCB 8A txa
23 01,0DCC A0 00 ldy #0
24 01,0DCE 91 82 sta (kloc_tmp),y
25 01,0DD0 A0 20 ldy #width
26 01,0DD2 91 82 sta (kloc_tmp),y
27 01,0DD4 A0 40 ldy #width*2
28 01,0DD6 91 82 sta (kloc_tmp),y
29 01,0DD8 A0 60 ldy #width*3
30 01,0DDA 91 82 sta (kloc_tmp),y
31 01,0DDC A0 80 ldy #width*4
32 01,0DDE 91 82 sta (kloc_tmp),y
33 01,0DE0 A0 A0 ldy #width*5
34 01,0DE2 91 82 sta (kloc_tmp),y
35 01,0DE4 A0 C0 ldy #width*6
36 01,0DE6 91 82 sta (kloc_tmp),y
37 01,0DE8 A0 E0 ldy #width*7
38 01,0DEA 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
576 01,0DEC 60 rts
577
578 01,0DED test
579 01,0DED lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0DED AA tax
4 01,0DEE A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,0DF6 A0 00 ldy #0
22 01,0DF8 8A txa
24 01,0DF9 11 82 ora (kloc_tmp),y
25 01,0DFB A0 20 ldy #width
26 01,0DFD 11 82 ora (kloc_tmp),y
27 01,0DFF A0 40 ldy #width*2
28 01,0E01 11 82 ora (kloc_tmp),y
29 01,0E03 A0 60 ldy #width*3
30 01,0E05 11 82 ora (kloc_tmp),y
31 01,0E07 A0 80 ldy #width*4
32 01,0E09 11 82 ora (kloc_tmp),y
33 01,0E0B A0 A0 ldy #width*5
34 01,0E0D 11 82 ora (kloc_tmp),y
35 01,0E0F A0 C0 ldy #width*6
36 01,0E11 11 82 ora (kloc_tmp),y
37 01,0E13 A0 E0 ldy #width*7
38 01,0E15 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
580 01,0E17 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0E17 AA tax
11 01,0E18 A5 80 lda kloc
12 01,0E1A 18 clc
13 01,0E1B 69 00 adc <WIDTH*8
14 01,0E1D 85 82 sta kloc_tmp
15 01,0E1F A5 81 lda kloc+1
16 01,0E21 69 01 adc >WIDTH*8
17 01,0E23 85 83 sta kloc_tmp+1
21 01,0E25 A0 00 ldy #0
22 01,0E27 8A txa
24 01,0E28 11 82 ora (kloc_tmp),y
25 01,0E2A A0 20 ldy #width
26 01,0E2C 11 82 ora (kloc_tmp),y
27 01,0E2E A0 40 ldy #width*2
28 01,0E30 11 82 ora (kloc_tmp),y
29 01,0E32 A0 60 ldy #width*3
30 01,0E34 11 82 ora (kloc_tmp),y
31 01,0E36 A0 80 ldy #width*4
32 01,0E38 11 82 ora (kloc_tmp),y
33 01,0E3A A0 A0 ldy #width*5
34 01,0E3C 11 82 ora (kloc_tmp),y
35 01,0E3E A0 C0 ldy #width*6
36 01,0E40 11 82 ora (kloc_tmp),y
37 01,0E42 A0 E0 ldy #width*7
38 01,0E44 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
581 01,0E46 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0E46 AA tax
11 01,0E47 A5 80 lda kloc
12 01,0E49 18 clc
13 01,0E4A 69 01 adc <1+WIDTH*8
14 01,0E4C 85 82 sta kloc_tmp
15 01,0E4E A5 81 lda kloc+1
16 01,0E50 69 01 adc >1+WIDTH*8
17 01,0E52 85 83 sta kloc_tmp+1
21 01,0E54 A0 00 ldy #0
22 01,0E56 8A txa
24 01,0E57 11 82 ora (kloc_tmp),y
25 01,0E59 A0 20 ldy #width
26 01,0E5B 11 82 ora (kloc_tmp),y
27 01,0E5D A0 40 ldy #width*2
28 01,0E5F 11 82 ora (kloc_tmp),y
29 01,0E61 A0 60 ldy #width*3
30 01,0E63 11 82 ora (kloc_tmp),y
31 01,0E65 A0 80 ldy #width*4
32 01,0E67 11 82 ora (kloc_tmp),y
33 01,0E69 A0 A0 ldy #width*5
34 01,0E6B 11 82 ora (kloc_tmp),y
35 01,0E6D A0 C0 ldy #width*6
36 01,0E6F 11 82 ora (kloc_tmp),y
37 01,0E71 A0 E0 ldy #width*7
38 01,0E73 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
582 01,0E75 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0E75 AA tax
11 01,0E76 A5 80 lda kloc
12 01,0E78 18 clc
13 01,0E79 69 01 adc <1+WIDTH*2*8
14 01,0E7B 85 82 sta kloc_tmp
15 01,0E7D A5 81 lda kloc+1
16 01,0E7F 69 02 adc >1+WIDTH*2*8
17 01,0E81 85 83 sta kloc_tmp+1
21 01,0E83 A0 00 ldy #0
22 01,0E85 8A txa
24 01,0E86 11 82 ora (kloc_tmp),y
25 01,0E88 A0 20 ldy #width
26 01,0E8A 11 82 ora (kloc_tmp),y
27 01,0E8C A0 40 ldy #width*2
28 01,0E8E 11 82 ora (kloc_tmp),y
29 01,0E90 A0 60 ldy #width*3
30 01,0E92 11 82 ora (kloc_tmp),y
31 01,0E94 A0 80 ldy #width*4
32 01,0E96 11 82 ora (kloc_tmp),y
33 01,0E98 A0 A0 ldy #width*5
34 01,0E9A 11 82 ora (kloc_tmp),y
35 01,0E9C A0 C0 ldy #width*6
36 01,0E9E 11 82 ora (kloc_tmp),y
37 01,0EA0 A0 E0 ldy #width*7
38 01,0EA2 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
583 01,0EA4 60 rts
584 .endp
585
586
587 * KLOCEK 5 (2 fazy)
588 ; ' '
589 ; '** '
590 ; ' **'
591 01,0EA5 .proc klocek5_0
592 01,0EA5 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0EA5 AA tax
11 01,0EA6 A5 80 lda kloc
12 01,0EA8 18 clc
13 01,0EA9 69 00 adc <WIDTH*8
14 01,0EAB 85 82 sta kloc_tmp
15 01,0EAD A5 81 lda kloc+1
16 01,0EAF 69 01 adc >WIDTH*8
17 01,0EB1 85 83 sta kloc_tmp+1
21 01,0EB3 8A txa
23 01,0EB4 A0 00 ldy #0
24 01,0EB6 91 82 sta (kloc_tmp),y
25 01,0EB8 A0 20 ldy #width
26 01,0EBA 91 82 sta (kloc_tmp),y
27 01,0EBC A0 40 ldy #width*2
28 01,0EBE 91 82 sta (kloc_tmp),y
29 01,0EC0 A0 60 ldy #width*3
30 01,0EC2 91 82 sta (kloc_tmp),y
31 01,0EC4 A0 80 ldy #width*4
32 01,0EC6 91 82 sta (kloc_tmp),y
33 01,0EC8 A0 A0 ldy #width*5
34 01,0ECA 91 82 sta (kloc_tmp),y
35 01,0ECC A0 C0 ldy #width*6
36 01,0ECE 91 82 sta (kloc_tmp),y
37 01,0ED0 A0 E0 ldy #width*7
38 01,0ED2 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
593 01,0ED4 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0ED4 AA tax
11 01,0ED5 A5 80 lda kloc
12 01,0ED7 18 clc
13 01,0ED8 69 01 adc <1+WIDTH*8
14 01,0EDA 85 82 sta kloc_tmp
15 01,0EDC A5 81 lda kloc+1
16 01,0EDE 69 01 adc >1+WIDTH*8
17 01,0EE0 85 83 sta kloc_tmp+1
21 01,0EE2 8A txa
23 01,0EE3 A0 00 ldy #0
24 01,0EE5 91 82 sta (kloc_tmp),y
25 01,0EE7 A0 20 ldy #width
26 01,0EE9 91 82 sta (kloc_tmp),y
27 01,0EEB A0 40 ldy #width*2
28 01,0EED 91 82 sta (kloc_tmp),y
29 01,0EEF A0 60 ldy #width*3
30 01,0EF1 91 82 sta (kloc_tmp),y
31 01,0EF3 A0 80 ldy #width*4
32 01,0EF5 91 82 sta (kloc_tmp),y
33 01,0EF7 A0 A0 ldy #width*5
34 01,0EF9 91 82 sta (kloc_tmp),y
35 01,0EFB A0 C0 ldy #width*6
36 01,0EFD 91 82 sta (kloc_tmp),y
37 01,0EFF A0 E0 ldy #width*7
38 01,0F01 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
594 01,0F03 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0F03 AA tax
11 01,0F04 A5 80 lda kloc
12 01,0F06 18 clc
13 01,0F07 69 01 adc <1+WIDTH*2*8
14 01,0F09 85 82 sta kloc_tmp
15 01,0F0B A5 81 lda kloc+1
16 01,0F0D 69 02 adc >1+WIDTH*2*8
17 01,0F0F 85 83 sta kloc_tmp+1
21 01,0F11 8A txa
23 01,0F12 A0 00 ldy #0
24 01,0F14 91 82 sta (kloc_tmp),y
25 01,0F16 A0 20 ldy #width
26 01,0F18 91 82 sta (kloc_tmp),y
27 01,0F1A A0 40 ldy #width*2
28 01,0F1C 91 82 sta (kloc_tmp),y
29 01,0F1E A0 60 ldy #width*3
30 01,0F20 91 82 sta (kloc_tmp),y
31 01,0F22 A0 80 ldy #width*4
32 01,0F24 91 82 sta (kloc_tmp),y
33 01,0F26 A0 A0 ldy #width*5
34 01,0F28 91 82 sta (kloc_tmp),y
35 01,0F2A A0 C0 ldy #width*6
36 01,0F2C 91 82 sta (kloc_tmp),y
37 01,0F2E A0 E0 ldy #width*7
38 01,0F30 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
595 01,0F32 sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0F32 AA tax
11 01,0F33 A5 80 lda kloc
12 01,0F35 18 clc
13 01,0F36 69 02 adc <2+WIDTH*2*8
14 01,0F38 85 82 sta kloc_tmp
15 01,0F3A A5 81 lda kloc+1
16 01,0F3C 69 02 adc >2+WIDTH*2*8
17 01,0F3E 85 83 sta kloc_tmp+1
21 01,0F40 8A txa
23 01,0F41 A0 00 ldy #0
24 01,0F43 91 82 sta (kloc_tmp),y
25 01,0F45 A0 20 ldy #width
26 01,0F47 91 82 sta (kloc_tmp),y
27 01,0F49 A0 40 ldy #width*2
28 01,0F4B 91 82 sta (kloc_tmp),y
29 01,0F4D A0 60 ldy #width*3
30 01,0F4F 91 82 sta (kloc_tmp),y
31 01,0F51 A0 80 ldy #width*4
32 01,0F53 91 82 sta (kloc_tmp),y
33 01,0F55 A0 A0 ldy #width*5
34 01,0F57 91 82 sta (kloc_tmp),y
35 01,0F59 A0 C0 ldy #width*6
36 01,0F5B 91 82 sta (kloc_tmp),y
37 01,0F5D A0 E0 ldy #width*7
38 01,0F5F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
596 01,0F61 60 rts
597
598 01,0F62 test
599 01,0F62 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0F62 AA tax
11 01,0F63 A5 80 lda kloc
12 01,0F65 18 clc
13 01,0F66 69 00 adc <WIDTH*8
14 01,0F68 85 82 sta kloc_tmp
15 01,0F6A A5 81 lda kloc+1
16 01,0F6C 69 01 adc >WIDTH*8
17 01,0F6E 85 83 sta kloc_tmp+1
21 01,0F70 A0 00 ldy #0
22 01,0F72 8A txa
24 01,0F73 11 82 ora (kloc_tmp),y
25 01,0F75 A0 20 ldy #width
26 01,0F77 11 82 ora (kloc_tmp),y
27 01,0F79 A0 40 ldy #width*2
28 01,0F7B 11 82 ora (kloc_tmp),y
29 01,0F7D A0 60 ldy #width*3
30 01,0F7F 11 82 ora (kloc_tmp),y
31 01,0F81 A0 80 ldy #width*4
32 01,0F83 11 82 ora (kloc_tmp),y
33 01,0F85 A0 A0 ldy #width*5
34 01,0F87 11 82 ora (kloc_tmp),y
35 01,0F89 A0 C0 ldy #width*6
36 01,0F8B 11 82 ora (kloc_tmp),y
37 01,0F8D A0 E0 ldy #width*7
38 01,0F8F 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
600 01,0F91 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0F91 AA tax
11 01,0F92 A5 80 lda kloc
12 01,0F94 18 clc
13 01,0F95 69 01 adc <1+WIDTH*8
14 01,0F97 85 82 sta kloc_tmp
15 01,0F99 A5 81 lda kloc+1
16 01,0F9B 69 01 adc >1+WIDTH*8
17 01,0F9D 85 83 sta kloc_tmp+1
21 01,0F9F A0 00 ldy #0
22 01,0FA1 8A txa
24 01,0FA2 11 82 ora (kloc_tmp),y
25 01,0FA4 A0 20 ldy #width
26 01,0FA6 11 82 ora (kloc_tmp),y
27 01,0FA8 A0 40 ldy #width*2
28 01,0FAA 11 82 ora (kloc_tmp),y
29 01,0FAC A0 60 ldy #width*3
30 01,0FAE 11 82 ora (kloc_tmp),y
31 01,0FB0 A0 80 ldy #width*4
32 01,0FB2 11 82 ora (kloc_tmp),y
33 01,0FB4 A0 A0 ldy #width*5
34 01,0FB6 11 82 ora (kloc_tmp),y
35 01,0FB8 A0 C0 ldy #width*6
36 01,0FBA 11 82 ora (kloc_tmp),y
37 01,0FBC A0 E0 ldy #width*7
38 01,0FBE 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
601 01,0FC0 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0FC0 AA tax
11 01,0FC1 A5 80 lda kloc
12 01,0FC3 18 clc
13 01,0FC4 69 01 adc <1+WIDTH*2*8
14 01,0FC6 85 82 sta kloc_tmp
15 01,0FC8 A5 81 lda kloc+1
16 01,0FCA 69 02 adc >1+WIDTH*2*8
17 01,0FCC 85 83 sta kloc_tmp+1
21 01,0FCE A0 00 ldy #0
22 01,0FD0 8A txa
24 01,0FD1 11 82 ora (kloc_tmp),y
25 01,0FD3 A0 20 ldy #width
26 01,0FD5 11 82 ora (kloc_tmp),y
27 01,0FD7 A0 40 ldy #width*2
28 01,0FD9 11 82 ora (kloc_tmp),y
29 01,0FDB A0 60 ldy #width*3
30 01,0FDD 11 82 ora (kloc_tmp),y
31 01,0FDF A0 80 ldy #width*4
32 01,0FE1 11 82 ora (kloc_tmp),y
33 01,0FE3 A0 A0 ldy #width*5
34 01,0FE5 11 82 ora (kloc_tmp),y
35 01,0FE7 A0 C0 ldy #width*6
36 01,0FE9 11 82 ora (kloc_tmp),y
37 01,0FEB A0 E0 ldy #width*7
38 01,0FED 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
602 01,0FEF lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,0FEF AA tax
11 01,0FF0 A5 80 lda kloc
12 01,0FF2 18 clc
13 01,0FF3 69 02 adc <2+WIDTH*2*8
14 01,0FF5 85 82 sta kloc_tmp
15 01,0FF7 A5 81 lda kloc+1
16 01,0FF9 69 02 adc >2+WIDTH*2*8
17 01,0FFB 85 83 sta kloc_tmp+1
21 01,0FFD A0 00 ldy #0
22 01,0FFF 8A txa
24 01,1000 11 82 ora (kloc_tmp),y
25 01,1002 A0 20 ldy #width
26 01,1004 11 82 ora (kloc_tmp),y
27 01,1006 A0 40 ldy #width*2
28 01,1008 11 82 ora (kloc_tmp),y
29 01,100A A0 60 ldy #width*3
30 01,100C 11 82 ora (kloc_tmp),y
31 01,100E A0 80 ldy #width*4
32 01,1010 11 82 ora (kloc_tmp),y
33 01,1012 A0 A0 ldy #width*5
34 01,1014 11 82 ora (kloc_tmp),y
35 01,1016 A0 C0 ldy #width*6
36 01,1018 11 82 ora (kloc_tmp),y
37 01,101A A0 E0 ldy #width*7
38 01,101C 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
603 01,101E 60 rts
604 .endp
605
606
607 ; ' * '
608 ; '** '
609 ; '* '
610 01,101F .proc klocek5_1
611 01,101F sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,101F AA tax
7 01,1020 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1028 E6 82 D0 02 E6 + inw kloc_tmp
21 01,102E 8A txa
23 01,102F A0 00 ldy #0
24 01,1031 91 82 sta (kloc_tmp),y
25 01,1033 A0 20 ldy #width
26 01,1035 91 82 sta (kloc_tmp),y
27 01,1037 A0 40 ldy #width*2
28 01,1039 91 82 sta (kloc_tmp),y
29 01,103B A0 60 ldy #width*3
30 01,103D 91 82 sta (kloc_tmp),y
31 01,103F A0 80 ldy #width*4
32 01,1041 91 82 sta (kloc_tmp),y
33 01,1043 A0 A0 ldy #width*5
34 01,1045 91 82 sta (kloc_tmp),y
35 01,1047 A0 C0 ldy #width*6
36 01,1049 91 82 sta (kloc_tmp),y
37 01,104B A0 E0 ldy #width*7
38 01,104D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
612 01,104F sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,104F AA tax
11 01,1050 A5 80 lda kloc
12 01,1052 18 clc
13 01,1053 69 00 adc <WIDTH*8
14 01,1055 85 82 sta kloc_tmp
15 01,1057 A5 81 lda kloc+1
16 01,1059 69 01 adc >WIDTH*8
17 01,105B 85 83 sta kloc_tmp+1
21 01,105D 8A txa
23 01,105E A0 00 ldy #0
24 01,1060 91 82 sta (kloc_tmp),y
25 01,1062 A0 20 ldy #width
26 01,1064 91 82 sta (kloc_tmp),y
27 01,1066 A0 40 ldy #width*2
28 01,1068 91 82 sta (kloc_tmp),y
29 01,106A A0 60 ldy #width*3
30 01,106C 91 82 sta (kloc_tmp),y
31 01,106E A0 80 ldy #width*4
32 01,1070 91 82 sta (kloc_tmp),y
33 01,1072 A0 A0 ldy #width*5
34 01,1074 91 82 sta (kloc_tmp),y
35 01,1076 A0 C0 ldy #width*6
36 01,1078 91 82 sta (kloc_tmp),y
37 01,107A A0 E0 ldy #width*7
38 01,107C 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
613 01,107E sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,107E AA tax
11 01,107F A5 80 lda kloc
12 01,1081 18 clc
13 01,1082 69 01 adc <1+WIDTH*8
14 01,1084 85 82 sta kloc_tmp
15 01,1086 A5 81 lda kloc+1
16 01,1088 69 01 adc >1+WIDTH*8
17 01,108A 85 83 sta kloc_tmp+1
21 01,108C 8A txa
23 01,108D A0 00 ldy #0
24 01,108F 91 82 sta (kloc_tmp),y
25 01,1091 A0 20 ldy #width
26 01,1093 91 82 sta (kloc_tmp),y
27 01,1095 A0 40 ldy #width*2
28 01,1097 91 82 sta (kloc_tmp),y
29 01,1099 A0 60 ldy #width*3
30 01,109B 91 82 sta (kloc_tmp),y
31 01,109D A0 80 ldy #width*4
32 01,109F 91 82 sta (kloc_tmp),y
33 01,10A1 A0 A0 ldy #width*5
34 01,10A3 91 82 sta (kloc_tmp),y
35 01,10A5 A0 C0 ldy #width*6
36 01,10A7 91 82 sta (kloc_tmp),y
37 01,10A9 A0 E0 ldy #width*7
38 01,10AB 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
614 01,10AD sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,10AD AA tax
11 01,10AE A5 80 lda kloc
12 01,10B0 18 clc
13 01,10B1 69 00 adc <WIDTH*2*8
14 01,10B3 85 82 sta kloc_tmp
15 01,10B5 A5 81 lda kloc+1
16 01,10B7 69 02 adc >WIDTH*2*8
17 01,10B9 85 83 sta kloc_tmp+1
21 01,10BB 8A txa
23 01,10BC A0 00 ldy #0
24 01,10BE 91 82 sta (kloc_tmp),y
25 01,10C0 A0 20 ldy #width
26 01,10C2 91 82 sta (kloc_tmp),y
27 01,10C4 A0 40 ldy #width*2
28 01,10C6 91 82 sta (kloc_tmp),y
29 01,10C8 A0 60 ldy #width*3
30 01,10CA 91 82 sta (kloc_tmp),y
31 01,10CC A0 80 ldy #width*4
32 01,10CE 91 82 sta (kloc_tmp),y
33 01,10D0 A0 A0 ldy #width*5
34 01,10D2 91 82 sta (kloc_tmp),y
35 01,10D4 A0 C0 ldy #width*6
36 01,10D6 91 82 sta (kloc_tmp),y
37 01,10D8 A0 E0 ldy #width*7
38 01,10DA 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
615 01,10DC 60 rts
616
617 01,10DD test
618 01,10DD lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,10DD AA tax
7 01,10DE A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,10E6 E6 82 D0 02 E6 + inw kloc_tmp
21 01,10EC A0 00 ldy #0
22 01,10EE 8A txa
24 01,10EF 11 82 ora (kloc_tmp),y
25 01,10F1 A0 20 ldy #width
26 01,10F3 11 82 ora (kloc_tmp),y
27 01,10F5 A0 40 ldy #width*2
28 01,10F7 11 82 ora (kloc_tmp),y
29 01,10F9 A0 60 ldy #width*3
30 01,10FB 11 82 ora (kloc_tmp),y
31 01,10FD A0 80 ldy #width*4
32 01,10FF 11 82 ora (kloc_tmp),y
33 01,1101 A0 A0 ldy #width*5
34 01,1103 11 82 ora (kloc_tmp),y
35 01,1105 A0 C0 ldy #width*6
36 01,1107 11 82 ora (kloc_tmp),y
37 01,1109 A0 E0 ldy #width*7
38 01,110B 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
619 01,110D lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,110D AA tax
11 01,110E A5 80 lda kloc
12 01,1110 18 clc
13 01,1111 69 00 adc <WIDTH*8
14 01,1113 85 82 sta kloc_tmp
15 01,1115 A5 81 lda kloc+1
16 01,1117 69 01 adc >WIDTH*8
17 01,1119 85 83 sta kloc_tmp+1
21 01,111B A0 00 ldy #0
22 01,111D 8A txa
24 01,111E 11 82 ora (kloc_tmp),y
25 01,1120 A0 20 ldy #width
26 01,1122 11 82 ora (kloc_tmp),y
27 01,1124 A0 40 ldy #width*2
28 01,1126 11 82 ora (kloc_tmp),y
29 01,1128 A0 60 ldy #width*3
30 01,112A 11 82 ora (kloc_tmp),y
31 01,112C A0 80 ldy #width*4
32 01,112E 11 82 ora (kloc_tmp),y
33 01,1130 A0 A0 ldy #width*5
34 01,1132 11 82 ora (kloc_tmp),y
35 01,1134 A0 C0 ldy #width*6
36 01,1136 11 82 ora (kloc_tmp),y
37 01,1138 A0 E0 ldy #width*7
38 01,113A 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
620 01,113C lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,113C AA tax
11 01,113D A5 80 lda kloc
12 01,113F 18 clc
13 01,1140 69 01 adc <1+WIDTH*8
14 01,1142 85 82 sta kloc_tmp
15 01,1144 A5 81 lda kloc+1
16 01,1146 69 01 adc >1+WIDTH*8
17 01,1148 85 83 sta kloc_tmp+1
21 01,114A A0 00 ldy #0
22 01,114C 8A txa
24 01,114D 11 82 ora (kloc_tmp),y
25 01,114F A0 20 ldy #width
26 01,1151 11 82 ora (kloc_tmp),y
27 01,1153 A0 40 ldy #width*2
28 01,1155 11 82 ora (kloc_tmp),y
29 01,1157 A0 60 ldy #width*3
30 01,1159 11 82 ora (kloc_tmp),y
31 01,115B A0 80 ldy #width*4
32 01,115D 11 82 ora (kloc_tmp),y
33 01,115F A0 A0 ldy #width*5
34 01,1161 11 82 ora (kloc_tmp),y
35 01,1163 A0 C0 ldy #width*6
36 01,1165 11 82 ora (kloc_tmp),y
37 01,1167 A0 E0 ldy #width*7
38 01,1169 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
621 01,116B lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,116B AA tax
11 01,116C A5 80 lda kloc
12 01,116E 18 clc
13 01,116F 69 00 adc <WIDTH*2*8
14 01,1171 85 82 sta kloc_tmp
15 01,1173 A5 81 lda kloc+1
16 01,1175 69 02 adc >WIDTH*2*8
17 01,1177 85 83 sta kloc_tmp+1
21 01,1179 A0 00 ldy #0
22 01,117B 8A txa
24 01,117C 11 82 ora (kloc_tmp),y
25 01,117E A0 20 ldy #width
26 01,1180 11 82 ora (kloc_tmp),y
27 01,1182 A0 40 ldy #width*2
28 01,1184 11 82 ora (kloc_tmp),y
29 01,1186 A0 60 ldy #width*3
30 01,1188 11 82 ora (kloc_tmp),y
31 01,118A A0 80 ldy #width*4
32 01,118C 11 82 ora (kloc_tmp),y
33 01,118E A0 A0 ldy #width*5
34 01,1190 11 82 ora (kloc_tmp),y
35 01,1192 A0 C0 ldy #width*6
36 01,1194 11 82 ora (kloc_tmp),y
37 01,1196 A0 E0 ldy #width*7
38 01,1198 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
622 01,119A 60 rts
623 .endp
624
625
626 * KLOCEK 6 (1 faza)
627 ; ' * '
628 ; '***'
629 ; ' * '
630 01,119B .proc klocek6_0
631 01,119B sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,119B AA tax
7 01,119C A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,11A4 E6 82 D0 02 E6 + inw kloc_tmp
21 01,11AA 8A txa
23 01,11AB A0 00 ldy #0
24 01,11AD 91 82 sta (kloc_tmp),y
25 01,11AF A0 20 ldy #width
26 01,11B1 91 82 sta (kloc_tmp),y
27 01,11B3 A0 40 ldy #width*2
28 01,11B5 91 82 sta (kloc_tmp),y
29 01,11B7 A0 60 ldy #width*3
30 01,11B9 91 82 sta (kloc_tmp),y
31 01,11BB A0 80 ldy #width*4
32 01,11BD 91 82 sta (kloc_tmp),y
33 01,11BF A0 A0 ldy #width*5
34 01,11C1 91 82 sta (kloc_tmp),y
35 01,11C3 A0 C0 ldy #width*6
36 01,11C5 91 82 sta (kloc_tmp),y
37 01,11C7 A0 E0 ldy #width*7
38 01,11C9 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
632 01,11CB sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,11CB AA tax
11 01,11CC A5 80 lda kloc
12 01,11CE 18 clc
13 01,11CF 69 00 adc <WIDTH*8
14 01,11D1 85 82 sta kloc_tmp
15 01,11D3 A5 81 lda kloc+1
16 01,11D5 69 01 adc >WIDTH*8
17 01,11D7 85 83 sta kloc_tmp+1
21 01,11D9 8A txa
23 01,11DA A0 00 ldy #0
24 01,11DC 91 82 sta (kloc_tmp),y
25 01,11DE A0 20 ldy #width
26 01,11E0 91 82 sta (kloc_tmp),y
27 01,11E2 A0 40 ldy #width*2
28 01,11E4 91 82 sta (kloc_tmp),y
29 01,11E6 A0 60 ldy #width*3
30 01,11E8 91 82 sta (kloc_tmp),y
31 01,11EA A0 80 ldy #width*4
32 01,11EC 91 82 sta (kloc_tmp),y
33 01,11EE A0 A0 ldy #width*5
34 01,11F0 91 82 sta (kloc_tmp),y
35 01,11F2 A0 C0 ldy #width*6
36 01,11F4 91 82 sta (kloc_tmp),y
37 01,11F6 A0 E0 ldy #width*7
38 01,11F8 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
633 01,11FA sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,11FA AA tax
11 01,11FB A5 80 lda kloc
12 01,11FD 18 clc
13 01,11FE 69 01 adc <1+WIDTH*8
14 01,1200 85 82 sta kloc_tmp
15 01,1202 A5 81 lda kloc+1
16 01,1204 69 01 adc >1+WIDTH*8
17 01,1206 85 83 sta kloc_tmp+1
21 01,1208 8A txa
23 01,1209 A0 00 ldy #0
24 01,120B 91 82 sta (kloc_tmp),y
25 01,120D A0 20 ldy #width
26 01,120F 91 82 sta (kloc_tmp),y
27 01,1211 A0 40 ldy #width*2
28 01,1213 91 82 sta (kloc_tmp),y
29 01,1215 A0 60 ldy #width*3
30 01,1217 91 82 sta (kloc_tmp),y
31 01,1219 A0 80 ldy #width*4
32 01,121B 91 82 sta (kloc_tmp),y
33 01,121D A0 A0 ldy #width*5
34 01,121F 91 82 sta (kloc_tmp),y
35 01,1221 A0 C0 ldy #width*6
36 01,1223 91 82 sta (kloc_tmp),y
37 01,1225 A0 E0 ldy #width*7
38 01,1227 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
634 01,1229 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1229 AA tax
11 01,122A A5 80 lda kloc
12 01,122C 18 clc
13 01,122D 69 02 adc <2+WIDTH*8
14 01,122F 85 82 sta kloc_tmp
15 01,1231 A5 81 lda kloc+1
16 01,1233 69 01 adc >2+WIDTH*8
17 01,1235 85 83 sta kloc_tmp+1
21 01,1237 8A txa
23 01,1238 A0 00 ldy #0
24 01,123A 91 82 sta (kloc_tmp),y
25 01,123C A0 20 ldy #width
26 01,123E 91 82 sta (kloc_tmp),y
27 01,1240 A0 40 ldy #width*2
28 01,1242 91 82 sta (kloc_tmp),y
29 01,1244 A0 60 ldy #width*3
30 01,1246 91 82 sta (kloc_tmp),y
31 01,1248 A0 80 ldy #width*4
32 01,124A 91 82 sta (kloc_tmp),y
33 01,124C A0 A0 ldy #width*5
34 01,124E 91 82 sta (kloc_tmp),y
35 01,1250 A0 C0 ldy #width*6
36 01,1252 91 82 sta (kloc_tmp),y
37 01,1254 A0 E0 ldy #width*7
38 01,1256 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
635 01,1258 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1258 AA tax
11 01,1259 A5 80 lda kloc
12 01,125B 18 clc
13 01,125C 69 01 adc <1+WIDTH*2*8
14 01,125E 85 82 sta kloc_tmp
15 01,1260 A5 81 lda kloc+1
16 01,1262 69 02 adc >1+WIDTH*2*8
17 01,1264 85 83 sta kloc_tmp+1
21 01,1266 8A txa
23 01,1267 A0 00 ldy #0
24 01,1269 91 82 sta (kloc_tmp),y
25 01,126B A0 20 ldy #width
26 01,126D 91 82 sta (kloc_tmp),y
27 01,126F A0 40 ldy #width*2
28 01,1271 91 82 sta (kloc_tmp),y
29 01,1273 A0 60 ldy #width*3
30 01,1275 91 82 sta (kloc_tmp),y
31 01,1277 A0 80 ldy #width*4
32 01,1279 91 82 sta (kloc_tmp),y
33 01,127B A0 A0 ldy #width*5
34 01,127D 91 82 sta (kloc_tmp),y
35 01,127F A0 C0 ldy #width*6
36 01,1281 91 82 sta (kloc_tmp),y
37 01,1283 A0 E0 ldy #width*7
38 01,1285 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
636 01,1287 60 rts
637
638 01,1288 test
639 01,1288 lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1288 AA tax
7 01,1289 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1291 E6 82 D0 02 E6 + inw kloc_tmp
21 01,1297 A0 00 ldy #0
22 01,1299 8A txa
24 01,129A 11 82 ora (kloc_tmp),y
25 01,129C A0 20 ldy #width
26 01,129E 11 82 ora (kloc_tmp),y
27 01,12A0 A0 40 ldy #width*2
28 01,12A2 11 82 ora (kloc_tmp),y
29 01,12A4 A0 60 ldy #width*3
30 01,12A6 11 82 ora (kloc_tmp),y
31 01,12A8 A0 80 ldy #width*4
32 01,12AA 11 82 ora (kloc_tmp),y
33 01,12AC A0 A0 ldy #width*5
34 01,12AE 11 82 ora (kloc_tmp),y
35 01,12B0 A0 C0 ldy #width*6
36 01,12B2 11 82 ora (kloc_tmp),y
37 01,12B4 A0 E0 ldy #width*7
38 01,12B6 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
640 01,12B8 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,12B8 AA tax
11 01,12B9 A5 80 lda kloc
12 01,12BB 18 clc
13 01,12BC 69 00 adc <WIDTH*8
14 01,12BE 85 82 sta kloc_tmp
15 01,12C0 A5 81 lda kloc+1
16 01,12C2 69 01 adc >WIDTH*8
17 01,12C4 85 83 sta kloc_tmp+1
21 01,12C6 A0 00 ldy #0
22 01,12C8 8A txa
24 01,12C9 11 82 ora (kloc_tmp),y
25 01,12CB A0 20 ldy #width
26 01,12CD 11 82 ora (kloc_tmp),y
27 01,12CF A0 40 ldy #width*2
28 01,12D1 11 82 ora (kloc_tmp),y
29 01,12D3 A0 60 ldy #width*3
30 01,12D5 11 82 ora (kloc_tmp),y
31 01,12D7 A0 80 ldy #width*4
32 01,12D9 11 82 ora (kloc_tmp),y
33 01,12DB A0 A0 ldy #width*5
34 01,12DD 11 82 ora (kloc_tmp),y
35 01,12DF A0 C0 ldy #width*6
36 01,12E1 11 82 ora (kloc_tmp),y
37 01,12E3 A0 E0 ldy #width*7
38 01,12E5 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
641 01,12E7 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,12E7 AA tax
11 01,12E8 A5 80 lda kloc
12 01,12EA 18 clc
13 01,12EB 69 01 adc <1+WIDTH*8
14 01,12ED 85 82 sta kloc_tmp
15 01,12EF A5 81 lda kloc+1
16 01,12F1 69 01 adc >1+WIDTH*8
17 01,12F3 85 83 sta kloc_tmp+1
21 01,12F5 A0 00 ldy #0
22 01,12F7 8A txa
24 01,12F8 11 82 ora (kloc_tmp),y
25 01,12FA A0 20 ldy #width
26 01,12FC 11 82 ora (kloc_tmp),y
27 01,12FE A0 40 ldy #width*2
28 01,1300 11 82 ora (kloc_tmp),y
29 01,1302 A0 60 ldy #width*3
30 01,1304 11 82 ora (kloc_tmp),y
31 01,1306 A0 80 ldy #width*4
32 01,1308 11 82 ora (kloc_tmp),y
33 01,130A A0 A0 ldy #width*5
34 01,130C 11 82 ora (kloc_tmp),y
35 01,130E A0 C0 ldy #width*6
36 01,1310 11 82 ora (kloc_tmp),y
37 01,1312 A0 E0 ldy #width*7
38 01,1314 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
642 01,1316 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1316 AA tax
11 01,1317 A5 80 lda kloc
12 01,1319 18 clc
13 01,131A 69 02 adc <2+WIDTH*8
14 01,131C 85 82 sta kloc_tmp
15 01,131E A5 81 lda kloc+1
16 01,1320 69 01 adc >2+WIDTH*8
17 01,1322 85 83 sta kloc_tmp+1
21 01,1324 A0 00 ldy #0
22 01,1326 8A txa
24 01,1327 11 82 ora (kloc_tmp),y
25 01,1329 A0 20 ldy #width
26 01,132B 11 82 ora (kloc_tmp),y
27 01,132D A0 40 ldy #width*2
28 01,132F 11 82 ora (kloc_tmp),y
29 01,1331 A0 60 ldy #width*3
30 01,1333 11 82 ora (kloc_tmp),y
31 01,1335 A0 80 ldy #width*4
32 01,1337 11 82 ora (kloc_tmp),y
33 01,1339 A0 A0 ldy #width*5
34 01,133B 11 82 ora (kloc_tmp),y
35 01,133D A0 C0 ldy #width*6
36 01,133F 11 82 ora (kloc_tmp),y
37 01,1341 A0 E0 ldy #width*7
38 01,1343 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
643 01,1345 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1345 AA tax
11 01,1346 A5 80 lda kloc
12 01,1348 18 clc
13 01,1349 69 01 adc <1+WIDTH*2*8
14 01,134B 85 82 sta kloc_tmp
15 01,134D A5 81 lda kloc+1
16 01,134F 69 02 adc >1+WIDTH*2*8
17 01,1351 85 83 sta kloc_tmp+1
21 01,1353 A0 00 ldy #0
22 01,1355 8A txa
24 01,1356 11 82 ora (kloc_tmp),y
25 01,1358 A0 20 ldy #width
26 01,135A 11 82 ora (kloc_tmp),y
27 01,135C A0 40 ldy #width*2
28 01,135E 11 82 ora (kloc_tmp),y
29 01,1360 A0 60 ldy #width*3
30 01,1362 11 82 ora (kloc_tmp),y
31 01,1364 A0 80 ldy #width*4
32 01,1366 11 82 ora (kloc_tmp),y
33 01,1368 A0 A0 ldy #width*5
34 01,136A 11 82 ora (kloc_tmp),y
35 01,136C A0 C0 ldy #width*6
36 01,136E 11 82 ora (kloc_tmp),y
37 01,1370 A0 E0 ldy #width*7
38 01,1372 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
644 01,1374 60 rts
645 .endp
646
647
648 * KLOCEK 7 (4 fazy)
649 ; ' '
650 ; '***'
651 ; ' * '
652 01,1375 .proc klocek7_0
653 01,1375 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1375 AA tax
11 01,1376 A5 80 lda kloc
12 01,1378 18 clc
13 01,1379 69 00 adc <WIDTH*8
14 01,137B 85 82 sta kloc_tmp
15 01,137D A5 81 lda kloc+1
16 01,137F 69 01 adc >WIDTH*8
17 01,1381 85 83 sta kloc_tmp+1
21 01,1383 8A txa
23 01,1384 A0 00 ldy #0
24 01,1386 91 82 sta (kloc_tmp),y
25 01,1388 A0 20 ldy #width
26 01,138A 91 82 sta (kloc_tmp),y
27 01,138C A0 40 ldy #width*2
28 01,138E 91 82 sta (kloc_tmp),y
29 01,1390 A0 60 ldy #width*3
30 01,1392 91 82 sta (kloc_tmp),y
31 01,1394 A0 80 ldy #width*4
32 01,1396 91 82 sta (kloc_tmp),y
33 01,1398 A0 A0 ldy #width*5
34 01,139A 91 82 sta (kloc_tmp),y
35 01,139C A0 C0 ldy #width*6
36 01,139E 91 82 sta (kloc_tmp),y
37 01,13A0 A0 E0 ldy #width*7
38 01,13A2 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
654 01,13A4 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,13A4 AA tax
11 01,13A5 A5 80 lda kloc
12 01,13A7 18 clc
13 01,13A8 69 01 adc <1+WIDTH*8
14 01,13AA 85 82 sta kloc_tmp
15 01,13AC A5 81 lda kloc+1
16 01,13AE 69 01 adc >1+WIDTH*8
17 01,13B0 85 83 sta kloc_tmp+1
21 01,13B2 8A txa
23 01,13B3 A0 00 ldy #0
24 01,13B5 91 82 sta (kloc_tmp),y
25 01,13B7 A0 20 ldy #width
26 01,13B9 91 82 sta (kloc_tmp),y
27 01,13BB A0 40 ldy #width*2
28 01,13BD 91 82 sta (kloc_tmp),y
29 01,13BF A0 60 ldy #width*3
30 01,13C1 91 82 sta (kloc_tmp),y
31 01,13C3 A0 80 ldy #width*4
32 01,13C5 91 82 sta (kloc_tmp),y
33 01,13C7 A0 A0 ldy #width*5
34 01,13C9 91 82 sta (kloc_tmp),y
35 01,13CB A0 C0 ldy #width*6
36 01,13CD 91 82 sta (kloc_tmp),y
37 01,13CF A0 E0 ldy #width*7
38 01,13D1 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
655 01,13D3 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,13D3 AA tax
11 01,13D4 A5 80 lda kloc
12 01,13D6 18 clc
13 01,13D7 69 02 adc <2+WIDTH*8
14 01,13D9 85 82 sta kloc_tmp
15 01,13DB A5 81 lda kloc+1
16 01,13DD 69 01 adc >2+WIDTH*8
17 01,13DF 85 83 sta kloc_tmp+1
21 01,13E1 8A txa
23 01,13E2 A0 00 ldy #0
24 01,13E4 91 82 sta (kloc_tmp),y
25 01,13E6 A0 20 ldy #width
26 01,13E8 91 82 sta (kloc_tmp),y
27 01,13EA A0 40 ldy #width*2
28 01,13EC 91 82 sta (kloc_tmp),y
29 01,13EE A0 60 ldy #width*3
30 01,13F0 91 82 sta (kloc_tmp),y
31 01,13F2 A0 80 ldy #width*4
32 01,13F4 91 82 sta (kloc_tmp),y
33 01,13F6 A0 A0 ldy #width*5
34 01,13F8 91 82 sta (kloc_tmp),y
35 01,13FA A0 C0 ldy #width*6
36 01,13FC 91 82 sta (kloc_tmp),y
37 01,13FE A0 E0 ldy #width*7
38 01,1400 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
656 01,1402 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1402 AA tax
11 01,1403 A5 80 lda kloc
12 01,1405 18 clc
13 01,1406 69 01 adc <1+WIDTH*2*8
14 01,1408 85 82 sta kloc_tmp
15 01,140A A5 81 lda kloc+1
16 01,140C 69 02 adc >1+WIDTH*2*8
17 01,140E 85 83 sta kloc_tmp+1
21 01,1410 8A txa
23 01,1411 A0 00 ldy #0
24 01,1413 91 82 sta (kloc_tmp),y
25 01,1415 A0 20 ldy #width
26 01,1417 91 82 sta (kloc_tmp),y
27 01,1419 A0 40 ldy #width*2
28 01,141B 91 82 sta (kloc_tmp),y
29 01,141D A0 60 ldy #width*3
30 01,141F 91 82 sta (kloc_tmp),y
31 01,1421 A0 80 ldy #width*4
32 01,1423 91 82 sta (kloc_tmp),y
33 01,1425 A0 A0 ldy #width*5
34 01,1427 91 82 sta (kloc_tmp),y
35 01,1429 A0 C0 ldy #width*6
36 01,142B 91 82 sta (kloc_tmp),y
37 01,142D A0 E0 ldy #width*7
38 01,142F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
657 01,1431 60 rts
658
659 01,1432 test
660 01,1432 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1432 AA tax
11 01,1433 A5 80 lda kloc
12 01,1435 18 clc
13 01,1436 69 00 adc <WIDTH*8
14 01,1438 85 82 sta kloc_tmp
15 01,143A A5 81 lda kloc+1
16 01,143C 69 01 adc >WIDTH*8
17 01,143E 85 83 sta kloc_tmp+1
21 01,1440 A0 00 ldy #0
22 01,1442 8A txa
24 01,1443 11 82 ora (kloc_tmp),y
25 01,1445 A0 20 ldy #width
26 01,1447 11 82 ora (kloc_tmp),y
27 01,1449 A0 40 ldy #width*2
28 01,144B 11 82 ora (kloc_tmp),y
29 01,144D A0 60 ldy #width*3
30 01,144F 11 82 ora (kloc_tmp),y
31 01,1451 A0 80 ldy #width*4
32 01,1453 11 82 ora (kloc_tmp),y
33 01,1455 A0 A0 ldy #width*5
34 01,1457 11 82 ora (kloc_tmp),y
35 01,1459 A0 C0 ldy #width*6
36 01,145B 11 82 ora (kloc_tmp),y
37 01,145D A0 E0 ldy #width*7
38 01,145F 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
661 01,1461 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1461 AA tax
11 01,1462 A5 80 lda kloc
12 01,1464 18 clc
13 01,1465 69 01 adc <1+WIDTH*8
14 01,1467 85 82 sta kloc_tmp
15 01,1469 A5 81 lda kloc+1
16 01,146B 69 01 adc >1+WIDTH*8
17 01,146D 85 83 sta kloc_tmp+1
21 01,146F A0 00 ldy #0
22 01,1471 8A txa
24 01,1472 11 82 ora (kloc_tmp),y
25 01,1474 A0 20 ldy #width
26 01,1476 11 82 ora (kloc_tmp),y
27 01,1478 A0 40 ldy #width*2
28 01,147A 11 82 ora (kloc_tmp),y
29 01,147C A0 60 ldy #width*3
30 01,147E 11 82 ora (kloc_tmp),y
31 01,1480 A0 80 ldy #width*4
32 01,1482 11 82 ora (kloc_tmp),y
33 01,1484 A0 A0 ldy #width*5
34 01,1486 11 82 ora (kloc_tmp),y
35 01,1488 A0 C0 ldy #width*6
36 01,148A 11 82 ora (kloc_tmp),y
37 01,148C A0 E0 ldy #width*7
38 01,148E 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
662 01,1490 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1490 AA tax
11 01,1491 A5 80 lda kloc
12 01,1493 18 clc
13 01,1494 69 02 adc <2+WIDTH*8
14 01,1496 85 82 sta kloc_tmp
15 01,1498 A5 81 lda kloc+1
16 01,149A 69 01 adc >2+WIDTH*8
17 01,149C 85 83 sta kloc_tmp+1
21 01,149E A0 00 ldy #0
22 01,14A0 8A txa
24 01,14A1 11 82 ora (kloc_tmp),y
25 01,14A3 A0 20 ldy #width
26 01,14A5 11 82 ora (kloc_tmp),y
27 01,14A7 A0 40 ldy #width*2
28 01,14A9 11 82 ora (kloc_tmp),y
29 01,14AB A0 60 ldy #width*3
30 01,14AD 11 82 ora (kloc_tmp),y
31 01,14AF A0 80 ldy #width*4
32 01,14B1 11 82 ora (kloc_tmp),y
33 01,14B3 A0 A0 ldy #width*5
34 01,14B5 11 82 ora (kloc_tmp),y
35 01,14B7 A0 C0 ldy #width*6
36 01,14B9 11 82 ora (kloc_tmp),y
37 01,14BB A0 E0 ldy #width*7
38 01,14BD 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
663 01,14BF lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,14BF AA tax
11 01,14C0 A5 80 lda kloc
12 01,14C2 18 clc
13 01,14C3 69 01 adc <1+WIDTH*2*8
14 01,14C5 85 82 sta kloc_tmp
15 01,14C7 A5 81 lda kloc+1
16 01,14C9 69 02 adc >1+WIDTH*2*8
17 01,14CB 85 83 sta kloc_tmp+1
21 01,14CD A0 00 ldy #0
22 01,14CF 8A txa
24 01,14D0 11 82 ora (kloc_tmp),y
25 01,14D2 A0 20 ldy #width
26 01,14D4 11 82 ora (kloc_tmp),y
27 01,14D6 A0 40 ldy #width*2
28 01,14D8 11 82 ora (kloc_tmp),y
29 01,14DA A0 60 ldy #width*3
30 01,14DC 11 82 ora (kloc_tmp),y
31 01,14DE A0 80 ldy #width*4
32 01,14E0 11 82 ora (kloc_tmp),y
33 01,14E2 A0 A0 ldy #width*5
34 01,14E4 11 82 ora (kloc_tmp),y
35 01,14E6 A0 C0 ldy #width*6
36 01,14E8 11 82 ora (kloc_tmp),y
37 01,14EA A0 E0 ldy #width*7
38 01,14EC 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
664 01,14EE 60 rts
665 .endp
666
667
668 ; ' * '
669 ; '** '
670 ; ' * '
671 01,14EF .proc klocek7_1
672 01,14EF sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,14EF AA tax
7 01,14F0 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,14F8 E6 82 D0 02 E6 + inw kloc_tmp
21 01,14FE 8A txa
23 01,14FF A0 00 ldy #0
24 01,1501 91 82 sta (kloc_tmp),y
25 01,1503 A0 20 ldy #width
26 01,1505 91 82 sta (kloc_tmp),y
27 01,1507 A0 40 ldy #width*2
28 01,1509 91 82 sta (kloc_tmp),y
29 01,150B A0 60 ldy #width*3
30 01,150D 91 82 sta (kloc_tmp),y
31 01,150F A0 80 ldy #width*4
32 01,1511 91 82 sta (kloc_tmp),y
33 01,1513 A0 A0 ldy #width*5
34 01,1515 91 82 sta (kloc_tmp),y
35 01,1517 A0 C0 ldy #width*6
36 01,1519 91 82 sta (kloc_tmp),y
37 01,151B A0 E0 ldy #width*7
38 01,151D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
673 01,151F sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,151F AA tax
11 01,1520 A5 80 lda kloc
12 01,1522 18 clc
13 01,1523 69 00 adc <WIDTH*8
14 01,1525 85 82 sta kloc_tmp
15 01,1527 A5 81 lda kloc+1
16 01,1529 69 01 adc >WIDTH*8
17 01,152B 85 83 sta kloc_tmp+1
21 01,152D 8A txa
23 01,152E A0 00 ldy #0
24 01,1530 91 82 sta (kloc_tmp),y
25 01,1532 A0 20 ldy #width
26 01,1534 91 82 sta (kloc_tmp),y
27 01,1536 A0 40 ldy #width*2
28 01,1538 91 82 sta (kloc_tmp),y
29 01,153A A0 60 ldy #width*3
30 01,153C 91 82 sta (kloc_tmp),y
31 01,153E A0 80 ldy #width*4
32 01,1540 91 82 sta (kloc_tmp),y
33 01,1542 A0 A0 ldy #width*5
34 01,1544 91 82 sta (kloc_tmp),y
35 01,1546 A0 C0 ldy #width*6
36 01,1548 91 82 sta (kloc_tmp),y
37 01,154A A0 E0 ldy #width*7
38 01,154C 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
674 01,154E sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,154E AA tax
11 01,154F A5 80 lda kloc
12 01,1551 18 clc
13 01,1552 69 01 adc <1+WIDTH*8
14 01,1554 85 82 sta kloc_tmp
15 01,1556 A5 81 lda kloc+1
16 01,1558 69 01 adc >1+WIDTH*8
17 01,155A 85 83 sta kloc_tmp+1
21 01,155C 8A txa
23 01,155D A0 00 ldy #0
24 01,155F 91 82 sta (kloc_tmp),y
25 01,1561 A0 20 ldy #width
26 01,1563 91 82 sta (kloc_tmp),y
27 01,1565 A0 40 ldy #width*2
28 01,1567 91 82 sta (kloc_tmp),y
29 01,1569 A0 60 ldy #width*3
30 01,156B 91 82 sta (kloc_tmp),y
31 01,156D A0 80 ldy #width*4
32 01,156F 91 82 sta (kloc_tmp),y
33 01,1571 A0 A0 ldy #width*5
34 01,1573 91 82 sta (kloc_tmp),y
35 01,1575 A0 C0 ldy #width*6
36 01,1577 91 82 sta (kloc_tmp),y
37 01,1579 A0 E0 ldy #width*7
38 01,157B 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
675 01,157D sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,157D AA tax
11 01,157E A5 80 lda kloc
12 01,1580 18 clc
13 01,1581 69 01 adc <1+WIDTH*2*8
14 01,1583 85 82 sta kloc_tmp
15 01,1585 A5 81 lda kloc+1
16 01,1587 69 02 adc >1+WIDTH*2*8
17 01,1589 85 83 sta kloc_tmp+1
21 01,158B 8A txa
23 01,158C A0 00 ldy #0
24 01,158E 91 82 sta (kloc_tmp),y
25 01,1590 A0 20 ldy #width
26 01,1592 91 82 sta (kloc_tmp),y
27 01,1594 A0 40 ldy #width*2
28 01,1596 91 82 sta (kloc_tmp),y
29 01,1598 A0 60 ldy #width*3
30 01,159A 91 82 sta (kloc_tmp),y
31 01,159C A0 80 ldy #width*4
32 01,159E 91 82 sta (kloc_tmp),y
33 01,15A0 A0 A0 ldy #width*5
34 01,15A2 91 82 sta (kloc_tmp),y
35 01,15A4 A0 C0 ldy #width*6
36 01,15A6 91 82 sta (kloc_tmp),y
37 01,15A8 A0 E0 ldy #width*7
38 01,15AA 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
676 01,15AC 60 rts
677
678 01,15AD test
679 01,15AD lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,15AD AA tax
7 01,15AE A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,15B6 E6 82 D0 02 E6 + inw kloc_tmp
21 01,15BC A0 00 ldy #0
22 01,15BE 8A txa
24 01,15BF 11 82 ora (kloc_tmp),y
25 01,15C1 A0 20 ldy #width
26 01,15C3 11 82 ora (kloc_tmp),y
27 01,15C5 A0 40 ldy #width*2
28 01,15C7 11 82 ora (kloc_tmp),y
29 01,15C9 A0 60 ldy #width*3
30 01,15CB 11 82 ora (kloc_tmp),y
31 01,15CD A0 80 ldy #width*4
32 01,15CF 11 82 ora (kloc_tmp),y
33 01,15D1 A0 A0 ldy #width*5
34 01,15D3 11 82 ora (kloc_tmp),y
35 01,15D5 A0 C0 ldy #width*6
36 01,15D7 11 82 ora (kloc_tmp),y
37 01,15D9 A0 E0 ldy #width*7
38 01,15DB 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
680 01,15DD lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,15DD AA tax
11 01,15DE A5 80 lda kloc
12 01,15E0 18 clc
13 01,15E1 69 00 adc <WIDTH*8
14 01,15E3 85 82 sta kloc_tmp
15 01,15E5 A5 81 lda kloc+1
16 01,15E7 69 01 adc >WIDTH*8
17 01,15E9 85 83 sta kloc_tmp+1
21 01,15EB A0 00 ldy #0
22 01,15ED 8A txa
24 01,15EE 11 82 ora (kloc_tmp),y
25 01,15F0 A0 20 ldy #width
26 01,15F2 11 82 ora (kloc_tmp),y
27 01,15F4 A0 40 ldy #width*2
28 01,15F6 11 82 ora (kloc_tmp),y
29 01,15F8 A0 60 ldy #width*3
30 01,15FA 11 82 ora (kloc_tmp),y
31 01,15FC A0 80 ldy #width*4
32 01,15FE 11 82 ora (kloc_tmp),y
33 01,1600 A0 A0 ldy #width*5
34 01,1602 11 82 ora (kloc_tmp),y
35 01,1604 A0 C0 ldy #width*6
36 01,1606 11 82 ora (kloc_tmp),y
37 01,1608 A0 E0 ldy #width*7
38 01,160A 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
681 01,160C lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,160C AA tax
11 01,160D A5 80 lda kloc
12 01,160F 18 clc
13 01,1610 69 01 adc <1+WIDTH*8
14 01,1612 85 82 sta kloc_tmp
15 01,1614 A5 81 lda kloc+1
16 01,1616 69 01 adc >1+WIDTH*8
17 01,1618 85 83 sta kloc_tmp+1
21 01,161A A0 00 ldy #0
22 01,161C 8A txa
24 01,161D 11 82 ora (kloc_tmp),y
25 01,161F A0 20 ldy #width
26 01,1621 11 82 ora (kloc_tmp),y
27 01,1623 A0 40 ldy #width*2
28 01,1625 11 82 ora (kloc_tmp),y
29 01,1627 A0 60 ldy #width*3
30 01,1629 11 82 ora (kloc_tmp),y
31 01,162B A0 80 ldy #width*4
32 01,162D 11 82 ora (kloc_tmp),y
33 01,162F A0 A0 ldy #width*5
34 01,1631 11 82 ora (kloc_tmp),y
35 01,1633 A0 C0 ldy #width*6
36 01,1635 11 82 ora (kloc_tmp),y
37 01,1637 A0 E0 ldy #width*7
38 01,1639 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
682 01,163B lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,163B AA tax
11 01,163C A5 80 lda kloc
12 01,163E 18 clc
13 01,163F 69 01 adc <1+WIDTH*2*8
14 01,1641 85 82 sta kloc_tmp
15 01,1643 A5 81 lda kloc+1
16 01,1645 69 02 adc >1+WIDTH*2*8
17 01,1647 85 83 sta kloc_tmp+1
21 01,1649 A0 00 ldy #0
22 01,164B 8A txa
24 01,164C 11 82 ora (kloc_tmp),y
25 01,164E A0 20 ldy #width
26 01,1650 11 82 ora (kloc_tmp),y
27 01,1652 A0 40 ldy #width*2
28 01,1654 11 82 ora (kloc_tmp),y
29 01,1656 A0 60 ldy #width*3
30 01,1658 11 82 ora (kloc_tmp),y
31 01,165A A0 80 ldy #width*4
32 01,165C 11 82 ora (kloc_tmp),y
33 01,165E A0 A0 ldy #width*5
34 01,1660 11 82 ora (kloc_tmp),y
35 01,1662 A0 C0 ldy #width*6
36 01,1664 11 82 ora (kloc_tmp),y
37 01,1666 A0 E0 ldy #width*7
38 01,1668 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
683 01,166A 60 rts
684 .endp
685
686
687 ; ' * '
688 ; '***'
689 ; ' '
690 01,166B .proc klocek7_2
691 01,166B sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,166B AA tax
7 01,166C A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1674 E6 82 D0 02 E6 + inw kloc_tmp
21 01,167A 8A txa
23 01,167B A0 00 ldy #0
24 01,167D 91 82 sta (kloc_tmp),y
25 01,167F A0 20 ldy #width
26 01,1681 91 82 sta (kloc_tmp),y
27 01,1683 A0 40 ldy #width*2
28 01,1685 91 82 sta (kloc_tmp),y
29 01,1687 A0 60 ldy #width*3
30 01,1689 91 82 sta (kloc_tmp),y
31 01,168B A0 80 ldy #width*4
32 01,168D 91 82 sta (kloc_tmp),y
33 01,168F A0 A0 ldy #width*5
34 01,1691 91 82 sta (kloc_tmp),y
35 01,1693 A0 C0 ldy #width*6
36 01,1695 91 82 sta (kloc_tmp),y
37 01,1697 A0 E0 ldy #width*7
38 01,1699 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
692 01,169B sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,169B AA tax
11 01,169C A5 80 lda kloc
12 01,169E 18 clc
13 01,169F 69 00 adc <WIDTH*8
14 01,16A1 85 82 sta kloc_tmp
15 01,16A3 A5 81 lda kloc+1
16 01,16A5 69 01 adc >WIDTH*8
17 01,16A7 85 83 sta kloc_tmp+1
21 01,16A9 8A txa
23 01,16AA A0 00 ldy #0
24 01,16AC 91 82 sta (kloc_tmp),y
25 01,16AE A0 20 ldy #width
26 01,16B0 91 82 sta (kloc_tmp),y
27 01,16B2 A0 40 ldy #width*2
28 01,16B4 91 82 sta (kloc_tmp),y
29 01,16B6 A0 60 ldy #width*3
30 01,16B8 91 82 sta (kloc_tmp),y
31 01,16BA A0 80 ldy #width*4
32 01,16BC 91 82 sta (kloc_tmp),y
33 01,16BE A0 A0 ldy #width*5
34 01,16C0 91 82 sta (kloc_tmp),y
35 01,16C2 A0 C0 ldy #width*6
36 01,16C4 91 82 sta (kloc_tmp),y
37 01,16C6 A0 E0 ldy #width*7
38 01,16C8 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
693 01,16CA sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,16CA AA tax
11 01,16CB A5 80 lda kloc
12 01,16CD 18 clc
13 01,16CE 69 01 adc <1+WIDTH*8
14 01,16D0 85 82 sta kloc_tmp
15 01,16D2 A5 81 lda kloc+1
16 01,16D4 69 01 adc >1+WIDTH*8
17 01,16D6 85 83 sta kloc_tmp+1
21 01,16D8 8A txa
23 01,16D9 A0 00 ldy #0
24 01,16DB 91 82 sta (kloc_tmp),y
25 01,16DD A0 20 ldy #width
26 01,16DF 91 82 sta (kloc_tmp),y
27 01,16E1 A0 40 ldy #width*2
28 01,16E3 91 82 sta (kloc_tmp),y
29 01,16E5 A0 60 ldy #width*3
30 01,16E7 91 82 sta (kloc_tmp),y
31 01,16E9 A0 80 ldy #width*4
32 01,16EB 91 82 sta (kloc_tmp),y
33 01,16ED A0 A0 ldy #width*5
34 01,16EF 91 82 sta (kloc_tmp),y
35 01,16F1 A0 C0 ldy #width*6
36 01,16F3 91 82 sta (kloc_tmp),y
37 01,16F5 A0 E0 ldy #width*7
38 01,16F7 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
694 01,16F9 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,16F9 AA tax
11 01,16FA A5 80 lda kloc
12 01,16FC 18 clc
13 01,16FD 69 02 adc <2+WIDTH*8
14 01,16FF 85 82 sta kloc_tmp
15 01,1701 A5 81 lda kloc+1
16 01,1703 69 01 adc >2+WIDTH*8
17 01,1705 85 83 sta kloc_tmp+1
21 01,1707 8A txa
23 01,1708 A0 00 ldy #0
24 01,170A 91 82 sta (kloc_tmp),y
25 01,170C A0 20 ldy #width
26 01,170E 91 82 sta (kloc_tmp),y
27 01,1710 A0 40 ldy #width*2
28 01,1712 91 82 sta (kloc_tmp),y
29 01,1714 A0 60 ldy #width*3
30 01,1716 91 82 sta (kloc_tmp),y
31 01,1718 A0 80 ldy #width*4
32 01,171A 91 82 sta (kloc_tmp),y
33 01,171C A0 A0 ldy #width*5
34 01,171E 91 82 sta (kloc_tmp),y
35 01,1720 A0 C0 ldy #width*6
36 01,1722 91 82 sta (kloc_tmp),y
37 01,1724 A0 E0 ldy #width*7
38 01,1726 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
695 01,1728 60 rts
696
697 01,1729 test
698 01,1729 lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1729 AA tax
7 01,172A A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1732 E6 82 D0 02 E6 + inw kloc_tmp
21 01,1738 A0 00 ldy #0
22 01,173A 8A txa
24 01,173B 11 82 ora (kloc_tmp),y
25 01,173D A0 20 ldy #width
26 01,173F 11 82 ora (kloc_tmp),y
27 01,1741 A0 40 ldy #width*2
28 01,1743 11 82 ora (kloc_tmp),y
29 01,1745 A0 60 ldy #width*3
30 01,1747 11 82 ora (kloc_tmp),y
31 01,1749 A0 80 ldy #width*4
32 01,174B 11 82 ora (kloc_tmp),y
33 01,174D A0 A0 ldy #width*5
34 01,174F 11 82 ora (kloc_tmp),y
35 01,1751 A0 C0 ldy #width*6
36 01,1753 11 82 ora (kloc_tmp),y
37 01,1755 A0 E0 ldy #width*7
38 01,1757 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
699 01,1759 lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1759 AA tax
11 01,175A A5 80 lda kloc
12 01,175C 18 clc
13 01,175D 69 00 adc <WIDTH*8
14 01,175F 85 82 sta kloc_tmp
15 01,1761 A5 81 lda kloc+1
16 01,1763 69 01 adc >WIDTH*8
17 01,1765 85 83 sta kloc_tmp+1
21 01,1767 A0 00 ldy #0
22 01,1769 8A txa
24 01,176A 11 82 ora (kloc_tmp),y
25 01,176C A0 20 ldy #width
26 01,176E 11 82 ora (kloc_tmp),y
27 01,1770 A0 40 ldy #width*2
28 01,1772 11 82 ora (kloc_tmp),y
29 01,1774 A0 60 ldy #width*3
30 01,1776 11 82 ora (kloc_tmp),y
31 01,1778 A0 80 ldy #width*4
32 01,177A 11 82 ora (kloc_tmp),y
33 01,177C A0 A0 ldy #width*5
34 01,177E 11 82 ora (kloc_tmp),y
35 01,1780 A0 C0 ldy #width*6
36 01,1782 11 82 ora (kloc_tmp),y
37 01,1784 A0 E0 ldy #width*7
38 01,1786 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
700 01,1788 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1788 AA tax
11 01,1789 A5 80 lda kloc
12 01,178B 18 clc
13 01,178C 69 01 adc <1+WIDTH*8
14 01,178E 85 82 sta kloc_tmp
15 01,1790 A5 81 lda kloc+1
16 01,1792 69 01 adc >1+WIDTH*8
17 01,1794 85 83 sta kloc_tmp+1
21 01,1796 A0 00 ldy #0
22 01,1798 8A txa
24 01,1799 11 82 ora (kloc_tmp),y
25 01,179B A0 20 ldy #width
26 01,179D 11 82 ora (kloc_tmp),y
27 01,179F A0 40 ldy #width*2
28 01,17A1 11 82 ora (kloc_tmp),y
29 01,17A3 A0 60 ldy #width*3
30 01,17A5 11 82 ora (kloc_tmp),y
31 01,17A7 A0 80 ldy #width*4
32 01,17A9 11 82 ora (kloc_tmp),y
33 01,17AB A0 A0 ldy #width*5
34 01,17AD 11 82 ora (kloc_tmp),y
35 01,17AF A0 C0 ldy #width*6
36 01,17B1 11 82 ora (kloc_tmp),y
37 01,17B3 A0 E0 ldy #width*7
38 01,17B5 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
701 01,17B7 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,17B7 AA tax
11 01,17B8 A5 80 lda kloc
12 01,17BA 18 clc
13 01,17BB 69 02 adc <2+WIDTH*8
14 01,17BD 85 82 sta kloc_tmp
15 01,17BF A5 81 lda kloc+1
16 01,17C1 69 01 adc >2+WIDTH*8
17 01,17C3 85 83 sta kloc_tmp+1
21 01,17C5 A0 00 ldy #0
22 01,17C7 8A txa
24 01,17C8 11 82 ora (kloc_tmp),y
25 01,17CA A0 20 ldy #width
26 01,17CC 11 82 ora (kloc_tmp),y
27 01,17CE A0 40 ldy #width*2
28 01,17D0 11 82 ora (kloc_tmp),y
29 01,17D2 A0 60 ldy #width*3
30 01,17D4 11 82 ora (kloc_tmp),y
31 01,17D6 A0 80 ldy #width*4
32 01,17D8 11 82 ora (kloc_tmp),y
33 01,17DA A0 A0 ldy #width*5
34 01,17DC 11 82 ora (kloc_tmp),y
35 01,17DE A0 C0 ldy #width*6
36 01,17E0 11 82 ora (kloc_tmp),y
37 01,17E2 A0 E0 ldy #width*7
38 01,17E4 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
702 01,17E6 60 rts
703 .endp
704
705
706 ; ' * '
707 ; ' **'
708 ; ' * '
709 01,17E7 .proc klocek7_3
710 01,17E7 sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,17E7 AA tax
7 01,17E8 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,17F0 E6 82 D0 02 E6 + inw kloc_tmp
21 01,17F6 8A txa
23 01,17F7 A0 00 ldy #0
24 01,17F9 91 82 sta (kloc_tmp),y
25 01,17FB A0 20 ldy #width
26 01,17FD 91 82 sta (kloc_tmp),y
27 01,17FF A0 40 ldy #width*2
28 01,1801 91 82 sta (kloc_tmp),y
29 01,1803 A0 60 ldy #width*3
30 01,1805 91 82 sta (kloc_tmp),y
31 01,1807 A0 80 ldy #width*4
32 01,1809 91 82 sta (kloc_tmp),y
33 01,180B A0 A0 ldy #width*5
34 01,180D 91 82 sta (kloc_tmp),y
35 01,180F A0 C0 ldy #width*6
36 01,1811 91 82 sta (kloc_tmp),y
37 01,1813 A0 E0 ldy #width*7
38 01,1815 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
711 01,1817 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1817 AA tax
11 01,1818 A5 80 lda kloc
12 01,181A 18 clc
13 01,181B 69 01 adc <1+WIDTH*8
14 01,181D 85 82 sta kloc_tmp
15 01,181F A5 81 lda kloc+1
16 01,1821 69 01 adc >1+WIDTH*8
17 01,1823 85 83 sta kloc_tmp+1
21 01,1825 8A txa
23 01,1826 A0 00 ldy #0
24 01,1828 91 82 sta (kloc_tmp),y
25 01,182A A0 20 ldy #width
26 01,182C 91 82 sta (kloc_tmp),y
27 01,182E A0 40 ldy #width*2
28 01,1830 91 82 sta (kloc_tmp),y
29 01,1832 A0 60 ldy #width*3
30 01,1834 91 82 sta (kloc_tmp),y
31 01,1836 A0 80 ldy #width*4
32 01,1838 91 82 sta (kloc_tmp),y
33 01,183A A0 A0 ldy #width*5
34 01,183C 91 82 sta (kloc_tmp),y
35 01,183E A0 C0 ldy #width*6
36 01,1840 91 82 sta (kloc_tmp),y
37 01,1842 A0 E0 ldy #width*7
38 01,1844 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
712 01,1846 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1846 AA tax
11 01,1847 A5 80 lda kloc
12 01,1849 18 clc
13 01,184A 69 02 adc <2+WIDTH*8
14 01,184C 85 82 sta kloc_tmp
15 01,184E A5 81 lda kloc+1
16 01,1850 69 01 adc >2+WIDTH*8
17 01,1852 85 83 sta kloc_tmp+1
21 01,1854 8A txa
23 01,1855 A0 00 ldy #0
24 01,1857 91 82 sta (kloc_tmp),y
25 01,1859 A0 20 ldy #width
26 01,185B 91 82 sta (kloc_tmp),y
27 01,185D A0 40 ldy #width*2
28 01,185F 91 82 sta (kloc_tmp),y
29 01,1861 A0 60 ldy #width*3
30 01,1863 91 82 sta (kloc_tmp),y
31 01,1865 A0 80 ldy #width*4
32 01,1867 91 82 sta (kloc_tmp),y
33 01,1869 A0 A0 ldy #width*5
34 01,186B 91 82 sta (kloc_tmp),y
35 01,186D A0 C0 ldy #width*6
36 01,186F 91 82 sta (kloc_tmp),y
37 01,1871 A0 E0 ldy #width*7
38 01,1873 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
713 01,1875 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1875 AA tax
11 01,1876 A5 80 lda kloc
12 01,1878 18 clc
13 01,1879 69 01 adc <1+WIDTH*2*8
14 01,187B 85 82 sta kloc_tmp
15 01,187D A5 81 lda kloc+1
16 01,187F 69 02 adc >1+WIDTH*2*8
17 01,1881 85 83 sta kloc_tmp+1
21 01,1883 8A txa
23 01,1884 A0 00 ldy #0
24 01,1886 91 82 sta (kloc_tmp),y
25 01,1888 A0 20 ldy #width
26 01,188A 91 82 sta (kloc_tmp),y
27 01,188C A0 40 ldy #width*2
28 01,188E 91 82 sta (kloc_tmp),y
29 01,1890 A0 60 ldy #width*3
30 01,1892 91 82 sta (kloc_tmp),y
31 01,1894 A0 80 ldy #width*4
32 01,1896 91 82 sta (kloc_tmp),y
33 01,1898 A0 A0 ldy #width*5
34 01,189A 91 82 sta (kloc_tmp),y
35 01,189C A0 C0 ldy #width*6
36 01,189E 91 82 sta (kloc_tmp),y
37 01,18A0 A0 E0 ldy #width*7
38 01,18A2 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
714 01,18A4 60 rts
715
716 01,18A5 test
717 01,18A5 lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,18A5 AA tax
7 01,18A6 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,18AE E6 82 D0 02 E6 + inw kloc_tmp
21 01,18B4 A0 00 ldy #0
22 01,18B6 8A txa
24 01,18B7 11 82 ora (kloc_tmp),y
25 01,18B9 A0 20 ldy #width
26 01,18BB 11 82 ora (kloc_tmp),y
27 01,18BD A0 40 ldy #width*2
28 01,18BF 11 82 ora (kloc_tmp),y
29 01,18C1 A0 60 ldy #width*3
30 01,18C3 11 82 ora (kloc_tmp),y
31 01,18C5 A0 80 ldy #width*4
32 01,18C7 11 82 ora (kloc_tmp),y
33 01,18C9 A0 A0 ldy #width*5
34 01,18CB 11 82 ora (kloc_tmp),y
35 01,18CD A0 C0 ldy #width*6
36 01,18CF 11 82 ora (kloc_tmp),y
37 01,18D1 A0 E0 ldy #width*7
38 01,18D3 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
718 01,18D5 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,18D5 AA tax
11 01,18D6 A5 80 lda kloc
12 01,18D8 18 clc
13 01,18D9 69 01 adc <1+WIDTH*8
14 01,18DB 85 82 sta kloc_tmp
15 01,18DD A5 81 lda kloc+1
16 01,18DF 69 01 adc >1+WIDTH*8
17 01,18E1 85 83 sta kloc_tmp+1
21 01,18E3 A0 00 ldy #0
22 01,18E5 8A txa
24 01,18E6 11 82 ora (kloc_tmp),y
25 01,18E8 A0 20 ldy #width
26 01,18EA 11 82 ora (kloc_tmp),y
27 01,18EC A0 40 ldy #width*2
28 01,18EE 11 82 ora (kloc_tmp),y
29 01,18F0 A0 60 ldy #width*3
30 01,18F2 11 82 ora (kloc_tmp),y
31 01,18F4 A0 80 ldy #width*4
32 01,18F6 11 82 ora (kloc_tmp),y
33 01,18F8 A0 A0 ldy #width*5
34 01,18FA 11 82 ora (kloc_tmp),y
35 01,18FC A0 C0 ldy #width*6
36 01,18FE 11 82 ora (kloc_tmp),y
37 01,1900 A0 E0 ldy #width*7
38 01,1902 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
719 01,1904 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1904 AA tax
11 01,1905 A5 80 lda kloc
12 01,1907 18 clc
13 01,1908 69 02 adc <2+WIDTH*8
14 01,190A 85 82 sta kloc_tmp
15 01,190C A5 81 lda kloc+1
16 01,190E 69 01 adc >2+WIDTH*8
17 01,1910 85 83 sta kloc_tmp+1
21 01,1912 A0 00 ldy #0
22 01,1914 8A txa
24 01,1915 11 82 ora (kloc_tmp),y
25 01,1917 A0 20 ldy #width
26 01,1919 11 82 ora (kloc_tmp),y
27 01,191B A0 40 ldy #width*2
28 01,191D 11 82 ora (kloc_tmp),y
29 01,191F A0 60 ldy #width*3
30 01,1921 11 82 ora (kloc_tmp),y
31 01,1923 A0 80 ldy #width*4
32 01,1925 11 82 ora (kloc_tmp),y
33 01,1927 A0 A0 ldy #width*5
34 01,1929 11 82 ora (kloc_tmp),y
35 01,192B A0 C0 ldy #width*6
36 01,192D 11 82 ora (kloc_tmp),y
37 01,192F A0 E0 ldy #width*7
38 01,1931 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
720 01,1933 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1933 AA tax
11 01,1934 A5 80 lda kloc
12 01,1936 18 clc
13 01,1937 69 01 adc <1+WIDTH*2*8
14 01,1939 85 82 sta kloc_tmp
15 01,193B A5 81 lda kloc+1
16 01,193D 69 02 adc >1+WIDTH*2*8
17 01,193F 85 83 sta kloc_tmp+1
21 01,1941 A0 00 ldy #0
22 01,1943 8A txa
24 01,1944 11 82 ora (kloc_tmp),y
25 01,1946 A0 20 ldy #width
26 01,1948 11 82 ora (kloc_tmp),y
27 01,194A A0 40 ldy #width*2
28 01,194C 11 82 ora (kloc_tmp),y
29 01,194E A0 60 ldy #width*3
30 01,1950 11 82 ora (kloc_tmp),y
31 01,1952 A0 80 ldy #width*4
32 01,1954 11 82 ora (kloc_tmp),y
33 01,1956 A0 A0 ldy #width*5
34 01,1958 11 82 ora (kloc_tmp),y
35 01,195A A0 C0 ldy #width*6
36 01,195C 11 82 ora (kloc_tmp),y
37 01,195E A0 E0 ldy #width*7
38 01,1960 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
721 01,1962 60 rts
722 .endp
723
724
725 * KLOCEK 8 (4 fazy)
726 ; ' *'
727 ; ' *'
728 ; '***'
729 01,1963 .proc klocek8_0
730 01,1963 sta_kloc 2
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1963 AA tax
11 01,1964 A5 80 lda kloc
12 01,1966 18 clc
13 01,1967 69 02 adc <2
14 01,1969 85 82 sta kloc_tmp
15 01,196B A5 81 lda kloc+1
16 01,196D 69 00 adc >2
17 01,196F 85 83 sta kloc_tmp+1
21 01,1971 8A txa
23 01,1972 A0 00 ldy #0
24 01,1974 91 82 sta (kloc_tmp),y
25 01,1976 A0 20 ldy #width
26 01,1978 91 82 sta (kloc_tmp),y
27 01,197A A0 40 ldy #width*2
28 01,197C 91 82 sta (kloc_tmp),y
29 01,197E A0 60 ldy #width*3
30 01,1980 91 82 sta (kloc_tmp),y
31 01,1982 A0 80 ldy #width*4
32 01,1984 91 82 sta (kloc_tmp),y
33 01,1986 A0 A0 ldy #width*5
34 01,1988 91 82 sta (kloc_tmp),y
35 01,198A A0 C0 ldy #width*6
36 01,198C 91 82 sta (kloc_tmp),y
37 01,198E A0 E0 ldy #width*7
38 01,1990 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
731 01,1992 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1992 AA tax
11 01,1993 A5 80 lda kloc
12 01,1995 18 clc
13 01,1996 69 02 adc <2+WIDTH*8
14 01,1998 85 82 sta kloc_tmp
15 01,199A A5 81 lda kloc+1
16 01,199C 69 01 adc >2+WIDTH*8
17 01,199E 85 83 sta kloc_tmp+1
21 01,19A0 8A txa
23 01,19A1 A0 00 ldy #0
24 01,19A3 91 82 sta (kloc_tmp),y
25 01,19A5 A0 20 ldy #width
26 01,19A7 91 82 sta (kloc_tmp),y
27 01,19A9 A0 40 ldy #width*2
28 01,19AB 91 82 sta (kloc_tmp),y
29 01,19AD A0 60 ldy #width*3
30 01,19AF 91 82 sta (kloc_tmp),y
31 01,19B1 A0 80 ldy #width*4
32 01,19B3 91 82 sta (kloc_tmp),y
33 01,19B5 A0 A0 ldy #width*5
34 01,19B7 91 82 sta (kloc_tmp),y
35 01,19B9 A0 C0 ldy #width*6
36 01,19BB 91 82 sta (kloc_tmp),y
37 01,19BD A0 E0 ldy #width*7
38 01,19BF 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
732 01,19C1 sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,19C1 AA tax
11 01,19C2 A5 80 lda kloc
12 01,19C4 18 clc
13 01,19C5 69 00 adc <WIDTH*2*8
14 01,19C7 85 82 sta kloc_tmp
15 01,19C9 A5 81 lda kloc+1
16 01,19CB 69 02 adc >WIDTH*2*8
17 01,19CD 85 83 sta kloc_tmp+1
21 01,19CF 8A txa
23 01,19D0 A0 00 ldy #0
24 01,19D2 91 82 sta (kloc_tmp),y
25 01,19D4 A0 20 ldy #width
26 01,19D6 91 82 sta (kloc_tmp),y
27 01,19D8 A0 40 ldy #width*2
28 01,19DA 91 82 sta (kloc_tmp),y
29 01,19DC A0 60 ldy #width*3
30 01,19DE 91 82 sta (kloc_tmp),y
31 01,19E0 A0 80 ldy #width*4
32 01,19E2 91 82 sta (kloc_tmp),y
33 01,19E4 A0 A0 ldy #width*5
34 01,19E6 91 82 sta (kloc_tmp),y
35 01,19E8 A0 C0 ldy #width*6
36 01,19EA 91 82 sta (kloc_tmp),y
37 01,19EC A0 E0 ldy #width*7
38 01,19EE 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
733 01,19F0 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,19F0 AA tax
11 01,19F1 A5 80 lda kloc
12 01,19F3 18 clc
13 01,19F4 69 01 adc <1+WIDTH*2*8
14 01,19F6 85 82 sta kloc_tmp
15 01,19F8 A5 81 lda kloc+1
16 01,19FA 69 02 adc >1+WIDTH*2*8
17 01,19FC 85 83 sta kloc_tmp+1
21 01,19FE 8A txa
23 01,19FF A0 00 ldy #0
24 01,1A01 91 82 sta (kloc_tmp),y
25 01,1A03 A0 20 ldy #width
26 01,1A05 91 82 sta (kloc_tmp),y
27 01,1A07 A0 40 ldy #width*2
28 01,1A09 91 82 sta (kloc_tmp),y
29 01,1A0B A0 60 ldy #width*3
30 01,1A0D 91 82 sta (kloc_tmp),y
31 01,1A0F A0 80 ldy #width*4
32 01,1A11 91 82 sta (kloc_tmp),y
33 01,1A13 A0 A0 ldy #width*5
34 01,1A15 91 82 sta (kloc_tmp),y
35 01,1A17 A0 C0 ldy #width*6
36 01,1A19 91 82 sta (kloc_tmp),y
37 01,1A1B A0 E0 ldy #width*7
38 01,1A1D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
734 01,1A1F sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1A1F AA tax
11 01,1A20 A5 80 lda kloc
12 01,1A22 18 clc
13 01,1A23 69 02 adc <2+WIDTH*2*8
14 01,1A25 85 82 sta kloc_tmp
15 01,1A27 A5 81 lda kloc+1
16 01,1A29 69 02 adc >2+WIDTH*2*8
17 01,1A2B 85 83 sta kloc_tmp+1
21 01,1A2D 8A txa
23 01,1A2E A0 00 ldy #0
24 01,1A30 91 82 sta (kloc_tmp),y
25 01,1A32 A0 20 ldy #width
26 01,1A34 91 82 sta (kloc_tmp),y
27 01,1A36 A0 40 ldy #width*2
28 01,1A38 91 82 sta (kloc_tmp),y
29 01,1A3A A0 60 ldy #width*3
30 01,1A3C 91 82 sta (kloc_tmp),y
31 01,1A3E A0 80 ldy #width*4
32 01,1A40 91 82 sta (kloc_tmp),y
33 01,1A42 A0 A0 ldy #width*5
34 01,1A44 91 82 sta (kloc_tmp),y
35 01,1A46 A0 C0 ldy #width*6
36 01,1A48 91 82 sta (kloc_tmp),y
37 01,1A4A A0 E0 ldy #width*7
38 01,1A4C 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
735 01,1A4E 60 rts
736
737 01,1A4F test
738 01,1A4F lda_kloc 2
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1A4F AA tax
11 01,1A50 A5 80 lda kloc
12 01,1A52 18 clc
13 01,1A53 69 02 adc <2
14 01,1A55 85 82 sta kloc_tmp
15 01,1A57 A5 81 lda kloc+1
16 01,1A59 69 00 adc >2
17 01,1A5B 85 83 sta kloc_tmp+1
21 01,1A5D A0 00 ldy #0
22 01,1A5F 8A txa
24 01,1A60 11 82 ora (kloc_tmp),y
25 01,1A62 A0 20 ldy #width
26 01,1A64 11 82 ora (kloc_tmp),y
27 01,1A66 A0 40 ldy #width*2
28 01,1A68 11 82 ora (kloc_tmp),y
29 01,1A6A A0 60 ldy #width*3
30 01,1A6C 11 82 ora (kloc_tmp),y
31 01,1A6E A0 80 ldy #width*4
32 01,1A70 11 82 ora (kloc_tmp),y
33 01,1A72 A0 A0 ldy #width*5
34 01,1A74 11 82 ora (kloc_tmp),y
35 01,1A76 A0 C0 ldy #width*6
36 01,1A78 11 82 ora (kloc_tmp),y
37 01,1A7A A0 E0 ldy #width*7
38 01,1A7C 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
739 01,1A7E lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1A7E AA tax
11 01,1A7F A5 80 lda kloc
12 01,1A81 18 clc
13 01,1A82 69 02 adc <2+WIDTH*8
14 01,1A84 85 82 sta kloc_tmp
15 01,1A86 A5 81 lda kloc+1
16 01,1A88 69 01 adc >2+WIDTH*8
17 01,1A8A 85 83 sta kloc_tmp+1
21 01,1A8C A0 00 ldy #0
22 01,1A8E 8A txa
24 01,1A8F 11 82 ora (kloc_tmp),y
25 01,1A91 A0 20 ldy #width
26 01,1A93 11 82 ora (kloc_tmp),y
27 01,1A95 A0 40 ldy #width*2
28 01,1A97 11 82 ora (kloc_tmp),y
29 01,1A99 A0 60 ldy #width*3
30 01,1A9B 11 82 ora (kloc_tmp),y
31 01,1A9D A0 80 ldy #width*4
32 01,1A9F 11 82 ora (kloc_tmp),y
33 01,1AA1 A0 A0 ldy #width*5
34 01,1AA3 11 82 ora (kloc_tmp),y
35 01,1AA5 A0 C0 ldy #width*6
36 01,1AA7 11 82 ora (kloc_tmp),y
37 01,1AA9 A0 E0 ldy #width*7
38 01,1AAB 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
740 01,1AAD lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1AAD AA tax
11 01,1AAE A5 80 lda kloc
12 01,1AB0 18 clc
13 01,1AB1 69 00 adc <WIDTH*2*8
14 01,1AB3 85 82 sta kloc_tmp
15 01,1AB5 A5 81 lda kloc+1
16 01,1AB7 69 02 adc >WIDTH*2*8
17 01,1AB9 85 83 sta kloc_tmp+1
21 01,1ABB A0 00 ldy #0
22 01,1ABD 8A txa
24 01,1ABE 11 82 ora (kloc_tmp),y
25 01,1AC0 A0 20 ldy #width
26 01,1AC2 11 82 ora (kloc_tmp),y
27 01,1AC4 A0 40 ldy #width*2
28 01,1AC6 11 82 ora (kloc_tmp),y
29 01,1AC8 A0 60 ldy #width*3
30 01,1ACA 11 82 ora (kloc_tmp),y
31 01,1ACC A0 80 ldy #width*4
32 01,1ACE 11 82 ora (kloc_tmp),y
33 01,1AD0 A0 A0 ldy #width*5
34 01,1AD2 11 82 ora (kloc_tmp),y
35 01,1AD4 A0 C0 ldy #width*6
36 01,1AD6 11 82 ora (kloc_tmp),y
37 01,1AD8 A0 E0 ldy #width*7
38 01,1ADA 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
741 01,1ADC lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1ADC AA tax
11 01,1ADD A5 80 lda kloc
12 01,1ADF 18 clc
13 01,1AE0 69 01 adc <1+WIDTH*2*8
14 01,1AE2 85 82 sta kloc_tmp
15 01,1AE4 A5 81 lda kloc+1
16 01,1AE6 69 02 adc >1+WIDTH*2*8
17 01,1AE8 85 83 sta kloc_tmp+1
21 01,1AEA A0 00 ldy #0
22 01,1AEC 8A txa
24 01,1AED 11 82 ora (kloc_tmp),y
25 01,1AEF A0 20 ldy #width
26 01,1AF1 11 82 ora (kloc_tmp),y
27 01,1AF3 A0 40 ldy #width*2
28 01,1AF5 11 82 ora (kloc_tmp),y
29 01,1AF7 A0 60 ldy #width*3
30 01,1AF9 11 82 ora (kloc_tmp),y
31 01,1AFB A0 80 ldy #width*4
32 01,1AFD 11 82 ora (kloc_tmp),y
33 01,1AFF A0 A0 ldy #width*5
34 01,1B01 11 82 ora (kloc_tmp),y
35 01,1B03 A0 C0 ldy #width*6
36 01,1B05 11 82 ora (kloc_tmp),y
37 01,1B07 A0 E0 ldy #width*7
38 01,1B09 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
742 01,1B0B lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1B0B AA tax
11 01,1B0C A5 80 lda kloc
12 01,1B0E 18 clc
13 01,1B0F 69 02 adc <2+WIDTH*2*8
14 01,1B11 85 82 sta kloc_tmp
15 01,1B13 A5 81 lda kloc+1
16 01,1B15 69 02 adc >2+WIDTH*2*8
17 01,1B17 85 83 sta kloc_tmp+1
21 01,1B19 A0 00 ldy #0
22 01,1B1B 8A txa
24 01,1B1C 11 82 ora (kloc_tmp),y
25 01,1B1E A0 20 ldy #width
26 01,1B20 11 82 ora (kloc_tmp),y
27 01,1B22 A0 40 ldy #width*2
28 01,1B24 11 82 ora (kloc_tmp),y
29 01,1B26 A0 60 ldy #width*3
30 01,1B28 11 82 ora (kloc_tmp),y
31 01,1B2A A0 80 ldy #width*4
32 01,1B2C 11 82 ora (kloc_tmp),y
33 01,1B2E A0 A0 ldy #width*5
34 01,1B30 11 82 ora (kloc_tmp),y
35 01,1B32 A0 C0 ldy #width*6
36 01,1B34 11 82 ora (kloc_tmp),y
37 01,1B36 A0 E0 ldy #width*7
38 01,1B38 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
743 01,1B3A 60 rts
744 .endp
745
746
747 ; '* '
748 ; '* '
749 ; '***'
750 01,1B3B .proc klocek8_1
751 01,1B3B sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1B3B AA tax
4 01,1B3C A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,1B44 8A txa
23 01,1B45 A0 00 ldy #0
24 01,1B47 91 82 sta (kloc_tmp),y
25 01,1B49 A0 20 ldy #width
26 01,1B4B 91 82 sta (kloc_tmp),y
27 01,1B4D A0 40 ldy #width*2
28 01,1B4F 91 82 sta (kloc_tmp),y
29 01,1B51 A0 60 ldy #width*3
30 01,1B53 91 82 sta (kloc_tmp),y
31 01,1B55 A0 80 ldy #width*4
32 01,1B57 91 82 sta (kloc_tmp),y
33 01,1B59 A0 A0 ldy #width*5
34 01,1B5B 91 82 sta (kloc_tmp),y
35 01,1B5D A0 C0 ldy #width*6
36 01,1B5F 91 82 sta (kloc_tmp),y
37 01,1B61 A0 E0 ldy #width*7
38 01,1B63 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
752 01,1B65 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1B65 AA tax
11 01,1B66 A5 80 lda kloc
12 01,1B68 18 clc
13 01,1B69 69 00 adc <WIDTH*8
14 01,1B6B 85 82 sta kloc_tmp
15 01,1B6D A5 81 lda kloc+1
16 01,1B6F 69 01 adc >WIDTH*8
17 01,1B71 85 83 sta kloc_tmp+1
21 01,1B73 8A txa
23 01,1B74 A0 00 ldy #0
24 01,1B76 91 82 sta (kloc_tmp),y
25 01,1B78 A0 20 ldy #width
26 01,1B7A 91 82 sta (kloc_tmp),y
27 01,1B7C A0 40 ldy #width*2
28 01,1B7E 91 82 sta (kloc_tmp),y
29 01,1B80 A0 60 ldy #width*3
30 01,1B82 91 82 sta (kloc_tmp),y
31 01,1B84 A0 80 ldy #width*4
32 01,1B86 91 82 sta (kloc_tmp),y
33 01,1B88 A0 A0 ldy #width*5
34 01,1B8A 91 82 sta (kloc_tmp),y
35 01,1B8C A0 C0 ldy #width*6
36 01,1B8E 91 82 sta (kloc_tmp),y
37 01,1B90 A0 E0 ldy #width*7
38 01,1B92 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
753 01,1B94 sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1B94 AA tax
11 01,1B95 A5 80 lda kloc
12 01,1B97 18 clc
13 01,1B98 69 00 adc <WIDTH*2*8
14 01,1B9A 85 82 sta kloc_tmp
15 01,1B9C A5 81 lda kloc+1
16 01,1B9E 69 02 adc >WIDTH*2*8
17 01,1BA0 85 83 sta kloc_tmp+1
21 01,1BA2 8A txa
23 01,1BA3 A0 00 ldy #0
24 01,1BA5 91 82 sta (kloc_tmp),y
25 01,1BA7 A0 20 ldy #width
26 01,1BA9 91 82 sta (kloc_tmp),y
27 01,1BAB A0 40 ldy #width*2
28 01,1BAD 91 82 sta (kloc_tmp),y
29 01,1BAF A0 60 ldy #width*3
30 01,1BB1 91 82 sta (kloc_tmp),y
31 01,1BB3 A0 80 ldy #width*4
32 01,1BB5 91 82 sta (kloc_tmp),y
33 01,1BB7 A0 A0 ldy #width*5
34 01,1BB9 91 82 sta (kloc_tmp),y
35 01,1BBB A0 C0 ldy #width*6
36 01,1BBD 91 82 sta (kloc_tmp),y
37 01,1BBF A0 E0 ldy #width*7
38 01,1BC1 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
754 01,1BC3 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1BC3 AA tax
11 01,1BC4 A5 80 lda kloc
12 01,1BC6 18 clc
13 01,1BC7 69 01 adc <1+WIDTH*2*8
14 01,1BC9 85 82 sta kloc_tmp
15 01,1BCB A5 81 lda kloc+1
16 01,1BCD 69 02 adc >1+WIDTH*2*8
17 01,1BCF 85 83 sta kloc_tmp+1
21 01,1BD1 8A txa
23 01,1BD2 A0 00 ldy #0
24 01,1BD4 91 82 sta (kloc_tmp),y
25 01,1BD6 A0 20 ldy #width
26 01,1BD8 91 82 sta (kloc_tmp),y
27 01,1BDA A0 40 ldy #width*2
28 01,1BDC 91 82 sta (kloc_tmp),y
29 01,1BDE A0 60 ldy #width*3
30 01,1BE0 91 82 sta (kloc_tmp),y
31 01,1BE2 A0 80 ldy #width*4
32 01,1BE4 91 82 sta (kloc_tmp),y
33 01,1BE6 A0 A0 ldy #width*5
34 01,1BE8 91 82 sta (kloc_tmp),y
35 01,1BEA A0 C0 ldy #width*6
36 01,1BEC 91 82 sta (kloc_tmp),y
37 01,1BEE A0 E0 ldy #width*7
38 01,1BF0 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
755 01,1BF2 sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1BF2 AA tax
11 01,1BF3 A5 80 lda kloc
12 01,1BF5 18 clc
13 01,1BF6 69 02 adc <2+WIDTH*2*8
14 01,1BF8 85 82 sta kloc_tmp
15 01,1BFA A5 81 lda kloc+1
16 01,1BFC 69 02 adc >2+WIDTH*2*8
17 01,1BFE 85 83 sta kloc_tmp+1
21 01,1C00 8A txa
23 01,1C01 A0 00 ldy #0
24 01,1C03 91 82 sta (kloc_tmp),y
25 01,1C05 A0 20 ldy #width
26 01,1C07 91 82 sta (kloc_tmp),y
27 01,1C09 A0 40 ldy #width*2
28 01,1C0B 91 82 sta (kloc_tmp),y
29 01,1C0D A0 60 ldy #width*3
30 01,1C0F 91 82 sta (kloc_tmp),y
31 01,1C11 A0 80 ldy #width*4
32 01,1C13 91 82 sta (kloc_tmp),y
33 01,1C15 A0 A0 ldy #width*5
34 01,1C17 91 82 sta (kloc_tmp),y
35 01,1C19 A0 C0 ldy #width*6
36 01,1C1B 91 82 sta (kloc_tmp),y
37 01,1C1D A0 E0 ldy #width*7
38 01,1C1F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
756 01,1C21 60 rts
757
758 01,1C22 test
759 01,1C22 lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1C22 AA tax
4 01,1C23 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,1C2B A0 00 ldy #0
22 01,1C2D 8A txa
24 01,1C2E 11 82 ora (kloc_tmp),y
25 01,1C30 A0 20 ldy #width
26 01,1C32 11 82 ora (kloc_tmp),y
27 01,1C34 A0 40 ldy #width*2
28 01,1C36 11 82 ora (kloc_tmp),y
29 01,1C38 A0 60 ldy #width*3
30 01,1C3A 11 82 ora (kloc_tmp),y
31 01,1C3C A0 80 ldy #width*4
32 01,1C3E 11 82 ora (kloc_tmp),y
33 01,1C40 A0 A0 ldy #width*5
34 01,1C42 11 82 ora (kloc_tmp),y
35 01,1C44 A0 C0 ldy #width*6
36 01,1C46 11 82 ora (kloc_tmp),y
37 01,1C48 A0 E0 ldy #width*7
38 01,1C4A 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
760 01,1C4C lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1C4C AA tax
11 01,1C4D A5 80 lda kloc
12 01,1C4F 18 clc
13 01,1C50 69 00 adc <WIDTH*8
14 01,1C52 85 82 sta kloc_tmp
15 01,1C54 A5 81 lda kloc+1
16 01,1C56 69 01 adc >WIDTH*8
17 01,1C58 85 83 sta kloc_tmp+1
21 01,1C5A A0 00 ldy #0
22 01,1C5C 8A txa
24 01,1C5D 11 82 ora (kloc_tmp),y
25 01,1C5F A0 20 ldy #width
26 01,1C61 11 82 ora (kloc_tmp),y
27 01,1C63 A0 40 ldy #width*2
28 01,1C65 11 82 ora (kloc_tmp),y
29 01,1C67 A0 60 ldy #width*3
30 01,1C69 11 82 ora (kloc_tmp),y
31 01,1C6B A0 80 ldy #width*4
32 01,1C6D 11 82 ora (kloc_tmp),y
33 01,1C6F A0 A0 ldy #width*5
34 01,1C71 11 82 ora (kloc_tmp),y
35 01,1C73 A0 C0 ldy #width*6
36 01,1C75 11 82 ora (kloc_tmp),y
37 01,1C77 A0 E0 ldy #width*7
38 01,1C79 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
761 01,1C7B lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1C7B AA tax
11 01,1C7C A5 80 lda kloc
12 01,1C7E 18 clc
13 01,1C7F 69 00 adc <WIDTH*2*8
14 01,1C81 85 82 sta kloc_tmp
15 01,1C83 A5 81 lda kloc+1
16 01,1C85 69 02 adc >WIDTH*2*8
17 01,1C87 85 83 sta kloc_tmp+1
21 01,1C89 A0 00 ldy #0
22 01,1C8B 8A txa
24 01,1C8C 11 82 ora (kloc_tmp),y
25 01,1C8E A0 20 ldy #width
26 01,1C90 11 82 ora (kloc_tmp),y
27 01,1C92 A0 40 ldy #width*2
28 01,1C94 11 82 ora (kloc_tmp),y
29 01,1C96 A0 60 ldy #width*3
30 01,1C98 11 82 ora (kloc_tmp),y
31 01,1C9A A0 80 ldy #width*4
32 01,1C9C 11 82 ora (kloc_tmp),y
33 01,1C9E A0 A0 ldy #width*5
34 01,1CA0 11 82 ora (kloc_tmp),y
35 01,1CA2 A0 C0 ldy #width*6
36 01,1CA4 11 82 ora (kloc_tmp),y
37 01,1CA6 A0 E0 ldy #width*7
38 01,1CA8 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
762 01,1CAA lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1CAA AA tax
11 01,1CAB A5 80 lda kloc
12 01,1CAD 18 clc
13 01,1CAE 69 01 adc <1+WIDTH*2*8
14 01,1CB0 85 82 sta kloc_tmp
15 01,1CB2 A5 81 lda kloc+1
16 01,1CB4 69 02 adc >1+WIDTH*2*8
17 01,1CB6 85 83 sta kloc_tmp+1
21 01,1CB8 A0 00 ldy #0
22 01,1CBA 8A txa
24 01,1CBB 11 82 ora (kloc_tmp),y
25 01,1CBD A0 20 ldy #width
26 01,1CBF 11 82 ora (kloc_tmp),y
27 01,1CC1 A0 40 ldy #width*2
28 01,1CC3 11 82 ora (kloc_tmp),y
29 01,1CC5 A0 60 ldy #width*3
30 01,1CC7 11 82 ora (kloc_tmp),y
31 01,1CC9 A0 80 ldy #width*4
32 01,1CCB 11 82 ora (kloc_tmp),y
33 01,1CCD A0 A0 ldy #width*5
34 01,1CCF 11 82 ora (kloc_tmp),y
35 01,1CD1 A0 C0 ldy #width*6
36 01,1CD3 11 82 ora (kloc_tmp),y
37 01,1CD5 A0 E0 ldy #width*7
38 01,1CD7 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
763 01,1CD9 lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1CD9 AA tax
11 01,1CDA A5 80 lda kloc
12 01,1CDC 18 clc
13 01,1CDD 69 02 adc <2+WIDTH*2*8
14 01,1CDF 85 82 sta kloc_tmp
15 01,1CE1 A5 81 lda kloc+1
16 01,1CE3 69 02 adc >2+WIDTH*2*8
17 01,1CE5 85 83 sta kloc_tmp+1
21 01,1CE7 A0 00 ldy #0
22 01,1CE9 8A txa
24 01,1CEA 11 82 ora (kloc_tmp),y
25 01,1CEC A0 20 ldy #width
26 01,1CEE 11 82 ora (kloc_tmp),y
27 01,1CF0 A0 40 ldy #width*2
28 01,1CF2 11 82 ora (kloc_tmp),y
29 01,1CF4 A0 60 ldy #width*3
30 01,1CF6 11 82 ora (kloc_tmp),y
31 01,1CF8 A0 80 ldy #width*4
32 01,1CFA 11 82 ora (kloc_tmp),y
33 01,1CFC A0 A0 ldy #width*5
34 01,1CFE 11 82 ora (kloc_tmp),y
35 01,1D00 A0 C0 ldy #width*6
36 01,1D02 11 82 ora (kloc_tmp),y
37 01,1D04 A0 E0 ldy #width*7
38 01,1D06 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
764 01,1D08 60 rts
765 .endp
766
767
768 ; '***'
769 ; '* '
770 ; '* '
771 01,1D09 .proc klocek8_2
772 01,1D09 sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1D09 AA tax
4 01,1D0A A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,1D12 8A txa
23 01,1D13 A0 00 ldy #0
24 01,1D15 91 82 sta (kloc_tmp),y
25 01,1D17 A0 20 ldy #width
26 01,1D19 91 82 sta (kloc_tmp),y
27 01,1D1B A0 40 ldy #width*2
28 01,1D1D 91 82 sta (kloc_tmp),y
29 01,1D1F A0 60 ldy #width*3
30 01,1D21 91 82 sta (kloc_tmp),y
31 01,1D23 A0 80 ldy #width*4
32 01,1D25 91 82 sta (kloc_tmp),y
33 01,1D27 A0 A0 ldy #width*5
34 01,1D29 91 82 sta (kloc_tmp),y
35 01,1D2B A0 C0 ldy #width*6
36 01,1D2D 91 82 sta (kloc_tmp),y
37 01,1D2F A0 E0 ldy #width*7
38 01,1D31 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
773 01,1D33 sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1D33 AA tax
7 01,1D34 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1D3C E6 82 D0 02 E6 + inw kloc_tmp
21 01,1D42 8A txa
23 01,1D43 A0 00 ldy #0
24 01,1D45 91 82 sta (kloc_tmp),y
25 01,1D47 A0 20 ldy #width
26 01,1D49 91 82 sta (kloc_tmp),y
27 01,1D4B A0 40 ldy #width*2
28 01,1D4D 91 82 sta (kloc_tmp),y
29 01,1D4F A0 60 ldy #width*3
30 01,1D51 91 82 sta (kloc_tmp),y
31 01,1D53 A0 80 ldy #width*4
32 01,1D55 91 82 sta (kloc_tmp),y
33 01,1D57 A0 A0 ldy #width*5
34 01,1D59 91 82 sta (kloc_tmp),y
35 01,1D5B A0 C0 ldy #width*6
36 01,1D5D 91 82 sta (kloc_tmp),y
37 01,1D5F A0 E0 ldy #width*7
38 01,1D61 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
774 01,1D63 sta_kloc 2
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1D63 AA tax
11 01,1D64 A5 80 lda kloc
12 01,1D66 18 clc
13 01,1D67 69 02 adc <2
14 01,1D69 85 82 sta kloc_tmp
15 01,1D6B A5 81 lda kloc+1
16 01,1D6D 69 00 adc >2
17 01,1D6F 85 83 sta kloc_tmp+1
21 01,1D71 8A txa
23 01,1D72 A0 00 ldy #0
24 01,1D74 91 82 sta (kloc_tmp),y
25 01,1D76 A0 20 ldy #width
26 01,1D78 91 82 sta (kloc_tmp),y
27 01,1D7A A0 40 ldy #width*2
28 01,1D7C 91 82 sta (kloc_tmp),y
29 01,1D7E A0 60 ldy #width*3
30 01,1D80 91 82 sta (kloc_tmp),y
31 01,1D82 A0 80 ldy #width*4
32 01,1D84 91 82 sta (kloc_tmp),y
33 01,1D86 A0 A0 ldy #width*5
34 01,1D88 91 82 sta (kloc_tmp),y
35 01,1D8A A0 C0 ldy #width*6
36 01,1D8C 91 82 sta (kloc_tmp),y
37 01,1D8E A0 E0 ldy #width*7
38 01,1D90 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
775 01,1D92 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1D92 AA tax
11 01,1D93 A5 80 lda kloc
12 01,1D95 18 clc
13 01,1D96 69 00 adc <WIDTH*8
14 01,1D98 85 82 sta kloc_tmp
15 01,1D9A A5 81 lda kloc+1
16 01,1D9C 69 01 adc >WIDTH*8
17 01,1D9E 85 83 sta kloc_tmp+1
21 01,1DA0 8A txa
23 01,1DA1 A0 00 ldy #0
24 01,1DA3 91 82 sta (kloc_tmp),y
25 01,1DA5 A0 20 ldy #width
26 01,1DA7 91 82 sta (kloc_tmp),y
27 01,1DA9 A0 40 ldy #width*2
28 01,1DAB 91 82 sta (kloc_tmp),y
29 01,1DAD A0 60 ldy #width*3
30 01,1DAF 91 82 sta (kloc_tmp),y
31 01,1DB1 A0 80 ldy #width*4
32 01,1DB3 91 82 sta (kloc_tmp),y
33 01,1DB5 A0 A0 ldy #width*5
34 01,1DB7 91 82 sta (kloc_tmp),y
35 01,1DB9 A0 C0 ldy #width*6
36 01,1DBB 91 82 sta (kloc_tmp),y
37 01,1DBD A0 E0 ldy #width*7
38 01,1DBF 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
776 01,1DC1 sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1DC1 AA tax
11 01,1DC2 A5 80 lda kloc
12 01,1DC4 18 clc
13 01,1DC5 69 00 adc <WIDTH*2*8
14 01,1DC7 85 82 sta kloc_tmp
15 01,1DC9 A5 81 lda kloc+1
16 01,1DCB 69 02 adc >WIDTH*2*8
17 01,1DCD 85 83 sta kloc_tmp+1
21 01,1DCF 8A txa
23 01,1DD0 A0 00 ldy #0
24 01,1DD2 91 82 sta (kloc_tmp),y
25 01,1DD4 A0 20 ldy #width
26 01,1DD6 91 82 sta (kloc_tmp),y
27 01,1DD8 A0 40 ldy #width*2
28 01,1DDA 91 82 sta (kloc_tmp),y
29 01,1DDC A0 60 ldy #width*3
30 01,1DDE 91 82 sta (kloc_tmp),y
31 01,1DE0 A0 80 ldy #width*4
32 01,1DE2 91 82 sta (kloc_tmp),y
33 01,1DE4 A0 A0 ldy #width*5
34 01,1DE6 91 82 sta (kloc_tmp),y
35 01,1DE8 A0 C0 ldy #width*6
36 01,1DEA 91 82 sta (kloc_tmp),y
37 01,1DEC A0 E0 ldy #width*7
38 01,1DEE 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
777 01,1DF0 60 rts
778
779 01,1DF1 test
780 01,1DF1 lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1DF1 AA tax
4 01,1DF2 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,1DFA A0 00 ldy #0
22 01,1DFC 8A txa
24 01,1DFD 11 82 ora (kloc_tmp),y
25 01,1DFF A0 20 ldy #width
26 01,1E01 11 82 ora (kloc_tmp),y
27 01,1E03 A0 40 ldy #width*2
28 01,1E05 11 82 ora (kloc_tmp),y
29 01,1E07 A0 60 ldy #width*3
30 01,1E09 11 82 ora (kloc_tmp),y
31 01,1E0B A0 80 ldy #width*4
32 01,1E0D 11 82 ora (kloc_tmp),y
33 01,1E0F A0 A0 ldy #width*5
34 01,1E11 11 82 ora (kloc_tmp),y
35 01,1E13 A0 C0 ldy #width*6
36 01,1E15 11 82 ora (kloc_tmp),y
37 01,1E17 A0 E0 ldy #width*7
38 01,1E19 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
781 01,1E1B lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1E1B AA tax
7 01,1E1C A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1E24 E6 82 D0 02 E6 + inw kloc_tmp
21 01,1E2A A0 00 ldy #0
22 01,1E2C 8A txa
24 01,1E2D 11 82 ora (kloc_tmp),y
25 01,1E2F A0 20 ldy #width
26 01,1E31 11 82 ora (kloc_tmp),y
27 01,1E33 A0 40 ldy #width*2
28 01,1E35 11 82 ora (kloc_tmp),y
29 01,1E37 A0 60 ldy #width*3
30 01,1E39 11 82 ora (kloc_tmp),y
31 01,1E3B A0 80 ldy #width*4
32 01,1E3D 11 82 ora (kloc_tmp),y
33 01,1E3F A0 A0 ldy #width*5
34 01,1E41 11 82 ora (kloc_tmp),y
35 01,1E43 A0 C0 ldy #width*6
36 01,1E45 11 82 ora (kloc_tmp),y
37 01,1E47 A0 E0 ldy #width*7
38 01,1E49 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
782 01,1E4B lda_kloc 2
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1E4B AA tax
11 01,1E4C A5 80 lda kloc
12 01,1E4E 18 clc
13 01,1E4F 69 02 adc <2
14 01,1E51 85 82 sta kloc_tmp
15 01,1E53 A5 81 lda kloc+1
16 01,1E55 69 00 adc >2
17 01,1E57 85 83 sta kloc_tmp+1
21 01,1E59 A0 00 ldy #0
22 01,1E5B 8A txa
24 01,1E5C 11 82 ora (kloc_tmp),y
25 01,1E5E A0 20 ldy #width
26 01,1E60 11 82 ora (kloc_tmp),y
27 01,1E62 A0 40 ldy #width*2
28 01,1E64 11 82 ora (kloc_tmp),y
29 01,1E66 A0 60 ldy #width*3
30 01,1E68 11 82 ora (kloc_tmp),y
31 01,1E6A A0 80 ldy #width*4
32 01,1E6C 11 82 ora (kloc_tmp),y
33 01,1E6E A0 A0 ldy #width*5
34 01,1E70 11 82 ora (kloc_tmp),y
35 01,1E72 A0 C0 ldy #width*6
36 01,1E74 11 82 ora (kloc_tmp),y
37 01,1E76 A0 E0 ldy #width*7
38 01,1E78 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
783 01,1E7A lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1E7A AA tax
11 01,1E7B A5 80 lda kloc
12 01,1E7D 18 clc
13 01,1E7E 69 00 adc <WIDTH*8
14 01,1E80 85 82 sta kloc_tmp
15 01,1E82 A5 81 lda kloc+1
16 01,1E84 69 01 adc >WIDTH*8
17 01,1E86 85 83 sta kloc_tmp+1
21 01,1E88 A0 00 ldy #0
22 01,1E8A 8A txa
24 01,1E8B 11 82 ora (kloc_tmp),y
25 01,1E8D A0 20 ldy #width
26 01,1E8F 11 82 ora (kloc_tmp),y
27 01,1E91 A0 40 ldy #width*2
28 01,1E93 11 82 ora (kloc_tmp),y
29 01,1E95 A0 60 ldy #width*3
30 01,1E97 11 82 ora (kloc_tmp),y
31 01,1E99 A0 80 ldy #width*4
32 01,1E9B 11 82 ora (kloc_tmp),y
33 01,1E9D A0 A0 ldy #width*5
34 01,1E9F 11 82 ora (kloc_tmp),y
35 01,1EA1 A0 C0 ldy #width*6
36 01,1EA3 11 82 ora (kloc_tmp),y
37 01,1EA5 A0 E0 ldy #width*7
38 01,1EA7 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
784 01,1EA9 lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1EA9 AA tax
11 01,1EAA A5 80 lda kloc
12 01,1EAC 18 clc
13 01,1EAD 69 00 adc <WIDTH*2*8
14 01,1EAF 85 82 sta kloc_tmp
15 01,1EB1 A5 81 lda kloc+1
16 01,1EB3 69 02 adc >WIDTH*2*8
17 01,1EB5 85 83 sta kloc_tmp+1
21 01,1EB7 A0 00 ldy #0
22 01,1EB9 8A txa
24 01,1EBA 11 82 ora (kloc_tmp),y
25 01,1EBC A0 20 ldy #width
26 01,1EBE 11 82 ora (kloc_tmp),y
27 01,1EC0 A0 40 ldy #width*2
28 01,1EC2 11 82 ora (kloc_tmp),y
29 01,1EC4 A0 60 ldy #width*3
30 01,1EC6 11 82 ora (kloc_tmp),y
31 01,1EC8 A0 80 ldy #width*4
32 01,1ECA 11 82 ora (kloc_tmp),y
33 01,1ECC A0 A0 ldy #width*5
34 01,1ECE 11 82 ora (kloc_tmp),y
35 01,1ED0 A0 C0 ldy #width*6
36 01,1ED2 11 82 ora (kloc_tmp),y
37 01,1ED4 A0 E0 ldy #width*7
38 01,1ED6 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
785 01,1ED8 60 rts
786 .endp
787
788
789 ; '***'
790 ; ' *'
791 ; ' *'
792 01,1ED9 .proc klocek8_3
793 01,1ED9 sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1ED9 AA tax
4 01,1EDA A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,1EE2 8A txa
23 01,1EE3 A0 00 ldy #0
24 01,1EE5 91 82 sta (kloc_tmp),y
25 01,1EE7 A0 20 ldy #width
26 01,1EE9 91 82 sta (kloc_tmp),y
27 01,1EEB A0 40 ldy #width*2
28 01,1EED 91 82 sta (kloc_tmp),y
29 01,1EEF A0 60 ldy #width*3
30 01,1EF1 91 82 sta (kloc_tmp),y
31 01,1EF3 A0 80 ldy #width*4
32 01,1EF5 91 82 sta (kloc_tmp),y
33 01,1EF7 A0 A0 ldy #width*5
34 01,1EF9 91 82 sta (kloc_tmp),y
35 01,1EFB A0 C0 ldy #width*6
36 01,1EFD 91 82 sta (kloc_tmp),y
37 01,1EFF A0 E0 ldy #width*7
38 01,1F01 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
794 01,1F03 sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1F03 AA tax
7 01,1F04 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1F0C E6 82 D0 02 E6 + inw kloc_tmp
21 01,1F12 8A txa
23 01,1F13 A0 00 ldy #0
24 01,1F15 91 82 sta (kloc_tmp),y
25 01,1F17 A0 20 ldy #width
26 01,1F19 91 82 sta (kloc_tmp),y
27 01,1F1B A0 40 ldy #width*2
28 01,1F1D 91 82 sta (kloc_tmp),y
29 01,1F1F A0 60 ldy #width*3
30 01,1F21 91 82 sta (kloc_tmp),y
31 01,1F23 A0 80 ldy #width*4
32 01,1F25 91 82 sta (kloc_tmp),y
33 01,1F27 A0 A0 ldy #width*5
34 01,1F29 91 82 sta (kloc_tmp),y
35 01,1F2B A0 C0 ldy #width*6
36 01,1F2D 91 82 sta (kloc_tmp),y
37 01,1F2F A0 E0 ldy #width*7
38 01,1F31 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
795 01,1F33 sta_kloc 2
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1F33 AA tax
11 01,1F34 A5 80 lda kloc
12 01,1F36 18 clc
13 01,1F37 69 02 adc <2
14 01,1F39 85 82 sta kloc_tmp
15 01,1F3B A5 81 lda kloc+1
16 01,1F3D 69 00 adc >2
17 01,1F3F 85 83 sta kloc_tmp+1
21 01,1F41 8A txa
23 01,1F42 A0 00 ldy #0
24 01,1F44 91 82 sta (kloc_tmp),y
25 01,1F46 A0 20 ldy #width
26 01,1F48 91 82 sta (kloc_tmp),y
27 01,1F4A A0 40 ldy #width*2
28 01,1F4C 91 82 sta (kloc_tmp),y
29 01,1F4E A0 60 ldy #width*3
30 01,1F50 91 82 sta (kloc_tmp),y
31 01,1F52 A0 80 ldy #width*4
32 01,1F54 91 82 sta (kloc_tmp),y
33 01,1F56 A0 A0 ldy #width*5
34 01,1F58 91 82 sta (kloc_tmp),y
35 01,1F5A A0 C0 ldy #width*6
36 01,1F5C 91 82 sta (kloc_tmp),y
37 01,1F5E A0 E0 ldy #width*7
38 01,1F60 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
796 01,1F62 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1F62 AA tax
11 01,1F63 A5 80 lda kloc
12 01,1F65 18 clc
13 01,1F66 69 02 adc <2+WIDTH*8
14 01,1F68 85 82 sta kloc_tmp
15 01,1F6A A5 81 lda kloc+1
16 01,1F6C 69 01 adc >2+WIDTH*8
17 01,1F6E 85 83 sta kloc_tmp+1
21 01,1F70 8A txa
23 01,1F71 A0 00 ldy #0
24 01,1F73 91 82 sta (kloc_tmp),y
25 01,1F75 A0 20 ldy #width
26 01,1F77 91 82 sta (kloc_tmp),y
27 01,1F79 A0 40 ldy #width*2
28 01,1F7B 91 82 sta (kloc_tmp),y
29 01,1F7D A0 60 ldy #width*3
30 01,1F7F 91 82 sta (kloc_tmp),y
31 01,1F81 A0 80 ldy #width*4
32 01,1F83 91 82 sta (kloc_tmp),y
33 01,1F85 A0 A0 ldy #width*5
34 01,1F87 91 82 sta (kloc_tmp),y
35 01,1F89 A0 C0 ldy #width*6
36 01,1F8B 91 82 sta (kloc_tmp),y
37 01,1F8D A0 E0 ldy #width*7
38 01,1F8F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
797 01,1F91 sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1F91 AA tax
11 01,1F92 A5 80 lda kloc
12 01,1F94 18 clc
13 01,1F95 69 02 adc <2+WIDTH*2*8
14 01,1F97 85 82 sta kloc_tmp
15 01,1F99 A5 81 lda kloc+1
16 01,1F9B 69 02 adc >2+WIDTH*2*8
17 01,1F9D 85 83 sta kloc_tmp+1
21 01,1F9F 8A txa
23 01,1FA0 A0 00 ldy #0
24 01,1FA2 91 82 sta (kloc_tmp),y
25 01,1FA4 A0 20 ldy #width
26 01,1FA6 91 82 sta (kloc_tmp),y
27 01,1FA8 A0 40 ldy #width*2
28 01,1FAA 91 82 sta (kloc_tmp),y
29 01,1FAC A0 60 ldy #width*3
30 01,1FAE 91 82 sta (kloc_tmp),y
31 01,1FB0 A0 80 ldy #width*4
32 01,1FB2 91 82 sta (kloc_tmp),y
33 01,1FB4 A0 A0 ldy #width*5
34 01,1FB6 91 82 sta (kloc_tmp),y
35 01,1FB8 A0 C0 ldy #width*6
36 01,1FBA 91 82 sta (kloc_tmp),y
37 01,1FBC A0 E0 ldy #width*7
38 01,1FBE 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
798 01,1FC0 60 rts
799
800 01,1FC1 test
801 01,1FC1 lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1FC1 AA tax
4 01,1FC2 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,1FCA A0 00 ldy #0
22 01,1FCC 8A txa
24 01,1FCD 11 82 ora (kloc_tmp),y
25 01,1FCF A0 20 ldy #width
26 01,1FD1 11 82 ora (kloc_tmp),y
27 01,1FD3 A0 40 ldy #width*2
28 01,1FD5 11 82 ora (kloc_tmp),y
29 01,1FD7 A0 60 ldy #width*3
30 01,1FD9 11 82 ora (kloc_tmp),y
31 01,1FDB A0 80 ldy #width*4
32 01,1FDD 11 82 ora (kloc_tmp),y
33 01,1FDF A0 A0 ldy #width*5
34 01,1FE1 11 82 ora (kloc_tmp),y
35 01,1FE3 A0 C0 ldy #width*6
36 01,1FE5 11 82 ora (kloc_tmp),y
37 01,1FE7 A0 E0 ldy #width*7
38 01,1FE9 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
802 01,1FEB lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,1FEB AA tax
7 01,1FEC A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,1FF4 E6 82 D0 02 E6 + inw kloc_tmp
21 01,1FFA A0 00 ldy #0
22 01,1FFC 8A txa
24 01,1FFD 11 82 ora (kloc_tmp),y
25 01,1FFF A0 20 ldy #width
26 01,2001 11 82 ora (kloc_tmp),y
27 01,2003 A0 40 ldy #width*2
28 01,2005 11 82 ora (kloc_tmp),y
29 01,2007 A0 60 ldy #width*3
30 01,2009 11 82 ora (kloc_tmp),y
31 01,200B A0 80 ldy #width*4
32 01,200D 11 82 ora (kloc_tmp),y
33 01,200F A0 A0 ldy #width*5
34 01,2011 11 82 ora (kloc_tmp),y
35 01,2013 A0 C0 ldy #width*6
36 01,2015 11 82 ora (kloc_tmp),y
37 01,2017 A0 E0 ldy #width*7
38 01,2019 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
803 01,201B lda_kloc 2
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,201B AA tax
11 01,201C A5 80 lda kloc
12 01,201E 18 clc
13 01,201F 69 02 adc <2
14 01,2021 85 82 sta kloc_tmp
15 01,2023 A5 81 lda kloc+1
16 01,2025 69 00 adc >2
17 01,2027 85 83 sta kloc_tmp+1
21 01,2029 A0 00 ldy #0
22 01,202B 8A txa
24 01,202C 11 82 ora (kloc_tmp),y
25 01,202E A0 20 ldy #width
26 01,2030 11 82 ora (kloc_tmp),y
27 01,2032 A0 40 ldy #width*2
28 01,2034 11 82 ora (kloc_tmp),y
29 01,2036 A0 60 ldy #width*3
30 01,2038 11 82 ora (kloc_tmp),y
31 01,203A A0 80 ldy #width*4
32 01,203C 11 82 ora (kloc_tmp),y
33 01,203E A0 A0 ldy #width*5
34 01,2040 11 82 ora (kloc_tmp),y
35 01,2042 A0 C0 ldy #width*6
36 01,2044 11 82 ora (kloc_tmp),y
37 01,2046 A0 E0 ldy #width*7
38 01,2048 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
804 01,204A lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,204A AA tax
11 01,204B A5 80 lda kloc
12 01,204D 18 clc
13 01,204E 69 02 adc <2+WIDTH*8
14 01,2050 85 82 sta kloc_tmp
15 01,2052 A5 81 lda kloc+1
16 01,2054 69 01 adc >2+WIDTH*8
17 01,2056 85 83 sta kloc_tmp+1
21 01,2058 A0 00 ldy #0
22 01,205A 8A txa
24 01,205B 11 82 ora (kloc_tmp),y
25 01,205D A0 20 ldy #width
26 01,205F 11 82 ora (kloc_tmp),y
27 01,2061 A0 40 ldy #width*2
28 01,2063 11 82 ora (kloc_tmp),y
29 01,2065 A0 60 ldy #width*3
30 01,2067 11 82 ora (kloc_tmp),y
31 01,2069 A0 80 ldy #width*4
32 01,206B 11 82 ora (kloc_tmp),y
33 01,206D A0 A0 ldy #width*5
34 01,206F 11 82 ora (kloc_tmp),y
35 01,2071 A0 C0 ldy #width*6
36 01,2073 11 82 ora (kloc_tmp),y
37 01,2075 A0 E0 ldy #width*7
38 01,2077 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
805 01,2079 lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2079 AA tax
11 01,207A A5 80 lda kloc
12 01,207C 18 clc
13 01,207D 69 02 adc <2+WIDTH*2*8
14 01,207F 85 82 sta kloc_tmp
15 01,2081 A5 81 lda kloc+1
16 01,2083 69 02 adc >2+WIDTH*2*8
17 01,2085 85 83 sta kloc_tmp+1
21 01,2087 A0 00 ldy #0
22 01,2089 8A txa
24 01,208A 11 82 ora (kloc_tmp),y
25 01,208C A0 20 ldy #width
26 01,208E 11 82 ora (kloc_tmp),y
27 01,2090 A0 40 ldy #width*2
28 01,2092 11 82 ora (kloc_tmp),y
29 01,2094 A0 60 ldy #width*3
30 01,2096 11 82 ora (kloc_tmp),y
31 01,2098 A0 80 ldy #width*4
32 01,209A 11 82 ora (kloc_tmp),y
33 01,209C A0 A0 ldy #width*5
34 01,209E 11 82 ora (kloc_tmp),y
35 01,20A0 A0 C0 ldy #width*6
36 01,20A2 11 82 ora (kloc_tmp),y
37 01,20A4 A0 E0 ldy #width*7
38 01,20A6 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
806 01,20A8 60 rts
807 .endp
808
809
810 * KLOCEK 9 (4 fazy)
811 ; '** '
812 ; '** '
813 ; '* '
814 01,20A9 .proc klocek9_0
815 01,20A9 sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,20A9 AA tax
4 01,20AA A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,20B2 8A txa
23 01,20B3 A0 00 ldy #0
24 01,20B5 91 82 sta (kloc_tmp),y
25 01,20B7 A0 20 ldy #width
26 01,20B9 91 82 sta (kloc_tmp),y
27 01,20BB A0 40 ldy #width*2
28 01,20BD 91 82 sta (kloc_tmp),y
29 01,20BF A0 60 ldy #width*3
30 01,20C1 91 82 sta (kloc_tmp),y
31 01,20C3 A0 80 ldy #width*4
32 01,20C5 91 82 sta (kloc_tmp),y
33 01,20C7 A0 A0 ldy #width*5
34 01,20C9 91 82 sta (kloc_tmp),y
35 01,20CB A0 C0 ldy #width*6
36 01,20CD 91 82 sta (kloc_tmp),y
37 01,20CF A0 E0 ldy #width*7
38 01,20D1 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
816 01,20D3 sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,20D3 AA tax
7 01,20D4 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,20DC E6 82 D0 02 E6 + inw kloc_tmp
21 01,20E2 8A txa
23 01,20E3 A0 00 ldy #0
24 01,20E5 91 82 sta (kloc_tmp),y
25 01,20E7 A0 20 ldy #width
26 01,20E9 91 82 sta (kloc_tmp),y
27 01,20EB A0 40 ldy #width*2
28 01,20ED 91 82 sta (kloc_tmp),y
29 01,20EF A0 60 ldy #width*3
30 01,20F1 91 82 sta (kloc_tmp),y
31 01,20F3 A0 80 ldy #width*4
32 01,20F5 91 82 sta (kloc_tmp),y
33 01,20F7 A0 A0 ldy #width*5
34 01,20F9 91 82 sta (kloc_tmp),y
35 01,20FB A0 C0 ldy #width*6
36 01,20FD 91 82 sta (kloc_tmp),y
37 01,20FF A0 E0 ldy #width*7
38 01,2101 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
817 01,2103 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2103 AA tax
11 01,2104 A5 80 lda kloc
12 01,2106 18 clc
13 01,2107 69 00 adc <WIDTH*8
14 01,2109 85 82 sta kloc_tmp
15 01,210B A5 81 lda kloc+1
16 01,210D 69 01 adc >WIDTH*8
17 01,210F 85 83 sta kloc_tmp+1
21 01,2111 8A txa
23 01,2112 A0 00 ldy #0
24 01,2114 91 82 sta (kloc_tmp),y
25 01,2116 A0 20 ldy #width
26 01,2118 91 82 sta (kloc_tmp),y
27 01,211A A0 40 ldy #width*2
28 01,211C 91 82 sta (kloc_tmp),y
29 01,211E A0 60 ldy #width*3
30 01,2120 91 82 sta (kloc_tmp),y
31 01,2122 A0 80 ldy #width*4
32 01,2124 91 82 sta (kloc_tmp),y
33 01,2126 A0 A0 ldy #width*5
34 01,2128 91 82 sta (kloc_tmp),y
35 01,212A A0 C0 ldy #width*6
36 01,212C 91 82 sta (kloc_tmp),y
37 01,212E A0 E0 ldy #width*7
38 01,2130 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
818 01,2132 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2132 AA tax
11 01,2133 A5 80 lda kloc
12 01,2135 18 clc
13 01,2136 69 01 adc <1+WIDTH*8
14 01,2138 85 82 sta kloc_tmp
15 01,213A A5 81 lda kloc+1
16 01,213C 69 01 adc >1+WIDTH*8
17 01,213E 85 83 sta kloc_tmp+1
21 01,2140 8A txa
23 01,2141 A0 00 ldy #0
24 01,2143 91 82 sta (kloc_tmp),y
25 01,2145 A0 20 ldy #width
26 01,2147 91 82 sta (kloc_tmp),y
27 01,2149 A0 40 ldy #width*2
28 01,214B 91 82 sta (kloc_tmp),y
29 01,214D A0 60 ldy #width*3
30 01,214F 91 82 sta (kloc_tmp),y
31 01,2151 A0 80 ldy #width*4
32 01,2153 91 82 sta (kloc_tmp),y
33 01,2155 A0 A0 ldy #width*5
34 01,2157 91 82 sta (kloc_tmp),y
35 01,2159 A0 C0 ldy #width*6
36 01,215B 91 82 sta (kloc_tmp),y
37 01,215D A0 E0 ldy #width*7
38 01,215F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
819 01,2161 sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2161 AA tax
11 01,2162 A5 80 lda kloc
12 01,2164 18 clc
13 01,2165 69 00 adc <WIDTH*2*8
14 01,2167 85 82 sta kloc_tmp
15 01,2169 A5 81 lda kloc+1
16 01,216B 69 02 adc >WIDTH*2*8
17 01,216D 85 83 sta kloc_tmp+1
21 01,216F 8A txa
23 01,2170 A0 00 ldy #0
24 01,2172 91 82 sta (kloc_tmp),y
25 01,2174 A0 20 ldy #width
26 01,2176 91 82 sta (kloc_tmp),y
27 01,2178 A0 40 ldy #width*2
28 01,217A 91 82 sta (kloc_tmp),y
29 01,217C A0 60 ldy #width*3
30 01,217E 91 82 sta (kloc_tmp),y
31 01,2180 A0 80 ldy #width*4
32 01,2182 91 82 sta (kloc_tmp),y
33 01,2184 A0 A0 ldy #width*5
34 01,2186 91 82 sta (kloc_tmp),y
35 01,2188 A0 C0 ldy #width*6
36 01,218A 91 82 sta (kloc_tmp),y
37 01,218C A0 E0 ldy #width*7
38 01,218E 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
820 01,2190 60 rts
821
822 01,2191 test
823 01,2191 lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2191 AA tax
4 01,2192 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,219A A0 00 ldy #0
22 01,219C 8A txa
24 01,219D 11 82 ora (kloc_tmp),y
25 01,219F A0 20 ldy #width
26 01,21A1 11 82 ora (kloc_tmp),y
27 01,21A3 A0 40 ldy #width*2
28 01,21A5 11 82 ora (kloc_tmp),y
29 01,21A7 A0 60 ldy #width*3
30 01,21A9 11 82 ora (kloc_tmp),y
31 01,21AB A0 80 ldy #width*4
32 01,21AD 11 82 ora (kloc_tmp),y
33 01,21AF A0 A0 ldy #width*5
34 01,21B1 11 82 ora (kloc_tmp),y
35 01,21B3 A0 C0 ldy #width*6
36 01,21B5 11 82 ora (kloc_tmp),y
37 01,21B7 A0 E0 ldy #width*7
38 01,21B9 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
824 01,21BB lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,21BB AA tax
7 01,21BC A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,21C4 E6 82 D0 02 E6 + inw kloc_tmp
21 01,21CA A0 00 ldy #0
22 01,21CC 8A txa
24 01,21CD 11 82 ora (kloc_tmp),y
25 01,21CF A0 20 ldy #width
26 01,21D1 11 82 ora (kloc_tmp),y
27 01,21D3 A0 40 ldy #width*2
28 01,21D5 11 82 ora (kloc_tmp),y
29 01,21D7 A0 60 ldy #width*3
30 01,21D9 11 82 ora (kloc_tmp),y
31 01,21DB A0 80 ldy #width*4
32 01,21DD 11 82 ora (kloc_tmp),y
33 01,21DF A0 A0 ldy #width*5
34 01,21E1 11 82 ora (kloc_tmp),y
35 01,21E3 A0 C0 ldy #width*6
36 01,21E5 11 82 ora (kloc_tmp),y
37 01,21E7 A0 E0 ldy #width*7
38 01,21E9 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
825 01,21EB lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,21EB AA tax
11 01,21EC A5 80 lda kloc
12 01,21EE 18 clc
13 01,21EF 69 00 adc <WIDTH*8
14 01,21F1 85 82 sta kloc_tmp
15 01,21F3 A5 81 lda kloc+1
16 01,21F5 69 01 adc >WIDTH*8
17 01,21F7 85 83 sta kloc_tmp+1
21 01,21F9 A0 00 ldy #0
22 01,21FB 8A txa
24 01,21FC 11 82 ora (kloc_tmp),y
25 01,21FE A0 20 ldy #width
26 01,2200 11 82 ora (kloc_tmp),y
27 01,2202 A0 40 ldy #width*2
28 01,2204 11 82 ora (kloc_tmp),y
29 01,2206 A0 60 ldy #width*3
30 01,2208 11 82 ora (kloc_tmp),y
31 01,220A A0 80 ldy #width*4
32 01,220C 11 82 ora (kloc_tmp),y
33 01,220E A0 A0 ldy #width*5
34 01,2210 11 82 ora (kloc_tmp),y
35 01,2212 A0 C0 ldy #width*6
36 01,2214 11 82 ora (kloc_tmp),y
37 01,2216 A0 E0 ldy #width*7
38 01,2218 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
826 01,221A lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,221A AA tax
11 01,221B A5 80 lda kloc
12 01,221D 18 clc
13 01,221E 69 01 adc <1+WIDTH*8
14 01,2220 85 82 sta kloc_tmp
15 01,2222 A5 81 lda kloc+1
16 01,2224 69 01 adc >1+WIDTH*8
17 01,2226 85 83 sta kloc_tmp+1
21 01,2228 A0 00 ldy #0
22 01,222A 8A txa
24 01,222B 11 82 ora (kloc_tmp),y
25 01,222D A0 20 ldy #width
26 01,222F 11 82 ora (kloc_tmp),y
27 01,2231 A0 40 ldy #width*2
28 01,2233 11 82 ora (kloc_tmp),y
29 01,2235 A0 60 ldy #width*3
30 01,2237 11 82 ora (kloc_tmp),y
31 01,2239 A0 80 ldy #width*4
32 01,223B 11 82 ora (kloc_tmp),y
33 01,223D A0 A0 ldy #width*5
34 01,223F 11 82 ora (kloc_tmp),y
35 01,2241 A0 C0 ldy #width*6
36 01,2243 11 82 ora (kloc_tmp),y
37 01,2245 A0 E0 ldy #width*7
38 01,2247 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
827 01,2249 lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2249 AA tax
11 01,224A A5 80 lda kloc
12 01,224C 18 clc
13 01,224D 69 00 adc <WIDTH*2*8
14 01,224F 85 82 sta kloc_tmp
15 01,2251 A5 81 lda kloc+1
16 01,2253 69 02 adc >WIDTH*2*8
17 01,2255 85 83 sta kloc_tmp+1
21 01,2257 A0 00 ldy #0
22 01,2259 8A txa
24 01,225A 11 82 ora (kloc_tmp),y
25 01,225C A0 20 ldy #width
26 01,225E 11 82 ora (kloc_tmp),y
27 01,2260 A0 40 ldy #width*2
28 01,2262 11 82 ora (kloc_tmp),y
29 01,2264 A0 60 ldy #width*3
30 01,2266 11 82 ora (kloc_tmp),y
31 01,2268 A0 80 ldy #width*4
32 01,226A 11 82 ora (kloc_tmp),y
33 01,226C A0 A0 ldy #width*5
34 01,226E 11 82 ora (kloc_tmp),y
35 01,2270 A0 C0 ldy #width*6
36 01,2272 11 82 ora (kloc_tmp),y
37 01,2274 A0 E0 ldy #width*7
38 01,2276 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
828 01,2278 60 rts
829 .endp
830
831
832 ; '***'
833 ; ' **'
834 ; ' '
835 01,2279 .proc klocek9_1
836 01,2279 sta_kloc 0
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2279 AA tax
4 01,227A A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,2282 8A txa
23 01,2283 A0 00 ldy #0
24 01,2285 91 82 sta (kloc_tmp),y
25 01,2287 A0 20 ldy #width
26 01,2289 91 82 sta (kloc_tmp),y
27 01,228B A0 40 ldy #width*2
28 01,228D 91 82 sta (kloc_tmp),y
29 01,228F A0 60 ldy #width*3
30 01,2291 91 82 sta (kloc_tmp),y
31 01,2293 A0 80 ldy #width*4
32 01,2295 91 82 sta (kloc_tmp),y
33 01,2297 A0 A0 ldy #width*5
34 01,2299 91 82 sta (kloc_tmp),y
35 01,229B A0 C0 ldy #width*6
36 01,229D 91 82 sta (kloc_tmp),y
37 01,229F A0 E0 ldy #width*7
38 01,22A1 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
837 01,22A3 sta_kloc 1
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,22A3 AA tax
7 01,22A4 A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,22AC E6 82 D0 02 E6 + inw kloc_tmp
21 01,22B2 8A txa
23 01,22B3 A0 00 ldy #0
24 01,22B5 91 82 sta (kloc_tmp),y
25 01,22B7 A0 20 ldy #width
26 01,22B9 91 82 sta (kloc_tmp),y
27 01,22BB A0 40 ldy #width*2
28 01,22BD 91 82 sta (kloc_tmp),y
29 01,22BF A0 60 ldy #width*3
30 01,22C1 91 82 sta (kloc_tmp),y
31 01,22C3 A0 80 ldy #width*4
32 01,22C5 91 82 sta (kloc_tmp),y
33 01,22C7 A0 A0 ldy #width*5
34 01,22C9 91 82 sta (kloc_tmp),y
35 01,22CB A0 C0 ldy #width*6
36 01,22CD 91 82 sta (kloc_tmp),y
37 01,22CF A0 E0 ldy #width*7
38 01,22D1 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
838 01,22D3 sta_kloc 2
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,22D3 AA tax
11 01,22D4 A5 80 lda kloc
12 01,22D6 18 clc
13 01,22D7 69 02 adc <2
14 01,22D9 85 82 sta kloc_tmp
15 01,22DB A5 81 lda kloc+1
16 01,22DD 69 00 adc >2
17 01,22DF 85 83 sta kloc_tmp+1
21 01,22E1 8A txa
23 01,22E2 A0 00 ldy #0
24 01,22E4 91 82 sta (kloc_tmp),y
25 01,22E6 A0 20 ldy #width
26 01,22E8 91 82 sta (kloc_tmp),y
27 01,22EA A0 40 ldy #width*2
28 01,22EC 91 82 sta (kloc_tmp),y
29 01,22EE A0 60 ldy #width*3
30 01,22F0 91 82 sta (kloc_tmp),y
31 01,22F2 A0 80 ldy #width*4
32 01,22F4 91 82 sta (kloc_tmp),y
33 01,22F6 A0 A0 ldy #width*5
34 01,22F8 91 82 sta (kloc_tmp),y
35 01,22FA A0 C0 ldy #width*6
36 01,22FC 91 82 sta (kloc_tmp),y
37 01,22FE A0 E0 ldy #width*7
38 01,2300 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
839 01,2302 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2302 AA tax
11 01,2303 A5 80 lda kloc
12 01,2305 18 clc
13 01,2306 69 01 adc <1+WIDTH*8
14 01,2308 85 82 sta kloc_tmp
15 01,230A A5 81 lda kloc+1
16 01,230C 69 01 adc >1+WIDTH*8
17 01,230E 85 83 sta kloc_tmp+1
21 01,2310 8A txa
23 01,2311 A0 00 ldy #0
24 01,2313 91 82 sta (kloc_tmp),y
25 01,2315 A0 20 ldy #width
26 01,2317 91 82 sta (kloc_tmp),y
27 01,2319 A0 40 ldy #width*2
28 01,231B 91 82 sta (kloc_tmp),y
29 01,231D A0 60 ldy #width*3
30 01,231F 91 82 sta (kloc_tmp),y
31 01,2321 A0 80 ldy #width*4
32 01,2323 91 82 sta (kloc_tmp),y
33 01,2325 A0 A0 ldy #width*5
34 01,2327 91 82 sta (kloc_tmp),y
35 01,2329 A0 C0 ldy #width*6
36 01,232B 91 82 sta (kloc_tmp),y
37 01,232D A0 E0 ldy #width*7
38 01,232F 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
840 01,2331 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2331 AA tax
11 01,2332 A5 80 lda kloc
12 01,2334 18 clc
13 01,2335 69 02 adc <2+WIDTH*8
14 01,2337 85 82 sta kloc_tmp
15 01,2339 A5 81 lda kloc+1
16 01,233B 69 01 adc >2+WIDTH*8
17 01,233D 85 83 sta kloc_tmp+1
21 01,233F 8A txa
23 01,2340 A0 00 ldy #0
24 01,2342 91 82 sta (kloc_tmp),y
25 01,2344 A0 20 ldy #width
26 01,2346 91 82 sta (kloc_tmp),y
27 01,2348 A0 40 ldy #width*2
28 01,234A 91 82 sta (kloc_tmp),y
29 01,234C A0 60 ldy #width*3
30 01,234E 91 82 sta (kloc_tmp),y
31 01,2350 A0 80 ldy #width*4
32 01,2352 91 82 sta (kloc_tmp),y
33 01,2354 A0 A0 ldy #width*5
34 01,2356 91 82 sta (kloc_tmp),y
35 01,2358 A0 C0 ldy #width*6
36 01,235A 91 82 sta (kloc_tmp),y
37 01,235C A0 E0 ldy #width*7
38 01,235E 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
841 01,2360 60 rts
842
843 01,2361 test
844 01,2361 lda_kloc 0
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2361 AA tax
4 01,2362 A5 80 85 82 A5 + mwa kloc kloc_tmp
21 01,236A A0 00 ldy #0
22 01,236C 8A txa
24 01,236D 11 82 ora (kloc_tmp),y
25 01,236F A0 20 ldy #width
26 01,2371 11 82 ora (kloc_tmp),y
27 01,2373 A0 40 ldy #width*2
28 01,2375 11 82 ora (kloc_tmp),y
29 01,2377 A0 60 ldy #width*3
30 01,2379 11 82 ora (kloc_tmp),y
31 01,237B A0 80 ldy #width*4
32 01,237D 11 82 ora (kloc_tmp),y
33 01,237F A0 A0 ldy #width*5
34 01,2381 11 82 ora (kloc_tmp),y
35 01,2383 A0 C0 ldy #width*6
36 01,2385 11 82 ora (kloc_tmp),y
37 01,2387 A0 E0 ldy #width*7
38 01,2389 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
845 01,238B lda_kloc 1
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,238B AA tax
7 01,238C A5 80 85 82 A5 + mwa kloc kloc_tmp
8 01,2394 E6 82 D0 02 E6 + inw kloc_tmp
21 01,239A A0 00 ldy #0
22 01,239C 8A txa
24 01,239D 11 82 ora (kloc_tmp),y
25 01,239F A0 20 ldy #width
26 01,23A1 11 82 ora (kloc_tmp),y
27 01,23A3 A0 40 ldy #width*2
28 01,23A5 11 82 ora (kloc_tmp),y
29 01,23A7 A0 60 ldy #width*3
30 01,23A9 11 82 ora (kloc_tmp),y
31 01,23AB A0 80 ldy #width*4
32 01,23AD 11 82 ora (kloc_tmp),y
33 01,23AF A0 A0 ldy #width*5
34 01,23B1 11 82 ora (kloc_tmp),y
35 01,23B3 A0 C0 ldy #width*6
36 01,23B5 11 82 ora (kloc_tmp),y
37 01,23B7 A0 E0 ldy #width*7
38 01,23B9 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
846 01,23BB lda_kloc 2
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,23BB AA tax
11 01,23BC A5 80 lda kloc
12 01,23BE 18 clc
13 01,23BF 69 02 adc <2
14 01,23C1 85 82 sta kloc_tmp
15 01,23C3 A5 81 lda kloc+1
16 01,23C5 69 00 adc >2
17 01,23C7 85 83 sta kloc_tmp+1
21 01,23C9 A0 00 ldy #0
22 01,23CB 8A txa
24 01,23CC 11 82 ora (kloc_tmp),y
25 01,23CE A0 20 ldy #width
26 01,23D0 11 82 ora (kloc_tmp),y
27 01,23D2 A0 40 ldy #width*2
28 01,23D4 11 82 ora (kloc_tmp),y
29 01,23D6 A0 60 ldy #width*3
30 01,23D8 11 82 ora (kloc_tmp),y
31 01,23DA A0 80 ldy #width*4
32 01,23DC 11 82 ora (kloc_tmp),y
33 01,23DE A0 A0 ldy #width*5
34 01,23E0 11 82 ora (kloc_tmp),y
35 01,23E2 A0 C0 ldy #width*6
36 01,23E4 11 82 ora (kloc_tmp),y
37 01,23E6 A0 E0 ldy #width*7
38 01,23E8 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
847 01,23EA lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,23EA AA tax
11 01,23EB A5 80 lda kloc
12 01,23ED 18 clc
13 01,23EE 69 01 adc <1+WIDTH*8
14 01,23F0 85 82 sta kloc_tmp
15 01,23F2 A5 81 lda kloc+1
16 01,23F4 69 01 adc >1+WIDTH*8
17 01,23F6 85 83 sta kloc_tmp+1
21 01,23F8 A0 00 ldy #0
22 01,23FA 8A txa
24 01,23FB 11 82 ora (kloc_tmp),y
25 01,23FD A0 20 ldy #width
26 01,23FF 11 82 ora (kloc_tmp),y
27 01,2401 A0 40 ldy #width*2
28 01,2403 11 82 ora (kloc_tmp),y
29 01,2405 A0 60 ldy #width*3
30 01,2407 11 82 ora (kloc_tmp),y
31 01,2409 A0 80 ldy #width*4
32 01,240B 11 82 ora (kloc_tmp),y
33 01,240D A0 A0 ldy #width*5
34 01,240F 11 82 ora (kloc_tmp),y
35 01,2411 A0 C0 ldy #width*6
36 01,2413 11 82 ora (kloc_tmp),y
37 01,2415 A0 E0 ldy #width*7
38 01,2417 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
848 01,2419 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2419 AA tax
11 01,241A A5 80 lda kloc
12 01,241C 18 clc
13 01,241D 69 02 adc <2+WIDTH*8
14 01,241F 85 82 sta kloc_tmp
15 01,2421 A5 81 lda kloc+1
16 01,2423 69 01 adc >2+WIDTH*8
17 01,2425 85 83 sta kloc_tmp+1
21 01,2427 A0 00 ldy #0
22 01,2429 8A txa
24 01,242A 11 82 ora (kloc_tmp),y
25 01,242C A0 20 ldy #width
26 01,242E 11 82 ora (kloc_tmp),y
27 01,2430 A0 40 ldy #width*2
28 01,2432 11 82 ora (kloc_tmp),y
29 01,2434 A0 60 ldy #width*3
30 01,2436 11 82 ora (kloc_tmp),y
31 01,2438 A0 80 ldy #width*4
32 01,243A 11 82 ora (kloc_tmp),y
33 01,243C A0 A0 ldy #width*5
34 01,243E 11 82 ora (kloc_tmp),y
35 01,2440 A0 C0 ldy #width*6
36 01,2442 11 82 ora (kloc_tmp),y
37 01,2444 A0 E0 ldy #width*7
38 01,2446 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
849 01,2448 60 rts
850 .endp
851
852
853 ; ' *'
854 ; ' **'
855 ; ' **'
856 01,2449 .proc klocek9_2
857 01,2449 sta_kloc 2
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2449 AA tax
11 01,244A A5 80 lda kloc
12 01,244C 18 clc
13 01,244D 69 02 adc <2
14 01,244F 85 82 sta kloc_tmp
15 01,2451 A5 81 lda kloc+1
16 01,2453 69 00 adc >2
17 01,2455 85 83 sta kloc_tmp+1
21 01,2457 8A txa
23 01,2458 A0 00 ldy #0
24 01,245A 91 82 sta (kloc_tmp),y
25 01,245C A0 20 ldy #width
26 01,245E 91 82 sta (kloc_tmp),y
27 01,2460 A0 40 ldy #width*2
28 01,2462 91 82 sta (kloc_tmp),y
29 01,2464 A0 60 ldy #width*3
30 01,2466 91 82 sta (kloc_tmp),y
31 01,2468 A0 80 ldy #width*4
32 01,246A 91 82 sta (kloc_tmp),y
33 01,246C A0 A0 ldy #width*5
34 01,246E 91 82 sta (kloc_tmp),y
35 01,2470 A0 C0 ldy #width*6
36 01,2472 91 82 sta (kloc_tmp),y
37 01,2474 A0 E0 ldy #width*7
38 01,2476 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
858 01,2478 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2478 AA tax
11 01,2479 A5 80 lda kloc
12 01,247B 18 clc
13 01,247C 69 01 adc <1+WIDTH*8
14 01,247E 85 82 sta kloc_tmp
15 01,2480 A5 81 lda kloc+1
16 01,2482 69 01 adc >1+WIDTH*8
17 01,2484 85 83 sta kloc_tmp+1
21 01,2486 8A txa
23 01,2487 A0 00 ldy #0
24 01,2489 91 82 sta (kloc_tmp),y
25 01,248B A0 20 ldy #width
26 01,248D 91 82 sta (kloc_tmp),y
27 01,248F A0 40 ldy #width*2
28 01,2491 91 82 sta (kloc_tmp),y
29 01,2493 A0 60 ldy #width*3
30 01,2495 91 82 sta (kloc_tmp),y
31 01,2497 A0 80 ldy #width*4
32 01,2499 91 82 sta (kloc_tmp),y
33 01,249B A0 A0 ldy #width*5
34 01,249D 91 82 sta (kloc_tmp),y
35 01,249F A0 C0 ldy #width*6
36 01,24A1 91 82 sta (kloc_tmp),y
37 01,24A3 A0 E0 ldy #width*7
38 01,24A5 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
859 01,24A7 sta_kloc 2+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,24A7 AA tax
11 01,24A8 A5 80 lda kloc
12 01,24AA 18 clc
13 01,24AB 69 02 adc <2+WIDTH*8
14 01,24AD 85 82 sta kloc_tmp
15 01,24AF A5 81 lda kloc+1
16 01,24B1 69 01 adc >2+WIDTH*8
17 01,24B3 85 83 sta kloc_tmp+1
21 01,24B5 8A txa
23 01,24B6 A0 00 ldy #0
24 01,24B8 91 82 sta (kloc_tmp),y
25 01,24BA A0 20 ldy #width
26 01,24BC 91 82 sta (kloc_tmp),y
27 01,24BE A0 40 ldy #width*2
28 01,24C0 91 82 sta (kloc_tmp),y
29 01,24C2 A0 60 ldy #width*3
30 01,24C4 91 82 sta (kloc_tmp),y
31 01,24C6 A0 80 ldy #width*4
32 01,24C8 91 82 sta (kloc_tmp),y
33 01,24CA A0 A0 ldy #width*5
34 01,24CC 91 82 sta (kloc_tmp),y
35 01,24CE A0 C0 ldy #width*6
36 01,24D0 91 82 sta (kloc_tmp),y
37 01,24D2 A0 E0 ldy #width*7
38 01,24D4 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
860 01,24D6 sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,24D6 AA tax
11 01,24D7 A5 80 lda kloc
12 01,24D9 18 clc
13 01,24DA 69 01 adc <1+WIDTH*2*8
14 01,24DC 85 82 sta kloc_tmp
15 01,24DE A5 81 lda kloc+1
16 01,24E0 69 02 adc >1+WIDTH*2*8
17 01,24E2 85 83 sta kloc_tmp+1
21 01,24E4 8A txa
23 01,24E5 A0 00 ldy #0
24 01,24E7 91 82 sta (kloc_tmp),y
25 01,24E9 A0 20 ldy #width
26 01,24EB 91 82 sta (kloc_tmp),y
27 01,24ED A0 40 ldy #width*2
28 01,24EF 91 82 sta (kloc_tmp),y
29 01,24F1 A0 60 ldy #width*3
30 01,24F3 91 82 sta (kloc_tmp),y
31 01,24F5 A0 80 ldy #width*4
32 01,24F7 91 82 sta (kloc_tmp),y
33 01,24F9 A0 A0 ldy #width*5
34 01,24FB 91 82 sta (kloc_tmp),y
35 01,24FD A0 C0 ldy #width*6
36 01,24FF 91 82 sta (kloc_tmp),y
37 01,2501 A0 E0 ldy #width*7
38 01,2503 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
861 01,2505 sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2505 AA tax
11 01,2506 A5 80 lda kloc
12 01,2508 18 clc
13 01,2509 69 02 adc <2+WIDTH*2*8
14 01,250B 85 82 sta kloc_tmp
15 01,250D A5 81 lda kloc+1
16 01,250F 69 02 adc >2+WIDTH*2*8
17 01,2511 85 83 sta kloc_tmp+1
21 01,2513 8A txa
23 01,2514 A0 00 ldy #0
24 01,2516 91 82 sta (kloc_tmp),y
25 01,2518 A0 20 ldy #width
26 01,251A 91 82 sta (kloc_tmp),y
27 01,251C A0 40 ldy #width*2
28 01,251E 91 82 sta (kloc_tmp),y
29 01,2520 A0 60 ldy #width*3
30 01,2522 91 82 sta (kloc_tmp),y
31 01,2524 A0 80 ldy #width*4
32 01,2526 91 82 sta (kloc_tmp),y
33 01,2528 A0 A0 ldy #width*5
34 01,252A 91 82 sta (kloc_tmp),y
35 01,252C A0 C0 ldy #width*6
36 01,252E 91 82 sta (kloc_tmp),y
37 01,2530 A0 E0 ldy #width*7
38 01,2532 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
862 01,2534 60 rts
863
864 01,2535 test
865 01,2535 lda_kloc 2
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2535 AA tax
11 01,2536 A5 80 lda kloc
12 01,2538 18 clc
13 01,2539 69 02 adc <2
14 01,253B 85 82 sta kloc_tmp
15 01,253D A5 81 lda kloc+1
16 01,253F 69 00 adc >2
17 01,2541 85 83 sta kloc_tmp+1
21 01,2543 A0 00 ldy #0
22 01,2545 8A txa
24 01,2546 11 82 ora (kloc_tmp),y
25 01,2548 A0 20 ldy #width
26 01,254A 11 82 ora (kloc_tmp),y
27 01,254C A0 40 ldy #width*2
28 01,254E 11 82 ora (kloc_tmp),y
29 01,2550 A0 60 ldy #width*3
30 01,2552 11 82 ora (kloc_tmp),y
31 01,2554 A0 80 ldy #width*4
32 01,2556 11 82 ora (kloc_tmp),y
33 01,2558 A0 A0 ldy #width*5
34 01,255A 11 82 ora (kloc_tmp),y
35 01,255C A0 C0 ldy #width*6
36 01,255E 11 82 ora (kloc_tmp),y
37 01,2560 A0 E0 ldy #width*7
38 01,2562 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
866 01,2564 lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2564 AA tax
11 01,2565 A5 80 lda kloc
12 01,2567 18 clc
13 01,2568 69 01 adc <1+WIDTH*8
14 01,256A 85 82 sta kloc_tmp
15 01,256C A5 81 lda kloc+1
16 01,256E 69 01 adc >1+WIDTH*8
17 01,2570 85 83 sta kloc_tmp+1
21 01,2572 A0 00 ldy #0
22 01,2574 8A txa
24 01,2575 11 82 ora (kloc_tmp),y
25 01,2577 A0 20 ldy #width
26 01,2579 11 82 ora (kloc_tmp),y
27 01,257B A0 40 ldy #width*2
28 01,257D 11 82 ora (kloc_tmp),y
29 01,257F A0 60 ldy #width*3
30 01,2581 11 82 ora (kloc_tmp),y
31 01,2583 A0 80 ldy #width*4
32 01,2585 11 82 ora (kloc_tmp),y
33 01,2587 A0 A0 ldy #width*5
34 01,2589 11 82 ora (kloc_tmp),y
35 01,258B A0 C0 ldy #width*6
36 01,258D 11 82 ora (kloc_tmp),y
37 01,258F A0 E0 ldy #width*7
38 01,2591 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
867 01,2593 lda_kloc 2+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2593 AA tax
11 01,2594 A5 80 lda kloc
12 01,2596 18 clc
13 01,2597 69 02 adc <2+WIDTH*8
14 01,2599 85 82 sta kloc_tmp
15 01,259B A5 81 lda kloc+1
16 01,259D 69 01 adc >2+WIDTH*8
17 01,259F 85 83 sta kloc_tmp+1
21 01,25A1 A0 00 ldy #0
22 01,25A3 8A txa
24 01,25A4 11 82 ora (kloc_tmp),y
25 01,25A6 A0 20 ldy #width
26 01,25A8 11 82 ora (kloc_tmp),y
27 01,25AA A0 40 ldy #width*2
28 01,25AC 11 82 ora (kloc_tmp),y
29 01,25AE A0 60 ldy #width*3
30 01,25B0 11 82 ora (kloc_tmp),y
31 01,25B2 A0 80 ldy #width*4
32 01,25B4 11 82 ora (kloc_tmp),y
33 01,25B6 A0 A0 ldy #width*5
34 01,25B8 11 82 ora (kloc_tmp),y
35 01,25BA A0 C0 ldy #width*6
36 01,25BC 11 82 ora (kloc_tmp),y
37 01,25BE A0 E0 ldy #width*7
38 01,25C0 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
868 01,25C2 lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,25C2 AA tax
11 01,25C3 A5 80 lda kloc
12 01,25C5 18 clc
13 01,25C6 69 01 adc <1+WIDTH*2*8
14 01,25C8 85 82 sta kloc_tmp
15 01,25CA A5 81 lda kloc+1
16 01,25CC 69 02 adc >1+WIDTH*2*8
17 01,25CE 85 83 sta kloc_tmp+1
21 01,25D0 A0 00 ldy #0
22 01,25D2 8A txa
24 01,25D3 11 82 ora (kloc_tmp),y
25 01,25D5 A0 20 ldy #width
26 01,25D7 11 82 ora (kloc_tmp),y
27 01,25D9 A0 40 ldy #width*2
28 01,25DB 11 82 ora (kloc_tmp),y
29 01,25DD A0 60 ldy #width*3
30 01,25DF 11 82 ora (kloc_tmp),y
31 01,25E1 A0 80 ldy #width*4
32 01,25E3 11 82 ora (kloc_tmp),y
33 01,25E5 A0 A0 ldy #width*5
34 01,25E7 11 82 ora (kloc_tmp),y
35 01,25E9 A0 C0 ldy #width*6
36 01,25EB 11 82 ora (kloc_tmp),y
37 01,25ED A0 E0 ldy #width*7
38 01,25EF 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
869 01,25F1 lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,25F1 AA tax
11 01,25F2 A5 80 lda kloc
12 01,25F4 18 clc
13 01,25F5 69 02 adc <2+WIDTH*2*8
14 01,25F7 85 82 sta kloc_tmp
15 01,25F9 A5 81 lda kloc+1
16 01,25FB 69 02 adc >2+WIDTH*2*8
17 01,25FD 85 83 sta kloc_tmp+1
21 01,25FF A0 00 ldy #0
22 01,2601 8A txa
24 01,2602 11 82 ora (kloc_tmp),y
25 01,2604 A0 20 ldy #width
26 01,2606 11 82 ora (kloc_tmp),y
27 01,2608 A0 40 ldy #width*2
28 01,260A 11 82 ora (kloc_tmp),y
29 01,260C A0 60 ldy #width*3
30 01,260E 11 82 ora (kloc_tmp),y
31 01,2610 A0 80 ldy #width*4
32 01,2612 11 82 ora (kloc_tmp),y
33 01,2614 A0 A0 ldy #width*5
34 01,2616 11 82 ora (kloc_tmp),y
35 01,2618 A0 C0 ldy #width*6
36 01,261A 11 82 ora (kloc_tmp),y
37 01,261C A0 E0 ldy #width*7
38 01,261E 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
870 01,2620 60 rts
871 .endp
872
873
874 ; ' '
875 ; '** '
876 ; '***'
877 01,2621 .proc klocek9_3
878 01,2621 sta_kloc width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2621 AA tax
11 01,2622 A5 80 lda kloc
12 01,2624 18 clc
13 01,2625 69 00 adc <WIDTH*8
14 01,2627 85 82 sta kloc_tmp
15 01,2629 A5 81 lda kloc+1
16 01,262B 69 01 adc >WIDTH*8
17 01,262D 85 83 sta kloc_tmp+1
21 01,262F 8A txa
23 01,2630 A0 00 ldy #0
24 01,2632 91 82 sta (kloc_tmp),y
25 01,2634 A0 20 ldy #width
26 01,2636 91 82 sta (kloc_tmp),y
27 01,2638 A0 40 ldy #width*2
28 01,263A 91 82 sta (kloc_tmp),y
29 01,263C A0 60 ldy #width*3
30 01,263E 91 82 sta (kloc_tmp),y
31 01,2640 A0 80 ldy #width*4
32 01,2642 91 82 sta (kloc_tmp),y
33 01,2644 A0 A0 ldy #width*5
34 01,2646 91 82 sta (kloc_tmp),y
35 01,2648 A0 C0 ldy #width*6
36 01,264A 91 82 sta (kloc_tmp),y
37 01,264C A0 E0 ldy #width*7
38 01,264E 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
879 01,2650 sta_kloc 1+width*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,2650 AA tax
11 01,2651 A5 80 lda kloc
12 01,2653 18 clc
13 01,2654 69 01 adc <1+WIDTH*8
14 01,2656 85 82 sta kloc_tmp
15 01,2658 A5 81 lda kloc+1
16 01,265A 69 01 adc >1+WIDTH*8
17 01,265C 85 83 sta kloc_tmp+1
21 01,265E 8A txa
23 01,265F A0 00 ldy #0
24 01,2661 91 82 sta (kloc_tmp),y
25 01,2663 A0 20 ldy #width
26 01,2665 91 82 sta (kloc_tmp),y
27 01,2667 A0 40 ldy #width*2
28 01,2669 91 82 sta (kloc_tmp),y
29 01,266B A0 60 ldy #width*3
30 01,266D 91 82 sta (kloc_tmp),y
31 01,266F A0 80 ldy #width*4
32 01,2671 91 82 sta (kloc_tmp),y
33 01,2673 A0 A0 ldy #width*5
34 01,2675 91 82 sta (kloc_tmp),y
35 01,2677 A0 C0 ldy #width*6
36 01,2679 91 82 sta (kloc_tmp),y
37 01,267B A0 E0 ldy #width*7
38 01,267D 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
880 01,267F sta_kloc width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,267F AA tax
11 01,2680 A5 80 lda kloc
12 01,2682 18 clc
13 01,2683 69 00 adc <WIDTH*2*8
14 01,2685 85 82 sta kloc_tmp
15 01,2687 A5 81 lda kloc+1
16 01,2689 69 02 adc >WIDTH*2*8
17 01,268B 85 83 sta kloc_tmp+1
21 01,268D 8A txa
23 01,268E A0 00 ldy #0
24 01,2690 91 82 sta (kloc_tmp),y
25 01,2692 A0 20 ldy #width
26 01,2694 91 82 sta (kloc_tmp),y
27 01,2696 A0 40 ldy #width*2
28 01,2698 91 82 sta (kloc_tmp),y
29 01,269A A0 60 ldy #width*3
30 01,269C 91 82 sta (kloc_tmp),y
31 01,269E A0 80 ldy #width*4
32 01,26A0 91 82 sta (kloc_tmp),y
33 01,26A2 A0 A0 ldy #width*5
34 01,26A4 91 82 sta (kloc_tmp),y
35 01,26A6 A0 C0 ldy #width*6
36 01,26A8 91 82 sta (kloc_tmp),y
37 01,26AA A0 E0 ldy #width*7
38 01,26AC 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
881 01,26AE sta_kloc 1+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,26AE AA tax
11 01,26AF A5 80 lda kloc
12 01,26B1 18 clc
13 01,26B2 69 01 adc <1+WIDTH*2*8
14 01,26B4 85 82 sta kloc_tmp
15 01,26B6 A5 81 lda kloc+1
16 01,26B8 69 02 adc >1+WIDTH*2*8
17 01,26BA 85 83 sta kloc_tmp+1
21 01,26BC 8A txa
23 01,26BD A0 00 ldy #0
24 01,26BF 91 82 sta (kloc_tmp),y
25 01,26C1 A0 20 ldy #width
26 01,26C3 91 82 sta (kloc_tmp),y
27 01,26C5 A0 40 ldy #width*2
28 01,26C7 91 82 sta (kloc_tmp),y
29 01,26C9 A0 60 ldy #width*3
30 01,26CB 91 82 sta (kloc_tmp),y
31 01,26CD A0 80 ldy #width*4
32 01,26CF 91 82 sta (kloc_tmp),y
33 01,26D1 A0 A0 ldy #width*5
34 01,26D3 91 82 sta (kloc_tmp),y
35 01,26D5 A0 C0 ldy #width*6
36 01,26D7 91 82 sta (kloc_tmp),y
37 01,26D9 A0 E0 ldy #width*7
38 01,26DB 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
882 01,26DD sta_kloc 2+width*2*8
Macro: STA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,26DD AA tax
11 01,26DE A5 80 lda kloc
12 01,26E0 18 clc
13 01,26E1 69 02 adc <2+WIDTH*2*8
14 01,26E3 85 82 sta kloc_tmp
15 01,26E5 A5 81 lda kloc+1
16 01,26E7 69 02 adc >2+WIDTH*2*8
17 01,26E9 85 83 sta kloc_tmp+1
21 01,26EB 8A txa
23 01,26EC A0 00 ldy #0
24 01,26EE 91 82 sta (kloc_tmp),y
25 01,26F0 A0 20 ldy #width
26 01,26F2 91 82 sta (kloc_tmp),y
27 01,26F4 A0 40 ldy #width*2
28 01,26F6 91 82 sta (kloc_tmp),y
29 01,26F8 A0 60 ldy #width*3
30 01,26FA 91 82 sta (kloc_tmp),y
31 01,26FC A0 80 ldy #width*4
32 01,26FE 91 82 sta (kloc_tmp),y
33 01,2700 A0 A0 ldy #width*5
34 01,2702 91 82 sta (kloc_tmp),y
35 01,2704 A0 C0 ldy #width*6
36 01,2706 91 82 sta (kloc_tmp),y
37 01,2708 A0 E0 ldy #width*7
38 01,270A 91 82 sta (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
883 01,270C 60 rts
884
885 01,270D test
886 01,270D lda_kloc width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,270D AA tax
11 01,270E A5 80 lda kloc
12 01,2710 18 clc
13 01,2711 69 00 adc <WIDTH*8
14 01,2713 85 82 sta kloc_tmp
15 01,2715 A5 81 lda kloc+1
16 01,2717 69 01 adc >WIDTH*8
17 01,2719 85 83 sta kloc_tmp+1
21 01,271B A0 00 ldy #0
22 01,271D 8A txa
24 01,271E 11 82 ora (kloc_tmp),y
25 01,2720 A0 20 ldy #width
26 01,2722 11 82 ora (kloc_tmp),y
27 01,2724 A0 40 ldy #width*2
28 01,2726 11 82 ora (kloc_tmp),y
29 01,2728 A0 60 ldy #width*3
30 01,272A 11 82 ora (kloc_tmp),y
31 01,272C A0 80 ldy #width*4
32 01,272E 11 82 ora (kloc_tmp),y
33 01,2730 A0 A0 ldy #width*5
34 01,2732 11 82 ora (kloc_tmp),y
35 01,2734 A0 C0 ldy #width*6
36 01,2736 11 82 ora (kloc_tmp),y
37 01,2738 A0 E0 ldy #width*7
38 01,273A 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
887 01,273C lda_kloc 1+width*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,273C AA tax
11 01,273D A5 80 lda kloc
12 01,273F 18 clc
13 01,2740 69 01 adc <1+WIDTH*8
14 01,2742 85 82 sta kloc_tmp
15 01,2744 A5 81 lda kloc+1
16 01,2746 69 01 adc >1+WIDTH*8
17 01,2748 85 83 sta kloc_tmp+1
21 01,274A A0 00 ldy #0
22 01,274C 8A txa
24 01,274D 11 82 ora (kloc_tmp),y
25 01,274F A0 20 ldy #width
26 01,2751 11 82 ora (kloc_tmp),y
27 01,2753 A0 40 ldy #width*2
28 01,2755 11 82 ora (kloc_tmp),y
29 01,2757 A0 60 ldy #width*3
30 01,2759 11 82 ora (kloc_tmp),y
31 01,275B A0 80 ldy #width*4
32 01,275D 11 82 ora (kloc_tmp),y
33 01,275F A0 A0 ldy #width*5
34 01,2761 11 82 ora (kloc_tmp),y
35 01,2763 A0 C0 ldy #width*6
36 01,2765 11 82 ora (kloc_tmp),y
37 01,2767 A0 E0 ldy #width*7
38 01,2769 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
888 01,276B lda_kloc width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,276B AA tax
11 01,276C A5 80 lda kloc
12 01,276E 18 clc
13 01,276F 69 00 adc <WIDTH*2*8
14 01,2771 85 82 sta kloc_tmp
15 01,2773 A5 81 lda kloc+1
16 01,2775 69 02 adc >WIDTH*2*8
17 01,2777 85 83 sta kloc_tmp+1
21 01,2779 A0 00 ldy #0
22 01,277B 8A txa
24 01,277C 11 82 ora (kloc_tmp),y
25 01,277E A0 20 ldy #width
26 01,2780 11 82 ora (kloc_tmp),y
27 01,2782 A0 40 ldy #width*2
28 01,2784 11 82 ora (kloc_tmp),y
29 01,2786 A0 60 ldy #width*3
30 01,2788 11 82 ora (kloc_tmp),y
31 01,278A A0 80 ldy #width*4
32 01,278C 11 82 ora (kloc_tmp),y
33 01,278E A0 A0 ldy #width*5
34 01,2790 11 82 ora (kloc_tmp),y
35 01,2792 A0 C0 ldy #width*6
36 01,2794 11 82 ora (kloc_tmp),y
37 01,2796 A0 E0 ldy #width*7
38 01,2798 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
889 01,279A lda_kloc 1+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,279A AA tax
11 01,279B A5 80 lda kloc
12 01,279D 18 clc
13 01,279E 69 01 adc <1+WIDTH*2*8
14 01,27A0 85 82 sta kloc_tmp
15 01,27A2 A5 81 lda kloc+1
16 01,27A4 69 02 adc >1+WIDTH*2*8
17 01,27A6 85 83 sta kloc_tmp+1
21 01,27A8 A0 00 ldy #0
22 01,27AA 8A txa
24 01,27AB 11 82 ora (kloc_tmp),y
25 01,27AD A0 20 ldy #width
26 01,27AF 11 82 ora (kloc_tmp),y
27 01,27B1 A0 40 ldy #width*2
28 01,27B3 11 82 ora (kloc_tmp),y
29 01,27B5 A0 60 ldy #width*3
30 01,27B7 11 82 ora (kloc_tmp),y
31 01,27B9 A0 80 ldy #width*4
32 01,27BB 11 82 ora (kloc_tmp),y
33 01,27BD A0 A0 ldy #width*5
34 01,27BF 11 82 ora (kloc_tmp),y
35 01,27C1 A0 C0 ldy #width*6
36 01,27C3 11 82 ora (kloc_tmp),y
37 01,27C5 A0 E0 ldy #width*7
38 01,27C7 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
890 01,27C9 lda_kloc 2+width*2*8
Macro: LDA_KLOC [Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm]
1 01,27C9 AA tax
11 01,27CA A5 80 lda kloc
12 01,27CC 18 clc
13 01,27CD 69 02 adc <2+WIDTH*2*8
14 01,27CF 85 82 sta kloc_tmp
15 01,27D1 A5 81 lda kloc+1
16 01,27D3 69 02 adc >2+WIDTH*2*8
17 01,27D5 85 83 sta kloc_tmp+1
21 01,27D7 A0 00 ldy #0
22 01,27D9 8A txa
24 01,27DA 11 82 ora (kloc_tmp),y
25 01,27DC A0 20 ldy #width
26 01,27DE 11 82 ora (kloc_tmp),y
27 01,27E0 A0 40 ldy #width*2
28 01,27E2 11 82 ora (kloc_tmp),y
29 01,27E4 A0 60 ldy #width*3
30 01,27E6 11 82 ora (kloc_tmp),y
31 01,27E8 A0 80 ldy #width*4
32 01,27EA 11 82 ora (kloc_tmp),y
33 01,27EC A0 A0 ldy #width*5
34 01,27EE 11 82 ora (kloc_tmp),y
35 01,27F0 A0 C0 ldy #width*6
36 01,27F2 11 82 ora (kloc_tmp),y
37 01,27F4 A0 E0 ldy #width*7
38 01,27F6 11 82 ora (kloc_tmp),y
Source: C:\jac\system\Java\Programming\Workspaces\WUDSN-IDE\com.wudsn.ide.ref\HEX\Atari8\MADS\MADS-Relocated.asm
891 01,27F8 60 rts
892 .endp
893
894
895 /*
896 ustawia adres 'kloc' wg aktualnej pozycji X,Y klocka
897 */
897
898 01,27F9 .proc get_kloc
899
900 01,27F9 A4 86 ldy pos_y
901
902 01,27FB 18 clc
903 01,27FC B9 30 29 lda l_buf,y
904 01,27FF 65 85 adc pos_x
905 01,2801 85 80 sta kloc
906 01,2803 B9 B1 29 lda h_buf,y
907 01,2806 69 00 adc #0
908 01,2808 85 81 sta kloc+1
909 01,280A 60 rts
910 .endp
911
912
913 /*
914 losujemy wartosc z przedzialu <0..8>
915 */
915
916 01,280B .proc losuj_klocek
917 01,280B AD 0A D2 lda $d20a
918 01,280E 29 1C and #%00011100
919 01,2810 4A 4A :2 lsr @
920 01,2812 8D 1F 28 sta _add+1
921
922 01,2815 AD 0A D2 lda $d20a
923 01,2818 29 08 and #%00001000
924 01,281A 4A 4A 4A :3 lsr @
925 01,281D 18 clc
926 01,281E 69 00 _add adc #0
927
928 01,2820 0A 0A :2 asl @
929 01,2822 85 84 sta klocek_nr
930 01,2824 29 FC and #%11111100
931 01,2826 8D 32 2A sta maska
932 01,2829 60 rts
933 .endp
934
935
936 /*
937 NMI
938 */
938
939 01,282A .proc nmi
940
941 01,282A 2C 0F D4 bit $d40f
942 01,282D 10 00 bpl vbl
943
944
945 01,282F vbl
946 01,282F 8D 9E 28 sta regA+1
947
948 01,2832 8D 0F D4 sta $d40f
949
950 01,2835 E6 14 inc 20
951
952 01,2837 A9 00 8D 02 D4 + mwa #ant $d402
953 01,2841 A9 21 lda #%00100001
954 01,2843 8D 00 D4 sta $d400
955
956 01,2846 A9 0A lda #10
957 01,2848 8D 17 D0 sta $d017
958 01,284B A9 94 lda #$94
959 01,284D 8D 18 D0 sta $d018
960
961 01,2850 AD 33 2A lda read_joy
962 01,2853 D0 2E bne _skip
963
964 01,2855 AD 00 D3 lda $d300
965 01,2858 29 0F and #$f
966 01,285A C9 07 cmp #7
967 01,285C F0 0B beq ok
968 01,285E C9 0B cmp #11
969 01,2860 F0 07 beq ok
970 01,2862 C9 0D cmp #13
971 01,2864 F0 03 beq ok
972 01,2866 4C 83 28 jmp _skip
973
974 01,2869 ok
975 01,2869 CD 37 2A cmp old_joy
976 01,286C D0 05 bne new_joy
977
978 01,286E CE 36 2A dec delay_joy
979 01,2871 D0 10 bne _skip
980
981 01,2873 new_joy
982 01,2873 8D 5B 01 sta r_d300+1
983 01,2876 8D 37 2A sta old_joy
984 01,2879 A9 FF lda #$ff
985 01,287B 8D 33 2A sta read_joy
986 01,287E A9 04 lda #4
987 01,2880 8D 36 2A sta delay_joy
988
989 01,2883 _skip
990 01,2883 AD 10 D0 lda $d010
991 01,2886 D0 10 bne nmiQ
992
993 01,2888 CE 35 2A dec delay_trig
994 01,288B D0 10 bne regA
995
996 01,288D 8D 4F 01 sta r_d010+1
997
998 01,2890 A9 08 lda #8
999 01,2892 8D 35 2A sta delay_trig
1000 01,2895 4C 9D 28 jmp regA
1001
1002 01,2898 A9 01 nmiQ lda #1
1003 01,289A 8D 35 2A sta delay_trig
1004
1005 01,289D A9 00 regA lda #0
1006 01,289F 40 rti
1007
1008 .endp
1009
1010
1011 /*
1012 adresy procedur dla klockow
1013 */
1013
1014 01,28A0 l_klocek
1015 01,28A0 25 43 25 43 dta l(klocek1_0,klocek1_1,klocek1_0,klocek1_1)
1016 01,28A4 5F DB 55 C7 dta l(klocek2_0,klocek2_1,klocek2_2,klocek2_3)
1017 01,28A8 41 41 41 41 dta l(klocek3_0,klocek3_0,klocek3_0,klocek3_0)
1018 01,28AC BB 35 BB 35 dta l(klocek4_0,klocek4_1,klocek4_0,klocek4_1)
1019 01,28B0 A5 1F A5 1F dta l(klocek5_0,klocek5_1,klocek5_0,klocek5_1)
1020 01,28B4 9B 9B 9B 9B dta l(klocek6_0,klocek6_0,klocek6_0,klocek6_0)
1021 01,28B8 75 EF 6B E7 dta l(klocek7_0,klocek7_1,klocek7_2,klocek7_3)
1022 01,28BC 63 3B 09 D9 dta l(klocek8_0,klocek8_1,klocek8_2,klocek8_3)
1023 01,28C0 A9 79 49 21 dta l(klocek9_0,klocek9_1,klocek9_2,klocek9_3)
1024
1025 01,28C4 h_klocek
1026 01,28C4 02 03 02 03 dta h(klocek1_0,klocek1_1,klocek1_0,klocek1_1)
1027 01,28C8 04 05 07 08 dta h(klocek2_0,klocek2_1,klocek2_2,klocek2_3)
1028 01,28CC 0A 0A 0A 0A dta h(klocek3_0,klocek3_0,klocek3_0,klocek3_0)
1029 01,28D0 0B 0D 0B 0D dta h(klocek4_0,klocek4_1,klocek4_0,klocek4_1)
1030 01,28D4 0E 10 0E 10 dta h(klocek5_0,klocek5_1,klocek5_0,klocek5_1)
1031 01,28D8 11 11 11 11 dta h(klocek6_0,klocek6_0,klocek6_0,klocek6_0)
1032 01,28DC 13 14 16 17 dta h(klocek7_0,klocek7_1,klocek7_2,klocek7_3)
1033 01,28E0 19 1B 1D 1E dta h(klocek8_0,klocek8_1,klocek8_2,klocek8_3)
1034 01,28E4 20 22 24 26 dta h(klocek9_0,klocek9_1,klocek9_2,klocek9_3)
1035
1036 01,28E8 l_test
1037 01,28E8 B4 D1 B4 D1 dta l(klocek1_0.test,klocek1_1.test,klocek1_0.test,klocek1_1.test)
1038 01,28EC 1D 98 0E 84 dta l(klocek2_0.test,klocek2_1.test,klocek2_2.test,klocek2_3.test)
1039 01,28F0 FE FE FE FE dta l(klocek3_0.test,klocek3_0.test,klocek3_0.test,klocek3_0.test)
1040 01,28F4 78 ED 78 ED dta l(klocek4_0.test,klocek4_1.test,klocek4_0.test,klocek4_1.test)
1041 01,28F8 62 DD 62 DD dta l(klocek5_0.test,klocek5_1.test,klocek5_0.test,klocek5_1.test)
1042 01,28FC 88 88 88 88 dta l(klocek6_0.test,klocek6_0.test,klocek6_0.test,klocek6_0.test)
1043 01,2900 32 AD 29 A5 dta l(klocek7_0.test,klocek7_1.test,klocek7_2.test,klocek7_3.test)
1044 01,2904 4F 22 F1 C1 dta l(klocek8_0.test,klocek8_1.test,klocek8_2.test,klocek8_3.test)
1045 01,2908 91 61 35 0D dta l(klocek9_0.test,klocek9_1.test,klocek9_2.test,klocek9_3.test)
1046
1047 01,290C h_test
1048 01,290C 02 03 02 03 dta h(klocek1_0.test,klocek1_1.test,klocek1_0.test,klocek1_1.test)
1049 01,2910 05 06 08 09 dta h(klocek2_0.test,klocek2_1.test,klocek2_2.test,klocek2_3.test)
1050 01,2914 0A 0A 0A 0A dta h(klocek3_0.test,klocek3_0.test,klocek3_0.test,klocek3_0.test)
1051 01,2918 0C 0D 0C 0D dta h(klocek4_0.test,klocek4_1.test,klocek4_0.test,klocek4_1.test)
1052 01,291C 0F 10 0F 10 dta h(klocek5_0.test,klocek5_1.test,klocek5_0.test,klocek5_1.test)
1053 01,2920 12 12 12 12 dta h(klocek6_0.test,klocek6_0.test,klocek6_0.test,klocek6_0.test)
1054 01,2924 14 15 17 18 dta h(klocek7_0.test,klocek7_1.test,klocek7_2.test,klocek7_3.test)
1055 01,2928 1A 1C 1D 1F dta h(klocek8_0.test,klocek8_1.test,klocek8_2.test,klocek8_3.test)
1056 01,292C 21 23 25 27 dta h(klocek9_0.test,klocek9_1.test,klocek9_2.test,klocek9_3.test)
1057
1058
1059 01,2930 00 20 40 60 80 + l_buf :height+1 dta l(buf+#*width)
1060 01,29B1 A0 A0 A0 A0 A0 + h_buf :height+1 dta h(buf+#*width)
1061
1062
1063 01,2A32 00 maska brk
1064 01,2A33 00 read_joy brk
1065 01,2A34 08 delay dta 8
1066 01,2A35 08 delay_trig dta 8
1067 01,2A36 04 delay_joy dta 4
1068 01,2A37 00 old_joy brk
1069
1070
1071 01,2A38 end_address
1072
1073 01,2A38 blk update address
1073 01,2A38 EF FF 57
1073 01,2A38 50 00 83 00 8A +
1073 01,2A38 EF FF 3C
1073 01,2A38 4A 00 D7 00 38 +
1073 01,2A38 EF FF 3E
1073 01,2A38 4A 00 DC 00 2A +
1074 01,2A38 blk update public
1074 01,2A38 57 56 04 00 4D + MAIN
1074 01,2A38 57 56 0B 00 45 + END_ADDRESS
1075
1076
Reference in New Issue View Git Blame Copy Permalink