Grafický balíček

Zdrojový kód

3      5b00            *s
4      5b00            ;==============================================================;
5      5b00            ;== Verzia 59 == Graf-balicek == 06.02.1992 == Busy software ==;
6      5b00            ;== Rychly linearny pravouhly kruhovy elipticky interpolator ==;
7      5b00            ;==============================================================;
8      5b00            cursor =    #fde6
9      5b00                   org  #6000
10     6000            tabadd ds   #0200
11     6200            room   ds   #0100
12     6300             
13     6300                   org  #8000               p=test rychlosti kruhov
14     8000 cd7bd8     p      call #d87b               i=test rychlosti ciar
15     8003 cdc486            call mkadd
16     8006 211a01            ld   hl,#011a
17     8009 22e6fd            ld   (cursor),hl
18     800c cdf5df            call #dff5
19     800f 2a2a2a20          db   '*** DEMO ***'
            44454d4f    
            202a2a2a    
20     801b 00                nop
21     801c             
22     801c 010101            ld   bc,#0101
23     801f 11febe            ld   de,#befe
24     8022 cd9c83            call box
25     8025 010303            ld   bc,#0303
26     8028 11fcbc            ld   de,#bcfc
27     802b cd9c83            call box
28     802e             
29     802e 0110a0            ld   bc,#a010
30     8031 af                xor  a
31     8032 cdec85            call circle
32     8035 0120a0            ld   bc,#a020
33     8038 3e01              ld   a,#01
34     803a cdec85            call circle
35     803d 0130a0            ld   bc,#a030
36     8040 3e02              ld   a,#02
37     8042 cdec85            call circle
38     8045 0140a0            ld   bc,#a040
39     8048 3e03              ld   a,#03
40     804a cdec85            call circle
41     804d 0150a0            ld   bc,#a050
42     8050 3e04              ld   a,#04
43     8052 cdec85            call circle
44     8055 0160a0            ld   bc,#a060
45     8058 3e05              ld   a,#05
46     805a cdec85            call circle
47     805d 0170a0            ld   bc,#a070
48     8060 3e06              ld   a,#06
49     8062 cdec85            call circle
50     8065 0180a0            ld   bc,#a080
51     8068 3e07              ld   a,#07
52     806a cdec85            call circle
53     806d 0192a0            ld   bc,#a092
54     8070 3e08              ld   a,#08
55     8072 cdec85            call circle
56     8075 01a6a0            ld   bc,#a0a6
57     8078 3e09              ld   a,#09
58     807a cdec85            call circle
59     807d 018060            ld   bc,#6080
60     8080 3e36              ld   a,#36
61     8082 cdec85            call circle
62     8085 018060            ld   bc,#6080
63     8088 3e20              ld   a,#20
64     808a cdec85            call circle
65     808d 013050            ld   bc,#5030
66     8090 3e0a              ld   a,#0a
67     8092 cdec85            call circle
68     8095             
69     8095 011020     ooo    ld   bc,#2010
70     8098 af                xor  a
71     8099 cde082            call koleso
72     809c 012020            ld   bc,#2020
73     809f 3e01              ld   a,#01
74     80a1 cde082            call koleso
75     80a4 013020            ld   bc,#2030
76     80a7 3e02              ld   a,#02
77     80a9 cde082            call koleso
78     80ac 014020            ld   bc,#2040
79     80af 3e03              ld   a,#03
80     80b1 cde082            call koleso
81     80b4 015020            ld   bc,#2050
82     80b7 3e04              ld   a,#04
83     80b9 cde082            call koleso
84     80bc 016020            ld   bc,#2060
85     80bf 3e05              ld   a,#05
86     80c1 cde082            call koleso
87     80c4 017020            ld   bc,#2070
88     80c7 3e06              ld   a,#06
89     80c9 cde082            call koleso
90     80cc 018020            ld   bc,#2080
91     80cf 3e07              ld   a,#07
92     80d1 cde082            call koleso
93     80d4 019220            ld   bc,#2092
94     80d7 3e08              ld   a,#08
95     80d9 cde082            call koleso
96     80dc 01a620            ld   bc,#20a6
97     80df 3e09              ld   a,#09
98     80e1 cde082            call koleso
99     80e4 018060            ld   bc,#6080
100    80e7 3e33              ld   a,#33
101    80e9 cde082            call koleso
102    80ec 018060            ld   bc,#6080
103    80ef 3e10              ld   a,#10
104    80f1 cde082            call koleso
105    80f4 013070            ld   bc,#7030
106    80f7 3e0a              ld   a,#0a
107    80f9 cde082            call koleso
108    80fc             
109    80fc 210000            ld   hl,#00
110    80ff 01d0b0            ld   bc,#b0d0
111    8102 11f0b0            ld   de,#b0f0
112    8105 223982            ld   (rcc),hl
113    8108 fd26a0            ld   yh,#a0
114    810b c5         loop   push bc
115    810c d5                push de
116    810d cd1c85            call line
117    8110 cd8181            call space
118    8113             
119    8113 3a3982            ld   a,(rcc)
120    8116 3c                inc  a
121    8117 e61f              and  #1f
122    8119 323982            ld   (rcc),a
123    811c 01b028            ld   bc,#28b0
124    811f cdec85            call circle
125    8122 3a3a82            ld   a,(rkk)
126    8125 3c                inc  a
127    8126 e61f              and  #1f
128    8128 323a82            ld   (rkk),a
129    812b 01b098            ld   bc,#98b0
130    812e cde082            call koleso
131    8131             
132    8131 d1                pop  de
133    8132 c1                pop  bc
134    8133             
135    8133 78                ld   a,b
136    8134 d608              sub  #08
137    8136 fe10              cp   #10
138    8138 3002              jr   nc,ll1
139    813a 3eb0              ld   a,#b0
140    813c 47         ll1    ld   b,a
141    813d             
142    813d 7a                ld   a,d
143    813e d609              sub  #09
144    8140 fe10              cp   #10
145    8142 3002              jr   nc,ll2
146    8144 3eb0              ld   a,#b0
147    8146 57         ll2    ld   d,a
148    8147             
149    8147 fd25              dec  yh
150    8149 20c0              jr   nz,loop
151    814b             
152    814b            run2
153    814b fd2602            ld   yh,#02
154    814e fde5       loo    push iy
155    8150 0602              ld   b,2
156    8152 3e01       iil    ld   a,#01
157    8154 f5         ool    push af
158    8155 c5                push bc
159    8156 018060            ld   bc,#6080
160    8159 57                ld   d,a
161    815a 3e60              ld   a,#60
162    815c 92                sub  d
163    815d 5f                ld   e,a
164    815e cdc885     eliova call elipsa
165    8161 cd8181            call space
166    8164 c1                pop  bc
167    8165 f1                pop  af
168    8166 3c                inc  a
169    8167 fe5f              cp   #5f
170    8169 38e9              jr   c,ool
171    816b 10e5              djnz iil
172    816d 215f81            ld   hl,eliova+1
173    8170 7e                ld   a,(hl)
174    8171 ee72              xor  xeo
179    8178 77                ld   (hl),a
180    8179 fde1              pop  iy
181    817b fd25              dec  yh
182    817d 20cf              jr   nz,loo
183    817f 1809              jr   o
184    8181             
185    8181 3efe       space  ld   a,#fe
186    8183 dbfe              in   a,(#fe)
187    8185 1f                rra
188    8186 d8                ret  c
189    8187 c3b3f4            jp   #f4b3
190    818a             
191    818a 0610       o      ld   b,16                16 Test rychlosti
192    818c 3e01       ii     ld   a,#01
193    818e f5         oo     push af
194    818f c5                push bc
195    8190 018060            ld   bc,#6080
196    8193 cd4d82            call koso
197    8196 cd8181            call space
198    8199 c1                pop  bc
199    819a f1                pop  af
200    819b 3c                inc  a
201    819c fe5f              cp   #5f
202    819e 38ee              jr   c,oo
203    81a0 10ea              djnz ii
204    81a2 c9                ret
205    81a3             
206    81a3 cd7bd8     i      call #d87b
207    81a6 211a01            ld   hl,#011a
208    81a9 22e6fd            ld   (cursor),hl
209    81ac cdf5df            call #dff5
210    81af 2a2a2a20          db   '*** DEMO ***'
            44454d4f    
            202a2a2a    
211    81bb 00                nop
212    81bc dd2610            ld   xh,16
213    81bf 010000     hmm    ld   bc,#00
214    81c2 c5         lop    push bc
215    81c3 79                ld   a,c
216    81c4 2f                cpl
217    81c5 5f                ld   e,a
218    81c6 16af              ld   d,#af
219    81c8 0600              ld   b,#00
220    81ca cd1c85            call line
221    81cd cd8181            call space
222    81d0 c1                pop  bc
223    81d1 0c                inc  c
224    81d2 20ee              jr   nz,lop
225    81d4 c5         l1     push bc
226    81d5 3eaf              ld   a,#af
227    81d7 90                sub  b
228    81d8 50                ld   d,b
229    81d9 47                ld   b,a
230    81da 0e00              ld   c,#00
231    81dc 1eff              ld   e,#ff
232    81de cd1c85            call line
233    81e1 cd8181            call space
234    81e4 c1                pop  bc
235    81e5 04                inc  b
236    81e6 78                ld   a,b
237    81e7 feb0              cp   #b0
238    81e9 38e9              jr   c,l1
239    81eb dd25              dec  xh
240    81ed 20d0              jr   nz,hmm
241    81ef c9                ret
242    81f0             
243    81f0 3e03       rom    ld   a,#03
244    81f2 32915c            ld   (23697),a
245    81f5 3a8cd8            ld   a,(#d88c)
246    81f8 328f5c            ld   (23695),a
247    81fb d5                push de
248    81fc c5                push bc
249    81fd cde522            call #22e5
250    8200 c1                pop  bc
251    8201 d1                pop  de
252    8202 7a                ld   a,d
253    8203 90                sub  b
254    8204 47                ld   b,a
255    8205 1600              ld   d,#00
256    8207 2809              jr   z,rr1
257    8209 14                inc  d
258    820a 3006              jr   nc,rr1
259    820c 15                dec  d
260    820d 15                dec  d
261    820e 78                ld   a,b
262    820f ed44              neg
263    8211 47                ld   b,a
264    8212 7b         rr1    ld   a,e
265    8213 91                sub  c
266    8214 4f                ld   c,a
267    8215 1e00              ld   e,#00
268    8217 2809              jr   z,rr2
269    8219 1c                inc  e
270    821a 3006              jr   nc,rr2
271    821c 1d                dec  e
272    821d 1d                dec  e
273    821e 79                ld   a,c
274    821f ed44              neg
275    8221 4f                ld   c,a
276    8222 c3ba24     rr2    jp   #24ba
277    8225             
278    8225 3e00       u      ld   a,#00               Test utvarov
279    8227 3c                inc  a
280    8228 322682            ld   (u+1),a
281    822b f5                push af
282    822c cd7bd8            call #d87b
283    822f f1                pop  af
284    8230 018060            ld   bc,#6080
285    8233 f5                push af
286    8234 cd7182            call kosa
287    8237 f1                pop  af
288    8238 c9                ret
289    8239             
290    8239 00         rcc    db   #00
291    823a 00         rkk    db   #00
292    823b            ;____________________ Graficke _ rutiny ____
293    823b            z
294    823b             
295    823b cddd86     plot   call addbod              c=x Nakreslenie bodu
296    823e 07                rlca                     b=y
297    823f 07                rlca
298    8240 07                rlca
299    8241 2f                cpl
300    8242 f6c7              or   #c7
301    8244 324982            ld   (plo+1),a
302    8247 af                xor  a
303    8248 cbc7       plo    set  0,a
304    824a ae                xor  (hl)
305    824b 77                ld   (hl),a
306    824c c9                ret
307    824d             
308    824d b7         koso   or   a                   Plny kosostvorec
309    824e 28eb              jr   z,plot              stred:x=c,y=b
310    8250 5f                ld   e,a                 velkost:r=a
311    8251 51                ld   d,c
312    8252 78                ld   a,b
313    8253 93                sub  e
314    8254 47                ld   b,a
315    8255 c5         kos1   push bc
316    8256 d5                push de
317    8257 cd8284            call rovno
318    825a d1                pop  de
319    825b c1                pop  bc
320    825c 14                inc  d
321    825d 04                inc  b
322    825e 0d                dec  c
323    825f 1d                dec  e
324    8260 20f3              jr   nz,kos1
325    8262 c5         kos2   push bc
326    8263 d5                push de
327    8264 cd8284            call rovno
328    8267 d1                pop  de
329    8268 c1                pop  bc
330    8269 04                inc  b
331    826a 0c                inc  c
332    826b 15                dec  d
333    826c 7a                ld   a,d
334    826d b9                cp   c
335    826e 30f2              jr   nc,kos2
336    8270 c9                ret
337    8271             
338    8271 b7         kosa   or   a                   Prazdny kosostvorec
339    8272 28c7              jr   z,plot              stred:x=c,y=b
340    8274 5f                ld   e,a                 velkost:r=a
341    8275 78                ld   a,b
342    8276 93                sub  e
343    8277 47                ld   b,a
344    8278 cd3b82            call plot
345    827b 43                ld   b,e
346    827c 3a4982            ld   a,(plo+1)
347    827f 328482            ld   (kos3+1),a
348    8282 af                xor  a
349    8283 cbff       kos3   set  7,a
350    8285 4f                ld   c,a
351    8286 1607              ld   d,#07
352    8288 e5                push hl
353    8289 c5                push bc
354    828a d9                exx
355    828b c1                pop  bc
356    828c e1                pop  hl
357    828d 1607              ld   d,#07
358    828f cd9a82            call kos4+1
359    8292 cd9a82            call kos4+1
360    8295 79                ld   a,c
361    8296 ae                xor  (hl)
362    8297 77                ld   (hl),a
363    8298 c9                ret
364    8299             
365    8299 d9         kos4   exx
366    829a 24                inc  h
367    829b 7c                ld   a,h
368    829c a2                and  d
369    829d ccba86            call z,dolu
370    82a0 cb09              rrc  c
371    82a2 3001              jr   nc,#01
372    82a4 2c                inc  l
373    82a5 79                ld   a,c
374    82a6 ae                xor  (hl)
375    82a7 77                ld   (hl),a
376    82a8 d9                exx
377    82a9 24                inc  h
378    82aa 7c                ld   a,h
379    82ab a2                and  d
380    82ac ccba86            call z,dolu
381    82af cb01              rlc  c
382    82b1 3001              jr   nc,#01
383    82b3 2d                dec  l
384    82b4 79                ld   a,c
385    82b5 ae                xor  (hl)
386    82b6 77                ld   (hl),a
387    82b7 10e0              djnz kos4
388    82b9 c9                ret
389    82ba             
390    82ba 7b         oval   ld   a,e                 bc=suradnice y,x Plna elipsa
391    82bb ba                cp   d                   de=polomery  y,x
392    82bc 2822              jr   z,koleso
393    82be c5                push bc
394    82bf dd212100          ld   ix,#21
395    82c3 21                db   #21
396    82c4 70                ld   (hl),b
397    82c5 6a                ld   l,d
398    82c6 01                db   #01
399    82c7 71                ld   (hl),c
400    82c8 6b                ld   l,e
401    82c9             
402    82c9 380b              jr   c,kol11
403    82cb dd2ecd            ld   xl,#cd
404    82ce 21                db   #21
405    82cf 72                ld   (hl),d
406    82d0 68                ld   l,b
407    82d1 01                db   #01
408    82d2 73                ld   (hl),e
409    82d3 69                ld   l,c
410    82d4             
411    82d4 5a                ld   e,d
412    82d5 57                ld   d,a
413    82d6 e5         kol11  push hl                  d>e
414    82d7 6b                ld   l,e
415    82d8 5a                ld   e,d
416    82d9 cd0d87            call del
417    82dc 7a                ld   a,d
418    82dd e1                pop  hl
419    82de 180f              jr   kol12
420    82e0             
421    82e0 a7         koleso and  a                   y:b Plny kruh
422    82e1 ca3b82            jp   z,plot              x:c
423    82e4 c5                push bc                  r:a
424    82e5 dd21210a          ld   ix,#0a21
425    82e9             
426    82e9 21                db   #21
427    82ea 72                ld   (hl),d
428    82eb 6a                ld   l,d
429    82ec 01                db   #01
430    82ed 73                ld   (hl),e
431    82ee 6b                ld   l,e
432    82ef             
433    82ef 5f         kol12  ld   e,a
434    82f0 f5                push af
435    82f1 dd7c              ld   a,xh
436    82f3 322283            ld   (k132-1),a
437    82f6 dd7d              ld   a,xl
438    82f8 325d83            ld   (hv10),a
439    82fb 78                ld   a,b
440    82fc 322f83            ld   (is1),a
441    82ff 79                ld   a,c
442    8300 323a83            ld   (is3),a
443    8303 223483            ld   (is2),hl
444    8306 210062            ld   hl,room
445    8309 af                xor  a
446    830a 77         kol1   ld   (hl),a
447    830b 2c                inc  l
448    830c 77                ld   (hl),a
449    830d 2c                inc  l
450    830e 77                ld   (hl),a
451    830f 2c                inc  l
452    8310 77                ld   (hl),a
453    8311 2c                inc  l
454    8312             
455    8312 77                ld   (hl),a
456    8313 2c                inc  l
457    8314 77                ld   (hl),a
458    8315 2c                inc  l
459    8316 77                ld   (hl),a
460    8317 2c                inc  l
461    8318 77                ld   (hl),a
462    8319 2c                inc  l
463    831a 20ee              jr   nz,kol1
464    831c 57                ld   d,a                 hl=p
465    831d 62                ld   h,d                 e=dx
466    831e 6a                ld   l,d                 d=dy
467    831f             
468    831f e5         k130   push hl                  e klesa
469    8320 d5                push de                  d stupa
470    8321 1800              jr   #00
471    8323 7a         k132   ld   a,d                 !
472    8324 cdee86            call nas                 !
473    8327 47                ld   b,a                 !
474    8328 7b                ld   a,e                 !
475    8329 cdee86            call nas                 !
476    832c 4f                ld   c,a                 !
477    832d 2662              ld   h,>room             d=e de
478    832f 6b         is1    ld   l,e                 l,e l,c l,e
479    8330 7e                ld   a,(hl)
480    8331 ba                cp   d
481    8332 3001              jr   nc,#01
482    8334 72         is2    ld   (hl),d              m,d m,d m,b
483    8335 6a                ld   l,d                 l,d l,b l,d
484    8336 7e                ld   a,(hl)
485    8337 bb                cp   e
486    8338 3001              jr   nc,#01
487    833a 73         is3    ld   (hl),e              m,e m,e m,c
488    833b d1                pop  de
489    833c e1                pop  hl
490    833d 14                inc  d
491    833e 4a                ld   c,d
492    833f 0600              ld   b,#00
493    8341 09                add  hl,bc
494    8342             
495    8342 7c                ld   a,h
496    8343 87                add  a,a
497    8344 2011              jr   nz,k160
498    8346 e5                push hl
499    8347 29                add  hl,hl
500    8348 29                add  hl,hl
501    8349 af                xor  a
502    834a 47                ld   b,a
503    834b 4b                ld   c,e
504    834c ed42              sbc  hl,bc
505    834e e1                pop  hl
506    834f 3806              jr   c,k160
507    8351             
508    8351 0600              ld   b,#00
509    8353 4b                ld   c,e
510    8354 ed42              sbc  hl,bc
511    8356 1d                dec  e
512    8357 7b         k160   ld   a,e
513    8358 ba                cp   d
514    8359 30c4              jr   nc,k130
515    835b f1                pop  af
516    835c c1                pop  bc
517    835d cdee86     hv10   call nas
518    8360 2662              ld   h,>room
519    8362 6f                ld   l,a
520    8363 3c                inc  a
521    8364 327e83            ld   (bend+1),a
522    8367 78                ld   a,b
523    8368 95                sub  l
524    8369 47                ld   b,a
525    836a 3e                db   #3e
526    836b 2d                dec  l
527    836c 327483            ld   (dcnc),a
528    836f 16ff       kol4   ld   d,#ff               !
529    8371 5e                ld   e,(hl)              !
530    8372 04                inc  b                   !
531    8373 14                inc  d
532    8374 2d         dcnc   dec  l
533    8375 2005              jr   nz,bend-1
534    8377 3e                db   #3e
535    8378 2c                inc  l
536    8379 327483            ld   (dcnc),a
537    837c 7d                ld   a,l
538    837d fe55       bend   cp   #55
539    837f 300d              jr   nc,kkkva
540    8381 7b                ld   a,e
541    8382 be                cp   (hl)
542    8383 28ed              jr   z,kol4+3
543    8385 c5                push bc
544    8386 e5                push hl
545    8387 cd8e83            call kkkva
546    838a e1                pop  hl
547    838b c1                pop  bc
548    838c 18e1              jr   kol4
549    838e             
550    838e 78         kkkva  ld   a,b
551    838f 92                sub  d
552    8390 3d                dec  a
553    8391 47                ld   b,a
554    8392 82                add  a,d
555    8393 57                ld   d,a
556    8394 79                ld   a,c
557    8395 93                sub  e
558    8396 4f                ld   c,a
559    8397 83                add  a,e
560    8398 83                add  a,e
561    8399 5f                ld   e,a
562    839a 1836              jr   kvadro
563    839c             
564    839c 7a         box    ld   a,d                 c=x1 Prazdny obdlznik
565    839d b8                cp   b                   b=y1
566    839e 3002              jr   nc,box01            e=x2
567    83a0 50                ld   d,b                 d=y2
568    83a1 47                ld   b,a
569    83a2 282a       box01  jr   z,rvono
570    83a4 7b                ld   a,e
571    83a5 b9                cp   c
572    83a6 cae584            jp   z,zvislo
573    83a9 2002              jr   nz,#02
574    83ab 4b                ld   c,e                 |
575    83ac 5f                ld   e,a                 |
576    83ad c5                push bc
577    83ae d5                push de
578    83af 53                ld   d,e
579    83b0 cd8284            call rovno
580    83b3 d1                pop  de
581    83b4 c1                pop  bc
582    83b5 c5                push bc
583    83b6 d5                push de
584    83b7 42                ld   b,d
585    83b8 53                ld   d,e
586    83b9 cd8284            call rovno
587    83bc d1                pop  de
588    83bd c1                pop  bc
589    83be 04                inc  b
590    83bf 15                dec  d
591    83c0 7a                ld   a,d
592    83c1 b8                cp   b
593    83c2 d8                ret  c
594    83c3 c5                push bc
595    83c4 d5                push de
596    83c5 4b                ld   c,e
597    83c6 cde584            call zvislo
598    83c9 d1                pop  de
599    83ca c1                pop  bc
600    83cb c3e584            jp   zvislo
601    83ce             
602    83ce 53         rvono  ld   d,e
603    83cf c38284            jp   rovno
604    83d2             
605    83d2 7a         kvadro ld   a,d                 c=x1 Plny obdlznik
606    83d3 b8                cp   b                   b=y1
607    83d4 3002              jr   nc,#02              e=x2
608    83d6 50                ld   d,b                 d=y2
609    83d7 47                ld   b,a                 |
610    83d8 28f4              jr   z,rvono
611    83da 7b                ld   a,e
612    83db b9                cp   c
613    83dc cae584            jp   z,zvislo
614    83df 3002              jr   nc,#02              |
615    83e1 59                ld   e,c                 |
616    83e2 4f                ld   c,a                 |
617    83e3 7a                ld   a,d
618    83e4 90                sub  b
619    83e5 3c                inc  a
620    83e6 57                ld   d,a
621    83e7 79                ld   a,c
622    83e8 e6f8              and  #f8
623    83ea dd67              ld   xh,a
624    83ec 7b                ld   a,e
625    83ed e6f8              and  #f8
626    83ef ddbc              cp   xh
627    83f1 dd60              ld   xh,b
628    83f3 2020              jr   nz,r2kva
629    83f5 cddd86            call addbod
630    83f8 47                ld   b,a
631    83f9 3eff              ld   a,#ff
632    83fb 2804              jr   z,#04
633    83fd cb3f              srl  a                   |
634    83ff 10fc              djnz -#04                |
635    8401 4f                ld   c,a
636    8402 7b                ld   a,e
637    8403 e607              and  #07
638    8405 47                ld   b,a
639    8406 3e80              ld   a,#80
640    8408 2804              jr   z,#04
641    840a 37                scf                      |
642    840b 1f                rra                      |
643    840c 10fc              djnz -#04
644    840e a1                and  c
645    840f 5f                ld   e,a
646    8410 dd7c              ld   a,xh
647    8412 c30185            jp   zvis
648    8415             
649    8415 3d         r2kva  dec  a
650    8416 91                sub  c
651    8417 0f                rrca
652    8418 0f                rrca
653    8419 0f                rrca
654    841a e61f              and  #1f
655    841c 3c                inc  a
656    841d 324984            ld   (kvainc),a
657    8420 cddd86            call addbod
658    8423 47                ld   b,a
659    8424 3eff              ld   a,#ff
660    8426 2804              jr   z,#04
661    8428 cb3f              srl  a                   |
662    842a 10fc              djnz -#04                |
663    842c 324584            ld   (kvazac),a
664    842f 7b                ld   a,e
665    8430 e607              and  #07
666    8432 47                ld   b,a
667    8433 04                inc  b
668    8434 af                xor  a
669    8435 37                scf                      |
670    8436 1f                rra                      |
671    8437 10fc              djnz -#04
672    8439 325484            ld   (kvaend),a
673    843c dd7c              ld   a,xh
674    843e 2f                cpl
675    843f e607              and  #07
676    8441 3c                inc  a
677    8442 47                ld   b,a
678    8443             
679    8443 e5         kva11  push hl
680    8444 3e                db   #3e
681    8445 ff         kvazac db   #ff
682    8446 ae                xor  (hl)
683    8447 77                ld   (hl),a
684    8448 1e                db   #1e
685    8449 00         kvainc db   #00                 |
686    844a 2c                inc  l                   |
687    844b 1d                dec  e
688    844c 2805              jr   z,#05               |
689    844e 7e                ld   a,(hl)              |
690    844f 2f                cpl                      |
691    8450 77                ld   (hl),a              |
692    8451 18f7              jr   kvainc+1
693    8453 3e                db   #3e
694    8454 ff         kvaend db   #ff
695    8455 ae                xor  (hl)
696    8456 77                ld   (hl),a
697    8457 e1                pop  hl
698    8458 24                inc  h
699    8459 15                dec  d
700    845a c8                ret  z
701    845b 10e6              djnz kva11
702    845d 0608              ld   b,#08
703    845f 3e20              ld   a,#20
704    8461 85                add  a,l
705    8462 6f                ld   l,a
706    8463 38de              jr   c,kva11
707    8465 3ef8              ld   a,#f8
708    8467 84                add  a,h
709    8468 67                ld   h,a
710    8469 18d8              jr   kva11
711    846b             
712    846b c5         ccnn1  push bc                  dve ciary b=y x1=c-d x2=c-xl
713    846c d5                push de                            b=y x1=c+d x2=c+xl
714    846d 79                ld   a,c
715    846e 92                sub  d
716    846f 08                ex   af,af
717    8470 79                ld   a,c
718    8471 dd95              sub  xl
719    8473 57                ld   d,a
720    8474 08                ex   af,af
721    8475 4f                ld   c,a
722    8476 cd8284            call rovno
723    8479 d1                pop  de
724    847a c1                pop  bc
725    847b 79                ld   a,c
726    847c 82                add  a,d
727    847d 57                ld   d,a
728    847e 79                ld   a,c
729    847f dd85              add  a,xl
730    8481 4f                ld   c,a
731    8482             
732    8482 7a         rovno  ld   a,d                 y :b Vodorovna ciara
733    8483 b9                cp   c                   x1:c (x1 mensi x2)
734    8484 3002              jr   nc,#02              x2:d
735    8486 51                ld   d,c                 |
736    8487 4f                ld   c,a                 |
737    8488 79                ld   a,c
738    8489 e6f8              and  #f8
739    848b 5f                ld   e,a
740    848c 7a                ld   a,d
741    848d e6f8              and  #f8
742    848f bb                cp   e
743    8490 201d              jr   nz,r2byte
744    8492 cddd86            call addbod
745    8495 47                ld   b,a
746    8496 3eff              ld   a,#ff
747    8498 2804              jr   z,#04
748    849a cb3f              srl  a                   |
749    849c 10fc              djnz -#04                |
750    849e 4f                ld   c,a
751    849f 7a         rov99  ld   a,d
752    84a0 e607              and  #07
753    84a2 47                ld   b,a
754    84a3 3e80              ld   a,#80
755    84a5 2804              jr   z,#04
756    84a7 37                scf                      |
757    84a8 1f                rra                      |
758    84a9 10fc              djnz -#04
759    84ab a1                and  c
760    84ac ae                xor  (hl)
761    84ad 77                ld   (hl),a
762    84ae c9                ret
763    84af             
764    84af 93         r2byte sub  e
765    84b0 0f                rrca
766    84b1 0f                rrca
767    84b2 0f                rrca
768    84b3 5f                ld   e,a
769    84b4 cddd86            call addbod
770    84b7 47                ld   b,a
771    84b8 3eff              ld   a,#ff
772    84ba 2804              jr   z,#04
773    84bc cb3f              srl  a                   |
774    84be 10fc              djnz -#04                |
775    84c0 ae                xor  (hl)
776    84c1 77                ld   (hl),a
777    84c2 41                ld   b,c
778    84c3 0eff              ld   c,#ff
779    84c5 2c         rov40  inc  l
780    84c6 1d                dec  e
781    84c7 28d6              jr   z,rov99
782    84c9 7e                ld   a,(hl)
783    84ca 2f                cpl
784    84cb 77                ld   (hl),a
785    84cc 18f7              jr   rov40
786    84ce             
787    84ce c5         ccnn2  push bc                  dve ciary x=c y1=b-d y2=b-xl
788    84cf d5                push de                            x=c y1=b+d y2=b+xl
789    84d0 78                ld   a,b
790    84d1 92                sub  d
791    84d2 08                ex   af,af
792    84d3 78                ld   a,b
793    84d4 dd95              sub  xl
794    84d6 57                ld   d,a
795    84d7 08                ex   af,af
796    84d8 47                ld   b,a
797    84d9 cde584            call zvislo
798    84dc d1                pop  de
799    84dd c1                pop  bc
800    84de 78                ld   a,b
801    84df 82                add  a,d
802    84e0 57                ld   d,a
803    84e1 78                ld   a,b
804    84e2 dd85              add  a,xl
805    84e4 47                ld   b,a
806    84e5             
807    84e5 7a         zvislo ld   a,d                 x :c Zvisla ciara
808    84e6 b8                cp   b                   y1:b (y1>y2)
809    84e7 3002              jr   nc,#02              y2:d
810    84e9 50                ld   d,b                 |
811    84ea 47                ld   b,a                 |
812    84eb 7a                ld   a,d
813    84ec 90                sub  b
814    84ed d8                ret  c
815    84ee 3c                inc  a
816    84ef 57                ld   d,a
817    84f0 cddd86            call addbod
818    84f3 07                rlca
819    84f4 07                rlca
820    84f5 07                rlca
821    84f6 2f                cpl
822    84f7 f6c7              or   #c7
823    84f9 32fe84            ld   (zz+1),a
824    84fc af                xor  a
825    84fd cbc7       zz     set  0,a
826    84ff 5f                ld   e,a
827    8500 78                ld   a,b
828    8501 2f         zvis   cpl
829    8502 e607              and  #07
830    8504 3c                inc  a
831    8505 47                ld   b,a
832    8506             
833    8506 7e         zv1    ld   a,(hl)
834    8507 ab                xor  e
835    8508 77                ld   (hl),a
836    8509 24                inc  h
837    850a 15                dec  d
838    850b c8                ret  z
839    850c 10f8              djnz zv1
840    850e 0608              ld   b,#08
841    8510 3e20              ld   a,#20
842    8512 85                add  a,l
843    8513 6f                ld   l,a
844    8514 38f0              jr   c,zv1
845    8516 3ef8              ld   a,#f8
846    8518 84                add  a,h
847    8519 67                ld   h,a
848    851a 18ea              jr   zv1
849    851c             
850    851c 7a         line   ld   a,d                 c=x1 Vseobecna ciara
851    851d b8                cp   b                   b=y1
852    851e 3005              jr   nc,#05              e=x2
853    8520 50                ld   d,b                 d=y2
854    8521 47                ld   b,a                 |
855    8522 7b                ld   a,e                 Kresli sa vzdy
856    8523 59                ld   e,c                 smerom dole
857    8524 4f                ld   c,a                 |
858    8525 79                ld   a,c                 Urcenie
859    8526 bb                cp   e                   smeru
860    8527 9f                sbc  a,a                 v osi x
861    8528 e608              and  #08
862    852a 2e2d              ld   l,#2d
863    852c 2801              jr   z,#01
864    852e 2d                dec  l                   |
865    852f 3c                inc  a
866    8530 327385            ld   (rot1+1),a          a=rrc,rlc c
867    8533 32a485            ld   (rot2+1),a          l=inc,dec l
868    8536 7d                ld   a,l
869    8537 327985            ld   (deci1),a
870    853a 32ae85            ld   (deci2),a
871    853d             
872    853d cddd86            call addbod
873    8540 07                rlca
874    8541 07                rlca
875    8542 07                rlca
876    8543 2f                cpl
877    8544 f6c7              or   #c7
878    8546 325685            ld   (lnset+1),a
879    8549             
880    8549 7a                ld   a,d
881    854a 90                sub  b
882    854b 57                ld   d,a                 d=abs dy
883    854c 7b                ld   a,e
884    854d 91                sub  c
885    854e 5f                ld   e,a
886    854f 3003              jr   nc,#03
887    8551 ed44              neg                      |
888    8553 5f                ld   e,a                 e=abs dx
889    8554             
890    8554 af                xor  a
891    8555 cbc7       lnset  set  0,a
892    8557 4f                ld   c,a                 c=byte video
893    8558             
894    8558 7b                ld   a,e
895    8559 ba                cp   d
896    855a 3032              jr   nc,lnaaa
897    855c 42                ld   b,d                 Zvisle ciary
898    855d 04                inc  b                   b=dy+1
899    855e 7b                ld   a,e
900    855f 92                sub  d
901    8560 5f                ld   e,a                 e=dx-dy<0
902    8561 af                xor  a
903    8562 aa                xor  d
904    8563 1f                rra                      a=dy/2
905    8564             
906    8564 08         lnn1   ex   af,af
907    8565 79                ld   a,c
908    8566 ae                xor  (hl)
909    8567 77                ld   (hl),a
910    8568 24                inc  h
911    8569 7c                ld   a,h
912    856a e607              and  #07
913    856c 2813              jr   z,dolu1
914    856e 08         hore1  ex   af,af
915    856f 83                add  a,e
916    8570 300b              jr   nc,ln11
917    8572 cb09       rot1   rrc  c
918    8574 3803              jr   c,deci1
919    8576 10ec              djnz lnn1
920    8578 c9                ret
921    8579             
922    8579 2d         deci1  dec  l
923    857a 10e8              djnz lnn1
924    857c c9                ret
925    857d             
926    857d 82         ln11   add  a,d
927    857e 10e4              djnz lnn1
928    8580 c9                ret
929    8581             
930    8581 3e20       dolu1  ld   a,#20
931    8583 85                add  a,l
932    8584 6f                ld   l,a
933    8585 38e7              jr   c,hore1             c=1 tak nic
934    8587 3ef8              ld   a,#f8
935    8589 84                add  a,h
936    858a 67                ld   h,a
937    858b c36e85            jp   hore1
938    858e             
939    858e 43         lnaaa  ld   b,e                 Vodorovne ciary
940    858f 04                inc  b                   b=dx+1
941    8590 7b                ld   a,e
942    8591 92                sub  d                   e=dx
943    8592 57                ld   d,a                 d=dx-dy>=0
944    8593 af                xor  a
945    8594 ab                xor  e
946    8595 1f                rra                      a=dx/2
947    8596 08                ex   af,af
948    8597 1807              jr   hore2
949    8599             
950    8599 08         lnn2   ex   af,af
951    859a 24                inc  h
952    859b 7c                ld   a,h
953    859c e607              and  #07
954    859e 281b              jr   z,dole2
955    85a0 79         hore2  ld   a,c
956    85a1 ae                xor  (hl)
957    85a2 77                ld   (hl),a
958    85a3 cb09       rot2   rrc  c
959    85a5 3807              jr   c,deci2
960    85a7 08                ex   af,af
961    85a8 92                sub  d
962    85a9 380b              jr   c,ln22
963    85ab 10ec              djnz lnn2
964    85ad c9                ret
965    85ae             
966    85ae 2d         deci2  dec  l
967    85af 08                ex   af,af
968    85b0 92                sub  d
969    85b1 3803              jr   c,ln22
970    85b3 10e4              djnz lnn2
971    85b5 c9                ret
972    85b6             
973    85b6 83         ln22   add  a,e
974    85b7 08                ex   af,af
975    85b8 10e6              djnz hore2
976    85ba c9                ret
977    85bb             
978    85bb 3e20       dole2  ld   a,#20
979    85bd 85                add  a,l
980    85be 6f                ld   l,a
981    85bf 38df              jr   c,hore2
982    85c1 3ef8              ld   a,#f8
983    85c3 84                add  a,h
984    85c4 67                ld   h,a
985    85c5 c3a085            jp   hore2
986    85c8             
987    85c8 7b         elipsa ld   a,e                 bc=suradnice y,x Prazdna elipsa
988    85c9 ba                cp   d                   de=polomery  y,x
989    85ca 214687            ld   hl,dy12
990    85cd 281d              jr   z,circle
991    85cf 3805              jr   c,#05
992    85d1 214087            ld   hl,dx12             |
993    85d4 5a                ld   e,d                 |
994    85d5 57                ld   d,a                 |
995    85d6 227a86            ld   (hv6+1),hl          |
996    85d9 7d                ld   a,l
997    85da ee06              xor  e
1002   85e4 5a                ld   e,d
1003   85e5 cd0d87            call del
1004   85e8 3ecd              ld   a,#cd
1005   85ea 1803              jr   #03                 |
1006   85ec 57         circle ld   d,a                 x:c Prazdna kruznica
1007   85ed 3e21              ld   a,#21               y:b
1008   85ef 321286            ld   (hv5),a             r:a
1009   85f2 327986            ld   (hv6),a
1010   85f5 329d86            ld   (hv7),a
1011   85f8 7a                ld   a,d
1012   85f9 b7                or   a
1013   85fa ca3b82            jp   z,plot
1014   85fd 3c                inc  a
1015   85fe 60                ld   h,b
1016   85ff 69                ld   l,c
1017   8600 227786            ld   (xy14+1),hl
1018   8603 228586            ld   (xy15+1),hl
1019   8606 229b86            ld   (xy16+1),hl
1020   8609 22a986            ld   (xy17+1),hl
1021   860c dd6f              ld   xl,a
1022   860e 3d                dec  a
1023   860f 5f                ld   e,a
1024   8610 dde5              push ix
1025   8612 cd4687     hv5    call dy12
1026   8615 dde1              pop  ix
1027   8617 7a                ld   a,d
1028   8618 80                add  a,b
1029   8619 47                ld   b,a
1030   861a cd3b82            call plot
1031   861d 78                ld   a,b
1032   861e 92                sub  d
1033   861f 92                sub  d
1034   8620 47                ld   b,a
1035   8621 cd3b82            call plot
1036   8624 78                ld   a,b
1037   8625 82                add  a,d
1038   8626 47                ld   b,a
1039   8627 79                ld   a,c
1040   8628 83                add  a,e
1041   8629 4f                ld   c,a
1042   862a cd3b82            call plot
1043   862d 79                ld   a,c
1044   862e 93                sub  e
1045   862f 93                sub  e
1046   8630 4f                ld   c,a
1047   8631 cd3b82            call plot
1048   8634 1600              ld   d,#00
1049   8636 62                ld   h,d                 e=dx
1050   8637 6a                ld   l,d                 d=dy
1051   8638 dd5d              ld   e,xl                hl=p
1052   863a dd21ff00          ld   ix,#ff
1053   863e 14         e130   inc  d
1054   863f 4a                ld   c,d
1055   8640 0600              ld   b,#00
1056   8642 09                add  hl,bc
1057   8643             
1058   8643 7c                ld   a,h
1059   8644 87                add  a,a
1060   8645 20f7              jr   nz,e130
1061   8647 e5                push hl
1062   8648 29                add  hl,hl
1063   8649 29                add  hl,hl
1064   864a af                xor  a
1065   864b 47                ld   b,a
1066   864c 4b                ld   c,e
1067   864d ed42              sbc  hl,bc
1068   864f e1                pop  hl
1069   8650 38ec              jr   c,e130
1070   8652             
1071   8652 0600              ld   b,#00
1072   8654 4b                ld   c,e
1073   8655 ed42              sbc  hl,bc
1074   8657 1d                dec  e
1075   8658 e5                push hl
1076   8659 cd6586            call eelin
1077   865c e1                pop  hl
1078   865d dd6a              ld   xl,d                xl=dy z minula
1079   865f af                xor  a
1080   8660 ddac              xor  xh
1081   8662 28da              jr   z,e130
1082   8664 c9                ret
1083   8665             
1084   8665 dd2c       eelin  inc  xl
1085   8667 dd7d              ld   a,xl
1086   8669 bb                cp   e
1087   866a 2807              jr   z,#07
1088   866c 7b                ld   a,e                 |
1089   866d ba                cp   d                   |
1090   866e 3003              jr   nc,#03              |
1091   8670 dd62              ld   xh,d                |
1092   8672 c9                ret                      |
1093   8673 d5                push de
1094   8674 dde5              push ix
1095   8676 018060     xy14   ld   bc,#6080
1096   8679 cd4087     hv6    call dx12
1097   867c 78                ld   a,b
1098   867d 83                add  a,e
1099   867e 47                ld   b,a
1100   867f d5                push de
1101   8680 cd6b84            call ccnn1
1102   8683 d1                pop  de
1103   8684 018060     xy15   ld   bc,#6080
1104   8687 78                ld   a,b
1105   8688 93                sub  e
1106   8689 47                ld   b,a
1107   868a cd6b84            call ccnn1
1108   868d dde1              pop  ix                  d stupa, e klesa
1109   868f d1                pop  de                  d stupa, e klesa
1110   8690 7a                ld   a,d
1111   8691 bb                cp   e
1112   8692 2003              jr   nz,#03
1113   8694 ddbd              cp   xl                  |
1114   8696 c8                ret  z                   |
1115   8697 d5                push de
1116   8698 dde5              push ix
1117   869a 018060     xy16   ld   bc,#6080
1118   869d cd4687     hv7    call dy12
1119   86a0 79                ld   a,c
1120   86a1 83                add  a,e
1121   86a2 4f                ld   c,a
1122   86a3 d5                push de
1123   86a4 cdce84            call ccnn2
1124   86a7 d1                pop  de
1125   86a8 018060     xy17   ld   bc,#6080
1126   86ab 79                ld   a,c
1127   86ac 93                sub  e
1128   86ad 4f                ld   c,a
1129   86ae cdce84            call ccnn2
1130   86b1 dde1              pop  ix
1131   86b3 d1                pop  de
1132   86b4 c9                ret
1133   86b5             
1134   86b5 24         dole   inc  h
1135   86b6 7c                ld   a,h
1136   86b7 e607              and  #07
1137   86b9 c0                ret  nz
1138   86ba 3e20       dolu   ld   a,#20
1139   86bc 85                add  a,l
1140   86bd 6f                ld   l,a
1141   86be d8                ret  c
1142   86bf 3ef8              ld   a,#f8
1143   86c1 84                add  a,h
1144   86c2 67                ld   h,a
1145   86c3 c9                ret
1146   86c4             
1147   86c4 210040     mkadd  ld   hl,#4000
1148   86c7 dd210061          ld   ix,tabadd+#0100
1149   86cb dd7400     mka1   ld   (ix+#00),h
1150   86ce dd25              dec  xh
1151   86d0 dd7500            ld   (ix+#00),l
1152   86d3 cdb586            call dole
1153   86d6 dd24              inc  xh
1154   86d8 dd2c              inc  xl
1155   86da 20ef              jr   nz,mka1
1156   86dc c9                ret
1157   86dd             
1158   86dd 2660       addbod ld   h,>tabadd           Vypocet adresy
1159   86df 68                ld   l,b                 bodu zo suradnic
1160   86e0 79                ld   a,c
1161   86e1 0f                rrca
1162   86e2 0f                rrca
1163   86e3 0f                rrca
1164   86e4 e61f              and  #1f
1165   86e6 b6                or   (hl)
1166   86e7 24                inc  h
1167   86e8 66                ld   h,(hl)
1168   86e9 6f                ld   l,a
1169   86ea 79                ld   a,c
1170   86eb e607              and  #07
1171   86ed c9                ret
1172   86ee             
1173   86ee d5         nas    push de
1174   86ef e5                push hl
1175   86f0 1600              ld   d,#00
1176   86f2 5f                ld   e,a                 a=k*a,k<1
1177   86f3 62                ld   h,d
1178   86f4 6a                ld   l,d
1179   86f5 00000000   nn1    dw   0,0,0,0,0,0,0,0,0,0
            00000000    
            00000000    
            00000000    
            00000000    
1180   8709 7c         nn2    ld   a,h
1181   870a e1                pop  hl
1182   870b d1                pop  de
1183   870c c9                ret
1184   870d             
1185   870d c5         del    push bc
1186   870e d5                push de
1187   870f 0609              ld   b,#09               vysledok=l/e
1188   8711 af                xor  a                   l=max 2*e !!!
1189   8712 67                ld   h,a
1190   8713 57                ld   d,a
1191   8714 a7         dd1    and  a
1192   8715 ed52              sbc  hl,de
1193   8717 3f                ccf
1194   8718 3802              jr   c,#02
1195   871a 19                add  hl,de               |
1196   871b a7                and  a                   |
1197   871c 8f                adc  a,a                 |
1198   871d 29                add  hl,hl
1199   871e 10f4              djnz dd1
1200   8720 0608              ld   b,#08
1201   8722 21f586            ld   hl,nn1              hl=#29,de=#19
1202   8725 110000            ld   de,#00
1203   8728 3629       dd2    ld   (hl),#29
1204   872a 19                add  hl,de
1205   872b 87                add  a,a
1206   872c 3005              jr   nc,#05
1207   872e 3619              ld   (hl),#19
1208   8730 1e01              ld   e,#01
1209   8732 23                inc  hl
1210   8733 10f3              djnz dd2
1211   8735 36c3              ld   (hl),#c3
1212   8737 23                inc  hl
1213   8738 3609              ld   (hl),nn2
1216   873d d1                pop  de
1217   873e c1                pop  bc
1218   873f c9                ret
1219   8740            *a
1220   8740 7b         dx12   ld   a,e
1221   8741            ;e
1222   8741 cdee86            call nas
1223   8744 5f                ld   e,a
1224   8745 c9                ret
1225   8746            *a
1226   8746 dd7d       dy12   ld   a,xl
1227   8748            ;e
1228   8748 cdee86            call nas
1229   874b dd6f              ld   xl,a
1230   874d 7a                ld   a,d
1231   874e cdee86            call nas
1232   8751 57                ld   d,a
1233   8752 c9                ret
1234   8753             
1235   8753            xdxdy  =    dx12@dy12
1236   8753            xeo    =    elipsa@oval
1237   8753            k
1238   8753            l      =    k-z

 addbod 86dd  *  bend   837d  *  box    839c  *  box01  83a2  *
 ccnn1  846b  *  ccnn2  84ce  *  circle 85ec  *  cursor fde6  *
 dcnc   8374  *  dd1    8714  *  dd2    8728  *  deci1  8579  *
 deci2  85ae  *  del    870d  *  dole   86b5  *  dole2  85bb  *
 dolu   86ba  *  dolu1  8581  *  dx12   8740  *  dy12   8746  *
 e130   863e  *  eelin  8665  *  eliova 815e  *  elipsa 85c8  *
 hmm    81bf  *  hore1  856e  *  hore2  85a0  *  hv10   835d  *
 hv5    8612  *  hv6    8679  *  hv7    869d  *  i      81a3  *
 ii     818c  *  iil    8152  *  is1    832f  *  is2    8334  *
 is3    833a  *  k      8753  *  k130   831f  *  k132   8323  *
 k160   8357  *  kkkva  838e  *  kol1   830a  *  kol11  82d6  *
 kol12  82ef  *  kol4   836f  *  koleso 82e0  *  kos1   8255  *
 kos2   8262  *  kos3   8283  *  kos4   8299  *  kosa   8271  *
 koso   824d  *  kva11  8443  *  kvadro 83d2  *  kvaend 8454  *
 kvainc 8449  *  kvazac 8445  *  l      0518  *  l1     81d4  *
 line   851c  *  ll1    813c  *  ll2    8146  *  ln11   857d  *
 ln22   85b6  *  lnaaa  858e  *  lnn1   8564  *  lnn2   8599  *
 lnset  8555  *  loo    814e  *  loop   810b  *  lop    81c2  *
 mka1   86cb  *  mkadd  86c4  *  nas    86ee  *  nn1    86f5  *
 nn2    8709  *  o      818a  *  oo     818e  *  ool    8154  *
 ooo    8095  *  oval   82ba  *  p      8000  *  plo    8248  *
 plot   823b  *  r2byte 84af  *  r2kva  8415  *  rcc    8239  *
 rkk    823a  *  rom    81f0  *  room   6200  *  rot1   8572  *
 rot2   85a3  *  rov40  84c5  *  rov99  849f  *  rovno  8482  *
 rr1    8212  *  rr2    8222  *  run2   814b  *  rvono  83ce  *
 space  8181  *  tabadd 6000  *  u      8225  *  xdxdy  0006  *
 xeo    0772  *  xy14   8676  *  xy15   8684  *  xy16   869a  *
 xy17   86a8  *  z      823b  *  zv1    8506  *  zvis   8501  *
 zvislo 84e5  *  zz     84fd  *                                

Bytes:1875  labels:114  errors:0   





Popis
Obsahuje zdrojáky pro rychlé kreslení kružnic a čar.

Poznámky
Nic...

Poslal
Busy