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

📄 keyproc.lst

📁 一个带收音的功放程序, VFD显示驱动用一个非常实用的方法, 稍加修改即可换成不同的VFD, 功放芯片用M61538
💻 LST
📖 第 1 页 / 共 5 页
字号:
000C 14                DEC     A
000D 6030              JZ      ?C0004
000F 14                DEC     A
0010 603B              JZ      ?C0005
0012 2403              ADD     A,#03H
0014 704B              JNZ     ?C0006
                                           ; SOURCE LINE # 55
                                           ; SOURCE LINE # 57
0016         ?C0002:
                                           ; SOURCE LINE # 58
0016 C282              CLR     CD4053_SELECT
                                           ; SOURCE LINE # 59
0018 D2A7              SETB    Pin_4052B
                                           ; SOURCE LINE # 60
001A D2A6              SETB    Pin_4052A
                                           ; SOURCE LINE # 61
001C 7BFF              MOV     R3,#0FFH
001E 7A00        R     MOV     R2,#HIGH ?SC_0
0020 7900        R     MOV     R1,#LOW ?SC_0
0022 E4                CLR     A
0023 F500        E     MOV     ?_VFD_Display?BYTE+04H,A
0025 F500        E     MOV     ?_VFD_Display?BYTE+05H,A
0027 F500        E     MOV     ?_VFD_Display?BYTE+06H,A
0029 7D05              MOV     R5,#05H
002B 120000      E     LCALL   _VFD_Display
                                           ; SOURCE LINE # 62
002E 020000      E     LJMP    Change_Tuner_Mode
                                           ; SOURCE LINE # 63
                                           ; SOURCE LINE # 64
0031         ?C0003:
                                           ; SOURCE LINE # 65
0031 C282              CLR     CD4053_SELECT
                                           ; SOURCE LINE # 66
0033 C2A7              CLR     Pin_4052B
                                           ; SOURCE LINE # 67
0035 D2A6              SETB    Pin_4052A
                                           ; SOURCE LINE # 68
0037 7BFF              MOV     R3,#0FFH
0039 7A00        R     MOV     R2,#HIGH ?SC_6
003B 7900        R     MOV     R1,#LOW ?SC_6
                                           ; SOURCE LINE # 70
003D 8016              SJMP    ?C0110
                                           ; SOURCE LINE # 71
003F         ?C0004:
                                           ; SOURCE LINE # 72
003F C282              CLR     CD4053_SELECT
                                           ; SOURCE LINE # 73
C51 COMPILER V7.20   KEYPROC                                                               07/16/2005 13:42:40 PAGE 10  

0041 C2A7              CLR     Pin_4052B
                                           ; SOURCE LINE # 74
0043 C2A6              CLR     Pin_4052A
                                           ; SOURCE LINE # 75
0045 7BFF              MOV     R3,#0FFH
0047 7A00        R     MOV     R2,#HIGH ?SC_13
0049 7900        R     MOV     R1,#LOW ?SC_13
004B         ?C0109:
                                           ; SOURCE LINE # 76
004B 8008              SJMP    ?C0110
                                           ; SOURCE LINE # 77
004D         ?C0005:
                                           ; SOURCE LINE # 78
004D D282              SETB    CD4053_SELECT
                                           ; SOURCE LINE # 79
004F 7BFF              MOV     R3,#0FFH
0051 7A00        R     MOV     R2,#HIGH ?SC_20
0053 7900        R     MOV     R1,#LOW ?SC_20
0055         ?C0110:
0055 E4                CLR     A
0056 F500        E     MOV     ?_VFD_Display?BYTE+04H,A
0058 F500        E     MOV     ?_VFD_Display?BYTE+05H,A
005A F500        E     MOV     ?_VFD_Display?BYTE+06H,A
005C 7D05              MOV     R5,#05H
005E 120000      E     LCALL   _VFD_Display
                                           ; SOURCE LINE # 81
                                           ; SOURCE LINE # 82
                                           ; SOURCE LINE # 84
