; ; Disassembled by: ; DASMx object code disassembler ; (c) Copyright 1996-2003 Conquest Consultants ; Version 1.40 (Oct 18 2003) ; ; File: G:\5218\8493405.bin ; ; Size: 2048 bytes ; Checksum: BB11 ; CRC-32: D6334D47 ; ; Date: Sat Sep 28 03:42:59 2024 ; ; CPU: Intel 8048 (MCS-48 family) ; ; ; org 00000H ; 0000 L0000: 0000 : 00 " " nop 0001 : E4 DA " " jmp L07DA 0003 : 24 02 "$ " jmp L0102 ; 0005 : 00 " " nop 0006 : 00 " " nop 0007 : 00 " " nop 0008 : 00 " " nop 0009 L0009: 0009 : C5 " " sel rb0 000A L000A: 000A : B8 32 " 2" mov r0,#032H 000C : F0 " " mov a,@r0 000D : 37 "7" cpl a 000E : 12 26 " &" jb0 L0026 0010 : B9 3C " <" mov r1,#03CH 0012 : F1 " " mov a,@r1 0013 : 53 03 "S " anl a,#003H 0015 : C6 19 " " jz L0019 0017 : 54 02 "T " call L0202 0019 L0019: 0019 : B8 32 " 2" mov r0,#032H 001B : F0 " " mov a,@r0 001C : 32 26 "2&" jb1 L0026 001E : 14 8E " " call L008E 0020 : 15 " " dis i 0021 : 23 F0 "# " mov a,#0F0H 0023 : 14 C8 " " call L00C8 0025 : 05 " " en i 0026 L0026: 0026 : B8 32 " 2" mov r0,#032H 0028 : F0 " " mov a,@r0 0029 : 37 "7" cpl a 002A : 32 51 "2Q" jb1 L0051 002C : F0 " " mov a,@r0 002D : 37 "7" cpl a 002E : 92 3A " :" jb4 L003A 0030 : 94 0C " " call L040C 0032 : B8 32 " 2" mov r0,#032H 0034 : 23 EF "# " mov a,#0EFH 0036 : D4 87 " " call L0687 0038 : 04 51 " Q" jmp L0051 ; 003A L003A: 003A : 09 " " in a,p1 003B : AA " " mov r2,a 003C : 09 " " in a,p1 003D : DA " " xrl a,r2 003E : F2 3A " :" jb7 L003A 0040 : B8 20 " " mov r0,#020H 0042 : F0 " " mov a,@r0 0043 : F2 51 " Q" jb7 L0051 0045 : FA " " mov a,r2 0046 : 37 "7" cpl a 0047 : F2 51 " Q" jb7 L0051 0049 : 94 0C " " call L040C 004B : B8 20 " " mov r0,#020H 004D : F0 " " mov a,@r0 004E : 43 80 "C " orl a,#080H 0050 : A0 " " mov @r0,a 0051 L0051: 0051 : B8 20 " " mov r0,#020H 0053 : F0 " " mov a,@r0 0054 : 37 "7" cpl a 0055 : F2 66 " f" jb7 L0066 0057 L0057: 0057 : 09 " " in a,p1 0058 : AA " " mov r2,a 0059 : 09 " " in a,p1 005A : DA " " xrl a,r2 005B : F2 57 " W" jb7 L0057 005D : FA " " mov a,r2 005E : F2 66 " f" jb7 L0066 0060 : B8 20 " " mov r0,#020H 0062 : F0 " " mov a,@r0 0063 : 53 7F "S " anl a,#07FH 0065 : A0 " " mov @r0,a 0066 L0066: 0066 : B4 72 " r" call L0572 0068 : B8 32 " 2" mov r0,#032H 006A : F0 " " mov a,@r0 006B : 37 "7" cpl a 006C : B2 70 " p" jb5 L0070 006E : D4 02 " " call L0602 0070 L0070: 0070 : B8 32 " 2" mov r0,#032H 0072 : F0 " " mov a,@r0 0073 : 53 33 "S3" anl a,#033H 0075 : D3 10 " " xrl a,#010H 0077 : 96 88 " " jnz L0088 0079 : F0 " " mov a,@r0 007A : 52 86 "R " jb2 L0086 007C : 15 " " dis i 007D : F0 " " mov a,@r0 007E : 43 04 "C " orl a,#004H 0080 : A0 " " mov @r0,a 0081 : 23 F1 "# " mov a,#0F1H 0083 : 14 C8 " " call L00C8 0085 : 05 " " en i 0086 L0086: 0086 : 04 8C " " jmp L008C ; 0088 L0088: 0088 : 23 FB "# " mov a,#0FBH 008A : D4 87 " " call L0687 008C L008C: 008C : 04 0A " " jmp L000A ; 008E L008E: 008E : B9 35 " 5" mov r1,#035H 0090 : B8 21 " !" mov r0,#021H 0092 L0092: 0092 : F1 " " mov a,@r1 0093 : A0 " " mov @r0,a 0094 : 18 " " inc r0 0095 : 19 " " inc r1 0096 : F8 " " mov a,r0 0097 : D3 2B " +" xrl a,#02BH 0099 : 96 92 " " jnz L0092 009B : 15 " " dis i 009C : B8 32 " 2" mov r0,#032H 009E : F0 " " mov a,@r0 009F : 53 FE "S " anl a,#0FEH 00A1 : 43 02 "C " orl a,#002H 00A3 L00A3: 00A3 : A0 " " mov @r0,a 00A4 : 05 " " en i 00A5 : 83 " " ret ; 00A6 L00A6: 00A6 : C5 " " sel rb0 00A7 : C6 B3 " " jz L00B3 00A9 : AF " " mov r7,a 00AA L00AA: 00AA : 08 " " ins a,bus 00AB : 08 " " ins a,bus 00AC : 08 " " ins a,bus 00AD : 86 B1 " " jni L00B1 00AF : EF AA " " djnz r7,L00AA 00B1 L00B1: 00B1 : 04 B7 " " jmp L00B7 ; 00B3 L00B3: 00B3 : 86 B7 " " jni L00B7 00B5 : 04 B3 " " jmp L00B3 ; 00B7 L00B7: 00B7 : 86 BB " " jni L00BB 00B9 : 04 C4 " " jmp L00C4 ; 00BB L00BB: 00BB : 9A F7 " " anl p2,#0F7H 00BD : 08 " " ins a,bus 00BE : 8A 08 " " orl p2,#008H 00C0 : BF 00 " " mov r7,#000H 00C2 : 04 C6 " " jmp L00C6 ; 00C4 L00C4: 00C4 : BF F5 " " mov r7,#0F5H 00C6 L00C6: 00C6 : D5 " " sel rb1 00C7 : 83 " " ret ; 00C8 L00C8: 00C8 : A8 " " mov r0,a 00C9 L00C9: 00C9 : 0A " " in a,p2 00CA : F2 C9 " " jb7 L00C9 00CC : 0A " " in a,p2 00CD : F2 C9 " " jb7 L00C9 00CF : F8 " " mov a,r0 00D0 : 90 " " movx @r0,a 00D1 : 9A FB " " anl p2,#0FBH 00D3 : 8A 04 " " orl p2,#004H 00D5 : 83 " " ret ; 00D6 L00D6: 00D6 : B8 20 " " mov r0,#020H 00D8 : F0 " " mov a,@r0 00D9 : 43 40 "C@" orl a,#040H 00DB : A0 " " mov @r0,a 00DC : 27 "'" clr a 00DD : AE " " mov r6,a 00DE L00DE: 00DE : 14 A6 " " call L00A6 00E0 : D3 FF " " xrl a,#0FFH 00E2 : 96 E5 " " jnz L00E5 00E4 : 1E " " inc r6 00E5 L00E5: 00E5 : FE " " mov a,r6 00E6 : 03 FC " " add a,#0FCH 00E8 : E6 DE " " jnc L00DE 00EA : 83 " " ret ; 00EB : FF " " mov a,r7 00EC : FF " " mov a,r7 00ED : FF " " mov a,r7 00EE : FF " " mov a,r7 00EF : FF " " mov a,r7 00F0 : FF " " mov a,r7 00F1 : FF " " mov a,r7 00F2 : FF " " mov a,r7 00F3 : FF " " mov a,r7 00F4 : FF " " mov a,r7 00F5 : FF " " mov a,r7 00F6 : FF " " mov a,r7 00F7 : FF " " mov a,r7 00F8 : FF " " mov a,r7 00F9 : FF " " mov a,r7 00FA : FF " " mov a,r7 00FB : FF " " mov a,r7 00FC : FF " " mov a,r7 00FD : FF " " mov a,r7 00FE : FF " " mov a,r7 00FF : FF " " mov a,r7 0100 : 04 00 " " jmp L0000 ; 0102 L0102: 0102 : 86 06 " " jni L0106 0104 : 24 9C "$ " jmp L019C ; 0106 L0106: 0106 : D5 " " sel rb1 0107 : AF " " mov r7,a 0108 : B8 20 " " mov r0,#020H 010A : F0 " " mov a,@r0 010B : 53 40 "S@" anl a,#040H 010D : 96 14 " " jnz L0114 010F : 27 "'" clr a 0110 : 14 A6 " " call L00A6 0112 : 24 21 "$!" jmp L0121 ; 0114 L0114: 0114 : F0 " " mov a,@r0 0115 : 53 BF "S " anl a,#0BFH 0117 : A0 " " mov @r0,a 0118 L0118: 0118 : 27 "'" clr a 0119 : 14 A6 " " call L00A6 011B : D3 FF " " xrl a,#0FFH 011D : C6 18 " " jz L0118 011F : D3 FF " " xrl a,#0FFH 0121 L0121: 0121 : F2 63 " c" jb7 L0163 0123 : B8 35 " 5" mov r0,#035H 0125 : A0 " " mov @r0,a 0126 L0126: 0126 : 18 " " inc r0 0127 : 23 F0 "# " mov a,#0F0H 0129 : 14 A6 " " call L00A6 012B : A0 " " mov @r0,a 012C : C5 " " sel rb0 012D : FF " " mov a,r7 012E : D5 " " sel rb1 012F : 96 36 " 6" jnz L0136 0131 : F8 " " mov a,r0 0132 : D3 3F " ?" xrl a,#03FH 0134 : 96 26 " &" jnz L0126 0136 L0136: 0136 : C5 " " sel rb0 0137 : FF " " mov a,r7 0138 : D5 " " sel rb1 0139 : C6 43 " C" jz L0143 013B : 23 F5 "# " mov a,#0F5H 013D : 14 C8 " " call L00C8 013F : 14 D6 " " call L00D6 0141 : 24 61 "$a" jmp L0161 ; 0143 L0143: 0143 : B8 35 " 5" mov r0,#035H 0145 : BE 00 " " mov r6,#000H 0147 L0147: 0147 : F0 " " mov a,@r0 0148 : 6E "n" add a,r6 0149 : AE " " mov r6,a 014A : 18 " " inc r0 014B : F8 " " mov a,r0 014C : D3 40 " @" xrl a,#040H 014E : 96 47 " G" jnz L0147 0150 : FE " " mov a,r6 0151 : C6 5B " [" jz L015B 0153 : 23 F4 "# " mov a,#0F4H 0155 : 14 C8 " " call L00C8 0157 : 14 D6 " " call L00D6 0159 : 24 61 "$a" jmp L0161 ; 015B L015B: 015B : B8 32 " 2" mov r0,#032H 015D : F0 " " mov a,@r0 015E : 43 01 "C " orl a,#001H 0160 : A0 " " mov @r0,a 0161 L0161: 0161 : 24 9B "$ " jmp L019B ; 0163 L0163: 0163 : AE " " mov r6,a 0164 : 37 "7" cpl a 0165 : D2 79 " y" jb6 L0179 0167 : 27 "'" clr a 0168 : 14 A6 " " call L00A6 016A L016A: 016A : B8 33 " 3" mov r0,#033H 016C : A0 " " mov @r0,a 016D : 53 18 "S " anl a,#018H 016F : D3 10 " " xrl a,#010H 0171 : 96 79 " y" jnz L0179 0173 : 27 "'" clr a 0174 : 14 A6 " " call L00A6 0176 : B8 34 " 4" mov r0,#034H 0178 : A0 " " mov @r0,a 0179 L0179: 0179 : FE " " mov a,r6 017A : 53 03 "S " anl a,#003H 017C : C6 95 " " jz L0195 017E : D3 01 " " xrl a,#001H 0180 : C6 88 " " jz L0188 0182 : D3 03 " " xrl a,#003H 0184 : C6 8C " " jz L018C 0186 : 24 90 "$ " jmp L0190 ; 0188 L0188: 0188 : B8 32 " 2" mov r0,#032H 018A : 24 92 "$ " jmp L0192 ; 018C L018C: 018C : B8 31 " 1" mov r0,#031H 018E : 24 92 "$ " jmp L0192 ; 0190 L0190: 0190 : B8 30 " 0" mov r0,#030H 0192 L0192: 0192 : F0 " " mov a,@r0 0193 : 14 C8 " " call L00C8 0195 L0195: 0195 : FE " " mov a,r6 0196 : 37 "7" cpl a 0197 : D2 9B " " jb6 L019B 0199 : 34 9D "4 " call L019D 019B L019B: 019B : FF " " mov a,r7 019C L019C: 019C : 93 " " retr ; 019D L019D: 019D : B8 33 " 3" mov r0,#033H 019F : F0 " " mov a,@r0 01A0 : 53 E0 "S " anl a,#0E0H 01A2 : D3 E0 " " xrl a,#0E0H 01A4 : 96 AA " " jnz L01AA 01A6 : F4 22 " "" call L0722 01A8 : 24 DF "$ " jmp L01DF ; 01AA L01AA: 01AA : F0 " " mov a,@r0 01AB : 53 E0 "S " anl a,#0E0H 01AD : D3 C0 " " xrl a,#0C0H 01AF : 96 B7 " " jnz L01B7 01B1 : 23 F6 "# " mov a,#0F6H 01B3 : 14 C8 " " call L00C8 01B5 : 24 DF "$ " jmp L01DF ; 01B7 L01B7: 01B7 : F0 " " mov a,@r0 01B8 : B8 2B " +" mov r0,#02BH 01BA : A0 " " mov @r0,a 01BB : 94 73 " s" call L0473 01BD : B8 33 " 3" mov r0,#033H 01BF : F0 " " mov a,@r0 01C0 : 53 18 "S " anl a,#018H 01C2 : C6 DF " " jz L01DF 01C4 : D3 10 " " xrl a,#010H 01C6 : C6 DF " " jz L01DF 01C8 : B8 2B " +" mov r0,#02BH 01CA : D3 18 " " xrl a,#018H 01CC : 96 DC " " jnz L01DC 01CE : F0 " " mov a,@r0 01CF : 47 "G" swap a 01D0 : A0 " " mov @r0,a 01D1 : B8 33 " 3" mov r0,#033H 01D3 : F0 " " mov a,@r0 01D4 : 77 "w" rr a 01D5 : 53 70 "Sp" anl a,#070H 01D7 : B8 2B " +" mov r0,#02BH 01D9 : 30 "0" xchd a,@r0 01DA : 24 DD "$ " jmp L01DD ; 01DC L01DC: 01DC : F0 " " mov a,@r0 01DD L01DD: 01DD : 14 C8 " " call L00C8 01DF L01DF: 01DF : 83 " " ret ; 01E0 : FF " " mov a,r7 01E1 : FF " " mov a,r7 01E2 : FF " " mov a,r7 01E3 : FF " " mov a,r7 01E4 : FF " " mov a,r7 01E5 : FF " " mov a,r7 01E6 : FF " " mov a,r7 01E7 : FF " " mov a,r7 01E8 : FF " " mov a,r7 01E9 : FF " " mov a,r7 01EA : FF " " mov a,r7 01EB : FF " " mov a,r7 01EC : FF " " mov a,r7 01ED : FF " " mov a,r7 01EE : FF " " mov a,r7 01EF : FF " " mov a,r7 01F0 : FF " " mov a,r7 01F1 : FF " " mov a,r7 01F2 : FF " " mov a,r7 01F3 : FF " " mov a,r7 01F4 : FF " " mov a,r7 01F5 : FF " " mov a,r7 01F6 : FF " " mov a,r7 01F7 : FF " " mov a,r7 01F8 : FF " " mov a,r7 01F9 : FF " " mov a,r7 01FA : FF " " mov a,r7 01FB : FF " " mov a,r7 01FC : FF " " mov a,r7 01FD : FF " " mov a,r7 01FE : FF " " mov a,r7 01FF : FF " " mov a,r7 0200 : 04 00 " " jmp L0000 ; 0202 L0202: 0202 : C5 " " sel rb0 0203 : 85 " " clr f0 0204 : B8 2C " ," mov r0,#02CH 0206 : F0 " " mov a,@r0 0207 : 72 0A "r " jb3 L020A 0209 : 95 " " cpl f0 020A L020A: 020A : B9 3A " :" mov r1,#03AH 020C : F1 " " mov a,@r1 020D : 53 38 "S8" anl a,#038H 020F : D3 08 " " xrl a,#008H 0211 : 96 1A " " jnz L021A 0213 : F0 " " mov a,@r0 0214 : 53 F7 "S " anl a,#0F7H 0216 : 85 " " clr f0 0217 : 95 " " cpl f0 0218 : 44 1D "D " jmp L021D ; 021A L021A: 021A : F0 " " mov a,@r0 021B : 43 08 "C " orl a,#008H 021D L021D: 021D : AA " " mov r2,a 021E : B8 3B " ;" mov r0,#03BH 0220 : F0 " " mov a,@r0 0221 : 53 7E "S~" anl a,#07EH 0223 : 96 31 " 1" jnz L0231 0225 : FA " " mov a,r2 0226 : 12 2C " ," jb0 L022C 0228 : 1A " " inc r2 0229 : 27 "'" clr a 022A : 44 2F "D/" jmp L022F ; 022C L022C: 022C : 85 " " clr f0 022D : 95 " " cpl f0 022E : 27 "'" clr a 022F L022F: 022F : 44 35 "D5" jmp L0235 ; 0231 L0231: 0231 : 2A "*" xch a,r2 0232 : 53 FE "S " anl a,#0FEH 0234 : 2A "*" xch a,r2 0235 L0235: 0235 : 77 "w" rr a 0236 : 17 " " inc a 0237 : 17 " " inc a 0238 : E3 " " movp3 a,@a 0239 : B6 3D " =" jf0 L023D 023B : 44 3E "D>" jmp L023E ; 023D L023D: 023D : 47 "G" swap a 023E L023E: 023E : 53 0F "S " anl a,#00FH 0240 : AB " " mov r3,a 0241 : 03 CB " " add a,#0CBH 0243 : A3 " " movp a,@a 0244 : A9 " " mov r1,a 0245 : B8 3C " <" mov r0,#03CH 0247 : F0 " " mov a,@r0 0248 L0248: 0248 : 37 "7" cpl a 0249 : 12 8D " " jb0 L028D 024B L024B: 024B : B8 3D " =" mov r0,#03DH 024D : F0 " " mov a,@r0 024E : 53 0F "S " anl a,#00FH 0250 : 96 5F " _" jnz L025F 0252 : B8 3E " >" mov r0,#03EH 0254 : FB " " mov a,r3 0255 L0255: 0255 : 03 DB " " add a,#0DBH 0257 L0257: 0257 : A3 " " movp a,@a 0258 : AB " " mov r3,a 0259 : F0 " " mov a,@r0 025A : F2 5F " _" jb7 L025F 025C : 6B "k" add a,r3 025D : F2 63 " c" jb7 L0263 025F L025F: 025F : 23 0F "# " mov a,#00FH 0261 : 44 8B "D " jmp L028B ; 0263 L0263: 0263 : F0 " " mov a,@r0 0264 : 03 F4 " " add a,#0F4H 0266 : F2 8A " " jb7 L028A 0268 : 77 "w" rr a 0269 : 77 "w" rr a 026A L026A: 026A : 53 0F "S " anl a,#00FH 026C : 69 "i" add a,r1 026D : E3 " " movp3 a,@a 026E : A9 " " mov r1,a 026F : FA " " mov a,r2 0270 : 77 "w" rr a 0271 : 53 03 "S " anl a,#003H 0273 : C6 87 " " jz L0287 0275 : 12 80 " " jb0 L0280 0277 : F9 " " mov a,r1 0278 : 47 "G" swap a 0279 : 77 "w" rr a 027A : 77 "w" rr a 027B : 53 03 "S " anl a,#003H 027D : 69 "i" add a,r1 027E : 44 85 "D " jmp L0285 ; 0280 L0280: 0280 : F9 " " mov a,r1 0281 : 47 "G" swap a 0282 : 53 03 "S " anl a,#003H 0284 : 69 "i" add a,r1 0285 L0285: 0285 : 44 88 "D " jmp L0288 ; 0287 L0287: 0287 : F9 " " mov a,r1 0288 L0288: 0288 : 44 8B "D " jmp L028B ; 028A L028A: 028A : 27 "'" clr a 028B L028B: 028B : 44 90 "D " jmp L0290 ; 028D L028D: 028D : F0 " " mov a,@r0 028E : 77 "w" rr a 028F : 77 "w" rr a 0290 L0290: 0290 : 53 0F "S " anl a,#00FH 0292 : A9 " " mov r1,a 0293 : F9 " " mov a,r1 0294 : 03 F9 " " add a,#0F9H 0296 : 37 "7" cpl a 0297 : F2 A1 " " jb7 L02A1 0299 : FA " " mov a,r2 029A : 53 F9 "S " anl a,#0F9H 029C : 43 04 "C " orl a,#004H 029E : AA " " mov r2,a 029F : 44 B6 "D " jmp L02B6 ; 02A1 L02A1: 02A1 : F9 " " mov a,r1 02A2 : 03 F5 " " add a,#0F5H 02A4 : F2 A8 " " jb7 L02A8 02A6 : 44 B0 "D " jmp L02B0 ; 02A8 L02A8: 02A8 : FA " " mov a,r2 02A9 : 53 F9 "S " anl a,#0F9H 02AB : 43 02 "C " orl a,#002H 02AD : AA " " mov r2,a 02AE : 44 B4 "D " jmp L02B4 ; 02B0 L02B0: 02B0 : FA " " mov a,r2 02B1 : 53 F9 "S " anl a,#0F9H 02B3 : AA " " mov r2,a 02B4 L02B4: 02B4 : 44 B6 "D " jmp L02B6 ; 02B6 L02B6: 02B6 : FA " " mov a,r2 02B7 : B8 2C " ," mov r0,#02CH 02B9 : A0 " " mov @r0,a 02BA : 37 "7" cpl a 02BB : B6 BF " " jf0 L02BF 02BD : 12 C4 " " jb0 L02C4 02BF L02BF: 02BF : F9 " " mov a,r1 02C0 : 96 C4 " " jnz L02C4 02C2 : B9 10 " " mov r1,#010H 02C4 L02C4: 02C4 : B8 3C " <" mov r0,#03CH 02C6 : 29 ")" xch a,r1 02C7 : E7 " " rl a 02C8 : E7 " " rl a 02C9 : A0 " " mov @r0,a 02CA : 83 " " ret ; 02CB : 33 "3" db 033H ; 02CC : 36 3A "6:" jt0 L023A 02CE : 3E ">" movd p6,a 02CF : 42 "B" mov a,t 02D0 : 46 4B "FK" jnt1 L024B 02D2 : 50 "P" anl a,@r0 02D3 : 55 "U" strt t 02D4 : 5B "[" anl a,r3 02D5 : 62 "b" mov t,a 02D6 : 69 "i" add a,r1 02D7 : 71 "q" addc a,@r1 02D8 : 7B "{" addc a,r3 ; 02D9 : 87 " " db 087H ; 02DA : 94 E8 " " call L04E8 02DC : E4 E4 " " jmp L07E4 02DE : E4 E4 " " jmp L07E4 ; 02E0 : E0 E0 E0 " " db 0E0H, 0E0H, 0E0H ; 02E3 : DC " " xrl a,r4 02E4 : D8 " " xrl a,r0 02E5 : D8 " " xrl a,r0 02E6 : D4 CC " " call L06CC 02E8 : C4 C0 " " jmp L06C0 ; 02EA : BC FF " " mov r4,#0FFH 02EC : FF " " mov a,r7 02ED : FF " " mov a,r7 02EE : FF " " mov a,r7 02EF : FF " " mov a,r7 02F0 : FF " " mov a,r7 02F1 : FF " " mov a,r7 02F2 : FF " " mov a,r7 02F3 : FF " " mov a,r7 02F4 : FF " " mov a,r7 02F5 : FF " " mov a,r7 02F6 : FF " " mov a,r7 02F7 : FF " " mov a,r7 02F8 : FF " " mov a,r7 02F9 : FF " " mov a,r7 02FA : FF " " mov a,r7 02FB : FF " " mov a,r7 02FC : FF " " mov a,r7 02FD : FF " " mov a,r7 02FE : FF " " mov a,r7 02FF : FF " " mov a,r7 0300 : 04 00 " " jmp L0000 ; 0302 : 80 " " movx a,@r0 0303 : 80 " " movx a,@r0 0304 : 80 " " movx a,@r0 0305 : 80 " " movx a,@r0 0306 : 81 " " movx a,@r1 ; 0307 : 82 " " db 082H ; 0308 L0308: 0308 : 83 " " ret 0309 : 84 85 " " jmp L0485 ; 030B : 96 97 " " jnz L0397 030D : 98 99 " " anl bus,#099H 030F : A9 " " mov r1,a 0310 : A9 " " mov r1,a 0311 : A9 " " mov r1,a 0312 : A9 " " mov r1,a 0313 : BA BA " " mov r2,#0BAH 0315 : BA BA " " mov r2,#0BAH 0317 : CB " " dec r3 0318 : CB " " dec r3 0319 : CB " " dec r3 031A : CB " " dec r3 031B : CC " " dec r4 031C : CC " " dec r4 031D : CC " " dec r4 031E : CC " " dec r4 031F : DC " " xrl a,r4 0320 : DC " " xrl a,r4 0321 : DC " " xrl a,r4 0322 : DC " " xrl a,r4 0323 : DD " " xrl a,r5 0324 : DD " " xrl a,r5 0325 : DD " " xrl a,r5 0326 : DD " " xrl a,r5 0327 : DD " " xrl a,r5 0328 : ED ED " " djnz r5,L03ED 032A : ED ED " " djnz r5,L03ED 032C : EE FE " " djnz r6,L03FE 032E : FE " " mov a,r6 032F : FE " " mov a,r6 0330 : FE " " mov a,r6 0331 : FF " " mov a,r7 0332 : FF " " mov a,r7 0333 : 05 " " en i 0334 : A4 99 " " jmp L0599 0336 : 04 A3 " " jmp L00A3 ; 0338 : 58 "X" anl a,r0 0339 : 8D " " orld p5,a 033A : 04 A3 " " jmp L00A3 ; 033C : 58 "X" anl a,r0 033D : DC " " xrl a,r4 033E : 03 E2 " " add a,#0E2H 0340 : 57 "W" da a 0341 : 4B "K" orl a,r3 0342 : 03 A2 " " add a,#0A2H 0344 : 56 5A "VZ" jt1 L035A 0346 : 02 " " outl bus,a 0347 : F0 " " mov a,@r0 0348 : 95 " " cpl f0 0349 : 59 "Y" anl a,r1 034A : 9D " " anld p5,a 034B : 02 " " outl bus,a 034C : F0 " " mov a,@r0 034D : 55 "U" strt t 034E : 09 " " in a,p1 034F : 8C " " orld p4,a 0350 : 02 " " outl bus,a 0351 : F0 " " mov a,@r0 0352 : 54 48 "TH" call L0248 0354 : 4B "K" orl a,r3 0355 L0355: 0355 : 02 " " outl bus,a ; 0356 : E0 " " db 0E0H ; 0357 : 54 57 "TW" call L0257 ; 0359 : 0B " " db 00BH ; 035A L035A: 035A : 5E "^" anl a,r6 ; 035B : 01 " " db 001H ; 035C : 90 " " movx @r0,a 035D : 92 55 " U" jb4 L0355 035F : 48 "H" orl a,r0 0360 : 4B "K" orl a,r3 0361 : 5E "^" anl a,r6 ; 0362 : 01 " " db 001H ; 0363 : 90 " " movx @r0,a 0364 : A1 " " mov @r1,a 0365 : 54 56 "TV" call L0256 0367 : 09 " " in a,p1 0368 : 0C " " movd a,p4 ; 0369 : 01 " " db 001H ; 036A : 50 "P" anl a,@r0 036B : 91 " " movx @r1,a 036C : 53 45 "SE" anl a,#045H 036E : 57 "W" da a 036F : 0A " " in a,p2 0370 : 4C "L" orl a,r4 0371 : 00 " " nop 0372 : 40 "@" orl a,@r0 0373 : 90 " " movx @r0,a 0374 : 42 "B" mov a,t 0375 : 53 05 "S " anl a,#005H 0377 : 07 " " dec a 0378 : 09 " " in a,p1 ; 0379 : 0B " " db 00BH ; 037A : 4D "M" orl a,r5 037B : 00 " " nop 037C : 00 " " nop 037D : 50 "P" anl a,@r0 037E : 51 "Q" anl a,@r1 037F : 52 53 "RS" jb2 L0353 0381 : 05 " " en i 0382 : 56 08 "V " jt1 L0308 0384 : 0A " " in a,p2 0385 : 0C " " movd a,p4 0386 : 4E "N" orl a,r6 0387 : 00 " " nop 0388 : 00 " " nop 0389 : 40 "@" orl a,@r0 038A : 41 "A" orl a,@r1 038B : 91 " " movx @r1,a 038C : 03 44 " D" add a,#044H 038E : 45 "E" strt cnt 038F : 07 " " dec a 0390 : 58 "X" anl a,r0 0391 : 0A " " in a,p2 0392 : 0C " " movd a,p4 0393 : 4E "N" orl a,r6 0394 : 00 " " nop 0395 : 00 " " nop 0396 : 40 "@" orl a,@r0 0397 L0397: 0397 : 50 "P" anl a,@r0 0398 : 51 "Q" anl a,@r1 0399 : 52 53 "RS" jb2 L0353 039B : 54 55 "TU" call L0255 039D : 07 " " dec a 039E : 09 " " in a,p1 039F : 4A "J" orl a,r2 03A0 : 0C " " movd a,p4 03A1 : 0E " " movd a,p6 03A2 : FF " " mov a,r7 03A3 : FF " " mov a,r7 03A4 : FF " " mov a,r7 03A5 : FF " " mov a,r7 03A6 : FF " " mov a,r7 03A7 : FF " " mov a,r7 03A8 : FF " " mov a,r7 03A9 : FF " " mov a,r7 03AA : FF " " mov a,r7 03AB : FF " " mov a,r7 03AC : FF " " mov a,r7 03AD : FF " " mov a,r7 03AE : FF " " mov a,r7 03AF : FF " " mov a,r7 03B0 : FF " " mov a,r7 03B1 : FF " " mov a,r7 03B2 : FF " " mov a,r7 03B3 : FF " " mov a,r7 03B4 : FF " " mov a,r7 03B5 : FF " " mov a,r7 03B6 : FF " " mov a,r7 03B7 : FF " " mov a,r7 03B8 : FF " " mov a,r7 03B9 : FF " " mov a,r7 03BA : FF " " mov a,r7 03BB : FF " " mov a,r7 03BC : FF " " mov a,r7 03BD : FF " " mov a,r7 03BE : FF " " mov a,r7 03BF : FF " " mov a,r7 03C0 : FF " " mov a,r7 03C1 : FF " " mov a,r7 03C2 : FF " " mov a,r7 03C3 : FF " " mov a,r7 03C4 : FF " " mov a,r7 03C5 : FF " " mov a,r7 03C6 : FF " " mov a,r7 03C7 : FF " " mov a,r7 03C8 : FF " " mov a,r7 03C9 : FF " " mov a,r7 03CA : FF " " mov a,r7 03CB : FF " " mov a,r7 03CC : FF " " mov a,r7 03CD : FF " " mov a,r7 03CE : FF " " mov a,r7 03CF : FF " " mov a,r7 03D0 : FF " " mov a,r7 03D1 : FF " " mov a,r7 03D2 : FF " " mov a,r7 03D3 : FF " " mov a,r7 03D4 : FF " " mov a,r7 03D5 : FF " " mov a,r7 03D6 : FF " " mov a,r7 03D7 : FF " " mov a,r7 03D8 : FF " " mov a,r7 03D9 : FF " " mov a,r7 03DA : FF " " mov a,r7 03DB : FF " " mov a,r7 03DC : FF " " mov a,r7 03DD : FF " " mov a,r7 03DE : FF " " mov a,r7 03DF : FF " " mov a,r7 03E0 : FF " " mov a,r7 03E1 : FF " " mov a,r7 03E2 : FF " " mov a,r7 03E3 : FF " " mov a,r7 03E4 : FF " " mov a,r7 03E5 : FF " " mov a,r7 03E6 : FF " " mov a,r7 03E7 : FF " " mov a,r7 03E8 : FF " " mov a,r7 03E9 : FF " " mov a,r7 03EA : FF " " mov a,r7 03EB : FF " " mov a,r7 03EC : FF " " mov a,r7 03ED L03ED: 03ED : FF " " mov a,r7 03EE : FF " " mov a,r7 03EF : FF " " mov a,r7 03F0 : FF " " mov a,r7 03F1 : FF " " mov a,r7 03F2 : FF " " mov a,r7 03F3 : FF " " mov a,r7 03F4 : FF " " mov a,r7 03F5 : FF " " mov a,r7 03F6 : FF " " mov a,r7 03F7 : FF " " mov a,r7 03F8 : FF " " mov a,r7 03F9 : FF " " mov a,r7 03FA : FF " " mov a,r7 03FB : FF " " mov a,r7 03FC : FF " " mov a,r7 03FD : FF " " mov a,r7 03FE L03FE: 03FE : FF " " mov a,r7 03FF : FF " " mov a,r7 0400 : 04 00 " " jmp L0000 ; 0402 : 58 "X" anl a,r0 0403 : 48 "H" orl a,r0 ; 0404 : 38 "8" db 038H ; 0405 : 26 28 "&(" jnt0 L0428 0407 : 15 " " dis i 0408 : 17 " " inc a ; 0409 : 06 " " db 006H ; 040A : 08 " " ins a,bus 040B : 08 " " ins a,bus 040C L040C: 040C : 16 0E " " jtf L040E 040E L040E: 040E : 23 E7 "# " mov a,#0E7H 0410 : 62 "b" mov t,a 0411 : 55 "U" strt t 0412 : B9 21 " !" mov r1,#021H 0414 : BA 02 " " mov r2,#002H 0416 L0416: 0416 : F1 " " mov a,@r1 0417 : C6 1F " " jz L041F 0419 : BB 01 " " mov r3,#001H 041B : 94 5E " ^" call L045E 041D : 84 21 " !" jmp L0421 ; 041F L041F: 041F : 19 " " inc r1 0420 : 1A " " inc r2 0421 L0421: 0421 : FA " " mov a,r2 0422 : A3 " " movp a,@a 0423 : 53 F0 "S " anl a,#0F0H 0425 : D3 20 " " xrl a,#020H 0427 : 96 16 " " jnz L0416 0429 : F1 " " mov a,@r1 042A : 96 31 " 1" jnz L0431 042C : 19 " " inc r1 042D : F1 " " mov a,@r1 042E : C6 35 " 5" jz L0435 0430 : C9 " " dec r1 0431 L0431: 0431 : BB 02 " " mov r3,#002H 0433 : 94 5E " ^" call L045E 0435 L0435: 0435 : 16 4A " J" jtf L044A 0437 : B9 32 " 2" mov r1,#032H 0439 : F1 " " mov a,@r1 043A : 37 "7" cpl a 043B : 12 46 " F" jb0 L0446 043D : B9 3C " <" mov r1,#03CH 043F : F1 " " mov a,@r1 0440 : 53 03 "S " anl a,#003H 0442 : C6 46 " F" jz L0446 0444 : 54 02 "T " call L0202 0446 L0446: 0446 : B4 72 " r" call L0572 0448 : 84 35 " 5" jmp L0435 ; 044A L044A: 044A : 65 "e" stop tcnt 044B : B9 26 " &" mov r1,#026H 044D : BA 07 " " mov r2,#007H 044F : BB 02 " " mov r3,#002H 0451 : 94 5E " ^" call L045E 0453 : BB 03 " " mov r3,#003H 0455 : 94 5E " ^" call L045E 0457 : B8 32 " 2" mov r0,#032H 0459 : 23 FD "# " mov a,#0FDH 045B : D4 87 " " call L0687 045D : 83 " " ret ; 045E L045E: 045E : 15 " " dis i 045F : FA " " mov a,r2 0460 : A3 " " movp a,@a 0461 : 53 F0 "S " anl a,#0F0H 0463 : 47 "G" swap a 0464 : AC " " mov r4,a 0465 : A5 " " clr f1 0466 L0466: 0466 : FA " " mov a,r2 0467 : A3 " " movp a,@a 0468 : 53 0F "S " anl a,#00FH 046A : AD " " mov r5,a 046B : B4 39 " 9" call L0539 046D : 19 " " inc r1 046E : 1A " " inc r2 046F : EB 66 " f" djnz r3,L0466 0471 : 05 " " en i 0472 : 83 " " ret ; 0473 L0473: 0473 : B9 2B " +" mov r1,#02BH 0475 : BD 06 " " mov r5,#006H 0477 : F1 " " mov a,@r1 0478 : AA " " mov r2,a 0479 : 77 "w" rr a 047A : 53 70 "Sp" anl a,#070H 047C : 47 "G" swap a 047D : AC " " mov r4,a 047E : F1 " " mov a,@r1 047F : E7 " " rl a 0480 : E7 " " rl a 0481 : 43 80 "C " orl a,#080H 0483 : A1 " " mov @r1,a 0484 : BB 01 " " mov r3,#001H 0486 : A5 " " clr f1 0487 : B4 39 " 9" call L0539 0489 : FA " " mov a,r2 048A : 53 18 "S " anl a,#018H 048C : C6 A6 " " jz L04A6 048E : D3 10 " " xrl a,#010H 0490 : 96 9A " " jnz L049A 0492 : B9 34 " 4" mov r1,#034H 0494 : BD 08 " " mov r5,#008H 0496 : B4 39 " 9" call L0539 0498 : 84 A6 " " jmp L04A6 ; 049A L049A: 049A : D3 18 " " xrl a,#018H 049C : 96 A2 " " jnz L04A2 049E : BD 04 " " mov r5,#004H 04A0 : 84 A4 " " jmp L04A4 ; 04A2 L04A2: 04A2 : BD 08 " " mov r5,#008H 04A4 L04A4: 04A4 : B4 02 " " call L0502 04A6 L04A6: 04A6 : 83 " " ret ; 04A7 : FF " " mov a,r7 04A8 : FF " " mov a,r7 04A9 : FF " " mov a,r7 04AA : FF " " mov a,r7 04AB : FF " " mov a,r7 04AC : FF " " mov a,r7 04AD : FF " " mov a,r7 04AE : FF " " mov a,r7 04AF : FF " " mov a,r7 04B0 : FF " " mov a,r7 04B1 : FF " " mov a,r7 04B2 : FF " " mov a,r7 04B3 : FF " " mov a,r7 04B4 : FF " " mov a,r7 04B5 : FF " " mov a,r7 04B6 : FF " " mov a,r7 04B7 : FF " " mov a,r7 04B8 : FF " " mov a,r7 04B9 : FF " " mov a,r7 04BA : FF " " mov a,r7 04BB : FF " " mov a,r7 04BC : FF " " mov a,r7 04BD : FF " " mov a,r7 04BE : FF " " mov a,r7 04BF : FF " " mov a,r7 04C0 : FF " " mov a,r7 04C1 : FF " " mov a,r7 04C2 : FF " " mov a,r7 04C3 : FF " " mov a,r7 04C4 : FF " " mov a,r7 04C5 : FF " " mov a,r7 04C6 : FF " " mov a,r7 04C7 : FF " " mov a,r7 04C8 : FF " " mov a,r7 04C9 : FF " " mov a,r7 04CA : FF " " mov a,r7 04CB : FF " " mov a,r7 04CC : FF " " mov a,r7 04CD : FF " " mov a,r7 04CE : FF " " mov a,r7 04CF : FF " " mov a,r7 04D0 : FF " " mov a,r7 04D1 : FF " " mov a,r7 04D2 : FF " " mov a,r7 04D3 : FF " " mov a,r7 04D4 : FF " " mov a,r7 04D5 : FF " " mov a,r7 04D6 : FF " " mov a,r7 04D7 : FF " " mov a,r7 04D8 : FF " " mov a,r7 04D9 : FF " " mov a,r7 04DA : FF " " mov a,r7 04DB : FF " " mov a,r7 04DC : FF " " mov a,r7 04DD : FF " " mov a,r7 04DE : FF " " mov a,r7 04DF : FF " " mov a,r7 04E0 : FF " " mov a,r7 04E1 : FF " " mov a,r7 04E2 : FF " " mov a,r7 04E3 : FF " " mov a,r7 04E4 : FF " " mov a,r7 04E5 : FF " " mov a,r7 04E6 : FF " " mov a,r7 04E7 : FF " " mov a,r7 04E8 L04E8: 04E8 : FF " " mov a,r7 04E9 : FF " " mov a,r7 04EA : FF " " mov a,r7 04EB : FF " " mov a,r7 04EC : FF " " mov a,r7 04ED : FF " " mov a,r7 04EE : FF " " mov a,r7 04EF : FF " " mov a,r7 04F0 : FF " " mov a,r7 04F1 : FF " " mov a,r7 04F2 : FF " " mov a,r7 04F3 : FF " " mov a,r7 04F4 : FF " " mov a,r7 04F5 : FF " " mov a,r7 04F6 : FF " " mov a,r7 04F7 : FF " " mov a,r7 04F8 : FF " " mov a,r7 04F9 : FF " " mov a,r7 04FA : FF " " mov a,r7 04FB : FF " " mov a,r7 04FC : FF " " mov a,r7 04FD : FF " " mov a,r7 04FE : FF " " mov a,r7 04FF : FF " " mov a,r7 0500 : 04 00 " " jmp L0000 ; 0502 L0502: 0502 : 9A FE " " anl p2,#0FEH 0504 : 27 "'" clr a 0505 : A1 " " mov @r1,a 0506 : FC " " mov a,r4 0507 : E7 " " rl a 0508 : AC " " mov r4,a 0509 : 39 "9" outl p1,a 050A L050A: 050A : 76 1B "v " jf1 L051B 050C L050C: 050C : 09 " " in a,p1 050D : 92 0C " " jb4 L050C 050F : AB " " mov r3,a 0510 : 09 " " in a,p1 0511 : DB " " xrl a,r3 0512 : 92 0C " " jb4 L050C 0514 : 12 0C " " jb0 L050C 0516 : 89 0E " " orl p1,#00EH 0518 : B5 " " cpl f1 0519 : A4 29 " )" jmp L0529 ; 051B L051B: 051B : 09 " " in a,p1 051C : AB " " mov r3,a 051D : 37 "7" cpl a 051E : 92 1B " " jb4 L051B 0520 : 09 " " in a,p1 0521 : DB " " xrl a,r3 0522 : 92 1B " " jb4 L051B 0524 : 12 1B " " jb0 L051B 0526 : FC " " mov a,r4 0527 : 39 "9" outl p1,a 0528 : B5 " " cpl f1 0529 L0529: 0529 : FB " " mov a,r3 052A : 67 "g" rrc a 052B : F1 " " mov a,@r1 052C : 67 "g" rrc a 052D : A1 " " mov @r1,a 052E : ED 0A " " djnz r5,L050A 0530 L0530: 0530 : 09 " " in a,p1 0531 : 92 30 " 0" jb4 L0530 0533 : 09 " " in a,p1 0534 : 92 30 " 0" jb4 L0530 0536 : 89 0E " " orl p1,#00EH 0538 : 83 " " ret ; 0539 L0539: 0539 : FC " " mov a,r4 053A : 43 F8 "C " orl a,#0F8H 053C : AC " " mov r4,a 053D : 8A 01 " " orl p2,#001H 053F L053F: 053F : 76 52 "vR" jf1 L0552 0541 L0541: 0541 : 09 " " in a,p1 0542 : 37 "7" cpl a 0543 : 92 41 " A" jb4 L0541 0545 : 09 " " in a,p1 0546 : 37 "7" cpl a 0547 : 92 41 " A" jb4 L0541 0549 : F1 " " mov a,@r1 054A : F7 " " rlc a 054B : A1 " " mov @r1,a 054C : FC " " mov a,r4 054D : F7 " " rlc a 054E : 39 "9" outl p1,a 054F : B5 " " cpl f1 0550 : A4 60 " `" jmp L0560 ; 0552 L0552: 0552 : 09 " " in a,p1 0553 : 92 52 " R" jb4 L0552 0555 : 09 " " in a,p1 0556 : 92 52 " R" jb4 L0552 0558 : F1 " " mov a,@r1 0559 : F7 " " rlc a 055A : A1 " " mov @r1,a 055B : 23 FF "# " mov a,#0FFH 055D : F7 " " rlc a 055E : 39 "9" outl p1,a 055F : B5 " " cpl f1 0560 L0560: 0560 : ED 3F " ?" djnz r5,L053F 0562 : FB " " mov a,r3 0563 : D3 01 " " xrl a,#001H 0565 : 96 71 " q" jnz L0571 0567 L0567: 0567 : 09 " " in a,p1 0568 : 37 "7" cpl a 0569 : 92 67 " g" jb4 L0567 056B : 09 " " in a,p1 056C : 37 "7" cpl a 056D : 92 67 " g" jb4 L0567 056F : 89 01 " " orl p1,#001H 0571 L0571: 0571 : 83 " " ret ; 0572 L0572: 0572 : 0A " " in a,p2 0573 : AA " " mov r2,a 0574 : 0A " " in a,p2 0575 : DA " " xrl a,r2 0576 : 53 70 "Sp" anl a,#070H 0578 : 96 72 " r" jnz L0572 057A : FA " " mov a,r2 057B : 53 70 "Sp" anl a,#070H 057D : D3 70 " p" xrl a,#070H 057F : C6 EC " " jz L05EC 0581 : 15 " " dis i 0582 : D5 " " sel rb1 0583 : D3 70 " p" xrl a,#070H 0585 : 47 "G" swap a 0586 : AC " " mov r4,a 0587 : B9 2B " +" mov r1,#02BH 0589 : BD 06 " " mov r5,#006H 058B : B1 A4 " " mov @r1,#0A4H 058D : BB 01 " " mov r3,#001H 058F : A5 " " clr f1 0590 : B4 39 " 9" call L0539 0592 : BD 04 " " mov r5,#004H 0594 : B4 02 " " call L0502 0596 : F1 " " mov a,@r1 0597 : F2 E0 " " jb7 L05E0 0599 L0599: 0599 : FC " " mov a,r4 059A : 77 "w" rr a 059B : 53 07 "S " anl a,#007H 059D : C6 B1 " " jz L05B1 059F : D3 01 " " xrl a,#001H 05A1 : C6 B8 " " jz L05B8 05A3 : D3 03 " " xrl a,#003H 05A5 : C6 BF " " jz L05BF 05A7 : D3 01 " " xrl a,#001H 05A9 : C6 C6 " " jz L05C6 05AB : D3 07 " " xrl a,#007H 05AD : C6 CE " " jz L05CE 05AF : A4 D6 " " jmp L05D6 ; 05B1 L05B1: 05B1 : F1 " " mov a,@r1 05B2 : B8 32 " 2" mov r0,#032H 05B4 : 30 "0" xchd a,@r0 05B5 : A0 " " mov @r0,a 05B6 : A4 DE " " jmp L05DE ; 05B8 L05B8: 05B8 : F1 " " mov a,@r1 05B9 : B8 31 " 1" mov r0,#031H 05BB : 47 "G" swap a 05BC : 30 "0" xchd a,@r0 05BD : A4 DE " " jmp L05DE ; 05BF L05BF: 05BF : F1 " " mov a,@r1 05C0 : B8 31 " 1" mov r0,#031H 05C2 : 30 "0" xchd a,@r0 05C3 : A0 " " mov @r0,a 05C4 : A4 DE " " jmp L05DE ; 05C6 L05C6: 05C6 : B8 30 " 0" mov r0,#030H 05C8 : 23 01 "# " mov a,#001H 05CA : 40 "@" orl a,@r0 05CB : A0 " " mov @r0,a 05CC : A4 DE " " jmp L05DE ; 05CE L05CE: 05CE : B8 30 " 0" mov r0,#030H 05D0 : 23 02 "# " mov a,#002H 05D2 : 40 "@" orl a,@r0 05D3 : A0 " " mov @r0,a 05D4 : A4 DE " " jmp L05DE ; 05D6 L05D6: 05D6 : B8 30 " 0" mov r0,#030H 05D8 : 23 04 "# " mov a,#004H 05DA : 40 "@" orl a,@r0 05DB : A0 " " mov @r0,a 05DC : A4 DE " " jmp L05DE 05DE L05DE: 05DE : A4 E8 " " jmp L05E8 ; 05E0 L05E0: 05E0 : FC " " mov a,r4 05E1 : 77 "w" rr a 05E2 : 53 0F "S " anl a,#00FH 05E4 : 41 "A" orl a,@r1 05E5 : 47 "G" swap a 05E6 : 14 C8 " " call L00C8 05E8 L05E8: 05E8 : C5 " " sel rb0 05E9 : 05 " " en i 05EA : A4 72 " r" jmp L0572 05EC L05EC: 05EC : 83 " " ret ; 05ED : FF " " mov a,r7 05EE : FF " " mov a,r7 05EF : FF " " mov a,r7 05F0 : FF " " mov a,r7 05F1 : FF " " mov a,r7 05F2 : FF " " mov a,r7 05F3 : FF " " mov a,r7 05F4 : FF " " mov a,r7 05F5 : FF " " mov a,r7 05F6 : FF " " mov a,r7 05F7 : FF " " mov a,r7 05F8 : FF " " mov a,r7 05F9 : FF " " mov a,r7 05FA : FF " " mov a,r7 05FB : FF " " mov a,r7 05FC : FF " " mov a,r7 05FD : FF " " mov a,r7 05FE : FF " " mov a,r7 05FF : FF " " mov a,r7 0600 : 04 00 " " jmp L0000 ; 0602 L0602: 0602 : 09 " " in a,p1 0603 : AA " " mov r2,a 0604 : 09 " " in a,p1 0605 : DA " " xrl a,r2 0606 : 53 20 "S " anl a,#020H 0608 : 96 02 " " jnz L0602 060A : FA " " mov a,r2 060B : B2 66 " f" jb5 L0666 060D : 15 " " dis i 060E : D5 " " sel rb1 060F : BC 00 " " mov r4,#000H 0611 : B9 2B " +" mov r1,#02BH 0613 L0613: 0613 : FC " " mov a,r4 0614 : C6 2C " ," jz L062C 0616 : D3 01 " " xrl a,#001H 0618 : C6 2C " ," jz L062C 061A : D3 03 " " xrl a,#003H 061C : C6 2C " ," jz L062C 061E : D3 01 " " xrl a,#001H 0620 : C6 30 " 0" jz L0630 0622 : D3 07 " " xrl a,#007H 0624 : C6 3B " ;" jz L063B 0626 : D3 01 " " xrl a,#001H 0628 : C6 46 " F" jz L0646 062A : C4 51 " Q" jmp L0651 ; 062C L062C: 062C : D4 67 " g" call L0667 062E : C4 53 " S" jmp L0653 ; 0630 L0630: 0630 : B8 30 " 0" mov r0,#030H 0632 : F0 " " mov a,@r0 0633 : 12 37 " 7" jb0 L0637 0635 : C4 39 " 9" jmp L0639 ; 0637 L0637: 0637 : D4 67 " g" call L0667 0639 L0639: 0639 : C4 53 " S" jmp L0653 ; 063B L063B: 063B : B8 30 " 0" mov r0,#030H 063D : F0 " " mov a,@r0 063E : 32 42 "2B" jb1 L0642 0640 : C4 44 " D" jmp L0644 ; 0642 L0642: 0642 : D4 67 " g" call L0667 0644 L0644: 0644 : C4 53 " S" jmp L0653 ; 0646 L0646: 0646 : B8 30 " 0" mov r0,#030H 0648 : F0 " " mov a,@r0 0649 : 52 4D "RM" jb2 L064D 064B : C4 4F " O" jmp L064F ; 064D L064D: 064D : D4 67 " g" call L0667 064F L064F: 064F : C4 53 " S" jmp L0653 ; 0651 L0651: 0651 : BC FF " " mov r4,#0FFH 0653 L0653: 0653 : 1C " " inc r4 0654 L0654: 0654 : 09 " " in a,p1 0655 : AA " " mov r2,a 0656 : 09 " " in a,p1 0657 : DA " " xrl a,r2 0658 : 53 20 "S " anl a,#020H 065A : 96 54 " T" jnz L0654 065C : FA " " mov a,r2 065D : 37 "7" cpl a 065E : B2 13 " " jb5 L0613 0660 : 23 F3 "# " mov a,#0F3H 0662 : 14 C8 " " call L00C8 0664 : C5 " " sel rb0 0665 : 05 " " en i 0666 L0666: 0666 : 83 " " ret ; 0667 L0667: 0667 : BD 06 " " mov r5,#006H 0669 : B1 A0 " " mov @r1,#0A0H 066B : BB 01 " " mov r3,#001H 066D : A5 " " clr f1 066E : B4 39 " 9" call L0539 0670 : BD 04 " " mov r5,#004H 0672 : B4 02 " " call L0502 0674 : FC " " mov a,r4 0675 : 77 "w" rr a 0676 : 53 07 "S " anl a,#007H 0678 : AC " " mov r4,a 0679 : F1 " " mov a,@r1 067A : C6 83 " " jz L0683 067C : FC " " mov a,r4 067D : 41 "A" orl a,@r1 067E : 47 "G" swap a 067F : 43 80 "C " orl a,#080H 0681 : 14 C8 " " call L00C8 0683 L0683: 0683 : F1 " " mov a,@r1 0684 : 96 67 " g" jnz L0667 0686 : 83 " " ret ; 0687 L0687: 0687 : AA " " mov r2,a 0688 : 27 "'" clr a 0689 : 20 " " xch a,@r0 068A : 5A "Z" anl a,r2 068B : 20 " " xch a,@r0 068C : C6 95 " " jz L0695 068E L068E: 068E : AA " " mov r2,a 068F : 27 "'" clr a 0690 : 20 " " xch a,@r0 0691 : 4A "J" orl a,r2 0692 : 20 " " xch a,@r0 0693 : 96 8E " " jnz L068E 0695 L0695: 0695 : 83 " " ret ; 0696 : FF " " mov a,r7 0697 : FF " " mov a,r7 0698 : FF " " mov a,r7 0699 : FF " " mov a,r7 069A : FF " " mov a,r7 069B : FF " " mov a,r7 069C : FF " " mov a,r7 069D : FF " " mov a,r7 069E : FF " " mov a,r7 069F : FF " " mov a,r7 06A0 : FF " " mov a,r7 06A1 : FF " " mov a,r7 06A2 : FF " " mov a,r7 06A3 : FF " " mov a,r7 06A4 : FF " " mov a,r7 06A5 : FF " " mov a,r7 06A6 : FF " " mov a,r7 06A7 : FF " " mov a,r7 06A8 : FF " " mov a,r7 06A9 : FF " " mov a,r7 06AA : FF " " mov a,r7 06AB : FF " " mov a,r7 06AC : FF " " mov a,r7 06AD : FF " " mov a,r7 06AE : FF " " mov a,r7 06AF : FF " " mov a,r7 06B0 : FF " " mov a,r7 06B1 : FF " " mov a,r7 06B2 : FF " " mov a,r7 06B3 : FF " " mov a,r7 06B4 : FF " " mov a,r7 06B5 : FF " " mov a,r7 06B6 : FF " " mov a,r7 06B7 : FF " " mov a,r7 06B8 : FF " " mov a,r7 06B9 : FF " " mov a,r7 06BA : FF " " mov a,r7 06BB : FF " " mov a,r7 06BC : FF " " mov a,r7 06BD : FF " " mov a,r7 06BE : FF " " mov a,r7 06BF : FF " " mov a,r7 06C0 L06C0: 06C0 : FF " " mov a,r7 06C1 : FF " " mov a,r7 06C2 : FF " " mov a,r7 06C3 : FF " " mov a,r7 06C4 : FF " " mov a,r7 06C5 : FF " " mov a,r7 06C6 : FF " " mov a,r7 06C7 : FF " " mov a,r7 06C8 : FF " " mov a,r7 06C9 : FF " " mov a,r7 06CA : FF " " mov a,r7 06CB : FF " " mov a,r7 06CC L06CC: 06CC : FF " " mov a,r7 06CD : FF " " mov a,r7 06CE : FF " " mov a,r7 06CF : FF " " mov a,r7 06D0 : FF " " mov a,r7 06D1 : FF " " mov a,r7 06D2 : FF " " mov a,r7 06D3 : FF " " mov a,r7 06D4 : FF " " mov a,r7 06D5 : FF " " mov a,r7 06D6 : FF " " mov a,r7 06D7 : FF " " mov a,r7 06D8 : FF " " mov a,r7 06D9 : FF " " mov a,r7 06DA : FF " " mov a,r7 06DB : FF " " mov a,r7 06DC : FF " " mov a,r7 06DD : FF " " mov a,r7 06DE : FF " " mov a,r7 06DF : FF " " mov a,r7 06E0 : FF " " mov a,r7 06E1 : FF " " mov a,r7 06E2 : FF " " mov a,r7 06E3 : FF " " mov a,r7 06E4 : FF " " mov a,r7 06E5 : FF " " mov a,r7 06E6 : FF " " mov a,r7 06E7 : FF " " mov a,r7 06E8 : FF " " mov a,r7 06E9 : FF " " mov a,r7 06EA : FF " " mov a,r7 06EB : FF " " mov a,r7 06EC : FF " " mov a,r7 06ED : FF " " mov a,r7 06EE : FF " " mov a,r7 06EF : FF " " mov a,r7 06F0 : FF " " mov a,r7 06F1 : FF " " mov a,r7 06F2 : FF " " mov a,r7 06F3 : FF " " mov a,r7 06F4 : FF " " mov a,r7 06F5 : FF " " mov a,r7 06F6 : FF " " mov a,r7 06F7 : FF " " mov a,r7 06F8 : FF " " mov a,r7 06F9 : FF " " mov a,r7 06FA : FF " " mov a,r7 06FB : FF " " mov a,r7 06FC : FF " " mov a,r7 06FD : FF " " mov a,r7 06FE : FF " " mov a,r7 06FF : FF " " mov a,r7 0700 : 04 00 " " jmp L0000 ; 0702 : 6A "j" add a,r2 0703 : 2A "*" xch a,r2 0704 : 34 6A "4j" call L016A 0706 : 3E ">" movd p6,a 0707 : 6A "j" add a,r2 0708 : 44 6A "Dj" jmp L026A ; 070A : 6A "j" add a,r2 070B : 6A "j" add a,r2 070C : 6A "j" add a,r2 070D : 6A "j" add a,r2 070E : 6A "j" add a,r2 070F : 6A "j" add a,r2 0710 : 6A "j" add a,r2 0711 : 6A "j" add a,r2 0712 : 6A "j" add a,r2 0713 : 6A "j" add a,r2 0714 : 6A "j" add a,r2 0715 : 6A "j" add a,r2 0716 : 6A "j" add a,r2 0717 : 6A "j" add a,r2 0718 : 6A "j" add a,r2 0719 : 4A "J" orl a,r2 071A : 6A "j" add a,r2 071B : 6A "j" add a,r2 071C : 4E "N" orl a,r6 071D : 55 "U" strt t 071E : 5C "\" anl a,r4 071F : 6A "j" add a,r2 0720 : 6A "j" add a,r2 ; 0721 : 63 "c" db 063H ; 0722 L0722: 0722 : B8 33 " 3" mov r0,#033H 0724 : F0 " " mov a,@r0 0725 : 53 1F "S " anl a,#01FH 0727 : 03 02 " " add a,#002H 0729 : B3 " " jmpp @a ;INFO: indirect jump ; 072A : B8 32 " 2" mov r0,#032H 072C : F0 " " mov a,@r0 072D : 53 FE "S " anl a,#0FEH 072F : A0 " " mov @r0,a 0730 : F4 6F " o" call L076F 0732 : E4 6E " n" jmp L076E ; 0734 : B8 32 " 2" mov r0,#032H 0736 : F0 " " mov a,@r0 0737 : 53 FD "S " anl a,#0FDH 0739 : A0 " " mov @r0,a 073A : F4 6F " o" call L076F 073C : E4 6E " n" jmp L076E ; 073E : F4 88 " " call L0788 0740 : F4 6F " o" call L076F 0742 : E4 6E " n" jmp L076E ; 0744 : F4 79 " y" call L0779 0746 : F4 6F " o" call L076F 0748 : E4 6E " n" jmp L076E ; 074A : F4 6F " o" call L076F 074C : E4 6E " n" jmp L076E ; 074E : B8 2F " /" mov r0,#02FH 0750 : F0 " " mov a,@r0 0751 : 14 C8 " " call L00C8 0753 : E4 6E " n" jmp L076E ; 0755 : B8 2E " ." mov r0,#02EH 0757 : F0 " " mov a,@r0 0758 : 14 C8 " " call L00C8 075A : E4 6E " n" jmp L076E ; 075C : B8 2D " -" mov r0,#02DH 075E : F0 " " mov a,@r0 075F : 14 C8 " " call L00C8 0761 : E4 6E " n" jmp L076E ; 0763 : B8 34 " 4" mov r0,#034H 0765 : F0 " " mov a,@r0 0766 : 14 C8 " " call L00C8 0768 : E4 6E " n" jmp L076E ; 076A : 23 F6 "# " mov a,#0F6H 076C : 14 C8 " " call L00C8 076E L076E: 076E : 83 " " ret ; 076F L076F: 076F : 23 F8 "# " mov a,#0F8H 0771 : 14 C8 " " call L00C8 0773 : 83 " " ret ; 0774 : 23 78 "#x" mov a,#078H 0776 : 14 C8 " " call L00C8 0778 : 83 " " ret ; 0779 L0779: 0779 : B8 32 " 2" mov r0,#032H 077B : B0 24 " $" mov @r0,#024H 077D : B8 2C " ," mov r0,#02CH 077F : B0 0C " " mov @r0,#00CH 0781 : 27 "'" clr a 0782 : B8 20 " " mov r0,#020H 0784 : A0 " " mov @r0,a 0785 : 9A FD " " anl p2,#0FDH 0787 : 83 " " ret ; 0788 L0788: 0788 : B8 20 " " mov r0,#020H 078A L078A: 078A : 27 "'" clr a 078B : A0 " " mov @r0,a 078C : 18 " " inc r0 078D : 23 40 "#@" mov a,#040H 078F : D8 " " xrl a,r0 0790 : 96 8A " " jnz L078A 0792 : 09 " " in a,p1 0793 : 37 "7" cpl a 0794 : C6 9C " " jz L079C 0796 : B8 2F " /" mov r0,#02FH 0798 : F0 " " mov a,@r0 0799 : 43 02 "C " orl a,#002H 079B : A0 " " mov @r0,a 079C L079C: 079C : 0A " " in a,p2 079D : 43 8C "C " orl a,#08CH 079F : 37 "7" cpl a 07A0 : C6 A8 " " jz L07A8 07A2 : B8 2F " /" mov r0,#02FH 07A4 : F0 " " mov a,@r0 07A5 : 43 04 "C " orl a,#004H 07A7 : A0 " " mov @r0,a 07A8 L07A8: 07A8 : 83 " " ret ; 07A9 : FF " " mov a,r7 07AA : FF " " mov a,r7 07AB : FF " " mov a,r7 07AC : FF " " mov a,r7 07AD : FF " " mov a,r7 07AE : FF " " mov a,r7 07AF : FF " " mov a,r7 07B0 : FF " " mov a,r7 07B1 : FF " " mov a,r7 07B2 : FF " " mov a,r7 07B3 : FF " " mov a,r7 07B4 : FF " " mov a,r7 07B5 : FF " " mov a,r7 07B6 : FF " " mov a,r7 07B7 : FF " " mov a,r7 07B8 : FF " " mov a,r7 07B9 : FF " " mov a,r7 07BA : FF " " mov a,r7 07BB : FF " " mov a,r7 07BC : FF " " mov a,r7 07BD : FF " " mov a,r7 07BE : FF " " mov a,r7 07BF : FF " " mov a,r7 07C0 : FF " " mov a,r7 07C1 : FF " " mov a,r7 07C2 : FF " " mov a,r7 07C3 : FF " " mov a,r7 07C4 : FF " " mov a,r7 07C5 : FF " " mov a,r7 07C6 : FF " " mov a,r7 07C7 : FF " " mov a,r7 07C8 : FF " " mov a,r7 07C9 : FF " " mov a,r7 07CA : FF " " mov a,r7 07CB : FF " " mov a,r7 07CC : FF " " mov a,r7 07CD : FF " " mov a,r7 07CE : FF " " mov a,r7 07CF : FF " " mov a,r7 07D0 : FF " " mov a,r7 07D1 : FF " " mov a,r7 07D2 : FF " " mov a,r7 07D3 : FF " " mov a,r7 07D4 : FF " " mov a,r7 07D5 : FF " " mov a,r7 07D6 : FF " " mov a,r7 07D7 : FF " " mov a,r7 07D8 : FF " " mov a,r7 07D9 : FF " " mov a,r7 07DA L07DA: 07DA : B8 FF " " mov r0,#0FFH 07DC L07DC: 07DC : E8 DC " " djnz r0,L07DC 07DE : 23 F7 "# " mov a,#0F7H 07E0 : 14 C8 " " call L00C8 07E2 : 05 " " en i 07E3 : B8 33 " 3" mov r0,#033H 07E5 : 27 "'" clr a 07E6 : A0 " " mov @r0,a 07E7 L07E7: 07E7 : B8 32 " 2" mov r0,#032H 07E9 : F0 " " mov a,@r0 07EA : 37 "7" cpl a 07EB : 12 F2 " " jb0 L07F2 07ED : 15 " " dis i 07EE : 53 FE "S " anl a,#0FEH 07F0 : A0 " " mov @r0,a 07F1 : 05 " " en i 07F2 L07F2: 07F2 : B8 33 " 3" mov r0,#033H 07F4 : F0 " " mov a,@r0 07F5 : D3 E6 " " xrl a,#0E6H 07F7 : 96 E7 " " jnz L07E7 07F9 : 04 09 " " jmp L0009 ; 07FB : FF " " mov a,r7 07FC : FF " " mov a,r7 07FD : FF " " mov a,r7 07FE : FF " " mov a,r7 07FF : FF " " mov a,r7 ;-------------------------------------------------------------- Symbol table ============ Value Type Name ----- ---- ---- 0000 Code L0000 0009 Code L0009 000A Code L000A 0019 Code L0019 0026 Code L0026 003A Code L003A 0051 Code L0051 0057 Code L0057 0066 Code L0066 0070 Code L0070 0086 Code L0086 0088 Code L0088 008C Code L008C 008E Code L008E 0092 Code L0092 00A3 Code L00A3 00A6 Code L00A6 00AA Code L00AA 00B1 Code L00B1 00B3 Code L00B3 00B7 Code L00B7 00BB Code L00BB 00C4 Code L00C4 00C6 Code L00C6 00C8 Code L00C8 00C9 Code L00C9 00D6 Code L00D6 00DE Code L00DE 00E5 Code L00E5 0102 Code L0102 0106 Code L0106 0114 Code L0114 0118 Code L0118 0121 Code L0121 0126 Code L0126 0136 Code L0136 0143 Code L0143 0147 Code L0147 015B Code L015B 0161 Code L0161 0163 Code L0163 016A Code L016A 0179 Code L0179 0188 Code L0188 018C Code L018C 0190 Code L0190 0192 Code L0192 0195 Code L0195 019B Code L019B 019C Code L019C 019D Code L019D 01AA Code L01AA 01B7 Code L01B7 01DC Code L01DC 01DD Code L01DD 01DF Code L01DF 0202 Code L0202 020A Code L020A 021A Code L021A 021D Code L021D 022C Code L022C 022F Code L022F 0231 Code L0231 0235 Code L0235 023A Code L023A 023D Code L023D 023E Code L023E 0248 Code L0248 024B Code L024B 0255 Code L0255 0256 Code L0256 0257 Code L0257 025F Code L025F 0263 Code L0263 026A Code L026A 0280 Code L0280 0285 Code L0285 0287 Code L0287 0288 Code L0288 028A Code L028A 028B Code L028B 028D Code L028D 0290 Code L0290 02A1 Code L02A1 02A8 Code L02A8 02B0 Code L02B0 02B4 Code L02B4 02B6 Code L02B6 02BF Code L02BF 02C4 Code L02C4 0308 Code L0308 0353 Code L0353 0355 Code L0355 035A Code L035A 0397 Code L0397 03ED Code L03ED 03FE Code L03FE 040C Code L040C 040E Code L040E 0416 Code L0416 041F Code L041F 0421 Code L0421 0428 Code L0428 0431 Code L0431 0435 Code L0435 0446 Code L0446 044A Code L044A 045E Code L045E 0466 Code L0466 0473 Code L0473 0485 Code L0485 049A Code L049A 04A2 Code L04A2 04A4 Code L04A4 04A6 Code L04A6 04E8 Code L04E8 0502 Code L0502 050A Code L050A 050C Code L050C 051B Code L051B 0529 Code L0529 0530 Code L0530 0539 Code L0539 053F Code L053F 0541 Code L0541 0552 Code L0552 0560 Code L0560 0567 Code L0567 0571 Code L0571 0572 Code L0572 0599 Code L0599 05B1 Code L05B1 05B8 Code L05B8 05BF Code L05BF 05C6 Code L05C6 05CE Code L05CE 05D6 Code L05D6 05DE Code L05DE 05E0 Code L05E0 05E8 Code L05E8 05EC Code L05EC 0602 Code L0602 0613 Code L0613 062C Code L062C 0630 Code L0630 0637 Code L0637 0639 Code L0639 063B Code L063B 0642 Code L0642 0644 Code L0644 0646 Code L0646 064D Code L064D 064F Code L064F 0651 Code L0651 0653 Code L0653 0654 Code L0654 0666 Code L0666 0667 Code L0667 0683 Code L0683 0687 Code L0687 068E Code L068E 0695 Code L0695 06C0 Code L06C0 06CC Code L06CC 0722 Code L0722 076E Code L076E 076F Code L076F 0779 Code L0779 0788 Code L0788 078A Code L078A 079C Code L079C 07A8 Code L07A8 07DA Code L07DA 07DC Code L07DC 07E4 Code L07E4 07E7 Code L07E7 07F2 Code L07F2 Number of symbols: 177 ;--------------------------------------------------------------