asm80 mon8_80v40.asm INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 1 LOC OBJ LINE SOURCE STATEMENT 1 ; DA8085 Version 1.3C2 2 ; Disassembly of mon8_80v40.bin 3 ; File is 2048D[00800H] bytes 4 ; Disassembled on Sat Dec 14 19:58:40 2024 5 6 7 ; Out of Range Label Definitions 8 0000 9 J0000 EQU 00000H ; 0003 10 IOBYT EQU 00003H ; 0008 11 A0008 EQU 00008H ; 0009 12 A0009 EQU 00009H ; 000A 13 A000A EQU 0000AH ; 000F 14 A000F EQU 0000FH ; 0013 15 A0013 EQU 00013H ; 0014 16 A0014 EQU 00014H ; 0064 17 A0064 EQU 00064H ; 00FF 18 A00FF EQU 000FFH ; 0100 19 A0100 EQU 00100H ; 03E8 20 A03E8 EQU 003E8H ; 2710 21 A2710 EQU 02710H ; 3000 22 J3000 EQU 03000H ; 3003 23 J3003 EQU 03003H ; 3006 24 J3006 EQU 03006H ; 3009 25 J3009 EQU 03009H ; 300C 26 J300C EQU 0300CH ; 300F 27 J300F EQU 0300FH ; 3012 28 J3012 EQU 03012H ; 3015 29 J3015 EQU 03015H ; 3018 30 J3018 EQU 03018H ; 301B 31 T301B EQU 0301BH ; 301E 32 T301E EQU 0301EH ; 3021 33 T3021 EQU 03021H ; 3024 34 T3024 EQU 03024H ; 3027 35 T3027 EQU 03027H ; 302A 36 C302A EQU 0302AH ; 302D 37 T302D EQU 0302DH ; 3030 38 T3030 EQU 03030H ; 3EFB 39 T3EFB EQU 03EFBH ; FFEE 40 AFFEE EQU 0FFEEH ; FFF8 41 AFFF8 EQU 0FFF8H ; 42 43 ; Port Definitions 44 0000 45 TTYIO EQU 00000H ; 0001 46 TTYSC EQU 00001H ; 0002 47 P0002 EQU 00002H ; 0003 48 P0003 EQU 00003H ; 0004 49 CRTIO EQU 00004H ; 0005 50 CRTSC EQU 00005H ; 00FF 51 P00FF EQU 000FFH ; 52 53 ASEG 54 INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 2 LOC OBJ LINE SOURCE STATEMENT 55 ; ASCII character equates 56 0008 57 BS EQU 008H 0009 58 HT EQU 009H 000A 59 LF EQU 00AH 000D 60 CR EQU 00DH 61 62 ; 192 symbols defined 63 64 ; Origin set to 3800H, Binary file delta set to 0000 3800 65 ORG 03800H 66 67 ; Hex/ASCII dump of file 68 ; Addr 0 1 2 3 4 5 6 7 8 9 A B C D E F 0123456789ABCDEF 69 ; 0000 C3 56 38 C3 D4 3C C3 B7 3E C3 79 3C C3 8F 3E C3 .V8..<..>.y<..>. 70 ; 0010 F5 3D C3 12 3D C3 C6 3D C3 CA 3D C3 0A 3E C3 98 .=..=..=..=..>.. 71 ; 0020 38 C3 87 39 C3 9C 3A C3 64 3B C3 67 3C C3 77 3C 8..9..:.d;.g<.w< 72 ; 0030 C3 08 3D C3 82 3D C3 B6 3D C3 D1 3D C3 D9 3D C3 ..=..=..=..=..=. 73 ; 0040 28 3E C3 42 3E C3 6D 3E C3 86 3F 0D 0A 38 30 38 (>.B>.m>..?..808 74 ; 0050 30 20 56 34 2E 30 21 03 00 36 3C 2E FF 25 7E 2F 0 V4.0!..6<..%~/ 75 ; 0060 77 BE 2F 77 C2 5D 38 23 06 12 11 D5 3F 1B 1A 2B w./w.]8#....?..+ 76 ; 0070 77 05 C2 6D 38 F9 21 00 01 E5 26 00 E5 E5 E5 3E w..m8.!...&....> 77 ; 0080 C3 32 08 00 21 1B 3F 22 09 00 21 4B 38 16 0B 4E .2..!.?"..!K8..N 78 ; 0090 23 CD 79 3C 15 C2 8F 38 FB 3E 08 D3 01 CD 08 3D #.y<...8.>.....= 79 ; 00A0 0E 2E CD 79 3C CD 86 3F D6 41 FA 98 38 FE 18 F2 ...y<..?.A..8... 80 ; 00B0 67 3C 87 21 BF 38 85 6F 7E 23 66 6F 0E 02 E9 EF g<.!.8.o~#fo.... 81 ; 00C0 38 3E 39 21 30 BD 39 DE 39 00 3A 11 3A 5B 3A 67 8>9!0.9.9.:.:[:g 82 ; 00D0 3C 67 3C 67 3C 78 3A 83 3A 96 3A 2D 30 1B 30 30 . 90 ; 0150 11 10 27 CD 40 3D 11 E8 03 CD 40 3D 11 64 00 CD ..'.@=....@=.d.. 91 ; 0160 40 3D 1E 0A CD 40 3D 1E 01 06 30 CD 40 3D 0E 20 @=...@=...0.@=. 92 ; 0170 CD 8F 3E D1 E1 CD 5F 3D CD B6 3D DA 96 3A 7D E6 ..>..._=..=..:}. 93 ; 0180 03 C2 75 39 C3 49 39 0D CD 82 3D E1 1E 00 3E 00 ..u9.I9...=...>. 94 ; 0190 D3 01 7B 2F D3 02 CD 37 3D DB 02 2F BE CA B5 39 ..{/...7=../...9 95 ; 01A0 F5 CD 08 3D CD D1 3D CD 77 3C 7E CD D9 3D CD 77 ...=..=.w<~..=.w 96 ; 01B0 3C F1 CD D9 3D 23 1C C2 8E 39 C3 98 38 CD 82 3D <...=#...9..8..= 97 ; 01C0 D1 E1 CD 08 3D CD D1 3D CD 77 3C 7E CD D9 3D CD ....=..=.w<~..=. 98 ; 01D0 B6 3D DA 98 38 7D E6 0F C2 C8 39 C3 C2 39 0D CD .=..8}....9..9.. 99 ; 01E0 82 3D CD 6D 3E 0E 3A CD 8F 3E AF 57 CD 42 3E E1 .=.m>.:..>.W.B>. 100 ; 01F0 CD 3A 3E 3E 01 CD 42 3E AF 92 CD 42 3E C3 96 3A .:>>..B>...B>..: 101 ; 0200 0C CD 82 3D C1 D1 E1 71 CD B6 3D D2 07 3A C3 98 ...=...q..=..:.. 102 ; 0210 38 CD 5D 3E DA 53 3A CA 2B 3A CD AE 3D D1 21 13 8.]>.S:.+:..=.!. 103 ; 0220 00 39 72 2B 73 78 FE 0D CA 53 3A 16 02 21 14 00 .9r+sx...S:..!.. 104 ; 0230 39 E5 0E 01 CD 82 3D 58 C1 E1 78 B1 CA 49 3A 71 9.....=X..x..I:q 105 ; 0240 23 70 23 0A 77 23 3E CF 02 7B FE 0D CA 53 3A 15 #p#.w#>..{...S:. 106 ; 0250 C2 31 3A CD 08 3D 21 08 00 39 E9 CD 82 3D D1 E1 .1:..=!..9...=.. 107 ; 0260 CD 08 3D E5 19 CD D1 3D CD 77 3C E1 7D 93 6F 7C ..=....=.w<.}.o| 108 ; 0270 9A 67 CD D1 3D C3 98 38 0D CD 82 3D E1 CD 2A 30 .g..=..8...=..*0 109 ; 0280 C3 98 38 0C CD 82 3D C1 D1 E1 7E 02 03 CD B6 3D ..8...=...~....= INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 3 LOC OBJ LINE SOURCE STATEMENT 110 ; 0290 D2 8A 3A C3 98 38 CD E9 3D C3 98 38 0C CD 82 3D ..:..8..=..8...= 111 ; 02A0 CD 08 3D C1 D1 E1 3E 00 D3 01 79 D3 FF 2F D3 02 ..=...>...y../.. 112 ; 02B0 DB 02 2F BE CA E5 3A 06 F0 CD 77 3E DB 02 2F BE ../...:...w>../. 113 ; 02C0 CA D8 3A 04 C2 B9 3A C5 0E 24 CD 79 3C CD 77 3C ..:...:..$.y<.w< 114 ; 02D0 C1 79 CD D9 3D C3 67 3C 78 C6 11 87 87 47 CD 77 .y..=.g...:...=..:..8. 116 ; 02F0 CD 82 3D E1 E5 CD 12 3F 06 3A 90 C2 F3 3A 57 CD ..=....?.:...:W. 117 ; 0300 BD 3C CA 25 3B 5F CD BD 3C F5 CD BD 3C C1 4F 09 .<.%;_..<...<.O. 118 ; 0310 CD BD 3C CD BD 3C 77 23 1D C2 13 3B CD BD 3C C2 ..<...g< 121 ; 0340 E1 7E CD D9 3D 0E 2D CD 79 3C CD 5D 3E DA 98 38 .~..=.-.y<.]>..8 122 ; 0350 CA 60 3B E5 CD AE 3D D1 E1 73 78 FE 0D CA 98 38 .`;...=..sx....8 123 ; 0360 23 C3 41 3B 0D CD 82 3D E1 1E 00 3E 00 D3 01 7B #.A;...=...>...{ 124 ; 0370 2F D3 02 CD 37 3D DB 02 2F 77 23 1C C2 6B 3B C3 /...7=../w#..k;. 125 ; 0380 98 38 CD 82 3D CD 08 3D D1 E1 7D C6 10 4F 7C CE .8..=..=..}..O|. 126 ; 0390 00 47 7B 91 4F 7A 98 DA 9F 3B 3E 10 C3 A2 3B 79 .G{.Oz...;>...;y 127 ; 03A0 C6 11 B7 CA 98 38 D5 5F 16 00 CD 6D 3E 0E 3A CD .....8._...m>.:. 128 ; 03B0 8F 3E 7B CD 42 3E CD 3A 3E AF CD 42 3E 7E 23 CD .>{.B>.:>..B>~#. 129 ; 03C0 42 3E 1D C2 BD 3B AF 92 CD 42 3E D1 C3 8A 3B CD B>...;...B>...;. 130 ; 03D0 86 3F 21 D5 3F FE 0D CA 38 3C BE CA EB 3B F5 7E .?!.?...8<...;.~ 131 ; 03E0 B7 FA 67 3C 23 23 23 F1 C3 DA 3B CD 77 3C 23 7E ..g<###...;.w<#~ 132 ; 03F0 EB 6F 26 00 39 EB 23 46 23 1A CD D9 3D 05 CA 06 .o&.9.#F#...=... 133 ; 0400 3C 1B 1A CD D9 3D 04 0E 2D CD 79 3C CD 5D 3E DA <....=..-.y<.]>. 134 ; 0410 98 38 CA 2A 3C E5 C5 CD AE 3D E1 F1 C5 F5 7D 12 .8.*<....=....}. 135 ; 0420 C1 05 CA 28 3C 13 7C 12 C1 E1 7E B7 FA 98 38 78 ...(<.|...~...8x 136 ; 0430 FE 0D CA 98 38 C3 EE 3B CD 08 3D CD 77 3C 7E 23 ....8..;..=.w<~# 137 ; 0440 B7 FA 98 38 4F CD 79 3C 0E 3D CD 79 3C 7E 23 EB ...8O.y<.=.y<~#. 138 ; 0450 6F 26 00 39 EB 46 23 1A CD D9 3D 05 CA 3B 3C 1B o&.9.F#...=..;<. 139 ; 0460 1A CD D9 3D C3 3B 3C CD 13 3E 11 F8 FF 19 F9 0E ...=.;<..>...... 140 ; 0470 2A CD 79 3C C3 98 38 0E 20 3A 03 00 E6 03 C2 A4 *.y<..8. :...... 141 ; 0480 3C CD 98 3C 79 FE 0D C0 0E 05 CD 98 3C CD D4 3C <......O..?.(>.O 146 ; 04D0 82 57 79 C9 3A 03 00 E6 03 C2 E7 3C DB 01 E6 01 .Wy.:......<.... 147 ; 04E0 C2 DC 3C DB 00 2F C9 FE 01 C2 F8 3C DB 05 E6 01 ..<../.....<.... 148 ; 04F0 C2 EC 3C DB 04 C3 E5 3C FE 02 CA B7 3E C3 00 30 ..<....<....>..0 149 ; 0500 C6 90 27 CE 40 27 4F C9 0E 0D CD 79 3C 0E 0A C3 ..'.@'O....y<... 150 ; 0510 79 3C 3A 03 00 E6 03 C2 1F 3D DB 01 C3 26 3D FE y<:......=...&=. 151 ; 0520 01 C2 2D 3D DB 05 E6 01 3E 00 C0 2F C9 FE 02 3E ..-=....>../...> 152 ; 0530 FF CA 2A 3D C3 18 30 C5 06 54 05 C2 3A 3D C1 C9 ..*=..0..T..:=.. 153 ; 0540 0E 30 7D 93 6F 7C 9A 67 DA 4F 3D 0C C3 42 3D 19 .0}.o|.g.O=..B=. 154 ; 0550 79 FE 30 C2 5A 3D 48 C3 8F 3E 06 30 C3 57 3D 0E y.0.Z=H..>.0.W=. 155 ; 0560 42 CD 8F 3E 06 08 7E 07 F5 3E 00 17 17 C6 4E 4F B..>..~..>....NO 156 ; 0570 CD 8F 3E F1 05 C2 67 3D 0E 46 CD 8F 3E 0E 20 C3 ..>...g=.F..>. . 157 ; 0580 8F 3E 21 00 00 CD 86 3F 47 CD 28 3E DA 98 3D 29 .>!....?G.(>..=) 158 ; 0590 29 29 29 B5 6F C3 85 3D E3 E5 78 CD 60 3E D2 A6 ))).o..=..x.`>.. 159 ; 05A0 3D 0D C2 67 3C C9 C2 67 3C 0D C2 82 3D C9 0E 01 =..g<..g<...=... 160 ; 05B0 21 00 00 C3 88 3D 23 7C B5 37 C8 7B 95 7A 9C C9 !....=#|.7.{.z.. 161 ; 05C0 CD 00 3D C3 79 3C 3A 03 00 C9 E5 21 03 00 71 E1 ..=.y<:....!..q. 162 ; 05D0 C9 7C CD D9 3D 7D C3 D9 3D F5 0F 0F 0F 0F E6 0F .|..=}..=....... 163 ; 05E0 CD C0 3D F1 E6 0F C3 C0 3D 06 3C 0E 00 CD 8F 3E ..=.....=.<....> 164 ; 05F0 05 C2 EB 3D C9 3A 03 00 E6 C0 CA 98 3C FE 40 CA ...=.:......<.@. INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 4 LOC OBJ LINE SOURCE STATEMENT 165 ; 0600 A9 3C FE 80 CA 12 30 C3 15 30 E5 CD 13 3E 44 3E .<....0..0...>D> 166 ; 0610 C0 E1 C9 C5 21 FF 00 25 7E 2F 77 BE 2F 77 C2 17 ....!..%~/w./w.. 167 ; 0620 3E 23 01 EE FF 09 C1 C9 D6 30 D8 C6 E9 D8 C6 06 >#.......0...... 168 ; 0630 F2 36 3E C6 07 D8 C6 0A B7 C9 7C CD 42 3E 7D C3 .6>.......|.B>}. 169 ; 0640 42 3E F5 0F 0F 0F 0F E6 0F CD 00 3D CD 8F 3E F1 B>.........=..>. 170 ; 0650 F5 E6 0F CD 00 3D CD 8F 3E F1 82 57 C9 CD 86 3F .....=..>..W...? 171 ; 0660 FE 20 C8 FE 2C C8 FE 0D 37 3F C0 37 C9 0E 0D CD . ..,...7?.7.... 172 ; 0670 8F 3E 0E 0A C3 8F 3E 7E 2F D3 03 3E 80 D3 01 3E .>....>~/..>...> 173 ; 0680 00 D3 01 C5 06 14 CD 37 3D 05 C2 86 3E C1 C9 3A .......7=...>..: 174 ; 0690 03 00 E6 30 CA 98 3C FE 10 C2 AF 3E DB 01 E6 40 ...0..<....>...@ 175 ; 06A0 CA 9C 3E 79 D3 03 3E 0A D3 01 3E 08 D3 01 C9 FE ..>y..>...>..... 176 ; 06B0 20 CA 0C 30 C3 0F 30 E5 21 03 00 7E E6 0C C2 E4 ..0..0.!..~.... 177 ; 06C0 3E 3E 09 D3 01 3E 08 D3 01 26 FF E6 01 CA DE 3E >>...>...&.....> 178 ; 06D0 CD 37 3D CD 37 3D 25 C2 C5 3E AF 37 E1 C9 DB 00 .7=.7=%..>.7.... 179 ; 06E0 2F B7 E1 C9 FE 04 C2 09 3F 3E 0C D3 01 3E 08 D3 /.......?>...>.. 180 ; 06F0 01 26 FA DB 01 E6 20 C2 04 3F CD 37 3D 25 C2 F3 .&.... ..?.7=%.. 181 ; 0700 3E C3 DA 3E DB 03 B7 E1 C9 E1 FE 08 CA 06 30 C3 >..>..........0. 182 ; 0710 09 30 CD B7 3E DA 67 3C E6 7F C9 E5 D5 C5 F5 CD .0..>.g<........ 183 ; 0720 13 3E EB 21 0A 00 39 06 04 EB 2B 72 2B 73 D1 05 .>.!..9...+r+s.. 184 ; 0730 C2 2A 3F C1 0B F9 21 14 00 39 7E 91 23 C2 45 3F .*?...!..9~.#.E? 185 ; 0740 7E 90 CA 53 3F 23 23 7E 91 C2 52 3F 23 7E 90 CA ~..S?##~..R?#~.. 186 ; 0750 53 3F 03 21 0F 00 39 73 23 72 23 23 71 23 70 C5 S?.!..9s#r##q#p. 187 ; 0760 0E 2A CD 79 3C E1 CD D1 3D 21 14 00 39 16 02 4E .*.y<...=!..9..N 188 ; 0770 36 00 23 46 36 00 23 79 B0 CA 7E 3F 7E 02 23 15 6.#F6.#y..~?~.#. 189 ; 0780 C2 6F 3F C3 98 38 CD D4 3C E6 7F C5 4F CD 79 3C .o?..8..<...O.y< 190 ; 0790 79 C1 C9 43 FC A3 3F 52 F3 AB 3F 50 CF B3 3F 4C y..C..?R..?P..?L 191 ; 07A0 3F BB 3F 54 00 43 01 42 02 31 03 54 00 50 04 31 ?.?T.C.B.1.T.P.1 192 ; 07B0 08 32 0C 54 00 50 10 31 20 32 30 54 00 43 40 31 .2.T.P.1 20T.C@1 193 ; 07C0 80 32 C0 D1 C1 F1 E1 F9 FB 21 00 00 C3 00 00 00 .2.......!...... 194 ; 07D0 00 00 00 00 00 41 05 01 42 03 01 43 02 01 44 01 .....A..B..C..D. 195 ; 07E0 01 45 00 01 46 04 01 48 10 01 4C 0F 01 4D 10 02 .E..F..H..L..M.. 196 ; 07F0 50 13 02 53 07 02 FF 7B 38 00 00 00 00 00 00 00 P..S...{8....... 3800 C35638 197 JMP BEGIN 3803 C3D43C 198 JMP CI 3806 C3B73E 199 JMP RI 3809 C3793C 200 JMP CO 380C C38F3E 201 JMP PO 380F C3F53D 202 JMP LO 3812 C3123D 203 JMP CSTS 3815 C3C63D 204 JMP IOCHK 3818 C3CA3D 205 JMP IOSET 381B C30A3E 206 JMP MEMCHK 381E C39838 207 JMP START 3821 C38739 208 JMP COMP 3824 C39C3A 209 JMP NULL 3827 C3643B 210 JMP TRAN 382A C3673C 211 JMP LER 382D C3773C 212 JMP BLK 3830 C3083D 213 JMP CRLF 3833 C3823D 214 JMP EXPR 3836 C3B63D 215 JMP HILO 3839 C3D13D 216 JMP LADR 383C C3D93D 217 JMP LBYTE 383F C3283E 218 JMP NIBBLE 3842 C3423E 219 JMP PBYTE INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 5 LOC OBJ LINE SOURCE STATEMENT 3845 C36D3E 220 JMP PEOL 3848 C3863F 221 JMP TI 222 384B 0D 223 VERS: DB CR, LF, '8080 V4.0' ;384B- 384C 0A 384D 38303830 3851 2056342E 3855 30 3856 210300 224 BEGIN: LXI H,IOBYT 3859 363C 225 MVI M,'<' 385B 2EFF 226 MVI L,0FFH 227 385D 25 228 BG0: DCR H 385E 7E 229 MOV A,M 385F 2F 230 CMA 3860 77 231 MOV M,A 3861 BE 232 CMP M 3862 2F 233 CMA 3863 77 234 MOV M,A 3864 C25D38 235 JNZ BG0 3867 23 236 INX H 3868 0612 237 MVI B,012H 386A 11D53F 238 LXI D,ACTBL 239 386D 1B 240 BG1: DCX D 386E 1A 241 LDAX D 386F 2B 242 DCX H 3870 77 243 MOV M,A 3871 05 244 DCR B 3872 C26D38 245 JNZ BG1 3875 F9 246 SPHL 3876 210001 247 LXI H,A0100 3879 E5 248 PUSH H 387A 2600 249 MVI H,0 387C E5 250 PUSH H 387D E5 251 PUSH H 387E E5 252 PUSH H 387F 3EC3 253 MVI A,0C3H 3881 320800 254 STA A0008 3884 211B3F 255 LXI H,RESTART 3887 220900 256 SHLD A0009 388A 214B38 257 LXI H,VERS 388D 160B 258 MVI D,00BH 259 388F 4E 260 VER0: MOV C,M 3890 23 261 INX H 3891 CD793C 262 CALL CO 3894 15 263 DCR D 3895 C28F38 264 JNZ VER0 265 3898 FB 266 START: EI 3899 3E08 267 MVI A,BS 389B D301 268 OUT TTYSC 389D CD083D 269 CALL CRLF 38A0 0E2E 270 MVI C,'.' INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 6 LOC OBJ LINE SOURCE STATEMENT 38A2 CD793C 271 CALL CO 38A5 CD863F 272 CALL TI 38A8 D641 273 SUI 'A' 38AA FA9838 274 JM START 38AD FE18 275 CPI 018H 38AF F2673C 276 JP LER 38B2 87 277 ADD A 38B3 21BF38 278 LXI H,TBL 38B6 85 279 ADD L 38B7 6F 280 MOV L,A 38B8 7E 281 MOV A,M 38B9 23 282 INX H 38BA 66 283 MOV H,M 38BB 6F 284 MOV L,A 38BC 0E02 285 MVI C,002H 286 ; Possible jump table 38BE E9 287 PCHL 288 289 38BF EF38 290 TBL: DW ASSIGN 38C1 3E39 291 DW BNPF 38C3 2130 292 DW T3021 38C5 BD39 293 DW DISP 38C7 DE39 294 DW EOF 38C9 003A 295 DW FILL 38CB 113A 296 DW GOTO 38CD 5B3A 297 DW HEXN 38CF 673C 298 DW LER 38D1 673C 299 DW LER 38D3 673C 300 DW LER 38D5 783A 301 DW LOAD 38D7 833A 302 DW LO0 38D9 963A 303 DW MV0 38DB 2D30 304 DW T302D 38DD 1B30 305 DW T301B 38DF 3030 306 DW T3030 38E1 EF3A 307 DW READ 38E3 363B 308 DW SUBS 38E5 1E30 309 DW T301E 38E7 2430 310 DW T3024 38E9 2730 311 DW T3027 38EB 823B 312 DW WRITE 38ED CF3B 313 DW X 314 38EF CD863F 315 ASSIGN: CALL TI 38F2 21933F 316 LXI H,LTBL 38F5 0E04 317 MVI C,004H 318 38F7 BE 319 AS0: CMP M 38F8 23 320 INX H 38F9 CA0639 321 JZ AS1 38FC 23 322 INX H 38FD 23 323 INX H 38FE 23 324 INX H 38FF 0D 325 DCR C INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 7 LOC OBJ LINE SOURCE STATEMENT 3900 C2F738 326 JNZ AS0 3903 C3673C 327 JMP LER 328 3906 46 329 AS1: MOV B,M 3907 23 330 INX H 3908 5E 331 MOV E,M 3909 23 332 INX H 390A 56 333 MOV D,M 390B EB 334 XCHG 335 390C CD863F 336 AS2: CALL TI 390F FE3D 337 CPI '=' 3911 C20C39 338 JNZ AS2 339 3914 CD863F 340 AS3: CALL TI 3917 FE20 341 CPI ' ' 3919 CA1439 342 JZ AS3 391C 0E04 343 MVI C,004H 344 391E BE 345 AS4: CMP M 391F 23 346 INX H 3920 CA2B39 347 JZ AS5 3923 23 348 INX H 3924 0D 349 DCR C 3925 C21E39 350 JNZ AS4 3928 C3673C 351 JMP LER 352 392B CD863F 353 AS5: CALL TI 392E FE0D 354 CPI CR 3930 C22B39 355 JNZ AS5 3933 4E 356 MOV C,M 3934 210300 357 LXI H,IOBYT 3937 7E 358 MOV A,M 3938 A0 359 ANA B 3939 B1 360 ORA C 393A 77 361 MOV M,A 393B C39838 362 JMP START 363 393E CD823D 364 BNPF: CALL EXPR 3941 CD083D 365 CALL CRLF 3944 CDE93D 366 CALL LEAD 3947 D1 367 POP D 3948 E1 368 POP H 369 3949 E5 370 BN0: PUSH H 394A D5 371 PUSH D 394B CD6D3E 372 CALL PEOL 394E 0620 373 MVI B,' ' 3950 111027 374 LXI D,A2710 3953 CD403D 375 CALL DIGIT 3956 11E803 376 LXI D,A03E8 3959 CD403D 377 CALL DIGIT 395C 116400 378 LXI D,A0064 395F CD403D 379 CALL DIGIT 3962 1E0A 380 MVI E,LF INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 8 LOC OBJ LINE SOURCE STATEMENT 3964 CD403D 381 CALL DIGIT 3967 1E01 382 MVI E,001H 3969 0630 383 MVI B,'0' 396B CD403D 384 CALL DIGIT 396E 0E20 385 MVI C,' ' 3970 CD8F3E 386 CALL PO 3973 D1 387 POP D 3974 E1 388 POP H 389 3975 CD5F3D 390 BN1: CALL ENCODE 3978 CDB63D 391 CALL HILO 397B DA963A 392 JC MV0 397E 7D 393 MOV A,L 397F E603 394 ANI 003H 3981 C27539 395 JNZ BN1 3984 C34939 396 JMP BN0 397 3987 0D 398 COMP: DCR C 3988 CD823D 399 CALL EXPR 398B E1 400 POP H 398C 1E00 401 MVI E,0 402 398E 3E00 403 CM0: MVI A,0 3990 D301 404 OUT TTYSC 3992 7B 405 MOV A,E 3993 2F 406 CMA 3994 D302 407 OUT P0002 3996 CD373D 408 CALL DELAY 3999 DB02 409 IN P0002 399B 2F 410 CMA 399C BE 411 CMP M 399D CAB539 412 JZ CM1 39A0 F5 413 PUSH PSW 39A1 CD083D 414 CALL CRLF 39A4 CDD13D 415 CALL LADR 39A7 CD773C 416 CALL BLK 39AA 7E 417 MOV A,M 39AB CDD93D 418 CALL LBYTE 39AE CD773C 419 CALL BLK 39B1 F1 420 POP PSW 39B2 CDD93D 421 CALL LBYTE 422 39B5 23 423 CM1: INX H 39B6 1C 424 INR E 39B7 C28E39 425 JNZ CM0 39BA C39838 426 JMP START 427 39BD CD823D 428 DISP: CALL EXPR 39C0 D1 429 POP D 39C1 E1 430 POP H 431 39C2 CD083D 432 DI0: CALL CRLF 39C5 CDD13D 433 CALL LADR 434 39C8 CD773C 435 DI1: CALL BLK INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 9 LOC OBJ LINE SOURCE STATEMENT 39CB 7E 436 MOV A,M 39CC CDD93D 437 CALL LBYTE 39CF CDB63D 438 CALL HILO 39D2 DA9838 439 JC START 39D5 7D 440 MOV A,L 39D6 E60F 441 ANI 00FH 39D8 C2C839 442 JNZ DI1 39DB C3C239 443 JMP DI0 444 39DE 0D 445 EOF: DCR C 39DF CD823D 446 CALL EXPR 39E2 CD6D3E 447 CALL PEOL 39E5 0E3A 448 MVI C,':' 39E7 CD8F3E 449 CALL PO 39EA AF 450 XRA A 39EB 57 451 MOV D,A 39EC CD423E 452 CALL PBYTE 39EF E1 453 POP H 39F0 CD3A3E 454 CALL PADR 39F3 3E01 455 MVI A,001H 39F5 CD423E 456 CALL PBYTE 39F8 AF 457 XRA A 39F9 92 458 SUB D 39FA CD423E 459 CALL PBYTE 39FD C3963A 460 JMP MV0 461 3A00 0C 462 FILL: INR C 3A01 CD823D 463 CALL EXPR 3A04 C1 464 POP B 3A05 D1 465 POP D 3A06 E1 466 POP H 467 3A07 71 468 FI0: MOV M,C 3A08 CDB63D 469 CALL HILO 3A0B D2073A 470 JNC FI0 3A0E C39838 471 JMP START 472 3A11 CD5D3E 473 GOTO: CALL PCHK 3A14 DA533A 474 JC GO3 3A17 CA2B3A 475 JZ GO0 3A1A CDAE3D 476 CALL EXF 3A1D D1 477 POP D 3A1E 211300 478 LXI H,A0013 3A21 39 479 DAD SP 3A22 72 480 MOV M,D 3A23 2B 481 DCX H 3A24 73 482 MOV M,E 3A25 78 483 MOV A,B 3A26 FE0D 484 CPI CR 3A28 CA533A 485 JZ GO3 486 3A2B 1602 487 GO0: MVI D,002H 3A2D 211400 488 LXI H,A0014 3A30 39 489 DAD SP 490 INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 10 LOC OBJ LINE SOURCE STATEMENT 3A31 E5 491 GO1: PUSH H 3A32 0E01 492 MVI C,001H 3A34 CD823D 493 CALL EXPR 3A37 58 494 MOV E,B 3A38 C1 495 POP B 3A39 E1 496 POP H 3A3A 78 497 MOV A,B 3A3B B1 498 ORA C 3A3C CA493A 499 JZ GO2 3A3F 71 500 MOV M,C 3A40 23 501 INX H 3A41 70 502 MOV M,B 3A42 23 503 INX H 3A43 0A 504 LDAX B 3A44 77 505 MOV M,A 3A45 23 506 INX H 3A46 3ECF 507 MVI A,0CFH 3A48 02 508 STAX B 509 3A49 7B 510 GO2: MOV A,E 3A4A FE0D 511 CPI CR 3A4C CA533A 512 JZ GO3 3A4F 15 513 DCR D 3A50 C2313A 514 JNZ GO1 515 3A53 CD083D 516 GO3: CALL CRLF 3A56 210800 517 LXI H,A0008 3A59 39 518 DAD SP 519 ; Possible jump table 3A5A E9 520 PCHL 521 522 3A5B CD823D 523 HEXN: CALL EXPR 3A5E D1 524 POP D 3A5F E1 525 POP H 3A60 CD083D 526 CALL CRLF 3A63 E5 527 PUSH H 3A64 19 528 DAD D 3A65 CDD13D 529 CALL LADR 3A68 CD773C 530 CALL BLK 3A6B E1 531 POP H 3A6C 7D 532 MOV A,L 3A6D 93 533 SUB E 3A6E 6F 534 MOV L,A 3A6F 7C 535 MOV A,H 3A70 9A 536 SBB D 3A71 67 537 MOV H,A 3A72 CDD13D 538 CALL LADR 3A75 C39838 539 JMP START 540 3A78 0D 541 LOAD: DCR C 3A79 CD823D 542 CALL EXPR 3A7C E1 543 POP H 3A7D CD2A30 544 CALL C302A 3A80 C39838 545 JMP START INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 11 LOC OBJ LINE SOURCE STATEMENT 546 3A83 0C 547 LO0: INR C 3A84 CD823D 548 CALL EXPR 3A87 C1 549 POP B 3A88 D1 550 POP D 3A89 E1 551 POP H 552 3A8A 7E 553 MOVE: MOV A,M 3A8B 02 554 STAX B 3A8C 03 555 INX B 3A8D CDB63D 556 CALL HILO 3A90 D28A3A 557 JNC MOVE 3A93 C39838 558 JMP START 559 3A96 CDE93D 560 MV0: CALL LEAD 3A99 C39838 561 JMP START 562 3A9C 0C 563 NULL: INR C 3A9D CD823D 564 CALL EXPR 3AA0 CD083D 565 CALL CRLF 3AA3 C1 566 POP B 3AA4 D1 567 POP D 3AA5 E1 568 POP H 569 3AA6 3E00 570 PROG: MVI A,0 3AA8 D301 571 OUT TTYSC 3AAA 79 572 MOV A,C 3AAB D3FF 573 OUT P00FF 3AAD 2F 574 CMA 3AAE D302 575 OUT P0002 3AB0 DB02 576 IN P0002 3AB2 2F 577 CMA 3AB3 BE 578 CMP M 3AB4 CAE53A 579 JZ PR3 3AB7 06F0 580 MVI B,0F0H 581 3AB9 CD773E 582 PR0: CALL PGRM 3ABC DB02 583 IN P0002 3ABE 2F 584 CMA 3ABF BE 585 CMP M 3AC0 CAD83A 586 JZ PR1 3AC3 04 587 INR B 3AC4 C2B93A 588 JNZ PR0 3AC7 C5 589 PUSH B 3AC8 0E24 590 MVI C,'$' 3ACA CD793C 591 CALL CO 3ACD CD773C 592 CALL BLK 3AD0 C1 593 POP B 3AD1 79 594 MOV A,C 3AD2 CDD93D 595 CALL LBYTE 3AD5 C3673C 596 JMP LER 597 3AD8 78 598 PR1: MOV A,B 3AD9 C611 599 ADI 011H 3ADB 87 600 ADD A INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 12 LOC OBJ LINE SOURCE STATEMENT 3ADC 87 601 ADD A 3ADD 47 602 MOV B,A 603 3ADE CD773E 604 PR2: CALL PGRM 3AE1 05 605 DCR B 3AE2 C2DE3A 606 JNZ PR2 607 3AE5 0C 608 PR3: INR C 3AE6 CDB63D 609 CALL HILO 3AE9 D2A63A 610 JNC PROG 3AEC C39838 611 JMP START 612 3AEF 0D 613 READ: DCR C 3AF0 CD823D 614 CALL EXPR 615 3AF3 E1 616 RED0: POP H 3AF4 E5 617 PUSH H 3AF5 CD123F 618 CALL RIX 3AF8 063A 619 MVI B,':' 3AFA 90 620 SUB B 3AFB C2F33A 621 JNZ RED0 3AFE 57 622 MOV D,A 3AFF CDBD3C 623 CALL BYTE 3B02 CA253B 624 JZ RED2 3B05 5F 625 MOV E,A 3B06 CDBD3C 626 CALL BYTE 3B09 F5 627 PUSH PSW 3B0A CDBD3C 628 CALL BYTE 3B0D C1 629 POP B 3B0E 4F 630 MOV C,A 3B0F 09 631 DAD B 3B10 CDBD3C 632 CALL BYTE 633 3B13 CDBD3C 634 RED1: CALL BYTE 3B16 77 635 MOV M,A 3B17 23 636 INX H 3B18 1D 637 DCR E 3B19 C2133B 638 JNZ RED1 3B1C CDBD3C 639 CALL BYTE 3B1F C2673C 640 JNZ LER 3B22 C3F33A 641 JMP RED0 642 3B25 CDBD3C 643 RED2: CALL BYTE 3B28 67 644 MOV H,A 3B29 CDBD3C 645 CALL BYTE 3B2C 6F 646 MOV L,A 3B2D B4 647 ORA H 3B2E CA323B 648 JZ RED3 649 ; Possible jump table 3B31 E9 650 PCHL 651 652 3B32 E1 653 RED3: POP H 3B33 C39838 654 JMP START 655 INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 13 LOC OBJ LINE SOURCE STATEMENT 3B36 0D 656 SUBS: DCR C 3B37 CD823D 657 CALL EXPR 3B3A CD603E 658 CALL P2C 3B3D DA673C 659 JC LER 3B40 E1 660 POP H 661 3B41 7E 662 SU0: MOV A,M 3B42 CDD93D 663 CALL LBYTE 3B45 0E2D 664 MVI C,'-' 3B47 CD793C 665 CALL CO 3B4A CD5D3E 666 CALL PCHK 3B4D DA9838 667 JC START 3B50 CA603B 668 JZ SU1 3B53 E5 669 PUSH H 3B54 CDAE3D 670 CALL EXF 3B57 D1 671 POP D 3B58 E1 672 POP H 3B59 73 673 MOV M,E 3B5A 78 674 MOV A,B 3B5B FE0D 675 CPI CR 3B5D CA9838 676 JZ START 677 3B60 23 678 SU1: INX H 3B61 C3413B 679 JMP SU0 680 3B64 0D 681 TRAN: DCR C 3B65 CD823D 682 CALL EXPR 3B68 E1 683 POP H 3B69 1E00 684 MVI E,0 685 3B6B 3E00 686 TR0: MVI A,0 3B6D D301 687 OUT TTYSC 3B6F 7B 688 MOV A,E 3B70 2F 689 CMA 3B71 D302 690 OUT P0002 3B73 CD373D 691 CALL DELAY 3B76 DB02 692 IN P0002 3B78 2F 693 CMA 3B79 77 694 MOV M,A 3B7A 23 695 INX H 3B7B 1C 696 INR E 3B7C C26B3B 697 JNZ TR0 3B7F C39838 698 JMP START 699 3B82 CD823D 700 WRITE: CALL EXPR 3B85 CD083D 701 CALL CRLF 3B88 D1 702 POP D 3B89 E1 703 POP H 704 3B8A 7D 705 WRI0: MOV A,L 3B8B C610 706 ADI 010H 3B8D 4F 707 MOV C,A 3B8E 7C 708 MOV A,H 3B8F CE00 709 ACI 0 3B91 47 710 MOV B,A INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 14 LOC OBJ LINE SOURCE STATEMENT 3B92 7B 711 MOV A,E 3B93 91 712 SUB C 3B94 4F 713 MOV C,A 3B95 7A 714 MOV A,D 3B96 98 715 SBB B 3B97 DA9F3B 716 JC WRI1 3B9A 3E10 717 MVI A,010H 3B9C C3A23B 718 JMP WRI2 719 3B9F 79 720 WRI1: MOV A,C 3BA0 C611 721 ADI 011H 722 3BA2 B7 723 WRI2: ORA A 3BA3 CA9838 724 JZ START 3BA6 D5 725 PUSH D 3BA7 5F 726 MOV E,A 3BA8 1600 727 MVI D,0 3BAA CD6D3E 728 CALL PEOL 3BAD 0E3A 729 MVI C,':' 3BAF CD8F3E 730 CALL PO 3BB2 7B 731 MOV A,E 3BB3 CD423E 732 CALL PBYTE 3BB6 CD3A3E 733 CALL PADR 3BB9 AF 734 XRA A 3BBA CD423E 735 CALL PBYTE 736 3BBD 7E 737 WRI3: MOV A,M 3BBE 23 738 INX H 3BBF CD423E 739 CALL PBYTE 3BC2 1D 740 DCR E 3BC3 C2BD3B 741 JNZ WRI3 3BC6 AF 742 XRA A 3BC7 92 743 SUB D 3BC8 CD423E 744 CALL PBYTE 3BCB D1 745 POP D 3BCC C38A3B 746 JMP WRI0 747 3BCF CD863F 748 X: CALL TI 3BD2 21D53F 749 LXI H,ACTBL 3BD5 FE0D 750 CPI CR 3BD7 CA383C 751 JZ X6 752 3BDA BE 753 X0: CMP M 3BDB CAEB3B 754 JZ X1 3BDE F5 755 PUSH PSW 3BDF 7E 756 MOV A,M 3BE0 B7 757 ORA A 3BE1 FA673C 758 JM LER 3BE4 23 759 INX H 3BE5 23 760 INX H 3BE6 23 761 INX H 3BE7 F1 762 POP PSW 3BE8 C3DA3B 763 JMP X0 764 3BEB CD773C 765 X1: CALL BLK INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 15 LOC OBJ LINE SOURCE STATEMENT 766 3BEE 23 767 X2: INX H 3BEF 7E 768 MOV A,M 3BF0 EB 769 XCHG 3BF1 6F 770 MOV L,A 3BF2 2600 771 MVI H,0 3BF4 39 772 DAD SP 3BF5 EB 773 XCHG 3BF6 23 774 INX H 3BF7 46 775 MOV B,M 3BF8 23 776 INX H 3BF9 1A 777 LDAX D 3BFA CDD93D 778 CALL LBYTE 3BFD 05 779 DCR B 3BFE CA063C 780 JZ X3 3C01 1B 781 DCX D 3C02 1A 782 LDAX D 3C03 CDD93D 783 CALL LBYTE 784 3C06 04 785 X3: INR B 3C07 0E2D 786 MVI C,'-' 3C09 CD793C 787 CALL CO 3C0C CD5D3E 788 CALL PCHK 3C0F DA9838 789 JC START 3C12 CA2A3C 790 JZ X5 3C15 E5 791 PUSH H 3C16 C5 792 PUSH B 3C17 CDAE3D 793 CALL EXF 3C1A E1 794 POP H 3C1B F1 795 POP PSW 3C1C C5 796 PUSH B 3C1D F5 797 PUSH PSW 3C1E 7D 798 MOV A,L 3C1F 12 799 STAX D 3C20 C1 800 POP B 3C21 05 801 DCR B 3C22 CA283C 802 JZ X4 3C25 13 803 INX D 3C26 7C 804 MOV A,H 3C27 12 805 STAX D 806 3C28 C1 807 X4: POP B 3C29 E1 808 POP H 809 3C2A 7E 810 X5: MOV A,M 3C2B B7 811 ORA A 3C2C FA9838 812 JM START 3C2F 78 813 MOV A,B 3C30 FE0D 814 CPI CR 3C32 CA9838 815 JZ START 3C35 C3EE3B 816 JMP X2 817 3C38 CD083D 818 X6: CALL CRLF 819 3C3B CD773C 820 X7: CALL BLK INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 16 LOC OBJ LINE SOURCE STATEMENT 3C3E 7E 821 MOV A,M 3C3F 23 822 INX H 3C40 B7 823 ORA A 3C41 FA9838 824 JM START 3C44 4F 825 MOV C,A 3C45 CD793C 826 CALL CO 3C48 0E3D 827 MVI C,'=' 3C4A CD793C 828 CALL CO 3C4D 7E 829 MOV A,M 3C4E 23 830 INX H 3C4F EB 831 XCHG 3C50 6F 832 MOV L,A 3C51 2600 833 MVI H,0 3C53 39 834 DAD SP 3C54 EB 835 XCHG 3C55 46 836 MOV B,M 3C56 23 837 INX H 3C57 1A 838 LDAX D 3C58 CDD93D 839 CALL LBYTE 3C5B 05 840 DCR B 3C5C CA3B3C 841 JZ X7 3C5F 1B 842 DCX D 3C60 1A 843 LDAX D 3C61 CDD93D 844 CALL LBYTE 3C64 C33B3C 845 JMP X7 846 3C67 CD133E 847 LER: CALL MEMSIZ 3C6A 11F8FF 848 LXI D,AFFF8 3C6D 19 849 DAD D 3C6E F9 850 SPHL 3C6F 0E2A 851 MVI C,'*' 3C71 CD793C 852 CALL CO 3C74 C39838 853 JMP START 854 3C77 0E20 855 BLK: MVI C,' ' 856 3C79 3A0300 857 CO: LDA IOBYT 3C7C E603 858 ANI 003H 3C7E C2A43C 859 JNZ CO0 860 3C81 CD983C 861 J3C81: CALL TTYOUT 3C84 79 862 MOV A,C 3C85 FE0D 863 CPI CR 3C87 C0 864 RNZ 3C88 0E05 865 MVI C,005H 3C8A CD983C 866 CALL TTYOUT 867 3C8D CDD43C 868 J2C8D: CALL CI 3C90 FE06 869 CPI 006H 3C92 C28D3C 870 JNZ J2C8D 3C95 0E0D 871 MVI C,CR 3C97 C9 872 RET 873 3C98 DB01 874 TTYOUT: IN TTYSC 3C9A E604 875 ANI 004H INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 17 LOC OBJ LINE SOURCE STATEMENT 3C9C C2983C 876 JNZ TTYOUT 3C9F 79 877 MOV A,C 3CA0 2F 878 CMA 3CA1 D300 879 OUT TTYIO 3CA3 C9 880 RET 881 3CA4 FE01 882 CO0: CPI 001H 3CA6 C2B53C 883 JNZ CO1 884 3CA9 DB05 885 CHROUT: IN CRTSC 3CAB E604 886 ANI 004H 3CAD C2A93C 887 JNZ CHROUT 3CB0 79 888 MOV A,C 3CB1 2F 889 CMA 3CB2 D304 890 OUT CRTIO 3CB4 C9 891 RET 892 3CB5 FE02 893 CO1: CPI 002H 3CB7 C20330 894 JNZ J3003 3CBA C3F53D 895 JMP LO 896 3CBD CD123F 897 BYTE: CALL RIX 3CC0 CD283E 898 CALL NIBBLE 3CC3 07 899 RLC 3CC4 07 900 RLC 3CC5 07 901 RLC 3CC6 07 902 RLC 3CC7 4F 903 MOV C,A 3CC8 CD123F 904 CALL RIX 3CCB CD283E 905 CALL NIBBLE 3CCE B1 906 ORA C 3CCF 4F 907 MOV C,A 3CD0 82 908 ADD D 3CD1 57 909 MOV D,A 3CD2 79 910 MOV A,C 3CD3 C9 911 RET 912 3CD4 3A0300 913 CI: LDA IOBYT 3CD7 E603 914 ANI 003H 3CD9 C2E73C 915 JNZ CI1 916 3CDC DB01 917 TTYIN: IN TTYSC 3CDE E601 918 ANI 001H 3CE0 C2DC3C 919 JNZ TTYIN 3CE3 DB00 920 IN TTYIO 921 3CE5 2F 922 CI0: CMA 3CE6 C9 923 RET 924 3CE7 FE01 925 CI1: CPI 001H 3CE9 C2F83C 926 JNZ CI2 927 3CEC DB05 928 CRTIN: IN CRTSC 3CEE E601 929 ANI 001H 3CF0 C2EC3C 930 JNZ CRTIN INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 18 LOC OBJ LINE SOURCE STATEMENT 3CF3 DB04 931 IN CRTIO 3CF5 C3E53C 932 JMP CI0 933 3CF8 FE02 934 CI2: CPI 002H 3CFA CAB73E 935 JZ RI 3CFD C30030 936 JMP J3000 937 3D00 C690 938 CONV: ADI 090H 3D02 27 939 DAA 3D03 CE40 940 ACI '@' 3D05 27 941 DAA 3D06 4F 942 MOV C,A 3D07 C9 943 RET 944 3D08 0E0D 945 CRLF: MVI C,CR 3D0A CD793C 946 CALL CO 3D0D 0E0A 947 MVI C,LF 3D0F C3793C 948 JMP CO 949 3D12 3A0300 950 CSTS: LDA IOBYT 3D15 E603 951 ANI 003H 3D17 C21F3D 952 JNZ CS0 3D1A DB01 953 IN TTYSC 3D1C C3263D 954 JMP CS1 955 3D1F FE01 956 CS0: CPI 001H 3D21 C22D3D 957 JNZ CS3 3D24 DB05 958 IN CRTSC 959 3D26 E601 960 CS1: ANI 001H 3D28 3E00 961 MVI A,0 962 3D2A C0 963 CS2: RNZ 3D2B 2F 964 CMA 3D2C C9 965 RET 966 3D2D FE02 967 CS3: CPI 002H 3D2F 3EFF 968 MVI A,0FFH 3D31 CA2A3D 969 JZ CS2 3D34 C31830 970 JMP J3018 971 3D37 C5 972 DELAY: PUSH B 3D38 0654 973 MVI B,'T' 974 3D3A 05 975 DL0: DCR B 3D3B C23A3D 976 JNZ DL0 3D3E C1 977 POP B 3D3F C9 978 RET 979 3D40 0E30 980 DIGIT: MVI C,'0' 981 3D42 7D 982 DG0: MOV A,L 3D43 93 983 SUB E 3D44 6F 984 MOV L,A 3D45 7C 985 MOV A,H INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 19 LOC OBJ LINE SOURCE STATEMENT 3D46 9A 986 SBB D 3D47 67 987 MOV H,A 3D48 DA4F3D 988 JC DG1 3D4B 0C 989 INR C 3D4C C3423D 990 JMP DG0 991 3D4F 19 992 DG1: DAD D 3D50 79 993 MOV A,C 3D51 FE30 994 CPI '0' 3D53 C25A3D 995 JNZ DG3 3D56 48 996 MOV C,B 997 3D57 C38F3E 998 DG2: JMP PO 999 3D5A 0630 1000 DG3: MVI B,'0' 3D5C C3573D 1001 JMP DG2 1002 3D5F 0E42 1003 ENCODE: MVI C,'B' 3D61 CD8F3E 1004 CALL PO 3D64 0608 1005 MVI B,BS 3D66 7E 1006 MOV A,M 1007 3D67 07 1008 EN0: RLC 3D68 F5 1009 PUSH PSW 3D69 3E00 1010 MVI A,0 3D6B 17 1011 RAL 3D6C 17 1012 RAL 3D6D C64E 1013 ADI 'N' 3D6F 4F 1014 MOV C,A 3D70 CD8F3E 1015 CALL PO 3D73 F1 1016 POP PSW 3D74 05 1017 DCR B 3D75 C2673D 1018 JNZ EN0 3D78 0E46 1019 MVI C,'F' 3D7A CD8F3E 1020 CALL PO 3D7D 0E20 1021 MVI C,' ' 3D7F C38F3E 1022 JMP PO 1023 3D82 210000 1024 EXPR: LXI H,J0000 1025 3D85 CD863F 1026 EX0: CALL TI 1027 3D88 47 1028 EX1: MOV B,A 3D89 CD283E 1029 CALL NIBBLE 3D8C DA983D 1030 JC EX2 3D8F 29 1031 DAD H 3D90 29 1032 DAD H 3D91 29 1033 DAD H 3D92 29 1034 DAD H 3D93 B5 1035 ORA L 3D94 6F 1036 MOV L,A 3D95 C3853D 1037 JMP EX0 1038 3D98 E3 1039 EX2: XTHL 3D99 E5 1040 PUSH H INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 20 LOC OBJ LINE SOURCE STATEMENT 3D9A 78 1041 MOV A,B 3D9B CD603E 1042 CALL P2C 3D9E D2A63D 1043 JNC EX3 3DA1 0D 1044 DCR C 3DA2 C2673C 1045 JNZ LER 3DA5 C9 1046 RET 1047 3DA6 C2673C 1048 EX3: JNZ LER 3DA9 0D 1049 DCR C 3DAA C2823D 1050 JNZ EXPR 3DAD C9 1051 RET 1052 3DAE 0E01 1053 EXF: MVI C,001H 3DB0 210000 1054 LXI H,J0000 3DB3 C3883D 1055 JMP EX1 1056 3DB6 23 1057 HILO: INX H 3DB7 7C 1058 MOV A,H 3DB8 B5 1059 ORA L 3DB9 37 1060 STC 3DBA C8 1061 RZ 3DBB 7B 1062 MOV A,E 3DBC 95 1063 SUB L 3DBD 7A 1064 MOV A,D 3DBE 9C 1065 SBB H 3DBF C9 1066 RET 1067 3DC0 CD003D 1068 HXD: CALL CONV 3DC3 C3793C 1069 JMP CO 1070 3DC6 3A0300 1071 IOCHK: LDA IOBYT 3DC9 C9 1072 RET 1073 3DCA E5 1074 IOSET: PUSH H 3DCB 210300 1075 LXI H,IOBYT 3DCE 71 1076 MOV M,C 3DCF E1 1077 POP H 3DD0 C9 1078 RET 1079 3DD1 7C 1080 LADR: MOV A,H 3DD2 CDD93D 1081 CALL LBYTE 3DD5 7D 1082 MOV A,L 3DD6 C3D93D 1083 JMP LBYTE 1084 3DD9 F5 1085 LBYTE: PUSH PSW 3DDA 0F 1086 RRC 3DDB 0F 1087 RRC 3DDC 0F 1088 RRC 3DDD 0F 1089 RRC 3DDE E60F 1090 ANI 00FH 3DE0 CDC03D 1091 CALL HXD 3DE3 F1 1092 POP PSW 3DE4 E60F 1093 ANI 00FH 3DE6 C3C03D 1094 JMP HXD 1095 INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 21 LOC OBJ LINE SOURCE STATEMENT 3DE9 063C 1096 LEAD: MVI B,'<' 1097 3DEB 0E00 1098 LE0: MVI C,0 3DED CD8F3E 1099 CALL PO 3DF0 05 1100 DCR B 3DF1 C2EB3D 1101 JNZ LE0 3DF4 C9 1102 RET 1103 3DF5 3A0300 1104 LO: LDA IOBYT 3DF8 E6C0 1105 ANI 0C0H 3DFA CA983C 1106 JZ TTYOUT 3DFD FE40 1107 CPI '@' 3DFF CAA93C 1108 JZ CHROUT 3E02 FE80 1109 CPI 080H 3E04 CA1230 1110 JZ J3012 3E07 C31530 1111 JMP J3015 1112 3E0A E5 1113 MEMCHK: PUSH H 3E0B CD133E 1114 CALL MEMSIZ 3E0E 44 1115 MOV B,H 3E0F 3EC0 1116 MVI A,0C0H 3E11 E1 1117 POP H 3E12 C9 1118 RET 1119 3E13 C5 1120 MEMSIZ: PUSH B 3E14 21FF00 1121 LXI H,A00FF 1122 3E17 25 1123 MEM0: DCR H 3E18 7E 1124 MOV A,M 3E19 2F 1125 CMA 3E1A 77 1126 MOV M,A 3E1B BE 1127 CMP M 3E1C 2F 1128 CMA 3E1D 77 1129 MOV M,A 3E1E C2173E 1130 JNZ MEM0 3E21 23 1131 INX H 3E22 01EEFF 1132 LXI B,AFFEE 3E25 09 1133 DAD B 3E26 C1 1134 POP B 3E27 C9 1135 RET 1136 3E28 D630 1137 NIBBLE: SUI '0' 3E2A D8 1138 RC 3E2B C6E9 1139 ADI 0E9H 3E2D D8 1140 RC 3E2E C606 1141 ADI 006H 3E30 F2363E 1142 JP NI0 3E33 C607 1143 ADI 007H 3E35 D8 1144 RC 1145 3E36 C60A 1146 NI0: ADI LF 3E38 B7 1147 ORA A 3E39 C9 1148 RET 1149 3E3A 7C 1150 PADR: MOV A,H INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 22 LOC OBJ LINE SOURCE STATEMENT 3E3B CD423E 1151 CALL PBYTE 3E3E 7D 1152 MOV A,L 3E3F C3423E 1153 JMP PBYTE 1154 3E42 F5 1155 PBYTE: PUSH PSW 3E43 0F 1156 RRC 3E44 0F 1157 RRC 3E45 0F 1158 RRC 3E46 0F 1159 RRC 3E47 E60F 1160 ANI 00FH 3E49 CD003D 1161 CALL CONV 3E4C CD8F3E 1162 CALL PO 3E4F F1 1163 POP PSW 3E50 F5 1164 PUSH PSW 3E51 E60F 1165 ANI 00FH 3E53 CD003D 1166 CALL CONV 3E56 CD8F3E 1167 CALL PO 3E59 F1 1168 POP PSW 3E5A 82 1169 ADD D 3E5B 57 1170 MOV D,A 3E5C C9 1171 RET 1172 3E5D CD863F 1173 PCHK: CALL TI 1174 3E60 FE20 1175 P2C: CPI ' ' 3E62 C8 1176 RZ 3E63 FE2C 1177 CPI ',' 3E65 C8 1178 RZ 3E66 FE0D 1179 CPI CR 3E68 37 1180 STC 3E69 3F 1181 CMC 3E6A C0 1182 RNZ 3E6B 37 1183 STC 3E6C C9 1184 RET 1185 3E6D 0E0D 1186 PEOL: MVI C,CR 3E6F CD8F3E 1187 CALL PO 3E72 0E0A 1188 MVI C,LF 3E74 C38F3E 1189 JMP PO 1190 3E77 7E 1191 PGRM: MOV A,M 3E78 2F 1192 CMA 3E79 D303 1193 OUT P0003 3E7B 3E80 1194 MVI A,080H 3E7D D301 1195 OUT TTYSC 3E7F 3E00 1196 MVI A,0 3E81 D301 1197 OUT TTYSC 3E83 C5 1198 PUSH B 3E84 0614 1199 MVI B,014H 1200 3E86 CD373D 1201 PG0: CALL DELAY 3E89 05 1202 DCR B 3E8A C2863E 1203 JNZ PG0 3E8D C1 1204 POP B 3E8E C9 1205 RET INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 23 LOC OBJ LINE SOURCE STATEMENT 1206 3E8F 3A0300 1207 PO: LDA IOBYT 3E92 E630 1208 ANI '0' 3E94 CA983C 1209 JZ TTYOUT 3E97 FE10 1210 CPI 010H 3E99 C2AF3E 1211 JNZ PO1 1212 3E9C DB01 1213 PO0: IN TTYSC 3E9E E640 1214 ANI '@' 3EA0 CA9C3E 1215 JZ PO0 3EA3 79 1216 MOV A,C 3EA4 D303 1217 OUT P0003 3EA6 3E0A 1218 MVI A,LF 3EA8 D301 1219 OUT TTYSC 3EAA 3E08 1220 MVI A,BS 3EAC D301 1221 OUT TTYSC 3EAE C9 1222 RET 1223 3EAF FE20 1224 PO1: CPI ' ' 3EB1 CA0C30 1225 JZ J300C 3EB4 C30F30 1226 JMP J300F 1227 3EB7 E5 1228 RI: PUSH H 3EB8 210300 1229 LXI H,IOBYT 3EBB 7E 1230 MOV A,M 3EBC E60C 1231 ANI 00CH 3EBE C2E43E 1232 JNZ RI3 3EC1 3E09 1233 MVI A,HT 3EC3 D301 1234 OUT TTYSC 1235 3EC5 3E08 1236 RI0: MVI A,BS 3EC7 D301 1237 OUT TTYSC 3EC9 26FF 1238 MVI H,0FFH 3ECB E601 1239 ANI 001H 3ECD CADE3E 1240 JZ RI2 3ED0 CD373D 1241 CALL DELAY 3ED3 CD373D 1242 CALL DELAY 3ED6 25 1243 DCR H 3ED7 C2C53E 1244 JNZ RI0 1245 3EDA AF 1246 RI1: XRA A 3EDB 37 1247 STC 3EDC E1 1248 POP H 3EDD C9 1249 RET 1250 3EDE DB00 1251 RI2: IN TTYIO 3EE0 2F 1252 CMA 3EE1 B7 1253 ORA A 3EE2 E1 1254 POP H 3EE3 C9 1255 RET 1256 3EE4 FE04 1257 RI3: CPI 004H 3EE6 C2093F 1258 JNZ RI6 3EE9 3E0C 1259 MVI A,00CH 3EEB D301 1260 OUT TTYSC INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 24 LOC OBJ LINE SOURCE STATEMENT 3EED 3E08 1261 MVI A,BS 3EEF D301 1262 OUT TTYSC 3EF1 26FA 1263 MVI H,0FAH 1264 3EF3 DB01 1265 RI4: IN TTYSC 3EF5 E620 1266 ANI ' ' 3EF7 C2043F 1267 JNZ RI5 3EFA CD373D 1268 CALL DELAY 3EFD 25 1269 DCR H 3EFE C2F33E 1270 JNZ RI4 3F01 C3DA3E 1271 JMP RI1 1272 3F04 DB03 1273 RI5: IN P0003 3F06 B7 1274 ORA A 3F07 E1 1275 POP H 3F08 C9 1276 RET 1277 3F09 E1 1278 RI6: POP H 3F0A FE08 1279 CPI BS 3F0C CA0630 1280 JZ J3006 3F0F C30930 1281 JMP J3009 1282 3F12 CDB73E 1283 RIX: CALL RI 3F15 DA673C 1284 JC LER 3F18 E67F 1285 ANI 07FH 3F1A C9 1286 RET 1287 1288 RESTART: 3F1B E5 1289 PUSH H 3F1C D5 1290 PUSH D 3F1D C5 1291 PUSH B 3F1E F5 1292 PUSH PSW 3F1F CD133E 1293 CALL MEMSIZ 3F22 EB 1294 XCHG 3F23 210A00 1295 LXI H,A000A 3F26 39 1296 DAD SP 3F27 0604 1297 MVI B,004H 3F29 EB 1298 XCHG 1299 3F2A 2B 1300 RST0: DCX H 3F2B 72 1301 MOV M,D 3F2C 2B 1302 DCX H 3F2D 73 1303 MOV M,E 3F2E D1 1304 POP D 3F2F 05 1305 DCR B 3F30 C22A3F 1306 JNZ RST0 3F33 C1 1307 POP B 3F34 0B 1308 DCX B 3F35 F9 1309 SPHL 3F36 211400 1310 LXI H,A0014 3F39 39 1311 DAD SP 3F3A 7E 1312 MOV A,M 3F3B 91 1313 SUB C 3F3C 23 1314 INX H 3F3D C2453F 1315 JNZ RST1 INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 25 LOC OBJ LINE SOURCE STATEMENT 3F40 7E 1316 MOV A,M 3F41 90 1317 SUB B 3F42 CA533F 1318 JZ RST3 1319 3F45 23 1320 RST1: INX H 3F46 23 1321 INX H 3F47 7E 1322 MOV A,M 3F48 91 1323 SUB C 3F49 C2523F 1324 JNZ RST2 3F4C 23 1325 INX H 3F4D 7E 1326 MOV A,M 3F4E 90 1327 SUB B 3F4F CA533F 1328 JZ RST3 1329 3F52 03 1330 RST2: INX B 1331 3F53 210F00 1332 RST3: LXI H,A000F 3F56 39 1333 DAD SP 3F57 73 1334 MOV M,E 3F58 23 1335 INX H 3F59 72 1336 MOV M,D 3F5A 23 1337 INX H 3F5B 23 1338 INX H 3F5C 71 1339 MOV M,C 3F5D 23 1340 INX H 3F5E 70 1341 MOV M,B 3F5F C5 1342 PUSH B 3F60 0E2A 1343 MVI C,'*' 3F62 CD793C 1344 CALL CO 3F65 E1 1345 POP H 3F66 CDD13D 1346 CALL LADR 3F69 211400 1347 LXI H,A0014 3F6C 39 1348 DAD SP 3F6D 1602 1349 MVI D,002H 1350 3F6F 4E 1351 RST4: MOV C,M 3F70 3600 1352 MVI M,0 3F72 23 1353 INX H 3F73 46 1354 MOV B,M 3F74 3600 1355 MVI M,0 3F76 23 1356 INX H 3F77 79 1357 MOV A,C 3F78 B0 1358 ORA B 3F79 CA7E3F 1359 JZ RST5 3F7C 7E 1360 MOV A,M 3F7D 02 1361 STAX B 1362 3F7E 23 1363 RST5: INX H 3F7F 15 1364 DCR D 3F80 C26F3F 1365 JNZ RST4 3F83 C39838 1366 JMP START 1367 3F86 CDD43C 1368 TI: CALL CI 3F89 E67F 1369 ANI 07FH 3F8B C5 1370 PUSH B INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 26 LOC OBJ LINE SOURCE STATEMENT 3F8C 4F 1371 MOV C,A 3F8D CD793C 1372 CALL CO 3F90 79 1373 MOV A,C 3F91 C1 1374 POP B 3F92 C9 1375 RET 1376 3F93 43 1377 LTBL: DB 'C' ;3F93- 3F94 FC 1378 DB 0FCH ;3F94-0FCH 3F95 A33F 1379 DW ACT 1380 3F97 52 1381 DB 'R' ;3F97- 3F98 F3 1382 DB 0F3H ;3F98-0F3H 3F99 AB3F 1383 DW ART 1384 3F9B 50 1385 DB 'P' ;3F9B- 3F9C CF 1386 DB 0CFH ;3F9C-0CFH 3F9D B33F 1387 DW APT 1388 3F9F 4C 1389 DB 'L' ;3F9F- 3FA0 3F 1390 DB 03FH ;3FA0-'?' 3FA1 BB3F 1391 DW ALT 1392 3FA3 54 1393 ACT: DB 'T' ;3FA3- 3FA4 00 1394 DB 000H ;3FA4-000H 3FA5 43 1395 DB 'C' ;3FA5- 3FA6 01 1396 DB 001H ;3FA6-001H 3FA7 42 1397 DB 'B' ;3FA7- 3FA8 02 1398 DB 002H ;3FA8-002H 3FA9 31 1399 DB '1' ;3FA9- 3FAA 03 1400 DB 003H ;3FAA-003H 3FAB 54 1401 ART: DB 'T' ;3FAB- 3FAC 00 1402 DB 000H ;3FAC-000H 3FAD 50 1403 DB 'P' ;3FAD- 3FAE 04 1404 DB 004H ;3FAE-004H 3FAF 31 1405 DB '1' ;3FAF- 3FB0 08 1406 DB 008H ;3FB0-008H 3FB1 32 1407 DB '2' ;3FB1- 3FB2 0C 1408 DB 00CH ;3FB2-00CH 3FB3 54 1409 APT: DB 'T' ;3FB3- 3FB4 00 1410 DB 000H ;3FB4-000H 3FB5 50 1411 DB 'P' ;3FB5- 3FB6 10 1412 DB 010H ;3FB6-010H 3FB7 31 1413 DB '1' ;3FB7- 3FB8 20 1414 DB 020H ;3FB8-' ' 3FB9 32 1415 DB '2' ;3FB9- 3FBA 30 1416 DB 030H ;3FBA-'0' 3FBB 54 1417 ALT: DB 'T' ;3FBB- 3FBC 00 1418 DB 000H ;3FBC-000H 3FBD 43 1419 DB 'C' ;3FBD- 3FBE 40 1420 DB 040H ;3FBE-'@' 3FBF 31 1421 DB '1' ;3FBF- 3FC0 80 1422 DB 080H ;3FC0-080H 3FC1 32 1423 DB '2' ;3FC1- 3FC2 C0 1424 DB 0C0H ;3FC2-0C0H 3FC3 D1 1425 EXIT: POP D INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 27 LOC OBJ LINE SOURCE STATEMENT 3FC4 C1 1426 POP B 3FC5 F1 1427 POP PSW 3FC6 E1 1428 POP H 3FC7 F9 1429 SPHL 3FC8 FB 1430 EI 3FC9 210000 1431 LXI H,J0000 3FCC C30000 1432 JMP J0000 3FCF 00 1433 NOP 3FD0 00 1434 NOP 3FD1 00 1435 NOP 3FD2 00 1436 NOP 3FD3 00 1437 NOP 3FD4 00 1438 NOP 1439 3FD5 41 1440 ACTBL: DB 'A' ;3FD5- 3FD6 05 1441 DB 005H ;3FD6-005H 3FD7 01 1442 DB 001H ;3FD7-001H 3FD8 42 1443 DB 'B' ;3FD8- 3FD9 03 1444 DB 003H ;3FD9-003H 3FDA 01 1445 DB 001H ;3FDA-001H 3FDB 43 1446 DB 'C' ;3FDB- 3FDC 02 1447 DB 002H ;3FDC-002H 3FDD 01 1448 DB 001H ;3FDD-001H 3FDE 44 1449 DB 'D' ;3FDE- 3FDF 01 1450 DB 001H ;3FDF-001H 3FE0 01 1451 DB 001H ;3FE0-001H 3FE1 45 1452 DB 'E' ;3FE1- 3FE2 00 1453 DB 000H ;3FE2-000H 3FE3 01 1454 DB 001H ;3FE3-001H 3FE4 46 1455 DB 'F' ;3FE4- 3FE5 04 1456 DB 004H ;3FE5-004H 3FE6 01 1457 DB 001H ;3FE6-001H 3FE7 48 1458 DB 'H' ;3FE7- 3FE8 10 1459 DB 010H ;3FE8-010H 3FE9 01 1460 DB 001H ;3FE9-001H 3FEA 4C 1461 DB 'L' ;3FEA- 3FEB 0F 1462 DB 00FH ;3FEB-00FH 3FEC 01 1463 DB 001H ;3FEC-001H 3FED 4D 1464 DB 'M' ;3FED- 3FEE 10 1465 DB 010H ;3FEE-010H 3FEF 02 1466 DB 002H ;3FEF-002H 3FF0 50 1467 DB 'P' ;3FF0- 3FF1 13 1468 DB 013H ;3FF1-013H 3FF2 02 1469 DB 002H ;3FF2-002H 3FF3 53 1470 DB 'S' ;3FF3- 3FF4 07 1471 DB 007H ;3FF4-007H 3FF5 02 1472 DB 002H ;3FF5-002H 3FF6 FF 1473 DB 0FFH ;3FF6-0FFH 3FF7 7B 1474 DB 07BH, 038H, 000H, 000H, 000H, 000H, 000H, 000H ;3FF7-'{' '8' 000H 000H 000H 000H 000H 000H 3FF8 38 3FF9 00 3FFA 00 3FFB 00 3FFC 00 INTEL ASM80 V4.1 MODULE [2024-12-14 19:58] PAGE 28 LOC OBJ LINE SOURCE STATEMENT 3FFD 00 3FFE 00 3FFF 00 1475 DB 000H ;3FFF-000H 1476 END PUBLIC SYMBOLS EXTERNAL SYMBOLS USER SYMBOLS A0008 A 0008 A0009 A 0009 A000A A 000A A000F A 000F A0013 A 0013 A0014 A 0014 A0064 A 0064 A00FF A 00FF A0100 A 0100 A03E8 A 03E8 A2710 A 2710 ACT A 3FA3 ACTBL A 3FD5 AFFEE A FFEE AFFF8 A FFF8 ALT A 3FBB APT A 3FB3 ART A 3FAB AS0 A 38F7 AS1 A 3906 AS2 A 390C AS3 A 3914 AS4 A 391E AS5 A 392B ASSIGN A 38EF BEGIN A 3856 BG0 A 385D BG1 A 386D BLK A 3C77 BN0 A 3949 BN1 A 3975 BNPF A 393E BS A 0008 BYTE A 3CBD C302A A 302A CHROUT A 3CA9 CI A 3CD4 CI0 A 3CE5 CI1 A 3CE7 CI2 A 3CF8 CM0 A 398E CM1 A 39B5 CO A 3C79 CO0 A 3CA4 CO1 A 3CB5 COMP A 3987 CONV A 3D00 CR A 000D CRLF A 3D08 CRTIN A 3CEC CRTIO A 0004 CRTSC A 0005 CS0 A 3D1F CS1 A 3D26 CS2 A 3D2A CS3 A 3D2D CSTS A 3D12 DELAY A 3D37 DG0 A 3D42 DG1 A 3D4F DG2 A 3D57 DG3 A 3D5A DI0 A 39C2 DI1 A 39C8 DIGIT A 3D40 DISP A 39BD DL0 A 3D3A EN0 A 3D67 ENCODE A 3D5F EOF A 39DE EX0 A 3D85 EX1 A 3D88 EX2 A 3D98 EX3 A 3DA6 EXF A 3DAE EXIT A 3FC3 EXPR A 3D82 FI0 A 3A07 FILL A 3A00 GO0 A 3A2B GO1 A 3A31 GO2 A 3A49 GO3 A 3A53 GOTO A 3A11 HEXN A 3A5B HILO A 3DB6 HT A 0009 HXD A 3DC0 IOBYT A 0003 IOCHK A 3DC6 IOSET A 3DCA J0000 A 0000 J2C8D A 3C8D J3000 A 3000 J3003 A 3003 J3006 A 3006 J3009 A 3009 J300C A 300C J300F A 300F J3012 A 3012 J3015 A 3015 J3018 A 3018 J3C81 A 3C81 LADR A 3DD1 LBYTE A 3DD9 LE0 A 3DEB LEAD A 3DE9 LER A 3C67 LF A 000A LO A 3DF5 LO0 A 3A83 LOAD A 3A78 LTBL A 3F93 MEM0 A 3E17 MEMCHK A 3E0A MEMSIZ A 3E13 MOVE A 3A8A MV0 A 3A96 NI0 A 3E36 NIBBLE A 3E28 NULL A 3A9C P0002 A 0002 P0003 A 0003 P00FF A 00FF P2C A 3E60 PADR A 3E3A PBYTE A 3E42 PCHK A 3E5D PEOL A 3E6D PG0 A 3E86 PGRM A 3E77 PO A 3E8F PO0 A 3E9C PO1 A 3EAF PR0 A 3AB9 PR1 A 3AD8 PR2 A 3ADE PR3 A 3AE5 PROG A 3AA6 READ A 3AEF RED0 A 3AF3 RED1 A 3B13 RED2 A 3B25 RED3 A 3B32 RESTART A 3F1B RI A 3EB7 RI0 A 3EC5 RI1 A 3EDA RI2 A 3EDE RI3 A 3EE4 RI4 A 3EF3 RI5 A 3F04 RI6 A 3F09 RIX A 3F12 RST0 A 3F2A RST1 A 3F45 RST2 A 3F52 RST3 A 3F53 RST4 A 3F6F RST5 A 3F7E START A 3898 SU0 A 3B41 SU1 A 3B60 SUBS A 3B36 T301B A 301B T301E A 301E T3021 A 3021 T3024 A 3024 T3027 A 3027 T302D A 302D T3030 A 3030 T3EFB A 3EFB TBL A 38BF TI A 3F86 TR0 A 3B6B TRAN A 3B64 TTYIN A 3CDC TTYIO A 0000 TTYOUT A 3C98 TTYSC A 0001 VER0 A 388F VERS A 384B WRI0 A 3B8A WRI1 A 3B9F WRI2 A 3BA2 WRI3 A 3BBD WRITE A 3B82 X A 3BCF X0 A 3BDA X1 A 3BEB X2 A 3BEE X3 A 3C06 X4 A 3C28 X5 A 3C2A X6 A 3C38 X7 A 3C3B ASSEMBLY COMPLETE, NO ERRORS