⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 5767.asm

📁 TEA5767-PLL收音机整套方案(汇编源码)
💻 ASM
📖 第 1 页 / 共 5 页
字号:
                   XCH   A,R5                         ;0109   CD
                   RRC   A                            ;010A   13
                   XCH   A,R5                         ;010B   CD
                   XCH   A,R6                         ;010C   CE
                   RRC   A                            ;010D   13
                   XCH   A,R6                         ;010E   CE
                   XCH   A,R7                         ;010F   CF
                   RRC   A                            ;0110   13
                   XCH   A,R7                         ;0111   CF
Q0112:             INC   A                            ;0112   04
                   JNZ   Q0105                        ;0113   70 F0
                   JNB   F0,Q00F6                     ;0115   30 D5 DE
                   LJMP  Q023F                        ;0118   02 02 3F
;==========================================================================
Q011B:             MOV   A,R1                         ;011B   E9
                   SETB  ACC.7                        ;011C   D2 E7
                   XCH   A,R1                         ;011E   C9
                   RLC   A                            ;011F   33
                   MOV   A,R0                         ;0120   E8
                   RLC   A                            ;0121   33
                   MOV   R0,A                         ;0122   F8
                   MOV   F0,C                         ;0123   92 D5
                   MOV   A,R5                         ;0125   ED
                   SETB  ACC.7                        ;0126   D2 E7
                   XCH   A,R5                         ;0128   CD
                   RLC   A                            ;0129   33
                   MOV   A,R4                         ;012A   EC
                   RLC   A                            ;012B   33
                   MOV   R4,A                         ;012C   FC
                   JNC   Q0131                        ;012D   50 02
                   CPL   F0                           ;012F   B2 D5
Q0131:             RET                                ;0131   22
;==========================================================================
Q0132:             MOV   A,R4                         ;0132   EC
                   JNB   ACC.7,Q0146                  ;0133   30 E7 10
                   INC   R7                           ;0136   0F
                   CJNE  R7,#00H,Q0146                ;0137   BF 00 0C
                   INC   R6                           ;013A   0E
                   CJNE  R6,#00H,Q0146                ;013B   BE 00 08
                   INC   R5                           ;013E   0D
                   CJNE  R5,#00H,Q0146                ;013F   BD 00 04
                   INC   R3                           ;0142   0B
                   MOV   A,R3                         ;0143   EB
                   JZ    Q015A                        ;0144   60 14
Q0146:             MOV   C,F0                         ;0146   A2 D5
                   MOV   A,R3                         ;0148   EB
                   RRC   A                            ;0149   13
                   MOV   R4,A                         ;014A   FC
                   MOV   A,R5                         ;014B   ED
                   MOV   ACC.7,C                      ;014C   92 E7
                   MOV   R5,A                         ;014E   FD
                   RET                                ;014F   22
;==========================================================================
Q0150:             MOV   A,#0FFH                      ;0150   74 FF
Q0152:             MOV   R4,A                         ;0152   FC
                   MOV   R5,A                         ;0153   FD
Q0154:             MOV   R6,A                         ;0154   FE
                   MOV   R7,A                         ;0155   FF
                   RET                                ;0156   22
;==========================================================================
Q0157:             CLR   A                            ;0157   E4
                   SJMP  Q0152                        ;0158   80 F8
Q015A:             MOV   C,F0                         ;015A   A2 D5
                   MOV   A,#0FFH                      ;015C   74 FF
                   RRC   A                            ;015E   13
                   MOV   R4,A                         ;015F   FC
                   MOV   R5,#80H                      ;0160   7D 80
                   CLR   A                            ;0162   E4
                   SJMP  Q0154                        ;0163   80 EF
Q0165:             CJNE  R4,#00H,Q0173                ;0165   BC 00 0B
                   CJNE  R6,#00H,Q0194                ;0168   BE 00 29
                   MOV   A,R7                         ;016B   EF
                   MOV   B,R5                         ;016C   8D F0
                   DIV   AB                           ;016E   84
                   MOV   R7,A                         ;016F   FF
                   MOV   R5,B                         ;0170   AD F0
                   RET                                ;0172   22
;==========================================================================
Q0173:             CLR   A                            ;0173   E4
                   XCH   A,R4                         ;0174   CC
                   MOV   R0,A                         ;0175   F8
                   MOV   B,#08H                       ;0176   75 F0 08
Q0179:             MOV   A,R7                         ;0179   EF
                   ADD   A,R7                         ;017A   2F
                   MOV   R7,A                         ;017B   FF
                   MOV   A,R6                         ;017C   EE
                   RLC   A                            ;017D   33
                   MOV   R6,A                         ;017E   FE
                   MOV   A,R4                         ;017F   EC
                   RLC   A                            ;0180   33
                   MOV   R4,A                         ;0181   FC
                   MOV   A,R6                         ;0182   EE
                   SUBB  A,R5                         ;0183   9D
                   MOV   A,R4                         ;0184   EC
                   SUBB  A,R0                         ;0185   98
                   JC    Q018D                        ;0186   40 05
                   MOV   R4,A                         ;0188   FC
                   MOV   A,R6                         ;0189   EE
                   SUBB  A,R5                         ;018A   9D
                   MOV   R6,A                         ;018B   FE
                   INC   R7                           ;018C   0F
