Sapo rom - upravena romka

Zdrojový kód


3      4000            *s
4      4000            ;  1992 BETA BOOT LOADER 1.0
5      4000            ; ROM BASIC 1.2
6      4000             
7      4000            fdc    =    #0f
8      4000            fdt    =    #2f
9      4000            fds    =    #4f
10     4000            fdd    =    #6f
11     4000            fde    =    #13
12     4000             
13     4000            rest   =    #00
14     4000            seek   =    #10
15     4000            read   =    #88
16     4000            writ   =    #a8
17     4000            fint   =    #d0
18     4000             
19     4000                   org  #8000
20     8000             
21     8000 f3         p      di
22     8001 210000     r      ld   hl,0
23     8004 3e04              ld   a,#04
24     8006 d317              out  (#17),a
25     8008 7e                ld   a,(hl)
26     8009 08                ex   af,af
27     800a 3e0d              ld   a,#0d
28     800c d317              out  (#17),a
29     800e 08                ex   af,af
30     800f 77                ld   (hl),a
31     8010 23                inc  hl
32     8011 3e40              ld   a,#40
33     8013 bc                cp   h
34     8014 20ee              jr   nz,r+3
35     8016             
36     8016 af         i      xor  a                   zrusenie printer
37     8017 328e0b            ld   (#0b8e),a
38     801a 328f0b            ld   (#0b8f),a
39     801d 32900b            ld   (#0b90),a
40     8020 3e08              ld   a,#08
41     8022 325b05            ld   (#055b),a           cierny border pri load
42     8025 3e07              ld   a,#07
43     8027 326612            ld   (#1266),a
44     802a 3e01              ld   a,#01               rychlost beep a chytanie
45     802c 327212            ld   (#1272),a           uvodneho tonu
46     802f 327305            ld   (#0573),a
47     8032 3ecd              ld   a,#cd
48     8034 329612            ld   (#1296),a           call off
49     8037 21f538            ld   hl,off
50     803a 229712            ld   (#1297),hl
51     803d 3e2a              ld   a,'*'               namiesto '>' v listingu BASICu
52     803f 325d18            ld   (#185d),a
53     8042 3e03              ld   a,#03               GOTO bez parametra
54     8044 327d1a            ld   (#1a7d),a
55     8047 21671e            ld   hl,#1e67            GOTO bez parametra
56     804a 227e1a            ld   (#1a7e),hl
57     804d 21df38            ld   hl,noname           LOAD bez ""
58     8050 220f06            ld   (#060f),hl
59     8053 215200            ld   hl,#52              zrusenie COPY,LPRINT,LLIST
60     8056 22d71a            ld   (#1ad7),hl
61     8059 22da1a            ld   (#1ada),hl
62     805c 22dd1a            ld   (#1add),hl
63     805f             
64     805f 21ed53            ld   hl,#53ed            presun kurzora na chybu
65     8062 229c18            ld   (#189c),hl
66     8065 215b5c            ld   hl,#5c5b
67     8068 229e18            ld   (#189e),hl
68     806b af                xor  a
69     806c 32a018            ld   (#18a0),a
70     806f             
71     806f 3e19              ld   a,#19               oprava kurzora dolava
72     8071 32330a            ld   (#0a33),a
73     8074             
74     8074 21ac0e            ld   hl,prt
75     8077 222d20            ld   (#202d),hl
76     807a 21d90e            ld   hl,hexa             hexa zadavanie
77     807d 22f026            ld   (#26f0),hl
78     8080 3e14              ld   a,#14
79     8082 32bc12            ld   (#12bc),a
80     8085             
81     8085 21fc81            ld   hl,zz
82     8088 11cb11            ld   de,#11cb
83     808b 012400            ld   bc,36
84     808e edb0              ldir
85     8090 212082            ld   hl,zzz
86     8093 116e38            ld   de,z
87     8096 019204            ld   bc,l
88     8099 edb0              ldir
89     809b 214881            ld   hl,reset5
90     809e 11aa04            ld   de,#04aa
91     80a1 011800            ld   bc,24
92     80a4 edb0              ldir
93     80a6 216881            ld   hl,hlas
94     80a9 113915            ld   de,#1539
95     80ac 011c00            ld   bc,28
96     80af edb0              ldir
97     80b1 21f980            ld   hl,k1
98     80b4 11c312            ld   de,#12c3
99     80b7 011200            ld   bc,18
100    80ba edb0              ldir
101    80bc 210b81            ld   hl,k2
102    80bf 113621            ld   de,#2136
103    80c2 012800            ld   bc,40
104    80c5 edb0              ldir
105    80c7 213381            ld   hl,k3
106    80ca 11411b            ld   de,#1b41
107    80cd 010900            ld   bc,9
108    80d0 edb0              ldir
109    80d2 213c81            ld   hl,k4
110    80d5 118510            ld   de,#1085
111    80d8 010c00            ld   bc,12
112    80db edb0              ldir
113    80dd 218481            ld   hl,zzzz
114    80e0 11ac0e            ld   de,#0eac
115    80e3 017f00            ld   bc,127
116    80e6 edb0              ldir
117    80e8 216081            ld   hl,h0000
118    80eb 110000            ld   de,#00
119    80ee 010800            ld   bc,8
120    80f1 edb0              ldir
121    80f3 3e05              ld   a,#05
122    80f5 d317              out  (#17),a
123    80f7            ;      ei
124    80f7 00                nop
125    80f8 c9                ret
126    80f9             
127    80f9 21b412     k1     ld   hl,#12b4
128    80fc e5                push hl
129    80fd 2a3d5c            ld   hl,(#5c3d)
130    8100 e5                push hl
131    8101 cd7110            call #1071
132    8104 c35321            jp   #2153
133    8107 fd36010c          ld   (iy+#01),#0c
134    810b cd2c0f     k2     call #0f2c
135    810e fdcb01be          res  7,(iy+#01)
136    8112 2a3d5c            ld   hl,(#5c3d)
137    8115 e5                push hl
138    8116 214e21            ld   hl,#214e
139    8119 e5                push hl
140    811a ed733d5c          ld   (#5c3d),sp
141    811e cdb921            call #21b9
142    8121 1813              jr   #13
143    8123 213921            ld   hl,#2139
144    8126 e3                ex   (sp),hl
145    8127 e5                push hl
146    8128 37                scf
147    8129 cd9511            call #1195
148    812c eb                ex   de,hl
149    812d cda711            call #11a7
150    8130 c37f10            jp   #107f
151    8133 fece       k3     cp   #ce
152    8135 dacd1f            jp   c,#1fcd
153    8138 d6ce              sub  #ce
154    813a 4f                ld   c,a
155    813b e7                rst  #20
156    813c cd1d11     k4     call #111d
157    813f 21ff0a            ld   hl,#0aff
158    8142 112000            ld   de,#20
159    8145 fd7500            ld   (iy+#00),l
160    8148             
161    8148 01fd7f     reset5 ld   bc,#7ffd
162    814b 3d                dec  a
163    814c ed79              out  (c),a
164    814e 3c                inc  a
165    814f 2100c0            ld   hl,#c000
166    8152 1101c0            ld   de,#c001
167    8155 010040            ld   bc,#4000
168    8158 75                ld   (hl),l
169    8159 edb0              ldir
170    815b c3e711            jp   reset3
171    815e 00                nop
172    815f c9                ret
173    8160             
174    8160 f3         h0000  di
175    8161 3e0f              ld   a,#0f
176    8163 d313              out  (fde),a
177    8165 c36e38            jp   boot
178    8168             
179    8168 7f203139   hlas   db   ' 1992 SAPO ROM'
            39322053    
            41504f20    
            524f4d      
180    8177 20424153          db   ' BASIC v1.2 ',#a0
            49432076    
            312e3220    
            a0          
181    8184            *a
182    8184            zzzz
183    8184            ;e
184    8184                   org  #0eac
185    0eac            *c8184
186    0eac fe60       prt    cp   #60
187    0eae c2fb24            jp   nz,#24fb
188    0eb1 f1                pop  af
189    0eb2 cd811c            call #1c81
190    0eb5 cdc31f            call #1fc3
191    0eb8 cd991e            call #1e99
192    0ebb 3e26              ld   a,#26
193    0ebd d7                rst  #10
194    0ebe cdc20e            call prt1
195    0ec1 41                ld   b,c
196    0ec2 3ef0       prt1   ld   a,#f0
197    0ec4 a0                and  b
198    0ec5 1f                rra
199    0ec6 1f                rra
200    0ec7 1f                rra
201    0ec8 1f                rra
202    0ec9 cdcf0e            call prt2
203    0ecc 3e0f              ld   a,#0f
204    0ece a0                and  b
205    0ecf c630       prt2   add  a,#30
206    0ed1 fe3a              cp   #3a
207    0ed3 3802              jr   c,prt3
208    0ed5 c607              add  a,#07
209    0ed7 d7         prt3   rst  #10
210    0ed8 c9                ret
211    0ed9             
212    0ed9 fe72       hexa   cp   #72
213    0edb 200c              jr   nz,#0c
214    0edd e7                rst  #20
215    0ede febe              cp   #be
216    0ee0 c28a1c            jp   nz,#1c8a
217    0ee3 01ff10            ld   bc,#10ff
218    0ee6 c30d27            jp   #270d
219    0ee9 fe77              cp   #77
220    0eeb 20f3              jr   nz,#f3
221    0eed cd3025            call #2530
222    0ef0 c2b526            jp   nz,#26b5
223    0ef3 110000            ld   de,#00
224    0ef6 0604              ld   b,#04
225    0ef8 e7                rst  #20
226    0ef9 d630              sub  #30
227    0efb 381f              jr   c,#1f
228    0efd fe0a              cp   #0a
229    0eff 380e              jr   c,#0e
230    0f01 d607              sub  #07
231    0f03 cbaf              res  5,a
232    0f05 fe10              cp   #10
233    0f07 3013              jr   nc,#13
234    0f09 fe0a              cp   #0a
235    0f0b 380f              jr   c,#0f
236    0f0d cbae              res  5,(hl)
237    0f0f eb                ex   de,hl
238    0f10 29                add  hl,hl
239    0f11 29                add  hl,hl
240    0f12 29                add  hl,hl
241    0f13 29                add  hl,hl
242    0f14 5f                ld   e,a
243    0f15 1600              ld   d,#00
244    0f17 19                add  hl,de
245    0f18 eb                ex   de,hl
246    0f19 10dd              djnz #dd
247    0f1b e7                rst  #20
248    0f1c 42                ld   b,d
249    0f1d 4b                ld   c,e
250    0f1e cd2b2d            call #2d2b
251    0f21 c39526            jp   #2695
252    0f24             
253    0f24            zz     =    zzzz+120
254    0f24                   org  #11cb
255    11cb            *c81fc
256    11cb             
257    11cb 47         reset  ld   b,a
258    11cc af                xor  a
259    11cd d3fc              out  (#fc),a
260    11cf 3e3f              ld   a,#3f
261    11d1 ed47              ld   i,a
262    11d3 00                nop
263    11d4 00                nop
264    11d5 62                ld   h,d
265    11d6 6b                ld   l,e
266    11d7 3600       reset1 ld   (hl),#00
267    11d9 2b                dec  hl
268    11da bc                cp   h
269    11db 20fa              jr   nz,reset1
270    11dd 13                inc  de
271    11de cb78              bit  7,b
272    11e0 200b              jr   nz,reset4
273    11e2 3e08              ld   a,#08
274    11e4 c3aa04     reset2 jp   #04aa               reset5
275    11e7 3d         reset3 dec  a
276    11e8 20fa              jr   nz,reset2
277    11ea 110000            ld   de,#00
278    11ed 62         reset4 ld   h,d
279    11ee 6b                ld   l,e
280    11ef             
281    11ef                   org  #386e
282    386e            zzz    =    zz+36
283    386e            *c8220
284    386e            z
285    386e 31005c     boot   ld   sp,#5c00
286    3871 af                xor  a
287    3872 d3fe              out  (#fe),a
288    3874 cd0039            call screen
289    3877 0100b0            ld   bc,#b000
290    387a cd541f     boot0  call #1f54
291    387d 3807              jr   c,boot1
292    387f af                xor  a
293    3880 11ff7f            ld   de,#7fff
294    3883 c3cb11            jp   #11cb
295    3886 0b         boot1  dec  bc
296    3887 78                ld   a,b
297    3888 b1                or   c
298    3889 20ef              jr   nz,boot0
299    388b 3ed0              ld   a,fint
300    388d cdd338            call busy
301    3890 db0f              in   a,(fdc)
302    3892 e604              and  #04
303    3894 3e50              ld   a,#50               step-out
304    3896 2002              jr   nz,boot2
305    3898 3e70              ld   a,#70               step-in
306    389a cdd338     boot2  call busy
307    389d db0f              in   a,(fdc)
308    389f 17                rla
309    38a0 18d5              jr   boot0-3
310    38a2 af                xor  a
311    38a3            ;      out  (#fe),a
312    38a3 d36f              out  (fdd),a
313    38a5 d32f              out  (fdt),a
314    38a7 d30f              out  (fdc),a
315    38a9 21ff5a            ld   hl,#5aff
316    38ac 77         boot4  ld   (hl),a
317    38ad 2b                dec  hl
318    38ae cb74              bit  6,h
319    38b0 20fa              jr   nz,boot4
320    38b2 3c                inc  a                   1.sector
321    38b3 d34f              out  (fds),a
322    38b5 cdd538            call busy+2
323    38b8 210080            ld   hl,#8000            start adress
324    38bb 010002            ld   bc,#0200            lenght
325    38be 3e88              ld   a,read              read sector
326    38c0 d30f              out  (fdc),a
327    38c2 db0f       boot3  in   a,(fdc)             read cw
328    38c4 1f                rra
329    38c5 1f                rra                      ? drq
330    38c6 30fa              jr   nc,boot3            no --> go to boot1
331    38c8 db6f              in   a,(fdd)             yes -> read data register
332    38ca 77                ld   (hl),a              save in ram
333    38cb eda1              cpi                      inc hl ;dec bc
334    38cd eac238            jp   pe,boot3            bc=0; no -> goto boot1
335    38d0 c30080            jp   #8000               call boot sector
336    38d3             
337    38d3 d30f       busy   out  (fdc),a
338    38d5 0608              ld   b,#08
339    38d7 10fe              djnz #fe
340    38d9 db0f       busy1  in   a,(fdc)
341    38db 1f                rra
342    38dc 38fb              jr   c,busy1
343    38de c9                ret
344    38df             
345    38df df         noname rst  #18
346    38e0 21f038            ld   hl,mozno
347    38e3 010500            ld   bc,#05
348    38e6 edb1              cpir
349    38e8 c28c1c            jp   nz,#1c8c
350    38eb 0e00              ld   c,#00
351    38ed c3a92a            jp   #2aa9
352    38f0 0d3aaaaf   mozno  db   #0d,':',#aa,#af,#e4
            e4          
353    38f5             
354    38f5 3ed0       off    ld   a,fint              flopy disk interupt
355    38f7 d30f              out  (fdc),a
356    38f9 af                xor  a                   motor off
357    38fa d313              out  (fde),a
358    38fc 113815            ld   de,#1538
359    38ff c9                ret
360    3900             
361    3900 015600cd   screen dw   #5601,#cd00
362    3904 52003b3b          dw   #52,#3b3b
363    3908 e1091100          dw   #09e1,#11
364    390c 404e237e          dw   #4e40,#7e23
365    3910 b9060120          dw   #06b9,#2001
366    3914 04234623          dw   #2304,#2346
367    3918 7e120814          dw   #127e,#1408
368    391c 7ae60720          dw   #e67a,#2007
369    3920 1a7ad608          dw   #7a1a,#08d6
370    3924 577bc620          dw   #7b57,#20c6
371    3928 5f30107a          dw   #305f,#7a10
372    392c c60857fe          dw   #08c6,#fe57
373    3930 5820081c          dw   #2058,#1c08
374    3934 7bfe2016          dw   #fe7b,#1620
375    3938 40280508          dw   #2840,#0805
376    393c 10db18ce          dw   #db10,#ce18
377    3940 11005823          dw   #11,#2358
378    3944 4e237eb9          dw   #234e,#b97e
379    3948 28081213          dw   #0828,#1312
380    394c 7afe5b20          dw   #fe7a,#205b
381    3950 f4c92346          dw   #c9f4,#4623
382    3954 237e1213          dw   #7e23,#1312
383    3958 10fc18f0          dw   #fc10,#f018
384    395c fefe0000          dw   #fefe,#00
385    3960 fef10001          dw   #f1fe,#0100
386    3964 03fe0301          dw   #fe03,#0103
387    3968 03fe0300          dw   #fe03,#03
388    396c fe0401fe          dw   #04fe,#fe01
389    3970 03000304          dw   #03,#0403
390    3974 04070404          dw   #0704,#0404
391    3978 fe990001          dw   #99fe,#0100
392    397c 03070f1f          dw   #0703,#1f0f
393    3980 3f7ffffe          dw   #7f3f,#feff
394    3984 0a00fe03          dw   #0a,#03fe
395    3988 01199800          dw   #1901,#98
396    398c 009c2220          dw   #9c00,#2022
397    3990 20229c00          dw   #2220,#9c
398    3994 0021fe04          dw   #2100,#04fe
399    3998 a1bdfe91          dw   #bda1,#91fe
400    399c 00010307          dw   #0100,#0703
401    39a0 0f1f3f7f          dw   #1f0f,#7f3f
402    39a4 ff010307          dw   #01ff,#0703
403    39a8 0f1f3f7f          dw   #1f0f,#7f3f
404    39ac fffe0900          dw   #feff,#09
405    39b0 c02060a0          dw   #20c0,#a060
406    39b4 20c00000          dw   #c020,#00
407    39b8 80fe0440          dw   #fe80,#4004
408    39bc 80fe0700          dw   #fe80,#07
409    39c0 e0fe8900          dw   #fee0,#89
410    39c4 0103070f          dw   #0301,#0f07
411    39c8 1f3f7fff          dw   #3f1f,#ff7f
412    39cc 0103070f          dw   #0301,#0f07
413    39d0 1f3f7fff          dw   #3f1f,#ff7f
414    39d4 0103070f          dw   #0301,#0f07
415    39d8 1f3f7fff          dw   #3f1f,#ff7f
416    39dc fe090073          dw   #09fe,#7300
417    39e0 4a734a4a          dw   #734a,#4a4a
418    39e4 73000011          dw   #73,#1100
419    39e8 32121110          dw   #1232,#1011
420    39ec 39000071          dw   #39,#7100
421    39f0 48487048          dw   #4848,#4870
422    39f4 49fe8100          dw   #fe49,#81
423    39f8 0103070f          dw   #0301,#0f07
424    39fc 1f3f7fff          dw   #3f1f,#ff7f
425    3a00 0103070f          dw   #0301,#0f07
426    3a04 1f3f7fff          dw   #3f1f,#ff7f
427    3a08 0103070f          dw   #0301,#0f07
428    3a0c 1f3f7fff          dw   #3f1f,#ff7f
429    3a10 0103070f          dw   #0301,#0f07
430    3a14 1f3f7fff          dw   #3f1f,#ff7f
431    3a18 fe0900ce          dw   #09fe,#ce00
432    3a1c 04840404          dw   #8404,#0404
433    3a20 c400008c          dw   #c4,#8c00
434    3a24 5252ce42          dw   #5252,#42ce
435    3a28 8c0000cc          dw   #8c,#cc00
436    3a2c 92909692          dw   #9092,#9296
437    3a30 cefe7900          dw   #fece,#79
438    3a34 0103070f          dw   #0301,#0f07
439    3a38 1f3f7fff          dw   #3f1f,#ff7f
440    3a3c 0103070f          dw   #0301,#0f07
441    3a40 1f3f7fff          dw   #3f1f,#ff7f
442    3a44 0103070f          dw   #0301,#0f07
443    3a48 1f3f7fff          dw   #3f1f,#ff7f
444    3a4c 0103070f          dw   #0301,#0f07
445    3a50 1f3f7fff          dw   #3f1f,#ff7f
446    3a54 0103070f          dw   #0301,#0f07
447    3a58 1f3f7fff          dw   #3f1f,#ff7f
448    3a5c fe090060          dw   #09fe,#6000
449    3a60 9090f090          dw   #9090,#90f0
450    3a64 90000060          dw   #90,#6000
451    3a68 90106080          dw   #1090,#8060
452    3a6c f0000093          dw   #f0,#9300
453    3a70 91f1fe03          dw   #f191,#03fe
454    3a74 91fe7900          dw   #fe91,#79
455    3a78 0103070f          dw   #0301,#0f07
456    3a7c 1f3f7fff          dw   #3f1f,#ff7f
457    3a80 0103070f          dw   #0301,#0f07
458    3a84 1f3f7fff          dw   #3f1f,#ff7f
459    3a88 0103070f          dw   #0301,#0f07
460    3a8c 1f3f7fff          dw   #3f1f,#ff7f
461    3a90 0103070f          dw   #0301,#0f07
462    3a94 1f3f7fff          dw   #3f1f,#ff7f
463    3a98 fe110038          dw   #11fe,#3800
464    3a9c 25392525          dw   #3925,#2525
465    3aa0 38000018          dw   #38,#1800
466    3aa4 21190525          dw   #1921,#2505
467    3aa8 19000098          dw   #19,#9800
468    3aac 20180424          dw   #1820,#2404
469    3ab0 18fe7900          dw   #fe18,#79
470    3ab4 0103070f          dw   #0301,#0f07
471    3ab8 1f3f7fff          dw   #3f1f,#ff7f
472    3abc 0103070f          dw   #0301,#0f07
473    3ac0 1f3f7fff          dw   #3f1f,#ff7f
474    3ac4 0103070f          dw   #0301,#0f07
475    3ac8 1f3f7fff          dw   #3f1f,#ff7f
476    3acc fe1900c6          dw   #19fe,#c600
477    3ad0 fe0429c6          dw   #04fe,#c629
478    3ad4 0000ce29          dw   #00,#29ce
479    3ad8 29ee2828          dw   #ee29,#2828
480    3adc 00000e09          dw   #00,#090e
481    3ae0 090e0909          dw   #0e09,#0909
482    3ae4 fe790001          dw   #79fe,#0100
483    3ae8 03070f1f          dw   #0703,#1f0f
484    3aec 3f7fff01          dw   #7f3f,#01ff
485    3af0 03070f1f          dw   #0703,#1f0f
486    3af4 3f7ffffe          dw   #7f3f,#feff
487    3af8 210038fe          dw   #21,#fe38
488    3afc 05100000          dw   #1005,#00
489    3b00 314a4948          dw   #4a31,#4849
490    3b04 4a310000          dw   #314a,#00
491    3b08 79427140          dw   #4279,#4071
492    3b0c 4279fe79          dw   #7942,#79fe
493    3b10 00010307          dw   #0100,#0703
494    3b14 0f1f3f7f          dw   #1f0f,#7f3f
495    3b18 fffe2900          dw   #feff,#29
496    3b1c fe05101e          dw   #05fe,#1e10
497    3b20 00008c12          dw   #00,#128c
498    3b24 9252528c          dw   #5292,#8c52
499    3b28 00009e10          dw   #00,#109e
500    3b2c 9c50509e          dw   #509c,#9e50
501    3b30 feaa0063          dw   #aafe,#6300
502    3b34 94949794          dw   #9494,#9497
503    3b38 640000f3          dw   #64,#f300
504    3b3c 81e1fe03          dw   #e181,#03fe
505    3b40 810000e4          dw   #81,#e400
506    3b44 9494e493          dw   #9494,#93e4
507    3b48 93feaa00          dw   #fe93,#aa
508    3b4c 39fe04a5          dw   #fe39,#a504
509    3b50 b9000081          dw   #b9,#8100
510    3b54 fe050100          dw   #05fe,#01
511    3b58 00bda1b9          dw   #bd00,#b9a1
512    3b5c a1213dfe          dw   #21a1,#fe3d
513    3b60 aa00ee09          dw   #aa,#09ee
514    3b64 c90e09e9          dw   #0ec9,#e909
515    3b68 000007fe          dw   #00,#fe07
516    3b6c 0402e200          dw   #0204,#e2
517    3b70 00c0fe04          dw   #c000,#04fe
518    3b74 20c0feb2          dw   #c020,#b2fe
519    3b78 0070fe03          dw   #7000,#03fe
520    3b7c 484971fe          dw   #4948,#fe71
521    3b80 be008080          dw   #be,#8080
522    3b84 fe0000fe          dw   #fe,#fe00
523    3b88 0000febf          dw   #00,#bffe
524    3b8c 00ff8040          dw   #ff00,#4080
525    3b90 40fe0541          dw   #fe40,#4105
526    3b94 fe0940bf          dw   #09fe,#bf40
527    3b98 80fffeab          dw   #ff80,#abfe
528    3b9c 00fffe03          dw   #ff00,#03fe
529    3ba0 00fe05ff          dw   #fe00,#ff05
530    3ba4 fe0300fe          dw   #03fe,#fe00
531    3ba8 031ffe03          dw   #1f03,#03fe
532    3bac 00ff00ff          dw   #ff00,#ff00
533    3bb0 fe2000fe          dw   #20fe,#fe00
534    3bb4 1d03fe6e          dw   #031d,#6efe
535    3bb8 00fffe03          dw   #ff00,#03fe
536    3bbc 00fe05ff          dw   #fe00,#ff05
537    3bc0 fe0900ff          dw   #09fe,#ff00
538    3bc4 00fffe05          dw   #ff00,#05fe
539    3bc8 00fe1203          dw   #fe00,#0312
540    3bcc fe0900fe          dw   #09fe,#fe00
541    3bd0 05fffe86          dw   #ff05,#86fe
542    3bd4 00fffe03          dw   #ff00,#03fe
543    3bd8 00fe05ff          dw   #fe00,#ff05
544    3bdc fe0900ff          dw   #09fe,#ff00
545    3be0 00fffe15          dw   #ff00,#15fe
546    3be4 00fffffe          dw   #ff00,#feff
547    3be8 0900fe05          dw   #09,#05fe
548    3bec fffe8600          dw   #feff,#86
549    3bf0 fffe0300          dw   #feff,#03
550    3bf4 fe05fffe          dw   #05fe,#feff
551    3bf8 0900ff00          dw   #09,#ff
552    3bfc fffe1500          dw   #feff,#15
553    3c00 fffffe09          dw   #ffff,#09fe
554    3c04 00fe05ff          dw   #fe00,#ff05
555    3c08 fe8600ff          dw   #86fe,#ff00
556    3c0c fe0300fe          dw   #03fe,#fe00
557    3c10 05fffe09          dw   #ff05,#09fe
558    3c14 00ff00ff          dw   #ff00,#ff00
559    3c18 fe0700fe          dw   #07fe,#fe00
560    3c1c 0e3fffff          dw   #3f0e,#ffff
561    3c20 fe0900fe          dw   #09fe,#fe00
562    3c24 05fffe86          dw   #ff05,#86fe
563    3c28 00fffe03          dw   #ff00,#03fe
564    3c2c 00fe05ff          dw   #fe00,#ff05
565    3c30 0000fe05          dw   #00,#05fe
566    3c34 010000ff          dw   #01,#ff00
567    3c38 00fffe05          dw   #ff00,#05fe
568    3c3c 00fe1003          dw   #fe00,#0310
569    3c40 fcfcfe09          dw   #fcfc,#09fe
570    3c44 00fe05ff          dw   #fe00,#ff05
571    3c48 fe8600ff          dw   #86fe,#ff00
572    3c4c fe0300fe          dw   #03fe,#fe00
573    3c50 05ff0000          dw   #ff05,#00
574    3c54 fffe0300          dw   #feff,#03
575    3c58 ff0000ff          dw   #ff,#ff00
576    3c5c 00fffe05          dw   #ff00,#05fe
577    3c60 001f0f07          dw   #1f00,#070f
578    3c64 0301fe16          dw   #0103,#16fe
579    3c68 00fe1dc0          dw   #fe00,#c01d
580    3c6c fe6e00ff          dw   #6efe,#ff00
581    3c70 010202fe          dw   #0201,#fe02
582    3c74 05820202          dw   #8205,#0202
583    3c78 fe058202          dw   #05fe,#0282
584    3c7c 02fd01ff          dw   #fd02,#ff01
585    3c80 fe0000fe          dw   #fe,#fe00
586    3c84 0000fead          dw   #00,#adfe
587    3c88 00ffff00          dw   #ff00,#ff
588    3c8c 07ff0707          dw   #ff07,#0707
589    3c90 02163425          dw   #1602,#2534
590    3c94 28ff0807          dw   #ff28,#0708
591    3c98 ff0938ff          dw   #09ff,#ff38
592    3c9c 09070216          dw   #0709,#1602
593    3ca0 342528ff          dw   #2534,#ff28
594    3ca4 0907383c          dw   #0709,#3c38
595    3ca8 ff0738ff          dw   #07ff,#ff38
596    3cac 08070216          dw   #0708,#1602
597    3cb0 342528ff          dw   #2534,#ff28
598    3cb4 1a070216          dw   #071a,#1602
599    3cb8 342528ff          dw   #2534,#ff28
600    3cbc 0c070f0d          dw   #070c,#0d0f
601    3cc0 ff042908          dw   #04ff,#0829
602    3cc4 ff070702          dw   #07ff,#0207
603    3cc8 16342528          dw   #3416,#2825
604    3ccc ff0d070f          dw   #0dff,#0f07
605    3cd0 0dff0429          dw   #ff0d,#2904
606    3cd4 0fff1907          dw   #ff0f,#0719
607    3cd8 0fff050d          dw   #ff0f,#0d05
608    3cdc 0fff1907          dw   #ff0f,#0719
609    3ce0 ff070fff          dw   #07ff,#ff0f
610    3ce4 19070fff          dw   #0719,#ff0f
611    3ce8 05390fff          dw   #3905,#ff0f
612    3cec 19070fff          dw   #0719,#ff0f
613    3cf0 05390fff          dw   #3905,#ff0f
614    3cf4 19070fff          dw   #0719,#ff0f
615    3cf8 05390fff          dw   #3905,#ff0f
616    3cfc c4070000          dw   #07c4,#00
617    3d00            k
618    3d00            l      =    k-z
619    3d00            zzzzzz =    #3d00-k
620    3d00            *a
621    3d00                   end

 boot   386e  *  boot0  387a  *  boot1  3886  *  boot2  389a  *
 boot3  38c2  *  boot4  38ac  *  busy   38d3  *  busy1  38d9  *
 fdc    000f  *  fdd    006f  *  fde    0013  *  fds    004f  *
 fdt    002f  *  fint   00d0  *  h0000  8160  *  hexa   0ed9  *
 hlas   8168  *  i      8016  *  k      3d00  *  k1     80f9  *
 k2     810b  *  k3     8133  *  k4     813c  *  l      0492  *
 mozno  38f0  *  noname 38df  *  off    38f5  *  p      8000  *
 prt    0eac  *  prt1   0ec2  *  prt2   0ecf  *  prt3   0ed7  *
 r      8001  *  read   0088  *  reset  11cb  *  reset1 11d7  *
 reset2 11e4  *  reset3 11e7  *  reset4 11ed  *  reset5 8148  *
 rest   0000  *  screen 3900  *  seek   0010  *  writ   00a8  *
 z      386e  *  zz     81fc  *  zzz    8220  *  zzzz   8184  *
 zzzzzz 0000  *                                                

Bytes:1714  labels:49  errors:0   


Popis
Upravena spektracka romka. Vznikla v roku 1992 a vychadza ciastocne z niektorej starsej BS ROM (pravdepodobne 88 alebo 101), je doplnena o nahratie boot sektora z diskety.

Poznámky

Poslal
Sapo soft