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

📄 main.lst

📁 电话单路计费系统!LCD段码显示!电话机设定自由费率,根据反极信号计费及延时计费自由设定!
💻 LST
📖 第 1 页 / 共 5 页
字号:
0041 E4                CLR     A
0042 F500        E     MOV     ?ShowLCD?BYTE,A
0044 7400        R     MOV     A,#LOW key+0FFFFH
0046 2500        R     ADD     A,nkey
0048 F9                MOV     R1,A
0049 E4                CLR     A
004A F500        E     MOV     ?ShowLCD?BYTE+01H,A
004C F500        E     MOV     ?ShowLCD?BYTE+02H,A
004E 8900        E     MOV     ?ShowLCD?BYTE+03H,R1
0050 850000      E     MOV     ?ShowLCD?BYTE+04H,nkey
0053 120000      E     LCALL   ShowLCD
                                           ; SOURCE LINE # 78
                                           ; SOURCE LINE # 79
0056         ?C0014:
0056 22                RET     
             ; FUNCTION getkey (END)

             ; FUNCTION clrbuf (BEGIN)
                                           ; SOURCE LINE # 82
                                           ; SOURCE LINE # 84
0000 C200        R     CLR     polarity_bit
                                           ; SOURCE LINE # 85
0002 C200        R     CLR     scankey_bit
                                           ; SOURCE LINE # 86
0004 C200        R     CLR     set_sign
                                           ; SOURCE LINE # 87
0006 E4                CLR     A
0007 F500        R     MOV     nkey,A
                                           ; SOURCE LINE # 88
0009 D2B0              SETB    Led2
                                           ; SOURCE LINE # 89
000B D2B1              SETB    Led1
                                           ; SOURCE LINE # 90
;---- Variable 'i' assigned to Register 'R7' ----
000D         ?C0015:
                                           ; SOURCE LINE # 91
000D 7F14              MOV     R7,#014H
000F 7800        R     MOV     R0,#LOW key
0011 E4                CLR     A
0012         ?C0098:
0012 F6                MOV     @R0,A
0013 08                INC     R0
0014 DFFC              DJNZ    R7,?C0098
0016         ?C0016:
C51 COMPILER V7.10   MAIN                                                                  05/07/2006 17:33:51 PAGE 11  

                                           ; SOURCE LINE # 92
0016         ?C0018:
                                           ; SOURCE LINE # 93
0016 7F0A              MOV     R7,#0AH
0018 7800        R     MOV     R0,#LOW p
001A E4                CLR     A
001B         ?C0099:
001B F6                MOV     @R0,A
001C 08                INC     R0
001D DFFC              DJNZ    R7,?C0099
                                           ; SOURCE LINE # 95
001F         ?C0021:
001F 22                RET     
             ; FUNCTION clrbuf (END)

             ; FUNCTION set_menu (BEGIN)
                                           ; SOURCE LINE # 127
                                           ; SOURCE LINE # 129
0000 200003      R     JB      KeyACT,$ + 6H
0003 020000      R     LJMP    ?C0023
0006         ?C0022:
                                           ; SOURCE LINE # 130
0006 200003      R     JB      set_sign,$ + 6H
0009 020000      R     LJMP    ?C0023
000C         ?C0024:
                                           ; SOURCE LINE # 131
000C E500        R     MOV     A,nkey
000E B40103            CJNE    A,#01H,?C0025
0011 E4                CLR     A
0012 F500        R     MOV     count,A
0014         ?C0025:
                                           ; SOURCE LINE # 132
0014 C200        R     CLR     KeyACT
                                           ; SOURCE LINE # 133
0016 E500        R     MOV     A,count
0018 120000      E     LCALL   ?C?CCASE
001B 0000        R     DW      ?C0027
001D 00                DB      00H
001E 0000        R     DW      ?C0030
0020 01                DB      01H
0021 0000        R     DW      ?C0036
0023 02                DB      02H
0024 0000        R     DW      ?C0036
0026 03                DB      03H
0027 0000        R     DW      ?C0036
0029 04                DB      04H
002A 0000        R     DW      ?C0036
002C 05                DB      05H
002D 0000        R     DW      ?C0037
002F 06                DB      06H
0030 0000        R     DW      ?C0043
0032 07                DB      07H
0033 0000        R     DW      ?C0044
0035 08                DB      08H
0036 0000        R     DW      ?C0053
0038 10                DB      010H
0039 0000        R     DW      ?C0054
003B 11                DB      011H
003C 0000        R     DW      ?C0055
003E 12                DB      012H
003F 0000        R     DW      ?C0080
0041 13                DB      013H
C51 COMPILER V7.10   MAIN                                                                  05/07/2006 17:33:51 PAGE 12  

0042 0000        R     DW      ?C0057
0044 14                DB      014H
0045 0000        R     DW      ?C0061
0047 20                DB      020H
0048 0000        R     DW      ?C0062
004A 21                DB      021H
004B 0000        R     DW      ?C0063
004D 22                DB      022H
004E 0000        R     DW      ?C0080
0050 23                DB      023H
0051 0000        R     DW      ?C0065
0053 24                DB      024H
0054 0000        R     DW      ?C0069
0056 30                DB      030H
0057 0000        R     DW      ?C0070
0059 31                DB      031H
005A 0000        R     DW      ?C0071
005C 32                DB      032H
005D 0000        R     DW      ?C0080
005F 33                DB      033H
0060 0000        R     DW      ?C0073
0062 34                DB      034H
0063 0000        R     DW      ?C0077
0065 40                DB      040H
0066 0000        R     DW      ?C0078
0068 41                DB      041H
0069 0000        R     DW      ?C0079
006B 42                DB      042H
006C 0000        R     DW      ?C0080
006E 43                DB      043H
006F 0000        R     DW      ?C0081
0071 44                DB      044H
0072 0000        R     DW      ?C0085
0074 50                DB      050H
0075 0000        R     DW      ?C0086
0077 51                DB      051H
0078 0000        R     DW      ?C0089
007A F0                DB      0F0H
007B 0000        R     DW      ?C0090
007D F1                DB      0F1H
007E 0000        R     DW      ?C0091
0080 F2                DB      0F2H
0081 0000        R     DW      ?C0080
0083 F3                DB      0F3H
0084 0000        R     DW      ?C0093
0086 F4                DB      0F4H
0087 0000              DW      00H
0089 0000        R     DW      ?C0095
                                           ; SOURCE LINE # 134
