; ; Disassembled by: ; DASMx object code disassembler ; (c) Copyright 1996-2003 Conquest Consultants ; Version 1.40 (Oct 18 2003) ; ; File: keyt440.bin ; ; Size: 1024 bytes ; Checksum: 1BB0 ; CRC-32: 611103B5 ; ; Date: Fri Jun 12 18:25:04 2020 ; ; CPU: Intel 8048 (MCS-48 family) ; ; ; org 00000H ; 0000 : 27 "'" clr a 0001 : 04 44 " D" jmp L0044 ; 0003 L0003: 0003 : 00 " " nop 0004 L0004: 0004 : 24 00 "$ " jmp L0100 ; 0006 : 00 " " nop 0007 : D5 " " sel rb1 0008 : AA " " mov r2,a 0009 : 23 A0 "# " mov a,#0A0H 000B : 62 "b" mov t,a 000C : FC " " mov a,r4 000D : D3 55 " U" xrl a,#055H 000F : 96 33 " 3" jnz L0033 0011 : BC AA " " mov r4,#0AAH 0013 : 27 "'" clr a 0014 L0014: 0014 : 46 2B "F+" jnt1 L002B 0016 : 07 " " dec a 0017 : 96 14 " " jnz L0014 0019 : 65 "e" stop tcnt 001A L001A: 001A : 56 1A "V " jt1 L001A 001C : 23 AA "# " mov a,#0AAH 001E : 34 EC "4 " call L01EC 0020 : 55 "U" strt t 0021 : C5 " " sel rb0 0022 : FD " " mov a,r5 0023 : 53 E7 "S " anl a,#0E7H 0025 : 43 01 "C " orl a,#001H 0027 : 04 2F " /" jmp L002F ; 0029 L0029: 0029 : FA " " mov a,r2 002A : 93 " " retr ; 002B L002B: 002B : C5 " " sel rb0 002C : FD " " mov a,r5 002D : 53 FE "S " anl a,#0FEH 002F L002F: 002F : AD " " mov r5,a 0030 : D5 " " sel rb1 0031 : 04 29 " )" jmp L0029 ; 0033 L0033: 0033 : 35 "5" dis tcnti 0034 : 15 " " dis i 0035 : 89 FF " " orl p1,#0FFH 0037 : 8A FF " " orl p2,#0FFH 0039 : 80 " " movx a,@r0 003A : 27 "'" clr a 003B : D7 " " mov psw,a 003C : A5 " " clr f1 003D : 16 3F " ?" jtf L003F 003F L003F: 003F : 14 43 " C" call L0043 0041 : 04 44 " D" jmp L0044 0043 L0043: 0043 : 93 " " retr ; 0044 L0044: 0044 : B8 3F " ?" mov r0,#03FH 0046 L0046: 0046 : A0 " " mov @r0,a 0047 : E8 46 " F" djnz r0,L0046 0049 : B9 10 " " mov r1,#010H 004B : B8 1F " " mov r0,#01FH 004D : 23 A0 "# " mov a,#0A0H 004F : 62 "b" mov t,a 0050 : 55 "U" strt t 0051 : 25 "%" en tcnti 0052 : D5 " " sel rb1 0053 : BD F0 " " mov r5,#0F0H 0055 : BE 3F " ?" mov r6,#03FH 0057 : BF 3F " ?" mov r7,#03FH 0059 : C5 " " sel rb0 005A L005A: 005A : 18 " " inc r0 005B L005B: 005B : 25 "%" en tcnti 005C : D5 " " sel rb1 005D : BC 55 " U" mov r4,#055H 005F : C5 " " sel rb0 0060 : 23 D4 "# " mov a,#0D4H 0062 : 68 "h" add a,r0 0063 : F6 04 " " jc L0004 0065 : 34 E3 "4 " call L01E3 0067 : C6 5A " Z" jz L005A 0069 : AB " " mov r3,a 006A : BA 28 " (" mov r2,#028H 006C L006C: 006C : EA 6C " l" djnz r2,L006C 006E : 3C "<" movd p4,a 006F : 34 E3 "4 " call L01E3 0071 : 99 FE " " anl p1,#0FEH 0073 : 3C "<" movd p4,a 0074 : 5B "[" anl a,r3 0075 : C6 5A " Z" jz L005A 0077 : AB " " mov r3,a 0078 : BA 01 " " mov r2,#001H 007A : F8 " " mov a,r0 007B : 47 "G" swap a 007C : 77 "w" rr a 007D : 53 78 "Sx" anl a,#078H 007F : AF " " mov r7,a 0080 : FA " " mov a,r2 0081 L0081: 0081 : 5B "[" anl a,r3 0082 : 96 8E " " jnz L008E 0084 L0084: 0084 : C5 " " sel rb0 0085 : FB " " mov a,r3 0086 : C6 5A " Z" jz L005A 0088 : FA " " mov a,r2 0089 : E7 " " rl a 008A : AA " " mov r2,a 008B : 1F " " inc r7 008C : 04 81 " " jmp L0081 ; 008E L008E: 008E : D5 " " sel rb1 008F : FE " " mov a,r6 0090 : C5 " " sel rb0 0091 : C6 04 " " jz L0004 0093 : FA " " mov a,r2 0094 : 37 "7" cpl a 0095 : 5B "[" anl a,r3 0096 : AB " " mov r3,a 0097 : FA " " mov a,r2 0098 : 50 "P" anl a,@r0 0099 : 96 D1 " " jnz L00D1 009B : FA " " mov a,r2 009C : D0 " " xrl a,@r0 009D : A0 " " mov @r0,a 009E : FF " " mov a,r7 009F : A1 " " mov @r1,a 00A0 : F9 " " mov a,r1 00A1 : 17 " " inc a 00A2 : 53 17 "S " anl a,#017H 00A4 : A9 " " mov r1,a 00A5 : F0 " " mov a,@r0 00A6 : 72 BA "r " jb3 L00BA 00A8 : FF " " mov a,r7 00A9 : D3 04 " " xrl a,#004H 00AB : 96 B1 " " jnz L00B1 00AD : FD " " mov a,r5 00AE : D3 10 " " xrl a,#010H 00B0 : AD " " mov r5,a 00B1 L00B1: 00B1 : FF " " mov a,r7 00B2 : D3 00 " " xrl a,#000H 00B4 : 96 BA " " jnz L00BA 00B6 : FD " " mov a,r5 00B7 : D3 08 " " xrl a,#008H 00B9 : AD " " mov r5,a 00BA L00BA: 00BA : FF " " mov a,r7 00BB : AC " " mov r4,a 00BC : 76 CB "v " jf1 L00CB 00BE : E3 " " movp3 a,@a 00BF L00BF: 00BF : 34 EC "4 " call L01EC 00C1 : D5 " " sel rb1 00C2 : FD " " mov a,r5 00C3 : 32 C7 "2 " jb1 L00C7 00C5 : 04 84 " " jmp L0084 ; 00C7 L00C7: 00C7 : BB 32 " 2" mov r3,#032H 00C9 : 04 84 " " jmp L0084 ; 00CB L00CB: 00CB : 39 "9" outl p1,a 00CC : 9A FE " " anl p2,#0FEH 00CE : 80 " " movx a,@r0 00CF : 04 BF " " jmp L00BF ; 00D1 L00D1: 00D1 : F9 " " mov a,r1 00D2 : AE " " mov r6,a 00D3 L00D3: 00D3 : FF " " mov a,r7 00D4 : D1 " " xrl a,@r1 00D5 : 96 DB " " jnz L00DB 00D7 : FE " " mov a,r6 00D8 : A9 " " mov r1,a 00D9 : 04 84 " " jmp L0084 ; 00DB L00DB: 00DB : F9 " " mov a,r1 00DC : 17 " " inc a 00DD : 53 17 "S " anl a,#017H 00DF : A9 " " mov r1,a 00E0 : DE " " xrl a,r6 00E1 : 96 D3 " " jnz L00D3 00E3 : FA " " mov a,r2 00E4 : D0 " " xrl a,@r0 00E5 : A0 " " mov @r0,a 00E6 : FF " " mov a,r7 00E7 : DC " " xrl a,r4 00E8 : 96 EF " " jnz L00EF 00EA : D5 " " sel rb1 00EB : AB " " mov r3,a 00EC : C5 " " sel rb0 00ED : 37 "7" cpl a 00EE : AC " " mov r4,a 00EF L00EF: 00EF : FF " " mov a,r7 00F0 : 76 F9 "v " jf1 L00F9 00F2 : E3 " " movp3 a,@a 00F3 : 43 80 "C " orl a,#080H 00F5 L00F5: 00F5 : 34 EC "4 " call L01EC 00F7 : 04 84 " " jmp L0084 ; 00F9 L00F9: 00F9 : 39 "9" outl p1,a 00FA : 8A 01 " " orl p2,#001H 00FC : 80 " " movx a,@r0 00FD : 04 F5 " " jmp L00F5 ; 00FF : 00 " " nop 0100 L0100: 0100 : 16 3A " :" jtf L013A 0102 : 00 " " nop 0103 : 00 " " nop 0104 L0104: 0104 : D5 " " sel rb1 0105 : FD " " mov a,r5 0106 : 43 0F "C " orl a,#00FH 0108 : 3A ":" outl p2,a 0109 : 0A " " in a,p2 010A : 43 C0 "C " orl a,#0C0H 010C : AD " " mov r5,a 010D : C5 " " sel rb0 010E : 97 " " clr c 010F : FD " " mov a,r5 0110 : 72 16 "r " jb3 L0116 0112 : 8A 40 " @" orl p2,#040H 0114 : 24 1E "$ " jmp L011E ; 0116 L0116: 0116 : 9A BF " " anl p2,#0BFH 0118 : D5 " " sel rb1 0119 : FD " " mov a,r5 011A L011A: 011A : 53 BF "S " anl a,#0BFH 011C : AD " " mov r5,a 011D : C5 " " sel rb0 011E L011E: 011E : FD " " mov a,r5 011F : 92 25 " %" jb4 L0125 0121 : 8A 80 " " orl p2,#080H 0123 L0123: 0123 : 24 2C "$," jmp L012C ; 0125 L0125: 0125 : 9A 7F " " anl p2,#07FH 0127 : D5 " " sel rb1 0128 : FD " " mov a,r5 0129 : 53 7F "S " anl a,#07FH 012B : AD " " mov r5,a 012C L012C: 012C : D5 " " sel rb1 012D : FD " " mov a,r5 012E : 3A ":" outl p2,a 012F : A5 " " clr f1 0130 : C5 " " sel rb0 0131 : B8 20 " " mov r0,#020H 0133 : 52 37 "R7" jb2 L0137 0135 : 04 5B " [" jmp L005B ; 0137 L0137: 0137 : B5 " " cpl f1 0138 : 04 5B " [" jmp L005B ; 013A L013A: 013A : D5 " " sel rb1 013B : FB " " mov a,r3 013C : C6 52 " R" jz L0152 013E : EB 52 " R" djnz r3,L0152 0140 : BB 08 " " mov r3,#008H 0142 : C5 " " sel rb0 0143 : FC " " mov a,r4 0144 : D5 " " sel rb1 0145 : 76 4C "vL" jf1 L014C 0147 : E3 " " movp3 a,@a 0148 L0148: 0148 : 34 EC "4 " call L01EC 014A : 24 52 "$R" jmp L0152 ; 014C L014C: 014C : 39 "9" outl p1,a 014D : 9A FE " " anl p2,#0FEH 014F : 80 " " movx a,@r0 0150 : 24 48 "$H" jmp L0148 ; 0152 L0152: 0152 : C5 " " sel rb0 0153 : B1 FF " " mov @r1,#0FFH 0155 : F9 " " mov a,r1 0156 : 17 " " inc a 0157 : 53 17 "S " anl a,#017H 0159 : A9 " " mov r1,a 015A : D5 " " sel rb1 015B : FF " " mov a,r7 015C : DE " " xrl a,r6 015D : C6 04 " " jz L0104 015F : FE " " mov a,r6 0160 : 96 64 " d" jnz L0164 0162 : FF " " mov a,r7 0163 : AE " " mov r6,a 0164 L0164: 0164 : FF " " mov a,r7 0165 : A9 " " mov r1,a 0166 : 07 " " dec a 0167 : 43 30 "C0" orl a,#030H 0169 : AF " " mov r7,a 016A : 65 "e" stop tcnt 016B : 9A DF " " anl p2,#0DFH 016D : FD " " mov a,r5 016E : 53 EF "S " anl a,#0EFH 0170 : AD " " mov r5,a 0171 : F1 " " mov a,@r1 0172 : 47 "G" swap a 0173 : A1 " " mov @r1,a 0174 : 53 10 "S " anl a,#010H 0176 : 4D "M" orl a,r5 0177 : 3A ":" outl p2,a 0178 : F1 " " mov a,@r1 0179 : 9A DF " " anl p2,#0DFH 017B : 77 "w" rr a 017C : A1 " " mov @r1,a 017D : 53 10 "S " anl a,#010H 017F : 4D "M" orl a,r5 0180 : 3A ":" outl p2,a 0181 : F1 " " mov a,@r1 0182 : 9A DF " " anl p2,#0DFH 0184 : 77 "w" rr a 0185 : A1 " " mov @r1,a 0186 : 53 10 "S " anl a,#010H 0188 : 4D "M" orl a,r5 0189 : 3A ":" outl p2,a 018A : F1 " " mov a,@r1 018B : 9A DF " " anl p2,#0DFH 018D : 77 "w" rr a 018E : A1 " " mov @r1,a 018F : 53 10 "S " anl a,#010H 0191 : 4D "M" orl a,r5 0192 : 3A ":" outl p2,a 0193 : F1 " " mov a,@r1 0194 : 9A DF " " anl p2,#0DFH 0196 : 77 "w" rr a 0197 : A1 " " mov @r1,a 0198 : 53 10 "S " anl a,#010H 019A : 4D "M" orl a,r5 019B : 3A ":" outl p2,a 019C : F1 " " mov a,@r1 019D : 9A DF " " anl p2,#0DFH 019F : 77 "w" rr a 01A0 : A1 " " mov @r1,a 01A1 : 53 10 "S " anl a,#010H 01A3 : 4D "M" orl a,r5 01A4 : 3A ":" outl p2,a 01A5 : F1 " " mov a,@r1 01A6 : 9A DF " " anl p2,#0DFH 01A8 : 77 "w" rr a 01A9 : A1 " " mov @r1,a 01AA : 53 10 "S " anl a,#010H 01AC : 4D "M" orl a,r5 01AD : 3A ":" outl p2,a 01AE : F1 " " mov a,@r1 01AF : 9A DF " " anl p2,#0DFH 01B1 : 77 "w" rr a 01B2 : A1 " " mov @r1,a 01B3 : 53 10 "S " anl a,#010H 01B5 : 4D "M" orl a,r5 01B6 : 3A ":" outl p2,a 01B7 : F1 " " mov a,@r1 01B8 : 9A DF " " anl p2,#0DFH 01BA : 77 "w" rr a 01BB : 47 "G" swap a 01BC : A1 " " mov @r1,a 01BD : 23 30 "#0" mov a,#030H 01BF : 8A 30 " 0" orl p2,#030H 01C1 : 4D "M" orl a,r5 01C2 : AD " " mov r5,a 01C3 : C5 " " sel rb0 01C4 : FD " " mov a,r5 01C5 : 12 CA " " jb0 L01CA 01C7 L01C7: 01C7 : 55 "U" strt t 01C8 : 24 04 "$ " jmp L0104 ; 01CA L01CA: 01CA : 00 " " nop 01CB : 86 DC " " jni L01DC 01CD : 32 D4 "2 " jb1 L01D4 01CF : 43 02 "C " orl a,#002H 01D1 : AD " " mov r5,a 01D2 : 24 C7 "$ " jmp L01C7 ; 01D4 L01D4: 01D4 : D5 " " sel rb1 01D5 : B8 04 " " mov r0,#004H 01D7 L01D7: 01D7 : E8 D7 " " djnz r0,L01D7 01D9 : 9A DF " " anl p2,#0DFH 01DB : C5 " " sel rb0 01DC L01DC: 01DC : 53 FD "S " anl a,#0FDH 01DE : 8A 20 " " orl p2,#020H 01E0 : AD " " mov r5,a 01E1 : 24 C7 "$ " jmp L01C7 ; 01E3 L01E3: 01E3 : F8 " " mov a,r0 01E4 : 39 "9" outl p1,a 01E5 : 3C "<" movd p4,a 01E6 : 89 FF " " orl p1,#0FFH 01E8 : 09 " " in a,p1 01E9 : 37 "7" cpl a 01EA : D0 " " xrl a,@r0 01EB : 93 " " retr ; 01EC L01EC: 01EC : D5 " " sel rb1 01ED : 2E "." xch a,r6 01EE : C6 FA " " jz L01FA 01F0 : A9 " " mov r1,a 01F1 : 07 " " dec a 01F2 : 43 30 "C0" orl a,#030H 01F4 : 2E "." xch a,r6 01F5 : A1 " " mov @r1,a 01F6 : FE " " mov a,r6 01F7 : DF " " xrl a,r7 01F8 : 96 FB " " jnz L01FB 01FA L01FA: 01FA : AE " " mov r6,a 01FB L01FB: 01FB : 93 " " retr ; 01FC : 00 " " nop 01FD : 00 " " nop 01FE : 04 33 " 3" jmp L0033 ; 0200 : 00 " " nop 0201 : 00 " " nop 0202 : 00 " " nop 0203 : 00 " " nop 0204 : 00 " " nop 0205 : 00 " " nop 0206 : 00 " " nop 0207 : 00 " " nop 0208 : 00 " " nop 0209 : 00 " " nop 020A : 00 " " nop 020B : 00 " " nop 020C : 00 " " nop 020D : 00 " " nop 020E : 00 " " nop 020F : 00 " " nop 0210 : 00 " " nop 0211 : 00 " " nop 0212 : 00 " " nop 0213 : 00 " " nop 0214 : 00 " " nop 0215 : 00 " " nop 0216 : 00 " " nop 0217 : 00 " " nop 0218 : 00 " " nop 0219 : 00 " " nop 021A : 00 " " nop 021B : 00 " " nop 021C : 00 " " nop 021D : 00 " " nop 021E : 00 " " nop 021F : 00 " " nop 0220 : 00 " " nop 0221 : 00 " " nop 0222 : 00 " " nop 0223 : 00 " " nop 0224 : 00 " " nop 0225 : 00 " " nop 0226 : 00 " " nop 0227 : 00 " " nop 0228 : 00 " " nop 0229 : 00 " " nop 022A : 00 " " nop 022B : 00 " " nop 022C : 00 " " nop 022D : 00 " " nop 022E : 00 " " nop 022F : 00 " " nop 0230 : 00 " " nop 0231 : 00 " " nop 0232 : 00 " " nop 0233 : 00 " " nop 0234 : 00 " " nop 0235 : 00 " " nop 0236 : 00 " " nop 0237 : 00 " " nop 0238 : 00 " " nop 0239 : 00 " " nop 023A : 00 " " nop 023B : 00 " " nop 023C : 00 " " nop 023D : 00 " " nop 023E : 00 " " nop 023F : 00 " " nop 0240 : 00 " " nop 0241 : 00 " " nop 0242 : 00 " " nop 0243 : 00 " " nop 0244 : 00 " " nop 0245 : 00 " " nop 0246 : 00 " " nop 0247 : 00 " " nop 0248 : 00 " " nop 0249 : 00 " " nop 024A : 00 " " nop 024B : 00 " " nop 024C : 00 " " nop 024D : 00 " " nop 024E : 00 " " nop 024F : 00 " " nop 0250 : 00 " " nop 0251 : 00 " " nop 0252 : 00 " " nop 0253 : 00 " " nop 0254 : 00 " " nop 0255 : 00 " " nop 0256 : 00 " " nop 0257 : 00 " " nop 0258 : 00 " " nop 0259 : 00 " " nop 025A : 00 " " nop 025B : 00 " " nop 025C : 00 " " nop 025D : 00 " " nop 025E : 00 " " nop 025F : 00 " " nop 0260 : 00 " " nop 0261 : 00 " " nop 0262 : 00 " " nop 0263 : 00 " " nop 0264 : 00 " " nop 0265 : 00 " " nop 0266 : 00 " " nop 0267 : 00 " " nop 0268 : 00 " " nop 0269 : 00 " " nop 026A : 00 " " nop 026B : 00 " " nop 026C : 00 " " nop 026D : 00 " " nop 026E : 00 " " nop 026F : 00 " " nop 0270 : 00 " " nop 0271 : 00 " " nop 0272 : 00 " " nop 0273 : 00 " " nop 0274 : 00 " " nop 0275 : 00 " " nop 0276 : 00 " " nop 0277 : 00 " " nop 0278 : 00 " " nop 0279 : 00 " " nop 027A : 00 " " nop 027B : 00 " " nop 027C : 00 " " nop 027D : 00 " " nop 027E : 00 " " nop 027F : 00 " " nop 0280 : 00 " " nop 0281 : 00 " " nop 0282 : 00 " " nop 0283 : 00 " " nop 0284 : 04 33 " 3" jmp L0033 0286 : 04 33 " 3" jmp L0033 ; 0288 : 00 " " nop 0289 : 00 " " nop 028A : 00 " " nop 028B : 00 " " nop 028C : 00 " " nop 028D : 00 " " nop 028E : 00 " " nop 028F : 00 " " nop 0290 : 00 " " nop 0291 : 00 " " nop 0292 : 00 " " nop 0293 : 00 " " nop 0294 : 00 " " nop 0295 : 00 " " nop 0296 : 00 " " nop 0297 : 00 " " nop 0298 : 00 " " nop 0299 : 00 " " nop 029A : 00 " " nop 029B : 00 " " nop 029C : 00 " " nop 029D : 00 " " nop 029E : 00 " " nop 029F : 00 " " nop 02A0 : 00 " " nop 02A1 : 00 " " nop 02A2 : 00 " " nop 02A3 : 00 " " nop 02A4 : 00 " " nop 02A5 : 00 " " nop 02A6 : 00 " " nop 02A7 : 00 " " nop 02A8 : 00 " " nop 02A9 : 00 " " nop 02AA : 00 " " nop 02AB : 00 " " nop 02AC : 00 " " nop 02AD : 00 " " nop 02AE : 00 " " nop 02AF : 00 " " nop 02B0 : 00 " " nop 02B1 : 00 " " nop 02B2 : 00 " " nop 02B3 : 00 " " nop 02B4 : 00 " " nop 02B5 : 00 " " nop 02B6 : 00 " " nop 02B7 : 00 " " nop 02B8 : 00 " " nop 02B9 : 00 " " nop 02BA : 00 " " nop 02BB : 00 " " nop 02BC : 00 " " nop 02BD : 00 " " nop 02BE : 00 " " nop 02BF : 00 " " nop 02C0 : 00 " " nop 02C1 : 00 " " nop 02C2 : 00 " " nop 02C3 : 00 " " nop 02C4 : 00 " " nop 02C5 : 00 " " nop 02C6 : 00 " " nop 02C7 : 00 " " nop 02C8 : 00 " " nop 02C9 : 00 " " nop 02CA : 00 " " nop 02CB : 00 " " nop 02CC : 00 " " nop 02CD : 00 " " nop 02CE : 00 " " nop 02CF : 00 " " nop 02D0 : 00 " " nop 02D1 : 00 " " nop 02D2 : 00 " " nop 02D3 : 00 " " nop 02D4 : 00 " " nop 02D5 : 00 " " nop 02D6 : 00 " " nop 02D7 : 00 " " nop 02D8 : 00 " " nop 02D9 : 00 " " nop 02DA : 00 " " nop 02DB : 00 " " nop 02DC : 00 " " nop 02DD : 00 " " nop 02DE : 00 " " nop 02DF : 00 " " nop 02E0 : 00 " " nop 02E1 : 00 " " nop 02E2 : 00 " " nop 02E3 : 00 " " nop 02E4 : 00 " " nop 02E5 : 00 " " nop 02E6 : 00 " " nop 02E7 : 00 " " nop 02E8 : 00 " " nop 02E9 : 00 " " nop 02EA : 00 " " nop 02EB : 00 " " nop 02EC : 00 " " nop 02ED : 00 " " nop 02EE : 00 " " nop 02EF : 00 " " nop 02F0 : 00 " " nop 02F1 : 00 " " nop 02F2 : 00 " " nop 02F3 : 00 " " nop 02F4 : 00 " " nop 02F5 : 00 " " nop 02F6 : 00 " " nop 02F7 : 00 " " nop 02F8 : 00 " " nop 02F9 : 00 " " nop 02FA : 00 " " nop 02FB : 00 " " nop 02FC : 04 33 " 3" jmp L0033 02FE : 04 33 " 3" jmp L0033 ; 0300 : 45 "E" strt cnt 0301 : 36 38 "68" jt0 L0338 0303 : 1D " " inc r5 0304 L0304: 0304 : 3A ":" outl p2,a 0305 : 00 " " nop 0306 : 2A "*" xch a,r2 0307 : 00 " " nop 0308 : 46 49 "FI" jnt1 L0349 030A : 4E "N" orl a,r6 030B : 4D "M" orl a,r5 030C : 1C " " inc r4 030D : 53 51 "SQ" anl a,#051H 030F : 4A "J" orl a,r2 0310 : 0E " " movd a,p6 0311 : 47 "G" swap a 0312 : 4C "L" orl a,r4 0313 : 4B "K" orl a,r3 0314 : 50 "P" anl a,@r0 0315 : 52 4F "RO" jb2 L034F 0317 : 48 "H" orl a,r0 0318 L0318: 0318 : 0D " " movd a,p5 0319 : 1B " " inc r3 031A : 1C " " inc r4 031B : 29 ")" xch a,r1 031C : 37 "7" cpl a 031D : 56 44 "VD" jt1 L0344 031F : 29 ")" xch a,r1 ; 0320 : 0B " " db 00BH ; 0321 : 19 " " inc r1 0322 : 28 "(" xch a,r0 0323 : 27 "'" clr a 0324 : 39 "9" outl p1,a 0325 L0325: 0325 : 0C " " movd a,p4 0326 : 34 1A "4 " call L011A 0328 : 09 " " in a,p1 0329 : 17 " " inc a 032A : 26 25 "&%" jnt0 L0325 ; 032C : 33 "3" db 033H ; 032D : 0A " " in a,p2 032E : 32 18 "2 " jb1 L0318 0330 : 07 " " dec a 0331 : 15 " " dis i 0332 : 24 23 "$#" jmp L0123 ; 0334 : 31 "1" xchd a,@r1 0335 : 08 " " ins a,bus 0336 : 43 16 "C " orl a,#016H 0338 L0338: 0338 : 05 " " en i 0339 : 13 22 " "" addc a,#022H 033B : 21 "!" xch a,@r1 033C : 2F "/" xch a,r7 033D : 04 2E " ." jmp L002E ; 033F : 14 03 " " call L0003 0341 : 11 " " inc @r1 0342 : 20 " " xch a,@r0 0343 : 1F " " inc r7 0344 L0344: 0344 : 2D "-" xch a,r5 0345 : 02 " " outl bus,a 0346 : 2C "," xch a,r4 0347 : 10 " " inc @r0 ; 0348 : 01 " " db 001H ; 0349 L0349: 0349 : 0F " " movd a,p7 034A : 1E " " inc r6 034B : 42 "B" mov a,t 034C : 2B "+" xch a,r3 034D : 3C "<" movd p4,a 034E : 41 "A" orl a,@r1 034F L034F: 034F : 3E ">" movd p6,a ; 0350 : 3B ";" db 03BH ; 0351 : 3D "=" movd p5,a 0352 : 40 "@" orl a,@r0 0353 : 3F "?" movd p7,a 0354 : 35 "5" dis tcnti ; 0355 : 06 " " db 006H ; 0356 : 30 "0" xchd a,@r0 0357 : 12 04 " " jb0 L0304 ; 0359 : 33 "3" db 033H ; 035A : 00 " " nop 035B : 00 " " nop 035C : 00 " " nop 035D : 00 " " nop 035E : 00 " " nop 035F : 00 " " nop 0360 : 00 " " nop 0361 : 00 " " nop 0362 : 00 " " nop 0363 : 00 " " nop 0364 : 00 " " nop 0365 : 00 " " nop 0366 : 00 " " nop 0367 : 00 " " nop 0368 : 00 " " nop 0369 : 00 " " nop 036A : 00 " " nop 036B : 00 " " nop 036C : 00 " " nop 036D : 00 " " nop 036E : 00 " " nop 036F : 00 " " nop 0370 : 00 " " nop 0371 : 00 " " nop 0372 : 00 " " nop 0373 : 00 " " nop 0374 : 00 " " nop 0375 : 00 " " nop 0376 : 00 " " nop 0377 : 00 " " nop 0378 : 00 " " nop 0379 : 00 " " nop 037A : 00 " " nop 037B : 00 " " nop 037C : 00 " " nop 037D : 00 " " nop 037E : 00 " " nop 037F : 00 " " nop 0380 : 00 " " nop 0381 : 00 " " nop 0382 : 00 " " nop 0383 : 00 " " nop 0384 : 00 " " nop 0385 : 00 " " nop 0386 : 04 33 " 3" jmp L0033 ; 0388 : 00 " " nop 0389 : 00 " " nop 038A : 00 " " nop 038B : 00 " " nop 038C : 00 " " nop 038D : 00 " " nop 038E : 00 " " nop 038F : 00 " " nop 0390 : 00 " " nop 0391 : 00 " " nop 0392 : 00 " " nop 0393 : 00 " " nop 0394 : 00 " " nop 0395 : 00 " " nop 0396 : 00 " " nop 0397 : 00 " " nop 0398 : 00 " " nop 0399 : 00 " " nop 039A : 00 " " nop 039B : 00 " " nop 039C : 00 " " nop 039D : 00 " " nop 039E : 00 " " nop 039F : 00 " " nop 03A0 : 00 " " nop 03A1 : 00 " " nop 03A2 : 00 " " nop 03A3 : 00 " " nop 03A4 : 00 " " nop 03A5 : 00 " " nop 03A6 : 00 " " nop 03A7 : 00 " " nop 03A8 : 00 " " nop 03A9 : 00 " " nop 03AA : 00 " " nop 03AB : 00 " " nop 03AC : 00 " " nop 03AD : 00 " " nop 03AE : 00 " " nop 03AF : 00 " " nop 03B0 : 00 " " nop 03B1 : 00 " " nop 03B2 : 00 " " nop 03B3 : 00 " " nop 03B4 : 00 " " nop 03B5 : 00 " " nop 03B6 : 00 " " nop 03B7 : 00 " " nop 03B8 : 00 " " nop 03B9 : 00 " " nop 03BA : 00 " " nop 03BB : 00 " " nop 03BC : 00 " " nop 03BD : 00 " " nop 03BE : 00 " " nop 03BF : 00 " " nop 03C0 : 00 " " nop 03C1 : 00 " " nop 03C2 : 00 " " nop 03C3 : 00 " " nop 03C4 : 00 " " nop 03C5 : 00 " " nop 03C6 : 00 " " nop 03C7 : 00 " " nop 03C8 : 00 " " nop 03C9 : 00 " " nop 03CA : 00 " " nop 03CB : 00 " " nop 03CC : 00 " " nop 03CD : 00 " " nop 03CE : 00 " " nop 03CF : 00 " " nop 03D0 : 00 " " nop 03D1 : 00 " " nop 03D2 : 00 " " nop 03D3 : 00 " " nop 03D4 : 00 " " nop 03D5 : 00 " " nop 03D6 : 00 " " nop 03D7 : 00 " " nop 03D8 : 00 " " nop 03D9 : 00 " " nop 03DA : 00 " " nop 03DB : 00 " " nop 03DC : 00 " " nop 03DD : 00 " " nop 03DE : 00 " " nop 03DF : 00 " " nop 03E0 : 00 " " nop 03E1 : 00 " " nop 03E2 : 00 " " nop 03E3 : 00 " " nop 03E4 : 00 " " nop 03E5 : 00 " " nop 03E6 : 00 " " nop 03E7 : 00 " " nop 03E8 : 00 " " nop 03E9 : 00 " " nop 03EA : 00 " " nop 03EB : 00 " " nop 03EC : 00 " " nop 03ED : 00 " " nop 03EE : 00 " " nop 03EF : 00 " " nop 03F0 : 00 " " nop 03F1 : 00 " " nop 03F2 : 00 " " nop 03F3 : 00 " " nop 03F4 : 00 " " nop 03F5 : 00 " " nop 03F6 : 00 " " nop 03F7 : 00 " " nop 03F8 : 00 " " nop 03F9 : 00 " " nop 03FA : 00 " " nop 03FB : 00 " " nop 03FC : 00 " " nop 03FD : 00 " " nop 03FE : 04 33 " 3" jmp L0033 ;-------------------------------------------------------------- Symbol table ============ Value Type Name ----- ---- ---- 0003 Code L0003 0004 Code L0004 0014 Code L0014 001A Code L001A 0029 Code L0029 002B Code L002B 002E Code L002E 002F Code L002F 0033 Code L0033 003F Code L003F 0043 Code L0043 0044 Code L0044 0046 Code L0046 005A Code L005A 005B Code L005B 006C Code L006C 0081 Code L0081 0084 Code L0084 008E Code L008E 00B1 Code L00B1 00BA Code L00BA 00BF Code L00BF 00C7 Code L00C7 00CB Code L00CB 00D1 Code L00D1 00D3 Code L00D3 00DB Code L00DB 00EF Code L00EF 00F5 Code L00F5 00F9 Code L00F9 0100 Code L0100 0104 Code L0104 0116 Code L0116 011A Code L011A 011E Code L011E 0123 Code L0123 0125 Code L0125 012C Code L012C 0137 Code L0137 013A Code L013A 0148 Code L0148 014C Code L014C 0152 Code L0152 0164 Code L0164 01C7 Code L01C7 01CA Code L01CA 01D4 Code L01D4 01D7 Code L01D7 01DC Code L01DC 01E3 Code L01E3 01EC Code L01EC 01FA Code L01FA 01FB Code L01FB 0304 Code L0304 0318 Code L0318 0325 Code L0325 0338 Code L0338 0344 Code L0344 0349 Code L0349 034F Code L034F Number of symbols: 60 ;--------------------------------------------------------------