0061         ?C0006:
0061 22                RET     
             ; FUNCTION Source_Set (END)

             ; FUNCTION KEY_Proc (BEGIN)
                                           ; SOURCE LINE # 94
                                           ; SOURCE LINE # 95
                                           ; SOURCE LINE # 98
0000 E500        E     MOV     A,Panel_KeyAct
0002 6401              XRL     A,#01H
0004 600F              JZ      ?C0008
0006 E500        E     MOV     A,IR_KeyAct
0008 6401              XRL     A,#01H
000A 6009              JZ      ?C0008
000C E500        E     MOV     A,Jog_KeyAct
000E 6401              XRL     A,#01H
0010 6003              JZ      $ + 5H
0012 020000      R     LJMP    ?C0066
0015         ?C0008:
                                           ; SOURCE LINE # 99
                                           ; SOURCE LINE # 101
0015 E500        E     MOV     A,IR_KeyAct
0017 6401              XRL     A,#01H
0019 703F              JNZ     ?C0009
                                           ; SOURCE LINE # 102
                                           ; SOURCE LINE # 103
001B E500        E     MOV     A,Remote_value
001D C3                CLR     C
001E 9421              SUBB    A,#021H
0020 500A              JNC     ?C0010
                                           ; SOURCE LINE # 104
0022 E500        E     MOV     A,Remote_value
0024 900000      R     MOV     DPTR,#IR_KEY_TBL
0027 93                MOVC    A,@A+DPTR
C51 COMPILER V7.20   KEYPROC                                                               07/16/2005 13:42:40 PAGE 11  

0028 F500        E     MOV     Current_Key,A
002A 8003              SJMP    ?C0011
002C         ?C0010:
                                           ; SOURCE LINE # 106
002C 7500FF      E     MOV     Current_Key,#0FFH
002F         ?C0011:
                                           ; SOURCE LINE # 108
002F E4                CLR     A
0030 F500        E     MOV     IR_KeyAct,A
                                           ; SOURCE LINE # 111
0032 E500        E     MOV     A,POWER_Status
0034 7063              JNZ     ?C0014
                                           ; SOURCE LINE # 112
                                           ; SOURCE LINE # 113
0036 850000      R     MOV     KEY_TEMP+02H,KEY_TEMP+01H
                                           ; SOURCE LINE # 114
0039 850000      R     MOV     KEY_TEMP+01H,KEY_TEMP
                                           ; SOURCE LINE # 115
003C 850000      R     MOV     KEY_TEMP,Current_Key
                                           ; SOURCE LINE # 116
003F E500        R     MOV     A,KEY_TEMP+02H
0041 6407              XRL     A,#07H
0043 7054              JNZ     ?C0014
0045 E500        R     MOV     A,KEY_TEMP+01H
0047 7050              JNZ     ?C0014
0049 E500        R     MOV     A,KEY_TEMP
004B 6405              XRL     A,#05H
004D 704A              JNZ     ?C0014
                                           ; SOURCE LINE # 118
                                           ; SOURCE LINE # 119
004F 7BFF              MOV     R3,#0FFH
0051 7D20              MOV     R5,#020H
0053 7FA0              MOV     R7,#0A0H
0055 120000      E     LCALL   _I2C_PutByte
                                           ; SOURCE LINE # 120
                                           ; SOURCE LINE # 121
                                           ; SOURCE LINE # 123
0058 803F              SJMP    ?C0014
005A         ?C0009:
                                           ; SOURCE LINE # 125
005A E500        E     MOV     A,Jog_KeyAct
005C B40119            CJNE    A,#01H,?C0015
                                           ; SOURCE LINE # 126
                                           ; SOURCE LINE # 127
005F E500        E     MOV     A,Jog_Key
0061 B40105            CJNE    A,#01H,?C0016
                                           ; SOURCE LINE # 128
0064 75000A      E     MOV     Current_Key,#0AH
0067 8008              SJMP    ?C0017
0069         ?C0016:
                                           ; SOURCE LINE # 129