008B         ?C0027:
                                           ; SOURCE LINE # 135
008B E500        R     MOV     A,KeyTemp
008D B40B03            CJNE    A,#0BH,?C0028
                                           ; SOURCE LINE # 136
0090 0500        R     INC     count
0092 22                RET     
0093         ?C0028:
                                           ; SOURCE LINE # 137
                                           ; SOURCE LINE # 138
                                           ; SOURCE LINE # 139
                                           ; SOURCE LINE # 140
                                           ; SOURCE LINE # 141
C51 COMPILER V7.10   MAIN                                                                  05/07/2006 17:33:51 PAGE 13  

0093 020000      R     LJMP    ?C0147
                                           ; SOURCE LINE # 142
0096         ?C0030:
                                           ; SOURCE LINE # 143
0096 E500        R     MOV     A,KeyTemp
0098 B40C03            CJNE    A,#0CH,?C0031
                                           ; SOURCE LINE # 144
009B 0500        R     INC     count
009D 22                RET     
009E         ?C0031:
                                           ; SOURCE LINE # 145
                                           ; SOURCE LINE # 146
009E         ?C0100:
                                           ; SOURCE LINE # 147
                                           ; SOURCE LINE # 148
                                           ; SOURCE LINE # 149
009E 020000      R     LJMP    ?C0147
                                           ; SOURCE LINE # 150
00A1         ?C0036:
                                           ; SOURCE LINE # 151
00A1 7400        R     MOV     A,#LOW key+0FFFEH
00A3 2500        R     ADD     A,count
00A5 F8                MOV     R0,A
00A6 A600        R     MOV     @R0,KeyTemp
                                           ; SOURCE LINE # 152
00A8 0500        R     INC     count
                                           ; SOURCE LINE # 153
00AA 22                RET     
                                           ; SOURCE LINE # 154
00AB         ?C0037:
                                           ; SOURCE LINE # 155
00AB E500        R     MOV     A,KeyTemp
00AD 640C              XRL     A,#0CH
00AF 6003              JZ      ?C0038
00B1         ?C0101:
00B1 020000      R     LJMP    ?C0147
00B4         ?C0038:
                                           ; SOURCE LINE # 156
                                           ; SOURCE LINE # 157
00B4 120000      R     LCALL   L?0151
00B7 6003              JZ      ?C0039
00B9         ?C0102:
00B9 020000      R     LJMP    ?C0147
00BC         ?C0039:
                                           ; SOURCE LINE # 158
00BC E500        R     MOV     A,key+01H
00BE 6500        R     XRL     A,p+01H
00C0 6003              JZ      ?C0040
00C2         ?C0103:
00C2 020000      R     LJMP    ?C0147
00C5         ?C0040:
                                           ; SOURCE LINE # 159
00C5 E500        R     MOV     A,key+02H
00C7 6500        R     XRL     A,p+02H
00C9 6003              JZ      ?C0041
00CB         ?C0104:
00CB 020000      R     LJMP    ?C0147
00CE         ?C0041:
                                           ; SOURCE LINE # 160
00CE E500        R     MOV     A,key+03H
00D0 6500        R     XRL     A,p+03H
00D2 6003              JZ      ?C0042
C51 COMPILER V7.10   MAIN                                                                  05/07/2006 17:33:51 PAGE 14  

00D4         ?C0105:
00D4 020000      R     LJMP    ?C0147
00D7         ?C0042:
                                           ; SOURCE LINE # 161
00D7 120000      R     LCALL   showsucceed
                                           ; SOURCE LINE # 162
00DA 0500        R     INC     count
                                           ; SOURCE LINE # 163
00DC 22                RET     
                                           ; SOURCE LINE # 165
00DD         ?C0043:
                                           ; SOURCE LINE # 166
00DD 0500        R     INC     count
                                           ; SOURCE LINE # 167
00DF 850000      R     MOV     key,KeyTemp
                                           ; SOURCE LINE # 168
00E2 22                RET     
                                           ; SOURCE LINE # 170
00E3         ?C0044:
                                           ; SOURCE LINE # 171
00E3 E500        R     MOV     A,KeyTemp
00E5 640C              XRL     A,#0CH
00E7 6003              JZ      ?C0045
00E9         ?C0106:
00E9 020000      R     LJMP    ?C0147
00EC         ?C0045:
                                           ; SOURCE LINE # 172
00EC E500        R     MOV     A,key
00EE 24FE              ADD     A,#0FEH
00F0 6018              JZ      ?C0048
00F2 14                DEC     A
00F3 601A              JZ      ?C0049
00F5 14                DEC     A
00F6 601C              JZ      ?C0050
00F8 14                DEC     A
00F9 601E              JZ      ?C0051
00FB 14                DEC     A
00FC 6021              JZ      ?C0052
00FE 2405              ADD     A,#05H

⌨️ 快捷键说明

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