; Date: Fri May 01 00:16:18 2020 ; ; CPU: Intel 8048 (MCS-48 family) ; ; ; org 00000H ; 0000 L0000: 0000 : E5 " " sel mb0 0001 : 04 0B " " jmp L000B ; 0003 : E5 " " sel mb0 0004 : 00 " " nop 0005 : 04 00 " " jmp L0000 ; 0007 : E5 " " sel mb0 0008 : 04 00 " " jmp L0000 000A L000A: 000A : 93 " " retr ; 000B L000B: 000B : 23 7F "# " mov a,#07FH 000D : 3A ":" outl p2,a 000E : 15 " " dis i 000F : 35 "5" dis tcnti 0010 : 65 "e" stop tcnt 0011 : A5 " " clr f1 0012 : 14 0A " " call L000A 0014 : 89 FF " " orl p1,#0FFH 0016 : 27 "'" clr a 0017 : D7 " " mov psw,a 0018 : 62 "b" mov t,a 0019 : B8 3F " ?" mov r0,#03FH 001B L001B: 001B : A0 " " mov @r0,a 001C : E8 1B " " djnz r0,L001B 001E L001E: 001E : D5 " " sel rb1 001F : BE 22 " "" mov r6,#022H 0021 : 00 " " nop 0022 : 00 " " nop 0023 : 00 " " nop 0024 : 00 " " nop 0025 : 00 " " nop 0026 L0026: 0026 : 00 " " nop 0027 : 00 " " nop 0028 : 00 " " nop 0029 : 00 " " nop 002A : 36 3A "6:" jt0 L003A 002C : BD 08 " " mov r5,#008H 002E : 04 3C " <" jmp L003C ; 0030 : 00 " " nop 0031 : 00 " " nop 0032 : 00 " " nop 0033 : 00 " " nop 0034 : 00 " " nop 0035 : 00 " " nop 0036 : 00 " " nop 0037 : 00 " " nop 0038 : 00 " " nop 0039 : 00 " " nop 003A L003A: 003A : BD 09 " " mov r5,#009H 003C L003C: 003C : C5 " " sel rb0 003D : 23 FF "# " mov a,#0FFH 003F : B8 3F " ?" mov r0,#03FH 0041 : B9 17 " " mov r1,#017H 0043 L0043: 0043 : A0 " " mov @r0,a 0044 : C8 " " dec r0 0045 : E9 43 " C" djnz r1,L0043 0047 : 18 " " inc r0 0048 : 90 " " movx @r0,a 0049 : AC " " mov r4,a 004A : BA 01 " " mov r2,#001H 004C : BF 00 " " mov r7,#000H 004E : A5 " " clr f1 004F : B5 " " cpl f1 0050 : D5 " " sel rb1 0051 : BA 00 " " mov r2,#000H 0053 : FF " " mov a,r7 0054 : 53 FD "S " anl a,#0FDH 0056 : AF " " mov r7,a 0057 L0057: 0057 : 25 "%" en tcnti 0058 : 45 "E" strt cnt 0059 : 56 62 "Vb" jt1 L0062 005B : 76 63 "vc" jf1 L0063 005D : 42 "B" mov a,t 005E : 96 64 " d" jnz L0064 0060 : 24 03 "$ " jmp L0103 ; 0062 L0062: 0062 : A5 " " clr f1 0063 L0063: 0063 : B5 " " cpl f1 0064 L0064: 0064 : 27 "'" clr a 0065 : 62 "b" mov t,a 0066 : D5 " " sel rb1 0067 : FF " " mov a,r7 0068 : C5 " " sel rb0 0069 : F2 6E " n" jb7 L006E 006B : 1D " " inc r5 006C : 04 57 " W" jmp L0057 ; 006E L006E: 006E : FC " " mov a,r4 006F : 37 "7" cpl a 0070 : C6 74 " t" jz L0074 0072 : 44 4F "DO" jmp L024F ; 0074 L0074: 0074 : EA 82 " " djnz r2,L0082 0076 : BA 58 " X" mov r2,#058H 0078 : B9 3F " ?" mov r1,#03FH 007A : BB 01 " " mov r3,#001H 007C : 04 8A " " jmp L008A ; 007E L007E: 007E : C9 " " dec r1 007F : C9 " " dec r1 0080 : 04 8A " " jmp L008A ; 0082 L0082: 0082 : 1D " " inc r5 0083 : FB " " mov a,r3 0084 : C6 00 " " jz L0000 0086 : E7 " " rl a 0087 : AB " " mov r3,a 0088 : 12 7E " ~" jb0 L007E 008A L008A: 008A : 23 FF "# " mov a,#0FFH 008C : 90 " " movx @r0,a 008D : F9 " " mov a,r1 008E : 77 "w" rr a 008F : 53 0F "S " anl a,#00FH 0091 : 03 94 " " add a,#094H 0093 : B3 " " jmpp @a ;INFO: indirect jump ; 0094 : 00 " " nop 0095 : 00 " " nop 0096 : 00 " " nop 0097 : 00 " " nop 0098 : 00 " " nop 0099 : C8 " " dec r0 009A : C4 C0 " " jmp L06C0 ; 009C : BC B8 " " mov r4,#0B8H 009E : B4 B0 " " call L05B0 00A0 : AC " " mov r4,a 00A1 : A8 " " mov r0,a 00A2 : A4 CF " " jmp L05CF ; 00A4 : 99 FE " " anl p1,#0FEH 00A6 : 04 DC " " jmp L00DC ; 00A8 : 99 FD " " anl p1,#0FDH 00AA : 04 DC " " jmp L00DC ; 00AC : 99 FB " " anl p1,#0FBH 00AE : 04 DC " " jmp L00DC ; 00B0 : 99 F7 " " anl p1,#0F7H 00B2 : 04 DC " " jmp L00DC ; 00B4 : 99 EF " " anl p1,#0EFH 00B6 : 04 DC " " jmp L00DC ; 00B8 : 99 DF " " anl p1,#0DFH 00BA : 04 DC " " jmp L00DC ; 00BC : 99 BF " " anl p1,#0BFH 00BE : 04 DC " " jmp L00DC ; 00C0 : 99 7F " " anl p1,#07FH 00C2 : 04 DC " " jmp L00DC ; 00C4 : 9A FE " " anl p2,#0FEH 00C6 : 04 DC " " jmp L00DC ; 00C8 : 9A FD " " anl p2,#0FDH 00CA : 08 " " ins a,bus 00CB : 53 83 "S " anl a,#083H 00CD : 04 DD " " jmp L00DD ; 00CF : FB " " mov a,r3 00D0 : F2 D5 " " jb7 L00D5 00D2 : 0A " " in a,p2 00D3 : 04 E1 " " jmp L00E1 ; 00D5 L00D5: 00D5 : 27 "'" clr a 00D6 : 86 E1 " " jni L00E1 00D8 : 23 FF "# " mov a,#0FFH 00DA : 04 E1 " " jmp L00E1 ; 00DC L00DC: 00DC : 08 " " ins a,bus 00DD L00DD: 00DD : 8A 7F " " orl p2,#07FH 00DF : 89 FF " " orl p1,#0FFH 00E1 L00E1: 00E1 : AC " " mov r4,a 00E2 : C9 " " dec r1 00E3 : D1 " " xrl a,@r1 00E4 : 5B "[" anl a,r3 00E5 : C6 EF " " jz L00EF 00E7 : FB " " mov a,r3 00E8 : D1 " " xrl a,@r1 00E9 : A1 " " mov @r1,a 00EA : 19 " " inc r1 00EB L00EB: 00EB : BC FF " " mov r4,#0FFH 00ED L00ED: 00ED : 04 57 " W" jmp L0057 ; 00EF L00EF: 00EF : 19 " " inc r1 00F0 : FC " " mov a,r4 00F1 : D1 " " xrl a,@r1 00F2 : 5B "[" anl a,r3 00F3 : C6 EB " " jz L00EB 00F5 : FA " " mov a,r2 00F6 : 03 9A " " add a,#09AH 00F8 : E3 " " movp3 a,@a 00F9 : 2C "," xch a,r4 00FA : 5B "[" anl a,r3 00FB : C6 ED " " jz L00ED 00FD : FC " " mov a,r4 00FE : 43 80 "C " orl a,#080H 0100 : AC " " mov r4,a 0101 : 04 57 " W" jmp L0057 ; 0103 L0103: 0103 : D5 " " sel rb1 0104 : B9 27 " '" mov r1,#027H 0106 L0106: 0106 : 56 18 "V " jt1 L0118 0108 : E9 06 " " djnz r1,L0106 010A : B9 24 " $" mov r1,#024H 010C L010C: 010C : 56 1A "V " jt1 L011A 010E : E9 0C " " djnz r1,L010C 0110 : B9 A2 " " mov r1,#0A2H 0112 L0112: 0112 : 56 18 "V " jt1 L0118 0114 : E9 12 " " djnz r1,L0112 0116 : 04 1E " " jmp L001E 0118 L0118: 0118 : 04 57 " W" jmp L0057 ; 011A L011A: 011A : 85 " " clr f0 011B : FE " " mov a,r6 011C : 47 "G" swap a 011D : AB " " mov r3,a 011E L011E: 011E : 5F "_" anl a,r7 011F : 37 "7" cpl a 0120 : 32 23 "2#" jb1 L0123 0122 : 95 " " cpl f0 0123 L0123: 0123 : FF " " mov a,r7 0124 : 43 80 "C " orl a,#080H 0126 : AF " " mov r7,a 0127 : B9 09 " " mov r1,#009H 0129 : B8 01 " " mov r0,#001H 012B : 74 2A "t*" call L032A 012D : DB " " xrl a,r3 012E : 53 F0 "S " anl a,#0F0H 0130 : C6 40 " @" jz L0140 0132 : B6 36 " 6" jf0 L0136 0134 : 04 57 " W" jmp L0057 ; 0136 L0136: 0136 : 8A 80 " " orl p2,#080H 0138 : B9 32 " 2" mov r1,#032H 013A L013A: 013A : E9 3A " :" djnz r1,L013A 013C : 9A 7F " " anl p2,#07FH 013E : 04 57 " W" jmp L0057 ; 0140 L0140: 0140 : B9 24 " $" mov r1,#024H 0142 L0142: 0142 : 56 48 "VH" jt1 L0148 0144 : E9 42 " B" djnz r1,L0142 0146 : 04 57 " W" jmp L0057 ; 0148 L0148: 0148 : 27 "'" clr a 0149 : 62 "b" mov t,a 014A : FB " " mov a,r3 014B : 53 0F "S " anl a,#00FH 014D : 03 50 " P" add a,#050H 014F : B3 " " jmpp @a ;INFO: indirect jump ; 0150 : 1E " " inc r6 ; 0151 : 8B " " db 08BH ; 0152 : 85 " " clr f0 0153 : 85 " " clr f0 0154 : 85 " " clr f0 0155 : 85 " " clr f0 0156 : 85 " " clr f0 0157 : 85 " " clr f0 0158 : 85 " " clr f0 0159 : 85 " " clr f0 015A : 85 " " clr f0 015B : 62 "b" mov t,a 015C : 60 "`" add a,@r0 015D : 85 " " clr f0 015E : C7 " " mov a,psw 015F : AB " " mov r3,a 0160 : 24 FE "$ " jmp L01FE ; 0162 : 27 "'" clr a 0163 : AC " " mov r4,a 0164 : AB " " mov r3,a 0165 : B9 19 " " mov r1,#019H 0167 L0167: 0167 : 46 6D "Fm" jnt1 L016D 0169 : E9 67 " g" djnz r1,L0167 016B : 04 57 " W" jmp L0057 ; 016D L016D: 016D : B9 09 " " mov r1,#009H 016F : B8 02 " " mov r0,#002H 0171 : 74 07 "t " call L0307 0173 : AC " " mov r4,a 0174 : FB " " mov a,r3 0175 : D3 01 " " xrl a,#001H 0177 : C6 9E " " jz L019E 0179 : FB " " mov a,r3 017A : D3 05 " " xrl a,#005H 017C : C6 9E " " jz L019E 017E : FB " " mov a,r3 017F : 96 87 " " jnz L0187 0181 : FC " " mov a,r4 0182 : 53 2F "S/" anl a,#02FH 0184 : AE " " mov r6,a 0185 L0185: 0185 : 04 57 " W" jmp L0057 ; 0187 L0187: 0187 : D3 FF " " xrl a,#0FFH 0189 : 96 8D " " jnz L018D 018B : 04 3C " <" jmp L003C ; 018D L018D: 018D : D3 02 " " xrl a,#002H 018F : 96 A2 " " jnz L01A2 0191 : 0A " " in a,p2 0192 : 72 85 "r " jb3 L0185 0194 L0194: 0194 : FC " " mov a,r4 0195 : 53 0F "S " anl a,#00FH 0197 : 2E "." xch a,r6 0198 : 53 20 "S " anl a,#020H 019A : 4E "N" orl a,r6 019B : AE " " mov r6,a 019C : 04 57 " W" jmp L0057 ; 019E L019E: 019E : FB " " mov a,r3 019F : AD " " mov r5,a 01A0 : 04 57 " W" jmp L0057 ; 01A2 L01A2: 01A2 : D3 03 " " xrl a,#003H 01A4 : 96 85 " " jnz L0185 01A6 : FF " " mov a,r7 01A7 : 52 85 "R " jb2 L0185 01A9 : 24 94 "$ " jmp L0194 ; 01AB : FE " " mov a,r6 01AC : 53 F0 "S " anl a,#0F0H 01AE : AC " " mov r4,a 01AF : C5 " " sel rb0 01B0 : FD " " mov a,r5 01B1 : E7 " " rl a 01B2 : AD " " mov r5,a 01B3 : D5 " " sel rb1 01B4 : 53 0F "S " anl a,#00FH 01B6 : 4C "L" orl a,r4 01B7 : AC " " mov r4,a 01B8 : 0A " " in a,p2 01B9 : 53 10 "S " anl a,#010H 01BB : E7 " " rl a 01BC : E7 " " rl a 01BD : 4C "L" orl a,r4 01BE : AC " " mov r4,a 01BF : FD " " mov a,r5 01C0 : AB " " mov r3,a 01C1 : B9 08 " " mov r1,#008H 01C3 : 54 86 "T " call L0286 01C5 : 04 57 " W" jmp L0057 ; 01C7 : 0A " " in a,p2 01C8 : 77 "w" rr a 01C9 : 77 "w" rr a 01CA : AC " " mov r4,a 01CB : 53 0F "S " anl a,#00FH 01CD : 03 EE " " add a,#0EEH 01CF : A3 " " movp a,@a 01D0 : 86 D4 " " jni L01D4 01D2 : 43 20 "C " orl a,#020H 01D4 L01D4: 01D4 : 2C "," xch a,r4 01D5 : 92 DB " " jb4 L01DB 01D7 : 23 FB "# " mov a,#0FBH 01D9 : 5C "\" anl a,r4 01DA : AC " " mov r4,a 01DB L01DB: 01DB : 99 7F " " anl p1,#07FH 01DD : 08 " " ins a,bus 01DE : 89 FF " " orl p1,#0FFH 01E0 : 72 E6 "r " jb3 L01E6 01E2 : 23 BF "# " mov a,#0BFH 01E4 : 5C "\" anl a,r4 01E5 : AC " " mov r4,a 01E6 L01E6: 01E6 : BB 00 " " mov r3,#000H 01E8 : B9 02 " " mov r1,#002H 01EA : 54 86 "T " call L0286 01EC : 04 57 " W" jmp L0057 01EE : C4 C6 " " jmp L06C6 ; 01F0 : C5 " " sel rb0 01F1 : C7 " " mov a,psw 01F2 : D4 D6 " " call L06D6 01F4 : D5 " " sel rb1 01F5 : D7 " " mov psw,a 01F6 : CC " " dec r4 01F7 : CE " " dec r6 01F8 : CD " " dec r5 01F9 : CF " " dec r7 01FA : DC " " xrl a,r4 01FB : DE " " xrl a,r6 01FC : DD " " xrl a,r5 01FD : DF " " xrl a,r7 01FE L01FE: 01FE : FF " " mov a,r7 01FF : 37 "7" cpl a 0200 : 32 4D "2M" jb1 L024D 0202 : 37 "7" cpl a 0203 : 53 FE "S " anl a,#0FEH 0205 : AF " " mov r7,a 0206 : BB FF " " mov r3,#0FFH 0208 : FA " " mov a,r2 0209 : 47 "G" swap a 020A : 53 07 "S " anl a,#007H 020C : 43 20 "C " orl a,#020H 020E : A8 " " mov r0,a 020F : F0 " " mov a,@r0 0210 : AC " " mov r4,a 0211 : D3 60 " `" xrl a,#060H 0213 : 53 7F "S " anl a,#07FH 0215 : 96 1E " " jnz L021E 0217 : F0 " " mov a,@r0 0218 : 43 7F "C " orl a,#07FH 021A : AC " " mov r4,a 021B : AB " " mov r3,a 021C L021C: 021C : 44 38 "D8" jmp L0238 ; 021E L021E: 021E : FA " " mov a,r2 021F : 47 "G" swap a 0220 : 17 " " inc a 0221 : DA " " xrl a,r2 0222 : 53 07 "S " anl a,#007H 0224 : C6 1C " " jz L021C 0226 : FA " " mov a,r2 0227 : 47 "G" swap a 0228 : 17 " " inc a 0229 : 53 07 "S " anl a,#007H 022B : 43 20 "C " orl a,#020H 022D : A8 " " mov r0,a 022E : F0 " " mov a,@r0 022F : D3 60 " `" xrl a,#060H 0231 : 53 7F "S " anl a,#07FH 0233 : C6 1C " " jz L021C 0235 : 1F " " inc r7 0236 : F0 " " mov a,@r0 0237 : AB " " mov r3,a 0238 L0238: 0238 : B9 01 " " mov r1,#001H 023A : 54 86 "T " call L0286 023C : FF " " mov a,r7 023D : 53 01 "S " anl a,#001H 023F : 17 " " inc a 0240 : 47 "G" swap a 0241 : 6A "j" add a,r2 0242 : 53 77 "Sw" anl a,#077H 0244 : AA " " mov r2,a 0245 : 47 "G" swap a 0246 : DA " " xrl a,r2 0247 : 96 4D " M" jnz L024D 0249 : FF " " mov a,r7 024A : 53 FD "S " anl a,#0FDH 024C : AF " " mov r7,a 024D L024D: 024D : 04 57 " W" jmp L0057 ; 024F L024F: 024F : D5 " " sel rb1 0250 : FA " " mov a,r2 0251 : 47 "G" swap a 0252 : 37 "7" cpl a 0253 L0253: 0253 : 17 " " inc a 0254 : 6A "j" add a,r2 0255 : 43 F8 "C " orl a,#0F8H 0257 : 37 "7" cpl a 0258 : C6 81 " " jz L0281 025A : C5 " " sel rb0 025B : F9 " " mov a,r1 025C : D3 3F " ?" xrl a,#03FH 025E : C6 6A " j" jz L026A 0260 : FC " " mov a,r4 0261 : F2 69 " i" jb7 L0269 0263 : FF " " mov a,r7 0264 : 32 81 "2 " jb1 L0281 0266 : 1F " " inc r7 0267 : 44 6A "Dj" jmp L026A ; 0269 L0269: 0269 : CF " " dec r7 026A L026A: 026A : FB " " mov a,r3 026B : D1 " " xrl a,@r1 026C : A1 " " mov @r1,a 026D : FC " " mov a,r4 026E : D5 " " sel rb1 026F : AB " " mov r3,a 0270 : FF " " mov a,r7 0271 : 43 02 "C " orl a,#002H 0273 : AF " " mov r7,a 0274 : FA " " mov a,r2 0275 : 53 07 "S " anl a,#007H 0277 : 43 20 "C " orl a,#020H 0279 : A8 " " mov r0,a 027A : FB " " mov a,r3 027B : A0 " " mov @r0,a 027C : FA " " mov a,r2 027D : 17 " " inc a 027E : 53 77 "Sw" anl a,#077H 0280 : AA " " mov r2,a 0281 L0281: 0281 : C5 " " sel rb0 0282 : BC FF " " mov r4,#0FFH 0284 : 04 57 " W" jmp L0057 ; 0286 L0286: 0286 : FF " " mov a,r7 0287 : 43 04 "C " orl a,#004H 0289 : AF " " mov r7,a 028A : B8 08 " " mov r0,#008H 028C : B9 09 " " mov r1,#009H 028E L028E: 028E : E9 8E " " djnz r1,L028E 0290 : 42 "B" mov a,t 0291 : 96 F8 " " jnz L02F8 0293 : 8A 80 " " orl p2,#080H 0295 : 27 "'" clr a 0296 : 62 "b" mov t,a 0297 : 54 FE "T " call L02FE 0299 : 9A 7F " " anl p2,#07FH 029B : 00 " " nop 029C : 46 F8 "F " jnt1 L02F8 029E : 54 FD "T " call L02FD 02A0 L02A0: 02A0 : 46 F8 "F " jnt1 L02F8 02A2 : 74 03 "t " call L0303 02A4 : 42 "B" mov a,t 02A5 : 96 F8 " " jnz L02F8 02A7 : 8A 80 " " orl p2,#080H 02A9 : 27 "'" clr a 02AA : 62 "b" mov t,a 02AB : 74 03 "t " call L0303 02AD : FC " " mov a,r4 02AE : E7 " " rl a 02AF : AC " " mov r4,a 02B0 : 12 E6 " " jb0 L02E6 02B2 : 54 FC "T " call L02FC 02B4 : 9A 7F " " anl p2,#07FH 02B6 L02B6: 02B6 : E8 A0 " " djnz r0,L02A0 02B8 : 46 F8 "F " jnt1 L02F8 02BA : B8 08 " " mov r0,#008H 02BC : 44 C2 "D " jmp L02C2 ; 02BE L02BE: 02BE : 46 F8 "F " jnt1 L02F8 02C0 : 74 04 "t " call L0304 02C2 L02C2: 02C2 : 00 " " nop 02C3 : 42 "B" mov a,t 02C4 : 96 F8 " " jnz L02F8 02C6 : 8A 80 " " orl p2,#080H 02C8 : 27 "'" clr a 02C9 : 62 "b" mov t,a 02CA : 74 03 "t " call L0303 02CC : FB " " mov a,r3 02CD : E7 " " rl a 02CE : AB " " mov r3,a 02CF : 12 EF " " jb0 L02EF 02D1 : 54 FC "T " call L02FC 02D3 : 9A 7F " " anl p2,#07FH 02D5 L02D5: 02D5 : E8 BE " " djnz r0,L02BE 02D7 : 54 FE "T " call L02FE 02D9 : 8A 80 " " orl p2,#080H 02DB : 54 FC "T " call L02FC 02DD : 54 FC "T " call L02FC 02DF : 9A 7F " " anl p2,#07FH 02E1 : FF " " mov a,r7 02E2 : 53 FB "S " anl a,#0FBH 02E4 : AF " " mov r7,a 02E5 : 83 " " ret ; 02E6 L02E6: 02E6 : 9A 7F " " anl p2,#07FH 02E8 : 00 " " nop 02E9 : 46 F8 "F " jnt1 L02F8 02EB : 74 01 "t " call L0301 02ED : 44 B6 "D " jmp L02B6 ; 02EF L02EF: 02EF : 9A 7F " " anl p2,#07FH 02F1 : 00 " " nop 02F2 : 46 F8 "F " jnt1 L02F8 02F4 : 74 01 "t " call L0301 02F6 : 44 D5 "D " jmp L02D5 ; 02F8 L02F8: 02F8 : 27 "'" clr a 02F9 : D7 " " mov psw,a 02FA : 04 57 " W" jmp L0057 ; 02FC L02FC: 02FC : 00 " " nop 02FD L02FD: 02FD : 00 " " nop 02FE L02FE: 02FE : 00 " " nop 02FF : 00 " " nop 0300 : 00 " " nop 0301 L0301: 0301 : 00 " " nop 0302 : 00 " " nop 0303 L0303: 0303 : 00 " " nop 0304 L0304: 0304 : 83 " " ret ; 0305 : 00 " " nop 0306 : 00 " " nop 0307 L0307: 0307 : 97 " " clr c 0308 : 56 48 "VH" jt1 L0348 030A : 56 46 "VF" jt1 L0346 030C : 56 44 "VD" jt1 L0344 030E : 56 42 "VB" jt1 L0342 0310 : 56 40 "V@" jt1 L0340 0312 : 56 3E "V>" jt1 L033E 0314 : 56 3C "V<" jt1 L033C 0316 : 56 3A "V:" jt1 L033A 0318 : 56 38 "V8" jt1 L0338 031A : 56 36 "V6" jt1 L0336 031C : 56 34 "V4" jt1 L0334 031E : 56 32 "V2" jt1 L0332 0320 : 56 30 "V0" jt1 L0330 0322 : 56 2E "V." jt1 L032E 0324 : 56 2C "V," jt1 L032C 0326 : 56 2A "V*" jt1 L032A 0328 : 44 F8 "D " jmp L02F8 ; 032A L032A: 032A : 46 73 "Fs" jnt1 L0373 032C L032C: 032C : 46 73 "Fs" jnt1 L0373 032E L032E: 032E : 46 73 "Fs" jnt1 L0373 0330 L0330: 0330 : 46 73 "Fs" jnt1 L0373 0332 L0332: 0332 : 46 73 "Fs" jnt1 L0373 0334 L0334: 0334 : 46 73 "Fs" jnt1 L0373 0336 L0336: 0336 : 46 73 "Fs" jnt1 L0373 0338 L0338: 0338 : 46 73 "Fs" jnt1 L0373 033A L033A: 033A : 46 73 "Fs" jnt1 L0373 033C L033C: 033C : 46 73 "Fs" jnt1 L0373 033E L033E: 033E : 46 73 "Fs" jnt1 L0373 0340 L0340: 0340 : 46 73 "Fs" jnt1 L0373 0342 L0342: 0342 : 46 73 "Fs" jnt1 L0373 0344 L0344: 0344 : 46 73 "Fs" jnt1 L0373 0346 L0346: 0346 : 46 73 "Fs" jnt1 L0373 0348 L0348: 0348 : 46 73 "Fs" jnt1 L0373 034A : 46 73 "Fs" jnt1 L0373 034C : 46 73 "Fs" jnt1 L0373 034E : 46 73 "Fs" jnt1 L0373 0350 : A7 " " cpl c 0351 : 46 73 "Fs" jnt1 L0373 0353 : 46 73 "Fs" jnt1 L0373 0355 : 46 73 "Fs" jnt1 L0373 0357 : 46 73 "Fs" jnt1 L0373 0359 : 46 73 "Fs" jnt1 L0373 035B : 46 73 "Fs" jnt1 L0373 035D : 46 73 "Fs" jnt1 L0373 035F : 46 73 "Fs" jnt1 L0373 0361 : 46 73 "Fs" jnt1 L0373 0363 : 46 73 "Fs" jnt1 L0373 0365 : 46 73 "Fs" jnt1 L0373 0367 : 46 73 "Fs" jnt1 L0373 0369 : 46 73 "Fs" jnt1 L0373 036B : 46 73 "Fs" jnt1 L0373 036D : 46 73 "Fs" jnt1 L0373 036F : 46 73 "Fs" jnt1 L0373 0371 : 44 F8 "D " jmp L02F8 ; 0373 L0373: 0373 : F7 " " rlc a 0374 : E9 07 " " djnz r1,L0307 0376 : 2B "+" xch a,r3 0377 : E8 7A " z" djnz r0,L037A 0379 : 83 " " ret ; 037A L037A: 037A : B9 08 " " mov r1,#008H 037C : 97 " " clr c 037D : 56 44 "VD" jt1 L0344 037F : 56 42 "VB" jt1 L0342 0381 : 56 40 "V@" jt1 L0340 0383 : 56 3E "V>" jt1 L033E 0385 : 56 3C "V<" jt1 L033C 0387 : 56 3A "V:" jt1 L033A 0389 : 56 38 "V8" jt1 L0338 038B : 56 36 "V6" jt1 L0336 038D : 56 34 "V4" jt1 L0334 038F : 56 32 "V2" jt1 L0332 0391 : 56 30 "V0" jt1 L0330 0393 : 56 2E "V." jt1 L032E 0395 : 56 2C "V," jt1 L032C 0397 : 56 2A "V*" jt1 L032A 0399 : 44 F8 "D " jmp L02F8 ; 039B : 0A " " in a,p2 039C : FF " " mov a,r7 039D : FF " " mov a,r7 039E : FF " " mov a,r7 039F : FF " " mov a,r7 03A0 : FF " " mov a,r7 03A1 : 1A " " inc r2 03A2 : 1C " " inc r4 03A3 : 30 "0" xchd a,@r0 03A4 : 0C " " movd a,p4 03A5 : 0D " " movd a,p5 03A6 : 0E " " movd a,p6 03A7 : 0F " " movd a,p7 03A8 : 11 " " inc @r1 03A9 : 10 " " inc @r0 03AA : 20 " " xch a,@r0 03AB : 3E ">" movd p6,a 03AC : 2C "," xch a,r4 03AD : 2F "/" xch a,r7 03AE : 25 "%" en tcnti ; 03AF : 33 "3" db 033H ; 03B0 : 18 " " inc r0 03B1 : 1B " " inc r3 03B2 : 1D " " inc r5 03B3 : 27 "'" clr a 03B4 : 29 ")" xch a,r1 03B5 : 24 1E "$ " jmp L011E ; 03B7 : 21 "!" xch a,@r1 03B8 : 23 1F "# " mov a,#01FH ; 03BA : 22 """ db 022H ; 03BB : 4E "N" orl a,r6 03BC : 5C "\" anl a,r4 03BD : 5B "[" anl a,r3 03BE : 59 "Y" anl a,r1 03BF : 45 "E" strt cnt 03C0 : 58 "X" anl a,r0 03C1 : 57 "W" da a 03C2 : 56 35 "V5" jt1 L0335 03C4 : 12 13 " " jb0 L0313 03C6 : 14 15 " " call L0015 03C8 : 17 " " inc a 03C9 : 16 19 " " jtf L0319 03CB : 43 4B "CK" orl a,#04BH 03CD : 51 "Q" anl a,@r1 03CE : 47 "G" swap a 03CF : 4C "L" orl a,r4 03D0 : 55 "U" strt t 03D1 : 54 53 "TS" call L0253 03D3 : 31 "1" xchd a,@r1 ; 03D4 : 3B ";" db 03BH ; 03D5 : 2A "*" xch a,r2 03D6 : 32 41 "2A" jb1 L0341 03D8 : 3D "=" movd p5,a 03D9 : 52 3C "R<" jb2 L033C ; 03DB : 06 " " db 006H ; 03DC : 07 " " dec a 03DD : 08 " " ins a,bus 03DE : 09 " " in a,p1 ; 03DF : 0B " " db 00BH ; 03E0 : 2D "-" xch a,r5 03E1 : 2E "." xch a,r6 03E2 : 2B "+" xch a,r3 03E3 : 00 " " nop ; 03E4 : 01 " " db 001H ; 03E5 : 02 " " outl bus,a 03E6 : 03 05 " " add a,#005H 03E8 : 04 26 " &" jmp L0026 ; 03EA : 28 "(" xch a,r0 03EB : 39 "9" outl p1,a ; 03EC : 38 "8" db 038H ; 03ED : 36 60 "6`" jt0 L0360 03EF : 37 "7" cpl a 03F0 : 3A ":" outl p2,a 03F1 : FF " " mov a,r7 03F2 : FF " " mov a,r7 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 : 00 " " nop 03FF : 00 " " nop ;-------------------------------------------------------------- Symbol table ============ Value Type Name ----- ---- ---- 0000 Code L0000 000A Code L000A 000B Code L000B 0015 Code L0015 001B Code L001B 001E Code L001E 0026 Code L0026 003A Code L003A 003C Code L003C 0043 Code L0043 0057 Code L0057 0062 Code L0062 0063 Code L0063 0064 Code L0064 006E Code L006E 0074 Code L0074 007E Code L007E 0082 Code L0082 008A Code L008A 00D5 Code L00D5 00DC Code L00DC 00DD Code L00DD 00E1 Code L00E1 00EB Code L00EB 00ED Code L00ED 00EF Code L00EF 0103 Code L0103 0106 Code L0106 010C Code L010C 0112 Code L0112 0118 Code L0118 011A Code L011A 011E Code L011E 0123 Code L0123 0136 Code L0136 013A Code L013A 0140 Code L0140 0142 Code L0142 0148 Code L0148 0167 Code L0167 016D Code L016D 0185 Code L0185 0187 Code L0187 018D Code L018D 0194 Code L0194 019E Code L019E 01A2 Code L01A2 01D4 Code L01D4 01DB Code L01DB 01E6 Code L01E6 01FE Code L01FE 021C Code L021C 021E Code L021E 0238 Code L0238 024D Code L024D 024F Code L024F 0253 Code L0253 0269 Code L0269 026A Code L026A 0281 Code L0281 0286 Code L0286 028E Code L028E 02A0 Code L02A0 02B6 Code L02B6 02BE Code L02BE 02C2 Code L02C2 02D5 Code L02D5 02E6 Code L02E6 02EF Code L02EF 02F8 Code L02F8 02FC Code L02FC 02FD Code L02FD 02FE Code L02FE 0301 Code L0301 0303 Code L0303 0304 Code L0304 0307 Code L0307 0313 Code L0313 0319 Code L0319 032A Code L032A 032C Code L032C 032E Code L032E 0330 Code L0330 0332 Code L0332 0334 Code L0334 0335 Code L0335 0336 Code L0336 0338 Code L0338 033A Code L033A 033C Code L033C 033E Code L033E 0340 Code L0340 0341 Code L0341 0342 Code L0342 0344 Code L0344 0346 Code L0346 0348 Code L0348 0360 Code L0360 0373 Code L0373 037A Code L037A 05B0 Code L05B0 05CF Code L05CF 06C0 Code L06C0 06C6 Code L06C6 06D6 Code L06D6 Number of symbols: 105 ;--------------------------------------------------------------