0069 E500        E     MOV     A,Jog_Key
006B B40203            CJNE    A,#02H,?C0017
                                           ; SOURCE LINE # 130
006E 75000B      E     MOV     Current_Key,#0BH
0071         ?C0017:
                                           ; SOURCE LINE # 131
0071 E4                CLR     A
0072 F500        E     MOV     Jog_KeyAct,A
                                           ; SOURCE LINE # 132
0074 F500        E     MOV     Jog_Key,A
                                           ; SOURCE LINE # 133
C51 COMPILER V7.20   KEYPROC                                                               07/16/2005 13:42:40 PAGE 12  

0076 8021              SJMP    ?C0014
0078         ?C0015:
                                           ; SOURCE LINE # 135
0078 E500        E     MOV     A,Panel_KeyAct
007A B4011C            CJNE    A,#01H,?C0014
                                           ; SOURCE LINE # 136
                                           ; SOURCE LINE # 137
007D E500        E     MOV     A,Panel_Key
007F B40805            CJNE    A,#08H,?C0021
                                           ; SOURCE LINE # 138
0082 750006      E     MOV     Current_Key,#06H
0085 800D              SJMP    ?C0022
0087         ?C0021:
                                           ; SOURCE LINE # 139
0087 E500        E     MOV     A,Panel_Key
0089 B40405            CJNE    A,#04H,?C0023
                                           ; SOURCE LINE # 140
008C 75000C      E     MOV     Current_Key,#0CH
008F 8003              SJMP    ?C0022
0091         ?C0023:
                                           ; SOURCE LINE # 142
0091 7500FF      E     MOV     Current_Key,#0FFH
0094         ?C0022:
                                           ; SOURCE LINE # 143
0094 E4                CLR     A
0095 F500        E     MOV     Panel_KeyAct,A
                                           ; SOURCE LINE # 144
0097 F500        E     MOV     Panel_Key,A
                                           ; SOURCE LINE # 145
0099         ?C0014:
                                           ; SOURCE LINE # 146
0099 E500        E     MOV     A,Current_Key
009B B40606            CJNE    A,#06H,?C0025
                                           ; SOURCE LINE # 147
                                           ; SOURCE LINE # 148
009E 120000      R     LCALL   Power_Proc
                                           ; SOURCE LINE # 149
00A1 020000      R     LJMP    ?C0026
00A4         ?C0025:
                                           ; SOURCE LINE # 150
00A4 E500        E     MOV     A,POWER_Status
00A6 6401              XRL     A,#01H
00A8 6003              JZ      $ + 5H
00AA 020000      R     LJMP    ?C0026
                                           ; SOURCE LINE # 151
                                           ; SOURCE LINE # 152
                                           ; SOURCE LINE # 153
00AD E500        E     MOV     A,Current_Key
00AF 640D              XRL     A,#0DH
00B1 6023              JZ      ?C0028
00B3 E500        E     MOV     A,Current_Key
00B5 601F              JZ      ?C0028
00B7 6401              XRL     A,#01H
00B9 601B              JZ      ?C0028
00BB E500        E     MOV     A,Current_Key
00BD 6402              XRL     A,#02H
00BF 6015              JZ      ?C0028
00C1 E500        E     MOV     A,Current_Key
00C3 6403              XRL     A,#03H
00C5 600F              JZ      ?C0028
00C7 E500        E     MOV     A,Current_Key
00C9 6404              XRL     A,#04H
C51 COMPILER V7.20   KEYPROC                                                               07/16/2005 13:42:40 PAGE 13  

00CB 6009              JZ      ?C0028
00CD E500        E     MOV     A,Current_Key
00CF 6405              XRL     A,#05H
00D1 6003              JZ      ?C0028
                                           ; SOURCE LINE # 158
00D3 E4                CLR     A
00D4 F500        E     MOV     Memory_Start,A
00D6         ?C0028:
                                           ; SOURCE LINE # 160
00D6 E500        E     MOV     A,Current_Key

⌨️ 快捷键说明

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