5844 lines
154 KiB
Text
5844 lines
154 KiB
Text
;
|
|
; DZ80 V3.4.1 8080 Disassembly of archive/VT100.bin
|
|
; 2016/08/03 14:55
|
|
;
|
|
; Comments beginning with ";;" borrowed from Adam Mayer's (https://github.com/phooky)
|
|
; work at https://github.com/phooky/VT100-Hax/blob/master/ROMs/haxrom.d80 and http://vt100romhax.tumblr.com
|
|
;
|
|
; All other comments/annotations by Jeff Parsons (@jeffpar) <Jeff@pcjs.org>
|
|
;
|
|
|
|
;
|
|
; Data area definitions
|
|
;
|
|
20 4E stack_top equ 204eh
|
|
20 4E scratch_start equ 204eh
|
|
|
|
;
|
|
; The "Keys Flag Byte/Buffer" at 0x2068 contains the following bits:
|
|
;
|
|
; 0-1 Key counter
|
|
; 2 Key counter overflow bit
|
|
; 3 Setup
|
|
; 4 Control
|
|
; 5 Shift
|
|
; 6 Caps Lock
|
|
; 7 Last Key
|
|
;
|
|
20 68 key_flags equ 2068h ; "Keys Flag Buffer"
|
|
20 6A key_buffer equ 206ah ; start of the "three place New Key Address Buffer"
|
|
|
|
20 F6 cursor_address equ 20f6h
|
|
21 2D cursor_countdn equ 212dh
|
|
21 BA cursor_visible equ 21bah
|
|
|
|
;
|
|
; Reset vector
|
|
;
|
|
00 00 org 0
|
|
39 0000 F3 di
|
|
40 0001 31 4E 20 lxi sp,stack_top ; SP = 0x204e
|
|
41 0004 C3 3B 00 jmp reset
|
|
;
|
|
; Interrupt vector 0x1 for Keyboard
|
|
;
|
|
00 08 org 8
|
|
46 0008 CD FD 00 call X00fd
|
|
47 000B FB ei
|
|
48 000C C9 ret
|
|
;
|
|
; Interrupt vector 0x2 for PUSART
|
|
;
|
|
00 10 org 10h
|
|
53 0010 CD CC 03 call X03cc
|
|
54 0013 FB ei
|
|
55 0014 C9 ret
|
|
;
|
|
; Interrupt vector 0x3 for Keyboard and PUSART
|
|
;
|
|
00 18 org 18h
|
|
60 0018 CD CC 03 call X03cc
|
|
61 001B CD FD 00 call X00fd
|
|
62 001E FB ei
|
|
63 001F C9 ret
|
|
;
|
|
; Interrupt vector 0x4 for Video (vertical retrace)
|
|
;
|
|
00 20 org 20h
|
|
68 0020 CD CF 04 call X04cf
|
|
69 0023 C9 ret
|
|
;
|
|
; Interrupt vector 0x5 for Keyboard and Video
|
|
;
|
|
00 28 org 28h
|
|
74 0028 CD CF 04 call X04cf
|
|
75 002B C9 ret
|
|
;
|
|
; Interrupt vector 0x6 for PUSART and Video
|
|
;
|
|
00 30 org 30h
|
|
80 0030 CD CC 03 X0030: call X03cc
|
|
81 0033 CD CF 04 call X04cf
|
|
82 0036 FB ei
|
|
83 0037 C9 ret
|
|
;
|
|
; Interrupt vector 0x7 for Keyboard and PUSART and Video
|
|
;
|
|
00 38 org 38h
|
|
88 0038 C3 30 00 jmp X0030
|
|
|
|
;
|
|
; Beginning of power-up (reset) code at 0x003b
|
|
;
|
|
93 003B 1E 01 reset: mvi e,1
|
|
94 003D F3 X003d: di
|
|
95 003E 3E 0F mvi a,0fh
|
|
96 0040 D3 62 out 62h ;; 0x0f to NVR latch
|
|
97 0042 2F cma ;; invert A (0xf0)
|
|
98 0043 D3 42 out 42h ;; 0xf0 to brightness
|
|
;;
|
|
;; Run checksum on each 2K ROM, indicating with
|
|
;; the keyboard LEDs which is being scanned.
|
|
;; The # of the chip being scanned is stored in B.
|
|
;;
|
|
104 0045 AF xra a ;; zero A
|
|
105 0046 57 mov d,a ;; zero D, L, H
|
|
106 0047 6F mov l,a
|
|
107 0048 67 mov h,a
|
|
108 0049 3C X0049: inr a ;; next 2K ROM
|
|
109 004A 47 mov b,a ;; store the current ROM # in B
|
|
110 004B D3 82 out 82h ;; show current ROM on LEDs
|
|
111 004D 0E 08 mvi c,8 ;; Checksum over 8 256B blocks
|
|
112 004F 07 X004f: rlc ;; Rotate A left
|
|
113 0050 AE xra m ;; A <- A ^ memory
|
|
114 0051 2C inr l ;; next memory address
|
|
115 0052 C2 4F 00 jnz X004f ;; ... repeat until end of block
|
|
116 0055 24 inr h ;; next block
|
|
117 0056 0D dcr c ;; decrement block count
|
|
118 0057 C2 4F 00 jnz X004f ;; ... repeat until end of chip
|
|
119 005A B7 ora a ;; Check the value of the accumulator
|
|
120 005B C2 5B 00 X005b: jnz X005b ;; If it's not zero, hang forever
|
|
121 005E 78 mov a,b ;; Put the ROM # back in the accumulator
|
|
122 005F FE 04 cpi 4 ;; If it's not 4...
|
|
123 0061 C2 49 00 jnz X0049 ;; repeat for the next ROM
|
|
|
|
125 0064 3C inr a
|
|
126 0065 D3 82 out 82h ;; write 5 to LEDs (turns on L2 and L4)
|
|
|
|
128 0067 0E AA mvi c,0aah ;; Test pattern: 0xaa
|
|
129 0069 06 2C mvi b,2ch ;; 0x2c is the top of RAM on the basic board
|
|
130 006B DB 42 in 42h ;;
|
|
131 006D E6 02 ani 2 ;; flags buffer &= 0x02 : is AVO installed?
|
|
132 006F C2 74 00 jnz X0074 ;; if bit 2 is not set, AVO is installed
|
|
133 0072 06 40 mvi b,40h ;; 0x40 is the top of RAM on the AVO
|
|
134 0074 60 X0074: mov h,b ;; load HL with top of RAM
|
|
135 0075 2B dcx h ;; dec HL
|
|
136 0076 36 00 X0076: mvi m,0 ;; M <- 0
|
|
137 0078 2B dcx h ;; dec HL
|
|
138 0079 7C mov a,h ;; a <- h
|
|
139 007A FE 1F cpi 1fh ;; compare to 1f (top of ROM)
|
|
140 007C C2 76 00 jnz X0076 ;; continue to zero if not at ROM
|
|
|
|
142 007F 23 inx h
|
|
;;
|
|
;; Zero all RAM. C gets the high byte of the address of the top of
|
|
;; RAM, HL is loaded with it, and it zeros memory all the way down,
|
|
;; leaving the start of RAM in HL
|
|
;;
|
|
;; From start of RAM, test that it's all zero
|
|
;;
|
|
150 0080 7E X0080: mov a,m ;; read a byte of memory
|
|
151 0081 B7 ora a
|
|
152 0082 CA 90 00 jz X0090 ;; if it's zero, skip ahead
|
|
153 0085 E6 0F ani 0fh
|
|
154 0087 7C mov a,h
|
|
155 0088 C2 A1 00 jnz X00a1 ;; err
|
|
156 008B FE 30 cpi 30h
|
|
157 008D DA A1 00 jc X00a1 ;; err
|
|
158 0090 71 X0090: mov m,c ;; run test pattern through ram
|
|
159 0091 7E mov a,m
|
|
160 0092 A9 xra c
|
|
161 0093 CA A8 00 jz X00a8 ;; jump to 00a8 if ok
|
|
162 0096 E6 0F ani 0fh
|
|
163 0098 7C mov a,h
|
|
164 0099 C2 A1 00 jnz X00a1 ;; err
|
|
165 009C FE 30 cpi 30h
|
|
166 009E D2 A8 00 jnc X00a8 ;; ok
|
|
167 00A1 16 01 X00a1: mvi d,1
|
|
168 00A3 FE 2C cpi 2ch
|
|
169 00A5 DA A5 00 X00a5: jc X00a5 ;; Hang if non-AVO memory
|
|
170 00A8 AF X00a8: xra a
|
|
171 00A9 23 inx h
|
|
172 00AA B5 ora l
|
|
173 00AB C2 80 00 jnz X0080
|
|
174 00AE B4 ora h
|
|
175 00AF B8 cmp b
|
|
176 00B0 C2 80 00 jnz X0080
|
|
177 00B3 79 mov a,c ;; Repeat mem test with pattern 0x55
|
|
178 00B4 07 rlc
|
|
179 00B5 4F mov c,a
|
|
180 00B6 DA 74 00 jc X0074
|
|
;;
|
|
;; Memory test is done
|
|
;;
|
|
184 00B9 D5 push d
|
|
185 00BA CD A4 02 call X02a4 ;; zero scratch and screen mem
|
|
186 00BD CD EB 02 call X02eb ;; Set a number of scratch values to fixed values
|
|
187 00C0 CD 5B 17 call X175b ;; .... more memory initialization
|
|
188 00C3 D1 pop d
|
|
189 00C4 CA CB 00 X00c4: jz X00cb
|
|
190 00C7 7A mov a,d
|
|
191 00C8 F6 02 ori 2
|
|
192 00CA 57 mov d,a
|
|
193 00CB 3E 2F X00cb: mvi a,2fh
|
|
194 00CD 32 C9 21 sta X21c9
|
|
195 00D0 D3 62 out 62h
|
|
;
|
|
; Prepare to enter the "beep" loop
|
|
;
|
|
199 00D2 01 FF 0F X00d2: lxi b,X0fff
|
|
200 00D5 FB ei
|
|
201 00D6 3E 08 X00d6: mvi a,8
|
|
202 00D8 A3 ana e
|
|
203 00D9 3E 7F mvi a,7fh
|
|
204 00DB C2 E0 00 jnz X00e0
|
|
205 00DE 3E FF mvi a,0ffh
|
|
206 00E0 D3 82 X00e0: out 82h
|
|
207 00E2 0B dcx b
|
|
208 00E3 78 mov a,b
|
|
209 00E4 B1 ora c
|
|
210 00E5 C2 D6 00 jnz X00d6
|
|
;
|
|
; Done "beeping" now
|
|
;
|
|
214 00E8 D3 82 X00e8: out 82h ; A = 0, so all LEDs off now
|
|
215 00EA 3A 68 20 lda key_flags
|
|
216 00ED B7 ora a
|
|
217 00EE FA F5 00 jm X00f5
|
|
218 00F1 7A mov a,d
|
|
219 00F2 F6 04 ori 4
|
|
220 00F4 57 mov d,a
|
|
221 00F5 D5 X00f5: push d
|
|
|
|
;
|
|
; The next call issues the following:
|
|
;
|
|
; 03A2 CD8103 CALL 0381 ;stack=204A
|
|
; 0B67 CDAD10 CALL 10AD ;stack=2048
|
|
; chipset.outPort(0x00A2,DC012,0x00) at 10BD
|
|
; chipset.outPort(0x00A2,DC012,0x04) at 10C1
|
|
;
|
|
; and then:
|
|
;
|
|
; 03A2 CD8103 CALL 0381 ;stack=204A
|
|
; 0B67 CDAD10 CALL 10AD ;stack=2048
|
|
; 10C9 CDAA0F CALL 0FAA ;stack=2046
|
|
; 0FB6 CC8814 CALLZ 1488 ;stack=2040
|
|
; 1488 CD9314 CALL 1493 ;stack=203E
|
|
; chipset.inPort(0x0042,FLAGS.BUFFER): 0x60 at 1493
|
|
;
|
|
; Note that once we're inside 0FAA, that appears to be where we stay.
|
|
;
|
|
242 00F6 CD A2 03 call X03a2
|
|
|
|
244 00F9 D1 pop d
|
|
245 00FA C3 75 08 jmp X0875
|
|
;
|
|
; Keyboard interrupt handler
|
|
;
|
|
249 00FD F5 X00fd: push psw
|
|
250 00FE DB 82 in 82h ;; Read from keyboard port
|
|
251 0100 E5 push h
|
|
252 0101 C5 push b
|
|
253 0102 47 mov b,a ;; copy b <- a
|
|
254 0103 D6 7C sui 7ch ;; subtract 0x7c from a
|
|
255 0105 FA 1A 01 jm X011a ;; jump to 011a if a is a normal key
|
|
256 0108 67 mov h,a ;; otherwise h <- a
|
|
257 0109 24 inr h ;; h++
|
|
258 010A 3E 10 mvi a,10h ;; a <- 0x10
|
|
259 010C 0F rrc
|
|
260 010D 07 X010d: rlc
|
|
261 010E 25 dcr h
|
|
262 010F C2 0D 01 jnz X010d
|
|
263 0112 21 68 20 lxi h,key_flags ;; load keys flag addresss
|
|
264 0115 B6 ora m ;; or in control bit
|
|
265 0116 77 mov m,a ;; store again
|
|
266 0117 C3 2D 01 jmp X012d ;; jump to end to interrupt
|
|
|
|
268 011A 21 68 20 X011a: lxi h,key_flags ;; load keys flag address
|
|
269 011D 3E 07 mvi a,7
|
|
270 011F A6 ana m ;; load key counter
|
|
271 0120 FE 04 cpi 4 ;; if overflow.. (>3 keys)
|
|
272 0122 F2 2D 01 jp X012d ;; discard keypress and end interrupt
|
|
273 0125 34 inr m ;; otherwise increment key counter
|
|
274 0126 21 6A 20 lxi h,key_buffer ;; load key address buffer
|
|
275 0129 CD DE 13 call X13de ;; add key counter to address buffer
|
|
276 012C 70 mov m,b ;; save key to address buffer
|
|
277 012D C1 X012d: pop b
|
|
278 012E E1 pop h
|
|
279 012F F1 pop psw
|
|
280 0130 C9 ret
|
|
;;
|
|
;; End of keyboard interrupt handler
|
|
;;
|
|
284 0131 E6 7F X0131: ani 7fh
|
|
285 0133 4F mov c,a
|
|
286 0134 3A 7B 20 lda X207b
|
|
287 0137 B7 ora a
|
|
288 0138 C2 FF 01 jnz X01ff
|
|
289 013B 79 X013b: mov a,c
|
|
290 013C FE 01 cpi 1
|
|
291 013E CA C3 01 jz X01c3
|
|
292 0141 3A A7 21 lda X21a7
|
|
293 0144 E6 20 ani 20h
|
|
294 0146 C2 75 01 jnz X0175
|
|
295 0149 3A 78 21 lda X2178
|
|
296 014C B7 ora a
|
|
297 014D C2 5F 01 jnz X015f
|
|
298 0150 79 mov a,c
|
|
299 0151 FE 41 cpi 41h
|
|
300 0153 FA 5B 01 jm X015b
|
|
301 0156 3E 1B mvi a,1bh
|
|
302 0158 CD 18 0F call X0f18
|
|
303 015B 79 X015b: mov a,c
|
|
304 015C C3 0D 08 jmp X080d
|
|
|
|
306 015F 3E 1B X015f: mvi a,1bh
|
|
307 0161 CD 18 0F call X0f18
|
|
308 0164 79 mov a,c
|
|
309 0165 FE 41 cpi 41h
|
|
310 0167 F2 5B 01 jp X015b
|
|
311 016A 3E 3F mvi a,3fh
|
|
312 016C CD 18 0F X016c: call X0f18
|
|
313 016F 79 mov a,c
|
|
314 0170 C6 40 adi 40h
|
|
315 0172 C3 0D 08 jmp X080d
|
|
|
|
317 0175 3A 78 21 X0175: lda X2178
|
|
318 0178 B7 ora a
|
|
319 0179 C2 9E 01 jnz X019e
|
|
320 017C 79 mov a,c
|
|
321 017D FE 41 cpi 41h
|
|
322 017F FA 5B 01 jm X015b
|
|
323 0182 FE 50 cpi 50h
|
|
324 0184 FA 9E 01 jm X019e
|
|
325 0187 3E 1B X0187: mvi a,1bh
|
|
326 0189 CD 18 0F call X0f18
|
|
327 018C 3E 4F mvi a,4fh
|
|
328 018E CD 18 0F X018e: call X0f18
|
|
329 0191 C3 5B 01 jmp X015b
|
|
|
|
331 0194 3E 1B X0194: mvi a,1bh
|
|
332 0196 CD 18 0F call X0f18
|
|
333 0199 3E 5B mvi a,5bh
|
|
334 019B C3 8E 01 jmp X018e
|
|
|
|
336 019E 3A BC 21 X019e: lda X21bc
|
|
337 01A1 B7 ora a
|
|
338 01A2 CA B5 01 jz X01b5
|
|
339 01A5 79 mov a,c
|
|
340 01A6 FE 41 cpi 41h
|
|
341 01A8 F2 87 01 jp X0187
|
|
342 01AB 3E 1B X01ab: mvi a,1bh
|
|
343 01AD CD 18 0F call X0f18
|
|
344 01B0 3E 4F mvi a,4fh
|
|
345 01B2 C3 6C 01 jmp X016c
|
|
|
|
347 01B5 79 X01b5: mov a,c
|
|
348 01B6 FE 41 cpi 41h
|
|
349 01B8 FA AB 01 jm X01ab
|
|
350 01BB FE 50 cpi 50h
|
|
351 01BD FA 94 01 jm X0194
|
|
352 01C0 C3 87 01 jmp X0187
|
|
|
|
354 01C3 21 15 08 X01c3: lxi h,X0815
|
|
355 01C6 E5 push h
|
|
356 01C7 3A A5 21 lda X21a5
|
|
357 01CA B7 ora a
|
|
358 01CB C0 rnz
|
|
359 01CC CD 53 08 call X0853
|
|
360 01CF 01 0E 02 lxi b,X020e
|
|
361 01D2 21 68 20 lxi h,key_flags
|
|
362 01D5 7E mov a,m
|
|
363 01D6 E6 10 ani 10h
|
|
364 01D8 C2 00 09 jnz X0900
|
|
365 01DB 7E mov a,m
|
|
366 01DC E6 20 ani 20h
|
|
367 01DE CA E4 01 jz X01e4
|
|
368 01E1 01 D2 00 lxi b,X00d2
|
|
369 01E4 3E 25 X01e4: mvi a,25h
|
|
370 01E6 F6 08 ori 8
|
|
371 01E8 B0 ora b
|
|
372 01E9 D3 01 out 1
|
|
373 01EB 3A 7F 20 lda X207f
|
|
374 01EE 81 add c
|
|
375 01EF 4F mov c,a
|
|
376 01F0 C5 X01f0: push b
|
|
377 01F1 CD 93 14 call X1493
|
|
378 01F4 C1 pop b
|
|
379 01F5 3A 7F 20 lda X207f
|
|
380 01F8 B9 cmp c
|
|
381 01F9 C2 F0 01 jnz X01f0
|
|
382 01FC C3 94 03 jmp X0394
|
|
|
|
384 01FF 21 12 08 X01ff: lxi h,X0812
|
|
385 0202 E5 push h
|
|
386 0203 AF xra a
|
|
387 0204 32 30 21 sta X2130
|
|
388 0207 32 B8 21 sta X21b8
|
|
389 020A 21 A3 21 lxi h,X21a3
|
|
390 020D 79 mov a,c
|
|
391 020E D6 41 X020e: sui 41h
|
|
392 0210 47 mov b,a
|
|
393 0211 7E X0211: mov a,m
|
|
394 0212 CA 22 02 jz X0222
|
|
395 0215 05 dcr b
|
|
396 0216 CA 26 02 jz X0226
|
|
397 0219 05 dcr b
|
|
398 021A CA 15 18 jz X1815
|
|
399 021D 05 dcr b
|
|
400 021E CA 1E 18 jz X181e
|
|
401 0221 C9 ret
|
|
|
|
403 0222 3D X0222: dcr a
|
|
404 0223 F8 rm
|
|
405 0224 77 mov m,a
|
|
406 0225 C9 ret
|
|
|
|
408 0226 3C X0226: inr a
|
|
409 0227 FE 20 cpi 20h
|
|
410 0229 C8 rz
|
|
411 022A 77 mov m,a
|
|
412 022B C9 ret
|
|
|
|
414 022C 3A A7 21 X022c: lda X21a7
|
|
415 022F 2F cma
|
|
416 0230 E6 10 ani 10h
|
|
417 0232 21 A5 21 lxi h,X21a5
|
|
418 0235 B6 ora m
|
|
419 0236 C2 41 08 jnz X0841
|
|
420 0239 3A BF 21 lda X21bf
|
|
421 023C 01 11 02 lxi b,X0211
|
|
422 023F A0 ana b
|
|
423 0240 C2 45 02 jnz X0245
|
|
424 0243 0E 13 mvi c,13h
|
|
425 0245 79 X0245: mov a,c
|
|
426 0246 D6 11 sui 11h
|
|
427 0248 32 C4 21 sta X21c4
|
|
428 024B CD 7E 0F call X0f7e
|
|
429 024E C3 12 08 jmp X0812
|
|
|
|
431 0251 F3 X0251: di
|
|
432 0252 31 4E 20 lxi sp,stack_top ; SP = 0x204e
|
|
433 0255 21 00 20 lxi h,2000h
|
|
434 0258 E5 push h
|
|
435 0259 7E mov a,m
|
|
436 025A 1F rar
|
|
437 025B DA 65 02 jc X0265
|
|
438 025E DB 42 in 42h
|
|
439 0260 E6 02 ani 2
|
|
440 0262 CA 69 02 jz X0269
|
|
441 0265 3C X0265: inr a
|
|
442 0266 32 C8 21 sta X21c8
|
|
443 0269 CD A2 03 X0269: call X03a2
|
|
444 026C 3A 50 20 lda X2050
|
|
445 026F 3D dcr a
|
|
446 0270 32 53 21 sta X2153
|
|
447 0273 E1 pop h
|
|
448 0274 7E mov a,m
|
|
449 0275 36 7F mvi m,7fh
|
|
450 0277 B7 ora a
|
|
451 0278 CA 98 02 jz X0298
|
|
452 027B F2 85 02 jp X0285
|
|
453 027E 21 CB 21 lxi h,X21cb
|
|
454 0281 36 0A mvi m,0ah
|
|
455 0283 E6 7F ani 7fh
|
|
456 0285 32 BD 21 X0285: sta X21bd
|
|
457 0288 C6 30 adi 30h
|
|
458 028A 2A F6 20 lhld cursor_address
|
|
459 028D 77 mov m,a
|
|
460 028E FE 34 cpi 34h
|
|
461 0290 CA 98 02 jz X0298
|
|
462 0293 3E 20 mvi a,20h
|
|
463 0295 32 A5 21 sta X21a5
|
|
464 0298 CD F2 0B X0298: call X0bf2
|
|
465 029B 01 11 00 lxi b,X0011
|
|
466 029E CD 7E 0F call X0f7e
|
|
467 02A1 C3 AE 03 jmp X03ae
|
|
;;
|
|
;; Zero all scratch and screen RAM above stack
|
|
;;
|
|
471 02A4 21 4E 20 X02a4: lxi h,scratch_start ;; HL = 0x204e (just above stack)
|
|
472 02A7 11 B2 0F lxi d,0fb2h ;; DE = 0x0fb2 (every byte from 0x204e up to 0x3000)
|
|
473 02AA 06 00 mvi b,0 ;; B = 0
|
|
474 02AC CD 83 10 call memset ;; memset(0x1083): set 0x0fb2 bytes to 0 starting at 0x204e
|
|
475 02AF 2F cma ;; invert A
|
|
476 02B0 32 04 21 sta X2104 ;; store A in 0x2104
|
|
477 02B3 21 04 20 lxi h,X2004 ;; HL <- 0x2004
|
|
478 02B6 22 52 20 shld X2052 ;; *(0x2052) = 0x2004
|
|
479 02B9 21 D0 22 lxi h,X22d0 ;; HL <- 0x22d0
|
|
480 02BC 22 F6 20 shld cursor_address ;; *(20f6) = 0x22d0
|
|
481 02BF C9 ret
|
|
;;
|
|
;; Initialize start of screen RAM and wipe attribute RAM to 0xff
|
|
;;
|
|
485 02C0 CD 15 0A X02c0: call X0a15 ;; 0x2140 = 0xe605
|
|
486 02C3 21 00 20 lxi h,2000h ;; HL = 0x2000
|
|
487 02C6 11 D9 02 lxi d,X02d9 ;; DE = 0x02d9
|
|
488 02C9 06 12 mvi b,12h ;; B = 18
|
|
489 02CB CD 8B 03 call memmove ;; copy 18 bytes from 0x02d9 to 0x2000
|
|
490 02CE 21 00 30 lxi h,3000h ;; HL = 0x3000
|
|
491 02D1 11 00 10 lxi d,1000h ;; DE = 0x1000
|
|
492 02D4 06 FF mvi b,0ffh ;; B = 0xFF
|
|
493 02D6 C3 83 10 jmp memset ;; invoke memset(0x1083) to set all of attribute RAM to 0xFF and return
|
|
;;
|
|
;; 0x02d9 through 0x02eb are the initial values for the screen RAM;
|
|
;; it's copied into low RAM at 0x2000 during init.
|
|
;;
|
|
X02d9:
|
|
499 02D9 db 07fh,070h,003h
|
|
7F 70 03
|
|
500 02DC db 07fh,0f2h,0d0h
|
|
7F F2 D0
|
|
501 02DF db 07fh,070h,006h
|
|
7F 70 06
|
|
502 02E2 db 07fh,070h,00ch
|
|
7F 70 0C
|
|
503 02E5 db 07fh,070h,00fh
|
|
7F 70 0F
|
|
504 02E8 db 07fh,070h,003h
|
|
7F 70 03
|
|
;;
|
|
;; Initialize several scratch values. We don't know what all of these are for yet.
|
|
;;
|
|
508 02EB 21 12 02 X02eb: lxi h,212h ;; HL = 0x0212 (530.)
|
|
509 02EE 22 2D 21 shld cursor_countdn ;; Store 0x0212 at cursor_countdn [0x212d]
|
|
510 02F1 3E 35 mvi a,35h ;; A = 0x35
|
|
511 02F3 32 2C 21 sta X212c ;; 0x212c = 0x35
|
|
512 02F6 3E 01 mvi a,1 ;; A = 1
|
|
513 02F8 32 5B 20 sta X205b ;; 0x205b = 1
|
|
514 02FB 32 76 21 sta X2176 ;; 0x2176 = 1
|
|
515 02FE 21 FF 07 lxi h,X07ff ;; HL = 0x07ff
|
|
516 0301 22 49 21 shld X2149 ;; store 0xff07 at 0x2149
|
|
517 0304 3E 02 mvi a,2 ;; A = 2
|
|
518 0306 32 73 20 sta X2073 ;; 0x2073 = 2
|
|
519 0309 3E F7 mvi a,0f7h ;; A = 0xf7
|
|
520 030B 32 FA 20 sta X20fa ;; 0x20fa = 0xf7
|
|
521 030E DB 42 in 42h ;; read flags buffer
|
|
522 0310 E6 04 ani 4 ;; And it with 0x04 (check graphics flag)
|
|
523 0312 3E 01 mvi a,1 ;; A=1
|
|
524 0314 C2 1A 03 jnz X031a ;; if no graphics skip
|
|
525 0317 32 79 20 sta X2079 ;; else store 1 in 0x2079
|
|
526 031A 3E FF X031a: mvi a,0ffh ;; A = 0xff
|
|
527 031C 32 0E 21 sta X210e ;; 0x210e = 0xff
|
|
528 031F 32 BA 21 sta cursor_visible ;; set cursor_visible [0x21ba] to 0xff (initially visible)
|
|
529 0322 26 80 mvi h,80h ;; H = 0x80
|
|
530 0324 6C mov l,h ;; L = 0x80
|
|
531 0325 22 C0 20 shld X20c0 ;; Store 0x8080 at 0x20c0
|
|
532 0328 C9 ret
|
|
|
|
534 0329 3E 40 X0329: mvi a,40h
|
|
535 032B D3 01 out 1
|
|
536 032D 3A 58 21 lda X2158
|
|
537 0330 D3 02 out 2
|
|
538 0332 3A A4 21 lda X21a4
|
|
539 0335 D3 01 out 1
|
|
540 0337 CD 94 03 call X0394
|
|
541 033A 3E 10 mvi a,10h
|
|
542 033C 32 C9 21 sta X21c9
|
|
543 033F D3 62 out 62h
|
|
544 0341 C9 ret
|
|
|
|
546 0342 3A A2 21 X0342: lda X21a2
|
|
547 0345 B7 ora a
|
|
548 0346 CA 4B 03 jz X034b
|
|
549 0349 3E 10 mvi a,10h
|
|
550 034B 47 X034b: mov b,a
|
|
551 034C D3 C2 out 0c2h
|
|
552 034E 3A 7C 20 lda X207c
|
|
553 0351 D3 C2 out 0c2h
|
|
554 0353 FE 20 cpi 20h
|
|
555 0355 21 70 09 lxi h,X0970
|
|
556 0358 C2 5E 03 jnz X035e
|
|
557 035B 21 70 03 lxi h,X0370
|
|
558 035E 22 01 20 X035e: shld X2001
|
|
559 0361 3A A8 21 lda X21a8
|
|
560 0364 E6 10 ani 10h
|
|
561 0366 C8 rz
|
|
562 0367 78 mov a,b
|
|
563 0368 D3 C2 out 0c2h
|
|
564 036A C9 ret
|
|
|
|
566 036B 3A A6 21 X036b: lda X21a6
|
|
567 036E E6 20 ani 20h
|
|
568 0370 C2 75 03 X0370: jnz X0375
|
|
569 0373 3E 01 mvi a,1
|
|
570 0375 F6 0A X0375: ori 0ah
|
|
571 0377 D3 A2 out 0a2h
|
|
572 0379 3A 5B 21 lda X215b
|
|
573 037C F6 0C ori 0ch
|
|
574 037E D3 A2 out 0a2h
|
|
575 0380 C9 ret
|
|
|
|
577 0381 3A A2 21 X0381: lda X21a2
|
|
578 0384 B7 ora a
|
|
579 0385 CA 63 0B jz X0b63
|
|
580 0388 C3 77 0B jmp X0b77
|
|
;;
|
|
;; memmove(0x038b): Move B bytes at DE to HL
|
|
;;
|
|
memmove:
|
|
585 038B 1A ldax d ;; Load memory at DE into accumulator
|
|
586 038C 77 mov m,a ;; Store it at HL
|
|
587 038D 23 inx h ;; HL++
|
|
588 038E 13 inx d ;; DE++
|
|
589 038F 05 dcr b ;; B--
|
|
590 0390 C2 8B 03 jnz memmove ;; until B is zero
|
|
591 0393 C9 ret
|
|
|
|
593 0394 3A A5 21 X0394: lda X21a5
|
|
594 0397 B7 ora a
|
|
595 0398 3E 01 mvi a,1
|
|
596 039A C2 9F 03 jnz X039f
|
|
597 039D 3E 05 mvi a,5
|
|
598 039F C3 7B 1F X039f: jmp X1f7b
|
|
|
|
600 03A2 CD 81 03 X03a2: call X0381
|
|
601 03A5 CD DB 1D call X1ddb
|
|
602 03A8 CD 6B 03 call X036b
|
|
603 03AB C3 42 03 jmp X0342
|
|
|
|
605 03AE CD 88 14 X03ae: call X1488
|
|
606 03B1 CD 87 05 call X0587
|
|
607 03B4 21 77 21 lxi h,X2177
|
|
608 03B7 7E mov a,m
|
|
609 03B8 B7 ora a
|
|
610 03B9 36 00 mvi m,0
|
|
611 03BB C4 20 1A cnz X1a20
|
|
612 03BE 3A A5 21 lda X21a5
|
|
613 03C1 B7 ora a
|
|
614 03C2 CA AE 03 jz X03ae
|
|
615 03C5 AF xra a
|
|
616 03C6 32 44 21 sta X2144
|
|
617 03C9 C3 AE 03 jmp X03ae
|
|
;;
|
|
;; Receiver interrupt handler
|
|
;;
|
|
621 03CC F5 X03cc: push psw
|
|
622 03CD C5 push b
|
|
623 03CE E5 push h
|
|
624 03CF DB 00 in 0 ;; Read from PUSART data
|
|
625 03D1 E6 7F ani 7fh
|
|
626 03D3 CA 3A 04 jz X043a
|
|
627 03D6 4F mov c,a
|
|
628 03D7 3A A5 21 lda X21a5
|
|
629 03DA B7 ora a
|
|
630 03DB C2 3A 04 jnz X043a
|
|
631 03DE DB 01 in 1 ;; Read from PUSART ctrl
|
|
632 03E0 E6 38 ani 38h
|
|
633 03E2 CA ED 03 jz X03ed
|
|
634 03E5 0E 1A mvi c,1ah
|
|
635 03E7 3E 27 mvi a,27h
|
|
636 03E9 F6 10 ori 10h
|
|
637 03EB D3 01 out 1
|
|
638 03ED 79 X03ed: mov a,c
|
|
639 03EE FE 7F cpi 7fh
|
|
640 03F0 CA 37 04 jz X0437
|
|
641 03F3 3A A7 21 lda X21a7
|
|
642 03F6 E6 10 ani 10h
|
|
643 03F8 79 mov a,c
|
|
644 03F9 CA 09 04 jz X0409
|
|
645 03FC 21 C2 21 lxi h,X21c2
|
|
646 03FF FE 11 cpi 11h
|
|
647 0401 CA 3E 04 jz X043e
|
|
648 0404 FE 13 cpi 13h
|
|
649 0406 CA 44 04 jz X0444
|
|
650 0409 21 C0 20 X0409: lxi h,X20c0
|
|
651 040C 4E mov c,m
|
|
652 040D 44 mov b,h
|
|
653 040E 02 stax b
|
|
654 040F 79 mov a,c
|
|
655 0410 3C inr a
|
|
656 0411 E6 BF ani 0bfh
|
|
657 0413 77 mov m,a
|
|
658 0414 47 mov b,a
|
|
659 0415 3A C1 20 lda X20c1
|
|
660 0418 90 sub b
|
|
661 0419 C2 27 04 jnz X0427
|
|
662 041C 71 mov m,c
|
|
663 041D 78 mov a,b
|
|
664 041E 3C inr a
|
|
665 041F E6 BF ani 0bfh
|
|
666 0421 6F mov l,a
|
|
667 0422 36 1A mvi m,1ah
|
|
668 0424 C3 31 04 jmp X0431
|
|
|
|
670 0427 F2 2C 04 X0427: jp X042c
|
|
671 042A C6 40 adi 40h
|
|
672 042C FE 20 X042c: cpi 20h
|
|
673 042E C2 37 04 jnz X0437
|
|
674 0431 01 13 01 X0431: lxi b,X0113
|
|
675 0434 CD 7E 0F call X0f7e
|
|
676 0437 CD 47 0E X0437: call X0e47
|
|
677 043A E1 X043a: pop h
|
|
678 043B C1 pop b
|
|
679 043C F1 pop psw
|
|
680 043D C9 ret
|
|
;;
|
|
;; End of keyboard interrupt handler
|
|
;;
|
|
684 043E 3E FE X043e: mvi a,0feh
|
|
685 0440 A6 ana m
|
|
686 0441 C3 47 04 jmp X0447
|
|
|
|
688 0444 3E 01 X0444: mvi a,1
|
|
689 0446 B6 ora m
|
|
690 0447 77 X0447: mov m,a
|
|
691 0448 C3 37 04 jmp X0437
|
|
|
|
693 044B X044b: db 30h
|
|
30
|
|
694 044C 29 dad h
|
|
695 044D 31 21 32 lxi sp,X3221
|
|
696 0450 40 mov b,b
|
|
697 0451 33 inx sp
|
|
698 0452 23 inx h
|
|
699 0453 34 inr m
|
|
700 0454 24 inr h
|
|
701 0455 35 dcr m
|
|
702 0456 25 dcr h
|
|
703 0457 36 5E mvi m,5eh
|
|
704 0459 37 stc
|
|
705 045A 26 38 mvi h,38h
|
|
706 045C 2A 39 28 lhld X2839
|
|
707 045F 2D dcr l
|
|
708 0460 5F mov e,a
|
|
709 0461 3D dcr a
|
|
710 0462 2B dcx h
|
|
711 0463 60 mov h,b
|
|
712 0464 7E mov a,m
|
|
713 0465 5B mov e,e
|
|
714 0466 7B mov a,e
|
|
715 0467 5D mov e,l
|
|
716 0468 7D mov a,l
|
|
717 0469 3B dcx sp
|
|
718 046A 3A 2F 3F lda X3f2f
|
|
719 046D 27 daa
|
|
720 046E 22 2C 3C shld X3c2c
|
|
721 0471 2E 3E mvi l,3eh
|
|
722 0473 5C mov e,h
|
|
723 0474 7C mov a,h
|
|
724 0475 db 20h
|
|
20
|
|
X0476:
|
|
726 0476 KBTab: db 20h, 7fh, 7fh, 7fh, 00h, 'p', 'o', 'y', 't', 'w', 'q'
|
|
20 7F 7F 7F
|
|
00 70 6F 79
|
|
74 77 71
|
|
727 0481 db 0c3h, 00h, 00h, 00h, ']', '[', 'i', 'u', 'r', 'e', '1'
|
|
C3 00 00 00
|
|
5D 5B 69 75
|
|
72 65 31
|
|
728 048C db 0c4h, 00h, 0c2h, 081h, '`', '-', '9', '7', '4', '3', 1bh
|
|
C4 00 C2 81
|
|
60 2D 39 37
|
|
34 33 1B
|
|
729 0497 db 0c1h, 0d2h, 0d0h, 08h, '=', '0', '8', '6', '5', '2', 09h
|
|
C1 D2 D0 08
|
|
3D 30 38 36
|
|
35 32 09
|
|
730 04A2 db 0b7h, 0d3h, 0d1h, 0b0h, 0ah, '\', 'l', 'k', 'g', 'f', 'a'
|
|
B7 D3 D1 B0
|
|
0A 5C 6C 6B
|
|
67 66 61
|
|
731 04AD db 0b8h, 8dh, 0b2h, 0b1h, 00h, 27h, 3bh, 'j', 'h', 'd', 's'
|
|
B8 8D B2 B1
|
|
00 27 3B 6A
|
|
68 64 73
|
|
732 04B8 db 0aeh, 0ach, 0b5h, 0b4h, 0dh, '.', ',', 'n', 'b', 'x', 82h
|
|
AE AC B5 B4
|
|
0D 2E 2C 6E
|
|
62 78 82
|
|
733 04C3 db 0b9h, 0b3h, 0b6h, 0adh, 00h, '/', 'm', ' ', 'v', 'c', 'z'
|
|
B9 B3 B6 AD
|
|
00 2F 6D 20
|
|
76 63 7A
|
|
734 04CE FF rst 7
|
|
;;
|
|
;; Vertical interrupt handler
|
|
;;
|
|
738 04CF F5 X04cf: push psw
|
|
739 04D0 E5 push h
|
|
740 04D1 D5 push d
|
|
741 04D2 CD 4E 10 call X104e
|
|
742 04D5 C5 push b
|
|
743 04D6 3E 09 mvi a,9
|
|
744 04D8 D3 A2 out 0a2h
|
|
745 04DA FB ei
|
|
746 04DB 3A 65 20 lda X2065
|
|
747 04DE B7 ora a
|
|
748 04DF C2 0B 05 jnz X050b
|
|
749 04E2 21 51 20 lxi h,X2051
|
|
750 04E5 B6 ora m
|
|
751 04E6 CA 3E 05 jz X053e
|
|
752 04E9 3E 01 mvi a,1
|
|
753 04EB 32 65 20 sta X2065
|
|
754 04EE B6 ora m
|
|
755 04EF 36 00 mvi m,0
|
|
756 04F1 3E 01 mvi a,1
|
|
757 04F3 32 5B 20 sta X205b
|
|
758 04F6 3A 56 21 lda X2156
|
|
759 04F9 F2 05 05 jp X0505
|
|
760 04FC 3E 99 mvi a,99h
|
|
761 04FE 32 5B 20 sta X205b
|
|
762 0501 3A 55 21 lda X2155
|
|
763 0504 3D dcr a
|
|
764 0505 CD 2F 12 X0505: call X122f
|
|
765 0508 32 7A 20 sta X207a
|
|
766 050B 01 5B 20 X050b: lxi b,X205b
|
|
767 050E 0A ldax b
|
|
768 050F 21 5A 20 lxi h,X205a
|
|
769 0512 86 add m
|
|
770 0513 27 daa
|
|
771 0514 E6 0F ani 0fh
|
|
772 0516 77 mov m,a
|
|
773 0517 57 mov d,a
|
|
774 0518 E6 03 ani 3
|
|
775 051A D3 A2 out 0a2h
|
|
776 051C 7A mov a,d
|
|
777 051D 1F rar
|
|
778 051E A7 ana a
|
|
779 051F 1F rar
|
|
780 0520 F6 04 ori 4
|
|
781 0522 D3 A2 out 0a2h
|
|
782 0524 7A mov a,d
|
|
783 0525 B7 ora a
|
|
784 0526 C2 3E 05 jnz X053e
|
|
785 0529 32 65 20 sta X2065
|
|
786 052C 0A ldax b
|
|
787 052D B7 ora a
|
|
788 052E 3A 56 21 lda X2156
|
|
789 0531 FA 38 05 jm X0538
|
|
790 0534 3A 55 21 lda X2155
|
|
791 0537 3D dcr a
|
|
792 0538 CD CE 11 X0538: call X11ce
|
|
793 053B 32 7A 20 sta X207a
|
|
794 053E 21 78 20 X053e: lxi h,X2078
|
|
795 0541 7E mov a,m
|
|
796 0542 B7 ora a
|
|
797 0543 CA 4F 05 jz X054f
|
|
798 0546 35 dcr m
|
|
799 0547 E6 04 ani 4
|
|
800 0549 0F rrc
|
|
801 054A 0F rrc
|
|
802 054B 0F rrc
|
|
803 054C 32 46 21 sta X2146
|
|
804 054F 21 2C 21 X054f: lxi h,X212c
|
|
805 0552 7E mov a,m
|
|
806 0553 3D dcr a
|
|
807 0554 C2 69 05 jnz X0569
|
|
808 0557 36 35 mvi m,35h
|
|
809 0559 3E 08 mvi a,8
|
|
810 055B D3 A2 out 0a2h
|
|
811 055D 21 CB 21 lxi h,X21cb
|
|
812 0560 7E mov a,m
|
|
813 0561 B7 ora a
|
|
814 0562 CA 6A 05 jz X056a
|
|
815 0565 D3 A2 out 0a2h
|
|
816 0567 EE 01 xri 1
|
|
817 0569 77 X0569: mov m,a
|
|
818 056A 3E 40 X056a: mvi a,40h
|
|
819 056C 32 48 21 sta X2148
|
|
820 056F 21 7F 20 lxi h,X207f
|
|
821 0572 34 inr m
|
|
822 0573 3A A3 21 lda X21a3
|
|
823 0576 D3 42 out 42h
|
|
824 0578 3A 58 21 lda X2158
|
|
825 057B D3 02 out 2
|
|
826 057D 3A C9 21 lda X21c9
|
|
827 0580 D3 62 out 62h
|
|
828 0582 C1 pop b
|
|
829 0583 D1 pop d
|
|
830 0584 E1 pop h
|
|
831 0585 F1 pop psw
|
|
832 0586 C9 ret
|
|
|
|
834 0587 3A A5 21 X0587: lda X21a5
|
|
835 058A 21 7B 20 lxi h,X207b
|
|
836 058D B6 ora m
|
|
837 058E C0 rnz
|
|
838 058F CD 75 06 call X0675
|
|
839 0592 C8 rz
|
|
840 0593 47 X0593: mov b,a
|
|
841 0594 3A 7B 20 lda X207b
|
|
842 0597 B7 ora a
|
|
843 0598 78 mov a,b
|
|
844 0599 C2 A9 05 jnz X05a9
|
|
845 059C 3A 79 20 lda X2079
|
|
846 059F 07 rlc
|
|
847 05A0 78 mov a,b
|
|
848 05A1 DA A9 05 jc X05a9
|
|
849 05A4 FE 20 cpi 20h
|
|
850 05A6 DA B2 08 jc X08b2
|
|
851 05A9 2A 40 21 X05a9: lhld X2140
|
|
852 05AC E9 pchl
|
|
|
|
854 05AD FE 1B X05ad: cpi 1bh
|
|
855 05AF C2 CC 05 jnz X05cc
|
|
856 05B2 21 B8 05 lxi h,X05b8
|
|
857 05B5 C3 18 0A jmp X0a18
|
|
|
|
859 05B8 FE 32 X05b8: cpi 32h
|
|
860 05BA C2 C5 05 jnz X05c5
|
|
861 05BD 3E 01 mvi a,1
|
|
862 05BF 32 79 20 sta X2079
|
|
863 05C2 C3 15 0A jmp X0a15
|
|
|
|
865 05C5 47 X05c5: mov b,a
|
|
866 05C6 3E 1B mvi a,1bh
|
|
867 05C8 CD D2 05 call X05d2
|
|
868 05CB 78 mov a,b
|
|
869 05CC CD D2 05 X05cc: call X05d2
|
|
870 05CF C3 62 0C jmp X0c62
|
|
|
|
872 05D2 4F X05d2: mov c,a
|
|
873 05D3 C5 X05d3: push b
|
|
874 05D4 CD 88 14 call X1488
|
|
875 05D7 C1 pop b
|
|
876 05D8 DB 42 in 42h
|
|
877 05DA E6 04 ani 4
|
|
878 05DC C2 D3 05 jnz X05d3
|
|
879 05DF 79 mov a,c
|
|
880 05E0 D3 E2 out 0e2h
|
|
881 05E2 C9 ret
|
|
|
|
883 05E3 CD 46 0C X05e3: call X0c46
|
|
884 05E6 F5 X05e6: push psw
|
|
885 05E7 FE 7F cpi 7fh
|
|
886 05E9 CA 73 06 jz X0673
|
|
887 05EC E5 push h
|
|
888 05ED D5 push d
|
|
889 05EE C5 push b
|
|
890 05EF 4F mov c,a
|
|
891 05F0 21 FC 20 lxi h,X20fc
|
|
892 05F3 56 mov d,m
|
|
893 05F4 23 inx h
|
|
894 05F5 7A mov a,d
|
|
895 05F6 85 add l
|
|
896 05F7 6F mov l,a
|
|
897 05F8 7A mov a,d
|
|
898 05F9 D6 02 sui 2
|
|
899 05FB F2 FF 05 jp X05ff
|
|
900 05FE 7A mov a,d
|
|
901 05FF 32 FC 20 X05ff: sta X20fc
|
|
902 0602 56 mov d,m
|
|
903 0603 3A FA 20 lda X20fa
|
|
904 0606 B2 ora d
|
|
905 0607 47 mov b,a
|
|
906 0608 7A mov a,d
|
|
907 0609 07 rlc
|
|
908 060A 79 mov a,c
|
|
909 060B D2 16 06 jnc X0616
|
|
910 060E D6 5F sui 5fh
|
|
911 0610 FE 20 cpi 20h
|
|
912 0612 D2 16 06 jnc X0616
|
|
913 0615 4F mov c,a
|
|
914 0616 7A X0616: mov a,d
|
|
915 0617 E6 40 ani 40h
|
|
916 0619 79 mov a,c
|
|
917 061A CA 24 06 jz X0624
|
|
918 061D FE 23 cpi 23h
|
|
919 061F C2 24 06 jnz X0624
|
|
920 0622 0E 1E mvi c,1eh
|
|
921 0624 3A FB 20 X0624: lda X20fb
|
|
922 0627 B1 ora c
|
|
923 0628 4F mov c,a
|
|
924 0629 3A 42 21 lda X2142
|
|
925 062C B7 ora a
|
|
926 062D CA 41 06 jz X0641
|
|
927 0630 21 F8 20 lxi h,X20f8
|
|
928 0633 3A 53 21 lda X2153
|
|
929 0636 BE cmp m
|
|
930 0637 C2 41 06 jnz X0641
|
|
931 063A 36 00 mvi m,0
|
|
932 063C C5 push b
|
|
933 063D CD 55 09 call X0955
|
|
934 0640 C1 pop b
|
|
935 0641 2A F6 20 X0641: lhld cursor_address
|
|
936 0644 71 mov m,c
|
|
937 0645 7C mov a,h
|
|
938 0646 C6 10 adi 10h
|
|
939 0648 67 mov h,a
|
|
940 0649 70 mov m,b
|
|
941 064A 78 mov a,b
|
|
942 064B 32 F5 20 sta X20f5
|
|
943 064E 21 F4 20 lxi h,X20f4
|
|
944 0651 71 mov m,c
|
|
945 0652 21 F8 20 lxi h,X20f8
|
|
946 0655 3A 53 21 lda X2153
|
|
947 0658 BE cmp m
|
|
948 0659 C2 68 06 jnz X0668
|
|
949 065C 79 mov a,c
|
|
950 065D 32 F4 20 sta X20f4
|
|
951 0660 3A A8 21 lda X21a8
|
|
952 0663 E6 40 ani 40h
|
|
953 0665 C3 6D 06 jmp X066d
|
|
|
|
955 0668 34 X0668: inr m
|
|
956 0669 CD 36 16 call X1636
|
|
957 066C AF xra a
|
|
958 066D 32 42 21 X066d: sta X2142
|
|
959 0670 C1 X0670: pop b
|
|
960 0671 D1 pop d
|
|
961 0672 E1 pop h
|
|
962 0673 F1 X0673: pop psw
|
|
963 0674 C9 ret
|
|
|
|
965 0675 3A C4 21 X0675: lda X21c4
|
|
966 0678 B7 ora a
|
|
967 0679 C2 85 06 jnz X0685
|
|
968 067C 21 C0 20 lxi h,X20c0
|
|
969 067F 7E mov a,m
|
|
970 0680 23 inx h
|
|
971 0681 96 sub m
|
|
972 0682 C2 87 06 jnz X0687
|
|
973 0685 AF X0685: xra a
|
|
974 0686 C9 ret
|
|
|
|
976 0687 6E X0687: mov l,m
|
|
977 0688 26 20 mvi h,20h
|
|
978 068A 56 mov d,m
|
|
979 068B 21 C1 20 lxi h,X20c1
|
|
980 068E 7E mov a,m
|
|
981 068F 3C inr a
|
|
982 0690 E6 BF ani 0bfh
|
|
983 0692 F6 80 ori 80h
|
|
984 0694 77 mov m,a
|
|
985 0695 2B dcx h
|
|
986 0696 96 sub m
|
|
987 0697 F2 9C 06 jp X069c
|
|
988 069A C6 40 adi 40h
|
|
989 069C FE 30 X069c: cpi 30h
|
|
990 069E C2 A7 06 jnz X06a7
|
|
991 06A1 01 11 01 lxi b,X0111
|
|
992 06A4 CD 7E 0F call X0f7e
|
|
993 06A7 7A X06a7: mov a,d
|
|
994 06A8 B7 ora a
|
|
995 06A9 C9 ret
|
|
|
|
997 06AA 3A 68 20 X06aa: lda key_flags ; A <- [Keys flag buffer]
|
|
998 06AD 5F mov e,a
|
|
999 06AE E6 80 ani 80h ; bit 7 set?
|
|
1000 06B0 C8 rz ; return if not
|
|
1001 06B1 21 41 08 lxi h,X0841
|
|
1002 06B4 E5 push h
|
|
1003 06B5 7B mov a,e
|
|
1004 06B6 E6 07 ani 7
|
|
1005 06B8 FE 04 cpi 4
|
|
1006 06BA FA C2 06 jm X06c2
|
|
1007 06BD AF xra a
|
|
1008 06BE 32 67 20 sta X2067
|
|
1009 06C1 C9 ret
|
|
|
|
1011 06C2 57 X06c2: mov d,a
|
|
1012 06C3 0E 00 mvi c,0
|
|
1013 06C5 06 04 mvi b,4
|
|
1014 06C7 21 6E 20 lxi h,key_buffer+4
|
|
1015 06CA 7E X06ca: mov a,m
|
|
1016 06CB B7 ora a
|
|
1017 06CC CA E8 06 jz X06e8
|
|
1018 06CF E5 push h
|
|
1019 06D0 C5 push b
|
|
1020 06D1 06 03 mvi b,3
|
|
1021 06D3 21 6A 20 lxi h,key_buffer
|
|
1022 06D6 BE X06d6: cmp m
|
|
1023 06D7 CA DF 06 jz X06df
|
|
1024 06DA 23 inx h
|
|
1025 06DB 05 dcr b
|
|
1026 06DC F2 D6 06 jp X06d6
|
|
1027 06DF C1 X06df: pop b
|
|
1028 06E0 E1 pop h
|
|
1029 06E1 CA E7 06 jz X06e7
|
|
1030 06E4 36 00 mvi m,0
|
|
1031 06E6 0D dcr c
|
|
1032 06E7 0C X06e7: inr c
|
|
1033 06E8 23 X06e8: inx h
|
|
1034 06E9 05 dcr b
|
|
1035 06EA C2 CA 06 jnz X06ca
|
|
1036 06ED 7B mov a,e
|
|
1037 06EE E6 08 ani 8
|
|
1038 06F0 C0 rnz
|
|
1039 06F1 B2 ora d
|
|
1040 06F2 C2 FB 06 jnz X06fb
|
|
1041 06F5 3E E1 mvi a,0e1h
|
|
1042 06F7 32 72 20 sta X2072
|
|
1043 06FA C9 ret
|
|
|
|
1045 06FB 21 47 07 X06fb: lxi h,X0747
|
|
1046 06FE E5 push h
|
|
1047 06FF 3A 72 20 lda X2072
|
|
1048 0702 3C inr a
|
|
1049 0703 CA 09 07 jz X0709
|
|
1050 0706 32 72 20 sta X2072
|
|
1051 0709 3A A6 21 X0709: lda X21a6
|
|
1052 070C E6 40 ani 40h
|
|
1053 070E C8 rz
|
|
1054 070F 7B mov a,e
|
|
1055 0710 E6 10 ani 10h
|
|
1056 0712 C0 rnz
|
|
1057 0713 3A 50 21 lda X2150
|
|
1058 0716 21 5F 08 lxi h,X085f
|
|
1059 0719 06 05 mvi b,5
|
|
1060 071B BE X071b: cmp m
|
|
1061 071C C8 rz
|
|
1062 071D 23 inx h
|
|
1063 071E 05 dcr b
|
|
1064 071F C2 1B 07 jnz X071b
|
|
1065 0722 21 73 20 lxi h,X2073
|
|
1066 0725 35 dcr m
|
|
1067 0726 C0 rnz
|
|
1068 0727 36 02 mvi m,2
|
|
1069 0729 3A 72 20 lda X2072
|
|
1070 072C FE FF cpi 0ffh
|
|
1071 072E C0 rnz
|
|
1072 072F 79 mov a,c
|
|
1073 0730 FE 01 cpi 1
|
|
1074 0732 C0 rnz
|
|
1075 0733 06 04 mvi b,4
|
|
1076 0735 21 6E 20 lxi h,key_buffer+4
|
|
1077 0738 7E X0738: mov a,m
|
|
1078 0739 B7 ora a
|
|
1079 073A C2 43 07 jnz X0743
|
|
1080 073D 23 inx h
|
|
1081 073E 05 dcr b
|
|
1082 073F C2 38 07 jnz X0738
|
|
1083 0742 C9 ret
|
|
|
|
1085 0743 E1 X0743: pop h
|
|
1086 0744 C3 76 07 jmp X0776
|
|
|
|
1088 0747 79 X0747: mov a,c
|
|
1089 0748 FE 04 cpi 4
|
|
1090 074A F0 rp
|
|
1091 074B 01 6A 20 lxi b,key_buffer
|
|
1092 074E 21 6E 20 X074e: lxi h,key_buffer+4
|
|
1093 0751 7E X0751: mov a,m
|
|
1094 0752 B7 ora a
|
|
1095 0753 CA 5B 07 jz X075b
|
|
1096 0756 0A ldax b
|
|
1097 0757 BE cmp m
|
|
1098 0758 CA 66 07 jz X0766
|
|
1099 075B 23 X075b: inx h
|
|
1100 075C 7D mov a,l
|
|
1101 075D FE 72 cpi 72h
|
|
1102 075F C2 51 07 jnz X0751
|
|
1103 0762 0A ldax b ; A = key (loaded from BC, typically 0x206a)
|
|
1104 0763 C3 6C 07 jmp X076c
|
|
|
|
1106 0766 03 X0766: inx b
|
|
1107 0767 15 dcr d
|
|
1108 0768 C2 4E 07 jnz X074e
|
|
1109 076B C9 ret
|
|
|
|
1111 076C 47 X076c: mov b,a
|
|
1112 076D 3A 67 20 lda X2067
|
|
1113 0770 B8 cmp b
|
|
1114 0771 78 mov a,b
|
|
1115 0772 32 67 20 sta X2067
|
|
1116 0775 C0 rnz
|
|
1117 0776 E1 X0776: pop h
|
|
1118 0777 32 50 21 sta X2150
|
|
1119 077A FE 7B cpi 7bh
|
|
1120 077C CA 1A 1A jz X1a1a
|
|
1121 077F FE 6A cpi 6ah
|
|
1122 0781 CA 2C 02 jz X022c
|
|
1123 0784 43 mov b,e
|
|
1124 0785 5F mov e,a
|
|
1125 0786 3A 44 21 lda X2144
|
|
1126 0789 B7 ora a
|
|
1127 078A C2 41 08 jnz X0841
|
|
1128 078D 7B mov a,e
|
|
1129 078E E6 F0 ani 0f0h
|
|
1130 0790 0F rrc
|
|
1131 0791 0F rrc
|
|
1132 0792 57 mov d,a
|
|
1133 0793 0F rrc
|
|
1134 0794 0F rrc
|
|
1135 0795 82 add d
|
|
1136 0796 57 mov d,a
|
|
1137 0797 7B mov a,e
|
|
1138 0798 92 sub d
|
|
1139 0799 21 76 04 lxi h,X0476
|
|
1140 079C 5F mov e,a
|
|
1141 079D 16 00 mvi d,0
|
|
1142 079F 19 dad d
|
|
1143 07A0 4E mov c,m
|
|
1144 07A1 79 mov a,c
|
|
1145 07A2 B7 ora a
|
|
1146 07A3 FA 31 01 jm X0131
|
|
1147 07A6 FE 20 cpi 20h
|
|
1148 07A8 DA FF 07 jc X07ff
|
|
1149 07AB 78 mov a,b
|
|
1150 07AC E6 70 ani 70h
|
|
1151 07AE CA FF 07 jz X07ff
|
|
1152 07B1 79 mov a,c
|
|
1153 07B2 FE 7B cpi 7bh
|
|
1154 07B4 D2 C2 07 jnc X07c2
|
|
1155 07B7 FE 61 cpi 61h
|
|
1156 07B9 DA C2 07 jc X07c2
|
|
1157 07BC E6 DF ani 0dfh
|
|
1158 07BE 4F mov c,a
|
|
1159 07BF C3 D7 07 jmp X07d7
|
|
|
|
1161 07C2 78 X07c2: mov a,b
|
|
1162 07C3 E6 30 ani 30h
|
|
1163 07C5 CA D7 07 jz X07d7
|
|
1164 07C8 21 4B 04 lxi h,X044b
|
|
1165 07CB 7E X07cb: mov a,m
|
|
1166 07CC B9 cmp c
|
|
1167 07CD CA D5 07 jz X07d5
|
|
1168 07D0 23 inx h
|
|
1169 07D1 23 inx h
|
|
1170 07D2 C3 CB 07 jmp X07cb
|
|
|
|
1172 07D5 23 X07d5: inx h
|
|
1173 07D6 4E mov c,m
|
|
1174 07D7 78 X07d7: mov a,b
|
|
1175 07D8 E6 10 ani 10h
|
|
1176 07DA CA FF 07 jz X07ff
|
|
1177 07DD 79 mov a,c
|
|
1178 07DE FE 41 cpi 41h
|
|
1179 07E0 DA E8 07 jc X07e8
|
|
1180 07E3 FE 5B cpi 5bh
|
|
1181 07E5 DA FC 07 jc X07fc
|
|
1182 07E8 FE 3F X07e8: cpi 3fh
|
|
1183 07EA CA FC 07 jz X07fc
|
|
1184 07ED FE 20 cpi 20h
|
|
1185 07EF CA FC 07 jz X07fc
|
|
1186 07F2 FE 7B cpi 7bh
|
|
1187 07F4 DA 41 08 jc X0841
|
|
1188 07F7 FE 7F cpi 7fh
|
|
1189 07F9 D2 41 08 jnc X0841
|
|
1190 07FC E6 9F X07fc: ani 9fh
|
|
1191 07FE 4F mov c,a
|
|
1192 07FF B1 X07ff: ora c
|
|
1193 0800 F5 push psw
|
|
1194 0801 3A A7 21 lda X21a7
|
|
1195 0804 E6 80 ani 80h
|
|
1196 0806 CA 0C 08 jz X080c
|
|
1197 0809 32 54 21 sta X2154
|
|
1198 080C F1 X080c: pop psw
|
|
1199 080D F6 80 X080d: ori 80h
|
|
1200 080F CD 18 0F call X0f18
|
|
1201 0812 CD 53 08 X0812: call X0853
|
|
1202 0815 3A 50 21 X0815: lda X2150
|
|
1203 0818 16 04 mvi d,4
|
|
1204 081A 21 6E 20 lxi h,key_buffer+4
|
|
1205 081D BE X081d: cmp m
|
|
1206 081E CA 41 08 jz X0841
|
|
1207 0821 23 inx h
|
|
1208 0822 15 dcr d
|
|
1209 0823 C2 1D 08 jnz X081d
|
|
1210 0826 16 04 mvi d,4
|
|
1211 0828 21 6E 20 lxi h,key_buffer+4
|
|
1212 082B 7E X082b: mov a,m
|
|
1213 082C B7 ora a
|
|
1214 082D CA 38 08 jz X0838
|
|
1215 0830 23 inx h
|
|
1216 0831 15 dcr d
|
|
1217 0832 C2 2B 08 jnz X082b
|
|
1218 0835 C3 41 08 jmp X0841
|
|
|
|
1220 0838 3A 50 21 X0838: lda X2150
|
|
1221 083B 77 mov m,a
|
|
1222 083C 3E E1 mvi a,0e1h
|
|
1223 083E 32 72 20 sta X2072
|
|
1224 0841 AF X0841: xra a
|
|
1225 0842 21 68 20 lxi h,key_flags
|
|
1226 0845 56 mov d,m
|
|
1227 0846 77 mov m,a
|
|
1228 0847 23 inx h
|
|
1229 0848 72 mov m,d
|
|
1230 0849 23 inx h
|
|
1231 084A 16 04 mvi d,4
|
|
1232 084C 77 X084c: mov m,a
|
|
1233 084D 23 inx h
|
|
1234 084E 15 dcr d
|
|
1235 084F C2 4C 08 jnz X084c
|
|
1236 0852 C9 ret
|
|
|
|
1238 0853 3A A7 21 X0853: lda X21a7
|
|
1239 0856 E6 40 ani 40h
|
|
1240 0858 C8 rz
|
|
1241 0859 3E 80 mvi a,80h
|
|
1242 085B 32 47 21 sta X2147
|
|
1243 085E C9 ret
|
|
|
|
1245 085F 7B X085f: mov a,e
|
|
1246 0860 2A 6A 3A lhld X3a6a
|
|
1247 0863 64 mov h,h
|
|
1248 0864 3A 30 21 lda X2130
|
|
1249 0867 D6 02 sui 2
|
|
1250 0869 C0 rnz
|
|
1251 086A 57 mov d,a
|
|
1252 086B 3A 31 21 lda X2131
|
|
1253 086E 5F mov e,a
|
|
1254 086F 3E 01 X086f: mvi a,1
|
|
1255 0871 A3 ana e
|
|
1256 0872 C2 3D 00 jnz X003d
|
|
1257 0875 7A X0875: mov a,d
|
|
1258 0876 B7 ora a
|
|
1259 0877 C4 A7 08 cnz X08a7
|
|
1260 087A D5 push d
|
|
1261 087B CD BE 17 call X17be
|
|
1262 087E D1 pop d
|
|
1263 087F 3E 02 mvi a,2
|
|
1264 0881 A3 ana e
|
|
1265 0882 C4 11 1F cnz X1f11
|
|
1266 0885 3E 08 mvi a,8
|
|
1267 0887 DC A7 08 cc X08a7
|
|
1268 088A 3E 04 mvi a,4
|
|
1269 088C A3 ana e
|
|
1270 088D C4 62 1F cnz X1f62
|
|
1271 0890 3E 10 mvi a,10h
|
|
1272 0892 DC A7 08 cc X08a7
|
|
1273 0895 7A mov a,d
|
|
1274 0896 B7 ora a
|
|
1275 0897 C2 A0 08 jnz X08a0
|
|
1276 089A 3E 08 mvi a,8
|
|
1277 089C A3 ana e
|
|
1278 089D C2 6F 08 jnz X086f
|
|
1279 08A0 7A X08a0: mov a,d
|
|
1280 08A1 32 00 20 sta 2000h
|
|
1281 08A4 C3 51 02 jmp X0251
|
|
|
|
1283 08A7 B2 X08a7: ora d
|
|
1284 08A8 57 mov d,a
|
|
1285 08A9 3E 08 mvi a,8
|
|
1286 08AB A3 ana e
|
|
1287 08AC C8 rz
|
|
1288 08AD 3E 80 mvi a,80h
|
|
1289 08AF B2 ora d
|
|
1290 08B0 57 mov d,a
|
|
1291 08B1 C9 ret
|
|
|
|
1293 08B2 FE 1B X08b2: cpi 1bh
|
|
1294 08B4 CA 9E 09 jz X099e
|
|
1295 08B7 FE 10 cpi 10h
|
|
1296 08B9 DA D4 08 jc X08d4
|
|
1297 08BC 5F mov e,a
|
|
1298 08BD D6 18 sui 18h
|
|
1299 08BF E6 FD ani 0fdh
|
|
1300 08C1 C0 rnz
|
|
1301 08C2 7B mov a,e
|
|
1302 08C3 FE 1A cpi 1ah
|
|
1303 08C5 CA CB 08 jz X08cb
|
|
1304 08C8 FE 18 cpi 18h
|
|
1305 08CA C0 rnz
|
|
1306 08CB CD 15 0A X08cb: call X0a15
|
|
1307 08CE 3E 02 mvi a,2
|
|
1308 08D0 C3 E6 05 X08d0: jmp X05e6
|
|
|
|
1310 08D3 C9 ret
|
|
|
|
1312 08D4 D6 05 X08d4: sui 5 ;; subtract 5 from A and return if negative
|
|
1313 08D6 F8 rm
|
|
1314 08D7 21 E5 08 lxi h,X08e5 ;; load jump table at 8e5
|
|
1315 08DA 87 add a ;; double a
|
|
1316 08DB 5F mov e,a
|
|
1317 08DC 16 00 mvi d,0
|
|
1318 08DE 19 dad d ;; hl = X08e5 + 2A
|
|
1319 08DF 5E mov e,m ;; load DE from (HL) little-endian
|
|
1320 08E0 23 inx h
|
|
1321 08E1 56 mov d,m
|
|
1322 08E2 EB xchg
|
|
1323 08E3 AF xra a ;; zero A
|
|
1324 08E4 E9 pchl ;; jump to address
|
|
|
|
1326 08E5 X08e5: dw X0900
|
|
0009
|
|
1327 08E7 dw X0997 ;; immediate return
|
|
9709
|
|
1328 08E9 dw X0938
|
|
3809
|
|
1329 08EB dw X0941
|
|
4109
|
|
1330 08ED dw 0df9h ;; MYSTERY ADDRESS: this isn't even in AVO!!!
|
|
F90D
|
|
1331 08EF dw X0955
|
|
5509
|
|
1332 08F1 dw X0955
|
|
5509
|
|
1333 08F3 dw X0955
|
|
5509
|
|
1334 08F5 dw 094bh
|
|
4B09
|
|
1335 08F7 dw X08fb
|
|
FB08
|
|
1336 08F9 dw X08fc
|
|
FC08
|
|
|
|
1338 08FB 3C X08fb: inr a
|
|
1339 08FC 32 FC 20 X08fc: sta X20fc
|
|
1340 08FF C9 ret
|
|
|
|
1342 0900 3A A5 21 X0900: lda X21a5
|
|
1343 0903 B7 ora a
|
|
1344 0904 C0 rnz
|
|
1345 0905 2A 7B 21 lhld X217b
|
|
1346 0908 7C mov a,h
|
|
1347 0909 BD cmp l
|
|
1348 090A C8 rz
|
|
1349 090B 21 72 21 lxi h,X2172
|
|
1350 090E 3E 10 mvi a,10h
|
|
1351 0910 B6 ora m
|
|
1352 0911 77 mov m,a
|
|
1353 0912 C9 ret
|
|
|
|
1355 0913 21 72 21 lxi h,X2172
|
|
1356 0916 7E mov a,m
|
|
1357 0917 E6 EF ani 0efh
|
|
1358 0919 77 mov m,a
|
|
1359 091A 21 7B 21 lxi h,X217b
|
|
1360 091D 46 mov b,m
|
|
1361 091E 23 inx h
|
|
1362 091F 0E 14 mvi c,14h
|
|
1363 0921 11 5C 21 lxi d,X215c
|
|
1364 0924 7E X0924: mov a,m
|
|
1365 0925 B8 cmp b
|
|
1366 0926 CA 30 09 jz X0930
|
|
1367 0929 12 stax d
|
|
1368 092A 13 inx d
|
|
1369 092B 23 inx h
|
|
1370 092C 0D dcr c
|
|
1371 092D C2 24 09 jnz X0924
|
|
1372 0930 1B X0930: dcx d
|
|
1373 0931 1A ldax d
|
|
1374 0932 F6 80 ori 80h
|
|
1375 0934 12 stax d
|
|
1376 0935 C3 F3 0E jmp X0ef3
|
|
|
|
1378 0938 21 78 20 X0938: lxi h,X2078
|
|
1379 093B 7E mov a,m
|
|
1380 093C C6 08 adi 8
|
|
1381 093E D8 rc
|
|
1382 093F 77 mov m,a
|
|
1383 0940 C9 ret
|
|
|
|
1385 0941 21 F8 20 X0941: lxi h,X20f8
|
|
1386 0944 7E mov a,m
|
|
1387 0945 B7 ora a
|
|
1388 0946 C8 rz
|
|
1389 0947 35 dcr m
|
|
1390 0948 C3 36 16 jmp X1636
|
|
|
|
1392 094B AF X094b: xra a
|
|
1393 094C 32 F8 20 sta X20f8
|
|
1394 094F C3 36 16 jmp X1636
|
|
|
|
1396 0952 CD 4B 09 call X094b
|
|
1397 0955 3A A8 21 X0955: lda X21a8
|
|
1398 0958 E6 20 ani 20h
|
|
1399 095A C4 4B 09 cnz X094b
|
|
1400 095D 21 F9 20 lxi h,X20f9
|
|
1401 0960 56 mov d,m
|
|
1402 0961 3A 56 21 lda X2156
|
|
1403 0964 BA cmp d
|
|
1404 0965 CA 73 09 jz X0973
|
|
1405 0968 CD BF 11 call X11bf
|
|
1406 096B 78 mov a,b
|
|
1407 096C BA cmp d
|
|
1408 096D C8 rz
|
|
1409 096E 14 inr d
|
|
1410 096F 72 mov m,d
|
|
1411 0970 C3 36 16 X0970: jmp X1636
|
|
|
|
1413 0973 3A A6 21 X0973: lda X21a6
|
|
1414 0976 E6 80 ani 80h
|
|
1415 0978 CA 98 09 jz X0998
|
|
1416 097B 0E 01 mvi c,1
|
|
1417 097D CD 8E 10 call X108e
|
|
1418 0980 3E FF mvi a,0ffh
|
|
1419 0982 32 C3 21 sta X21c3
|
|
1420 0985 34 inr m
|
|
1421 0986 CD E6 0F call X0fe6
|
|
1422 0989 3A C3 21 X0989: lda X21c3
|
|
1423 098C B7 ora a
|
|
1424 098D C2 89 09 jnz X0989
|
|
1425 0990 32 F4 20 sta X20f4
|
|
1426 0993 3D dcr a
|
|
1427 0994 32 F5 20 sta X20f5
|
|
1428 0997 C9 X0997: ret
|
|
|
|
1430 0998 CD 1A 10 X0998: call X101a
|
|
1431 099B C3 12 10 jmp X1012
|
|
|
|
1433 099E AF X099e: xra a
|
|
1434 099F 32 7D 20 sta X207d
|
|
1435 09A2 32 B8 21 sta X21b8
|
|
1436 09A5 21 AB 09 lxi h,X09ab
|
|
1437 09A8 C3 18 0A jmp X0a18
|
|
|
|
1439 09AB FE 30 X09ab: cpi 30h
|
|
1440 09AD D2 BD 09 jnc X09bd
|
|
1441 09B0 21 7D 20 lxi h,X207d
|
|
1442 09B3 4F mov c,a
|
|
1443 09B4 7E mov a,m
|
|
1444 09B5 B7 ora a
|
|
1445 09B6 CA BB 09 jz X09bb
|
|
1446 09B9 0E FF mvi c,0ffh
|
|
1447 09BB 71 X09bb: mov m,c
|
|
1448 09BC C9 ret
|
|
|
|
1450 09BD 32 7E 20 X09bd: sta X207e
|
|
1451 09C0 21 15 0A lxi h,X0a15
|
|
1452 09C3 E5 push h
|
|
1453 09C4 3A 7D 20 lda X207d
|
|
1454 09C7 B7 ora a
|
|
1455 09C8 C2 DC 09 jnz X09dc
|
|
1456 09CB 3A A7 21 lda X21a7
|
|
1457 09CE E6 20 ani 20h
|
|
1458 09D0 21 50 0A lxi h,X0a50
|
|
1459 09D3 C2 D9 09 jnz X09d9
|
|
1460 09D6 21 1C 0A lxi h,X0a1c
|
|
1461 09D9 C3 F7 09 X09d9: jmp X09f7
|
|
|
|
1463 09DC 47 X09dc: mov b,a
|
|
1464 09DD 3A A7 21 lda X21a7
|
|
1465 09E0 E6 20 ani 20h
|
|
1466 09E2 78 mov a,b
|
|
1467 09E3 C8 rz
|
|
1468 09E4 FE 28 cpi 28h
|
|
1469 09E6 11 FD 20 lxi d,X20fd
|
|
1470 09E9 CA 32 0C jz X0c32
|
|
1471 09EC FE 29 cpi 29h
|
|
1472 09EE CA 31 0C jz X0c31
|
|
1473 09F1 FE 23 cpi 23h
|
|
1474 09F3 21 7B 0A lxi h,X0a7b
|
|
1475 09F6 C0 rnz
|
|
1476 09F7 11 B9 21 X09f7: lxi d,X21b9
|
|
1477 09FA AF xra a
|
|
1478 09FB 12 stax d
|
|
1479 09FC 3A 7E 20 lda X207e
|
|
1480 09FF 4F X09ff: mov c,a
|
|
1481 0A00 AF X0a00: xra a
|
|
1482 0A01 86 add m
|
|
1483 0A02 C8 rz
|
|
1484 0A03 23 inx h
|
|
1485 0A04 B9 cmp c
|
|
1486 0A05 CA 0D 0A jz X0a0d
|
|
1487 0A08 23 inx h
|
|
1488 0A09 23 inx h
|
|
1489 0A0A C3 00 0A jmp X0a00
|
|
|
|
1491 0A0D 12 X0a0d: stax d
|
|
1492 0A0E 7E mov a,m
|
|
1493 0A0F 23 inx h
|
|
1494 0A10 66 mov h,m
|
|
1495 0A11 6F mov l,a
|
|
1496 0A12 AF xra a
|
|
1497 0A13 E9 pchl
|
|
|
|
1499 0A14 E1 X0a14: pop h
|
|
1500 0A15 21 E6 05 X0a15: lxi h,X05e6 ;; HL = 0x05e6
|
|
1501 0A18 22 40 21 X0a18: shld X2140 ;; 0x2140 = 0xe605
|
|
1502 0A1B C9 ret
|
|
;;
|
|
;; This is a table of some sort.
|
|
;;
|
|
1506 0A1C 41 X0a1c: mov b,c
|
|
1507 0A1D 9B sbb e
|
|
1508 0A1E 0A ldax b
|
|
1509 0A1F 42 mov b,d
|
|
1510 0A20 9B sbb e
|
|
1511 0A21 0A ldax b
|
|
1512 0A22 43 mov b,e
|
|
1513 0A23 9B sbb e
|
|
1514 0A24 0A ldax b
|
|
1515 0A25 44 mov b,h
|
|
1516 0A26 9B sbb e
|
|
1517 0A27 0A ldax b
|
|
1518 0A28 46 mov b,m
|
|
1519 0A29 0A ldax b
|
|
1520 0A2A 0C inr c
|
|
1521 0A2B 47 mov b,a
|
|
1522 0A2C 0F rrc
|
|
1523 0A2D 0C inr c
|
|
1524 0A2E 48 mov c,b
|
|
1525 0A2F 96 sub m
|
|
1526 0A30 0A ldax b
|
|
1527 0A31 49 mov c,c
|
|
1528 0A32 A3 ana e
|
|
1529 0A33 0B dcx b
|
|
1530 0A34 4A mov c,d
|
|
1531 0A35 9B sbb e
|
|
1532 0A36 0A ldax b
|
|
1533 0A37 4B mov c,e
|
|
1534 0A38 9B sbb e
|
|
1535 0A39 0A ldax b
|
|
1536 0A3A 59 mov e,c
|
|
1537 0A3B 11 0B 5A lxi d,X5a0b
|
|
1538 0A3E C6 0C adi 0ch
|
|
1539 0A40 3D dcr a
|
|
1540 0A41 DF rst 3
|
|
1541 0A42 0B dcx b
|
|
1542 0A43 3E E5 mvi a,0e5h
|
|
1543 0A45 0B dcx b
|
|
1544 0A46 31 57 0C lxi sp,X0c57
|
|
1545 0A49 3C inr a
|
|
1546 0A4A EB xchg
|
|
1547 0A4B 0B dcx b
|
|
1548 0A4C 5D mov e,l
|
|
1549 0A4D 60 mov h,b
|
|
1550 0A4E 0D dcr c
|
|
1551 0A4F 00 nop
|
|
1552 0A50 63 X0a50: mov h,e
|
|
1553 0A51 00 nop
|
|
1554 0A52 00 nop
|
|
1555 0A53 45 mov b,l
|
|
1556 0A54 52 mov d,d
|
|
1557 0A55 09 dad b
|
|
1558 0A56 4D mov c,l
|
|
1559 0A57 A3 ana e
|
|
1560 0A58 0B dcx b
|
|
1561 0A59 31 57 0C lxi sp,X0c57
|
|
1562 0A5C 5B mov e,e
|
|
1563 0A5D 8E adc m
|
|
1564 0A5E 0A ldax b
|
|
1565 0A5F 48 mov c,b
|
|
1566 0A60 DF rst 3
|
|
1567 0A61 0D dcr c
|
|
1568 0A62 44 mov b,h
|
|
1569 0A63 55 mov d,l
|
|
1570 0A64 09 dad b
|
|
1571 0A65 37 stc
|
|
1572 0A66 68 mov l,b
|
|
1573 0A67 0C inr c
|
|
1574 0A68 db 38h
|
|
38
|
|
1575 0A69 71 mov m,c
|
|
1576 0A6A 0C inr c
|
|
1577 0A6B 3D dcr a
|
|
1578 0A6C DF rst 3
|
|
1579 0A6D 0B dcx b
|
|
1580 0A6E 3E E5 mvi a,0e5h
|
|
1581 0A70 0B dcx b
|
|
1582 0A71 5A mov e,d
|
|
1583 0A72 C6 0C adi 0ch
|
|
1584 0A74 4E mov c,m
|
|
1585 0A75 46 mov b,m
|
|
1586 0A76 0C inr c
|
|
1587 0A77 4F mov c,a
|
|
1588 0A78 46 mov b,m
|
|
1589 0A79 0C inr c
|
|
1590 0A7A 00 nop
|
|
1591 0A7B 33 X0a7b: inx sp
|
|
1592 0A7C A8 xra b
|
|
1593 0A7D 12 stax d
|
|
1594 0A7E 34 inr m
|
|
1595 0A7F AC xra h
|
|
1596 0A80 12 stax d
|
|
1597 0A81 35 dcr m
|
|
1598 0A82 4A mov c,d
|
|
1599 0A83 13 inx d
|
|
1600 0A84 36 A4 mvi m,0a4h
|
|
1601 0A86 12 stax d
|
|
1602 0A87 37 stc
|
|
1603 0A88 60 mov h,b
|
|
1604 0A89 0D dcr c
|
|
1605 0A8A db 38h
|
|
38
|
|
1606 0A8B A7 ana a
|
|
1607 0A8C 0D dcr c
|
|
1608 0A8D 00 nop
|
|
1609 0A8E 21 C2 16 lxi h,X16c2
|
|
1610 0A91 22 40 21 shld X2140
|
|
1611 0A94 E1 pop h
|
|
1612 0A95 C9 ret
|
|
|
|
1614 0A96 3E 48 mvi a,48h
|
|
1615 0A98 32 7E 20 sta X207e
|
|
1616 0A9B 21 00 00 lxi h,0
|
|
1617 0A9E 22 30 21 shld X2130
|
|
1618 0AA1 E1 pop h
|
|
1619 0AA2 21 15 0A X0aa2: lxi h,X0a15
|
|
1620 0AA5 E5 push h
|
|
1621 0AA6 3A 7D 20 lda X207d
|
|
1622 0AA9 B7 ora a
|
|
1623 0AAA C0 rnz
|
|
1624 0AAB 21 D9 0A lxi h,X0ad9
|
|
1625 0AAE CD F7 09 call X09f7
|
|
1626 0AB1 3A B9 21 lda X21b9
|
|
1627 0AB4 B7 ora a
|
|
1628 0AB5 C0 rnz
|
|
1629 0AB6 21 30 21 lxi h,X2130
|
|
1630 0AB9 3A 4B 21 lda X214b
|
|
1631 0ABC B7 ora a
|
|
1632 0ABD 5F mov e,a
|
|
1633 0ABE C2 C2 0A jnz X0ac2
|
|
1634 0AC1 1C inr e
|
|
1635 0AC2 7E X0ac2: mov a,m
|
|
1636 0AC3 E5 push h
|
|
1637 0AC4 D5 push d
|
|
1638 0AC5 21 F5 0A lxi h,X0af5
|
|
1639 0AC8 47 mov b,a
|
|
1640 0AC9 CD F7 09 call X09f7
|
|
1641 0ACC D1 pop d
|
|
1642 0ACD E1 pop h
|
|
1643 0ACE 3A B9 21 lda X21b9
|
|
1644 0AD1 B7 ora a
|
|
1645 0AD2 C8 rz
|
|
1646 0AD3 23 inx h
|
|
1647 0AD4 1D dcr e
|
|
1648 0AD5 C2 C2 0A jnz X0ac2
|
|
1649 0AD8 C9 ret
|
|
|
|
1651 0AD9 44 X0ad9: mov b,h
|
|
1652 0ADA 1E 18 mvi e,18h
|
|
1653 0ADC 42 mov b,d
|
|
1654 0ADD 07 rlc
|
|
1655 0ADE db 18h
|
|
18
|
|
1656 0ADF 43 mov b,e
|
|
1657 0AE0 15 dcr d
|
|
1658 0AE1 db 18h
|
|
18
|
|
1659 0AE2 48 mov c,b
|
|
1660 0AE3 53 mov d,e
|
|
1661 0AE4 db 18h
|
|
18
|
|
1662 0AE5 41 mov b,c
|
|
1663 0AE6 FE 17 cpi 17h
|
|
1664 0AE8 72 mov m,d
|
|
1665 0AE9 A6 ana m
|
|
1666 0AEA 15 dcr d
|
|
1667 0AEB 66 mov h,m
|
|
1668 0AEC 53 mov d,e
|
|
1669 0AED db 18h
|
|
18
|
|
1670 0AEE 78 mov a,b
|
|
1671 0AEF DF rst 3
|
|
1672 0AF0 12 stax d
|
|
1673 0AF1 79 mov a,c
|
|
1674 0AF2 64 mov h,h
|
|
1675 0AF3 db 8
|
|
08
|
|
1676 0AF4 00 nop
|
|
1677 0AF5 63 X0af5: mov h,e
|
|
1678 0AF6 C1 pop b
|
|
1679 0AF7 0C inr c
|
|
1680 0AF8 71 mov m,c
|
|
1681 0AF9 16 0C mvi d,0ch
|
|
1682 0AFB 6E mov l,m
|
|
1683 0AFC 03 inx b
|
|
1684 0AFD 0D dcr c
|
|
1685 0AFE 4A mov c,d
|
|
1686 0AFF 41 mov b,c
|
|
1687 0B00 15 dcr d
|
|
1688 0B01 4B mov c,e
|
|
1689 0B02 FC 14 6C cm X6c14
|
|
1690 0B05 db 0edh
|
|
ED
|
|
1691 0B06 13 inx d
|
|
1692 0B07 6D mov l,l
|
|
1693 0B08 7F mov a,a
|
|
1694 0B09 0C inr c
|
|
1695 0B0A 68 mov l,b
|
|
1696 0B0B F2 13 67 jp X6713
|
|
1697 0B0E CF rst 1
|
|
1698 0B0F 0D dcr c
|
|
1699 0B10 00 nop
|
|
1700 0B11 21 19 0B lxi h,X0b19
|
|
1701 0B14 22 40 21 shld X2140
|
|
1702 0B17 E1 pop h
|
|
1703 0B18 C9 ret
|
|
|
|
1705 0B19 47 X0b19: mov b,a
|
|
1706 0B1A FE 20 cpi 20h
|
|
1707 0B1C DA B2 08 jc X08b2
|
|
1708 0B1F FE 1B cpi 1bh
|
|
1709 0B21 21 51 21 lxi h,X2151
|
|
1710 0B24 C2 2E 0B jnz X0b2e
|
|
1711 0B27 21 AB 09 lxi h,X09ab
|
|
1712 0B2A 22 40 21 shld X2140
|
|
1713 0B2D C9 ret
|
|
|
|
1715 0B2E 7E X0b2e: mov a,m
|
|
1716 0B2F B7 ora a
|
|
1717 0B30 C2 42 0B jnz X0b42
|
|
1718 0B33 36 01 mvi m,1
|
|
1719 0B35 78 mov a,b
|
|
1720 0B36 D6 20 sui 20h
|
|
1721 0B38 32 52 21 sta X2152
|
|
1722 0B3B 21 19 0B lxi h,X0b19
|
|
1723 0B3E 22 40 21 shld X2140
|
|
1724 0B41 C9 ret
|
|
|
|
1726 0B42 36 00 X0b42: mvi m,0
|
|
1727 0B44 78 mov a,b
|
|
1728 0B45 D6 20 sui 20h
|
|
1729 0B47 FE 50 cpi 50h
|
|
1730 0B49 D2 4F 0B jnc X0b4f
|
|
1731 0B4C 32 F8 20 sta X20f8
|
|
1732 0B4F CD BF 11 X0b4f: call X11bf
|
|
1733 0B52 3A 52 21 lda X2152
|
|
1734 0B55 04 inr b
|
|
1735 0B56 B8 cmp b
|
|
1736 0B57 D2 5D 0B jnc X0b5d
|
|
1737 0B5A 32 F9 20 sta X20f9
|
|
1738 0B5D CD 15 0A X0b5d: call X0a15
|
|
1739 0B60 C3 36 16 jmp X1636
|
|
|
|
1741 0B63 AF X0b63: xra a
|
|
1742 0B64 32 A2 21 sta X21a2
|
|
1743 0B67 CD AD 10 call X10ad
|
|
1744 0B6A 0E 50 mvi c,50h
|
|
1745 0B6C CD F9 10 call X10f9
|
|
1746 0B6F CD 4C 11 call X114c
|
|
1747 0B72 0E 50 mvi c,50h
|
|
1748 0B74 C3 89 0B jmp X0b89
|
|
|
|
1750 0B77 3E 01 X0b77: mvi a,1
|
|
1751 0B79 32 A2 21 sta X21a2
|
|
1752 0B7C CD AD 10 call X10ad
|
|
1753 0B7F 0E 84 mvi c,84h
|
|
1754 0B81 CD F9 10 call X10f9
|
|
1755 0B84 CD 4C 11 call X114c
|
|
1756 0B87 0E 84 mvi c,84h
|
|
1757 0B89 AF X0b89: xra a
|
|
1758 0B8A 32 55 21 sta X2155
|
|
1759 0B8D CD BF 11 call X11bf
|
|
1760 0B90 78 mov a,b
|
|
1761 0B91 32 56 21 sta X2156
|
|
1762 0B94 79 mov a,c
|
|
1763 0B95 32 50 20 sta X2050
|
|
1764 0B98 CD 42 03 call X0342
|
|
1765 0B9B CD 48 18 call X1848
|
|
1766 0B9E 3E 01 mvi a,1
|
|
1767 0BA0 C3 AA 0F jmp X0faa
|
|
|
|
1769 0BA3 21 F9 20 lxi h,X20f9
|
|
1770 0BA6 3A 55 21 lda X2155
|
|
1771 0BA9 47 mov b,a
|
|
1772 0BAA 7E mov a,m
|
|
1773 0BAB B8 cmp b
|
|
1774 0BAC CA B8 0B jz X0bb8
|
|
1775 0BAF B7 ora a
|
|
1776 0BB0 C8 rz
|
|
1777 0BB1 21 F9 20 lxi h,X20f9
|
|
1778 0BB4 35 dcr m
|
|
1779 0BB5 C3 36 16 jmp X1636
|
|
|
|
1781 0BB8 3A A6 21 X0bb8: lda X21a6
|
|
1782 0BBB E6 80 ani 80h
|
|
1783 0BBD CA D9 0B jz X0bd9
|
|
1784 0BC0 0E 01 mvi c,1
|
|
1785 0BC2 CD 8E 10 call X108e
|
|
1786 0BC5 3E FF mvi a,0ffh
|
|
1787 0BC7 32 C3 21 sta X21c3
|
|
1788 0BCA 35 dcr m
|
|
1789 0BCB CD EB 0F call X0feb
|
|
1790 0BCE 3A C3 21 X0bce: lda X21c3
|
|
1791 0BD1 B7 ora a
|
|
1792 0BD2 C2 CE 0B jnz X0bce
|
|
1793 0BD5 32 F4 20 sta X20f4
|
|
1794 0BD8 C9 ret
|
|
|
|
1796 0BD9 CD 2D 10 X0bd9: call X102d
|
|
1797 0BDC C3 12 10 jmp X1012
|
|
|
|
1799 0BDF 21 78 21 lxi h,X2178
|
|
1800 0BE2 36 01 mvi m,1
|
|
1801 0BE4 C9 ret
|
|
|
|
1803 0BE5 21 78 21 lxi h,X2178
|
|
1804 0BE8 36 00 mvi m,0
|
|
1805 0BEA C9 ret
|
|
|
|
1807 0BEB 21 A7 21 lxi h,X21a7
|
|
1808 0BEE 7E mov a,m
|
|
1809 0BEF F6 20 ori 20h
|
|
1810 0BF1 77 mov m,a
|
|
1811 0BF2 3A A8 21 X0bf2: lda X21a8
|
|
1812 0BF5 E6 80 ani 80h
|
|
1813 0BF7 26 08 mvi h,8
|
|
1814 0BF9 CA FE 0B jz X0bfe
|
|
1815 0BFC 26 48 mvi h,48h
|
|
1816 0BFE 6C X0bfe: mov l,h
|
|
1817 0BFF 22 FD 20 shld X20fd
|
|
1818 0C02 22 FF 20 shld X20ff
|
|
1819 0C05 AF xra a
|
|
1820 0C06 32 FC 20 sta X20fc
|
|
1821 0C09 C9 ret
|
|
|
|
1823 0C0A 26 88 mvi h,88h
|
|
1824 0C0C C3 11 0C jmp X0c11
|
|
|
|
1826 0C0F 26 08 mvi h,8
|
|
1827 0C11 6C X0c11: mov l,h
|
|
1828 0C12 22 FD 20 shld X20fd
|
|
1829 0C15 C9 ret
|
|
|
|
1831 0C16 21 45 21 lxi h,X2145
|
|
1832 0C19 78 mov a,b
|
|
1833 0C1A B7 ora a
|
|
1834 0C1B C2 23 0C jnz X0c23
|
|
1835 0C1E 7E mov a,m
|
|
1836 0C1F E6 F0 ani 0f0h
|
|
1837 0C21 77 mov m,a
|
|
1838 0C22 C9 ret
|
|
|
|
1840 0C23 D6 05 X0c23: sui 5
|
|
1841 0C25 F0 rp
|
|
1842 0C26 47 mov b,a
|
|
1843 0C27 AF xra a
|
|
1844 0C28 37 stc
|
|
1845 0C29 17 X0c29: ral
|
|
1846 0C2A 04 inr b
|
|
1847 0C2B C2 29 0C jnz X0c29
|
|
1848 0C2E B6 ora m
|
|
1849 0C2F 77 mov m,a
|
|
1850 0C30 C9 ret
|
|
|
|
1852 0C31 13 X0c31: inx d
|
|
1853 0C32 3A 7E 20 X0c32: lda X207e
|
|
1854 0C35 47 mov b,a
|
|
1855 0C36 21 4A 0C lxi h,X0c4a
|
|
1856 0C39 23 X0c39: inx h
|
|
1857 0C3A 23 inx h
|
|
1858 0C3B 7E mov a,m
|
|
1859 0C3C B7 ora a
|
|
1860 0C3D C8 rz
|
|
1861 0C3E B8 cmp b
|
|
1862 0C3F C2 39 0C jnz X0c39
|
|
1863 0C42 23 inx h
|
|
1864 0C43 7E mov a,m
|
|
1865 0C44 12 stax d
|
|
1866 0C45 C9 ret
|
|
|
|
1868 0C46 21 FC 20 X0c46: lxi h,X20fc
|
|
1869 0C49 34 inr m
|
|
1870 0C4A 34 X0c4a: inr m
|
|
1871 0C4B C9 ret
|
|
|
|
1873 0C4C 41 mov b,c
|
|
1874 0C4D 48 mov c,b
|
|
1875 0C4E 42 mov b,d
|
|
1876 0C4F db 8
|
|
08
|
|
1877 0C50 db 30h
|
|
30
|
|
1878 0C51 88 adc b
|
|
1879 0C52 31 00 32 lxi sp,X3200
|
|
1880 0C55 80 add b
|
|
1881 0C56 00 nop
|
|
1882 0C57 21 79 20 X0c57: lxi h,X2079
|
|
1883 0C5A 7E mov a,m
|
|
1884 0C5B B7 ora a
|
|
1885 0C5C CA 14 0A jz X0a14
|
|
1886 0C5F 36 81 mvi m,81h
|
|
1887 0C61 E1 pop h
|
|
1888 0C62 21 AD 05 X0c62: lxi h,X05ad
|
|
1889 0C65 C3 18 0A jmp X0a18
|
|
|
|
1891 0C68 21 02 21 lxi h,X2102
|
|
1892 0C6B 11 F8 20 lxi d,X20f8
|
|
1893 0C6E C3 77 0C jmp X0c77
|
|
|
|
1895 0C71 21 F8 20 lxi h,X20f8
|
|
1896 0C74 11 02 21 lxi d,X2102
|
|
1897 0C77 06 0B X0c77: mvi b,0bh
|
|
1898 0C79 CD 8B 03 call memmove
|
|
1899 0C7C C3 36 16 jmp X1636
|
|
|
|
1901 0C7F 21 8A 0C lxi h,X0c8a
|
|
1902 0C82 78 mov a,b
|
|
1903 0C83 B7 ora a
|
|
1904 0C84 CA 97 0C jz X0c97
|
|
1905 0C87 C3 FF 09 jmp X09ff
|
|
|
|
1907 0C8A 01 A2 0C X0c8a: lxi b,X0ca2
|
|
1908 0C8D 04 inr b
|
|
1909 0C8E A7 ana a
|
|
1910 0C8F 0C inr c
|
|
1911 0C90 05 dcr b
|
|
1912 0C91 B3 ora e
|
|
1913 0C92 0C inr c
|
|
1914 0C93 07 rlc
|
|
1915 0C94 BB cmp e
|
|
1916 0C95 0C inr c
|
|
1917 0C96 00 nop
|
|
1918 0C97 32 FB 20 X0c97: sta X20fb
|
|
1919 0C9A 21 FA 20 lxi h,X20fa
|
|
1920 0C9D 7E mov a,m
|
|
1921 0C9E F6 F7 ori 0f7h
|
|
1922 0CA0 77 mov m,a
|
|
1923 0CA1 C9 ret
|
|
|
|
1925 0CA2 3E FB X0ca2: mvi a,0fbh
|
|
1926 0CA4 C3 B5 0C jmp X0cb5
|
|
|
|
1928 0CA7 3A C8 21 lda X21c8
|
|
1929 0CAA B7 ora a
|
|
1930 0CAB C2 BB 0C jnz X0cbb
|
|
1931 0CAE 3E FD mvi a,0fdh
|
|
1932 0CB0 C3 B5 0C jmp X0cb5
|
|
|
|
1934 0CB3 3E FE mvi a,0feh
|
|
1935 0CB5 21 FA 20 X0cb5: lxi h,X20fa
|
|
1936 0CB8 A6 ana m
|
|
1937 0CB9 77 mov m,a
|
|
1938 0CBA C9 ret
|
|
|
|
1940 0CBB 3E 80 X0cbb: mvi a,80h
|
|
1941 0CBD 32 FB 20 sta X20fb
|
|
1942 0CC0 C9 ret
|
|
|
|
1944 0CC1 3A 30 21 lda X2130
|
|
1945 0CC4 B7 ora a
|
|
1946 0CC5 C0 rnz
|
|
1947 0CC6 21 72 21 lxi h,X2172
|
|
1948 0CC9 7E mov a,m
|
|
1949 0CCA F6 04 ori 4
|
|
1950 0CCC 77 mov m,a
|
|
1951 0CCD C9 ret
|
|
|
|
1953 0CCE 3E FB mvi a,0fbh
|
|
1954 0CD0 CD BF 0D call X0dbf
|
|
1955 0CD3 3A A7 21 lda X21a7
|
|
1956 0CD6 E6 20 ani 20h
|
|
1957 0CD8 C2 E3 0C jnz X0ce3
|
|
1958 0CDB 36 DA mvi m,0dah
|
|
1959 0CDD 2B dcx h
|
|
1960 0CDE 36 2F mvi m,2fh
|
|
1961 0CE0 C3 F3 0E jmp X0ef3
|
|
|
|
1963 0CE3 36 3F X0ce3: mvi m,3fh
|
|
1964 0CE5 23 inx h
|
|
1965 0CE6 3E 31 mvi a,31h
|
|
1966 0CE8 CD B9 0D call X0db9
|
|
1967 0CEB DB 42 in 42h
|
|
1968 0CED 47 mov b,a
|
|
1969 0CEE 2F cma
|
|
1970 0CEF E6 06 ani 6
|
|
1971 0CF1 4F mov c,a
|
|
1972 0CF2 78 mov a,b
|
|
1973 0CF3 E6 08 ani 8
|
|
1974 0CF5 CA F9 0C jz X0cf9
|
|
1975 0CF8 0C inr c
|
|
1976 0CF9 79 X0cf9: mov a,c
|
|
1977 0CFA F6 30 ori 30h
|
|
1978 0CFC 77 mov m,a
|
|
1979 0CFD 23 inx h
|
|
1980 0CFE 36 E3 mvi m,0e3h
|
|
1981 0D00 C3 F3 0E jmp X0ef3
|
|
|
|
1983 0D03 3A B8 21 lda X21b8
|
|
1984 0D06 B7 ora a
|
|
1985 0D07 C0 rnz
|
|
1986 0D08 78 mov a,b
|
|
1987 0D09 21 72 21 lxi h,X2172
|
|
1988 0D0C FE 06 cpi 6
|
|
1989 0D0E CA 32 0D jz X0d32
|
|
1990 0D11 FE 05 cpi 5
|
|
1991 0D13 C0 rnz
|
|
1992 0D14 7E mov a,m
|
|
1993 0D15 F6 08 ori 8
|
|
1994 0D17 77 mov m,a
|
|
1995 0D18 C9 ret
|
|
|
|
1997 0D19 3E F7 mvi a,0f7h
|
|
1998 0D1B CD BF 0D call X0dbf
|
|
1999 0D1E 06 03 mvi b,3
|
|
2000 0D20 3A BD 21 lda X21bd
|
|
2001 0D23 B7 ora a
|
|
2002 0D24 78 mov a,b
|
|
2003 0D25 C2 29 0D jnz X0d29
|
|
2004 0D28 AF xra a
|
|
2005 0D29 F6 30 X0d29: ori 30h
|
|
2006 0D2B 77 mov m,a
|
|
2007 0D2C 23 inx h
|
|
2008 0D2D 36 EE mvi m,0eeh
|
|
2009 0D2F C3 F3 0E X0d2f: jmp X0ef3
|
|
|
|
2011 0D32 7E X0d32: mov a,m
|
|
2012 0D33 F6 01 ori 1
|
|
2013 0D35 77 mov m,a
|
|
2014 0D36 C9 ret
|
|
|
|
2016 0D37 3E FE mvi a,0feh
|
|
2017 0D39 CD BF 0D call X0dbf
|
|
2018 0D3C 3A F9 20 lda X20f9
|
|
2019 0D3F 47 mov b,a
|
|
2020 0D40 3A 01 21 lda X2101
|
|
2021 0D43 B7 ora a
|
|
2022 0D44 CA 4A 0D jz X0d4a
|
|
2023 0D47 3A 55 21 lda X2155
|
|
2024 0D4A 4F X0d4a: mov c,a
|
|
2025 0D4B 78 mov a,b
|
|
2026 0D4C 91 sub c
|
|
2027 0D4D 3C inr a
|
|
2028 0D4E CD 7A 0D call X0d7a
|
|
2029 0D51 CD BB 0D call X0dbb
|
|
2030 0D54 3A F8 20 lda X20f8
|
|
2031 0D57 3C inr a
|
|
2032 0D58 CD 7A 0D call X0d7a
|
|
2033 0D5B 36 D2 mvi m,0d2h
|
|
2034 0D5D C3 F3 0E jmp X0ef3
|
|
|
|
2036 0D60 DB 42 in 42h
|
|
2037 0D62 E6 04 ani 4
|
|
2038 0D64 C0 rnz
|
|
2039 0D65 0E 81 mvi c,81h
|
|
2040 0D67 CD 8E 10 call X108e
|
|
2041 0D6A 3E FF mvi a,0ffh
|
|
2042 0D6C D3 E2 out 0e2h
|
|
2043 0D6E 00 nop
|
|
2044 0D6F CD 88 14 X0d6f: call X1488
|
|
2045 0D72 DB 42 in 42h
|
|
2046 0D74 E6 04 ani 4
|
|
2047 0D76 C2 6F 0D jnz X0d6f
|
|
2048 0D79 C9 ret
|
|
|
|
2050 0D7A 5F X0d7a: mov e,a
|
|
2051 0D7B 16 30 mvi d,30h
|
|
2052 0D7D 0E 64 mvi c,64h
|
|
2053 0D7F CD 99 0D call X0d99
|
|
2054 0D82 CA 88 0D jz X0d88
|
|
2055 0D85 77 mov m,a
|
|
2056 0D86 23 inx h
|
|
2057 0D87 15 dcr d
|
|
2058 0D88 0E 0A X0d88: mvi c,0ah
|
|
2059 0D8A CD 99 0D call X0d99
|
|
2060 0D8D CA 93 0D jz X0d93
|
|
2061 0D90 15 dcr d
|
|
2062 0D91 77 mov m,a
|
|
2063 0D92 23 inx h
|
|
2064 0D93 7B X0d93: mov a,e
|
|
2065 0D94 F6 30 ori 30h
|
|
2066 0D96 77 mov m,a
|
|
2067 0D97 23 inx h
|
|
2068 0D98 C9 ret
|
|
|
|
2070 0D99 7B X0d99: mov a,e
|
|
2071 0D9A 06 30 mvi b,30h
|
|
2072 0D9C 04 X0d9c: inr b
|
|
2073 0D9D 91 sub c
|
|
2074 0D9E F2 9C 0D jp X0d9c
|
|
2075 0DA1 81 add c
|
|
2076 0DA2 05 dcr b
|
|
2077 0DA3 5F mov e,a
|
|
2078 0DA4 78 mov a,b
|
|
2079 0DA5 BA cmp d
|
|
2080 0DA6 C9 ret
|
|
|
|
2082 0DA7 3E 45 mvi a,45h
|
|
2083 0DA9 32 C7 21 sta X21c7
|
|
2084 0DAC CD 81 03 call X0381
|
|
2085 0DAF 3E 45 mvi a,45h
|
|
2086 0DB1 32 F4 20 sta X20f4
|
|
2087 0DB4 AF xra a
|
|
2088 0DB5 32 C7 21 sta X21c7
|
|
2089 0DB8 C9 ret
|
|
|
|
2091 0DB9 77 X0db9: mov m,a
|
|
2092 0DBA 23 inx h
|
|
2093 0DBB 36 3B X0dbb: mvi m,3bh
|
|
2094 0DBD 23 inx h
|
|
2095 0DBE C9 ret
|
|
|
|
2097 0DBF 21 72 21 X0dbf: lxi h,X2172
|
|
2098 0DC2 A6 ana m
|
|
2099 0DC3 77 mov m,a
|
|
2100 0DC4 21 5C 21 lxi h,X215c
|
|
2101 0DC7 36 1B mvi m,1bh
|
|
2102 0DC9 23 inx h
|
|
2103 0DCA 36 5B mvi m,5bh
|
|
2104 0DCC 23 inx h
|
|
2105 0DCD C9 ret
|
|
|
|
2107 0DCE 42 mov b,d
|
|
2108 0DCF 78 mov a,b
|
|
2109 0DD0 B7 ora a
|
|
2110 0DD1 C2 D8 0D jnz X0dd8
|
|
2111 0DD4 CD E5 0D call X0de5
|
|
2112 0DD7 C9 ret
|
|
|
|
2114 0DD8 FE 03 X0dd8: cpi 3
|
|
2115 0DDA C0 rnz
|
|
2116 0DDB CD EC 0D call X0dec
|
|
2117 0DDE C9 ret
|
|
|
|
2119 0DDF CD 23 0E call X0e23
|
|
2120 0DE2 B6 ora m
|
|
2121 0DE3 77 mov m,a
|
|
2122 0DE4 C9 ret
|
|
|
|
2124 0DE5 CD 23 0E X0de5: call X0e23
|
|
2125 0DE8 2F cma
|
|
2126 0DE9 A6 ana m
|
|
2127 0DEA 77 mov m,a
|
|
2128 0DEB C9 ret
|
|
|
|
2130 0DEC 21 91 21 X0dec: lxi h,X2191
|
|
2131 0DEF AF X0def: xra a
|
|
2132 0DF0 77 mov m,a
|
|
2133 0DF1 23 inx h
|
|
2134 0DF2 7D mov a,l
|
|
2135 0DF3 FE A2 cpi 0a2h
|
|
2136 0DF5 C2 EF 0D jnz X0def
|
|
2137 0DF8 C9 ret
|
|
|
|
2139 0DF9 CD 23 0E X0df9: call X0e23
|
|
2140 0DFC 0C X0dfc: inr c
|
|
2141 0DFD B7 ora a
|
|
2142 0DFE 1F rar
|
|
2143 0DFF DA 0B 0E jc X0e0b
|
|
2144 0E02 57 X0e02: mov d,a
|
|
2145 0E03 A6 ana m
|
|
2146 0E04 7A mov a,d
|
|
2147 0E05 CA FC 0D jz X0dfc
|
|
2148 0E08 C3 15 0E jmp X0e15
|
|
|
|
2150 0E0B 23 X0e0b: inx h
|
|
2151 0E0C 7D mov a,l
|
|
2152 0E0D FE A2 cpi 0a2h
|
|
2153 0E0F 3E 80 mvi a,80h
|
|
2154 0E11 C2 02 0E jnz X0e02
|
|
2155 0E14 0D dcr c
|
|
2156 0E15 3A 53 21 X0e15: lda X2153
|
|
2157 0E18 B9 cmp c
|
|
2158 0E19 DA 1D 0E jc X0e1d
|
|
2159 0E1C 79 mov a,c
|
|
2160 0E1D 32 F8 20 X0e1d: sta X20f8
|
|
2161 0E20 C3 36 16 jmp X1636
|
|
|
|
2163 0E23 3A F8 20 X0e23: lda X20f8
|
|
2164 0E26 4F mov c,a
|
|
2165 0E27 57 X0e27: mov d,a
|
|
2166 0E28 21 91 21 lxi h,X2191
|
|
2167 0E2B 0F X0e2b: rrc
|
|
2168 0E2C 0F rrc
|
|
2169 0E2D 0F rrc
|
|
2170 0E2E E6 1F ani 1fh
|
|
2171 0E30 85 add l
|
|
2172 0E31 6F mov l,a
|
|
2173 0E32 7A mov a,d
|
|
2174 0E33 E6 07 ani 7
|
|
2175 0E35 57 mov d,a
|
|
2176 0E36 3E 80 mvi a,80h
|
|
2177 0E38 15 X0e38: dcr d
|
|
2178 0E39 F8 rm
|
|
2179 0E3A 0F rrc
|
|
2180 0E3B C3 38 0E jmp X0e38
|
|
|
|
2182 0E3E 3A A5 21 X0e3e: lda X21a5
|
|
2183 0E41 21 7B 20 lxi h,X207b
|
|
2184 0E44 B6 ora m
|
|
2185 0E45 47 mov b,a
|
|
2186 0E46 C0 rnz
|
|
2187 0E47 DB 42 X0e47: in 42h
|
|
2188 0E49 E6 01 ani 1
|
|
2189 0E4B C8 rz
|
|
2190 0E4C 21 C1 21 lxi h,X21c1
|
|
2191 0E4F 7E mov a,m
|
|
2192 0E50 B7 ora a
|
|
2193 0E51 36 00 mvi m,0
|
|
2194 0E53 2B dcx h
|
|
2195 0E54 C8 rz
|
|
2196 0E55 7E mov a,m
|
|
2197 0E56 D3 00 out 0
|
|
2198 0E58 C9 ret
|
|
|
|
2200 0E59 F3 X0e59: di
|
|
2201 0E5A CD 3E 0E call X0e3e
|
|
2202 0E5D FB ei
|
|
2203 0E5E 78 mov a,b
|
|
2204 0E5F B7 ora a
|
|
2205 0E60 C2 6D 0E jnz X0e6d
|
|
2206 0E63 DB 42 in 42h
|
|
2207 0E65 E6 01 ani 1
|
|
2208 0E67 C8 rz
|
|
2209 0E68 3A C2 21 lda X21c2
|
|
2210 0E6B B7 ora a
|
|
2211 0E6C C0 rnz
|
|
2212 0E6D 21 73 21 X0e6d: lxi h,X2173
|
|
2213 0E70 7E mov a,m
|
|
2214 0E71 B7 ora a
|
|
2215 0E72 CA 79 0E jz X0e79
|
|
2216 0E75 2A 74 21 lhld X2174
|
|
2217 0E78 E9 pchl
|
|
|
|
2219 0E79 3A 72 21 X0e79: lda X2172
|
|
2220 0E7C B7 ora a
|
|
2221 0E7D C8 rz
|
|
2222 0E7E 1E 00 mvi e,0
|
|
2223 0E80 1F X0e80: rar
|
|
2224 0E81 DA 89 0E jc X0e89
|
|
2225 0E84 1C inr e
|
|
2226 0E85 1C inr e
|
|
2227 0E86 C3 80 0E jmp X0e80
|
|
|
|
2229 0E89 16 00 X0e89: mvi d,0
|
|
2230 0E8B 21 94 0E lxi h,X0e94
|
|
2231 0E8E 19 dad d
|
|
2232 0E8F 7E mov a,m
|
|
2233 0E90 23 inx h
|
|
2234 0E91 66 mov h,m
|
|
2235 0E92 6F mov l,a
|
|
2236 0E93 E9 pchl
|
|
|
|
2238 0E94 37 X0e94: stc
|
|
2239 0E95 0D dcr c
|
|
2240 0E96 F0 rp
|
|
2241 0E97 12 stax d
|
|
2242 0E98 CE 0C aci 0ch
|
|
2243 0E9A 19 dad d
|
|
2244 0E9B 0D dcr c
|
|
2245 0E9C 13 inx d
|
|
2246 0E9D 09 dad b
|
|
2247 0E9E A0 ana b
|
|
2248 0E9F 0E 21 mvi c,21h
|
|
2249 0EA1 5C mov e,h
|
|
2250 0EA2 db 20h
|
|
20
|
|
2251 0EA3 46 mov b,m
|
|
2252 0EA4 54 mov d,h
|
|
2253 0EA5 5D mov e,l
|
|
2254 0EA6 13 inx d
|
|
2255 0EA7 0E 08 mvi c,8
|
|
2256 0EA9 1A X0ea9: ldax d
|
|
2257 0EAA 77 mov m,a
|
|
2258 0EAB 23 inx h
|
|
2259 0EAC 13 inx d
|
|
2260 0EAD 0D dcr c
|
|
2261 0EAE C2 A9 0E jnz X0ea9
|
|
2262 0EB1 21 43 21 lxi h,X2143
|
|
2263 0EB4 35 dcr m
|
|
2264 0EB5 7E mov a,m
|
|
2265 0EB6 4F mov c,a
|
|
2266 0EB7 C2 C1 0E jnz X0ec1
|
|
2267 0EBA 21 72 21 lxi h,X2172
|
|
2268 0EBD 7E mov a,m
|
|
2269 0EBE E6 DF ani 0dfh
|
|
2270 0EC0 77 mov m,a
|
|
2271 0EC1 3A A5 21 X0ec1: lda X21a5
|
|
2272 0EC4 B7 ora a
|
|
2273 0EC5 C2 CF 0E jnz X0ecf
|
|
2274 0EC8 79 mov a,c
|
|
2275 0EC9 FE 05 cpi 5
|
|
2276 0ECB D2 D2 0E jnc X0ed2
|
|
2277 0ECE AF xra a
|
|
2278 0ECF 32 44 21 X0ecf: sta X2144
|
|
2279 0ED2 78 X0ed2: mov a,b
|
|
2280 0ED3 E6 80 ani 80h
|
|
2281 0ED5 17 ral
|
|
2282 0ED6 3F cmc
|
|
2283 0ED7 1F rar
|
|
2284 0ED8 32 73 21 sta X2173
|
|
2285 0EDB 21 A0 0E lxi h,X0ea0
|
|
2286 0EDE 22 74 21 shld X2174
|
|
2287 0EE1 78 X0ee1: mov a,b
|
|
2288 0EE2 E6 7F ani 7fh
|
|
2289 0EE4 47 mov b,a
|
|
2290 0EE5 3A A5 21 lda X21a5
|
|
2291 0EE8 21 7B 20 lxi h,X207b
|
|
2292 0EEB B6 ora m
|
|
2293 0EEC 78 mov a,b
|
|
2294 0EED C2 93 05 jnz X0593
|
|
2295 0EF0 D3 00 out 0
|
|
2296 0EF2 C9 ret
|
|
|
|
2298 0EF3 21 01 0F X0ef3: lxi h,X0f01
|
|
2299 0EF6 22 74 21 shld X2174
|
|
2300 0EF9 AF xra a
|
|
2301 0EFA 32 71 21 sta X2171
|
|
2302 0EFD 3C inr a
|
|
2303 0EFE 32 73 21 sta X2173
|
|
2304 0F01 21 71 21 X0f01: lxi h,X2171
|
|
2305 0F04 7E mov a,m
|
|
2306 0F05 34 inr m
|
|
2307 0F06 21 5C 21 lxi h,X215c
|
|
2308 0F09 85 add l
|
|
2309 0F0A 6F mov l,a
|
|
2310 0F0B 46 mov b,m
|
|
2311 0F0C 78 mov a,b
|
|
2312 0F0D B7 ora a
|
|
2313 0F0E F2 E1 0E jp X0ee1
|
|
2314 0F11 AF xra a
|
|
2315 0F12 32 73 21 sta X2173
|
|
2316 0F15 C3 E1 0E jmp X0ee1
|
|
|
|
2318 0F18 E5 X0f18: push h
|
|
2319 0F19 D5 push d
|
|
2320 0F1A 57 mov d,a
|
|
2321 0F1B 3A A7 21 lda X21a7
|
|
2322 0F1E E6 10 ani 10h
|
|
2323 0F20 CA 2B 0F jz X0f2b
|
|
2324 0F23 7A mov a,d
|
|
2325 0F24 D6 91 sui 91h
|
|
2326 0F26 E6 FD ani 0fdh
|
|
2327 0F28 CA 61 0F jz X0f61
|
|
2328 0F2B 21 72 21 X0f2b: lxi h,X2172
|
|
2329 0F2E 7E mov a,m
|
|
2330 0F2F F6 20 ori 20h
|
|
2331 0F31 77 mov m,a
|
|
2332 0F32 21 43 21 X0f32: lxi h,X2143
|
|
2333 0F35 7E mov a,m
|
|
2334 0F36 34 inr m
|
|
2335 0F37 21 5C 20 lxi h,X205c
|
|
2336 0F3A 5F mov e,a
|
|
2337 0F3B 85 add l
|
|
2338 0F3C 6F mov l,a
|
|
2339 0F3D 72 mov m,d
|
|
2340 0F3E 3E 8D mvi a,8dh
|
|
2341 0F40 BA cmp d
|
|
2342 0F41 C2 4E 0F jnz X0f4e
|
|
2343 0F44 3A A8 21 lda X21a8
|
|
2344 0F47 E6 20 ani 20h
|
|
2345 0F49 16 8A mvi d,8ah
|
|
2346 0F4B C2 32 0F jnz X0f32
|
|
2347 0F4E 3A A5 21 X0f4e: lda X21a5
|
|
2348 0F51 B7 ora a
|
|
2349 0F52 C2 5B 0F jnz X0f5b
|
|
2350 0F55 3E 05 mvi a,5
|
|
2351 0F57 BB cmp e
|
|
2352 0F58 3E 00 mvi a,0
|
|
2353 0F5A 1F rar
|
|
2354 0F5B 32 44 21 X0f5b: sta X2144
|
|
2355 0F5E D1 X0f5e: pop d
|
|
2356 0F5F E1 pop h
|
|
2357 0F60 C9 ret
|
|
|
|
2359 0F61 7A X0f61: mov a,d
|
|
2360 0F62 E6 7F ani 7fh
|
|
2361 0F64 57 mov d,a
|
|
2362 0F65 21 C1 21 lxi h,X21c1
|
|
2363 0F68 7E mov a,m
|
|
2364 0F69 B7 ora a
|
|
2365 0F6A C2 75 0F jnz X0f75
|
|
2366 0F6D 2B dcx h
|
|
2367 0F6E 7E mov a,m
|
|
2368 0F6F BA cmp d
|
|
2369 0F70 C2 75 0F jnz X0f75
|
|
2370 0F73 23 inx h
|
|
2371 0F74 72 mov m,d
|
|
2372 0F75 4A X0f75: mov c,d
|
|
2373 0F76 06 02 mvi b,2
|
|
2374 0F78 CD 7E 0F call X0f7e
|
|
2375 0F7B C3 5E 0F jmp X0f5e
|
|
|
|
2377 0F7E 3A A7 21 X0f7e: lda X21a7
|
|
2378 0F81 E6 10 ani 10h
|
|
2379 0F83 C8 rz
|
|
2380 0F84 3A A5 21 lda X21a5
|
|
2381 0F87 B7 ora a
|
|
2382 0F88 C0 rnz
|
|
2383 0F89 79 mov a,c
|
|
2384 0F8A 21 BF 21 lxi h,X21bf
|
|
2385 0F8D FE 13 cpi 13h
|
|
2386 0F8F 78 mov a,b
|
|
2387 0F90 CA 9E 0F jz X0f9e
|
|
2388 0F93 2F cma
|
|
2389 0F94 A6 ana m
|
|
2390 0F95 77 mov m,a
|
|
2391 0F96 F5 push psw
|
|
2392 0F97 E6 02 ani 2
|
|
2393 0F99 32 C4 21 sta X21c4
|
|
2394 0F9C F1 pop psw
|
|
2395 0F9D C0 rnz
|
|
2396 0F9E B6 X0f9e: ora m
|
|
2397 0F9F 77 mov m,a
|
|
2398 0FA0 79 mov a,c
|
|
2399 0FA1 21 C0 21 lxi h,X21c0
|
|
2400 0FA4 BE cmp m
|
|
2401 0FA5 C8 rz
|
|
2402 0FA6 77 mov m,a
|
|
2403 0FA7 23 inx h
|
|
2404 0FA8 77 mov m,a
|
|
2405 0FA9 C9 ret
|
|
|
|
;
|
|
; Main loop?
|
|
;
|
|
; Absent any interrupts, execution gravitates here:
|
|
;
|
|
; 0FAA:
|
|
; ...
|
|
; call 1488
|
|
; call 1493 ; read port 0x42 (check flags buffer)
|
|
; call 06aa ; check byte at [2068]
|
|
; cli
|
|
; call 0e3e ; fetch byte at [21A5], OR byte at [207B]
|
|
; sti
|
|
; ; return byte at [2172] in A
|
|
; jmp 0FAE
|
|
;
|
|
2423 0FAA 21 7F 20 X0faa: lxi h,X207f
|
|
2424 0FAD 86 add m
|
|
2425 0FAE BE X0fae: cmp m
|
|
2426 0FAF C8 rz
|
|
2427 0FB0 E5 push h
|
|
2428 0FB1 F5 push psw
|
|
2429 0FB2 3A 7B 20 lda X207b
|
|
2430 0FB5 B7 ora a
|
|
2431 0FB6 CC 88 14 cz X1488
|
|
2432 0FB9 F1 pop psw
|
|
2433 0FBA E1 pop h
|
|
2434 0FBB C3 AE 0F jmp X0fae
|
|
;
|
|
; End of main loop?
|
|
;
|
|
|
|
2439 0FBE 2A 4E 20 X0fbe: lhld scratch_start ; HL = [0x204e]
|
|
2440 0FC1 7C mov a,h
|
|
2441 0FC2 F6 F0 ori 0f0h
|
|
2442 0FC4 67 mov h,a
|
|
2443 0FC5 22 4E 20 shld scratch_start ; update [0x204e]
|
|
2444 0FC8 3A 50 20 X0fc8: lda X2050
|
|
2445 0FCB 47 X0fcb: mov b,a
|
|
2446 0FCC 7C mov a,h
|
|
2447 0FCD E6 0F ani 0fh
|
|
2448 0FCF F6 20 ori 20h
|
|
2449 0FD1 67 mov h,a
|
|
2450 0FD2 C6 10 adi 10h
|
|
2451 0FD4 57 mov d,a
|
|
2452 0FD5 5D mov e,l
|
|
2453 0FD6 3E FF mvi a,0ffh
|
|
2454 0FD8 36 00 X0fd8: mvi m,0
|
|
2455 0FDA 12 stax d
|
|
2456 0FDB 13 inx d
|
|
2457 0FDC 23 inx h
|
|
2458 0FDD 05 dcr b
|
|
2459 0FDE C2 D8 0F jnz X0fd8
|
|
2460 0FE1 3C inr a
|
|
2461 0FE2 32 C3 21 sta X21c3
|
|
2462 0FE5 C9 ret
|
|
|
|
2464 0FE6 06 FF X0fe6: mvi b,0ffh
|
|
2465 0FE8 C3 ED 0F jmp X0fed
|
|
|
|
2467 0FEB 06 01 X0feb: mvi b,1
|
|
2468 0FED 21 55 21 X0fed: lxi h,X2155
|
|
2469 0FF0 56 mov d,m
|
|
2470 0FF1 23 inx h
|
|
2471 0FF2 5E mov e,m
|
|
2472 0FF3 78 mov a,b
|
|
2473 0FF4 B7 ora a
|
|
2474 0FF5 7A mov a,d
|
|
2475 0FF6 F2 FA 0F jp X0ffa
|
|
2476 0FF9 7B mov a,e
|
|
2477 0FFA CD E6 13 X0ffa: call X13e6
|
|
2478 0FFD 7B mov a,e
|
|
2479 0FFE 92 sub d
|
|
2480 0FFF 4F X0fff: mov c,a
|
|
2481 1000 3A 2B 21 lda X212b
|
|
2482 1003 56 X1003: mov d,m
|
|
2483 1004 77 mov m,a
|
|
2484 1005 78 mov a,b
|
|
2485 1006 85 add l
|
|
2486 1007 6F mov l,a
|
|
2487 1008 0D dcr c
|
|
2488 1009 7A mov a,d
|
|
2489 100A F2 03 10 jp X1003
|
|
2490 100D E6 7F ani 7fh
|
|
2491 100F 32 2B 21 sta X212b
|
|
2492 1012 3E FF X1012: mvi a,0ffh
|
|
2493 1014 32 0E 21 sta X210e
|
|
2494 1017 C3 36 16 jmp X1636
|
|
|
|
2496 101A CD 91 11 X101a: call X1191
|
|
2497 101D 3A 56 21 lda X2156
|
|
2498 1020 CD 2F 12 call X122f
|
|
2499 1023 CD E6 0F call X0fe6
|
|
2500 1026 3A 55 21 lda X2155
|
|
2501 1029 3D dcr a
|
|
2502 102A C3 3E 10 jmp X103e
|
|
|
|
2504 102D CD 91 11 X102d: call X1191
|
|
2505 1030 3A 55 21 lda X2155
|
|
2506 1033 3D dcr a
|
|
2507 1034 CD 2F 12 call X122f
|
|
2508 1037 CD EB 0F call X0feb
|
|
2509 103A 3A 56 21 lda X2156
|
|
2510 103D 3D dcr a
|
|
2511 103E CD CE 11 X103e: call X11ce
|
|
2512 1041 FB ei
|
|
2513 1042 32 7A 20 sta X207a
|
|
2514 1045 21 56 21 lxi h,X2156
|
|
2515 1048 7E mov a,m
|
|
2516 1049 2B dcx h
|
|
2517 104A 96 sub m
|
|
2518 104B FE 17 cpi 17h
|
|
2519 104D C0 rnz
|
|
2520 104E 21 7A 20 X104e: lxi h,X207a
|
|
2521 1051 7E mov a,m
|
|
2522 1052 36 00 mvi m,0
|
|
2523 1054 B7 ora a
|
|
2524 1055 C8 rz
|
|
2525 1056 2A 56 20 lhld X2056
|
|
2526 1059 EB xchg
|
|
2527 105A 2A 58 20 lhld X2058
|
|
2528 105D 72 mov m,d
|
|
2529 105E 23 inx h
|
|
2530 105F 73 mov m,e
|
|
2531 1060 2A 79 21 lhld X2179
|
|
2532 1063 EB xchg
|
|
2533 1064 2A 75 20 lhld X2075
|
|
2534 1067 72 mov m,d
|
|
2535 1068 23 inx h
|
|
2536 1069 73 mov m,e
|
|
2537 106A 21 56 20 X106a: lxi h,X2056
|
|
2538 106D 22 58 20 shld X2058
|
|
2539 1070 22 75 20 shld X2075
|
|
2540 1073 C9 ret
|
|
|
|
2542 1074 CD E3 13 X1074: call X13e3
|
|
2543 1077 E6 80 ani 80h
|
|
2544 1079 32 57 21 sta X2157
|
|
2545 107C CD 8D 13 call X138d
|
|
2546 107F 22 4E 21 shld X214e
|
|
2547 1082 C9 ret
|
|
;;
|
|
;; memset(0x1083): Set DE bytes at address HL to B
|
|
;;
|
|
2551 1083 70 memset: mov m,b ;; M <- B
|
|
2552 1084 23 inx h ;; HL++
|
|
2553 1085 1B dcx d ;; DE--
|
|
2554 1086 7A mov a,d ;;
|
|
2555 1087 B3 ora e ;; A = D | E
|
|
2556 1088 C2 83 10 jnz memset ;; repeat if A != 0
|
|
2557 108B C9 ret
|
|
|
|
2559 108C 0E 00 mvi c,0
|
|
2560 108E 21 51 20 X108e: lxi h,X2051
|
|
2561 1091 F3 di
|
|
2562 1092 3A 65 20 lda X2065
|
|
2563 1095 B6 ora m
|
|
2564 1096 FB ei
|
|
2565 1097 CA A7 10 jz X10a7
|
|
2566 109A 79 mov a,c
|
|
2567 109B 1F rar
|
|
2568 109C C5 push b
|
|
2569 109D DC 88 14 cc X1488
|
|
2570 10A0 CD 93 14 call X1493
|
|
2571 10A3 C1 pop b
|
|
2572 10A4 C3 8E 10 jmp X108e
|
|
|
|
2574 10A7 79 X10a7: mov a,c
|
|
2575 10A8 17 ral
|
|
2576 10A9 D0 rnc
|
|
2577 10AA C3 91 11 jmp X1191
|
|
|
|
2579 10AD 21 70 06 X10ad: lxi h,X0670
|
|
2580 10B0 22 04 20 shld X2004
|
|
2581 10B3 AF xra a
|
|
2582 10B4 32 51 20 sta X2051
|
|
2583 10B7 32 65 20 sta X2065
|
|
2584 10BA 32 5A 20 sta X205a
|
|
2585 10BD D3 A2 out 0a2h
|
|
2586 10BF 3E 04 mvi a,4
|
|
2587 10C1 D3 A2 out 0a2h
|
|
2588 10C3 CD 6A 10 call X106a
|
|
2589 10C6 FB ei
|
|
2590 10C7 3E 01 mvi a,1
|
|
2591 10C9 CD AA 0F call X0faa
|
|
2592 10CC 21 D0 22 lxi h,X22d0
|
|
2593 10CF 7C mov a,h
|
|
2594 10D0 C6 10 adi 10h
|
|
2595 10D2 57 mov d,a
|
|
2596 10D3 5D mov e,l
|
|
2597 10D4 01 2F 0D lxi b,X0d2f
|
|
2598 10D7 3A C7 21 X10d7: lda X21c7
|
|
2599 10DA 77 mov m,a
|
|
2600 10DB 23 inx h
|
|
2601 10DC 3E FF mvi a,0ffh
|
|
2602 10DE 12 stax d
|
|
2603 10DF 13 inx d
|
|
2604 10E0 0B dcx b
|
|
2605 10E1 78 mov a,b
|
|
2606 10E2 B1 ora c
|
|
2607 10E3 C2 D7 10 jnz X10d7
|
|
2608 10E6 3A C7 21 lda X21c7
|
|
2609 10E9 32 F4 20 sta X20f4
|
|
2610 10EC AF xra a
|
|
2611 10ED 32 F9 20 sta X20f9
|
|
2612 10F0 32 F8 20 sta X20f8
|
|
2613 10F3 3E FF mvi a,0ffh
|
|
2614 10F5 32 F5 20 sta X20f5
|
|
2615 10F8 C9 ret
|
|
|
|
2617 10F9 AF X10f9: xra a
|
|
2618 10FA 32 51 20 sta X2051
|
|
2619 10FD 3A 65 20 X10fd: lda X2065
|
|
2620 1100 B7 ora a
|
|
2621 1101 C2 FD 10 jnz X10fd
|
|
2622 1104 21 D0 22 lxi h,X22d0
|
|
2623 1107 06 00 mvi b,0
|
|
2624 1109 09 dad b
|
|
2625 110A CD BF 11 call X11bf
|
|
2626 110D 0C inr c
|
|
2627 110E CD 36 11 call X1136
|
|
2628 1111 E5 push h
|
|
2629 1112 06 01 mvi b,1
|
|
2630 1114 CD 36 11 call X1136
|
|
2631 1117 E1 pop h
|
|
2632 1118 36 7F mvi m,7fh
|
|
2633 111A 23 inx h
|
|
2634 111B 22 54 20 shld X2054
|
|
2635 111E 36 70 mvi m,70h
|
|
2636 1120 23 inx h
|
|
2637 1121 36 06 mvi m,6
|
|
2638 1123 79 mov a,c
|
|
2639 1124 CD DE 13 call X13de
|
|
2640 1127 36 7F mvi m,7fh
|
|
2641 1129 0D dcr c
|
|
2642 112A 3E 03 mvi a,3
|
|
2643 112C 32 02 20 sta X2002
|
|
2644 112F 21 F2 D0 lxi h,Xd0f2
|
|
2645 1132 22 04 20 shld X2004
|
|
2646 1135 C9 ret
|
|
|
|
2648 1136 36 7F X1136: mvi m,7fh
|
|
2649 1138 23 inx h
|
|
2650 1139 54 mov d,h
|
|
2651 113A 5D mov e,l
|
|
2652 113B 13 inx d
|
|
2653 113C 13 inx d
|
|
2654 113D 7A mov a,d
|
|
2655 113E F6 F0 ori 0f0h
|
|
2656 1140 77 mov m,a
|
|
2657 1141 23 inx h
|
|
2658 1142 73 mov m,e
|
|
2659 1143 79 mov a,c
|
|
2660 1144 CD DE 13 call X13de
|
|
2661 1147 05 dcr b
|
|
2662 1148 C2 36 11 jnz X1136
|
|
2663 114B C9 ret
|
|
|
|
2665 114C 21 C2 20 X114c: lxi h,X20c2
|
|
2666 114F 0C inr c
|
|
2667 1150 0C inr c
|
|
2668 1151 0C inr c
|
|
2669 1152 11 D0 22 lxi d,X22d0
|
|
2670 1155 06 00 mvi b,0
|
|
2671 1157 3E 19 mvi a,19h
|
|
2672 1159 73 X1159: mov m,e
|
|
2673 115A 23 inx h
|
|
2674 115B 72 mov m,d
|
|
2675 115C 23 inx h
|
|
2676 115D EB xchg
|
|
2677 115E 09 dad b
|
|
2678 115F EB xchg
|
|
2679 1160 3D dcr a
|
|
2680 1161 C2 59 11 jnz X1159
|
|
2681 1164 32 55 21 sta X2155
|
|
2682 1167 CD BF 11 call X11bf
|
|
2683 116A 78 mov a,b
|
|
2684 116B 32 56 21 sta X2156
|
|
2685 116E 3C inr a
|
|
2686 116F 32 2B 21 sta X212b
|
|
2687 1172 2A F2 20 lhld X20f2
|
|
2688 1175 3E 17 mvi a,17h
|
|
2689 1177 B8 cmp b
|
|
2690 1178 CA 7E 11 jz X117e
|
|
2691 117B 2A DE 20 lhld X20de
|
|
2692 117E 7C X117e: mov a,h
|
|
2693 117F F6 F0 ori 0f0h
|
|
2694 1181 67 mov h,a
|
|
2695 1182 22 4E 20 shld scratch_start ; update [0x204e]
|
|
2696 1185 21 13 21 lxi h,X2113
|
|
2697 1188 AF xra a
|
|
2698 1189 77 X1189: mov m,a
|
|
2699 118A 2C inr l
|
|
2700 118B 3C inr a
|
|
2701 118C 05 dcr b
|
|
2702 118D F2 89 11 jp X1189
|
|
2703 1190 C9 ret
|
|
|
|
2705 1191 F3 X1191: di
|
|
2706 1192 3A 7A 20 lda X207a
|
|
2707 1195 B7 ora a
|
|
2708 1196 CA A0 11 jz X11a0
|
|
2709 1199 FB X1199: ei
|
|
2710 119A CD 88 14 call X1488
|
|
2711 119D C3 91 11 jmp X1191
|
|
|
|
2713 11A0 3A 65 20 X11a0: lda X2065
|
|
2714 11A3 B7 ora a
|
|
2715 11A4 C2 B0 11 jnz X11b0
|
|
2716 11A7 3A 51 20 lda X2051
|
|
2717 11AA B7 ora a
|
|
2718 11AB FB ei
|
|
2719 11AC C8 rz
|
|
2720 11AD C3 99 11 jmp X1199
|
|
|
|
2722 11B0 3A 5B 20 X11b0: lda X205b
|
|
2723 11B3 21 5A 20 lxi h,X205a
|
|
2724 11B6 86 add m
|
|
2725 11B7 27 daa
|
|
2726 11B8 E6 0F ani 0fh
|
|
2727 11BA CA 99 11 jz X1199
|
|
2728 11BD FB ei
|
|
2729 11BE C9 ret
|
|
|
|
2731 11BF E5 X11bf: push h
|
|
2732 11C0 06 17 mvi b,17h
|
|
2733 11C2 3A A2 21 lda X21a2
|
|
2734 11C5 21 C8 21 lxi h,X21c8
|
|
2735 11C8 A6 ana m
|
|
2736 11C9 E1 pop h
|
|
2737 11CA C8 rz
|
|
2738 11CB 06 0D mvi b,0dh
|
|
2739 11CD C9 ret
|
|
|
|
2741 11CE B7 X11ce: ora a
|
|
2742 11CF F2 E8 11 jp X11e8
|
|
2743 11D2 21 04 20 lxi h,X2004
|
|
2744 11D5 E5 push h
|
|
2745 11D6 7E mov a,m
|
|
2746 11D7 23 inx h
|
|
2747 11D8 6E mov l,m
|
|
2748 11D9 F6 F0 ori 0f0h
|
|
2749 11DB 67 mov h,a
|
|
2750 11DC 22 4E 20 shld scratch_start ; update [0x204e]
|
|
2751 11DF CD 90 12 call X1290
|
|
2752 11E2 E1 pop h
|
|
2753 11E3 42 mov b,d
|
|
2754 11E4 4B mov c,e
|
|
2755 11E5 C3 0A 12 jmp X120a
|
|
|
|
2757 11E8 CD 7F 12 X11e8: call X127f
|
|
2758 11EB CD 90 12 call X1290
|
|
2759 11EE E5 push h
|
|
2760 11EF D5 push d
|
|
2761 11F0 EB xchg
|
|
2762 11F1 CD 90 12 call X1290
|
|
2763 11F4 42 mov b,d
|
|
2764 11F5 4B mov c,e
|
|
2765 11F6 D1 pop d
|
|
2766 11F7 7A mov a,d
|
|
2767 11F8 F6 F0 ori 0f0h
|
|
2768 11FA 67 mov h,a
|
|
2769 11FB 6B mov l,e
|
|
2770 11FC 22 4E 20 shld scratch_start ; update [0x204e]
|
|
2771 11FF E1 pop h
|
|
2772 1200 7C mov a,h
|
|
2773 1201 F6 9F ori 9fh
|
|
2774 1203 3C inr a
|
|
2775 1204 C2 11 12 jnz X1211
|
|
2776 1207 CD 99 12 call X1299
|
|
2777 120A F3 X120a: di
|
|
2778 120B 22 75 20 shld X2075
|
|
2779 120E C3 28 12 jmp X1228
|
|
|
|
2781 1211 CD 9D 12 X1211: call X129d
|
|
2782 1214 3A 50 20 lda X2050
|
|
2783 1217 0F rrc
|
|
2784 1218 57 mov d,a
|
|
2785 1219 CD DE 13 call X13de
|
|
2786 121C 23 inx h
|
|
2787 121D F3 di
|
|
2788 121E 22 75 20 shld X2075
|
|
2789 1221 7A mov a,d
|
|
2790 1222 CD DE 13 call X13de
|
|
2791 1225 70 mov m,b
|
|
2792 1226 23 inx h
|
|
2793 1227 71 mov m,c
|
|
2794 1228 60 X1228: mov h,b
|
|
2795 1229 69 mov l,c
|
|
2796 122A 22 79 21 shld X2179
|
|
2797 122D FB ei
|
|
2798 122E C9 ret
|
|
|
|
2800 122F F5 X122f: push psw
|
|
2801 1230 CD BE 0F call X0fbe
|
|
2802 1233 F1 pop psw
|
|
2803 1234 B7 ora a
|
|
2804 1235 21 04 20 lxi h,X2004
|
|
2805 1238 FA 48 12 jm X1248
|
|
2806 123B CD 7F 12 call X127f
|
|
2807 123E 7C mov a,h
|
|
2808 123F F6 9F ori 9fh
|
|
2809 1241 3C inr a
|
|
2810 1242 C2 52 12 jnz X1252
|
|
2811 1245 CD 99 12 call X1299
|
|
2812 1248 F3 X1248: di
|
|
2813 1249 22 58 20 shld X2058
|
|
2814 124C 46 mov b,m
|
|
2815 124D 23 inx h
|
|
2816 124E 4E mov c,m
|
|
2817 124F C3 71 12 jmp X1271
|
|
|
|
2819 1252 CD 9D 12 X1252: call X129d
|
|
2820 1255 3A 50 20 lda X2050
|
|
2821 1258 0F rrc
|
|
2822 1259 47 mov b,a
|
|
2823 125A CD DE 13 call X13de
|
|
2824 125D 23 inx h
|
|
2825 125E F3 di
|
|
2826 125F 22 58 20 shld X2058
|
|
2827 1262 78 mov a,b
|
|
2828 1263 46 mov b,m
|
|
2829 1264 23 inx h
|
|
2830 1265 4E mov c,m
|
|
2831 1266 CD DE 13 call X13de
|
|
2832 1269 EB xchg
|
|
2833 126A 2A 4E 20 lhld scratch_start ; load [0x204e]
|
|
2834 126D EB xchg
|
|
2835 126E 73 mov m,e
|
|
2836 126F 2B dcx h
|
|
2837 1270 72 mov m,d
|
|
2838 1271 2A 4E 20 X1271: lhld scratch_start ; load [0x204e]
|
|
2839 1274 22 56 20 shld X2056
|
|
2840 1277 CD 99 12 call X1299
|
|
2841 127A 70 mov m,b
|
|
2842 127B 23 inx h
|
|
2843 127C 71 mov m,c
|
|
2844 127D FB ei
|
|
2845 127E C9 ret
|
|
|
|
2847 127F 3C X127f: inr a
|
|
2848 1280 47 mov b,a
|
|
2849 1281 21 04 20 lxi h,X2004
|
|
2850 1284 7E X1284: mov a,m
|
|
2851 1285 23 inx h
|
|
2852 1286 6E mov l,m
|
|
2853 1287 67 mov h,a
|
|
2854 1288 05 dcr b
|
|
2855 1289 C8 rz
|
|
2856 128A CD 99 12 call X1299
|
|
2857 128D C3 84 12 jmp X1284
|
|
|
|
2859 1290 E5 X1290: push h
|
|
2860 1291 CD 99 12 call X1299
|
|
2861 1294 56 mov d,m
|
|
2862 1295 23 inx h
|
|
2863 1296 5E mov e,m
|
|
2864 1297 E1 pop h
|
|
2865 1298 C9 ret
|
|
|
|
2867 1299 CD DB 13 X1299: call X13db
|
|
2868 129C 23 inx h
|
|
2869 129D 7C X129d: mov a,h
|
|
2870 129E E6 0F ani 0fh
|
|
2871 12A0 F6 20 ori 20h
|
|
2872 12A2 67 mov h,a
|
|
2873 12A3 C9 ret
|
|
|
|
2875 12A4 CD B0 12 call X12b0
|
|
2876 12A7 50 mov d,b
|
|
2877 12A8 CD B0 12 call X12b0
|
|
2878 12AB db 30h
|
|
30
|
|
2879 12AC CD B0 12 call X12b0
|
|
2880 12AF db 10h
|
|
10
|
|
2881 12B0 CD 91 11 X12b0: call X1191
|
|
2882 12B3 21 13 21 lxi h,X2113
|
|
2883 12B6 3A F9 20 lda X20f9
|
|
2884 12B9 85 add l
|
|
2885 12BA 6F mov l,a
|
|
2886 12BB 7E mov a,m
|
|
2887 12BC F6 80 ori 80h
|
|
2888 12BE 77 mov m,a
|
|
2889 12BF CD 8D 13 call X138d
|
|
2890 12C2 CD C3 13 call X13c3
|
|
2891 12C5 E1 pop h
|
|
2892 12C6 7E mov a,m
|
|
2893 12C7 CD 95 13 call X1395
|
|
2894 12CA 3A 53 21 lda X2153
|
|
2895 12CD 21 F8 20 lxi h,X20f8
|
|
2896 12D0 B7 ora a
|
|
2897 12D1 1F rar
|
|
2898 12D2 BE cmp m
|
|
2899 12D3 D2 12 10 jnc X1012
|
|
2900 12D6 21 F4 20 lxi h,X20f4
|
|
2901 12D9 22 F6 20 shld cursor_address
|
|
2902 12DC C3 12 10 jmp X1012
|
|
|
|
2904 12DF 3A 30 21 lda X2130
|
|
2905 12E2 FE 02 cpi 2
|
|
2906 12E4 D0 rnc
|
|
2907 12E5 32 76 21 sta X2176
|
|
2908 12E8 21 72 21 X12e8: lxi h,X2172
|
|
2909 12EB 7E mov a,m
|
|
2910 12EC F6 02 ori 2
|
|
2911 12EE 77 mov m,a
|
|
2912 12EF C9 ret
|
|
|
|
2914 12F0 3E FD mvi a,0fdh
|
|
2915 12F2 CD BF 0D call X0dbf
|
|
2916 12F5 3A 76 21 lda X2176
|
|
2917 12F8 F6 32 ori 32h
|
|
2918 12FA CD B9 0D call X0db9
|
|
2919 12FD 3A A9 21 lda X21a9
|
|
2920 1300 F5 push psw
|
|
2921 1301 E6 C0 ani 0c0h
|
|
2922 1303 F6 18 ori 18h
|
|
2923 1305 87 add a
|
|
2924 1306 3C inr a
|
|
2925 1307 F2 10 13 jp X1310
|
|
2926 130A 1F rar
|
|
2927 130B 07 rlc
|
|
2928 130C F6 04 ori 4
|
|
2929 130E E6 7F ani 7fh
|
|
2930 1310 CD B9 0D X1310: call X0db9
|
|
2931 1313 06 31 mvi b,31h
|
|
2932 1315 F1 pop psw
|
|
2933 1316 E6 20 ani 20h
|
|
2934 1318 C2 1C 13 jnz X131c
|
|
2935 131B 04 inr b
|
|
2936 131C 78 X131c: mov a,b
|
|
2937 131D CD B9 0D call X0db9
|
|
2938 1320 3A AB 21 lda X21ab
|
|
2939 1323 0F rrc
|
|
2940 1324 CD 7A 0D call X0d7a
|
|
2941 1327 CD BB 0D call X0dbb
|
|
2942 132A 3A AC 21 lda X21ac
|
|
2943 132D 0F rrc
|
|
2944 132E CD 7A 0D call X0d7a
|
|
2945 1331 CD BB 0D call X0dbb
|
|
2946 1334 3E 31 mvi a,31h
|
|
2947 1336 CD B9 0D call X0db9
|
|
2948 1339 3A AA 21 lda X21aa
|
|
2949 133C E6 F0 ani 0f0h
|
|
2950 133E 0F rrc
|
|
2951 133F 0F rrc
|
|
2952 1340 0F rrc
|
|
2953 1341 0F rrc
|
|
2954 1342 CD 7A 0D call X0d7a
|
|
2955 1345 36 F8 mvi m,0f8h
|
|
2956 1347 C3 F3 0E jmp X0ef3
|
|
|
|
2958 134A 21 57 21 X134a: lxi h,X2157
|
|
2959 134D 7E mov a,m
|
|
2960 134E B7 ora a
|
|
2961 134F C8 rz
|
|
2962 1350 CD 91 11 call X1191
|
|
2963 1353 21 13 21 lxi h,X2113
|
|
2964 1356 3A F9 20 lda X20f9
|
|
2965 1359 85 add l
|
|
2966 135A 6F mov l,a
|
|
2967 135B 7E mov a,m
|
|
2968 135C E6 7F ani 7fh
|
|
2969 135E 77 mov m,a
|
|
2970 135F CD 8D 13 call X138d
|
|
2971 1362 3A 50 20 lda X2050
|
|
2972 1365 0F rrc
|
|
2973 1366 47 mov b,a
|
|
2974 1367 CD DE 13 call X13de
|
|
2975 136A AF xra a
|
|
2976 136B 77 X136b: mov m,a
|
|
2977 136C 23 inx h
|
|
2978 136D 05 dcr b
|
|
2979 136E C2 6B 13 jnz X136b
|
|
2980 1371 3E F0 mvi a,0f0h
|
|
2981 1373 32 0E 21 sta X210e
|
|
2982 1376 CD 95 13 call X1395
|
|
2983 1379 AF xra a
|
|
2984 137A 32 57 21 sta X2157
|
|
2985 137D C3 36 16 jmp X1636
|
|
|
|
2987 1380 3A F9 20 X1380: lda X20f9
|
|
2988 1383 CD E6 13 call X13e6
|
|
2989 1386 21 C2 20 X1386: lxi h,X20c2
|
|
2990 1389 87 add a
|
|
2991 138A 85 add l
|
|
2992 138B 6F mov l,a
|
|
2993 138C C9 ret
|
|
|
|
2995 138D CD 80 13 X138d: call X1380
|
|
2996 1390 7E X1390: mov a,m
|
|
2997 1391 23 inx h
|
|
2998 1392 66 mov h,m
|
|
2999 1393 6F mov l,a
|
|
3000 1394 C9 ret
|
|
|
|
3002 1395 E6 70 X1395: ani 70h
|
|
3003 1397 47 mov b,a
|
|
3004 1398 3A F9 20 lda X20f9
|
|
3005 139B 3D dcr a
|
|
3006 139C 21 04 20 lxi h,X2004
|
|
3007 139F FA BD 13 jm X13bd
|
|
3008 13A2 CD E6 13 call X13e6
|
|
3009 13A5 57 mov d,a
|
|
3010 13A6 E6 7F ani 7fh
|
|
3011 13A8 CD 86 13 call X1386
|
|
3012 13AB CD 90 13 call X1390
|
|
3013 13AE 3A 50 20 lda X2050
|
|
3014 13B1 0F rrc
|
|
3015 13B2 5F mov e,a
|
|
3016 13B3 23 inx h
|
|
3017 13B4 14 inr d
|
|
3018 13B5 15 dcr d
|
|
3019 13B6 16 00 mvi d,0
|
|
3020 13B8 19 dad d
|
|
3021 13B9 FC BD 13 cm X13bd
|
|
3022 13BC 19 dad d
|
|
3023 13BD 7E X13bd: mov a,m
|
|
3024 13BE E6 8F ani 8fh
|
|
3025 13C0 B0 ora b
|
|
3026 13C1 77 mov m,a
|
|
3027 13C2 C9 ret
|
|
|
|
3029 13C3 3A 50 20 X13c3: lda X2050
|
|
3030 13C6 0F rrc
|
|
3031 13C7 54 mov d,h
|
|
3032 13C8 5D mov e,l
|
|
3033 13C9 CD DE 13 call X13de
|
|
3034 13CC EB xchg
|
|
3035 13CD CD DB 13 call X13db
|
|
3036 13D0 06 03 mvi b,3
|
|
3037 13D2 7E X13d2: mov a,m
|
|
3038 13D3 12 stax d
|
|
3039 13D4 13 inx d
|
|
3040 13D5 23 inx h
|
|
3041 13D6 05 dcr b
|
|
3042 13D7 C2 D2 13 jnz X13d2
|
|
3043 13DA C9 ret
|
|
|
|
3045 13DB 3A 50 20 X13db: lda X2050
|
|
3046 13DE 85 X13de: add l
|
|
3047 13DF 6F mov l,a
|
|
3048 13E0 D0 rnc
|
|
3049 13E1 24 inr h
|
|
3050 13E2 C9 ret
|
|
|
|
3052 13E3 3A F9 20 X13e3: lda X20f9
|
|
3053 13E6 21 13 21 X13e6: lxi h,X2113
|
|
3054 13E9 85 add l
|
|
3055 13EA 6F mov l,a
|
|
3056 13EB 7E mov a,m
|
|
3057 13EC C9 ret
|
|
|
|
3059 13ED 0E 00 mvi c,0
|
|
3060 13EF C3 F4 13 jmp X13f4
|
|
|
|
3062 13F2 0E FF mvi c,0ffh
|
|
3063 13F4 3A B8 21 X13f4: lda X21b8
|
|
3064 13F7 B7 ora a
|
|
3065 13F8 21 26 14 lxi h,X1426
|
|
3066 13FB CA 04 14 jz X1404
|
|
3067 13FE FE 3F cpi 3fh
|
|
3068 1400 C0 rnz
|
|
3069 1401 21 0A 14 lxi h,X140a
|
|
3070 1404 78 X1404: mov a,b
|
|
3071 1405 41 mov b,c
|
|
3072 1406 CD FF 09 call X09ff
|
|
3073 1409 C9 ret
|
|
|
|
3075 140A 01 2A 14 X140a: lxi b,X142a
|
|
3076 140D 02 stax b
|
|
3077 140E 2F cma
|
|
3078 140F 14 inr d
|
|
3079 1410 03 inx b
|
|
3080 1411 57 mov d,a
|
|
3081 1412 14 inr d
|
|
3082 1413 04 inr b
|
|
3083 1414 47 mov b,a
|
|
3084 1415 14 inr d
|
|
3085 1416 05 dcr b
|
|
3086 1417 4E mov c,m
|
|
3087 1418 14 inr d
|
|
3088 1419 06 3F mvi b,3fh
|
|
3089 141B 14 inr d
|
|
3090 141C 07 rlc
|
|
3091 141D 66 mov h,m
|
|
3092 141E 14 inr d
|
|
3093 141F db 8
|
|
08
|
|
3094 1420 5F mov e,a
|
|
3095 1421 14 inr d
|
|
3096 1422 09 dad b
|
|
3097 1423 6D mov l,l
|
|
3098 1424 14 inr d
|
|
3099 1425 00 nop
|
|
3100 1426 14 X1426: inr d
|
|
3101 1427 db 38h
|
|
38
|
|
3102 1428 14 inr d
|
|
3103 1429 00 nop
|
|
3104 142A 21 BC 21 X142a: lxi h,X21bc
|
|
3105 142D 70 mov m,b
|
|
3106 142E C9 ret
|
|
|
|
3108 142F CD 76 14 call X1476
|
|
3109 1432 A7 ana a
|
|
3110 1433 21 20 C3 lxi h,Xc320
|
|
3111 1436 F2 0B CD jp Xcd0b
|
|
3112 1439 76 hlt
|
|
|
|
3114 143A 14 inr d
|
|
3115 143B A8 xra b
|
|
3116 143C 21 20 C9 lxi h,Xc920
|
|
3117 143F 21 01 21 lxi h,X2101
|
|
3118 1442 70 mov m,b
|
|
3119 1443 CD 48 18 call X1848
|
|
3120 1446 C9 ret
|
|
|
|
3122 1447 CD 76 14 call X1476
|
|
3123 144A A6 ana m
|
|
3124 144B 21 80 C9 lxi h,Xc980
|
|
3125 144E CD 76 14 call X1476
|
|
3126 1451 A6 ana m
|
|
3127 1452 21 20 C3 lxi h,Xc320
|
|
3128 1455 6B mov l,e
|
|
3129 1456 03 inx b
|
|
3130 1457 21 A2 21 lxi h,X21a2
|
|
3131 145A 70 mov m,b
|
|
3132 145B CD 81 03 call X0381
|
|
3133 145E C9 ret
|
|
|
|
3135 145F CD 76 14 call X1476
|
|
3136 1462 A6 ana m
|
|
3137 1463 21 40 C9 lxi h,Xc940
|
|
3138 1466 CD 76 14 call X1476
|
|
3139 1469 A8 xra b
|
|
3140 146A 21 40 C9 lxi h,Xc940
|
|
3141 146D CD 76 14 call X1476
|
|
3142 1470 A8 xra b
|
|
3143 1471 21 10 C3 lxi h,Xc310
|
|
3144 1474 42 mov b,d
|
|
3145 1475 03 inx b
|
|
3146 1476 E1 X1476: pop h
|
|
3147 1477 5E mov e,m
|
|
3148 1478 23 inx h
|
|
3149 1479 56 mov d,m
|
|
3150 147A 23 inx h
|
|
3151 147B 7E mov a,m
|
|
3152 147C 23 inx h
|
|
3153 147D EB xchg
|
|
3154 147E 4F mov c,a
|
|
3155 147F 2F cma
|
|
3156 1480 A6 ana m
|
|
3157 1481 77 mov m,a
|
|
3158 1482 78 mov a,b
|
|
3159 1483 A1 ana c
|
|
3160 1484 B6 ora m
|
|
3161 1485 77 mov m,a
|
|
3162 1486 EB xchg
|
|
3163 1487 E9 pchl
|
|
|
|
3165 1488 CD 93 14 X1488: call X1493
|
|
3166 148B E6 10 ani 10h
|
|
3167 148D CC AA 06 cz X06aa
|
|
3168 1490 C3 59 0E jmp X0e59
|
|
;;
|
|
;; SUBROUTINE A
|
|
;;
|
|
3172 1493 DB 42 X1493: in 42h ;; Read flags buffer
|
|
3173 1495 E6 80 ani 80h ;; check if transmit buffer is empty
|
|
3174 1497 C8 rz ;; if zero, return
|
|
3175 1498 21 44 21 lxi h,X2144 ;; HL = 0x2144
|
|
3176 149B 7E mov a,m ;; Load from 2144
|
|
3177 149C B7 ora a ;; Check if zero
|
|
3178 149D CA A2 14 jz X14a2 ;;
|
|
3179 14A0 3E 10 mvi a,10h ;; If not, A = 10 (else A is zero)
|
|
3180 14A2 21 A5 21 X14a2: lxi h,X21a5 ;;
|
|
3181 14A5 B6 ora m ;; or bits from 0x21a5
|
|
3182 14A6 21 45 21 lxi h,X2145 ;;
|
|
3183 14A9 B6 ora m ;; or bits from 0x2145
|
|
3184 14AA 23 inx h ;;
|
|
3185 14AB B6 ora m ;; ... and 0x2146
|
|
3186 14AC 23 inx h ;;
|
|
3187 14AD B6 ora m ;; ... and 0x2147
|
|
3188 14AE 36 00 mvi m,0 ;; zero 0x2147
|
|
3189 14B0 23 inx h ;;
|
|
3190 14B1 B6 ora m ;; ... and 0x2148
|
|
3191 14B2 36 00 mvi m,0 ;; zero 0x2148
|
|
3192 14B4 D3 82 out 82h ;; Write to keyboard buffer
|
|
3193 14B6 21 74 20 lxi h,X2074 ;;
|
|
3194 14B9 34 inr m ;; Increment what's at 0x2074
|
|
3195 14BA 3A 77 20 lda X2077 ;; load what's at 0x2077
|
|
3196 14BD B7 ora a ;; return if it's not zero
|
|
3197 14BE C0 rnz ;;
|
|
3198 14BF 3A 65 20 lda X2065 ;; A = [0x2065]
|
|
3199 14C2 21 51 20 lxi h,X2051 ;;
|
|
3200 14C5 B6 ora m ;; return if [0x2065] | [0x2051] != 0
|
|
3201 14C6 C0 rnz
|
|
|
|
3203 14C7 2A 2D 21 lhld cursor_countdn ; HL = cursor countdown from [0x212d]
|
|
3204 14CA 2B dcx h
|
|
3205 14CB 7C mov a,h
|
|
3206 14CC B5 ora l
|
|
3207 14CD CA D4 14 jz X14d4
|
|
3208 14D0 22 2D 21 shld cursor_countdn ; update cursor countdown with decremented value
|
|
3209 14D3 C9 ret
|
|
;
|
|
; Cursor countdown reached zero, time to invert the cursor;
|
|
; note that the cursor is on (visible) twice as long as it's off
|
|
;
|
|
3214 14D4 3A BA 21 X14d4: lda cursor_visible ; A = 0xff (visible) or 0x00 (invisible)
|
|
3215 14D7 EE FF xri 0ffh ; invert
|
|
3216 14D9 32 BA 21 sta cursor_visible ;
|
|
3217 14DC 21 12 02 lxi h,212h ; new initial count; start with 0x0212
|
|
3218 14DF C2 E5 14 jnz X14e5 ; and stick with that if cursor still visible
|
|
3219 14E2 21 09 01 lxi h,109h ; otherwise, use half that value (0x0109) if invisible
|
|
3220 14E5 22 2D 21 X14e5: shld cursor_countdn ; store new cursor countdown
|
|
3221 14E8 2A F6 20 lhld cursor_address
|
|
3222 14EB 46 mov b,m ; B = current cursor
|
|
3223 14EC 3A 59 21 lda X2159 ; A = cursor inversion mask (typically 0x80)
|
|
3224 14EF A8 xra b ; B = new (inverted) cursor
|
|
3225 14F0 77 mov m,a ; store new cursor
|
|
;
|
|
; Guessing this is AVO-only code, because it's monkeying with cursor_address + 0x1000, which doesn't exist without AVO
|
|
;
|
|
3229 14F1 11 00 10 lxi d,1000h
|
|
3230 14F4 19 dad d
|
|
3231 14F5 3A 5A 21 lda X215a
|
|
3232 14F8 AE xra m
|
|
3233 14F9 77 mov m,a
|
|
3234 14FA C9 ret
|
|
|
|
3236 14FB 74 mov m,h
|
|
3237 14FC 78 mov a,b
|
|
3238 14FD B7 ora a
|
|
3239 14FE CA 15 15 jz X1515
|
|
3240 1501 3D dcr a
|
|
3241 1502 CA 0A 15 jz X150a
|
|
3242 1505 3D dcr a
|
|
3243 1506 C0 rnz
|
|
3244 1507 CD 15 15 call X1515
|
|
3245 150A 3A F8 20 X150a: lda X20f8
|
|
3246 150D 47 mov b,a
|
|
3247 150E 04 inr b
|
|
3248 150F 2A 4E 21 lhld X214e
|
|
3249 1512 C3 29 15 jmp X1529
|
|
|
|
3251 1515 3A F8 20 X1515: lda X20f8
|
|
3252 1518 47 mov b,a
|
|
3253 1519 3A 57 21 lda X2157
|
|
3254 151C B7 ora a
|
|
3255 151D 3A 50 20 lda X2050
|
|
3256 1520 CA 24 15 jz X1524
|
|
3257 1523 0F rrc
|
|
3258 1524 90 X1524: sub b
|
|
3259 1525 47 mov b,a
|
|
3260 1526 2A F6 20 lhld cursor_address
|
|
3261 1529 7C X1529: mov a,h
|
|
3262 152A C6 10 adi 10h
|
|
3263 152C 57 mov d,a
|
|
3264 152D 5D mov e,l
|
|
3265 152E 3E FF mvi a,0ffh
|
|
3266 1530 12 X1530: stax d
|
|
3267 1531 36 00 mvi m,0
|
|
3268 1533 23 inx h
|
|
3269 1534 13 inx d
|
|
3270 1535 05 dcr b
|
|
3271 1536 C2 30 15 jnz X1530
|
|
3272 1539 32 F5 20 sta X20f5
|
|
3273 153C AF xra a
|
|
3274 153D 32 F4 20 sta X20f4
|
|
3275 1540 C9 ret
|
|
|
|
3277 1541 78 mov a,b
|
|
3278 1542 B7 ora a
|
|
3279 1543 CA 6A 15 jz X156a
|
|
3280 1546 3D dcr a
|
|
3281 1547 CA 55 15 jz X1555
|
|
3282 154A 3D dcr a
|
|
3283 154B C0 rnz
|
|
3284 154C CD 55 15 call X1555
|
|
3285 154F CD 6A 15 call X156a
|
|
3286 1552 C3 4A 13 jmp X134a
|
|
|
|
3288 1555 21 F9 20 X1555: lxi h,X20f9
|
|
3289 1558 7E mov a,m
|
|
3290 1559 F5 push psw
|
|
3291 155A 47 mov b,a
|
|
3292 155B AF xra a
|
|
3293 155C 77 mov m,a
|
|
3294 155D 0E FF mvi c,0ffh
|
|
3295 155F CD 86 15 call X1586
|
|
3296 1562 F1 pop psw
|
|
3297 1563 77 mov m,a
|
|
3298 1564 CD 74 10 call X1074
|
|
3299 1567 C3 0A 15 jmp X150a
|
|
|
|
3301 156A 3A F8 20 X156a: lda X20f8
|
|
3302 156D B7 ora a
|
|
3303 156E CC 4A 13 cz X134a
|
|
3304 1571 CD 15 15 call X1515
|
|
3305 1574 21 F9 20 lxi h,X20f9
|
|
3306 1577 7E mov a,m
|
|
3307 1578 F5 push psw
|
|
3308 1579 4F mov c,a
|
|
3309 157A 3E 17 mvi a,17h
|
|
3310 157C 91 sub c
|
|
3311 157D 47 mov b,a
|
|
3312 157E CD 86 15 call X1586
|
|
3313 1581 F1 pop psw
|
|
3314 1582 77 mov m,a
|
|
3315 1583 C3 74 10 jmp X1074
|
|
|
|
3317 1586 05 X1586: dcr b
|
|
3318 1587 F8 rm
|
|
3319 1588 0C inr c
|
|
3320 1589 71 mov m,c
|
|
3321 158A C5 push b
|
|
3322 158B E5 push h
|
|
3323 158C CD E3 13 call X13e3
|
|
3324 158F E6 7F ani 7fh
|
|
3325 1591 77 mov m,a
|
|
3326 1592 3E 70 mvi a,70h
|
|
3327 1594 CD 95 13 call X1395
|
|
3328 1597 CD 74 10 call X1074
|
|
3329 159A 3A 50 20 lda X2050
|
|
3330 159D 47 mov b,a
|
|
3331 159E CD 29 15 call X1529
|
|
3332 15A1 E1 pop h
|
|
3333 15A2 C1 pop b
|
|
3334 15A3 C3 86 15 jmp X1586
|
|
|
|
3336 15A6 0E 81 mvi c,81h
|
|
3337 15A8 CD 8E 10 call X108e
|
|
3338 15AB CD BF 11 call X11bf
|
|
3339 15AE 3A 30 21 lda X2130
|
|
3340 15B1 B7 ora a
|
|
3341 15B2 CA B6 15 jz X15b6
|
|
3342 15B5 3D dcr a
|
|
3343 15B6 57 X15b6: mov d,a
|
|
3344 15B7 3A 31 21 lda X2131
|
|
3345 15BA B7 ora a
|
|
3346 15BB C2 C0 15 jnz X15c0
|
|
3347 15BE 78 mov a,b
|
|
3348 15BF 3C inr a
|
|
3349 15C0 3D X15c0: dcr a
|
|
3350 15C1 5F mov e,a
|
|
3351 15C2 78 mov a,b
|
|
3352 15C3 BB cmp e
|
|
3353 15C4 D8 rc
|
|
3354 15C5 7A mov a,d
|
|
3355 15C6 BB cmp e
|
|
3356 15C7 D0 rnc
|
|
3357 15C8 21 55 21 lxi h,X2155
|
|
3358 15CB 72 mov m,d
|
|
3359 15CC 23 inx h
|
|
3360 15CD 73 mov m,e
|
|
3361 15CE 4B mov c,e
|
|
3362 15CF 42 mov b,d
|
|
3363 15D0 79 mov a,c
|
|
3364 15D1 90 sub b
|
|
3365 15D2 3C inr a
|
|
3366 15D3 5F mov e,a
|
|
3367 15D4 21 04 20 lxi h,X2004
|
|
3368 15D7 78 mov a,b
|
|
3369 15D8 B7 ora a
|
|
3370 15D9 CA E8 15 jz X15e8
|
|
3371 15DC 50 mov d,b
|
|
3372 15DD 7E X15dd: mov a,m
|
|
3373 15DE E6 7F ani 7fh
|
|
3374 15E0 77 mov m,a
|
|
3375 15E1 CD 2B 16 call X162b
|
|
3376 15E4 15 dcr d
|
|
3377 15E5 C2 DD 15 jnz X15dd
|
|
3378 15E8 7E X15e8: mov a,m
|
|
3379 15E9 F6 80 ori 80h
|
|
3380 15EB 77 mov m,a
|
|
3381 15EC CD 2B 16 call X162b
|
|
3382 15EF 1D dcr e
|
|
3383 15F0 C2 E8 15 jnz X15e8
|
|
3384 15F3 3E 17 mvi a,17h
|
|
3385 15F5 91 sub c
|
|
3386 15F6 CA 05 16 jz X1605
|
|
3387 15F9 57 mov d,a
|
|
3388 15FA 7E X15fa: mov a,m
|
|
3389 15FB E6 7F ani 7fh
|
|
3390 15FD 77 mov m,a
|
|
3391 15FE CD 2B 16 call X162b
|
|
3392 1601 15 dcr d
|
|
3393 1602 C2 FA 15 jnz X15fa
|
|
3394 1605 78 X1605: mov a,b
|
|
3395 1606 32 55 21 sta X2155
|
|
3396 1609 79 mov a,c
|
|
3397 160A 32 56 21 sta X2156
|
|
3398 160D 21 13 21 lxi h,X2113
|
|
3399 1610 0E 18 mvi c,18h
|
|
3400 1612 7E X1612: mov a,m
|
|
3401 1613 B7 ora a
|
|
3402 1614 F2 23 16 jp X1623
|
|
3403 1617 E5 push h
|
|
3404 1618 CD 86 13 call X1386
|
|
3405 161B 7E mov a,m
|
|
3406 161C 23 inx h
|
|
3407 161D 66 mov h,m
|
|
3408 161E 6F mov l,a
|
|
3409 161F CD C3 13 call X13c3
|
|
3410 1622 E1 pop h
|
|
3411 1623 23 X1623: inx h
|
|
3412 1624 0D dcr c
|
|
3413 1625 C2 12 16 jnz X1612
|
|
3414 1628 C3 48 18 jmp X1848
|
|
|
|
3416 162B 23 X162b: inx h
|
|
3417 162C 6E mov l,m
|
|
3418 162D E6 0F ani 0fh
|
|
3419 162F F6 20 ori 20h
|
|
3420 1631 67 mov h,a
|
|
3421 1632 23 inx h
|
|
3422 1633 C3 DB 13 jmp X13db
|
|
|
|
3424 1636 21 0D 00 X1636: lxi h,13
|
|
3425 1639 22 2D 21 shld cursor_countdn ; reset cursor countdown to 13 (0x000d)
|
|
3426 163C AF xra a
|
|
3427 163D 32 BA 21 sta cursor_visible ; reset cursor visibility
|
|
3428 1640 2A F6 20 lhld cursor_address
|
|
3429 1643 3A F4 20 lda X20f4
|
|
3430 1646 47 mov b,a
|
|
3431 1647 77 mov m,a
|
|
3432 1648 7C mov a,h
|
|
3433 1649 C6 10 adi 10h
|
|
3434 164B 67 mov h,a
|
|
3435 164C 3A F5 20 lda X20f5
|
|
3436 164F 77 mov m,a
|
|
3437 1650 3A 50 20 lda X2050
|
|
3438 1653 3D dcr a
|
|
3439 1654 5F mov e,a
|
|
3440 1655 3A 7B 20 lda X207b
|
|
3441 1658 B7 ora a
|
|
3442 1659 C2 7B 16 jnz X167b
|
|
3443 165C 3A F9 20 lda X20f9
|
|
3444 165F 21 0E 21 lxi h,X210e
|
|
3445 1662 BE cmp m
|
|
3446 1663 CA 7F 16 jz X167f
|
|
3447 1666 77 mov m,a
|
|
3448 1667 CD 74 10 call X1074
|
|
3449 166A AF xra a
|
|
3450 166B 32 54 21 sta X2154
|
|
3451 166E 21 57 21 lxi h,X2157
|
|
3452 1671 7E mov a,m
|
|
3453 1672 B7 ora a
|
|
3454 1673 CA 7B 16 jz X167b
|
|
3455 1676 7B mov a,e
|
|
3456 1677 3D dcr a
|
|
3457 1678 B7 ora a
|
|
3458 1679 1F rar
|
|
3459 167A 5F mov e,a
|
|
3460 167B 7B X167b: mov a,e
|
|
3461 167C 32 53 21 sta X2153
|
|
3462 167F 21 53 21 X167f: lxi h,X2153
|
|
3463 1682 11 F8 20 lxi d,X20f8
|
|
3464 1685 1A ldax d
|
|
3465 1686 BE cmp m
|
|
3466 1687 DA 8C 16 jc X168c
|
|
3467 168A 7E mov a,m
|
|
3468 168B 12 stax d
|
|
3469 168C 3A BB 21 X168c: lda X21bb
|
|
3470 168F C6 08 adi 8
|
|
3471 1691 96 sub m
|
|
3472 1692 C2 A1 16 jnz X16a1
|
|
3473 1695 23 inx h
|
|
3474 1696 B6 ora m
|
|
3475 1697 CA A1 16 jz X16a1
|
|
3476 169A CD 38 09 call X0938
|
|
3477 169D AF xra a
|
|
3478 169E 32 54 21 sta X2154
|
|
3479 16A1 3A F8 20 X16a1: lda X20f8
|
|
3480 16A4 32 BB 21 sta X21bb
|
|
3481 16A7 2A 4E 21 lhld X214e
|
|
3482 16AA CD DE 13 call X13de
|
|
3483 16AD 22 F6 20 shld cursor_address
|
|
3484 16B0 7E mov a,m
|
|
3485 16B1 32 F4 20 sta X20f4
|
|
3486 16B4 47 mov b,a
|
|
3487 16B5 7C mov a,h
|
|
3488 16B6 C6 10 adi 10h
|
|
3489 16B8 67 mov h,a
|
|
3490 16B9 7E mov a,m
|
|
3491 16BA 32 F5 20 sta X20f5
|
|
3492 16BD 2A F6 20 lhld cursor_address
|
|
3493 16C0 70 mov m,b
|
|
3494 16C1 C9 ret
|
|
|
|
3496 16C2 47 X16c2: mov b,a
|
|
3497 16C3 21 F1 16 lxi h,X16f1
|
|
3498 16C6 22 40 21 shld X2140
|
|
3499 16C9 AF xra a
|
|
3500 16CA 32 2F 21 sta X212f
|
|
3501 16CD 32 4B 21 sta X214b
|
|
3502 16D0 32 7D 20 sta X207d
|
|
3503 16D3 21 30 21 lxi h,X2130
|
|
3504 16D6 0E 0F mvi c,0fh
|
|
3505 16D8 AF xra a
|
|
3506 16D9 77 X16d9: mov m,a
|
|
3507 16DA 23 inx h
|
|
3508 16DB 0D dcr c
|
|
3509 16DC C2 D9 16 jnz X16d9
|
|
3510 16DF 21 B8 21 lxi h,X21b8
|
|
3511 16E2 36 00 mvi m,0
|
|
3512 16E4 78 mov a,b
|
|
3513 16E5 FE 40 cpi 40h
|
|
3514 16E7 D2 F2 16 jnc X16f2
|
|
3515 16EA FE 3C cpi 3ch
|
|
3516 16EC DA F2 16 jc X16f2
|
|
3517 16EF 77 mov m,a
|
|
3518 16F0 C9 ret
|
|
|
|
3520 16F1 47 X16f1: mov b,a
|
|
3521 16F2 78 X16f2: mov a,b
|
|
3522 16F3 FE 3A cpi 3ah
|
|
3523 16F5 D2 17 17 jnc X1717
|
|
3524 16F8 D6 30 sui 30h
|
|
3525 16FA FA 17 17 jm X1717
|
|
3526 16FD 4F mov c,a
|
|
3527 16FE 21 2F 21 lxi h,X212f
|
|
3528 1701 7E mov a,m
|
|
3529 1702 FE 1A cpi 1ah
|
|
3530 1704 D2 13 17 jnc X1713
|
|
3531 1707 07 rlc
|
|
3532 1708 47 mov b,a
|
|
3533 1709 07 rlc
|
|
3534 170A 07 rlc
|
|
3535 170B 80 add b
|
|
3536 170C DA 13 17 jc X1713
|
|
3537 170F 81 add c
|
|
3538 1710 D2 15 17 jnc X1715
|
|
3539 1713 3E FF X1713: mvi a,0ffh
|
|
3540 1715 77 X1715: mov m,a
|
|
3541 1716 C9 ret
|
|
|
|
3543 1717 11 30 21 X1717: lxi d,X2130
|
|
3544 171A F5 push psw
|
|
3545 171B 21 4B 21 lxi h,X214b
|
|
3546 171E 4E mov c,m
|
|
3547 171F 06 00 mvi b,0
|
|
3548 1721 EB xchg
|
|
3549 1722 09 dad b
|
|
3550 1723 01 2F 21 lxi b,X212f
|
|
3551 1726 0A ldax b
|
|
3552 1727 77 mov m,a
|
|
3553 1728 AF xra a
|
|
3554 1729 02 stax b
|
|
3555 172A 1A ldax d
|
|
3556 172B FE 0F cpi 0fh
|
|
3557 172D CA 32 17 jz X1732
|
|
3558 1730 3C inr a
|
|
3559 1731 12 stax d
|
|
3560 1732 F1 X1732: pop psw
|
|
3561 1733 47 X1733: mov b,a
|
|
3562 1734 FE 3B cpi 3bh
|
|
3563 1736 C8 rz
|
|
3564 1737 E6 C0 ani 0c0h
|
|
3565 1739 78 mov a,b
|
|
3566 173A CA 43 17 jz X1743
|
|
3567 173D 32 7E 20 sta X207e
|
|
3568 1740 C3 A2 0A jmp X0aa2
|
|
|
|
3570 1743 21 7D 20 X1743: lxi h,X207d
|
|
3571 1746 86 add m
|
|
3572 1747 D2 4C 17 jnc X174c
|
|
3573 174A 3E FF mvi a,0ffh
|
|
3574 174C 77 X174c: mov m,a
|
|
3575 174D 21 33 17 lxi h,X1733
|
|
3576 1750 22 40 21 shld X2140
|
|
3577 1753 C9 ret
|
|
|
|
3579 1754 16 00 X1754: mvi d,0
|
|
3580 1756 06 01 mvi b,1
|
|
3581 1758 C3 62 17 jmp X1762
|
|
;;
|
|
;; Third initialization call?
|
|
;;
|
|
3585 175B CD C0 02 X175b: call X02c0 ;; Initialize start of screen RAM and wipe attribute RAM to 0xff
|
|
3586 175E 06 0A mvi b,0ah ;; B = 0x0a
|
|
3587 1760 16 01 mvi d,1 ;; D = 1
|
|
3588 1762 C5 X1762: push b ;; push B, D
|
|
3589 1763 D5 push d ;;
|
|
3590 1764 CD BE 17 call X17be ;; Display wait message
|
|
3591 1767 D1 pop d ;; pop D
|
|
3592 1768 F3 di ;; disable interrupts(???)
|
|
3593 1769 21 7B 21 lxi h,X217b ;; HL = 0x217b
|
|
3594 176C 1E 33 mvi e,33h ;; E = 0x33
|
|
3595 176E 0E 01 mvi c,1 ;; C = 1
|
|
3596 1770 AF xra a ;; A = 0
|
|
3597 1771 32 AE 21 X1771: sta X21ae ;; 0x21ae = A
|
|
3598 1774 79 mov a,c ;; A = C
|
|
3599 1775 32 AD 21 sta X21ad ;; 0x21ad = A
|
|
3600 1778 D5 push d ;; push D,H
|
|
3601 1779 E5 push h ;;
|
|
3602 177A 7A mov a,d ;; A=D
|
|
3603 177B B7 ora a ;; or A
|
|
3604 177C 7E mov a,m ;; load A from HL
|
|
3605 177D 32 AF 21 sta X21af ;; store it in 0x21af
|
|
3606 1780 CC AE 18 cz X18ae ;; if A is 0 call X18ae
|
|
3607 1783 CD A3 18 call X18a3 ;; call X18a3
|
|
3608 1786 E1 pop h ;; pop H,D
|
|
3609 1787 D1 pop d
|
|
3610 1788 3A AF 21 lda X21af
|
|
3611 178B 1D dcr e
|
|
3612 178C CA 9E 17 jz X179e
|
|
3613 178F 77 mov m,a
|
|
3614 1790 3A AD 21 lda X21ad
|
|
3615 1793 07 rlc
|
|
3616 1794 AE xra m
|
|
3617 1795 4F mov c,a
|
|
3618 1796 23 inx h
|
|
3619 1797 3A AE 21 lda X21ae
|
|
3620 179A 3C inr a
|
|
3621 179B C3 71 17 jmp X1771
|
|
|
|
3623 179E BE X179e: cmp m
|
|
3624 179F C1 pop b
|
|
3625 17A0 0E 00 mvi c,0
|
|
3626 17A2 CA AC 17 jz X17ac
|
|
3627 17A5 05 dcr b
|
|
3628 17A6 C2 62 17 jnz X1762
|
|
3629 17A9 CD D0 17 call X17d0
|
|
3630 17AC 79 X17ac: mov a,c
|
|
3631 17AD B7 ora a
|
|
3632 17AE F5 push psw
|
|
3633 17AF 0E 40 mvi c,40h
|
|
3634 17B1 3E 63 mvi a,63h
|
|
3635 17B3 CD 2B 19 call X192b
|
|
3636 17B6 21 F2 D0 lxi h,Xd0f2
|
|
3637 17B9 22 04 20 shld X2004
|
|
3638 17BC F1 pop psw
|
|
3639 17BD C9 ret
|
|
;;
|
|
;; Show wait message
|
|
;;
|
|
3643 17BE 11 EC 17 X17be: lxi d,X17ec ;; DE = 0x17ec
|
|
3644 17C1 06 07 mvi b,7 ;; B = 7
|
|
3645 17C3 21 CC 21 lxi h,X21cc ;; HL = 0x21cc
|
|
3646 17C6 CD 8B 03 call memmove ;; Initialize 0x21cc to Wait message
|
|
3647 17C9 21 71 CC lxi h,Xcc71 ;; HL = 0xcc71
|
|
3648 17CC 22 04 20 shld X2004 ;; retarget screen ram to display wait message
|
|
3649 17CF C9 ret
|
|
|
|
3651 17D0 21 7B 21 X17d0: lxi h,X217b
|
|
3652 17D3 06 27 mvi b,27h
|
|
3653 17D5 36 80 X17d5: mvi m,80h
|
|
3654 17D7 23 inx h
|
|
3655 17D8 05 dcr b
|
|
3656 17D9 C2 D5 17 jnz X17d5
|
|
3657 17DC 11 F3 17 lxi d,X17f3 ;; DE = 0x17f3
|
|
3658 17DF 06 0B mvi b,0bh ;; B = 11
|
|
3659 17E1 CD 8B 03 call memmove ;; store
|
|
3660 17E4 0E 01 mvi c,1
|
|
3661 17E6 3E 30 mvi a,30h
|
|
3662 17E8 32 78 20 sta X2078
|
|
3663 17EB C9 ret
|
|
X17ec:
|
|
3665 17EC db 'Wait'
|
|
57 61 69 74
|
|
|
|
3666 17F0 db 07fh,070h,06h
|
|
7F 70 06
|
|
X17f3:
|
|
3668 17F3 db 0,8,06eh,020h
|
|
00 08 6E 20
|
|
|
|
3669 17F7 db 0d0h,050h,0,020h
|
|
D0 50 00 20
|
|
|
|
3670 17FB db 0,0e0h,0e0h
|
|
00 E0 E0
|
|
X17fe:
|
|
3672 17FE 3A 55 21 lda X2155
|
|
3673 1801 01 FF 00 lxi b,X00ff
|
|
3674 1804 C3 0F 18 jmp X180f
|
|
|
|
3676 1807 CD BF 11 call X11bf
|
|
3677 180A 3A 56 21 lda X2156
|
|
3678 180D 0E 01 mvi c,1
|
|
3679 180F 21 F9 20 X180f: lxi h,X20f9
|
|
3680 1812 C3 25 18 jmp X1825
|
|
|
|
3682 1815 3A 53 21 X1815: lda X2153
|
|
3683 1818 01 01 FF lxi b,Xff01
|
|
3684 181B C3 22 18 jmp X1822
|
|
|
|
3686 181E AF X181e: xra a
|
|
3687 181F 01 FF 00 lxi b,X00ff
|
|
3688 1822 21 F8 20 X1822: lxi h,X20f8
|
|
3689 1825 57 X1825: mov d,a
|
|
3690 1826 3A B8 21 lda X21b8
|
|
3691 1829 B7 ora a
|
|
3692 182A C2 15 0A jnz X0a15
|
|
3693 182D 3A 30 21 lda X2130
|
|
3694 1830 B7 ora a
|
|
3695 1831 C2 35 18 jnz X1835
|
|
3696 1834 3C inr a
|
|
3697 1835 5F X1835: mov e,a
|
|
3698 1836 7E mov a,m
|
|
3699 1837 BA X1837: cmp d
|
|
3700 1838 CA 44 18 jz X1844
|
|
3701 183B B8 cmp b
|
|
3702 183C CA 44 18 jz X1844
|
|
3703 183F 81 add c
|
|
3704 1840 1D dcr e
|
|
3705 1841 C2 37 18 jnz X1837
|
|
3706 1844 77 X1844: mov m,a
|
|
3707 1845 C3 36 16 jmp X1636
|
|
|
|
3709 1848 21 00 00 X1848: lxi h,0
|
|
3710 184B 22 30 21 shld X2130
|
|
3711 184E 3E FF mvi a,0ffh
|
|
3712 1850 32 0E 21 sta X210e
|
|
3713 1853 3A 01 21 lda X2101
|
|
3714 1856 4F mov c,a
|
|
3715 1857 21 30 21 lxi h,X2130
|
|
3716 185A 7E mov a,m
|
|
3717 185B B7 ora a
|
|
3718 185C CA 60 18 jz X1860
|
|
3719 185F 3D dcr a
|
|
3720 1860 47 X1860: mov b,a
|
|
3721 1861 79 mov a,c
|
|
3722 1862 B7 ora a
|
|
3723 1863 CA 69 18 jz X1869
|
|
3724 1866 3A 55 21 lda X2155
|
|
3725 1869 80 X1869: add b
|
|
3726 186A 47 mov b,a
|
|
3727 186B 79 mov a,c
|
|
3728 186C B7 ora a
|
|
3729 186D 3A 56 21 lda X2156
|
|
3730 1870 C2 79 18 jnz X1879
|
|
3731 1873 48 mov c,b
|
|
3732 1874 CD BF 11 call X11bf
|
|
3733 1877 78 mov a,b
|
|
3734 1878 41 mov b,c
|
|
3735 1879 B8 X1879: cmp b
|
|
3736 187A DA 7E 18 jc X187e
|
|
3737 187D 78 mov a,b
|
|
3738 187E 32 F9 20 X187e: sta X20f9
|
|
3739 1881 23 inx h
|
|
3740 1882 7E mov a,m
|
|
3741 1883 B7 ora a
|
|
3742 1884 CA 88 18 jz X1888
|
|
3743 1887 3D dcr a
|
|
3744 1888 47 X1888: mov b,a
|
|
3745 1889 79 mov a,c
|
|
3746 188A B7 ora a
|
|
3747 188B C2 95 18 jnz X1895
|
|
3748 188E 3A 50 20 lda X2050
|
|
3749 1891 3D dcr a
|
|
3750 1892 C3 98 18 jmp X1898
|
|
|
|
3752 1895 3A 53 21 X1895: lda X2153
|
|
3753 1898 B8 X1898: cmp b
|
|
3754 1899 DA 9D 18 jc X189d
|
|
3755 189C 78 mov a,b
|
|
3756 189D 32 F8 20 X189d: sta X20f8
|
|
3757 18A0 C3 36 16 jmp X1636
|
|
|
|
3759 18A3 0E 40 X18a3: mvi c,40h
|
|
3760 18A5 CD 28 19 call X1928
|
|
3761 18A8 CD C1 18 call X18c1
|
|
3762 18AB C3 BC 18 jmp X18bc
|
|
|
|
3764 18AE 0E 40 X18ae: mvi c,40h
|
|
3765 18B0 CD 28 19 call X1928
|
|
3766 18B3 CD A8 19 call X19a8
|
|
3767 18B6 CD 77 19 call X1977
|
|
3768 18B9 CD D6 19 call X19d6
|
|
3769 18BC 3E 30 X18bc: mvi a,30h
|
|
3770 18BE D3 62 out 62h
|
|
3771 18C0 C9 ret
|
|
;;
|
|
;; On h pulse, write 0x2d to NVR... this looks like it's doing a read
|
|
;;
|
|
3775 18C1 DB 42 X18c1: in 42h
|
|
3776 18C3 A1 ana c
|
|
3777 18C4 CA C1 18 jz X18c1
|
|
3778 18C7 DB 42 X18c7: in 42h
|
|
3779 18C9 A1 ana c
|
|
3780 18CA C2 C7 18 jnz X18c7
|
|
3781 18CD 3E 2D mvi a,2dh ;; Write READ command to NVR latch
|
|
3782 18CF D3 62 out 62h
|
|
3783 18D1 DB 42 X18d1: in 42h
|
|
3784 18D3 A1 ana c
|
|
3785 18D4 CA D1 18 jz X18d1
|
|
3786 18D7 DB 42 X18d7: in 42h
|
|
3787 18D9 A1 ana c
|
|
3788 18DA C2 D7 18 jnz X18d7
|
|
3789 18DD 3E 2F mvi a,2fh ;; Write 0x2fh (standby) to nvr latch
|
|
3790 18DF D3 62 out 62h
|
|
3791 18E1 21 D3 21 lxi h,X21d3 ;; HL = X21d3
|
|
3792 18E4 06 0E mvi b,0eh ;; B = 14 -- we're reading 14 bits
|
|
3793 18E6 DB 42 X18e6: in 42h
|
|
3794 18E8 A1 ana c
|
|
3795 18E9 CA E6 18 jz X18e6
|
|
3796 18EC DB 42 X18ec: in 42h
|
|
3797 18EE A1 ana c
|
|
3798 18EF C2 EC 18 jnz X18ec ;; wait for NVR clock L
|
|
3799 18F2 3E 25 mvi a,25h ;; shft bit out of nvr
|
|
3800 18F4 D3 62 out 62h
|
|
3801 18F6 DB 42 X18f6: in 42h
|
|
3802 18F8 A1 ana c
|
|
3803 18F9 CA F6 18 jz X18f6 ;; wait for NVR clock H
|
|
3804 18FC DB 42 in 42h ;; read bit and store it in memory
|
|
3805 18FE 77 mov m,a
|
|
3806 18FF 23 inx h
|
|
3807 1900 DB 42 X1900: in 42h
|
|
3808 1902 A1 ana c
|
|
3809 1903 C2 00 19 jnz X1900 ;; wait for NVR clock L
|
|
3810 1906 05 dcr b
|
|
3811 1907 C2 F6 18 jnz X18f6 ;; read next bit
|
|
3812 190A 3E 2F mvi a,2fh ;; send standby
|
|
3813 190C D3 62 out 62h
|
|
3814 190E 11 D3 21 lxi d,X21d3 ;; DE = 0x21d3
|
|
3815 1911 06 0E mvi b,0eh ;; B = 14
|
|
3816 1913 21 00 00 lxi h,0 ;; HL = 0
|
|
3817 1916 29 X1916: dad h ;;
|
|
3818 1917 1A ldax d ;; load next char
|
|
3819 1918 E6 20 ani 20h ;; and with NVR data bit
|
|
3820 191A 07 rlc ;; rotate NVR bit to high bit
|
|
3821 191B 07 rlc
|
|
3822 191C 07 rlc
|
|
3823 191D B5 ora l
|
|
3824 191E 6F mov l,a
|
|
3825 191F 13 inx d
|
|
3826 1920 05 dcr b
|
|
3827 1921 C2 16 19 jnz X1916
|
|
3828 1924 22 AF 21 shld X21af ;; Store the finished data in 21af and 21ae
|
|
3829 1927 C9 ret
|
|
;;
|
|
;; Loads address A into NVR address register
|
|
;;
|
|
3833 1928 3A AE 21 X1928: lda X21ae ;; Load accumulator from 0x21ae -- (0x42)
|
|
3834 192B 06 FF X192b: mvi b,0ffh ;; B = 0xff
|
|
3835 192D 04 X192d: inr b ;; increment B
|
|
3836 192E D6 0A sui 0ah ;; subtract 0x0a from accumulator
|
|
3837 1930 F2 2D 19 jp X192d ;; repeat while accumulator is positive
|
|
3838 1933 C6 0A adi 0ah ;; add 0x0a to accumulator
|
|
|
|
;; B = A/10, A = A%10 -- this is almost certainly related to NVR!
|
|
;; First, fill the buffer at 21d3 with 20 bytes of 0x23 (accept address 1)
|
|
|
|
3843 1935 21 D3 21 lxi h,X21d3 ;; HL = 0x21d3
|
|
3844 1938 1E 23 mvi e,23h ;; E = 0x23
|
|
3845 193A 16 14 mvi d,14h ;; D = 0x14
|
|
3846 193C 73 X193c: mov m,e ;;
|
|
3847 193D 23 inx h ;; HL++
|
|
3848 193E 15 dcr d ;; D--
|
|
3849 193F C2 3C 19 jnz X193c ;; repeat until D is zero
|
|
|
|
;; End buffer with 0x2f -- put in standby
|
|
|
|
3853 1942 36 2F mvi m,2fh ;; Store 0x2f in 21e7
|
|
|
|
;; Set 21d3 + a to 0x22 (accept address 0)
|
|
|
|
3857 1944 21 D3 21 lxi h,X21d3 ;; HL = 0x21d3
|
|
3858 1947 5F mov e,a ;; copy A to E
|
|
3859 1948 16 00 mvi d,0 ;; clear D
|
|
3860 194A 19 dad d ;; add DE to HL -- calculate address of bit A
|
|
3861 194B 36 22 mvi m,22h ;; Store 0x22 in M
|
|
|
|
;; Set 21d3 + 10 + b to 0x22 (accept address 0)
|
|
|
|
3865 194D 21 D3 21 lxi h,X21d3 ;; HL = 0x21d3
|
|
3866 1950 3E 0A mvi a,0ah ;; A = 0x0a
|
|
3867 1952 80 add b ;; A = 0x0a + B
|
|
3868 1953 5F mov e,a
|
|
3869 1954 19 dad d
|
|
3870 1955 36 22 mvi m,22h
|
|
|
|
;; Wait for horiz latch
|
|
|
|
3874 1957 DB 42 X1957: in 42h
|
|
3875 1959 A1 ana c
|
|
3876 195A C2 57 19 jnz X1957
|
|
|
|
;; Now copy from 21d3 to nvr latch, one per edge, 21 bytes
|
|
|
|
3880 195D 21 D3 21 lxi h,X21d3
|
|
3881 1960 06 15 mvi b,15h ;;
|
|
3882 1962 DB 42 X1962: in 42h
|
|
3883 1964 A1 ana c ;; Flags Buffer & C
|
|
3884 1965 CA 62 19 jz X1962
|
|
3885 1968 05 dcr b
|
|
3886 1969 F8 rm ;; Return if B is negative
|
|
3887 196A DB 42 X196a: in 42h
|
|
3888 196C A1 ana c
|
|
3889 196D C2 6A 19 jnz X196a
|
|
3890 1970 7E mov a,m
|
|
3891 1971 D3 62 out 62h
|
|
3892 1973 23 inx h
|
|
3893 1974 C3 62 19 jmp X1962
|
|
|
|
3895 1977 2A AF 21 X1977: lhld X21af
|
|
3896 197A 29 dad h
|
|
3897 197B 29 dad h
|
|
3898 197C 11 D3 21 lxi d,X21d3
|
|
3899 197F 06 0E mvi b,0eh
|
|
3900 1981 3E 20 X1981: mvi a,20h
|
|
3901 1983 29 dad h
|
|
3902 1984 17 ral
|
|
3903 1985 12 stax d
|
|
3904 1986 13 inx d
|
|
3905 1987 05 dcr b
|
|
3906 1988 C2 81 19 jnz X1981
|
|
3907 198B 3E 2F mvi a,2fh
|
|
3908 198D 12 stax d
|
|
3909 198E 21 D3 21 lxi h,X21d3
|
|
3910 1991 06 0F mvi b,0fh
|
|
3911 1993 DB 42 X1993: in 42h
|
|
3912 1995 A1 ana c
|
|
3913 1996 CA 93 19 jz X1993
|
|
3914 1999 DB 42 X1999: in 42h
|
|
3915 199B A1 ana c
|
|
3916 199C C2 99 19 jnz X1999
|
|
3917 199F 7E mov a,m
|
|
3918 19A0 D3 62 out 62h
|
|
3919 19A2 23 inx h
|
|
3920 19A3 05 dcr b
|
|
3921 19A4 C2 93 19 jnz X1993
|
|
3922 19A7 C9 ret
|
|
|
|
3924 19A8 DB 42 X19a8: in 42h
|
|
3925 19AA A1 ana c
|
|
3926 19AB CA A8 19 jz X19a8
|
|
3927 19AE DB 42 X19ae: in 42h
|
|
3928 19B0 A1 ana c
|
|
3929 19B1 C2 AE 19 jnz X19ae
|
|
3930 19B4 3E 2B mvi a,2bh
|
|
3931 19B6 D3 62 out 62h
|
|
3932 19B8 CD C0 19 call X19c0
|
|
3933 19BB 3E 2F mvi a,2fh
|
|
3934 19BD D3 62 out 62h
|
|
3935 19BF C9 ret
|
|
|
|
3937 19C0 21 3B 01 X19c0: lxi h,X013b
|
|
3938 19C3 DB 42 X19c3: in 42h
|
|
3939 19C5 A1 ana c
|
|
3940 19C6 CA C3 19 jz X19c3
|
|
3941 19C9 DB 42 X19c9: in 42h
|
|
3942 19CB A1 ana c
|
|
3943 19CC C2 C9 19 jnz X19c9
|
|
3944 19CF 2B dcx h
|
|
3945 19D0 7C mov a,h
|
|
3946 19D1 B5 ora l
|
|
3947 19D2 C2 C3 19 jnz X19c3
|
|
3948 19D5 C9 ret
|
|
|
|
3950 19D6 DB 42 X19d6: in 42h
|
|
3951 19D8 A1 ana c
|
|
3952 19D9 CA D6 19 jz X19d6
|
|
3953 19DC DB 42 X19dc: in 42h
|
|
3954 19DE A1 ana c
|
|
3955 19DF C2 DC 19 jnz X19dc
|
|
3956 19E2 3E 29 mvi a,29h
|
|
3957 19E4 D3 62 out 62h
|
|
3958 19E6 CD C0 19 call X19c0
|
|
3959 19E9 3E 2F mvi a,2fh
|
|
3960 19EB D3 62 out 62h
|
|
3961 19ED C9 ret
|
|
|
|
3963 19EE FE 20 X19ee: cpi 20h
|
|
3964 19F0 0E 43 mvi c,43h
|
|
3965 19F2 CA FF 01 jz X01ff
|
|
3966 19F5 21 B0 1B lxi h,X1bb0
|
|
3967 19F8 E5 push h
|
|
3968 19F9 FE 0D cpi 0dh
|
|
3969 19FB CA 4B 09 jz X094b
|
|
3970 19FE FE 09 cpi 9
|
|
3971 1A00 CA F9 0D jz X0df9
|
|
3972 1A03 FE 3A cpi 3ah
|
|
3973 1A05 D2 60 1B jnc X1b60
|
|
3974 1A08 D6 30 sui 30h
|
|
3975 1A0A F8 rm
|
|
3976 1A0B 87 add a
|
|
3977 1A0C 21 A2 1A lxi h,X1aa2
|
|
3978 1A0F CD DE 13 call X13de
|
|
3979 1A12 CD 90 13 call X1390
|
|
3980 1A15 78 mov a,b
|
|
3981 1A16 11 AC 21 lxi d,X21ac
|
|
3982 1A19 E9 pchl
|
|
|
|
3984 1A1A 32 77 21 X1a1a: sta X2177
|
|
3985 1A1D C3 12 08 jmp X0812
|
|
|
|
3987 1A20 3A 7B 20 X1a20: lda X207b
|
|
3988 1A23 EE FF xri 0ffh
|
|
3989 1A25 32 7B 20 sta X207b
|
|
3990 1A28 CA 61 1A jz X1a61
|
|
3991 1A2B 0E 80 X1a2b: mvi c,80h
|
|
3992 1A2D CD 8E 10 call X108e
|
|
3993 1A30 2A 40 21 lhld X2140
|
|
3994 1A33 22 11 21 shld X2111
|
|
3995 1A36 21 EE 19 lxi h,X19ee
|
|
3996 1A39 22 40 21 shld X2140
|
|
3997 1A3C 21 00 00 lxi h,0
|
|
3998 1A3F 22 43 21 shld X2143
|
|
3999 1A42 22 72 21 shld X2172
|
|
4000 1A45 2A 04 20 X1a45: lhld X2004
|
|
4001 1A48 22 C5 21 shld X21c5
|
|
4002 1A4B 2A F8 20 lhld X20f8
|
|
4003 1A4E 22 0D 21 shld X210d
|
|
4004 1A51 CD BA 1B call X1bba
|
|
4005 1A54 22 4E 21 shld X214e
|
|
4006 1A57 AF xra a
|
|
4007 1A58 32 F8 20 sta X20f8
|
|
4008 1A5B CD F9 1B call X1bf9
|
|
4009 1A5E C3 36 16 jmp X1636
|
|
|
|
4011 1A61 2A 11 21 X1a61: lhld X2111
|
|
4012 1A64 22 40 21 shld X2140
|
|
4013 1A67 CD BA 1B call X1bba
|
|
4014 1A6A 11 00 10 lxi d,1000h
|
|
4015 1A6D 19 dad d
|
|
4016 1A6E 3A 50 20 lda X2050
|
|
4017 1A71 36 FF X1a71: mvi m,0ffh
|
|
4018 1A73 23 inx h
|
|
4019 1A74 3D dcr a
|
|
4020 1A75 C2 71 1A jnz X1a71
|
|
4021 1A78 21 0D 21 lxi h,X210d
|
|
4022 1A7B 7E mov a,m
|
|
4023 1A7C 32 F8 20 sta X20f8
|
|
4024 1A7F 3E FF mvi a,0ffh
|
|
4025 1A81 23 inx h
|
|
4026 1A82 77 mov m,a
|
|
4027 1A83 CD 36 16 call X1636
|
|
4028 1A86 2A C5 21 lhld X21c5
|
|
4029 1A89 22 04 20 shld X2004
|
|
4030 1A8C AF xra a
|
|
4031 1A8D 32 C4 21 sta X21c4
|
|
4032 1A90 32 C2 21 sta X21c2
|
|
4033 1A93 DB 42 in 42h
|
|
4034 1A95 E6 08 ani 8
|
|
4035 1A97 CA A1 1A jz X1aa1
|
|
4036 1A9A 3A 76 21 lda X2176
|
|
4037 1A9D B7 ora a
|
|
4038 1A9E CC E8 12 cz X12e8
|
|
4039 1AA1 C9 X1aa1: ret
|
|
|
|
4041 1AA2 CF X1aa2: rst 1
|
|
4042 1AA3 1A ldax d
|
|
4043 1AA4 09 dad b
|
|
4044 1AA5 1B dcx d
|
|
4045 1AA6 D0 rnc
|
|
4046 1AA7 1A ldax d
|
|
4047 1AA8 F2 1A FE jp Xfe1a
|
|
4048 1AAB 1A ldax d
|
|
4049 1AAC 0A ldax b
|
|
4050 1AAD 1B dcx d
|
|
4051 1AAE 22 1B 40 shld X401b
|
|
4052 1AB1 1B dcx d
|
|
4053 1AB2 41 mov b,c
|
|
4054 1AB3 1B dcx d
|
|
4055 1AB4 B6 ora m
|
|
4056 1AB5 1A ldax d
|
|
4057 1AB6 CD 52 1B call X1b52
|
|
4058 1AB9 AF xra a
|
|
4059 1ABA 32 0E 21 sta X210e
|
|
4060 1ABD 32 0D 21 sta X210d
|
|
4061 1AC0 3A A2 21 lda X21a2
|
|
4062 1AC3 B7 ora a
|
|
4063 1AC4 F5 push psw
|
|
4064 1AC5 CC 77 0B cz X0b77
|
|
4065 1AC8 F1 pop psw
|
|
4066 1AC9 C4 63 0B cnz X0b63
|
|
4067 1ACC C3 45 1A jmp X1a45
|
|
|
|
4069 1ACF C7 rst 0
|
|
4070 1AD0 CD 52 1B call X1b52
|
|
4071 1AD3 3A F8 20 lda X20f8
|
|
4072 1AD6 B7 ora a
|
|
4073 1AD7 C8 rz
|
|
4074 1AD8 CD 23 0E call X0e23
|
|
4075 1ADB AE xra m
|
|
4076 1ADC 77 mov m,a
|
|
4077 1ADD CD 23 0E call X0e23
|
|
4078 1AE0 A6 ana m
|
|
4079 1AE1 06 54 mvi b,54h
|
|
4080 1AE3 C2 E8 1A jnz X1ae8
|
|
4081 1AE6 06 00 X1ae6: mvi b,0
|
|
4082 1AE8 78 X1ae8: mov a,b
|
|
4083 1AE9 32 F4 20 sta X20f4
|
|
4084 1AEC 3A F8 20 lda X20f8
|
|
4085 1AEF C3 EA 1E jmp X1eea
|
|
;;
|
|
;; Below is what appears to be a bunch of dead code-- unreferenced functions (meant for use
|
|
;; by an expansion rom or patch, perhaps?).
|
|
;;
|
|
4090 1AF2 CD 52 1B call X1b52
|
|
4091 1AF5 CD EC 0D call X0dec
|
|
4092 1AF8 CD CD 1C call X1ccd
|
|
4093 1AFB C3 E6 1A jmp X1ae6
|
|
|
|
4095 1AFE 21 A5 21 lxi h,X21a5
|
|
4096 1B01 7E mov a,m
|
|
4097 1B02 EE 20 xri 20h
|
|
4098 1B04 77 mov m,a
|
|
4099 1B05 AF xra a
|
|
4100 1B06 32 44 21 sta X2144
|
|
4101 1B09 C9 ret
|
|
|
|
4103 1B0A CD 4B 09 call X094b
|
|
4104 1B0D 21 5A 22 lxi h,X225a
|
|
4105 1B10 7E mov a,m
|
|
4106 1B11 EE 03 xri 3
|
|
4107 1B13 77 mov m,a
|
|
4108 1B14 32 65 22 sta X2265
|
|
4109 1B17 E6 01 ani 1
|
|
4110 1B19 32 BE 21 sta X21be
|
|
4111 1B1C CA D3 1C jz X1cd3
|
|
4112 1B1F C3 35 1C jmp X1c35
|
|
|
|
4114 1B22 CD 59 1B call X1b59
|
|
4115 1B25 21 A6 21 lxi h,X21a6
|
|
4116 1B28 3A F8 20 lda X20f8
|
|
4117 1B2B D6 02 sui 2
|
|
4118 1B2D FE 28 cpi 28h
|
|
4119 1B2F D0 rnc
|
|
4120 1B30 00 nop
|
|
|
|
1B 34 org 1b34h
|
|
|
|
4124 1B34 57 mov d,a
|
|
4125 1B35 CD 2B 0E call X0e2b
|
|
4126 1B38 AE xra m
|
|
4127 1B39 77 mov m,a
|
|
4128 1B3A CD DB 1D call X1ddb
|
|
4129 1B3D C3 D3 1C jmp X1cd3
|
|
|
|
4131 1B40 1B dcx d
|
|
4132 1B41 EB xchg
|
|
4133 1B42 CD 59 1B call X1b59
|
|
4134 1B45 32 F8 20 sta X20f8
|
|
4135 1B48 7E mov a,m
|
|
4136 1B49 C6 10 adi 10h
|
|
4137 1B4B 77 mov m,a
|
|
4138 1B4C CD DB 1D call X1ddb
|
|
4139 1B4F C3 D3 1C jmp X1cd3
|
|
|
|
4141 1B52 3A BE 21 X1b52: lda X21be
|
|
4142 1B55 B7 ora a
|
|
4143 1B56 C0 rnz
|
|
4144 1B57 E1 pop h
|
|
4145 1B58 C9 ret
|
|
|
|
4147 1B59 3A BE 21 X1b59: lda X21be
|
|
4148 1B5C B7 ora a
|
|
4149 1B5D C8 rz
|
|
4150 1B5E E1 pop h
|
|
4151 1B5F C9 ret
|
|
|
|
4153 1B60 3A 69 20 X1b60: lda X2069
|
|
4154 1B63 E6 20 ani 20h
|
|
4155 1B65 C8 rz
|
|
4156 1B66 78 mov a,b
|
|
4157 1B67 FE 53 cpi 53h
|
|
4158 1B69 C2 72 1B jnz X1b72
|
|
4159 1B6C CD 54 17 call X1754
|
|
4160 1B6F C3 81 1B jmp X1b81
|
|
|
|
4162 1B72 FE 52 X1b72: cpi 52h
|
|
4163 1B74 C2 86 1B jnz X1b86
|
|
4164 1B77 CD 5B 17 call X175b
|
|
4165 1B7A FB ei
|
|
4166 1B7B CD A2 03 call X03a2
|
|
4167 1B7E CD 2B 1A call X1a2b
|
|
4168 1B81 FB X1b81: ei
|
|
4169 1B82 CD F9 1B call X1bf9
|
|
4170 1B85 C9 ret
|
|
|
|
4172 1B86 FE 41 X1b86: cpi 41h
|
|
4173 1B88 C0 rnz
|
|
4174 1B89 CD 59 1B call X1b59
|
|
4175 1B8C CD 4B 09 call X094b
|
|
4176 1B8F 3E 41 mvi a,41h
|
|
4177 1B91 CD E6 05 call X05e6
|
|
4178 1B94 3E 3D mvi a,3dh
|
|
4179 1B96 CD E6 05 call X05e6
|
|
4180 1B99 3E 20 mvi a,20h
|
|
4181 1B9B CD E6 05 call X05e6
|
|
4182 1B9E 21 9F 1E lxi h,X1e9f
|
|
4183 1BA1 22 40 21 shld X2140
|
|
4184 1BA4 E1 pop h
|
|
4185 1BA5 C9 ret
|
|
|
|
4187 1BA6 98 sbb b
|
|
4188 1BA7 FE 61 cpi 61h
|
|
4189 1BA9 F8 rm
|
|
4190 1BAA FE 7B cpi 7bh
|
|
4191 1BAC F0 rp
|
|
4192 1BAD E6 DF ani 0dfh
|
|
4193 1BAF C9 ret
|
|
|
|
4195 1BB0 CD 94 03 X1bb0: call X0394
|
|
4196 1BB3 21 EE 19 lxi h,X19ee
|
|
4197 1BB6 22 40 21 shld X2140
|
|
4198 1BB9 C9 ret
|
|
|
|
4200 1BBA 2A 4E 20 X1bba: lhld scratch_start ; load [0x204e]
|
|
4201 1BBD C3 C3 1B jmp X1bc3
|
|
|
|
4203 1BC0 21 CC 21 X1bc0: lxi h,X21cc
|
|
4204 1BC3 7C X1bc3: mov a,h
|
|
4205 1BC4 E6 0F ani 0fh
|
|
4206 1BC6 F6 20 ori 20h
|
|
4207 1BC8 67 mov h,a
|
|
4208 1BC9 C9 ret
|
|
|
|
4210 1BCA CD BA 1B X1bca: call X1bba
|
|
4211 1BCD CD C8 0F call X0fc8
|
|
4212 1BD0 E5 push h
|
|
4213 1BD1 36 7F mvi m,7fh
|
|
4214 1BD3 23 inx h
|
|
4215 1BD4 EB xchg
|
|
4216 1BD5 CD C0 1B call X1bc0
|
|
4217 1BD8 7C mov a,h
|
|
4218 1BD9 E6 0F ani 0fh
|
|
4219 1BDB F6 70 ori 70h
|
|
4220 1BDD 12 stax d
|
|
4221 1BDE 13 inx d
|
|
4222 1BDF 7D mov a,l
|
|
4223 1BE0 12 stax d
|
|
4224 1BE1 E1 pop h
|
|
4225 1BE2 3A 50 20 lda X2050
|
|
4226 1BE5 5F mov e,a
|
|
4227 1BE6 06 54 mvi b,54h
|
|
4228 1BE8 7B X1be8: mov a,e
|
|
4229 1BE9 CD 27 0E call X0e27
|
|
4230 1BEC A6 ana m
|
|
4231 1BED CA F4 1B jz X1bf4
|
|
4232 1BF0 7B mov a,e
|
|
4233 1BF1 CD EA 1E call X1eea
|
|
4234 1BF4 1D X1bf4: dcr e
|
|
4235 1BF5 C2 E8 1B jnz X1be8
|
|
4236 1BF8 C9 ret
|
|
|
|
4238 1BF9 01 AD 1C X1bf9: lxi b,X1cad
|
|
4239 1BFC 21 53 22 lxi h,X2253
|
|
4240 1BFF 3E FA mvi a,0fah
|
|
4241 1C01 CD 71 1C call X1c71
|
|
4242 1C04 0E 01 mvi c,1
|
|
4243 1C06 06 10 mvi b,10h
|
|
4244 1C08 CD 8A 1C call X1c8a
|
|
4245 1C0B 01 AD 1C lxi b,X1cad
|
|
4246 1C0E 3E FA mvi a,0fah
|
|
4247 1C10 CD 71 1C call X1c71
|
|
4248 1C13 0E 01 mvi c,1
|
|
4249 1C15 06 50 mvi b,50h
|
|
4250 1C17 CD 8A 1C call X1c8a
|
|
4251 1C1A 01 B6 1C lxi b,X1cb6
|
|
4252 1C1D 3E FD mvi a,0fdh
|
|
4253 1C1F CD 71 1C call X1c71
|
|
4254 1C22 0E 13 mvi c,13h
|
|
4255 1C24 CD 88 1C call X1c88
|
|
4256 1C27 36 7F mvi m,7fh
|
|
4257 1C29 23 inx h
|
|
4258 1C2A EB xchg
|
|
4259 1C2B CD BA 1B call X1bba
|
|
4260 1C2E 7C mov a,h
|
|
4261 1C2F F6 70 ori 70h
|
|
4262 1C31 12 stax d
|
|
4263 1C32 13 inx d
|
|
4264 1C33 7D mov a,l
|
|
4265 1C34 12 stax d
|
|
4266 1C35 CD C0 1B X1c35: call X1bc0
|
|
4267 1C38 3A 50 20 lda X2050
|
|
4268 1C3B 47 mov b,a
|
|
4269 1C3C 3E 31 mvi a,31h
|
|
4270 1C3E 77 X1c3e: mov m,a
|
|
4271 1C3F 23 inx h
|
|
4272 1C40 4F mov c,a
|
|
4273 1C41 E6 0F ani 0fh
|
|
4274 1C43 79 mov a,c
|
|
4275 1C44 C2 49 1C jnz X1c49
|
|
4276 1C47 EE 80 xri 80h
|
|
4277 1C49 3C X1c49: inr a
|
|
4278 1C4A 27 daa
|
|
4279 1C4B D2 50 1C jnc X1c50
|
|
4280 1C4E F6 80 ori 80h
|
|
4281 1C50 E6 8F X1c50: ani 8fh
|
|
4282 1C52 F6 30 ori 30h
|
|
4283 1C54 05 dcr b
|
|
4284 1C55 C2 3E 1C jnz X1c3e
|
|
4285 1C58 CD 9F 1C call X1c9f
|
|
4286 1C5B CD CA 1B call X1bca
|
|
4287 1C5E 3E 01 mvi a,1
|
|
4288 1C60 32 BE 21 X1c60: sta X21be
|
|
4289 1C63 21 53 22 lxi h,X2253
|
|
4290 1C66 7C mov a,h
|
|
4291 1C67 65 mov h,l
|
|
4292 1C68 E6 0F ani 0fh
|
|
4293 1C6A F6 30 ori 30h
|
|
4294 1C6C 6F mov l,a
|
|
4295 1C6D 22 04 20 shld X2004
|
|
4296 1C70 C9 ret
|
|
|
|
4298 1C71 E5 X1c71: push h
|
|
4299 1C72 11 00 10 lxi d,1000h
|
|
4300 1C75 19 dad d
|
|
4301 1C76 D1 pop d
|
|
4302 1C77 F5 X1c77: push psw
|
|
4303 1C78 0A ldax b
|
|
4304 1C79 B7 ora a
|
|
4305 1C7A CA 86 1C jz X1c86
|
|
4306 1C7D 12 stax d
|
|
4307 1C7E F1 pop psw
|
|
4308 1C7F 77 mov m,a
|
|
4309 1C80 23 inx h
|
|
4310 1C81 13 inx d
|
|
4311 1C82 03 inx b
|
|
4312 1C83 C3 77 1C jmp X1c77
|
|
|
|
4314 1C86 F1 X1c86: pop psw
|
|
4315 1C87 C9 ret
|
|
|
|
4317 1C88 06 70 X1c88: mvi b,70h
|
|
4318 1C8A EB X1c8a: xchg
|
|
4319 1C8B 36 7F X1c8b: mvi m,7fh
|
|
4320 1C8D 23 inx h
|
|
4321 1C8E 54 mov d,h
|
|
4322 1C8F 5D mov e,l
|
|
4323 1C90 13 inx d
|
|
4324 1C91 13 inx d
|
|
4325 1C92 7A mov a,d
|
|
4326 1C93 E6 0F ani 0fh
|
|
4327 1C95 B0 ora b
|
|
4328 1C96 77 mov m,a
|
|
4329 1C97 23 inx h
|
|
4330 1C98 73 mov m,e
|
|
4331 1C99 23 inx h
|
|
4332 1C9A 0D dcr c
|
|
4333 1C9B C2 8B 1C jnz X1c8b
|
|
4334 1C9E C9 ret
|
|
|
|
4336 1C9F 36 7F X1c9f: mvi m,7fh
|
|
4337 1CA1 54 mov d,h
|
|
4338 1CA2 5D mov e,l
|
|
4339 1CA3 23 inx h
|
|
4340 1CA4 7A mov a,d
|
|
4341 1CA5 E6 0F ani 0fh
|
|
4342 1CA7 F6 70 ori 70h
|
|
4343 1CA9 77 mov m,a
|
|
4344 1CAA 23 inx h
|
|
4345 1CAB 73 mov m,e
|
|
4346 1CAC C9 ret
|
|
X1cad:
|
|
4348 1CAD db 'SET-UP A',0
|
|
53 45 54 2D
|
|
55 50 20 41
|
|
00
|
|
X1cb6:
|
|
4350 1CB6 db 'TO EXIT PRESS ',022h,'SET-UP',022h,0
|
|
54 4F 20 45
|
|
58 49 54 20
|
|
50 52 45 53
|
|
53 20 22 53
|
|
45 54 2D 55
|
|
50 22 00
|
|
4351 1CCD CD BA 1B call X1bba
|
|
4352 1CD0 C3 C8 0F jmp X0fc8
|
|
|
|
4354 1CD3 CD CD 1C X1cd3: call X1ccd
|
|
4355 1CD6 CD C0 1B call X1bc0
|
|
4356 1CD9 E5 push h
|
|
4357 1CDA 3E 4E mvi a,4eh
|
|
4358 1CDC CD CB 0F call X0fcb
|
|
4359 1CDF E1 pop h
|
|
4360 1CE0 E5 push h
|
|
4361 1CE1 23 inx h
|
|
4362 1CE2 23 inx h
|
|
4363 1CE3 1E 00 mvi e,0
|
|
4364 1CE5 06 04 mvi b,4
|
|
4365 1CE7 DB 42 in 42h
|
|
4366 1CE9 E6 08 ani 8
|
|
4367 1CEB F5 push psw
|
|
4368 1CEC CA F0 1C jz X1cf0
|
|
4369 1CEF 04 inr b
|
|
4370 1CF0 0E 04 X1cf0: mvi c,4
|
|
4371 1CF2 CD CC 1D X1cf2: call X1dcc
|
|
4372 1CF5 F6 B0 ori 0b0h
|
|
4373 1CF7 77 mov m,a
|
|
4374 1CF8 1C inr e
|
|
4375 1CF9 23 inx h
|
|
4376 1CFA 0D dcr c
|
|
4377 1CFB C2 F2 1C jnz X1cf2
|
|
4378 1CFE 0E 04 mvi c,4
|
|
4379 1D00 36 00 X1d00: mvi m,0
|
|
4380 1D02 1C inr e
|
|
4381 1D03 23 inx h
|
|
4382 1D04 0D dcr c
|
|
4383 1D05 C2 00 1D jnz X1d00
|
|
4384 1D08 05 dcr b
|
|
4385 1D09 C2 F0 1C jnz X1cf0
|
|
4386 1D0C 0E 04 mvi c,4
|
|
4387 1D0E F1 pop psw
|
|
4388 1D0F F5 push psw
|
|
4389 1D10 C2 17 1D jnz X1d17
|
|
4390 1D13 79 mov a,c
|
|
4391 1D14 C6 08 adi 8
|
|
4392 1D16 4F mov c,a
|
|
4393 1D17 36 00 X1d17: mvi m,0
|
|
4394 1D19 23 inx h
|
|
4395 1D1A 0D dcr c
|
|
4396 1D1B C2 17 1D jnz X1d17
|
|
4397 1D1E 11 4B 1D lxi d,X1d4b
|
|
4398 1D21 3A AB 21 lda X21ab
|
|
4399 1D24 CD 61 1D call X1d61
|
|
4400 1D27 11 56 1D lxi d,X1d56
|
|
4401 1D2A 3A AC 21 lda X21ac
|
|
4402 1D2D CD 61 1D call X1d61
|
|
4403 1D30 CD 9F 1C call X1c9f
|
|
4404 1D33 11 08 00 lxi d,8
|
|
4405 1D36 0E 04 mvi c,4
|
|
4406 1D38 F1 pop psw
|
|
4407 1D39 CA 3D 1D jz X1d3d
|
|
4408 1D3C 0C inr c
|
|
4409 1D3D 3E 31 X1d3d: mvi a,31h
|
|
4410 1D3F E1 pop h
|
|
4411 1D40 77 X1d40: mov m,a
|
|
4412 1D41 3C inr a
|
|
4413 1D42 19 dad d
|
|
4414 1D43 0D dcr c
|
|
4415 1D44 C2 40 1D jnz X1d40
|
|
4416 1D47 AF xra a
|
|
4417 1D48 C3 60 1C jmp X1c60
|
|
|
|
4419 1D4B X1d4b: db 20h
|
|
20
|
|
4420 1D4C db 20h
|
|
20
|
|
4421 1D4D db 20h
|
|
20
|
|
4422 1D4E 54 mov d,h
|
|
4423 1D4F db 20h
|
|
20
|
|
4424 1D50 53 mov d,e
|
|
4425 1D51 50 mov d,b
|
|
4426 1D52 45 mov b,l
|
|
4427 1D53 45 mov b,l
|
|
4428 1D54 44 mov b,h
|
|
4429 1D55 db 20h
|
|
20
|
|
4430 1D56 X1d56: db 20h
|
|
20
|
|
4431 1D57 db 20h
|
|
20
|
|
4432 1D58 db 20h
|
|
20
|
|
4433 1D59 52 mov d,d
|
|
4434 1D5A db 20h
|
|
20
|
|
4435 1D5B 53 mov d,e
|
|
4436 1D5C 50 mov d,b
|
|
4437 1D5D 45 mov b,l
|
|
4438 1D5E 45 mov b,l
|
|
4439 1D5F 44 mov b,h
|
|
4440 1D60 db 20h
|
|
20
|
|
4441 1D61 4F X1d61: mov c,a
|
|
4442 1D62 06 0B mvi b,0bh
|
|
4443 1D64 CD 8B 03 call memmove
|
|
4444 1D67 79 mov a,c
|
|
4445 1D68 0F rrc
|
|
4446 1D69 0F rrc
|
|
4447 1D6A 4F mov c,a
|
|
4448 1D6B 0F rrc
|
|
4449 1D6C 0F rrc
|
|
4450 1D6D 81 add c
|
|
4451 1D6E 4F mov c,a
|
|
4452 1D6F 06 00 mvi b,0
|
|
4453 1D71 11 7C 1D lxi d,X1d7c
|
|
4454 1D74 EB xchg
|
|
4455 1D75 09 dad b
|
|
4456 1D76 EB xchg
|
|
4457 1D77 06 05 mvi b,5
|
|
4458 1D79 C3 8B 03 jmp memmove
|
|
|
|
4460 1D7C X1d7c: db 20h
|
|
20
|
|
4461 1D7D db 20h
|
|
20
|
|
4462 1D7E db 20h
|
|
20
|
|
4463 1D7F 35 dcr m
|
|
4464 1D80 db 30h
|
|
30
|
|
4465 1D81 db 20h
|
|
20
|
|
4466 1D82 db 20h
|
|
20
|
|
4467 1D83 db 20h
|
|
20
|
|
4468 1D84 37 stc
|
|
4469 1D85 35 dcr m
|
|
4470 1D86 db 20h
|
|
20
|
|
4471 1D87 db 20h
|
|
20
|
|
4472 1D88 31 31 30 lxi sp,X3031
|
|
4473 1D8B db 20h
|
|
20
|
|
4474 1D8C db 20h
|
|
20
|
|
4475 1D8D 31 33 34 lxi sp,X3433
|
|
4476 1D90 db 20h
|
|
20
|
|
4477 1D91 db 20h
|
|
20
|
|
4478 1D92 31 35 30 lxi sp,X3035
|
|
4479 1D95 db 20h
|
|
20
|
|
4480 1D96 db 20h
|
|
20
|
|
4481 1D97 32 30 30 sta X3030
|
|
4482 1D9A db 20h
|
|
20
|
|
4483 1D9B db 20h
|
|
20
|
|
4484 1D9C 33 inx sp
|
|
4485 1D9D db 30h
|
|
30
|
|
4486 1D9E db 30h
|
|
30
|
|
4487 1D9F db 20h
|
|
20
|
|
4488 1DA0 db 20h
|
|
20
|
|
4489 1DA1 36 30 mvi m,30h
|
|
4490 1DA3 db 30h
|
|
30
|
|
4491 1DA4 db 20h
|
|
20
|
|
4492 1DA5 31 32 30 lxi sp,X3032
|
|
4493 1DA8 db 30h
|
|
30
|
|
4494 1DA9 db 20h
|
|
20
|
|
4495 1DAA 31 38 30 lxi sp,X3038
|
|
4496 1DAD db 30h
|
|
30
|
|
4497 1DAE db 20h
|
|
20
|
|
4498 1DAF 32 30 30 sta X3030
|
|
4499 1DB2 db 30h
|
|
30
|
|
4500 1DB3 db 20h
|
|
20
|
|
4501 1DB4 32 34 30 sta X3034
|
|
4502 1DB7 db 30h
|
|
30
|
|
4503 1DB8 db 20h
|
|
20
|
|
4504 1DB9 33 inx sp
|
|
4505 1DBA 36 30 mvi m,30h
|
|
4506 1DBC db 30h
|
|
30
|
|
4507 1DBD db 20h
|
|
20
|
|
4508 1DBE 34 inr m
|
|
4509 1DBF db 38h
|
|
38
|
|
4510 1DC0 db 30h
|
|
30
|
|
4511 1DC1 db 30h
|
|
30
|
|
4512 1DC2 db 20h
|
|
20
|
|
4513 1DC3 39 dad sp
|
|
4514 1DC4 36 30 mvi m,30h
|
|
4515 1DC6 db 30h
|
|
30
|
|
4516 1DC7 31 39 32 lxi sp,X3239
|
|
4517 1DCA db 30h
|
|
30
|
|
4518 1DCB db 30h
|
|
30
|
|
4519 1DCC E5 X1dcc: push h
|
|
4520 1DCD 21 A6 21 lxi h,X21a6
|
|
4521 1DD0 53 mov d,e
|
|
4522 1DD1 7B mov a,e
|
|
4523 1DD2 CD 2B 0E call X0e2b
|
|
4524 1DD5 A6 ana m
|
|
4525 1DD6 E1 pop h
|
|
4526 1DD7 C8 rz
|
|
4527 1DD8 3E 01 mvi a,1
|
|
4528 1DDA C9 ret
|
|
|
|
4530 1DDB 3A AC 21 X1ddb: lda X21ac
|
|
4531 1DDE E6 F0 ani 0f0h
|
|
4532 1DE0 0F rrc
|
|
4533 1DE1 0F rrc
|
|
4534 1DE2 0F rrc
|
|
4535 1DE3 0F rrc
|
|
4536 1DE4 47 mov b,a
|
|
4537 1DE5 3A AB 21 lda X21ab
|
|
4538 1DE8 E6 F0 ani 0f0h
|
|
4539 1DEA B0 ora b
|
|
4540 1DEB 32 58 21 sta X2158
|
|
4541 1DEE E6 F0 ani 0f0h
|
|
4542 1DF0 FE 20 cpi 20h
|
|
4543 1DF2 3A A4 21 lda X21a4
|
|
4544 1DF5 CA FF 1D jz X1dff
|
|
4545 1DF8 E6 3F ani 3fh
|
|
4546 1DFA F6 80 ori 80h
|
|
4547 1DFC C3 03 1E jmp X1e03
|
|
|
|
4549 1DFF E6 3F X1dff: ani 3fh
|
|
4550 1E01 F6 C0 ori 0c0h
|
|
4551 1E03 32 A4 21 X1e03: sta X21a4
|
|
4552 1E06 DB 42 in 42h
|
|
4553 1E08 E6 08 ani 8
|
|
4554 1E0A CA 19 1E jz X1e19
|
|
4555 1E0D 21 A7 21 lxi h,X21a7
|
|
4556 1E10 7E mov a,m
|
|
4557 1E11 F6 10 ori 10h
|
|
4558 1E13 77 mov m,a
|
|
4559 1E14 3E 6E mvi a,6eh
|
|
4560 1E16 C3 31 1E jmp X1e31
|
|
|
|
4562 1E19 3A A9 21 X1e19: lda X21a9
|
|
4563 1E1C E6 C0 ani 0c0h
|
|
4564 1E1E 47 mov b,a
|
|
4565 1E1F 3A A9 21 lda X21a9
|
|
4566 1E22 E6 20 ani 20h
|
|
4567 1E24 0F rrc
|
|
4568 1E25 F6 20 ori 20h
|
|
4569 1E27 B0 ora b
|
|
4570 1E28 0F rrc
|
|
4571 1E29 0F rrc
|
|
4572 1E2A 47 mov b,a
|
|
4573 1E2B 3A A4 21 lda X21a4
|
|
4574 1E2E E6 C3 ani 0c3h
|
|
4575 1E30 B0 ora b
|
|
4576 1E31 32 A4 21 X1e31: sta X21a4
|
|
4577 1E34 3A A9 21 lda X21a9
|
|
4578 1E37 E6 10 ani 10h
|
|
4579 1E39 CA 3E 1E jz X1e3e
|
|
4580 1E3C 3E 10 mvi a,10h
|
|
4581 1E3E C6 20 X1e3e: adi 20h
|
|
4582 1E40 32 7C 20 sta X207c
|
|
4583 1E43 3A A6 21 lda X21a6
|
|
4584 1E46 E6 10 ani 10h
|
|
4585 1E48 CA 4D 1E jz X1e4d
|
|
4586 1E4B 3E 01 mvi a,1
|
|
4587 1E4D CD 6E 1E X1e4d: call X1e6e
|
|
4588 1E50 CD 29 03 call X0329
|
|
4589 1E53 3A F8 20 lda X20f8
|
|
4590 1E56 FE 15 cpi 15h
|
|
4591 1E58 CC 42 03 cz X0342
|
|
4592 1E5B FE 1D cpi 1dh
|
|
4593 1E5D CC 42 03 cz X0342
|
|
4594 1E60 FE 0C cpi 0ch
|
|
4595 1E62 CC F2 0B cz X0bf2
|
|
4596 1E65 FE 12 cpi 12h
|
|
4597 1E67 CC F2 0B cz X0bf2
|
|
4598 1E6A CD 36 16 call X1636
|
|
4599 1E6D C9 ret
|
|
|
|
4601 1E6E B7 X1e6e: ora a
|
|
4602 1E6F CA 79 1E jz X1e79
|
|
4603 1E72 32 5B 21 sta X215b
|
|
4604 1E75 AF xra a
|
|
4605 1E76 C3 94 1E jmp X1e94
|
|
|
|
4607 1E79 DB 42 X1e79: in 42h
|
|
4608 1E7B E6 02 ani 2
|
|
4609 1E7D C2 90 1E jnz X1e90
|
|
4610 1E80 32 59 21 sta X2159
|
|
4611 1E83 3E 01 mvi a,1
|
|
4612 1E85 32 5B 21 sta X215b
|
|
4613 1E88 3E 02 mvi a,2
|
|
4614 1E8A 32 5A 21 sta X215a
|
|
4615 1E8D C3 6B 03 jmp X036b
|
|
|
|
4617 1E90 AF X1e90: xra a
|
|
4618 1E91 32 5B 21 sta X215b
|
|
4619 1E94 32 5A 21 X1e94: sta X215a
|
|
4620 1E97 3E 80 mvi a,80h
|
|
4621 1E99 32 59 21 sta X2159
|
|
4622 1E9C C3 6B 03 jmp X036b
|
|
|
|
4624 1E9F CD DD 1E X1e9f: call X1edd
|
|
4625 1EA2 21 7B 21 lxi h,X217b
|
|
4626 1EA5 77 mov m,a
|
|
4627 1EA6 23 inx h
|
|
4628 1EA7 22 B4 21 shld X21b4
|
|
4629 1EAA 47 mov b,a
|
|
4630 1EAB 11 14 00 lxi d,20 ; DE = 20(0x0014)
|
|
4631 1EAE CD 83 10 call memset ; call memset(0x1083)
|
|
4632 1EB1 21 B8 1E lxi h,X1eb8
|
|
4633 1EB4 22 40 21 shld X2140
|
|
4634 1EB7 C9 ret
|
|
|
|
4636 1EB8 CD DD 1E X1eb8: call X1edd
|
|
4637 1EBB 2A B4 21 lhld X21b4
|
|
4638 1EBE 47 mov b,a
|
|
4639 1EBF 3A 7B 21 lda X217b
|
|
4640 1EC2 4F mov c,a
|
|
4641 1EC3 B8 cmp b
|
|
4642 1EC4 CA D3 1E jz X1ed3
|
|
4643 1EC7 7D mov a,l
|
|
4644 1EC8 FE 90 cpi 90h
|
|
4645 1ECA CA D3 1E jz X1ed3
|
|
4646 1ECD 70 mov m,b
|
|
4647 1ECE 23 inx h
|
|
4648 1ECF 22 B4 21 shld X21b4
|
|
4649 1ED2 C9 ret
|
|
|
|
4651 1ED3 71 X1ed3: mov m,c
|
|
4652 1ED4 CD CD 1C call X1ccd
|
|
4653 1ED7 CD 4B 09 call X094b
|
|
4654 1EDA C3 B0 1B jmp X1bb0
|
|
|
|
4656 1EDD F5 X1edd: push psw
|
|
4657 1EDE FE 20 cpi 20h
|
|
4658 1EE0 D2 E5 1E jnc X1ee5
|
|
4659 1EE3 3E 01 mvi a,1
|
|
4660 1EE5 CD E3 05 X1ee5: call X05e3
|
|
4661 1EE8 F1 pop psw
|
|
4662 1EE9 C9 ret
|
|
|
|
4664 1EEA E5 X1eea: push h
|
|
4665 1EEB 21 4E 20 lxi h,scratch_start ; HL -> 0x204e
|
|
4666 1EEE 4F mov c,a
|
|
4667 1EEF 3A A2 21 lda X21a2
|
|
4668 1EF2 B7 ora a
|
|
4669 1EF3 C2 FC 1E jnz X1efc
|
|
4670 1EF6 79 mov a,c
|
|
4671 1EF7 FE 50 cpi 50h
|
|
4672 1EF9 F2 0F 1F jp X1f0f
|
|
4673 1EFC 7E X1efc: mov a,m
|
|
4674 1EFD 23 inx h
|
|
4675 1EFE 66 mov h,m
|
|
4676 1EFF 6F mov l,a
|
|
4677 1F00 7C mov a,h
|
|
4678 1F01 E6 0F ani 0fh
|
|
4679 1F03 F6 20 ori 20h
|
|
4680 1F05 67 mov h,a
|
|
4681 1F06 79 mov a,c
|
|
4682 1F07 85 add l
|
|
4683 1F08 6F mov l,a
|
|
4684 1F09 D2 0D 1F jnc X1f0d
|
|
4685 1F0C 24 inr h
|
|
4686 1F0D 70 X1f0d: mov m,b
|
|
4687 1F0E 78 mov a,b
|
|
4688 1F0F E1 X1f0f: pop h
|
|
4689 1F10 C9 ret
|
|
|
|
4691 1F11 D5 X1f11: push d
|
|
4692 1F12 AF xra a
|
|
4693 1F13 32 A5 21 sta X21a5
|
|
4694 1F16 06 00 mvi b,0
|
|
4695 1F18 78 X1f18: mov a,b
|
|
4696 1F19 32 58 21 sta X2158
|
|
4697 1F1C D3 02 out 2
|
|
4698 1F1E 0E 01 mvi c,1
|
|
4699 1F20 79 X1f20: mov a,c
|
|
4700 1F21 D3 00 out 0
|
|
4701 1F23 21 00 C0 lxi h,Xc000
|
|
4702 1F26 C5 X1f26: push b
|
|
4703 1F27 E5 push h
|
|
4704 1F28 CD 75 06 call X0675
|
|
4705 1F2B E1 pop h
|
|
4706 1F2C C1 pop b
|
|
4707 1F2D C2 48 1F jnz X1f48
|
|
4708 1F30 23 inx h
|
|
4709 1F31 7C mov a,h
|
|
4710 1F32 B5 ora l
|
|
4711 1F33 C2 26 1F jnz X1f26
|
|
4712 1F36 3E 05 X1f36: mvi a,5
|
|
4713 1F38 D3 01 out 1
|
|
4714 1F3A 3A 58 21 lda X2158
|
|
4715 1F3D D3 02 out 2
|
|
4716 1F3F 3E 25 mvi a,25h
|
|
4717 1F41 32 A5 21 sta X21a5
|
|
4718 1F44 AF xra a
|
|
4719 1F45 37 stc
|
|
4720 1F46 D1 pop d
|
|
4721 1F47 C9 ret
|
|
|
|
4723 1F48 E6 7F X1f48: ani 7fh
|
|
4724 1F4A B9 cmp c
|
|
4725 1F4B C2 36 1F jnz X1f36
|
|
4726 1F4E 79 mov a,c
|
|
4727 1F4F 07 rlc
|
|
4728 1F50 FE 80 cpi 80h
|
|
4729 1F52 4F mov c,a
|
|
4730 1F53 C2 20 1F jnz X1f20
|
|
4731 1F56 78 mov a,b
|
|
4732 1F57 C6 11 adi 11h
|
|
4733 1F59 47 mov b,a
|
|
4734 1F5A FE 10 cpi 10h
|
|
4735 1F5C C2 18 1F jnz X1f18
|
|
4736 1F5F AF xra a
|
|
4737 1F60 D1 pop d
|
|
4738 1F61 C9 ret
|
|
|
|
4740 1F62 D5 X1f62: push d
|
|
4741 1F63 16 07 mvi d,7
|
|
4742 1F65 7A X1f65: mov a,d
|
|
4743 1F66 CD 7B 1F call X1f7b
|
|
4744 1F69 CD A1 1F call X1fa1
|
|
4745 1F6C BA cmp d
|
|
4746 1F6D C2 36 1F jnz X1f36
|
|
4747 1F70 15 dcr d
|
|
4748 1F71 C2 65 1F jnz X1f65
|
|
4749 1F74 3E 05 mvi a,5
|
|
4750 1F76 D3 01 out 1
|
|
4751 1F78 AF xra a
|
|
4752 1F79 D1 pop d
|
|
4753 1F7A C9 ret
|
|
|
|
4755 1F7B 47 X1f7b: mov b,a
|
|
4756 1F7C E6 02 ani 2
|
|
4757 1F7E 0F rrc
|
|
4758 1F7F 0F rrc
|
|
4759 1F80 0F rrc
|
|
4760 1F81 0F rrc
|
|
4761 1F82 F6 10 ori 10h
|
|
4762 1F84 32 C9 21 sta X21c9
|
|
4763 1F87 D3 62 out 62h
|
|
4764 1F89 0E 05 mvi c,5
|
|
4765 1F8B 78 mov a,b
|
|
4766 1F8C E6 01 ani 1
|
|
4767 1F8E CA 93 1F jz X1f93
|
|
4768 1F91 0E 25 mvi c,25h
|
|
4769 1F93 78 X1f93: mov a,b
|
|
4770 1F94 E6 04 ani 4
|
|
4771 1F96 CA 9D 1F jz X1f9d
|
|
4772 1F99 79 mov a,c
|
|
4773 1F9A F6 02 ori 2
|
|
4774 1F9C 4F mov c,a
|
|
4775 1F9D 79 X1f9d: mov a,c
|
|
4776 1F9E D3 01 out 1
|
|
4777 1FA0 C9 ret
|
|
|
|
4779 1FA1 DB 22 X1fa1: in 22h
|
|
4780 1FA3 47 mov b,a
|
|
4781 1FA4 0E 01 mvi c,1
|
|
4782 1FA6 78 mov a,b
|
|
4783 1FA7 E6 90 ani 90h
|
|
4784 1FA9 CA B3 1F jz X1fb3
|
|
4785 1FAC FE 90 cpi 90h
|
|
4786 1FAE 3E FF mvi a,0ffh
|
|
4787 1FB0 C0 rnz
|
|
4788 1FB1 0E 00 mvi c,0
|
|
4789 1FB3 78 X1fb3: mov a,b
|
|
4790 1FB4 E6 40 ani 40h
|
|
4791 1FB6 CA BD 1F jz X1fbd
|
|
4792 1FB9 79 mov a,c
|
|
4793 1FBA F6 02 ori 2
|
|
4794 1FBC 4F mov c,a
|
|
4795 1FBD DB 01 X1fbd: in 1
|
|
4796 1FBF 0F rrc
|
|
4797 1FC0 0F rrc
|
|
4798 1FC1 2F cma
|
|
4799 1FC2 E6 20 ani 20h
|
|
4800 1FC4 A8 xra b
|
|
4801 1FC5 E6 20 ani 20h
|
|
4802 1FC7 3E FF mvi a,0ffh
|
|
4803 1FC9 C0 rnz
|
|
4804 1FCA 78 mov a,b
|
|
4805 1FCB E6 20 ani 20h
|
|
4806 1FCD C2 D4 1F jnz X1fd4
|
|
4807 1FD0 79 mov a,c
|
|
4808 1FD1 F6 04 ori 4
|
|
4809 1FD3 4F mov c,a
|
|
4810 1FD4 B7 X1fd4: ora a
|
|
4811 1FD5 79 mov a,c
|
|
4812 1FD6 C9 ret
|
|
|
|
; Last but not least, pad out to 8K (8192) bytes
|
|
|
|
1F FF org 1fffh
|
|
4817 1FFF 00 nop
|
|
|
|
; Miscellaneous equates
|
|
|
|
; These are addresses referenced in the code but
|
|
; which are in the middle of a multibyte instruction
|
|
; or are addresses outside the initialized space
|
|
|
|
00 11 X0011 equ 11h
|
|
00 FF X00ff equ 0ffh
|
|
01 11 X0111 equ 111h
|
|
01 13 X0113 equ 113h
|
|
0E A0 X0ea0 equ 0ea0h
|
|
1C CD X1ccd equ 1ccdh
|
|
20 01 X2001 equ 2001h
|
|
20 02 X2002 equ 2002h
|
|
20 04 X2004 equ 2004h
|
|
20 50 X2050 equ 2050h
|
|
20 51 X2051 equ 2051h
|
|
20 52 X2052 equ 2052h
|
|
20 54 X2054 equ 2054h
|
|
20 56 X2056 equ 2056h
|
|
20 58 X2058 equ 2058h
|
|
20 5A X205a equ 205ah
|
|
20 5B X205b equ 205bh
|
|
20 5C X205c equ 205ch
|
|
20 65 X2065 equ 2065h
|
|
20 67 X2067 equ 2067h
|
|
20 69 X2069 equ 2069h
|
|
20 72 X2072 equ 2072h
|
|
20 73 X2073 equ 2073h
|
|
20 74 X2074 equ 2074h
|
|
20 75 X2075 equ 2075h
|
|
20 77 X2077 equ 2077h
|
|
20 78 X2078 equ 2078h
|
|
20 79 X2079 equ 2079h
|
|
20 7A X207a equ 207ah
|
|
20 7B X207b equ 207bh
|
|
20 7C X207c equ 207ch
|
|
20 7D X207d equ 207dh
|
|
20 7E X207e equ 207eh
|
|
20 7F X207f equ 207fh
|
|
20 C0 X20c0 equ 20c0h
|
|
20 C1 X20c1 equ 20c1h
|
|
20 C2 X20c2 equ 20c2h
|
|
20 DE X20de equ 20deh
|
|
20 F2 X20f2 equ 20f2h
|
|
20 F4 X20f4 equ 20f4h
|
|
20 F5 X20f5 equ 20f5h
|
|
20 F8 X20f8 equ 20f8h
|
|
20 F9 X20f9 equ 20f9h
|
|
20 FA X20fa equ 20fah
|
|
20 FB X20fb equ 20fbh
|
|
20 FC X20fc equ 20fch
|
|
20 FD X20fd equ 20fdh
|
|
20 FF X20ff equ 20ffh
|
|
21 01 X2101 equ 2101h
|
|
21 02 X2102 equ 2102h
|
|
21 04 X2104 equ 2104h
|
|
21 0D X210d equ 210dh
|
|
21 0E X210e equ 210eh
|
|
21 11 X2111 equ 2111h
|
|
21 13 X2113 equ 2113h
|
|
21 2B X212b equ 212bh
|
|
21 2C X212c equ 212ch
|
|
21 2F X212f equ 212fh
|
|
21 30 X2130 equ 2130h
|
|
21 31 X2131 equ 2131h
|
|
21 40 X2140 equ 2140h
|
|
21 42 X2142 equ 2142h
|
|
21 43 X2143 equ 2143h
|
|
21 44 X2144 equ 2144h
|
|
21 45 X2145 equ 2145h
|
|
21 46 X2146 equ 2146h
|
|
21 47 X2147 equ 2147h
|
|
21 48 X2148 equ 2148h
|
|
21 49 X2149 equ 2149h
|
|
21 4B X214b equ 214bh
|
|
21 4E X214e equ 214eh
|
|
21 50 X2150 equ 2150h
|
|
21 51 X2151 equ 2151h
|
|
21 52 X2152 equ 2152h
|
|
21 53 X2153 equ 2153h
|
|
21 54 X2154 equ 2154h
|
|
21 55 X2155 equ 2155h
|
|
21 56 X2156 equ 2156h
|
|
21 57 X2157 equ 2157h
|
|
21 58 X2158 equ 2158h
|
|
21 59 X2159 equ 2159h
|
|
21 5A X215a equ 215ah
|
|
21 5B X215b equ 215bh
|
|
21 5C X215c equ 215ch
|
|
21 71 X2171 equ 2171h
|
|
21 72 X2172 equ 2172h
|
|
21 73 X2173 equ 2173h
|
|
21 74 X2174 equ 2174h
|
|
21 76 X2176 equ 2176h
|
|
21 77 X2177 equ 2177h
|
|
21 78 X2178 equ 2178h
|
|
21 79 X2179 equ 2179h
|
|
21 7B X217b equ 217bh
|
|
21 91 X2191 equ 2191h
|
|
21 A2 X21a2 equ 21a2h
|
|
21 A3 X21a3 equ 21a3h
|
|
21 A4 X21a4 equ 21a4h
|
|
21 A5 X21a5 equ 21a5h
|
|
21 A6 X21a6 equ 21a6h
|
|
21 A7 X21a7 equ 21a7h
|
|
21 A8 X21a8 equ 21a8h
|
|
21 A9 X21a9 equ 21a9h
|
|
21 AA X21aa equ 21aah
|
|
21 AB X21ab equ 21abh
|
|
21 AC X21ac equ 21ach
|
|
21 AD X21ad equ 21adh
|
|
21 AE X21ae equ 21aeh
|
|
21 AF X21af equ 21afh
|
|
21 B4 X21b4 equ 21b4h
|
|
21 B8 X21b8 equ 21b8h
|
|
21 B9 X21b9 equ 21b9h
|
|
21 BB X21bb equ 21bbh
|
|
21 BC X21bc equ 21bch
|
|
21 BD X21bd equ 21bdh
|
|
21 BE X21be equ 21beh
|
|
21 BF X21bf equ 21bfh
|
|
21 C0 X21c0 equ 21c0h
|
|
21 C1 X21c1 equ 21c1h
|
|
21 C2 X21c2 equ 21c2h
|
|
21 C3 X21c3 equ 21c3h
|
|
21 C4 X21c4 equ 21c4h
|
|
21 C5 X21c5 equ 21c5h
|
|
21 C7 X21c7 equ 21c7h
|
|
21 C8 X21c8 equ 21c8h
|
|
21 C9 X21c9 equ 21c9h
|
|
21 CB X21cb equ 21cbh
|
|
21 CC X21cc equ 21cch
|
|
21 D3 X21d3 equ 21d3h
|
|
22 53 X2253 equ 2253h
|
|
22 5A X225a equ 225ah
|
|
22 65 X2265 equ 2265h
|
|
22 D0 X22d0 equ 22d0h
|
|
28 39 X2839 equ 2839h
|
|
30 30 X3030 equ 3030h
|
|
30 31 X3031 equ 3031h
|
|
30 32 X3032 equ 3032h
|
|
30 34 X3034 equ 3034h
|
|
30 35 X3035 equ 3035h
|
|
30 38 X3038 equ 3038h
|
|
32 00 X3200 equ 3200h
|
|
32 21 X3221 equ 3221h
|
|
32 39 X3239 equ 3239h
|
|
34 33 X3433 equ 3433h
|
|
3A 6A X3a6a equ 3a6ah
|
|
3C 08 X3c08 equ 3c08h
|
|
3C 2C X3c2c equ 3c2ch
|
|
3F 2F X3f2f equ 3f2fh
|
|
40 1B X401b equ 401bh
|
|
45 53 X4553 equ 4553h
|
|
5A 0B X5a0b equ 5a0bh
|
|
60 81 X6081 equ 6081h
|
|
67 13 X6713 equ 6713h
|
|
6C 14 X6c14 equ 6c14h
|
|
7F D0 X7fd0 equ 7fd0h
|
|
B7 09 Xb709 equ 0b709h
|
|
C0 00 Xc000 equ 0c000h
|
|
C3 10 Xc310 equ 0c310h
|
|
C3 20 Xc320 equ 0c320h
|
|
C9 20 Xc920 equ 0c920h
|
|
C9 40 Xc940 equ 0c940h
|
|
C9 80 Xc980 equ 0c980h
|
|
CC 71 Xcc71 equ 0cc71h
|
|
CD 00 Xcd00 equ 0cd00h
|
|
CD 0B Xcd0b equ 0cd0bh
|
|
D0 F2 Xd0f2 equ 0d0f2h
|
|
FE 1A Xfe1a equ 0fe1ah
|
|
FF 01 Xff01 equ 0ff01h
|
|
|
|
end
|
|
|
|
|
|
*******************************************************************************
|
|
Symbols table
|
|
*******************************************************************************
|
|
|
|
Names Types Values
|
|
----- ----- ------
|
|
stack_top EQU 0204Eh
|
|
scratch_start EQU 0204Eh
|
|
key_flags EQU 02068h
|
|
key_buffer EQU 0206Ah
|
|
cursor_address EQU 020F6h
|
|
cursor_countdn EQU 0212Dh
|
|
cursor_visible EQU 021BAh
|
|
X0011 EQU 00011h
|
|
X00ff EQU 000FFh
|
|
X0111 EQU 00111h
|
|
X0113 EQU 00113h
|
|
X0ea0 EQU 00EA0h
|
|
X1ccd EQU 01CCDh
|
|
X2001 EQU 02001h
|
|
X2002 EQU 02002h
|
|
X2004 EQU 02004h
|
|
X2050 EQU 02050h
|
|
X2051 EQU 02051h
|
|
X2052 EQU 02052h
|
|
X2054 EQU 02054h
|
|
X2056 EQU 02056h
|
|
X2058 EQU 02058h
|
|
X205a EQU 0205Ah
|
|
X205b EQU 0205Bh
|
|
X205c EQU 0205Ch
|
|
X2065 EQU 02065h
|
|
X2067 EQU 02067h
|
|
X2069 EQU 02069h
|
|
X2072 EQU 02072h
|
|
X2073 EQU 02073h
|
|
X2074 EQU 02074h
|
|
X2075 EQU 02075h
|
|
X2077 EQU 02077h
|
|
X2078 EQU 02078h
|
|
X2079 EQU 02079h
|
|
X207a EQU 0207Ah
|
|
X207b EQU 0207Bh
|
|
X207c EQU 0207Ch
|
|
X207d EQU 0207Dh
|
|
X207e EQU 0207Eh
|
|
X207f EQU 0207Fh
|
|
X20c0 EQU 020C0h
|
|
X20c1 EQU 020C1h
|
|
X20c2 EQU 020C2h
|
|
X20de EQU 020DEh
|
|
X20f2 EQU 020F2h
|
|
X20f4 EQU 020F4h
|
|
X20f5 EQU 020F5h
|
|
X20f8 EQU 020F8h
|
|
X20f9 EQU 020F9h
|
|
X20fa EQU 020FAh
|
|
X20fb EQU 020FBh
|
|
X20fc EQU 020FCh
|
|
X20fd EQU 020FDh
|
|
X20ff EQU 020FFh
|
|
X2101 EQU 02101h
|
|
X2102 EQU 02102h
|
|
X2104 EQU 02104h
|
|
X210d EQU 0210Dh
|
|
X210e EQU 0210Eh
|
|
X2111 EQU 02111h
|
|
X2113 EQU 02113h
|
|
X212b EQU 0212Bh
|
|
X212c EQU 0212Ch
|
|
X212f EQU 0212Fh
|
|
X2130 EQU 02130h
|
|
X2131 EQU 02131h
|
|
X2140 EQU 02140h
|
|
X2142 EQU 02142h
|
|
X2143 EQU 02143h
|
|
X2144 EQU 02144h
|
|
X2145 EQU 02145h
|
|
X2146 EQU 02146h
|
|
X2147 EQU 02147h
|
|
X2148 EQU 02148h
|
|
X2149 EQU 02149h
|
|
X214b EQU 0214Bh
|
|
X214e EQU 0214Eh
|
|
X2150 EQU 02150h
|
|
X2151 EQU 02151h
|
|
X2152 EQU 02152h
|
|
X2153 EQU 02153h
|
|
X2154 EQU 02154h
|
|
X2155 EQU 02155h
|
|
X2156 EQU 02156h
|
|
X2157 EQU 02157h
|
|
X2158 EQU 02158h
|
|
X2159 EQU 02159h
|
|
X215a EQU 0215Ah
|
|
X215b EQU 0215Bh
|
|
X215c EQU 0215Ch
|
|
X2171 EQU 02171h
|
|
X2172 EQU 02172h
|
|
X2173 EQU 02173h
|
|
X2174 EQU 02174h
|
|
X2176 EQU 02176h
|
|
X2177 EQU 02177h
|
|
X2178 EQU 02178h
|
|
X2179 EQU 02179h
|
|
X217b EQU 0217Bh
|
|
X2191 EQU 02191h
|
|
X21a2 EQU 021A2h
|
|
X21a3 EQU 021A3h
|
|
X21a4 EQU 021A4h
|
|
X21a5 EQU 021A5h
|
|
X21a6 EQU 021A6h
|
|
X21a7 EQU 021A7h
|
|
X21a8 EQU 021A8h
|
|
X21a9 EQU 021A9h
|
|
X21aa EQU 021AAh
|
|
X21ab EQU 021ABh
|
|
X21ac EQU 021ACh
|
|
X21ad EQU 021ADh
|
|
X21ae EQU 021AEh
|
|
X21af EQU 021AFh
|
|
X21b4 EQU 021B4h
|
|
X21b8 EQU 021B8h
|
|
X21b9 EQU 021B9h
|
|
X21bb EQU 021BBh
|
|
X21bc EQU 021BCh
|
|
X21bd EQU 021BDh
|
|
X21be EQU 021BEh
|
|
X21bf EQU 021BFh
|
|
X21c0 EQU 021C0h
|
|
X21c1 EQU 021C1h
|
|
X21c2 EQU 021C2h
|
|
X21c3 EQU 021C3h
|
|
X21c4 EQU 021C4h
|
|
X21c5 EQU 021C5h
|
|
X21c7 EQU 021C7h
|
|
X21c8 EQU 021C8h
|
|
X21c9 EQU 021C9h
|
|
X21cb EQU 021CBh
|
|
X21cc EQU 021CCh
|
|
X21d3 EQU 021D3h
|
|
X2253 EQU 02253h
|
|
X225a EQU 0225Ah
|
|
X2265 EQU 02265h
|
|
X22d0 EQU 022D0h
|
|
X2839 EQU 02839h
|
|
X3030 EQU 03030h
|
|
X3031 EQU 03031h
|
|
X3032 EQU 03032h
|
|
X3034 EQU 03034h
|
|
X3035 EQU 03035h
|
|
X3038 EQU 03038h
|
|
X3200 EQU 03200h
|
|
X3221 EQU 03221h
|
|
X3239 EQU 03239h
|
|
X3433 EQU 03433h
|
|
X3a6a EQU 03A6Ah
|
|
X3c08 EQU 03C08h
|
|
X3c2c EQU 03C2Ch
|
|
X3f2f EQU 03F2Fh
|
|
X401b EQU 0401Bh
|
|
X4553 EQU 04553h
|
|
X5a0b EQU 05A0Bh
|
|
X6081 EQU 06081h
|
|
X6713 EQU 06713h
|
|
X6c14 EQU 06C14h
|
|
X7fd0 EQU 07FD0h
|
|
Xb709 EQU 0B709h
|
|
Xc000 EQU 0C000h
|
|
Xc310 EQU 0C310h
|
|
Xc320 EQU 0C320h
|
|
Xc920 EQU 0C920h
|
|
Xc940 EQU 0C940h
|
|
Xc980 EQU 0C980h
|
|
Xcc71 EQU 0CC71h
|
|
Xcd00 EQU 0CD00h
|
|
Xcd0b EQU 0CD0Bh
|
|
Xd0f2 EQU 0D0F2h
|
|
Xfe1a EQU 0FE1Ah
|
|
Xff01 EQU 0FF01h
|
|
X0030 Label 00030h
|
|
reset Label 0003Bh
|
|
X003d Label 0003Dh
|
|
X0049 Label 00049h
|
|
X004f Label 0004Fh
|
|
X005b Label 0005Bh
|
|
X0074 Label 00074h
|
|
X0076 Label 00076h
|
|
X0080 Label 00080h
|
|
X0090 Label 00090h
|
|
X00a1 Label 000A1h
|
|
X00a5 Label 000A5h
|
|
X00a8 Label 000A8h
|
|
X00c4 Label 000C4h
|
|
X00cb Label 000CBh
|
|
X00d2 Label 000D2h
|
|
X00d6 Label 000D6h
|
|
X00e0 Label 000E0h
|
|
X00e8 Label 000E8h
|
|
X00f5 Label 000F5h
|
|
X00fd Label 000FDh
|
|
X010d Label 0010Dh
|
|
X011a Label 0011Ah
|
|
X012d Label 0012Dh
|
|
X0131 Label 00131h
|
|
X013b Label 0013Bh
|
|
X015b Label 0015Bh
|
|
X015f Label 0015Fh
|
|
X016c Label 0016Ch
|
|
X0175 Label 00175h
|
|
X0187 Label 00187h
|
|
X018e Label 0018Eh
|
|
X0194 Label 00194h
|
|
X019e Label 0019Eh
|
|
X01ab Label 001ABh
|
|
X01b5 Label 001B5h
|
|
X01c3 Label 001C3h
|
|
X01e4 Label 001E4h
|
|
X01f0 Label 001F0h
|
|
X01ff Label 001FFh
|
|
X020e Label 0020Eh
|
|
X0211 Label 00211h
|
|
X0222 Label 00222h
|
|
X0226 Label 00226h
|
|
X022c Label 0022Ch
|
|
X0245 Label 00245h
|
|
X0251 Label 00251h
|
|
X0265 Label 00265h
|
|
X0269 Label 00269h
|
|
X0285 Label 00285h
|
|
X0298 Label 00298h
|
|
X02a4 Label 002A4h
|
|
X02c0 Label 002C0h
|
|
X02d9 Label 002D9h
|
|
X02eb Label 002EBh
|
|
X031a Label 0031Ah
|
|
X0329 Label 00329h
|
|
X0342 Label 00342h
|
|
X034b Label 0034Bh
|
|
X035e Label 0035Eh
|
|
X036b Label 0036Bh
|
|
X0370 Label 00370h
|
|
X0375 Label 00375h
|
|
X0381 Label 00381h
|
|
memmove Label 0038Bh
|
|
X0394 Label 00394h
|
|
X039f Label 0039Fh
|
|
X03a2 Label 003A2h
|
|
X03ae Label 003AEh
|
|
X03cc Label 003CCh
|
|
X03ed Label 003EDh
|
|
X0409 Label 00409h
|
|
X0427 Label 00427h
|
|
X042c Label 0042Ch
|
|
X0431 Label 00431h
|
|
X0437 Label 00437h
|
|
X043a Label 0043Ah
|
|
X043e Label 0043Eh
|
|
X0444 Label 00444h
|
|
X0447 Label 00447h
|
|
X044b Label 0044Bh
|
|
X0476 Label 00476h
|
|
KBTab Label 00476h
|
|
X04cf Label 004CFh
|
|
X0505 Label 00505h
|
|
X050b Label 0050Bh
|
|
X0538 Label 00538h
|
|
X053e Label 0053Eh
|
|
X054f Label 0054Fh
|
|
X0569 Label 00569h
|
|
X056a Label 0056Ah
|
|
X0587 Label 00587h
|
|
X0593 Label 00593h
|
|
X05a9 Label 005A9h
|
|
X05ad Label 005ADh
|
|
X05b8 Label 005B8h
|
|
X05c5 Label 005C5h
|
|
X05cc Label 005CCh
|
|
X05d2 Label 005D2h
|
|
X05d3 Label 005D3h
|
|
X05e3 Label 005E3h
|
|
X05e6 Label 005E6h
|
|
X05ff Label 005FFh
|
|
X0616 Label 00616h
|
|
X0624 Label 00624h
|
|
X0641 Label 00641h
|
|
X0668 Label 00668h
|
|
X066d Label 0066Dh
|
|
X0670 Label 00670h
|
|
X0673 Label 00673h
|
|
X0675 Label 00675h
|
|
X0685 Label 00685h
|
|
X0687 Label 00687h
|
|
X069c Label 0069Ch
|
|
X06a7 Label 006A7h
|
|
X06aa Label 006AAh
|
|
X06c2 Label 006C2h
|
|
X06ca Label 006CAh
|
|
X06d6 Label 006D6h
|
|
X06df Label 006DFh
|
|
X06e7 Label 006E7h
|
|
X06e8 Label 006E8h
|
|
X06fb Label 006FBh
|
|
X0709 Label 00709h
|
|
X071b Label 0071Bh
|
|
X0738 Label 00738h
|
|
X0743 Label 00743h
|
|
X0747 Label 00747h
|
|
X074e Label 0074Eh
|
|
X0751 Label 00751h
|
|
X075b Label 0075Bh
|
|
X0766 Label 00766h
|
|
X076c Label 0076Ch
|
|
X0776 Label 00776h
|
|
X07c2 Label 007C2h
|
|
X07cb Label 007CBh
|
|
X07d5 Label 007D5h
|
|
X07d7 Label 007D7h
|
|
X07e8 Label 007E8h
|
|
X07fc Label 007FCh
|
|
X07ff Label 007FFh
|
|
X080c Label 0080Ch
|
|
X080d Label 0080Dh
|
|
X0812 Label 00812h
|
|
X0815 Label 00815h
|
|
X081d Label 0081Dh
|
|
X082b Label 0082Bh
|
|
X0838 Label 00838h
|
|
X0841 Label 00841h
|
|
X084c Label 0084Ch
|
|
X0853 Label 00853h
|
|
X085f Label 0085Fh
|
|
X086f Label 0086Fh
|
|
X0875 Label 00875h
|
|
X08a0 Label 008A0h
|
|
X08a7 Label 008A7h
|
|
X08b2 Label 008B2h
|
|
X08cb Label 008CBh
|
|
X08d0 Label 008D0h
|
|
X08d4 Label 008D4h
|
|
X08e5 Label 008E5h
|
|
X08fb Label 008FBh
|
|
X08fc Label 008FCh
|
|
X0900 Label 00900h
|
|
X0924 Label 00924h
|
|
X0930 Label 00930h
|
|
X0938 Label 00938h
|
|
X0941 Label 00941h
|
|
X094b Label 0094Bh
|
|
X0955 Label 00955h
|
|
X0970 Label 00970h
|
|
X0973 Label 00973h
|
|
X0989 Label 00989h
|
|
X0997 Label 00997h
|
|
X0998 Label 00998h
|
|
X099e Label 0099Eh
|
|
X09ab Label 009ABh
|
|
X09bb Label 009BBh
|
|
X09bd Label 009BDh
|
|
X09d9 Label 009D9h
|
|
X09dc Label 009DCh
|
|
X09f7 Label 009F7h
|
|
X09ff Label 009FFh
|
|
X0a00 Label 00A00h
|
|
X0a0d Label 00A0Dh
|
|
X0a14 Label 00A14h
|
|
X0a15 Label 00A15h
|
|
X0a18 Label 00A18h
|
|
X0a1c Label 00A1Ch
|
|
X0a50 Label 00A50h
|
|
X0a7b Label 00A7Bh
|
|
X0aa2 Label 00AA2h
|
|
X0ac2 Label 00AC2h
|
|
X0ad9 Label 00AD9h
|
|
X0af5 Label 00AF5h
|
|
X0b19 Label 00B19h
|
|
X0b2e Label 00B2Eh
|
|
X0b42 Label 00B42h
|
|
X0b4f Label 00B4Fh
|
|
X0b5d Label 00B5Dh
|
|
X0b63 Label 00B63h
|
|
X0b77 Label 00B77h
|
|
X0b89 Label 00B89h
|
|
X0bb8 Label 00BB8h
|
|
X0bce Label 00BCEh
|
|
X0bd9 Label 00BD9h
|
|
X0bf2 Label 00BF2h
|
|
X0bfe Label 00BFEh
|
|
X0c11 Label 00C11h
|
|
X0c23 Label 00C23h
|
|
X0c29 Label 00C29h
|
|
X0c31 Label 00C31h
|
|
X0c32 Label 00C32h
|
|
X0c39 Label 00C39h
|
|
X0c46 Label 00C46h
|
|
X0c4a Label 00C4Ah
|
|
X0c57 Label 00C57h
|
|
X0c62 Label 00C62h
|
|
X0c77 Label 00C77h
|
|
X0c8a Label 00C8Ah
|
|
X0c97 Label 00C97h
|
|
X0ca2 Label 00CA2h
|
|
X0cb5 Label 00CB5h
|
|
X0cbb Label 00CBBh
|
|
X0ce3 Label 00CE3h
|
|
X0cf9 Label 00CF9h
|
|
X0d29 Label 00D29h
|
|
X0d2f Label 00D2Fh
|
|
X0d32 Label 00D32h
|
|
X0d4a Label 00D4Ah
|
|
X0d6f Label 00D6Fh
|
|
X0d7a Label 00D7Ah
|
|
X0d88 Label 00D88h
|
|
X0d93 Label 00D93h
|
|
X0d99 Label 00D99h
|
|
X0d9c Label 00D9Ch
|
|
X0db9 Label 00DB9h
|
|
X0dbb Label 00DBBh
|
|
X0dbf Label 00DBFh
|
|
X0dd8 Label 00DD8h
|
|
X0de5 Label 00DE5h
|
|
X0dec Label 00DECh
|
|
X0def Label 00DEFh
|
|
X0df9 Label 00DF9h
|
|
X0dfc Label 00DFCh
|
|
X0e02 Label 00E02h
|
|
X0e0b Label 00E0Bh
|
|
X0e15 Label 00E15h
|
|
X0e1d Label 00E1Dh
|
|
X0e23 Label 00E23h
|
|
X0e27 Label 00E27h
|
|
X0e2b Label 00E2Bh
|
|
X0e38 Label 00E38h
|
|
X0e3e Label 00E3Eh
|
|
X0e47 Label 00E47h
|
|
X0e59 Label 00E59h
|
|
X0e6d Label 00E6Dh
|
|
X0e79 Label 00E79h
|
|
X0e80 Label 00E80h
|
|
X0e89 Label 00E89h
|
|
X0e94 Label 00E94h
|
|
X0ea9 Label 00EA9h
|
|
X0ec1 Label 00EC1h
|
|
X0ecf Label 00ECFh
|
|
X0ed2 Label 00ED2h
|
|
X0ee1 Label 00EE1h
|
|
X0ef3 Label 00EF3h
|
|
X0f01 Label 00F01h
|
|
X0f18 Label 00F18h
|
|
X0f2b Label 00F2Bh
|
|
X0f32 Label 00F32h
|
|
X0f4e Label 00F4Eh
|
|
X0f5b Label 00F5Bh
|
|
X0f5e Label 00F5Eh
|
|
X0f61 Label 00F61h
|
|
X0f75 Label 00F75h
|
|
X0f7e Label 00F7Eh
|
|
X0f9e Label 00F9Eh
|
|
X0faa Label 00FAAh
|
|
X0fae Label 00FAEh
|
|
X0fbe Label 00FBEh
|
|
X0fc8 Label 00FC8h
|
|
X0fcb Label 00FCBh
|
|
X0fd8 Label 00FD8h
|
|
X0fe6 Label 00FE6h
|
|
X0feb Label 00FEBh
|
|
X0fed Label 00FEDh
|
|
X0ffa Label 00FFAh
|
|
X0fff Label 00FFFh
|
|
X1003 Label 01003h
|
|
X1012 Label 01012h
|
|
X101a Label 0101Ah
|
|
X102d Label 0102Dh
|
|
X103e Label 0103Eh
|
|
X104e Label 0104Eh
|
|
X106a Label 0106Ah
|
|
X1074 Label 01074h
|
|
memset Label 01083h
|
|
X108e Label 0108Eh
|
|
X10a7 Label 010A7h
|
|
X10ad Label 010ADh
|
|
X10d7 Label 010D7h
|
|
X10f9 Label 010F9h
|
|
X10fd Label 010FDh
|
|
X1136 Label 01136h
|
|
X114c Label 0114Ch
|
|
X1159 Label 01159h
|
|
X117e Label 0117Eh
|
|
X1189 Label 01189h
|
|
X1191 Label 01191h
|
|
X1199 Label 01199h
|
|
X11a0 Label 011A0h
|
|
X11b0 Label 011B0h
|
|
X11bf Label 011BFh
|
|
X11ce Label 011CEh
|
|
X11e8 Label 011E8h
|
|
X120a Label 0120Ah
|
|
X1211 Label 01211h
|
|
X1228 Label 01228h
|
|
X122f Label 0122Fh
|
|
X1248 Label 01248h
|
|
X1252 Label 01252h
|
|
X1271 Label 01271h
|
|
X127f Label 0127Fh
|
|
X1284 Label 01284h
|
|
X1290 Label 01290h
|
|
X1299 Label 01299h
|
|
X129d Label 0129Dh
|
|
X12b0 Label 012B0h
|
|
X12e8 Label 012E8h
|
|
X1310 Label 01310h
|
|
X131c Label 0131Ch
|
|
X134a Label 0134Ah
|
|
X136b Label 0136Bh
|
|
X1380 Label 01380h
|
|
X1386 Label 01386h
|
|
X138d Label 0138Dh
|
|
X1390 Label 01390h
|
|
X1395 Label 01395h
|
|
X13bd Label 013BDh
|
|
X13c3 Label 013C3h
|
|
X13d2 Label 013D2h
|
|
X13db Label 013DBh
|
|
X13de Label 013DEh
|
|
X13e3 Label 013E3h
|
|
X13e6 Label 013E6h
|
|
X13f4 Label 013F4h
|
|
X1404 Label 01404h
|
|
X140a Label 0140Ah
|
|
X1426 Label 01426h
|
|
X142a Label 0142Ah
|
|
X1476 Label 01476h
|
|
X1488 Label 01488h
|
|
X1493 Label 01493h
|
|
X14a2 Label 014A2h
|
|
X14d4 Label 014D4h
|
|
X14e5 Label 014E5h
|
|
X150a Label 0150Ah
|
|
X1515 Label 01515h
|
|
X1524 Label 01524h
|
|
X1529 Label 01529h
|
|
X1530 Label 01530h
|
|
X1555 Label 01555h
|
|
X156a Label 0156Ah
|
|
X1586 Label 01586h
|
|
X15b6 Label 015B6h
|
|
X15c0 Label 015C0h
|
|
X15dd Label 015DDh
|
|
X15e8 Label 015E8h
|
|
X15fa Label 015FAh
|
|
X1605 Label 01605h
|
|
X1612 Label 01612h
|
|
X1623 Label 01623h
|
|
X162b Label 0162Bh
|
|
X1636 Label 01636h
|
|
X167b Label 0167Bh
|
|
X167f Label 0167Fh
|
|
X168c Label 0168Ch
|
|
X16a1 Label 016A1h
|
|
X16c2 Label 016C2h
|
|
X16d9 Label 016D9h
|
|
X16f1 Label 016F1h
|
|
X16f2 Label 016F2h
|
|
X1713 Label 01713h
|
|
X1715 Label 01715h
|
|
X1717 Label 01717h
|
|
X1732 Label 01732h
|
|
X1733 Label 01733h
|
|
X1743 Label 01743h
|
|
X174c Label 0174Ch
|
|
X1754 Label 01754h
|
|
X175b Label 0175Bh
|
|
X1762 Label 01762h
|
|
X1771 Label 01771h
|
|
X179e Label 0179Eh
|
|
X17ac Label 017ACh
|
|
X17be Label 017BEh
|
|
X17d0 Label 017D0h
|
|
X17d5 Label 017D5h
|
|
X17ec Label 017ECh
|
|
X17f3 Label 017F3h
|
|
X17fe Label 017FEh
|
|
X180f Label 0180Fh
|
|
X1815 Label 01815h
|
|
X181e Label 0181Eh
|
|
X1822 Label 01822h
|
|
X1825 Label 01825h
|
|
X1835 Label 01835h
|
|
X1837 Label 01837h
|
|
X1844 Label 01844h
|
|
X1848 Label 01848h
|
|
X1860 Label 01860h
|
|
X1869 Label 01869h
|
|
X1879 Label 01879h
|
|
X187e Label 0187Eh
|
|
X1888 Label 01888h
|
|
X1895 Label 01895h
|
|
X1898 Label 01898h
|
|
X189d Label 0189Dh
|
|
X18a3 Label 018A3h
|
|
X18ae Label 018AEh
|
|
X18bc Label 018BCh
|
|
X18c1 Label 018C1h
|
|
X18c7 Label 018C7h
|
|
X18d1 Label 018D1h
|
|
X18d7 Label 018D7h
|
|
X18e6 Label 018E6h
|
|
X18ec Label 018ECh
|
|
X18f6 Label 018F6h
|
|
X1900 Label 01900h
|
|
X1916 Label 01916h
|
|
X1928 Label 01928h
|
|
X192b Label 0192Bh
|
|
X192d Label 0192Dh
|
|
X193c Label 0193Ch
|
|
X1957 Label 01957h
|
|
X1962 Label 01962h
|
|
X196a Label 0196Ah
|
|
X1977 Label 01977h
|
|
X1981 Label 01981h
|
|
X1993 Label 01993h
|
|
X1999 Label 01999h
|
|
X19a8 Label 019A8h
|
|
X19ae Label 019AEh
|
|
X19c0 Label 019C0h
|
|
X19c3 Label 019C3h
|
|
X19c9 Label 019C9h
|
|
X19d6 Label 019D6h
|
|
X19dc Label 019DCh
|
|
X19ee Label 019EEh
|
|
X1a1a Label 01A1Ah
|
|
X1a20 Label 01A20h
|
|
X1a2b Label 01A2Bh
|
|
X1a45 Label 01A45h
|
|
X1a61 Label 01A61h
|
|
X1a71 Label 01A71h
|
|
X1aa1 Label 01AA1h
|
|
X1aa2 Label 01AA2h
|
|
X1ae6 Label 01AE6h
|
|
X1ae8 Label 01AE8h
|
|
X1b52 Label 01B52h
|
|
X1b59 Label 01B59h
|
|
X1b60 Label 01B60h
|
|
X1b72 Label 01B72h
|
|
X1b81 Label 01B81h
|
|
X1b86 Label 01B86h
|
|
X1bb0 Label 01BB0h
|
|
X1bba Label 01BBAh
|
|
X1bc0 Label 01BC0h
|
|
X1bc3 Label 01BC3h
|
|
X1bca Label 01BCAh
|
|
X1be8 Label 01BE8h
|
|
X1bf4 Label 01BF4h
|
|
X1bf9 Label 01BF9h
|
|
X1c35 Label 01C35h
|
|
X1c3e Label 01C3Eh
|
|
X1c49 Label 01C49h
|
|
X1c50 Label 01C50h
|
|
X1c60 Label 01C60h
|
|
X1c71 Label 01C71h
|
|
X1c77 Label 01C77h
|
|
X1c86 Label 01C86h
|
|
X1c88 Label 01C88h
|
|
X1c8a Label 01C8Ah
|
|
X1c8b Label 01C8Bh
|
|
X1c9f Label 01C9Fh
|
|
X1cad Label 01CADh
|
|
X1cb6 Label 01CB6h
|
|
X1cd3 Label 01CD3h
|
|
X1cf0 Label 01CF0h
|
|
X1cf2 Label 01CF2h
|
|
X1d00 Label 01D00h
|
|
X1d17 Label 01D17h
|
|
X1d3d Label 01D3Dh
|
|
X1d40 Label 01D40h
|
|
X1d4b Label 01D4Bh
|
|
X1d56 Label 01D56h
|
|
X1d61 Label 01D61h
|
|
X1d7c Label 01D7Ch
|
|
X1dcc Label 01DCCh
|
|
X1ddb Label 01DDBh
|
|
X1dff Label 01DFFh
|
|
X1e03 Label 01E03h
|
|
X1e19 Label 01E19h
|
|
X1e31 Label 01E31h
|
|
X1e3e Label 01E3Eh
|
|
X1e4d Label 01E4Dh
|
|
X1e6e Label 01E6Eh
|
|
X1e79 Label 01E79h
|
|
X1e90 Label 01E90h
|
|
X1e94 Label 01E94h
|
|
X1e9f Label 01E9Fh
|
|
X1eb8 Label 01EB8h
|
|
X1ed3 Label 01ED3h
|
|
X1edd Label 01EDDh
|
|
X1ee5 Label 01EE5h
|
|
X1eea Label 01EEAh
|
|
X1efc Label 01EFCh
|
|
X1f0d Label 01F0Dh
|
|
X1f0f Label 01F0Fh
|
|
X1f11 Label 01F11h
|
|
X1f18 Label 01F18h
|
|
X1f20 Label 01F20h
|
|
X1f26 Label 01F26h
|
|
X1f36 Label 01F36h
|
|
X1f48 Label 01F48h
|
|
X1f62 Label 01F62h
|
|
X1f65 Label 01F65h
|
|
X1f7b Label 01F7Bh
|
|
X1f93 Label 01F93h
|
|
X1f9d Label 01F9Dh
|
|
X1fa1 Label 01FA1h
|
|
X1fb3 Label 01FB3h
|
|
X1fbd Label 01FBDh
|
|
X1fd4 Label 01FD4h
|
|
|
|
Statistics
|
|
----------
|
|
"Name" = 0
|
|
"EQU" = 174
|
|
"SET" = 0
|
|
Labels = 535
|
|
|
|
|