📄 bin2bcd.ls1
字号:
A51 MACRO ASSEMBLER BIN2BCD 09/11/2005 06:36:51 PAGE 1
MACRO ASSEMBLER A51 V6.02
OBJECT MODULE PLACED IN Bin2BCD.OBJ
ASSEMBLER INVOKED BY: d:\Keil\C51\BIN\A51.EXE Bin2BCD.src PR(.\Bin2BCD.ls1) EP DEBUG
LOC OBJ LINE SOURCE
1 ; .\Bin2BCD.SRC generated from: .\Bin2BCD.c
2
3
4 NAME BIN2BCD
5
6 ?PR?LongToBcd?BIN2BCD SEGMENT CODE
7 ?PR?WordToBcd?BIN2BCD SEGMENT CODE
8 ?PR?_KeilWordToBcd?BIN2BCD SEGMENT CODE
9 ?PR?_KeilLongToBcd?BIN2BCD SEGMENT CODE
10 PUBLIC AsmParam3
11 PUBLIC AsmParam2
12 PUBLIC AsmParam1
13 PUBLIC _KeilLongToBcd
14 PUBLIC _KeilWordToBcd
15 PUBLIC WordToBcd
16 PUBLIC LongToBcd
17
---- 18 DSEG AT 020H
0020 19 AsmParam1: DS 1
20
---- 21 DSEG AT 021H
0021 22 AsmParam2: DS 1
23
---- 24 DSEG AT 022H
0022 25 AsmParam3: DS 1
26 ; /*************************************************************************************/
27 ; unsigned char AsmParam1 _at_ 0x20;
28 ; unsigned char AsmParam2 _at_ 0x21;
29 ; unsigned char AsmParam3 _at_ 0x22;
30 ; //------------------------------------------------------------------------------------
31 ; void LongToBcd(void)
32
---- 33 RSEG ?PR?LongToBcd?BIN2BCD
0000 34 LongToBcd:
35 ; SOURCE LINE # 6
36 ; {
37 ; SOURCE LINE # 7
38 ; #pragma asm
39 ; MOV A,20H ;
0000 E520 40 MOV A,20H ;
41 ; MOV R7,A
0002 FF 42 MOV R7,A
43 ; MOV A,21H ;
0003 E521 44 MOV A,21H ;
45 ; MOV R5,A
0005 FD 46 MOV R5,A
47 ; MOV A,R7
0006 EF 48 MOV A,R7
49 ; MOV R1,A ;LongData ADDRESS:R1(Hsb)
0007 F9 50 MOV R1,A ;LongData ADDRESS:R1(Hsb)
51 ;
52
53 ; MOV A,R5
0008 ED 54 MOV A,R5
55 ; MOV R0,A ;LongData ADDRESS:R0(Hsb)
0009 F8 56 MOV R0,A ;LongData ADDRESS:R0(Hsb)
57 ;
58
A51 MACRO ASSEMBLER BIN2BCD 09/11/2005 06:36:51 PAGE 2
59 ; MOV A,@R1 ;LongData:H R2 R3 R4 R5 L
000A E7 60 MOV A,@R1 ;LongData:H R2 R3 R4 R5 L
61 ; MOV R2,A
000B FA 62 MOV R2,A
63 ; INC R1
000C 09 64 INC R1
65 ; MOV A,@R1
000D E7 66 MOV A,@R1
67 ; MOV R3,A
000E FB 68 MOV R3,A
69 ; INC R1
000F 09 70 INC R1
71 ; MOV A,@R1
0010 E7 72 MOV A,@R1
73 ; MOV R4,A
0011 FC 74 MOV R4,A
75 ; INC R1
0012 09 76 INC R1
77 ; MOV A,@R1
0013 E7 78 MOV A,@R1
79 ; MOV R5,A
0014 FD 80 MOV R5,A
81 ;
82
83 ; CLR A ;CLEAR BCD_Data
0015 E4 84 CLR A ;CLEAR BCD_Data
85 ; MOV @R0,A
0016 F6 86 MOV @R0,A
87 ; INC R0
0017 08 88 INC R0
89 ; MOV @R0,A
0018 F6 90 MOV @R0,A
91 ; INC R0
0019 08 92 INC R0
93 ; MOV @R0,A
001A F6 94 MOV @R0,A
95 ; INC R0
001B 08 96 INC R0
97 ; MOV @R0,A
001C F6 98 MOV @R0,A
99 ; INC R0
001D 08 100 INC R0
101 ; MOV @R0,A ;BCD_Data ADDRESS:R0 OR R7(Lsb)
001E F6 102 MOV @R0,A ;BCD_Data ADDRESS:R0 OR R7(Lsb)
103 ; MOV A,R0
001F E8 104 MOV A,R0
105 ; MOV R7,A
0020 FF 106 MOV R7,A
107 ;
108
109 ; MOV R1,#32 ;R2:SHIFT COUNT
0021 7920 110 MOV R1,#32 ;R2:SHIFT COUNT
111 ;
112
113 ; F4Bin2BCDLP2:
0023 114 F4Bin2BCDLP2:
115 ; MOV A,R5
0023 ED 116 MOV A,R5
117 ; RLC A
0024 33 118 RLC A
119 ; MOV R5,A
0025 FD 120 MOV R5,A
121 ; MOV A,R4
0026 EC 122 MOV A,R4
123 ; RLC A
0027 33 124 RLC A
A51 MACRO ASSEMBLER BIN2BCD 09/11/2005 06:36:51 PAGE 3
125 ; MOV R4,A
0028 FC 126 MOV R4,A
127 ; MOV A,R3
0029 EB 128 MOV A,R3
129 ; RLC A
002A 33 130 RLC A
131 ; MOV R3,A
002B FB 132 MOV R3,A
133 ; MOV A,R2
002C EA 134 MOV A,R2
135 ; RLC A
002D 33 136 RLC A
137 ; MOV R2,A
002E FA 138 MOV R2,A
139 ; JC F4Bin2BCDLP3
002F 4003 140 JC F4Bin2BCDLP3
141 ; DJNZ R1,F4Bin2BCDLP2
0031 D9F0 142 DJNZ R1,F4Bin2BCDLP2
143 ; F4Bin2BCDLP4:
0033 144 F4Bin2BCDLP4:
145 ; RET
0033 22 146 RET
147 ;
148
149 ; F4Bin2BCDLP3:
0034 150 F4Bin2BCDLP3:
151 ; MOV A,#1
0034 7401 152 MOV A,#1
153 ; MOV @R0,A
0036 F6 154 MOV @R0,A
155 ;
156
157 ; MOV A,R1
0037 E9 158 MOV A,R1
159 ; CLR C
0038 C3 160 CLR C
161 ; SUBB A,#1
0039 9401 162 SUBB A,#1
163 ; JZ F4Bin2BCDLP4
003B 60F6 164 JZ F4Bin2BCDLP4
165 ;
166
167 ; MOV R1,A
003D F9 168 MOV R1,A
169 ;
170
171 ; F4Bin2BCDLP1:
003E 172 F4Bin2BCDLP1:
173 ; MOV A,R5
003E ED 174 MOV A,R5
175 ; RLC A
003F 33 176 RLC A
177 ; MOV R5,A
0040 FD 178 MOV R5,A
179 ; MOV A,R4
0041 EC 180 MOV A,R4
181 ; RLC A
0042 33 182 RLC A
183 ; MOV R4,A
0043 FC 184 MOV R4,A
185 ; MOV A,R3
0044 EB 186 MOV A,R3
187 ; RLC A
0045 33 188 RLC A
189 ; MOV R3,A
0046 FB 190 MOV R3,A
A51 MACRO ASSEMBLER BIN2BCD 09/11/2005 06:36:51 PAGE 4
191 ; MOV A,R2
0047 EA 192 MOV A,R2
193 ; RLC A
0048 33 194 RLC A
195 ; MOV R2,A
0049 FA 196 MOV R2,A
197 ;
198
199 ; MOV A,@R0
004A E6 200 MOV A,@R0
201 ; ADDC A,ACC
004B 35E0 202 ADDC A,ACC
203 ; DA A
004D D4 204 DA A
205 ; MOV @R0,A
004E F6 206 MOV @R0,A
207 ;
208
209 ; DEC R0
004F 18 210 DEC R0
211 ; MOV A,@R0
0050 E6 212 MOV A,@R0
213 ; ADDC A,ACC
0051 35E0 214 ADDC A,ACC
215 ; DA A
0053 D4 216 DA A
217 ; MOV @R0,A
0054 F6 218 MOV @R0,A
219 ;
220
221 ; DEC R0
0055 18 222 DEC R0
223 ; MOV A,@R0
0056 E6 224 MOV A,@R0
225 ; ADDC A,ACC
0057 35E0 226 ADDC A,ACC
227 ; DA A
0059 D4 228 DA A
229 ; MOV @R0,A
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -