| 026 07.04.2024, 21:11 Uhr
 PIC18F2550
 
 
   
 
 | Ich habe zum Test mal die ersten 512 Befehle vom U8830 Reassembliert. Nur Pass 2.
 
 
 | Quellcode: |  | Load E:/U883_MME_BAS.ROM
 Load E:/es_4k_1.bin
 Load E:/es_4k_2.bin
 Set Startadressen und Eintritspunkte
 000Ch
 PASS 1
 PASS 2
 000C   31 00     SRP  #00h
 000E   3C 0F     LD   r3, #0Fh
 0010   FF        NOP
 0011   76 E3 04  TM   RE3, #04h
 0014   3C FF     LD   r3, #FFh
 0016   EB 05     JRNZ M_001D
 0018   76 E3 04  TM   RE3, #04h
 001B   EB 20     JRNZ M_003D
 001D   E6 F8 B6  LD   RF8, #B6h
 0020   E6 F7 08  LD   RF7, #08h
 0023   4C 08     LD   r4, #08h
 0025   5C 12     LD   r5, #12h
 0027   C2 64     LDC  r6, @r4
 0029   60 E6     COM  RE6
 002B   D2 64     LDC  r4, @r6
 002D   C2 74     LDC  r7, @r4
 002F   60 E6     COM  RE6
 0031   D2 64     LDC  r4, @r6
 0033   B2 67     XOr  r6, r7
 0035   31 F0     SRP  #F0h
 0037   ED E0 00  JPNZ M_E000
 003A   8D 08 12  JP   M_0812
 003D   E6 F8 04  LD   RF8, #04h
 0040   E6 F1 C0  LD   RF1, #C0h
 0043   0C FF     LD   r0, #FFh
 0045   1C FF     LD   r1, #FFh
 0047   CF        RCF
 0048   56 E3 DF  And  RE3, #DFh
 004B   46 E3 20  Or   RE3, #20h
 004E   10 E1     RLC  RE1
 0050   10 E0     RLC  RE0
 0052   76 E3 04  TM   RE3, #04h
 0055   6B 04     JRZ  M_005B
 0057   7B F5     JRC  M_004E
 0059   8B ED     JR   M_0048
 005B   E6 F8 7F  LD   RF8, #7Fh
 005E   8B FE     JR   M_005E
 0060   46 7F 18  Or   R7F, #18h
 0063   E4 7F F8  LD   RF8, R7F
 0066   56 03 DF  And  R03, #DFh
 0069   76 03 04  TM   R03, #04h
 006C   6B FB     JRZ  M_0069
 006E   56 7F F7  And  R7F, #F7h
 0071   46 03 20  Or   R03, #20h
 0074   E4 7F F8  LD   RF8, R7F
 0077   FF        NOP
 0078   BF        IRET
 0079   28 E4     LD   r2, RE4
 007B   38 E5     LD   r3, RE5
 007D   AF        RET
 007E   02 35     ADD  r3, r5
 0080   12 24     ADC  r2, r4
 0082   4B 16     JRV  M_009A
 0084   AF        RET
 0085   22 35     SUB  r3, r5
 0087   32 24     SBC  r2, r4
 0089   4B 0F     JRV  M_009A
 008B   AF        RET
 008C   76 E4 80  TM   RE4, #80h
 008F   6B E8     JRZ  M_0079
 0091   B0 E2     CLR  RE2
 0093   B0 E3     CLR  RE3
 0095   8B EE     JR   M_0085
 0097   46 0F 80  Or   R0F, #80h
 009A   46 0E 80  Or   R0E, #80h
 009D   AF        RET
 009E   88 E2     LD   r8, RE2
 00A0   B2 84     XOr  r8, r4
 00A2   9C 02     LD   r9, #02h
 00A4   68 E2     LD   r6, RE2
 00A6   78 E3     LD   r7, RE3
 00A8   D6 00 8C  CALL M_008C
 00AB   48 E6     LD   r4, RE6
 00AD   58 E7     LD   r5, RE7
 00AF   9A F3     DJNZ M_00A4
 00B1   68 E2     LD   r6, RE2
 00B3   78 E3     LD   r7, RE3
 00B5   B0 E2     CLR  RE2
 00B7   B0 E3     CLR  RE3
 00B9   AF        RET
 00BA   D6 00 9E  CALL M_009E
 00BD   BC 0F     LD   rB, #0Fh
 00BF   D0 E6     SRA  RE6
 00C1   C0 E7     RRC  RE7
 00C3   FB 06     JRNC M_00CB
 00C5   02 35     ADD  r3, r5
 00C7   12 24     ADC  r2, r4
 00C9   4B CC     JRV  M_0097
 00CB   10 E5     RLC  RE5
 00CD   10 E4     RLC  RE4
 00CF   CB 04     JRNV M_00D5
 00D1   42 67     Or   r6, r7
 00D3   EB C2     JRNZ M_0097
 00D5   BA E8     DJNZ M_00BF
 00D7   48 E2     LD   r4, RE2
 00D9   58 E3     LD   r5, RE3
 00DB   10 E8     RLC  RE8
 00DD   7B B2     JRC  M_0091
 00DF   AF        RET
 00E0   D6 00 9E  CALL M_009E
 00E3   9C 10     LD   r9, #10h
 00E5   CF        RCF
 00E6   B0 EA     CLR  REA
 00E8   B0 EB     CLR  REB
 00EA   10 E7     RLC  RE7
 00EC   10 E6     RLC  RE6
 00EE   10 EB     RLC  REB
 00F0   10 EA     RLC  REA
 00F2   7B 0A     JRC  M_00FE
 00F4   A2 4A     CP   r4, rA
 00F6   BB 0B     JRUT M_0103
 00F8   7B 04     JRC  M_00FE
 00FA   A2 5B     CP   r5, rB
 00FC   BB 05     JRUT M_0103
 00FE   22 B5     SUB  rB, r5
 0100   32 A4     SBC  rA, r4
 0102   DF        SCF
 0103   9A E5     DJNZ M_00EA
 0105   98 E4     LD   r9, RE4
 0107   42 95     Or   r9, r5
 0109   6B 0A     JRZ  M_0115
 010B   10 E7     RLC  RE7
 010D   10 E6     RLC  RE6
 010F   28 E6     LD   r2, RE6
 0111   38 E7     LD   r3, RE7
 0113   8B C2     JR   M_00D7
 0115   D6 01 0F  CALL M_010F
 0118   46 0E 40  Or   R0E, #40h
 011B   46 0F 80  Or   R0F, #80h
 011E   AF        RET
 011F   D6 00 E0  CALL M_00E0
 0122   88 E2     LD   r8, RE2
 0124   28 EA     LD   r2, REA
 0126   38 EB     LD   r3, REB
 0128   8B AD     JR   M_00D7
 012A   42 24     Or   r2, r4
 012C   42 35     Or   r3, r5
 012E   AF        RET
 012F   52 24     And  r2, r4
 0131   52 35     And  r3, r5
 0133   AF        RET
 0134   B2 24     XOr  r2, r4
 0136   B2 35     XOr  r3, r5
 0138   AF        RET
 0139   D6 00 79  CALL M_0079
 013C   60 E2     COM  RE2
 013E   60 E3     COM  RE3
 0140   AF        RET
 0141   56 0F 8F  And  R0F, #8Fh
 0144   A2 24     CP   r2, r4
 0146   6B 0A     JRZ  M_0152
 0148   7C 20     LD   r7, #20h
 014A   AB 02     JRT  M_014E
 014C   7C 10     LD   r7, #10h
 014E   44 E7 0F  Or   R0F, RE7
 0151   AF        RET
 0152   7C 40     LD   r7, #40h
 0154   A2 35     CP   r3, r5
 0156   6B F6     JRZ  M_014E
 0158   7C 20     LD   r7, #20h
 015A   BB F2     JRUT M_014E
 015C   8B EE     JR   M_014C
 015E   88 E3     LD   r8, RE3
 0160   78 E3     LD   r7, RE3
 0162   68 E2     LD   r6, RE2
 0164   58 E2     LD   r5, RE2
 0166   F0 E5     Swap RE5
 0168   F0 E7     Swap RE7
 016A   4C 25     LD   r4, #25h
 016C   AC 04     LD   rA, #04h
 016E   BC 15     LD   rB, #15h
 0170   57 EB 0F  And  @REB, #0Fh
 0173   07 EB 30  ADD  @REB, #30h
 0176   A7 EB 3A  CP   @R3A, #3Ah
 0179   7B 03     JRC  M_017E
 017B   07 EB 07  ADD  @REB, #07h
 017E   BE        INC  rB
 017F   AA EF     DJNZ M_0170
 0181   AF        RET
 0182   48 E2     LD   r4, RE2
 0184   58 E3     LD   r5, RE3
 0186   D6 00 8C  CALL M_008C
 0189   10 E4     RLC  RE4
 018B   4C 20     LD   r4, #20h
 018D   FB 02     JRNC M_0191
 018F   4C 2D     LD   r4, #2Dh
 0191   BC 06     LD   rB, #06h
 0193   AC 15     LD   rA, #15h
 0195   B1 EA     CLR  @REA
 0197   AE        INC  rA
 0198   BA FB     DJNZ M_0195
 019A   BC 0F     LD   rB, #0Fh
 019C   D0 E2     SRA  RE2
 019E   C0 E3     RRC  RE3
 01A0   FB 0C     JRNC M_01AE
 01A2   02 7A     ADD  r7, rA
 01A4   40 E7     DA   RE7
 01A6   12 69     ADC  r6, r9
 01A8   40 E6     DA   RE6
 01AA   12 58     ADC  r5, r8
 01AC   40 E5     DA   RE5
 01AE   02 AA     ADD  rA, rA
 01B0   40 EA     DA   REA
 01B2   12 99     ADC  r9, r9
 01B4   40 E9     DA   RE9
 01B6   12 88     ADC  r8, r8
 01B8   40 E8     DA   RE8
 01BA   BA E0     DJNZ M_019C
 01BC   88 E7     LD   r8, RE7
 01BE   98 E7     LD   r9, RE7
 01C0   78 E6     LD   r7, RE6
 01C2   F0 E6     Swap RE6
 01C4   F0 E8     Swap RE8
 01C6   AC 05     LD   rA, #05h
 01C8   8B A4     JR   M_016E
 01CA   F1 ED     Swap @RED
 01CC   EC 04     LD   rE, #04h
 01CE   11 ED     RLC  @RED
 01D0   10 E5     RLC  RE5
 01D2   10 E4     RLC  RE4
 01D4   10 E3     RLC  RE3
 01D6   EA F6     DJNZ M_01CE
 01D8   AF        RET
 01D9   DC 16     LD   rD, #16h
 01DB   B0 E4     CLR  RE4
 01DD   B0 E5     CLR  RE5
 01DF   A6 E6 25  CP   R25, #25h
 01E2   EB 27     JRNZ M_020B
 01E4   CC 05     LD   rC, #05h
 01E6   DE        INC  rD
 01E7   27 ED 30  SUB  @RED, #30h
 01EA   7B 19     JRC  M_0205
 01EC   A7 ED 0A  CP   @R0A, #0Ah
 01EF   7B 0D     JRC  M_01FE
 01F1   27 ED 11  SUB  @RED, #11h
 01F4   7B 0F     JRC  M_0205
 01F6   07 ED 0A  ADD  @RED, #0Ah
 01F9   A7 ED 10  CP   @R10, #10h
 01FC   FB 07     JRNC M_0205
 01FE   D6 01 CA  CALL M_01CA
 0201   CA E3     DJNZ M_01E6
 0203   CF        RCF
 0204   AF        RET
 0205   A6 EC 05  CP   R05, #05h
 0208   6B F9     JRZ  M_0203
 020A   AF        RET
 020B   CC 06     LD   rC, #06h
 020D   B0 E2     CLR  RE2
 020F   B0 E3     CLR  RE3
 0211   A6 E6 2D  CP   R2D, #2Dh
 0214   EB 02     JRNZ M_0218
 0216   2E        INC  r2
 0217   DE        INC  rD
 0218   27 ED 30  SUB  @RED, #30h
 021B   7B 0C     JRC  M_0229
 021D   A7 ED 0A  CP   @R0A, #0Ah
 0220   FB 07     JRNC M_0229
 0222   D6 01 CA  CALL M_01CA
 0225   CA F0     DJNZ M_0217
 0227   CF        RCF
 0228   AF        RET
 0229   A6 EC 06  CP   R06, #06h
 022C   6B F9     JRZ  M_0227
 022E   A6 E3 04  CP   R04, #04h
 0231   FB F4     JRNC M_0227
 0233   B0 E6     CLR  RE6
 0235   B0 E7     CLR  RE7
 0237   BC 13     LD   rB, #13h
 0239   8C 27     LD   r8, #27h
 023B   9C 10     LD   r9, #10h
 023D   D6 02 71  CALL M_0271
 0240   BE        INC  rB
 0241   8C 03     LD   r8, #03h
 0243   9C E8     LD   r9, #E8h
 0245   D6 02 6F  CALL M_026F
 0248   8C 00     LD   r8, #00h
 024A   9C 64     LD   r9, #64h
 024C   D6 02 6F  CALL M_026F
 024F   BE        INC  rB
 0250   9C 0A     LD   r9, #0Ah
 0252   D6 02 6F  CALL M_026F
 0255   9C 01     LD   r9, #01h
 0257   D6 02 6F  CALL M_026F
 025A   48 E6     LD   r4, RE6
 025C   58 E7     LD   r5, RE7
 025E   10 E6     RLC  RE6
 0260   7B C5     JRC  M_0227
 0262   C0 E2     RRC  RE2
 0264   FB 18     JRNC M_027E
 0266   D6 00 91  CALL M_0091
 0269   48 E2     LD   r4, RE2
 026B   58 E3     LD   r5, RE3
 026D   8B 0F     JR   M_027E
 026F   F1 EB     Swap @REB
 0271   E3 AB     LD   rA, @rB
 0273   56 EA 0F  And  REA, #0Fh
 0276   6B 06     JRZ  M_027E
 0278   02 79     ADD  r7, r9
 027A   12 68     ADC  r6, r8
 027C   AA FA     DJNZ M_0278
 027E   DF        SCF
 027F   AF        RET
 0280   50 E8     POP  RE8
 0282   50 E9     POP  RE9
 0284   50 E2     POP  RE2
 0286   50 E3     POP  RE3
 0288   50 E6     POP  RE6
 028A   50 E7     POP  RE7
 028C   30 E8     JP   @RRE8
 028E   D6 02 80  CALL M_0280
 0291   F3 74     LD   @r7, r4
 0293   7E        INC  r7
 0294   8B 03     JR   M_0299
 0296   D6 02 80  CALL M_0280
 0299   F3 75     LD   @r7, r5
 029B   30 E2     JP   @RRE2
 029D   D6 02 80  CALL M_0280
 02A0   92 46     LDE  r6, @r4
 02A2   A0 E6     INCW RRE6
 02A4   8B 03     JR   M_02A9
 02A6   D6 02 80  CALL M_0280
 02A9   92 56     LDE  r6, @r5
 02AB   30 E2     JP   @RRE2
 02AD   E3 25     LD   r2, @r5
 02AF   5E        INC  r5
 02B0   0D B0 E2  JPNT M_B0E2
 02B3   E3 35     LD   r3, @r5
 02B5   AF        RET
 02B6   82 24     LDE  r2, @r4
 02B8   A0 E4     INCW RRE4
 02BA   0D B0 E2  JPNT M_B0E2
 02BD   82 34     LDE  r3, @r4
 02BF   AF        RET
 02C0   D6 02 C8  CALL M_02C8
 02C3   5C 20     LD   r5, #20h
 02C5   D6 08 18  CALL M_0818
 02C8   5C 08     LD   r5, #08h
 02CA   8D 08 18  JP   M_0818
 02CD   CF        RCF
 02CE   10 E5     RLC  RE5
 02D0   10 E4     RLC  RE4
 02D2   16 E5 00  ADC  RE5, #00h
 02D5   8D 00 79  JP   M_0079
 02D8   CF        RCF
 02D9   C0 E4     RRC  RE4
 02DB   C0 E5     RRC  RE5
 02DD   FB F6     JRNC M_02D5
 02DF   46 E4 80  Or   RE4, #80h
 02E2   8B F1     JR   M_02D5
 02E4   5C 3F     LD   r5, #3Fh
 02E6   D6 08 18  CALL M_0818
 02E9   FC 15     LD   rF, #15h
 02EB   FE        INC  rF
 02EC   A6 EF 1F  CP   R1F, #1Fh
 02EF   6B 20     JRZ  M_0311
 02F1   D6 08 15  CALL M_0815
 02F4   F3 F3     LD   @rF, r3
 02F6   A6 E3 0D  CP   R0D, #0Dh
 02F9   6B 16     JRZ  M_0311
 02FB   A6 E3 08  CP   R08, #08h
 02FE   EB 19     JRNZ M_0319
 0300   5C 20     LD   r5, #20h
 0302   D6 08 18  CALL M_0818
 0305   00 EF     DEC  REF
 0307   A6 EF 15  CP   R15, #15h
 030A   6B DF     JRZ  M_02EB
 030C   D6 02 C8  CALL M_02C8
 030F   8B E0     JR   M_02F1
 0311   D6 01 D9  CALL M_01D9
 0314   FB CE     JRNC M_02E4
 0316   8D 00 79  JP   M_0079
 0319   3E        INC  r3
 031A   DB CF     JRPL M_02EB
 031C   A6 EF 16  CP   R16, #16h
 031F   6B C8     JRZ  M_02E9
 0321   D6 02 C0  CALL M_02C0
 0324   00 EF     DEC  REF
 0326   8B F4     JR   M_031C
 0328   03 4E     ADD  r4, @rE
 032A   4F        * * *
 032B   54 01 39  And  R39, R01
 032E   03 41     ADD  r4, @r1
 0330   42 53     Or   r5, r3
 0332   00 8C     DEC  R8C
 0334   05 53 45  ADD  @R45, R53
 0337   54 52 52  And  R52, R52
 033A   02 8E     ADD  r8, rE
 033C   04 53 45  ADD  R45, R53
 033F   54 52 02  And  R02, R52
 0342   96        * * *
 0343   05 53 45  ADD  @R45, R53
 0346   54 45 57  And  R57, R45
 0349   02 9D     ADD  r9, rD
 034B   05 53 45  ADD  @R45, R53
 034E   54 45 42  And  R42, R45
 0351   02 A6     ADD  rA, r6
 0353   05 47 45  ADD  @R45, R47
 0356   54 52 52  And  R52, R52
 0359   02 AD     ADD  rA, rD
 035B   04 47 45  ADD  R45, R47
 035E   54 52 02  And  R02, R52
 0361   B1 05     CLR  @R05
 0363   47 45 54  Or   @R45, #54h
 0366   45 57 02  Or   @R02, R57
 0369   B6 05 47  XOr  R47, #47h
 036C   45 54 45  Or   @R45, R54
 036F   42 02     Or   r0, r2
 0371   BB 02     JRUT M_0375
 0373   52 4C     And  r4, rC
 0375   02 CD     ADD  rC, rD
 0377   02 52     ADD  r5, r2
 0379   52 02     And  r0, r2
 037B   D8 05     LD   rD, R05
 037D   49 4E     LD   R4E, r4
 037F   50 55     POP  R55
 0381   54 02 E4  And  RE4, R02
 0384   03 47     ADD  r4, @r7
 0386   54 43 08  And  R08, R43
 0389   15 03 50  ADC  @R50, R03
 038C   54 43 08  And  R08, R43
 038F   18 FF     LD   r1, RFF
 0391   FC 16     LD   rF, #16h
 0393   C2 60     LDC  r6, @r0
 0395   A0 E0     INCW RRE0
 0397   A2 67     CP   r6, r7
 0399   AF        RET
 039A   AC 03     LD   rA, #03h
 039C   BC C1     LD   rB, #C1h
 039E   DC 03     LD   rD, #03h
 03A0   D6 03 AF  CALL M_03AF
 03A3   6B 1B     JRZ  M_03C0
 03A5   A6 E6 24  CP   R24, #24h
 03A8   EB 16     JRNZ M_03C0
 03AA   D6 03 91  CALL M_0391
 03AD   DC 03     LD   rD, #03h
 03AF   D6 03 B6  CALL M_03B6
 03B2   6B 0C     JRZ  M_03C0
 03B4   DA F9     DJNZ M_03AF
 03B6   CC 17     LD   rC, #17h
 03B8   C3 CA     LDCI rC, @rA
 03BA   C3 CA     LDCI rC, @rA
 03BC   C3 CA     LDCI rC, @rA
 03BE   A2 67     CP   r6, r7
 03C0   AF        RET
 03C1   2B 00     JRE  M_03C3
 03C3   7E        INC  r7
 03C4   2D 00 85  JPE  M_0085
 03C7   2A 00     DJNZ M_03C9
 03C9   BA 2F     DJNZ M_03FA
 03CB   00 E0     DEC  RE0
 03CD   41 01     DA   @R01
 03CF   2F        * * *
 03D0   4F        * * *
 03D1   01 2A     DEC  @R2A
 03D3   58 01     LD   r5, R01
 03D5   34 4D 01  SBC  R01, R4D
 03D8   1F        * * *
 03D9   A7 EF 41  CP   @R41, #41h
 03DC   7B 12     JRC  M_03F0
 03DE   A7 EF 5B  CP   @R5B, #5Bh
 03E1   AF        RET
 03E2   D6 03 D9  CALL M_03D9
 03E5   7B 08     JRC  M_03EF
 03E7   A7 EF 30  CP   @R30, #30h
 03EA   7B 04     JRC  M_03F0
 03EC   A7 EF 3A  CP   @R3A, #3Ah
 03EF   AF        RET
 03F0   CF        RCF
 03F1   AF        RET
 03F2   D6 03 E7  CALL M_03E7
 03F5   7B F8     JRC  M_03EF
 03F7   A7 EF 41  CP   @R41, #41h
 03FA   7B F4     JRC  M_03F0
 03FC   A7 EF 47  CP   @R47, #47h
 03FF   AF        RET
 0400   2C 03     LD   r2, #03h
 0402   3C 28     LD   r3, #28h
 0404   D6 04 12  CALL M_0412
 0407   7B 15     JRC  M_041E
 0409   B0 E2     CLR  RE2
 040B   44 08 E2  Or   RE2, R08
 040E   6B 0D     JRZ  M_041D
 0410   38 09     LD   r3, R09
 0412   48 E0     LD   r4, RE0
 0414   58 E1     LD   r5, RE1
 0416   C2 82     LDC  r8, @r2
 0418   A6 E8 FF  CP   RFF, #FFh
 041B   EB 02     JRNZ M_041F
 041D   CF        RCF
 041E   AF        RET
 041F   A0 E2     INCW RRE2
 0421   C2 72     LDC  r7, @r2
 0423   D6 03 91  CALL M_0391
 0426   EB 14     JRNZ M_043C
 0428   8A F5     DJNZ M_041F
 042A   C2 60     LDC  r6, @r0
 042C   D6 03 E2  CALL M_03E2
 042F   7B 0A     JRC  M_043B
 0431   A0 E2     INCW RRE2
 0433   C2 82     LDC  r8, @r2
 0435   A0 E2     INCW RRE2
 0437   C2 92     LDC  r9, @r2
 0439   DF        SCF
 043A   AF        RET
 043B   8E        INC  r8
 043C   8E        INC  r8
 043D   8E        INC  r8
 043E   02 38     ADD  r3, r8
 0440   16 E2 00  ADC  RE2, #00h
 0443   08 E4     LD   r0, RE4
 0445   18 E5     LD   r1, RE5
 0447   8B CD     JR   M_0416
 Drücken Sie eine Taste zum Beenden.
 
 | 
 
 --
 42
  ist die Antwort auf die "Frage nach dem Leben, dem Universum und dem ganzen Rest" Aktuelle Projektdokumentationen
 |