Q018D:             DJNZ  B,Q0179                      ;018D   D5 F0 E9
                   CLR   A                            ;0190   E4
                   XCH   A,R6                         ;0191   CE
                   MOV   R5,A                         ;0192   FD
                   RET                                ;0193   22
;==========================================================================
Q0194:             MOV   A,R5                         ;0194   ED
                   MOV   R0,A                         ;0195   F8
                   MOV   B,A                          ;0196   F5 F0
                   MOV   A,R6                         ;0198   EE
                   DIV   AB                           ;0199   84
                   JB    OV,Q01B9                     ;019A   20 D2 1C
                   MOV   R6,A                         ;019D   FE
                   MOV   R5,B                         ;019E   AD F0
                   MOV   B,#08H                       ;01A0   75 F0 08
Q01A3:             MOV   A,R7                         ;01A3   EF
                   ADD   A,R7                         ;01A4   2F
                   MOV   R7,A                         ;01A5   FF
                   MOV   A,R5                         ;01A6   ED
                   RLC   A                            ;01A7   33
                   MOV   R5,A                         ;01A8   FD
                   JC    Q01B2                        ;01A9   40 07
                   SUBB  A,R0                         ;01AB   98
                   JNC   Q01B4                        ;01AC   50 06
                   DJNZ  B,Q01A3                      ;01AE   D5 F0 F2
                   RET                                ;01B1   22
;==========================================================================
Q01B2:             CLR   C                            ;01B2   C3
                   SUBB  A,R0                         ;01B3   98
Q01B4:             MOV   R5,A                         ;01B4   FD
                   INC   R7                           ;01B5   0F
                   DJNZ  B,Q01A3                      ;01B6   D5 F0 EA
Q01B9:             RET                                ;01B9   22
;==========================================================================
Q01BA:             CLR   F0                           ;01BA   C2 D5
                   MOV   A,R4                         ;01BC   EC
                   JNB   ACC.7,Q01C9                  ;01BD   30 E7 09
                   CPL   F0                           ;01C0   B2 D5
                   CLR   A                            ;01C2   E4
                   CLR   C                            ;01C3   C3
                   SUBB  A,R5                         ;01C4   9D
                   MOV   R5,A                         ;01C5   FD
                   CLR   A                            ;01C6   E4
                   SUBB  A,R4                         ;01C7   9C
                   MOV   R4,A                         ;01C8   FC
Q01C9:             MOV   A,R6                         ;01C9   EE
                   JNB   ACC.7,Q01E2                  ;01CA   30 E7 15
                   CPL   F0                           ;01CD   B2 D5
                   CLR   A                            ;01CF   E4
                   CLR   C                            ;01D0   C3
                   SUBB  A,R7                         ;01D1   9F
                   MOV   R7,A                         ;01D2   FF
                   CLR   A                            ;01D3   E4
                   SUBB  A,R6                         ;01D4   9E
                   MOV   R6,A                         ;01D5   FE
                   LCALL Q0165                        ;01D6   12 01 65
                   CLR   C                            ;01D9   C3
                   CLR   A                            ;01DA   E4
                   SUBB  A,R5                         ;01DB   9D
                   MOV   R5,A                         ;01DC   FD
                   CLR   A                            ;01DD   E4
                   SUBB  A,R4                         ;01DE   9C
                   MOV   R4,A                         ;01DF   FC
                   SJMP  Q01E5                        ;01E0   80 03
Q01E2:             LCALL Q0165                        ;01E2   12 01 65
Q01E5:             JNB   F0,Q01EF                     ;01E5   30 D5 07
                   CLR   C                            ;01E8   C3
                   CLR   A                            ;01E9   E4
                   SUBB  A,R7                         ;01EA   9F
                   MOV   R7,A                         ;01EB   FF
                   CLR   A                            ;01EC   E4
                   SUBB  A,R6                         ;01ED   9E
                   MOV   R6,A                         ;01EE   FE
Q01EF:             RET                                ;01EF   22
;==========================================================================
Q01F0:             MOV   A,R0                         ;01F0   E8
                   MOV   B,R7                         ;01F1   8F F0
                   MUL   AB                           ;01F3   A4
                   XCH   A,R4                         ;01F4   CC
                   MOV   B,R3                         ;01F5   8B F0
                   MUL   AB                           ;01F7   A4
                   ADD   A,R4                         ;01F8   2C
                   MOV   R4,A                         ;01F9   FC
                   MOV   A,R1                         ;01FA   E9
                   MOV   B,R6                         ;01FB   8E F0
                   MUL   AB                           ;01FD   A4
                   ADD   A,R4                         ;01FE   2C
                   MOV   R4,A                         ;01FF   FC
                   MOV   B,R2                         ;0200   8A F0
                   MOV   A,R5                         ;0202   ED
                   MUL   AB                           ;0203   A4

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -