Dariaceli's Git
Browse code

Rewrote picture routine

neauoire authored on 27/02/2021 17:39:06
Showing 4 changed files
build.sh
History View file @ bb5fa6a
... ... 
@@ -20,5 +20,5 @@ cc -std=c89 -DDEBUG -Wall -Wno-unknown-pragmas -Wpedantic -Wshadow -Wextra -Werr
20 20 
 # cc uxn.c emulator.c -std=c89 -Os -DNDEBUG -g0 -s -Wall -Wno-unknown-pragmas -L/usr/local/lib -lSDL2 -o bin/emulator
21 21
22 22 
 # run
23 
-./bin/assembler examples/dev.mouse.usm bin/boot.rom
23 
+./bin/assembler examples/gui.picture.usm bin/boot.rom
24 24 
 ./bin/emulator bin/boot.rom
examples/gui.background.usm
History View file @ bb5fa6a
25 25 
deleted file mode 100644
... ... 
@@ -1,815 +0,0 @@
1 
-( blank )
2 
-
3 
-:dev/r fff8 ( std read port )
4 
-:dev/w fff9 ( std write port )
5 
-
6 
-;i 2
7 
-
8 
-|0100 @RESET
9 
-
10 
-	#01 =dev/r ( read screen for size )
11 
-	#02 =dev/w ( write to sprite )
12 
-
13 
-	,paint-background JSR
14 
-
15 
-
16 
-BRK
17 
-
18 
-@paint-background ( nil )
19 
-
20 
-	#01 =dev/r ( read screen for size )
21 
-	#02 =dev/w ( write to sprite )
22 
-
23 
-	#0000
24 
-	@paint-background-loop-hor
25 
-	#0000
26 
-	@paint-background-loop
27 
-		( draw ) OVR2 IOW2 DUP2 IOW2 ,image ~i ADD2 IOW2 #01 IOW
28 
-		( incr ) #0008 ADD2 DUP2
29 
-		( incr ) ~i #0008 ADD2 =i
30 
-		#00 IOR2 LTH2 ,paint-background-loop ROT JMP? POP2
31 
-		POP2
32 
-	( incr ) #0008 ADD2 DUP2
33 
-	#02 IOR2 LTH2 ,paint-background-loop-hor ROT JMP? POP2
34 
-	POP2
35 
-
36 
-RTS
37 
-
38 
-@image [
39 
-
40 
-0000 0802 1001 0410
41 
-0095 0055 0024 0154
42 
-114a 2114 a209 5005
43 
-2552 09a5 540a a114
44 
-5548 2651 aa4a 25a8
45 
-5592 4955 aa44 2aa9
46 
-5555 554a aaaa 5555
47 
-556d abaa b5d6 555b
48 
-b65b 6aad b6d5 5b6c
49 
-db6d b6d5 bb56 bbd5
50 
-6db6 db6d b6db 6ab7
51 
-b6db 6db6 db6a af74
52 
-db6d b6db 6db6 dbad
53 
-6db6 db6d b6db 6cb5
54 
-bbd7 6e9f bf7e fcf8
55 
-ff7c f0e0 8080 0000
56 
-0000 0101 0101 0301
57 
-f0e0 e0e1 c2d2 c385
58 
-375a ef55 faaf 55fa
59 
-77da 6fb5 da6f b5da
60 
-77da 6fb5 da6f b5da
61 
-77da 6eb5 db6d b6db
62 
-bbd6 edb6 5bed b7ba
63 
-deb5 dbb6 dd6d b7db
64 
-dfbe 7cf8 f0e1 e4c1
65 
-070a 1d36 5b6d b66d
66 
-77da b7dd 6bbd ebb6
67 
-77da b76d b66d b6db
68 
-77da 6fb5 dab7 dd6b
69 
-77da 6fb5 da6f b56e
70 
-77da 6db6 db6d b6db
71 
-76da adf6 5bad f75a
72 
-0002 1000 0421 0004
73 
-0190 0540 1500 5401
74 
-500a 4114 4210 8a21
75 
-a214 4229 9442 9520
76 
-924a a924 9255 49a5
77 
-9549 55a4 552a 4955
78 
-5555 2aaa 55aa 5555
79 
-6aad abad 6aab b556
80 
-ab55 6e55 da6d 56ab
81 
-6eb5 aeb5 db6d b6ab
82 
-da6d b6db 6d56 fb4d
83 
-dbad d67b add6 7baa
84 
-f65b adea 5ae5 57be
85 
-ab6f aa9f f6bf eaf9
86 
-e35e fff6 dfa8 57ba
87 
-fadd f7be ef10 efb5
88 
-0383 ebbb f75f a75b
89 
-8a8f 8916 910a 5538
90 
-af55 f6ab 5dea 5f6a
91 
-6fb5 da6f b5da 6db7
92 
-6fb5 da6f b5d6 6db7
93 
-6db7 da6d b6db 6db6
94 
-57fa adb6 db6d b6db
95 
-6fdf bede 7cf8 f8f0
96 
-8203 0d0b 162d 365b
97 
-db6d b66f dab7 da6f
98 
-5bed b65b ed76 adf6
99 
-6db7 dd6b bdeb b6db
100 
-bd6b b66d b66d db6d
101 
-b56f dab5 dfb5 6db6
102 
-6db6 db6d b65b edb6
103 
-adf6 5bad f65b adf6
104 
-1000 0520 0210 0124
105 
-9441 1401 5401 4812
106 
-1442 1442 114a 208a
107 
-9522 9442 1449 9224
108 
-14aa 45a9 144a a42a
109 
-aa55 4a2a aaaa aa55
110 
-aa55 ab55 aaab ad55
111 
-da55 566a ad56 6aad
112 
-da55 b7da 55af d56a
113 
-dd6a 5bed 566b bdd6
114 
-b6db 6db6 db6d b6da
115 
-ac73 af9b 7e6b bff4
116 
-dbff 54fd d2cd 36aa
117 
-a69b 6aad b6db aadb
118 
-d55b ed56 db6d b556
119 
-55ba 57ea 5d6b b6db
120 
-b6d7 76ae de6e b65c
121 
-0e23 3c2b 2d36 2b35
122 
-5b2d b65b aacd 6bb5
123 
-da6d b7da adf7 2add
124 
-da6d b7da 6db7 aadd
125 
-db6d b6db 6db6 db6d
126 
-6db7 d77f afdf 7fbf
127 
-e0e8 e181 c285 9305
128 
-adf6 5bad d268 934e
129 
-b5dd 6bad bfe9 965b
130 
-5b44 ffbd 4751 ef5a
131 
-6db6 cbfd 774d 74db
132 
-b6db 6d36 d5fd b75f
133 
-db6d b6db 6d56 e9bf
134 
-5bed b65b edb6 55aa
135 
-5bad f655 bbd6 5baa
136 
-0012 4002 0821 0009
137 
-802a 0148 2500 5402
138 
-4429 4491 2492 4492
139 
-8924 9225 914a a412
140 
-49a5 2a52 29a5 9555
141 
-4a55 aa55 5555 5555
142 
-aa55 ab55 5a55 566a
143 
-b556 5a6a abad b5aa
144 
-adab d5ad 556b 55ad
145 
-5bad 75ae 6bb5 5eab
146 
-6db5 5aeb 5bea b156
147 
-bae5 abd5 2e55 b5ae
148 
-db6d 55b6 db55 b6db
149 
-6d56 b5db 556e b5db
150 
-ebbd 55aa 77a8 d450
151 
-556d b4c0 0000 0000
152 
-ac0e 0c0c 0c0c 0c04
153 
-0e02 0201 0000 0000
154 
-d6ab f555 db69 5d69
155 
-b66b bd56 eb5d 6ab7
156 
-b76a bdd7 6abd d76a
157 
-b6db 6db6 da6d b6db
158 
-ff7d 5fde 9e9e 9c0e
159 
-0e4a 141b 223d 2b5d
160 
-33cd 36db b5de 6bb5
161 
-ad76 db6d b6da 6880
162 
-b7da 6fb5 da4b 0000
163 
-6db6 db6d b6db 6d16
164 
-a1fe 55bb d66d b6db
165 
-7eab aa76 dbad f65b
166 
-fffb afd5 6abd d66b
167 
-fdef 7ddf 6da7 d96e
168 
-2002 0821 0410 4208
169 
-2984 2214 4229 8452
170 
-2492 4992 4924 924a
171 
-aa52 4a29 a555 9552
172 
-a9a5 5555 2955 55aa
173 
-552a 5556 5a55 55aa
174 
-55ad 55d5 ad55 6aad
175 
-55b6 555a ab6d aab5
176 
-b5aa 55aa 6bb5 aedb
177 
-75ae dbb5 6eb6 d96f
178 
-e5aa 55ae f5d5 adb6
179 
-6ab5 add6 5a6b adb5
180 
-aa6d b6ab da6d 4535
181 
-6dab dd6a adb5 5000
182 
-4050 b4db 6daa 2d02
183 
-0000 0000 c0a0 b8d4
184 
-0c0c 080c 0808 0808
185 
-0000 0000 0000 0000
186 
-2d29 1d15 1516 050a
187 
-5aef 55ba 6fd5 bad7
188 
-dd6b bdd7 6abd d66b
189 
-6db4 5aec b5ac ec59
190 
-3c0c 7c5c 6cac f554
191 
-6a37 ad76 ad76 5868
192 
-de68 a0c0 0000 0000
193 
-0000 0000 0000 0000
194 
-0000 0000 0000 0000
195 
-0b00 0000 0000 0000
196 
-6db6 5b15 0601 0000
197 
-d5be d56f b55b 6d16
198 
-bdd6 6bbd 6ab7 5aed
199 
-b5df 69b6 db6d b6db
200 
-0251 0410 4200 1401
201 
-0954 2289 2492 4914
202 
-2592 544a a52a 5295
203 
-4aaa aa95 55aa 5555
204 
-a5aa aa55 5aab 556a
205 
-55aa b655 ab6d 55aa
206 
-b6aa db55 6d56 b5ab
207 
-d6ab 6d5a afd5 765b
208 
-b55d abf6 5a6f b5d6
209 
-b756 ee9d fd3a 75f6
210 
-55b5 d65a aaa9 6ca4
211 
-55aa a0c4 a000 8000
212 
-48a0 4000 0209 2650
213 
-0000 04b2 4abf dd03
214 
-0200 8050 aa54 eaf5
215 
-aada 552d 160a 0b05
216 
-0808 0808 8888 4848
217 
-0000 0000 0001 0102
218 
-1f12 3b55 b65b adf6
219 
-6db6 db6d b6db 55de
220 
-bdd6 6bb5 de6b adb6
221 
-b9d9 53ba b375 a5e6
222 
-b66c b6d6 6e56 fea7
223 
-50a0 6040 6020 a020
224 
-0000 0000 0000 0000
225 
-0000 0000 0000 0001
226 
-0000 0002 0d36 db6d
227 
-0000 2fd5 bbd5 7eab
228 
-0000 fe55 6eb5 da6f
229 
-0502 a1dc b7da ad77
230 
-b6db 6d56 bbd5 6eb5
231 
-ad76 abdd 6ab7 da6d
232 
-4802 1005 4015 0054
233 
-4295 4924 520a a94a
234 
-554a 2aa9 aaaa 2aaa
235 
-55aa aa55 abad aaaa
236 
-55ab d55a 5556 b5d5
237 
-6d56 6bad b5aa 6db6
238 
-6db5 566b b5de 53dd
239 
-6aad db6d b6ab 7dab
240 
-bbab 76af ef5e bf7e
241 
-f5e9 ecd4 d4ab a9a8
242 
-5050 a020 0800 00a0
243 
-0101 040a 132a 1656
244 
-0040 8504 1008 1408
245 
-0000 6804 0804 040a
246 
-ba7e 3b3f 1f3b 3f3f
247 
-8542 4241 a1c0 60d0
248 
-88e8 8868 a8a0 d8a0
249 
-0506 0b15 2e2a 5bad
250 
-55ae 75ad d6bb 55dd
251 
-6ab7 da6d b6aa 6db7
252 
-db6d b5db adeb 5dab
253 
-6b6d 4a5b 565b 556e
254 
-5bef b75b eb5b b7db
255 
-2020 40a0 2080 2020
256 
-0000 0000 0000 0001
257 
-0305 0c13 354a 9440
258 
-565b ad6a b680 0000
259 
-da6f b5da ab00 0000
260 
-d57d aadf 6956 0b00
261 
-aadd b76a bdd7 6abb
262 
-db6d b6db 6a5d eb5d
263 
-b65b ed55 db6d b65b
264 
-0228 0251 0422 1442
265 
-a412 aa24 924a a915
266 
-aaa5 9aa5 aaaa 2a55
267 
-b555 ab55 aaad aa55
268 
-565a 6b55 aa6d aa56
269 
-abd5 5b6d aab6 dbaa
270 
-6a57 6db5 dbad 76ab
271 
-dd6a b75b b76e df5f
272 
-7bfd faee b4f6 d9ac
273 
-2854 54aa aa28 8040
274 
-0000 0001 8001 0001
275 
-5eae 5f7b bf7d efff
276 
-0a05 00c0 d0ff 76ff
277 
-5440 0103 1ffd efba
278 
-77fd bff7 7efb dfb7
279 
-e8e0 b0f0 f0d2 eac5
280 
-524a 452a abca ad56
281 
-d5bb d5ae 6ab5 afd5
282 
-6a57 baab da6d 56b5
283 
-da55 dd6a aeb5 da6d
284 
-dd6a b6db aab6 da6b
285 
-35db 566b 5daa 6d57
286 
-6eb6 de6c acec 58b8
287 
-20a0 3050 516d b6db
288 
-0003 057a 4cb0 d050
289 
-4000 0002 0a17 5b5f
290 
-0015 aaaf f8a0 e080
291 
-0055 fadf 0700 0090
292 
-0000 a0d0 eafc 7f1b
293 
-5516 0b01 0000 4000
294 
-abf5 5b4d 72ab 5509
295 
-ed56 6bbd d556 6b5d
296 
-114a 0154 0229 0452
297 
-4955 2495 524a aa25
298 
-552a aa55 aaa5 5555
299 
-56aa b555 aa56 5a6a
300 
-b5d6 555a abd5 add5
301 
-6db6 abda 576a b75a
302 
-ddb6 6abd d56b b7af
303 
-bdff f6dd fef5 f6ab
304 
-d569 adb2 aa65 aa4a
305 
-b450 55a0 ad50 aeb2
306 
-0002 0000 00a0 08a5
307 
-dbff fdaa 0000 026d
308 
-b7f8 8000 022d d556
309 
-c000 0015 d65a 6aab
310 
-0000 00bf c9b5 a040
311 
-150a 0dd5 165a 2b2d
312 
-95db 2aad b6ab 555a
313 
-6a5d d66b b55a add7
314 
-db6d aab7 5aeb 5a6d
315 
-ab6d b65b ea5b add5
316 
-ad75 ae6a b7da 556e
317 
-6a5d abf6 5aad d7ba
318 
-d971 b1a1 e243 62c5
319 
-5576 ad56 fa4a f44a
320 
-4081 8102 0503 0507
321 
-be77 ffde fffa bfff
322 
-820a 0808 140c 0505
323 
-4804 0201 0002 056a
324 
-1f0f 8607 8707 0587
325 
-d0a0 d8e8 f4fa bafd
326 
-0d05 0000 0000 8000
327 
-aa17 3a4d 162a 0b15
328 
-0944 2215 4015 4a21
329 
-5492 4a2a a94a 2a49
330 
-aa95 aa52 55aa aa55
331 
-ab55 adb5 55aa ad56
332 
-5a6b 55ad 56eb 5aad
333 
-aa6d b65b ea5d abb6
334 
-dfbf bd7f feee fdfd
335 
-f5ad b5aa d5ac 55b4
336 
-55aa 2a55 55aa 55aa
337 
-55aa d556 55aa 55aa
338 
-55aa b6aa 55aa 56b5
339 
-55aa b6d5 55ab ad55
340 
-6aad d556 6a55 5b6a
341 
-adb4 50a0 956a 55ad
342 
-0000 022a a9aa 54aa
343 
-34ab 555d 66b5 9aeb
344 
-ad6b ad55 b6aa b65a
345 
-6a5b ad6a b6d5 add6
346 
-b655 b6db aa6d aab6
347 
-bb55 db6d aab6 aadb
348 
-b556 6bb5 add6 ba55
349 
-55ee 556b b5d9 a9b1
350 
-83c5 8682 8685 8586
351 
-60a0 b8d6 aa8b 0180
352 
-0203 0328 d45b 6daa
353 
-f7ff bdf7 3f8f 45f1
354 
-01c0 e0b0 fcff b7ff
355 
-aa00 0000 05ff fff7
356 
-0f1e 377f fdef bffd
357 
-f6df fffd dfff 76ff
358 
-8040 40a0 a8d0 d0e8
359 
-0a00 0100 0300 0000
360 
-4a12 4904 5209 5402
361 
-a52a 548a 524a aa12
362 
-2aaa aaaa a5aa 55aa
363 
-b5aa aaad 55b6 55aa
364 
-b5d6 ab6d b5aa 5bd5
365 
-57ef 5d5f b7bf 7e7b
366 
-daf6 faaa eab5 d6aa
367 
-a9a5 d5a5 aa44 95aa
368 
-5555 5555 aa95 55aa
369 
-5555 5555 aa55 55aa
370 
-55aa 5556 aa55 55aa
371 
-6aaa adaa ab55 55aa
372 
-aaad 55ab 6d55 55aa
373 
-d55a 6b55 555a 6baa
374 
-6a8a 5536 5552 59a2
375 
-2dd5 55b6 5ad5 56aa
376 
-6baa 55b6 d55b aad5
377 
-6ab5 aeaa 555b 8a45
378 
-d55b add5 6a5b adb5
379 
-556d 56b5 d65a 55ad
380 
-ae72 adab b5d6 5aab
381 
-d3a9 51a1 7181 e151
382 
-8285 8682 8583 c582
383 
-c040 a0d0 685e abb5
384 
-5b2d 0b05 0201 4050
385 
-5c55 6bb5 ae6a b655
386 
-6e1f 45a1 b8d6 aab6
387 
-deff ffb6 7f0d 83a0
388 
-f7ff bff7 fffd b77f
389 
-ffdb 7fff f6bf ffed
390 
-ea74 f4da f9f5 baf4
391 
-0000 0000 0000 8000
392 
-5402 5409 520a 4529
393 
-ca29 aa55 9552 4a2a
394 
-aa55 aa55 55aa aaab
395 
-b556 aa55 55aa d62a
396 
-5aad d55b 67af addf
397 
-ffef fefe b5fe fab5
398 
-b555 aad4 55a8 a255
399 
-2a55 4aa9 2aaa a554
400 
-aa55 aa55 aa92 55aa
401 
-aa55 aa55 aaaa 55aa
402 
-b555 aa55 aaaa 55aa
403 
-565a aa55 aaaa 55aa
404 
-dbaa aa55 aaad 55aa
405 
-54b5 d554 aa52 aab2
406 
-a151 4181 8181 8182
407 
-6d55 566a 555a 55ab
408 
-5b6d aaab b5aa 566a
409 
-4502 8141 0080 8080
410 
-55da 565a aa55 6d2a
411 
-6aad d5b6 d555 adb5
412 
-b55b aad6 5a6b ad55
413 
-4361 82c2 a344 4642
414 
-c282 c2c2 e1e2 e1e2
415 
-daad d6b5 56db 6aad
416 
-d65a eb55 b65b d55a
417 
-5aad 564b ea35 d65b
418 
-da6b ad6a b7aa db6d
419 
-d054 6bb5 5bd5 5b6c
420 
-0e01 2048 5368 adb6
421 
-ff77 0400 0075 02a8
422 
-f040 0000 027a 954a
423 
-0000 0000 80a0 7897
424 
-0452 1542 294a 114a
425 
-aaa9 4a29 55a5 2a92
426 
-aa55 5555 5555 aa55
427 
-d52a 6d55 5556 aa55
428 
-5bbf af7d 7fef fdbf
429 
-faea 6aea dad5 aaaa
430 
-a5a9 8aa5 942a 492a
431 
-2a52 aa2a a595 54aa
432 
-aa95 55aa 5552 aaaa
433 
-554a 55aa 55aa a595
434 
-55aa 55aa 554a 5555
435 
-55aa 55aa 55aa 5555
436 
-55aa 6daa 55aa 5555
437 
-55aa 55aa 55aa 555a
438 
-0182 0202 0585 0a8a
439 
-55b6 aaaa 555b aaaa
440 
-55ad b5d5 5555 aab5
441 
-0000 8000 0080 0080
442 
-2b15 160a 0b05 0a05
443 
-566a add5 565a aa6a
444 
-b5d6 5aaa b5d6 aab5
445 
-95a6 8aa5 4aa5 9625
446 
-e2e2 e262 f262 b263
447 
-d5b6 aadb aab5 d65a
448 
-adb5 d65a abb5 d5ad
449 
-aa6d b5d6 556b ad55
450 
-aa56 b5db 555a 6aad
451 
-abd5 6d56 b5ab da6b
452 
-55b6 55da 566a ad6a
453 
-6bad b5d5 aab6 abb5
454 
-106e a956 b5d6 5a6a
455 
-ea2a 5baa b5ad d6aa
456 
-2412 4924 1249 2412
457 
-55aa 2495 aa49 a52a
458 
-4aa9 aa2a aa55 25aa
459 
-ab5a aba7 b74f 5d9f
460 
-f7ff ddfe 76de 7dfa
461 
-5454 a9a9 a2a9 45a9
462 
-a5aa 5229 954a 2955
463 
-25aa 524a 5452 4a2a
464 
-554a a9a5 95aa a554
465 
-55aa 552a 52aa 2aa4
466 
-54aa 4a55 aaa9 aa95
467 
-aaaa aa55 9555 aa55
468 
-aaaa aa55 5555 aa55
469 
-aaaa aa55 5555 aa55
470 
-95d5 aa55 5555 aa55
471 
-556a ab55 5555 aa55
472 
-56aa 556a 5556 aa55
473 
-80c0 20d0 50a8 a856
474 
-0a05 0a05 0a05 0a0b
475 
-ad55 d65a aa55 d65a
476 
-56aa b5ad aa6b adaa
477 
-aaab 25aa 2556 25aa
478 
-b252 52a5 92d5 52a5
479 
-aaab d55b aab5 ad55
480 
-b556 6a55 b6aa 5a6b
481 
-b6aa b5ad b5d5 aa56
482 
-abb5 aa5b ad6a abd5
483 
-555a d65a 6baa 556d
484 
-adb5 d6aa 5baa 6daa
485 
-ad55 daab 55b5 56da
486 
-ab55 ad6a 555a d5ab
487 
-5a6b 55aa b6aa 556d
488 
-4912 4412 4914 4215
489 
-548a 52a9 15a4 522a
490 
-aa95 5255 5594 aa55
491 
-b75e bf7a 6ffd fddd
492 
-6dfa fad5 f5b4 eaea
493 
-4495 8924 2a92 4925
494 
-9249 2aa9 a554 2552
495 
-a94a 5552 29a5 5592
496 
-4aaa 29a5 2a55 24aa
497 
-aa95 5452 4a55 aa94
498 
-aa52 aa95 a955 95a5
499 
-49aa aa55 2955 4a55
500 
-2aaa aa55 552a a555
501 
-aaaa aa55 55aa 552a
502 
-aaaa aa55 55aa 55aa
503 
-aaaa aa55 55aa 55aa
504 
-aaaa aa55 55aa 55aa
505 
-a9ad d555 55aa 55aa
506 
-144b 5555 55aa 55aa
507 
-aa55 5555 56aa 55aa
508 
-b555 55aa adaa 55aa
509 
-25aa 55aa 56aa 55da
510 
-55a5 aaaa a5a2 55a5
511 
-6aad aaab 55b5 565a
512 
-aaad b555 566a abad
513 
-b556 aa75 96ea 2b5a
514 
-5aab d55a add5 55b6
515 
-aa56 b5ab 5aaa 56b5
516 
-b5d6 5555 b6d5 aa56
517 
-55aa 6dab ad55 b5d6
518 
-5ad5 565a 6a55 55aa
519 
-aa55 aadb aa55 aab6
520 
-4015 0944 1224 0944
521 
-9249 2a92 49a5 14aa
522 
-a52b ab4a 574b ae4f
523 
-f77b daf3 f6a3 ede5
524 
-55e8 a554 d451 a84a
525 
-544a 2592 5548 a512
526 
-9453 4954 2594 524a
527 
-4a55 24aa 49a5 548a
528 
-524a a94a 5425 94aa
529 
-52aa 5592 aa49 a555
530 
-aa55 49aa 5549 2a55
531 
-5452 2aaa 492a aa52
532 
-aa95 aaa4 2aaa a554
533 
-aa55 a995 aaa5 2aa9
534 
-aa55 2a55 aa52 4a55
535 
-aa55 aa55 aa55 aa52
536 
-aa55 aa55 aa55 aa55
537 
-aa55 aa55 aa55 aa55
538 
-aa55 aa55 aa55 aa55
539 
-b555 aa55 aa55 aa55
540 
-5556 aa55 aa55 aa55
541 
-55aa ab55 aa55 aa5a
542 
-52a5 5552 a555 a5aa
543 
-aa55 aab5 5555 55aa
544 
-b255 aaad 5555 55aa
545 
-aaaa b556 5555 55aa
546 
-aaaa b5aa 565a 6aaa
547 
-d5aa 56aa d5aa adb5
548 
-b5aa adb5 55d5 5556
549 
-55aa 55ad 5555 6aaa
550 
-6daa 55aa 565a aad5
551 
-55aa 55da aaab aa55
552 
-1221 0a44 1104 5104
553 
-2249 2a90 4a25 520a
554 
-ad1f ad9f bb2f bd77
555 
-add5 c555 a985 24a5
556 
-5141 5220 4521 8442
557 
-5524 9249 5522 9449
558 
-2994 4a51 2a89 544a
559 
-52a9 4a24 aa25 a994
560 
-4955 92a9 4534 4aa4
561 
-4a29 a42a 5592 a994
562 
-a42a a5aa 5229 9552
563 
-9555 5295 5452 2aa5
564 
-522a aa49 aa95 402d
565 
-a595 aa55 492a 04f0
566 
-5552 aa2a 5295 a00a
567 
-2aaa a995 5554 02d8
568 
-aa95 5255 55aa 95a9
569 
-aa55 aa55 2aa5 5555
570 
-aa55 aa55 4a55 5455
571 
-aa55 aa55 aa55 aa55
572 
-aa55 aa55 aa55 aa55
573 
-aa55 aa55 aa55 aa55
574 
-a555 a54a aa4a aa4a
575 
-5556 55aa aaaa abaa
576 
-55aa 56aa b5aa 55aa
577 
-55b6 d5aa 55aa 55aa
578 
-55aa 55aa 55b6 55aa
579 
-55aa 55aa 55ab 55aa
580 
-55b5 55aa 556a 56aa
581 
-555a 55aa 55d5 aaaa
582 
-55aa 55ab 55aa aaaa
583 
-6aaa 5555 56aa b5aa
584 
-2208 4510 0452 0128
585 
-a94a 2592 4825 4a21
586 
-5f7d 76de fabd ecba
587 
-244a 45a2 4924 8aa5
588 
-8144 0249 0284 010a
589 
-2592 492a 904a 2548
590 
-2154 2a85 a855 02b4
591 
-425a 8452 5512 a885
592 
-528a a94a 2492 5549
593 
-a552 2a92 a944 2a52
594 
-4aa9 5492 4aa9 4aa5
595 
-9452 a992 4556 a50a
596 
-6ab7 aadd 6aaa 8000
597 
-af5a edb6 dbaa 1501
598 
-edb7 5aff 55aa 6a10
599 
-6eb5 db7e abd5 2d02
600 
-558a 65a4 d279 acd6
601 
-55aa 25aa a955 9552
602 
-55aa 25aa 552a 52aa
603 
-4aa9 5555 4aaa a955
604 
-aa55 2a55 aaa4 552a
605 
-aa55 aa55 aaaa 55aa
606 
-a54a aa4a a58a 55aa
607 
-55aa aaaa 55aa 55aa
608 
-55aa aaaa 55aa 55aa
609 
-55aa aaaa 55aa 55aa
610 
-55aa aaaa 55aa 55aa
611 
-55aa adaa 55aa 55aa
612 
-55aa 55aa 55aa 55aa
613 
-55aa 55aa 55aa 55aa
614 
-55aa 55aa 55aa 55aa
615 
-55aa 55aa 55aa 55aa
616 
-0550 0520 0a40 1500
617 
-4a29 452b 8356 13a6
618 
-f9da f259 f2d5 f2a5
619 
-4885 5409 9248 1224
620 
-810a 010a 0108 0510
621 
-2548 2249 14a2 09a4
622 
-09a4 5209 a429 4422
623 
-5522 9449 2452 8954
624 
-2492 4a29 a492 2984
625 
-8954 a512 a994 4529
626 
-14aa 4552 2994 4a25
627 
-9b54 28b4 50d0 a040
628 
-0000 0010 0000 0000
629 
-0000 0000 4200 0000
630 
-0000 0041 0000 0000
631 
-0000 4002 0000 0000
632 
-ba55 2f15 0b0a 0502
633 
-4a35 8a54 4aa5 d2a5
634 
-4a55 aa92 aa55 4955
635 
-aa49 55aa aa49 2a55
636 
-aa55 52aa 9555 aa49
637 
-9554 aa55 524a aa55
638 
-55aa a955 aa95 5255
639 
-24aa 5555 aa49 aa55
640 
-95aa 5452 aa55 9552
641 
-55aa aaa5 9555 55aa
642 
-55aa aa55 552a 54a5
643 
-55aa aa55 54aa a555
644 
-55aa aa55 aaa4 5555
645 
-55aa aa55 a495 5555
646 
-55aa aa55 aa52 4a2a
647 
-54a9 ab52 aa46 aca8
648 
-5500 2a00 4a01 2802
649 
-1745 9746 2b47 0da7
650 
-e8a5 62c8 ca45 908a
651 
-9208 2490 0a20 5408
652 
-0409 0211 0412 000a
653 
-114a 214a 208a 5184
654 
-5402 5422 914a 218a
655 
-8254 8952 0950 2548
656 
-528a 2550 0aa5 10aa
657 
-a452 09aa 4528 9249
658 
-9255 4a25 5595 4a2a
659 
-c040 8000 0000 0001
660 
-0000 0001 154b 5a20
661 
-0000 0055 6d5a 2c00
662 
-0000 0120 a8de 6b00
663 
-0002 0000 0090 403a
664 
-0221 0100 0000 0000
665 
-d269 5aa8 b65a 2b55
666 
-aa24 95aa a552 2a49
667 
-a995 524a 55a9 4a2a
668 
-2a55 aa49 552a a495
669 
-4a55 a955 25aa a94a
670 
-aa55 2955 4aa9 2aa5
671 
-9452 4a2a aa54 9255
672 
-aaaa 95a9 a595 aa55
673 
-55a9 4a2a 5554 aa49
674 
-552a a9a5 5595 aa54
675 
-55aa 492a 5555 aa92
676 
-55a5 2aa9 552a a594
677 
-542a aa52 4aaa 2aa5
678 
-aaa9 a5aa 54a5 9455
679 
-9850 30a0 61c1 c285
680 
-4802 2802 2108 4208
681 
-169b 571d 572b ae2b
682 
-918a 4014 4210 8805
683 
-5004 5088 2090 4820
684 
-0015 000a 0114 0208
685 
-2842 11a4 0944 2194
686 
-2194 2248 0550 0aa1
687 
-1244 9249 1288 5204
688 
-05a8 4429 04a9 4492
689 
-2492 4924 9224 9224
690 
-9456 2894 54a8 50a8
691 
-4102 0000 0000 0000
692 
-0000 0000 0000 0000
693 
-0000 0000 0000 0000
694 
-0000 0000 0000 0000
695 
-0c00 0000 0000 0000
696 
-0004 8040 4020 0000
697 
-2d15 160b 150a 0505
698 
-554a a855 4aa5 a954
699 
-52aa 924a 5524 5295
700 
-52aa 9552 4aa9 5549
701 
-aa49 2aa5 544a 2955
702 
-5452 9554 a555 4925
703 
-aa92 4aaa 5229 4a2a
704 
-a94a a995 544a a955
705 
-2aaa 522a a495 5552
706 
-a555 aa92 aa52 2a94
707 
-5455 4aa9 5492 aa95
708 
-aa55 a42a a594 aa52
709 
-aa55 92aa 49aa 9552
710 
-5356 974c 5cb0 3061
711 
-820a 1509 252a 5522
712 
-2104 2108 2200 2500
713 
-366e 2b6e 6a6e 6ab6
714 
-a011 0882 2881 1082
715 
-4810 a008 a010 8050
716 
-0211 0805 1002 0802
717 
-4210 4a01 5402 a804
718 
-1481 5402 5108 a510
719 
-5108 a510 4510 4a20
720 
-0852 09a4 1144 9249
721 
-9249 2288 2548 2249
722 
-5050 4184 4000 2400
723 
-2400 1100 4400 1082
724 
-a500 1044 a84a 1240
725 
-5200 0980 2682 0982
726 
-4009 2004 a194 552a
727 
-0000 2008 2200 49a0
728 
-0000 0000 4000 2004
729 
-0502 0201 0101 0000
730 
-a5a9 aa64 525a a5b4
731 
-4925 9452 9549 2492
732 
-2455 9249 5524 9552
733 
-924a 5549 24aa 2495
734 
-aa52 492a a495 a42a
735 
-a552 2994 a552 9549
736 
-24aa 2592 5549 2a52
737 
-944a 524a 542a 9249
738 
-a594 52aa 924a a955
739 
-52a9 954a a452 4a2a
740 
-4a55 2492 aa55 9249
741 
-a84b a957 865c 1870
742 
-c284 8805 1029 49a2
743 
-5592 4a29 a554 12aa
744 
-2400 2401 2401 1105
745 
-daee b56a eeb5 6ab6
746 
-1184 0124 0208 2281
747 
-0050 00a8 00a0 1040
748 
-1004 0210 0500 1200
749 
-a210 8a41 1441 1481
750 
-8550 0a40 2a00 5500
751 
-4a01 aa01 aa00 5402
752 
-2248 1244 1188 4492
753 
-12a4 11a4 09a2 1481
754 
-02a0 0049 0050 8420
755 
-0024 0002 2004 8011
756 
-0210 8004 2001 4400
757 
-2004 8010 4200 0820
758 
-0188 2100 4400 9100
759 
-2a49 0411 4004 0120
760 
-4009 8054 0154 0104
761 
-0000 0040 0800 4420
762 
-525a 542a 2914 158a
763 
-5592 49a4 12a9 0aa0
764 
-4954 2592 a924 9249
765 
-5249 2a92 4924 aa25
766 
-924a 5294 4a25 a825
767 
-a554 92aa 4924 9552
768 
-29a5 9452 49a4 15a4
769 
-5524 92aa 49a5 14aa
770 
-2492 aa49 2554 9249
771 
-a594 524a 29a5 944a
772 
-55aa 914b 5224 9448
773 
-62c1 0a84 122a 4924
774 
-510a a1a5 5284 49a5
775 
-4925 5425 9255 4825
776 
-2105 1101 0521 0000
777 
-6dd6 75b6 d576 0000
778 
-0802 0805 1005 0000
779 
-2088 4020 1040 0000
780 
-0401 0802 0800 0000
781 
-2409 4014 8025 0000
782 
-5500 2580 2a00 0000
783 
-500a 4015 4092 0000
784 
-208a 2015 802a 0000
785 
-5482 2904 a902 0000
786 
-4a10 4010 4000 0000
787 
-0000 1200 0000 0000
788 
-0820 0104 2000 0000
789 
-8200 0801 2000 0000
790 
-0440 1002 0048 0000
791 
-8400 2200 4400 0000
792 
-2082 0800 4108 0000
793 
-8800 2400 1201 0000
794 
-0402 900a 500a 0000
795 
-558a 4095 4992 0000
796 
-2492 4924 5209 0000
797 
-904a 2492 4924 0000
798 
-92a4 4992 2492 0000
799 
-2885 5229 8452 0000
800 
-924a 2944 9249 0000
801 
-a254 12a9 442a 0000
802 
-a495 5229 8455 0000
803 
-219a 442a a412 0000
804 
-1081 4182 0500 0000
805 
-aa25 512a 44aa 0000
806 
-0254 0992 4984 0000
807 
-9452 4925 5289 0000
808 
-
809 
-]
810 
-
811 
-|c000 @FRAME BRK
812 
-|d000 @ERROR BRK
813 
-
814 
-|FFF0 [ 0ffc 0f0b 0f03 ] ( palette )
815 
-|FFFA .RESET .FRAME .ERROR
examples/gui.images.usm
History View file @ bb5fa6a
816 0 
deleted file mode 100644
... ... 
@@ -1,375 +0,0 @@
1 
-( drag )
2 
-
3 
-:dev/r fff8 ( std read port )
4 
-:dev/w fff9 ( std write port )
5 
-
6 
-&Point { x 1 y 1 }
7 
-
8 
-&Point2d { x 2 y 2 }
9 
-
10 
-&Picture2d { x 2 y 2 width 1 height 1 color 1 addr 2 }
11 
-
12 
-;mouse Point2d
13 
-;pict Picture2d ;pictpt Point
14 
-( drawing ) ;color 1 ;x1 2 ;x2 2 ;y1 2 ;y2 2 ;i 2
15 
-;state 1
16 
-
17 
-|0100 @RESET
18 
-
19 
-	#02 =dev/w ( set dev/write to sprite )
20 
-
21 
-	#0010 #0020 #04 #04 #01 ,graphic1 ,draw-picture JSR
22 
-	#0020 #0030 #10 #10 #04 ,graphic2 ,draw-picture JSR
23 
-	#0088 #0020 #10 #10 #08 ,graphic2 ,draw-picture JSR
24 
-
25 
-	#05 =dev/r ( set dev/read mouse )
26 
-
27 
-BRK
28 
-
29 
-|c000 @FRAME
30 
-
31 
-	( clear last cursor )
32 
-	#10 ,clear_icn ~mouse.x ~mouse.y ,draw-sprite JSR
33 
-	( record mouse positions )
34 
-	#00 IOR2 =mouse.x #02 IOR2 =mouse.y
35 
-	( record mouse state )
36 
-	#04 IOR #11 ADD =state
37 
-	( draw mouse )
38 
-	~state ,cursor_icn ~mouse.x ~mouse.y ,draw-sprite JSR
39 
-
40 
-BRK
41 
-
42 
-@draw-picture ( x y width height addr -> picture )
43 
-
44 
-	=pict.addr =pict.color =pict.height =pict.width =pict.y =pict.x
45 
-	#00 =pictpt.y
46 
-	@draw-picture-row
47 
-		#00 =pictpt.x
48 
-		@draw-picture-col
49 
-			( draw )
50 
-			~pict.color
51 
-			~pict.addr
52 
-			#0008 #00 ~pictpt.x MUL2 ADD2 ( x )
53 
-			#0008 #00 ~pictpt.y ~pict.width MUL MUL2 ADD2 ( y * width )
54 
-			~pict.x #0008 #00 ~pictpt.x MUL2 ADD2
55 
-			~pict.y #0008 #00 ~pictpt.y MUL2 ADD2
56 
-			,draw-sprite JSR
57 
-			( draw - end )
58 
-			( incr x ) ~pictpt.x #01 ADD =pictpt.x
59 
-			~pictpt.x ~pict.width LTH ,draw-picture-col ROT JMP? POP2
60 
-		( incr y ) ~pictpt.y #01 ADD =pictpt.y
61 
-		~pictpt.y ~pict.height LTH ,draw-picture-row ROT JMP? POP2
62 
-
63 
-	#01 =dev/w ( set dev/write to sprite )
64 
-	#03 =color
65 
-	~pict.x #0001 SUB2 ~pict.y #0001 SUB2 ~pict.x #0008 #00 ~pict.width MUL2 ADD2 ~pict.y #0008 #00 ~pict.height MUL2 ADD2 ,line-rect JSR
66 
-	#02 =dev/w ( set dev/write to sprite )
67 
-
68 
-RTS
69 
-
70 
-@line-rect ( x1 y1 x2 y2 )
71 
-	=y2 =x2 ( stash x1 y1 ) DUP2 WSR2 =y1 DUP2 WSR2 =x1
72 
-	@line-rect-hor
73 
-		( draw ) ~x1 ~y1 IOW2 IOW2 ~color IOW
74 
-		( draw ) ~x1 ~y2 IOW2 IOW2 ~color IOW
75 
-		( incr ) ~x1 #0001 ADD2 DUP2 =x1
76 
-		~x2 #0001 ADD2 LTH2 ,line-rect-hor ROT JMP? POP2
77 
-	( restore x1 y1 ) RSW2 =x1 RSW2 =y1
78 
-	@line-rect-ver
79 
-		( incr ) ~y1 #0001 ADD2 DUP2 =y1
80 
-		( draw ) ~x1 ~y1 IOW2 IOW2 ~color IOW
81 
-		( draw ) ~x2 ~y1 IOW2 IOW2 ~color IOW
82 
-		~y2 #0001 SUB2 LTH2 ,line-rect-ver ROT JMP? POP2
83 
-RTS
84 
-
85 
-@draw-sprite
86 
-	IOW2 ( y byte )
87 
-	IOW2 ( x byte )
88 
-	IOW2 ( sprite address )
89 
-	IOW ( layer-color )
90 
-	RTS
91 
-
92 
-@clear_icn   [ 0000 0000 0000 0000 ]
93 
-@cursor_icn  [ 80c0 e0f0 f8e0 1000 ]
94 
-
95 
-@graphic1 [
96 
-	ff80 8080 8080 8088
97 
-	ffff fffc f8f9 f1f4
98 
-	ffff 0010 c721 2120
99 
-	ffff 3f0f 0717 c343
100 
-	8888 8080 8080 8080
101 
-	f0f1 f2f5 f2f1 f0f4
102 
-	1208 804c 9212 4c00
103 
-	7303 0343 1b1b fbfb
104 
-	8080 8f83 8383 8393
105 
-	f0f3 f1f0 e4c0 80ff
106 
-	00c7 c7c6 4606 00ff
107 
-	c3d3 c307 870f 3fff
108 
-	8f83 8383 8383 83ff
109 
-	fff7 fdff c0e2 f1ff
110 
-	7fef bfff 07af 5fff
111 
-	ffff ffff ffff ffff
112 
-]
113 
-
114 
-@graphic2 [
115 
-	ffff ffff ffff ffff
116 
-	ffff ffff ffff ffff
117 
-	ffff ffff ffff ffff
118 
-	ffff ffff ffff ffff
119 
-	ffff ffff ffff fffe
120 
-	ffff ffff fef0 8000
121 
-	ffff ffd0 0000 0000
122 
-	ffff ff02 0000 0000
123 
-	ffff ffff 1f03 0000
124 
-	ffff ffff ffff ff1f
125 
-	ffff ffff ffff ffff
126 
-	ffff ffff ffff ffff
127 
-	ffff ffff ffff ffff
128 
-	ffff ffff ffff ffff
129 
-	ffff ffff ffff ffff
130 
-	ffff ffff ffff ffff
131 
-	ffff ffff ffff ffff
132 
-	ffff ffff ffff ffff
133 
-	ffff ffff ffff ffff
134 
-	ffff ffff fef8 f8e0
135 
-	f8e0 c000 0003 0c30
136 
-	0000 0738 c000 0000
137 
-	17d0 0404 0404 0404
138 
-	fd00 0000 0000 0000
139 
-	40be 0100 0000 0000
140 
-	0300 e01c 0300 0000
141 
-	ff2f 0300 802d 0000
142 
-	ffff ff3f 0f07 a101
143 
-	ffff ffff ffff ffff
144 
-	ffff ffff ffff ffff
145 
-	ffff ffff ffff ffff
146 
-	ffff ffff ffff ffff
147 
-	ffff ffff ffff ffff
148 
-	ffff ffff ffff ffff
149 
-	ffff fefc f0e0 c081
150 
-	a081 060c 3060 8000
151 
-	c080 0000 0000 0000
152 
-	0000 0000 0000 0000
153 
-	0604 0406 0206 0202
154 
-	0000 0000 0000 0000
155 
-	0000 0000 0000 0000
156 
-	0000 0000 0000 0000
157 
-	0000 0000 0000 0000
158 
-	0000 0000 0100 0101
159 
-	ffff ffff ffff ffff
160 
-	ffff ffff ffff ffff
161 
-	ffff ffff ffff ffff
162 
-	ffff ffff ffff ffff
163 
-	ffff ffff ffff ffff
164 
-	fffe ffd0 e0e0 e0e0
165 
-	16f8 0000 0000 0000
166 
-	0000 0000 0000 0000
167 
-	0000 0000 0000 0000
168 
-	0000 0000 0000 0000
169 
-	0202 0202 0300 02ba
170 
-	0000 0000 0000 12c8
171 
-	0000 0000 0000 4893
172 
-	0000 0000 0000 00f4
173 
-	0000 0000 0000 0000
174 
-	0103 0303 0703 0707
175 
-	ffff ffff ffff ffff
176 
-	ffff ffff ffff ffff
177 
-	ffff ffff ffff ffff
178 
-	ffff ffff ffff ffff
179 
-	ffff ffff ffff ffff
180 
-	e0e0 e0f0 f0f8 f8fc
181 
-	0000 0000 0000 0000
182 
-	0000 0000 0001 020a
183 
-	0000 0314 7040 8000
184 
-	0b74 8000 0000 0000
185 
-	4001 0105 0703 0200
186 
-	0000 80c0 c080 4000
187 
-	0000 0000 0000 0000
188 
-	0700 0000 0000 0000
189 
-	8028 0000 0000 0000
190 
-	0f0f 0f1f 1f1f 1f1f
191 
-	ffff ffff ffff ffff
192 
-	ffff ffff ffff ffff
193 
-	ffff ffff ffff ffff
194 
-	ffff ffff ffff ffff
195 
-	ffff ffff ffff ffff
196 
-	fcfe feff ffff ffff
197 
-	0000 0003 82cc c0e0
198 
-	1060 8000 0000 0000
199 
-	0000 0000 0000 0b34
200 
-	0000 0000 17f8 0000
201 
-	0000 005f ff3f fe68
202 
-	0000 aff8 e0fc a100
203 
-	0000 5a00 0092 4000
204 
-	0000 b217 0080 9000
205 
-	0000 0040 5801 0101
206 
-	0f1f 0f1f 0f1f 4f2f
207 
-	ffff ffff ffff ffff
208 
-	ffff ffff ffff ffff
209 
-	ffff ffff ffff ffff
210 
-	ffff ffff ffff ffff
211 
-	ffff ffff ffff ffff
212 
-	ffff ffff ffff ffff
213 
-	e0f0 f0f0 f0f1 f1ed
214 
-	0105 0a30 4000 0000
215 
-	c000 0000 0000 0000
216 
-	0000 0000 0000 0000
217 
-	071f 1f3f 1fbf 3fbf
218 
-	8080 a0d0 84e4 f0f0
219 
-	0000 0000 0000 0000
220 
-	0000 0000 0000 0000
221 
-	0000 0302 040a 062b
222 
-	af0f 0f1f 0f0f 1f9f
223 
-	ffff ffff ffff ffff
224 
-	ffff ffff ffff ffff
225 
-	ffff ffff ffff ffff
226 
-	ffff ffff ffff ffff
227 
-	ffff ffff ffff ffff
228 
-	ffff ffff ffff ffff
229 
-	e5e5 eaf0 f2f8 eeff
230 
-	8000 0000 0200 001e
231 
-	0000 0000 4500 00aa
232 
-	0000 0055 0200 01ff
233 
-	3fbf 28f7 0f14 57ff
234 
-	f059 80d0 c02f fde5
235 
-	2840 0008 f795 474f
236 
-	0100 16eb 5fff ffff
237 
-	54df 1f87 ffff ffff
238 
-	1f3f 291e bf7b fdfb
239 
-	ffff ffff ffff ffff
240 
-	ffff ffff ffff ffff
241 
-	ffff ffff ffff ffff
242 
-	ffff ffff ffff ffff
243 
-	ffff ffff ffff ffff
244 
-	ffff ffff ffff ffff
245 
-	fbfd fef5 fdff ffff
246 
-	8789 c64f af87 6fe7
247 
-	f76d 8e56 deed edef
248 
-	55ff 00fe 896d ffff
249 
-	5fe1 c9d7 7b77 bb7b
250 
-	5a5f ffff ff7f 7fff
251 
-	dffc f8f2 c7ea fd9f
252 
-	0100 8496 619f ffff
253 
-	6f1f 7f7f ffff ffff
254 
-	3ffb 7fdf 776f 7777
255 
-	ffff ffff ffff ffff
256 
-	ffff ffff ffff ffff
257 
-	ffff ffff ffff ffff
258 
-	ffff ffff ffff ffff
259 
-	ffff ffff ffff ffff
260 
-	ffff ffff ffff ffff
261 
-	fcff ffff ffff ffff
262 
-	d7b7 7ff7 bbd7 f3fb
263 
-	edee edfe e2eb d5d6
264 
-	edff ffe9 22aa dd56
265 
-	bf7b bb35 75f2 a7ff
266 
-	ffff f7ff 5fd1 2efa
267 
-	efff ffff ff7f 95ee
268 
-	ffff ffff ffff 779a
269 
-	feff feff fefe ffa1
270 
-	df7f dfbf bfff ffff
271 
-	ffff ffff ffff ffff
272 
-	ffff ffff ffff ffff
273 
-	ffff ffff ffff ffff
274 
-	ffff ffff ffff ffff
275 
-	ffff ffff ffff ffff
276 
-	ffff ffff ffff ffff
277 
-	ffff ffff ffff ffff
278 
-	f9ff f5fa fcfc fcff
279 
-	af5f 7fbf 7fff 7fff
280 
-	ffff ffff ffff ffff
281 
-	ffff ffff ffff ffff
282 
-	ffff ffff ffff ffff
283 
-	52ff ffff ffff ffff
284 
-	aef5 ffff ffff ffff
285 
-	ddeb fffd fdff fbf9
286 
-	ffff ffff ffff ff7f
287 
-	ffff ffff ffff ffff
288 
-	ffff ffff ffff ffff
289 
-	ffff ffff ffff ffff
290 
-	ffff ffff ffff ffff
291 
-	ffff ffff ffff ffff
292 
-	ffff ffff ffff ffff
293 
-	ffff ffff ffde fef0
294 
-	fbf8 f7ed d1a3 21c1
295 
-	bfff 3f9f 0f0f 0787
296 
-	ffff ffff ffff ffff
297 
-	ffff ffff ffff ffff
298 
-	ffff afd2 fdff ea80
299 
-	ffbf 5fff ffff 1f07
300 
-	ffff ffff ffff ffff
301 
-	f9f0 f0e0 e8c8 cc94
302 
-	5fe3 1c0f 0100 0000
303 
-	ffff bf85 fa3f 0f03
304 
-	ffff ffff 7f83 fcff
305 
-	ffff ffff ffff 5fa5
306 
-	ffff ffff ffff fffb
307 
-	ffff ffff ffff fcf3
308 
-	fffe faeb ac58 f0c0
309 
-	d9a3 a206 0c18 3830
310 
-	0402 0404 0404 0404
311 
-	8381 8040 4000 4000
312 
-	ffff ff6f 3f1f 0f07
313 
-	fefe fefe fffe ffdf
314 
-	8037 00e4 390f 8087
315 
-	03a3 13f7 47a7 cf1f
316 
-	fef7 fffe fefc f8f8
317 
-	94a4 2420 4440 4480
318 
-	0000 0000 0000 0000
319 
-	0101 0303 060c 0c08
320 
-	9f86 0001 0303 060c
321 
-	fabf 7dc0 8000 0000
322 
-	2fd3 fc07 0100 0000
323 
-	cfbf 7ff1 c080 0000
324 
-	8080 8000 8080 8080
325 
-	6020 6060 2060 6020
326 
-	0404 040c 0404 0404
327 
-	1000 0008 0002 0000
328 
-	0101 0000 0000 0080
329 
-	ffff 7f1f 0f03 0000
330 
-	e0fd ffff fffe fe1e
331 
-	3fff ff57 4faf a6f4
332 
-	f0e0 e182 8200 0000
333 
-	8080 0000 0000 0000
334 
-	0000 0000 0000 0000
335 
-	1810 3020 60c0 80c0
336 
-	0c18 1030 2040 40c0
337 
-	0000 0000 0000 0000
338 
-	0001 0307 0f0f 1f3f
339 
-	0000 0000 0000 0000
340 
-	4040 4040 2020 2030
341 
-	6030 6030 2030 2030
342 
-	0804 0408 0404 0404
343 
-	0000 0000 0000 0000
344 
-	0028 0802 0100 0000
345 
-	0000 0000 8061 171f
346 
-	0000 000a 7fff fffe
347 
-	b0b8 995b 8fa9 b4bc
348 
-	0001 7ffe fea0 0000
349 
-	0040 e080 0000 0000
350 
-	0101 0301 0206 0404
351 
-	8000 0100 0101 0301
352 
-	8080 8080 0000 0000
353 
-	0000 0001 0103 0707
354 
-	7e7c f8f0 e0c0 c080
355 
-	0000 0000 80c0 6070
356 
-	1010 1008 0808 0808
357 
-	2030 1020 3000 3010
358 
-	0404 0406 0202 0403
359 
-	0000 0001 0b3f 7fff
360 
-	0003 1f7f ffff ffff
361 
-	7fff ffff ffff ffff
362 
-	faf9 f7fd fcff ffff
363 
-	b6da dc9a 5d4d ee6e
364 
-	0000 0000 00fa ffff
365 
-	0000 0000 0080 fcf8
366 
-	0404 0000 0000 0000
367 
-	0302 0301 0202 0202
368 
-	0000 0000 0000 0000
369 
-	0f1f 1e3c 7c78 f0e0
370 
-	0000 0000 0000 0001
371 
-]
372 
-
373 
-|d000 @ERROR BRK
374 
-|FFF0 [ f0ac f0bb f053 ] ( palette )
375 
-|FFFA .RESET .FRAME .ERROR ( vectors )
examples/gui.picture.usm
History View file @ bb5fa6a
376 0 
new file mode 100644
... ... 
@@ -0,0 +1,316 @@
1 
+( gui/picture )
2 
+
3 
+&Screen { width 2 height 2 pad 4 x 2 y 2 color 1 }
4 
+&Sprite { pad 8 x 2 y 2 addr 2 color 1 }
5 
+
6 
+&Picture2d { x 2 y 2 width 2 height 2 color 1 addr 2 }
7 
+&Point2d { x 2 y 2 }
8 
+
9 
+;pict Picture2d
10 
+
11 
+|0100 @RESET
12 
+
13 
+	#0000 #0000 ~dev/screen.width ~dev/screen.height #01 ,pict_large ,draw-picture JSR
14 
+	#0008 #0010 #0080 #0080 #01 ,pict_medium ,draw-picture JSR
15 
+	#00d0 #0090 #0020 #0020 #04 ,pict_small ,draw-picture JSR
16 
+
17 
+BRK
18 
+
19 
+@draw-picture ( x y width height color addr )
20 
+
21 
+	DUP2 =dev/sprite.addr =pict.addr =pict.color =pict.height =pict.width DUP2 =dev/sprite.y =pict.y =pict.x
22 
+	@draw-picture-ver
23 
+		~pict.x =dev/sprite.x
24 
+		@draw-picture-hor
25 
+			( draw ) ~pict.color =dev/sprite.color
26 
+			( incr ) ~dev/sprite.x #0008 ADD2 =dev/sprite.x
27 
+			( incr ) ~dev/sprite.addr #0008 ADD2 =dev/sprite.addr
28 
+		,draw-picture-hor ~dev/sprite.x ~pict.width ~pict.x ADD2 LTH2 JMP? POP2
29 
+		( incr ) ~dev/sprite.y #0008 ADD2 =dev/sprite.y
30 
+	,draw-picture-ver ~dev/sprite.y ~pict.height ~pict.y ADD2 LTH2 JMP? POP2
31 
+
32 
+RTS
33 
+
34 
+@pict_small [
35 
+	ff80 8080 8080 8088 ffff fffc f8f9 f1f4
36 
+	ffff 0010 c721 2120 ffff 3f0f 0717 c343
37 
+	8888 8080 8080 8080 f0f1 f2f5 f2f1 f0f4
38 
+	1208 804c 9212 4c00 7303 0343 1b1b fbfb
39 
+	8080 8f83 8383 8393 f0f3 f1f0 e4c0 80ff
40 
+	00c7 c7c6 4606 00ff c3d3 c307 870f 3fff
41 
+	8f83 8383 8383 83ff fff7 fdff c0e2 f1ff
42 
+	7fef bfff 07af 5fff ffff ffff ffff ffff
43 
+]
44 
+
45 
+@pict_medium [
46 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
47 
+	ffff ffff ffff fffe ffff ffff fef0 8000 ffff ffd0 0000 0000 ffff ff02 0000 0000
48 
+	ffff ffff 1f03 0000 ffff ffff ffff ff1f ffff ffff ffff ffff ffff ffff ffff ffff
49 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
50 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff fef8 f8e0
51 
+	f8e0 c000 0003 0c30 0000 0738 c000 0000 17d0 0404 0404 0404 fd00 0000 0000 0000
52 
+	40be 0100 0000 0000 0300 e01c 0300 0000 ff2f 0300 802d 0000 ffff ff3f 0f07 a101
53 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
54 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff fefc f0e0 c081 a081 060c 3060 8000
55 
+	c080 0000 0000 0000 0000 0000 0000 0000 0604 0406 0206 0202 0000 0000 0000 0000
56 
+	0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0100 0101
57 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
58 
+	ffff ffff ffff ffff fffe ffd0 e0e0 e0e0 16f8 0000 0000 0000 0000 0000 0000 0000
59 
+	0000 0000 0000 0000 0000 0000 0000 0000 0202 0202 0300 02ba 0000 0000 0000 12c8
60 
+	0000 0000 0000 4893 0000 0000 0000 00f4 0000 0000 0000 0000 0103 0303 0703 0707
61 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
62 
+	ffff ffff ffff ffff e0e0 e0f0 f0f8 f8fc 0000 0000 0000 0000 0000 0000 0001 020a
63 
+	0000 0314 7040 8000 0b74 8000 0000 0000 4001 0105 0703 0200 0000 80c0 c080 4000
64 
+	0000 0000 0000 0000 0700 0000 0000 0000 8028 0000 0000 0000 0f0f 0f1f 1f1f 1f1f
65 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
66 
+	ffff ffff ffff ffff fcfe feff ffff ffff 0000 0003 82cc c0e0 1060 8000 0000 0000
67 
+	0000 0000 0000 0b34 0000 0000 17f8 0000 0000 005f ff3f fe68 0000 aff8 e0fc a100
68 
+	0000 5a00 0092 4000 0000 b217 0080 9000 0000 0040 5801 0101 0f1f 0f1f 0f1f 4f2f
69 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
70 
+	ffff ffff ffff ffff ffff ffff ffff ffff e0f0 f0f0 f0f1 f1ed 0105 0a30 4000 0000
71 
+	c000 0000 0000 0000 0000 0000 0000 0000 071f 1f3f 1fbf 3fbf 8080 a0d0 84e4 f0f0
72 
+	0000 0000 0000 0000 0000 0000 0000 0000 0000 0302 040a 062b af0f 0f1f 0f0f 1f9f
73 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
74 
+	ffff ffff ffff ffff ffff ffff ffff ffff e5e5 eaf0 f2f8 eeff 8000 0000 0200 001e
75 
+	0000 0000 4500 00aa 0000 0055 0200 01ff 3fbf 28f7 0f14 57ff f059 80d0 c02f fde5
76 
+	2840 0008 f795 474f 0100 16eb 5fff ffff 54df 1f87 ffff ffff 1f3f 291e bf7b fdfb
77 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
78 
+	ffff ffff ffff ffff ffff ffff ffff ffff fbfd fef5 fdff ffff 8789 c64f af87 6fe7
79 
+	f76d 8e56 deed edef 55ff 00fe 896d ffff 5fe1 c9d7 7b77 bb7b 5a5f ffff ff7f 7fff
80 
+	dffc f8f2 c7ea fd9f 0100 8496 619f ffff 6f1f 7f7f ffff ffff 3ffb 7fdf 776f 7777
81 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
82 
+	ffff ffff ffff ffff ffff ffff ffff ffff fcff ffff ffff ffff d7b7 7ff7 bbd7 f3fb
83 
+	edee edfe e2eb d5d6 edff ffe9 22aa dd56 bf7b bb35 75f2 a7ff ffff f7ff 5fd1 2efa
84 
+	efff ffff ff7f 95ee ffff ffff ffff 779a feff feff fefe ffa1 df7f dfbf bfff ffff
85 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
86 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff f9ff f5fa fcfc fcff
87 
+	af5f 7fbf 7fff 7fff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
88 
+	52ff ffff ffff ffff aef5 ffff ffff ffff ddeb fffd fdff fbf9 ffff ffff ffff ff7f
89 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff
90 
+	ffff ffff ffff ffff ffff ffff ffff ffff ffff ffff ffde fef0 fbf8 f7ed d1a3 21c1
91 
+	bfff 3f9f 0f0f 0787 ffff ffff ffff ffff ffff ffff ffff ffff ffff afd2 fdff ea80
92 
+	ffbf 5fff ffff 1f07 ffff ffff ffff ffff f9f0 f0e0 e8c8 cc94 5fe3 1c0f 0100 0000
93 
+	ffff bf85 fa3f 0f03 ffff ffff 7f83 fcff ffff ffff ffff 5fa5 ffff ffff ffff fffb
94 
+	ffff ffff ffff fcf3 fffe faeb ac58 f0c0 d9a3 a206 0c18 3830 0402 0404 0404 0404
95 
+	8381 8040 4000 4000 ffff ff6f 3f1f 0f07 fefe fefe fffe ffdf 8037 00e4 390f 8087
96 
+	03a3 13f7 47a7 cf1f fef7 fffe fefc f8f8 94a4 2420 4440 4480 0000 0000 0000 0000
97 
+	0101 0303 060c 0c08 9f86 0001 0303 060c fabf 7dc0 8000 0000 2fd3 fc07 0100 0000
98 
+	cfbf 7ff1 c080 0000 8080 8000 8080 8080 6020 6060 2060 6020 0404 040c 0404 0404
99 
+	1000 0008 0002 0000 0101 0000 0000 0080 ffff 7f1f 0f03 0000 e0fd ffff fffe fe1e
100 
+	3fff ff57 4faf a6f4 f0e0 e182 8200 0000 8080 0000 0000 0000 0000 0000 0000 0000
101 
+	1810 3020 60c0 80c0 0c18 1030 2040 40c0 0000 0000 0000 0000 0001 0307 0f0f 1f3f
102 
+	0000 0000 0000 0000 4040 4040 2020 2030 6030 6030 2030 2030 0804 0408 0404 0404
103 
+	0000 0000 0000 0000 0028 0802 0100 0000 0000 0000 8061 171f 0000 000a 7fff fffe
104 
+	b0b8 995b 8fa9 b4bc 0001 7ffe fea0 0000 0040 e080 0000 0000 0101 0301 0206 0404
105 
+	8000 0100 0101 0301 8080 8080 0000 0000 0000 0001 0103 0707 7e7c f8f0 e0c0 c080
106 
+	0000 0000 80c0 6070 1010 1008 0808 0808 2030 1020 3000 3010 0404 0406 0202 0403
107 
+	0000 0001 0b3f 7fff 0003 1f7f ffff ffff 7fff ffff ffff ffff faf9 f7fd fcff ffff
108 
+	b6da dc9a 5d4d ee6e 0000 0000 00fa ffff 0000 0000 0080 fcf8 0404 0000 0000 0000
109 
+	0302 0301 0202 0202 0000 0000 0000 0000 0f1f 1e3c 7c78 f0e0 0000 0000 0000 0001
110 
+]
111 
+
112 
+@pict_large [
113 
+
114 
+	0000 0802 1001 0410 0095 0055 0024 0154 114a 2114 a209 5005 2552 09a5 540a a114
115 
+	5548 2651 aa4a 25a8 5592 4955 aa44 2aa9 5555 554a aaaa 5555 556d abaa b5d6 555b
116 
+	b65b 6aad b6d5 5b6c db6d b6d5 bb56 bbd5 6db6 db6d b6db 6ab7 b6db 6db6 db6a af74
117 
+	db6d b6db 6db6 dbad 6db6 db6d b6db 6cb5 bbd7 6e9f bf7e fcf8 ff7c f0e0 8080 0000
118 
+	0000 0101 0101 0301 f0e0 e0e1 c2d2 c385 375a ef55 faaf 55fa 77da 6fb5 da6f b5da
119 
+	77da 6fb5 da6f b5da 77da 6eb5 db6d b6db bbd6 edb6 5bed b7ba deb5 dbb6 dd6d b7db
120 
+	dfbe 7cf8 f0e1 e4c1 070a 1d36 5b6d b66d 77da b7dd 6bbd ebb6 77da b76d b66d b6db
121 
+	77da 6fb5 dab7 dd6b 77da 6fb5 da6f b56e 77da 6db6 db6d b6db 76da adf6 5bad f75a
122 
+	0002 1000 0421 0004 0190 0540 1500 5401 500a 4114 4210 8a21 a214 4229 9442 9520
123 
+	924a a924 9255 49a5 9549 55a4 552a 4955 5555 2aaa 55aa 5555 6aad abad 6aab b556
124 
+	ab55 6e55 da6d 56ab 6eb5 aeb5 db6d b6ab da6d b6db 6d56 fb4d dbad d67b add6 7baa
125 
+	f65b adea 5ae5 57be ab6f aa9f f6bf eaf9 e35e fff6 dfa8 57ba fadd f7be ef10 efb5
126 
+	0383 ebbb f75f a75b 8a8f 8916 910a 5538 af55 f6ab 5dea 5f6a 6fb5 da6f b5da 6db7
127 
+	6fb5 da6f b5d6 6db7 6db7 da6d b6db 6db6 57fa adb6 db6d b6db 6fdf bede 7cf8 f8f0
128 
+	8203 0d0b 162d 365b db6d b66f dab7 da6f 5bed b65b ed76 adf6 6db7 dd6b bdeb b6db
129 
+	bd6b b66d b66d db6d b56f dab5 dfb5 6db6 6db6 db6d b65b edb6 adf6 5bad f65b adf6
130 
+	1000 0520 0210 0124 9441 1401 5401 4812 1442 1442 114a 208a 9522 9442 1449 9224
131 
+	14aa 45a9 144a a42a aa55 4a2a aaaa aa55 aa55 ab55 aaab ad55 da55 566a ad56 6aad
132 
+	da55 b7da 55af d56a dd6a 5bed 566b bdd6 b6db 6db6 db6d b6da ac73 af9b 7e6b bff4
133 
+	dbff 54fd d2cd 36aa a69b 6aad b6db aadb d55b ed56 db6d b556 55ba 57ea 5d6b b6db
134 
+	b6d7 76ae de6e b65c 0e23 3c2b 2d36 2b35 5b2d b65b aacd 6bb5 da6d b7da adf7 2add
135 
+	da6d b7da 6db7 aadd db6d b6db 6db6 db6d 6db7 d77f afdf 7fbf e0e8 e181 c285 9305
136 
+	adf6 5bad d268 934e b5dd 6bad bfe9 965b 5b44 ffbd 4751 ef5a 6db6 cbfd 774d 74db
137 
+	b6db 6d36 d5fd b75f db6d b6db 6d56 e9bf 5bed b65b edb6 55aa 5bad f655 bbd6 5baa
138 
+	0012 4002 0821 0009 802a 0148 2500 5402 4429 4491 2492 4492 8924 9225 914a a412
139 
+	49a5 2a52 29a5 9555 4a55 aa55 5555 5555 aa55 ab55 5a55 566a b556 5a6a abad b5aa
140 
+	adab d5ad 556b 55ad 5bad 75ae 6bb5 5eab 6db5 5aeb 5bea b156 bae5 abd5 2e55 b5ae
141 
+	db6d 55b6 db55 b6db 6d56 b5db 556e b5db ebbd 55aa 77a8 d450 556d b4c0 0000 0000
142 
+	ac0e 0c0c 0c0c 0c04 0e02 0201 0000 0000 d6ab f555 db69 5d69 b66b bd56 eb5d 6ab7
143 
+	b76a bdd7 6abd d76a b6db 6db6 da6d b6db ff7d 5fde 9e9e 9c0e 0e4a 141b 223d 2b5d
144 
+	33cd 36db b5de 6bb5 ad76 db6d b6da 6880 b7da 6fb5 da4b 0000 6db6 db6d b6db 6d16
145 
+	a1fe 55bb d66d b6db 7eab aa76 dbad f65b fffb afd5 6abd d66b fdef 7ddf 6da7 d96e
146 
+	2002 0821 0410 4208 2984 2214 4229 8452 2492 4992 4924 924a aa52 4a29 a555 9552
147 
+	a9a5 5555 2955 55aa 552a 5556 5a55 55aa 55ad 55d5 ad55 6aad 55b6 555a ab6d aab5
148 
+	b5aa 55aa 6bb5 aedb 75ae dbb5 6eb6 d96f e5aa 55ae f5d5 adb6 6ab5 add6 5a6b adb5
149 
+	aa6d b6ab da6d 4535 6dab dd6a adb5 5000 4050 b4db 6daa 2d02 0000 0000 c0a0 b8d4
150 
+	0c0c 080c 0808 0808 0000 0000 0000 0000 2d29 1d15 1516 050a 5aef 55ba 6fd5 bad7
151 
+	dd6b bdd7 6abd d66b 6db4 5aec b5ac ec59 3c0c 7c5c 6cac f554 6a37 ad76 ad76 5868
152 
+	de68 a0c0 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0b00 0000 0000 0000
153 
+	6db6 5b15 0601 0000 d5be d56f b55b 6d16 bdd6 6bbd 6ab7 5aed b5df 69b6 db6d b6db
154 
+	0251 0410 4200 1401 0954 2289 2492 4914 2592 544a a52a 5295 4aaa aa95 55aa 5555
155 
+	a5aa aa55 5aab 556a 55aa b655 ab6d 55aa b6aa db55 6d56 b5ab d6ab 6d5a afd5 765b
156 
+	b55d abf6 5a6f b5d6 b756 ee9d fd3a 75f6 55b5 d65a aaa9 6ca4 55aa a0c4 a000 8000
157 
+	48a0 4000 0209 2650 0000 04b2 4abf dd03 0200 8050 aa54 eaf5 aada 552d 160a 0b05
158 
+	0808 0808 8888 4848 0000 0000 0001 0102 1f12 3b55 b65b adf6 6db6 db6d b6db 55de
159 
+	bdd6 6bb5 de6b adb6 b9d9 53ba b375 a5e6 b66c b6d6 6e56 fea7 50a0 6040 6020 a020
160 
+	0000 0000 0000 0000 0000 0000 0000 0001 0000 0002 0d36 db6d 0000 2fd5 bbd5 7eab
161 
+	0000 fe55 6eb5 da6f 0502 a1dc b7da ad77 b6db 6d56 bbd5 6eb5 ad76 abdd 6ab7 da6d
162 
+	4802 1005 4015 0054 4295 4924 520a a94a 554a 2aa9 aaaa 2aaa 55aa aa55 abad aaaa
163 
+	55ab d55a 5556 b5d5 6d56 6bad b5aa 6db6 6db5 566b b5de 53dd 6aad db6d b6ab 7dab
164 
+	bbab 76af ef5e bf7e f5e9 ecd4 d4ab a9a8 5050 a020 0800 00a0 0101 040a 132a 1656
165 
+	0040 8504 1008 1408 0000 6804 0804 040a ba7e 3b3f 1f3b 3f3f 8542 4241 a1c0 60d0
166 
+	88e8 8868 a8a0 d8a0 0506 0b15 2e2a 5bad 55ae 75ad d6bb 55dd 6ab7 da6d b6aa 6db7
167 
+	db6d b5db adeb 5dab 6b6d 4a5b 565b 556e 5bef b75b eb5b b7db 2020 40a0 2080 2020
168 
+	0000 0000 0000 0001 0305 0c13 354a 9440 565b ad6a b680 0000 da6f b5da ab00 0000
169 
+	d57d aadf 6956 0b00 aadd b76a bdd7 6abb db6d b6db 6a5d eb5d b65b ed55 db6d b65b
170 
+	0228 0251 0422 1442 a412 aa24 924a a915 aaa5 9aa5 aaaa 2a55 b555 ab55 aaad aa55
171 
+	565a 6b55 aa6d aa56 abd5 5b6d aab6 dbaa 6a57 6db5 dbad 76ab dd6a b75b b76e df5f
172 
+	7bfd faee b4f6 d9ac 2854 54aa aa28 8040 0000 0001 8001 0001 5eae 5f7b bf7d efff
173 
+	0a05 00c0 d0ff 76ff 5440 0103 1ffd efba 77fd bff7 7efb dfb7 e8e0 b0f0 f0d2 eac5
174 
+	524a 452a abca ad56 d5bb d5ae 6ab5 afd5 6a57 baab da6d 56b5 da55 dd6a aeb5 da6d
175 
+	dd6a b6db aab6 da6b 35db 566b 5daa 6d57 6eb6 de6c acec 58b8 20a0 3050 516d b6db
176 
+	0003 057a 4cb0 d050 4000 0002 0a17 5b5f 0015 aaaf f8a0 e080 0055 fadf 0700 0090
177 
+	0000 a0d0 eafc 7f1b 5516 0b01 0000 4000 abf5 5b4d 72ab 5509 ed56 6bbd d556 6b5d
178 
+	114a 0154 0229 0452 4955 2495 524a aa25 552a aa55 aaa5 5555 56aa b555 aa56 5a6a
179 
+	b5d6 555a abd5 add5 6db6 abda 576a b75a ddb6 6abd d56b b7af bdff f6dd fef5 f6ab
180 
+	d569 adb2 aa65 aa4a b450 55a0 ad50 aeb2 0002 0000 00a0 08a5 dbff fdaa 0000 026d
181 
+	b7f8 8000 022d d556 c000 0015 d65a 6aab 0000 00bf c9b5 a040 150a 0dd5 165a 2b2d
182 
+	95db 2aad b6ab 555a 6a5d d66b b55a add7 db6d aab7 5aeb 5a6d ab6d b65b ea5b add5
183 
+	ad75 ae6a b7da 556e 6a5d abf6 5aad d7ba d971 b1a1 e243 62c5 5576 ad56 fa4a f44a
184 
+	4081 8102 0503 0507 be77 ffde fffa bfff 820a 0808 140c 0505 4804 0201 0002 056a
185 
+	1f0f 8607 8707 0587 d0a0 d8e8 f4fa bafd 0d05 0000 0000 8000 aa17 3a4d 162a 0b15
186 
+	0944 2215 4015 4a21 5492 4a2a a94a 2a49 aa95 aa52 55aa aa55 ab55 adb5 55aa ad56
187 
+	5a6b 55ad 56eb 5aad aa6d b65b ea5d abb6 dfbf bd7f feee fdfd f5ad b5aa d5ac 55b4
188 
+	55aa 2a55 55aa 55aa 55aa d556 55aa 55aa 55aa b6aa 55aa 56b5 55aa b6d5 55ab ad55
189 
+	6aad d556 6a55 5b6a adb4 50a0 956a 55ad 0000 022a a9aa 54aa 34ab 555d 66b5 9aeb
190 
+	ad6b ad55 b6aa b65a 6a5b ad6a b6d5 add6 b655 b6db aa6d aab6 bb55 db6d aab6 aadb
191 
+	b556 6bb5 add6 ba55 55ee 556b b5d9 a9b1 83c5 8682 8685 8586 60a0 b8d6 aa8b 0180
192 
+	0203 0328 d45b 6daa f7ff bdf7 3f8f 45f1 01c0 e0b0 fcff b7ff aa00 0000 05ff fff7
193 
+	0f1e 377f fdef bffd f6df fffd dfff 76ff 8040 40a0 a8d0 d0e8 0a00 0100 0300 0000
194 
+	4a12 4904 5209 5402 a52a 548a 524a aa12 2aaa aaaa a5aa 55aa b5aa aaad 55b6 55aa
195 
+	b5d6 ab6d b5aa 5bd5 57ef 5d5f b7bf 7e7b daf6 faaa eab5 d6aa a9a5 d5a5 aa44 95aa
196 
+	5555 5555 aa95 55aa 5555 5555 aa55 55aa 55aa 5556 aa55 55aa 6aaa adaa ab55 55aa
197 
+	aaad 55ab 6d55 55aa d55a 6b55 555a 6baa 6a8a 5536 5552 59a2 2dd5 55b6 5ad5 56aa
198 
+	6baa 55b6 d55b aad5 6ab5 aeaa 555b 8a45 d55b add5 6a5b adb5 556d 56b5 d65a 55ad
199 
+	ae72 adab b5d6 5aab d3a9 51a1 7181 e151 8285 8682 8583 c582 c040 a0d0 685e abb5
200 
+	5b2d 0b05 0201 4050 5c55 6bb5 ae6a b655 6e1f 45a1 b8d6 aab6 deff ffb6 7f0d 83a0
201 
+	f7ff bff7 fffd b77f ffdb 7fff f6bf ffed ea74 f4da f9f5 baf4 0000 0000 0000 8000
202 
+	5402 5409 520a 4529 ca29 aa55 9552 4a2a aa55 aa55 55aa aaab b556 aa55 55aa d62a
203 
+	5aad d55b 67af addf ffef fefe b5fe fab5 b555 aad4 55a8 a255 2a55 4aa9 2aaa a554
204 
+	aa55 aa55 aa92 55aa aa55 aa55 aaaa 55aa b555 aa55 aaaa 55aa 565a aa55 aaaa 55aa
205 
+	dbaa aa55 aaad 55aa 54b5 d554 aa52 aab2 a151 4181 8181 8182 6d55 566a 555a 55ab
206 
+	5b6d aaab b5aa 566a 4502 8141 0080 8080 55da 565a aa55 6d2a 6aad d5b6 d555 adb5
207 
+	b55b aad6 5a6b ad55 4361 82c2 a344 4642 c282 c2c2 e1e2 e1e2 daad d6b5 56db 6aad
208 
+	d65a eb55 b65b d55a 5aad 564b ea35 d65b da6b ad6a b7aa db6d d054 6bb5 5bd5 5b6c
209 
+	0e01 2048 5368 adb6 ff77 0400 0075 02a8 f040 0000 027a 954a 0000 0000 80a0 7897
210 
+	0452 1542 294a 114a aaa9 4a29 55a5 2a92 aa55 5555 5555 aa55 d52a 6d55 5556 aa55
211 
+	5bbf af7d 7fef fdbf faea 6aea dad5 aaaa a5a9 8aa5 942a 492a 2a52 aa2a a595 54aa
212 
+	aa95 55aa 5552 aaaa 554a 55aa 55aa a595 55aa 55aa 554a 5555 55aa 55aa 55aa 5555
213 
+	55aa 6daa 55aa 5555 55aa 55aa 55aa 555a 0182 0202 0585 0a8a 55b6 aaaa 555b aaaa
214 
+	55ad b5d5 5555 aab5 0000 8000 0080 0080 2b15 160a 0b05 0a05 566a add5 565a aa6a
215 
+	b5d6 5aaa b5d6 aab5 95a6 8aa5 4aa5 9625 e2e2 e262 f262 b263 d5b6 aadb aab5 d65a
216 
+	adb5 d65a abb5 d5ad aa6d b5d6 556b ad55 aa56 b5db 555a 6aad abd5 6d56 b5ab da6b
217 
+	55b6 55da 566a ad6a 6bad b5d5 aab6 abb5 106e a956 b5d6 5a6a ea2a 5baa b5ad d6aa
218 
+	2412 4924 1249 2412 55aa 2495 aa49 a52a 4aa9 aa2a aa55 25aa ab5a aba7 b74f 5d9f
219 
+	f7ff ddfe 76de 7dfa 5454 a9a9 a2a9 45a9 a5aa 5229 954a 2955 25aa 524a 5452 4a2a
220 
+	554a a9a5 95aa a554 55aa 552a 52aa 2aa4 54aa 4a55 aaa9 aa95 aaaa aa55 9555 aa55
221 
+	aaaa aa55 5555 aa55 aaaa aa55 5555 aa55 95d5 aa55 5555 aa55 556a ab55 5555 aa55
222 
+	56aa 556a 5556 aa55 80c0 20d0 50a8 a856 0a05 0a05 0a05 0a0b ad55 d65a aa55 d65a
223 
+	56aa b5ad aa6b adaa aaab 25aa 2556 25aa b252 52a5 92d5 52a5 aaab d55b aab5 ad55
224 
+	b556 6a55 b6aa 5a6b b6aa b5ad b5d5 aa56 abb5 aa5b ad6a abd5 555a d65a 6baa 556d
225 
+	adb5 d6aa 5baa 6daa ad55 daab 55b5 56da ab55 ad6a 555a d5ab 5a6b 55aa b6aa 556d
226 
+	4912 4412 4914 4215 548a 52a9 15a4 522a aa95 5255 5594 aa55 b75e bf7a 6ffd fddd
227 
+	6dfa fad5 f5b4 eaea 4495 8924 2a92 4925 9249 2aa9 a554 2552 a94a 5552 29a5 5592
228 
+	4aaa 29a5 2a55 24aa aa95 5452 4a55 aa94 aa52 aa95 a955 95a5 49aa aa55 2955 4a55
229 
+	2aaa aa55 552a a555 aaaa aa55 55aa 552a aaaa aa55 55aa 55aa aaaa aa55 55aa 55aa
230 
+	aaaa aa55 55aa 55aa a9ad d555 55aa 55aa 144b 5555 55aa 55aa aa55 5555 56aa 55aa
231 
+	b555 55aa adaa 55aa 25aa 55aa 56aa 55da 55a5 aaaa a5a2 55a5 6aad aaab 55b5 565a
232 
+	aaad b555 566a abad b556 aa75 96ea 2b5a 5aab d55a add5 55b6 aa56 b5ab 5aaa 56b5
233 
+	b5d6 5555 b6d5 aa56 55aa 6dab ad55 b5d6 5ad5 565a 6a55 55aa aa55 aadb aa55 aab6
234 
+	4015 0944 1224 0944 9249 2a92 49a5 14aa a52b ab4a 574b ae4f f77b daf3 f6a3 ede5
235 
+	55e8 a554 d451 a84a 544a 2592 5548 a512 9453 4954 2594 524a 4a55 24aa 49a5 548a
236 
+	524a a94a 5425 94aa 52aa 5592 aa49 a555 aa55 49aa 5549 2a55 5452 2aaa 492a aa52
237 
+	aa95 aaa4 2aaa a554 aa55 a995 aaa5 2aa9 aa55 2a55 aa52 4a55 aa55 aa55 aa55 aa52
238 
+	aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 b555 aa55 aa55 aa55
239 
+	5556 aa55 aa55 aa55 55aa ab55 aa55 aa5a 52a5 5552 a555 a5aa aa55 aab5 5555 55aa
240 
+	b255 aaad 5555 55aa aaaa b556 5555 55aa aaaa b5aa 565a 6aaa d5aa 56aa d5aa adb5
241 
+	b5aa adb5 55d5 5556 55aa 55ad 5555 6aaa 6daa 55aa 565a aad5 55aa 55da aaab aa55
242 
+	1221 0a44 1104 5104 2249 2a90 4a25 520a ad1f ad9f bb2f bd77 add5 c555 a985 24a5
243 
+	5141 5220 4521 8442 5524 9249 5522 9449 2994 4a51 2a89 544a 52a9 4a24 aa25 a994
244 
+	4955 92a9 4534 4aa4 4a29 a42a 5592 a994 a42a a5aa 5229 9552 9555 5295 5452 2aa5
245 
+	522a aa49 aa95 402d a595 aa55 492a 04f0 5552 aa2a 5295 a00a 2aaa a995 5554 02d8
246 
+	aa95 5255 55aa 95a9 aa55 aa55 2aa5 5555 aa55 aa55 4a55 5455 aa55 aa55 aa55 aa55
247 
+	aa55 aa55 aa55 aa55 aa55 aa55 aa55 aa55 a555 a54a aa4a aa4a 5556 55aa aaaa abaa
248 
+	55aa 56aa b5aa 55aa 55b6 d5aa 55aa 55aa 55aa 55aa 55b6 55aa 55aa 55aa 55ab 55aa
249 
+	55b5 55aa 556a 56aa 555a 55aa 55d5 aaaa 55aa 55ab 55aa aaaa 6aaa 5555 56aa b5aa
250 
+	2208 4510 0452 0128 a94a 2592 4825 4a21 5f7d 76de fabd ecba 244a 45a2 4924 8aa5
251 
+	8144 0249 0284 010a 2592 492a 904a 2548 2154 2a85 a855 02b4 425a 8452 5512 a885
252 
+	528a a94a 2492 5549 a552 2a92 a944 2a52 4aa9 5492 4aa9 4aa5 9452 a992 4556 a50a
253 
+	6ab7 aadd 6aaa 8000 af5a edb6 dbaa 1501 edb7 5aff 55aa 6a10 6eb5 db7e abd5 2d02
254 
+	558a 65a4 d279 acd6 55aa 25aa a955 9552 55aa 25aa 552a 52aa 4aa9 5555 4aaa a955
255 
+	aa55 2a55 aaa4 552a aa55 aa55 aaaa 55aa a54a aa4a a58a 55aa 55aa aaaa 55aa 55aa
256 
+	55aa aaaa 55aa 55aa 55aa aaaa 55aa 55aa 55aa aaaa 55aa 55aa 55aa adaa 55aa 55aa
257 
+	55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa 55aa
258 
+	0550 0520 0a40 1500 4a29 452b 8356 13a6 f9da f259 f2d5 f2a5 4885 5409 9248 1224
259 
+	810a 010a 0108 0510 2548 2249 14a2 09a4 09a4 5209 a429 4422 5522 9449 2452 8954
260 
+	2492 4a29 a492 2984 8954 a512 a994 4529 14aa 4552 2994 4a25 9b54 28b4 50d0 a040
261 
+	0000 0010 0000 0000 0000 0000 4200 0000 0000 0041 0000 0000 0000 4002 0000 0000
262 
+	ba55 2f15 0b0a 0502 4a35 8a54 4aa5 d2a5 4a55 aa92 aa55 4955 aa49 55aa aa49 2a55
263 
+	aa55 52aa 9555 aa49 9554 aa55 524a aa55 55aa a955 aa95 5255 24aa 5555 aa49 aa55
264 
+	95aa 5452 aa55 9552 55aa aaa5 9555 55aa 55aa aa55 552a 54a5 55aa aa55 54aa a555
265 
+	55aa aa55 aaa4 5555 55aa aa55 a495 5555 55aa aa55 aa52 4a2a 54a9 ab52 aa46 aca8
266 
+	5500 2a00 4a01 2802 1745 9746 2b47 0da7 e8a5 62c8 ca45 908a 9208 2490 0a20 5408
267 
+	0409 0211 0412 000a 114a 214a 208a 5184 5402 5422 914a 218a 8254 8952 0950 2548
268 
+	528a 2550 0aa5 10aa a452 09aa 4528 9249 9255 4a25 5595 4a2a c040 8000 0000 0001
269 
+	0000 0001 154b 5a20 0000 0055 6d5a 2c00 0000 0120 a8de 6b00 0002 0000 0090 403a
270 
+	0221 0100 0000 0000 d269 5aa8 b65a 2b55 aa24 95aa a552 2a49 a995 524a 55a9 4a2a
271 
+	2a55 aa49 552a a495 4a55 a955 25aa a94a aa55 2955 4aa9 2aa5 9452 4a2a aa54 9255
272 
+	aaaa 95a9 a595 aa55 55a9 4a2a 5554 aa49 552a a9a5 5595 aa54 55aa 492a 5555 aa92
273 
+	55a5 2aa9 552a a594 542a aa52 4aaa 2aa5 aaa9 a5aa 54a5 9455 9850 30a0 61c1 c285
274 
+	4802 2802 2108 4208 169b 571d 572b ae2b 918a 4014 4210 8805 5004 5088 2090 4820
275 
+	0015 000a 0114 0208 2842 11a4 0944 2194 2194 2248 0550 0aa1 1244 9249 1288 5204
276 
+	05a8 4429 04a9 4492 2492 4924 9224 9224 9456 2894 54a8 50a8 4102 0000 0000 0000
277 
+	0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0c00 0000 0000 0000
278 
+	0004 8040 4020 0000 2d15 160b 150a 0505 554a a855 4aa5 a954 52aa 924a 5524 5295
279 
+	52aa 9552 4aa9 5549 aa49 2aa5 544a 2955 5452 9554 a555 4925 aa92 4aaa 5229 4a2a
280 
+	a94a a995 544a a955 2aaa 522a a495 5552 a555 aa92 aa52 2a94 5455 4aa9 5492 aa95
281 
+	aa55 a42a a594 aa52 aa55 92aa 49aa 9552 5356 974c 5cb0 3061 820a 1509 252a 5522
282 
+	2104 2108 2200 2500 366e 2b6e 6a6e 6ab6 a011 0882 2881 1082 4810 a008 a010 8050
283 
+	0211 0805 1002 0802 4210 4a01 5402 a804 1481 5402 5108 a510 5108 a510 4510 4a20
284 
+	0852 09a4 1144 9249 9249 2288 2548 2249 5050 4184 4000 2400 2400 1100 4400 1082
285 
+	a500 1044 a84a 1240 5200 0980 2682 0982 4009 2004 a194 552a 0000 2008 2200 49a0
286 
+	0000 0000 4000 2004 0502 0201 0101 0000 a5a9 aa64 525a a5b4 4925 9452 9549 2492
287 
+	2455 9249 5524 9552 924a 5549 24aa 2495 aa52 492a a495 a42a a552 2994 a552 9549
288 
+	24aa 2592 5549 2a52 944a 524a 542a 9249 a594 52aa 924a a955 52a9 954a a452 4a2a
289 
+	4a55 2492 aa55 9249 a84b a957 865c 1870 c284 8805 1029 49a2 5592 4a29 a554 12aa
290 
+	2400 2401 2401 1105 daee b56a eeb5 6ab6 1184 0124 0208 2281 0050 00a8 00a0 1040
291 
+	1004 0210 0500 1200 a210 8a41 1441 1481 8550 0a40 2a00 5500 4a01 aa01 aa00 5402
292 
+	2248 1244 1188 4492 12a4 11a4 09a2 1481 02a0 0049 0050 8420 0024 0002 2004 8011
293 
+	0210 8004 2001 4400 2004 8010 4200 0820 0188 2100 4400 9100 2a49 0411 4004 0120
294 
+	4009 8054 0154 0104 0000 0040 0800 4420 525a 542a 2914 158a 5592 49a4 12a9 0aa0
295 
+	4954 2592 a924 9249 5249 2a92 4924 aa25 924a 5294 4a25 a825 a554 92aa 4924 9552
296 
+	29a5 9452 49a4 15a4 5524 92aa 49a5 14aa 2492 aa49 2554 9249 a594 524a 29a5 944a
297 
+	55aa 914b 5224 9448 62c1 0a84 122a 4924 510a a1a5 5284 49a5 4925 5425 9255 4825
298 
+	2105 1101 0521 0000 6dd6 75b6 d576 0000 0802 0805 1005 0000 2088 4020 1040 0000
299 
+	0401 0802 0800 0000 2409 4014 8025 0000 5500 2580 2a00 0000 500a 4015 4092 0000
300 
+	208a 2015 802a 0000 5482 2904 a902 0000 4a10 4010 4000 0000 0000 1200 0000 0000
301 
+	0820 0104 2000 0000 8200 0801 2000 0000 0440 1002 0048 0000 8400 2200 4400 0000
302 
+	2082 0800 4108 0000 8800 2400 1201 0000 0402 900a 500a 0000 558a 4095 4992 0000
303 
+	2492 4924 5209 0000 904a 2492 4924 0000 92a4 4992 2492 0000 2885 5229 8452 0000
304 
+	924a 2944 9249 0000 a254 12a9 442a 0000 a495 5229 8455 0000 219a 442a a412 0000
305 
+	1081 4182 0500 0000 aa25 512a 44aa 0000 0254 0992 4984 0000 9452 4925 5289 0000
306 
+
307 
+]
308 
+
309 
+|c000 @FRAME BRK
310 
+|d000 @ERROR BRK
311 
+
312 
+|FF10 ;dev/screen Screen
313 
+|FF20 ;dev/sprite Sprite
314 
+
315 
+|FFF0 [ 0ffc 0f0b 0f03 ] ( palette )
316 
+|FFFA .RESET .FRAME .ERROR