📄 密码锁.lst
字号:
016F 02006A 191 LJMP A0
192
0172 D28C 193 ALARM_1:SETB TR0 ;操作错误报警
0174 208CFD 194 JB TR0,$
0177 22 195 RET
0178 D28C 196 ALARM_2:SETB TR0 ;密码错误报警
017A 208CFD 197 JB TR0,$
017D 120247 198 LCALL DLY_L
0180 22 199 RET
200 ;**************************************************
201 ;定时器中断服务程序,用于声音报警
0181 202 INT_T0:
0181 B297 203 CPL P1.7
0183 758CFD 204 MOV TH0,#(65536-700)/256
0186 758A44 205 MOV TL0,#(65536-700)MOD 256
0189 0544 206 INC CNT_A
018B A944 207 MOV R1,CNT_A
018D B91E12 208 CJNE R1,#30,RETUNE
0190 754400 209 MOV CNT_A,#00H
0193 0545 210 INC CNT_B
0195 A945 211 MOV R1,CNT_B
0197 B91408 212 CJNE R1,#20,RETUNE
019A 754400 213 MOV CNT_A,#00H
019D 754500 214 MOV CNT_B,#00H
01A0 C28C 215 CLR TR0
01A2 32 216 RETUNE: RETI
217 ;**************************************************
218 ;段码,输入密码左移子程序
01A3 853435 219 SHIFTL: MOV LED_BIT_6,LED_BIT_5
01A6 853334 220 MOV LED_BIT_5,LED_BIT_4
01A9 853233 221 MOV LED_BIT_4,LED_BIT_3
01AC 853132 222 MOV LED_BIT_3,LED_BIT_2
01AF 853031 223 MOV LED_BIT_2,LED_BIT_1
01B2 753040 224 MOV LED_BIT_1,#40H
01B5 854243 225 MOV KEY_6,KEY_5
01B8 854142 226 MOV KEY_5,KEY_4
01BB 854041 227 MOV KEY_4,KEY_3
01BE 853F40 228 MOV KEY_3,KEY_2
01C1 853E3F 229 MOV KEY_2,KEY_1
01C4 85493E 230 MOV KEY_1,VAL
01C7 22 231 RET
232 ;**************************************************
233 ;段码,输入密码右移子程序
01C8 853130 234 SHIFTR: MOV LED_BIT_1,LED_BIT_2
01CB 853231 235 MOV LED_BIT_2,LED_BIT_3
01CE 853332 236 MOV LED_BIT_3,LED_BIT_4
01D1 853433 237 MOV LED_BIT_4,LED_BIT_5
01D4 853534 238 MOV LED_BIT_5,LED_BIT_6
01D7 753500 239 MOV LED_BIT_6,#00H
01DA 853F3E 240 MOV KEY_1,KEY_2
01DD 85403F 241 MOV KEY_2,KEY_3
01E0 854140 242 MOV KEY_3,KEY_4
01E3 854241 243 MOV KEY_4,KEY_5
01E6 854342 244 MOV KEY_5,KEY_6
01E9 754300 245 MOV KEY_6,#00H
01EC 22 246 RET
247 ;**************************************************
248 ;以下为数码显示子程序
01ED C2A7 249 DISP: CLR P2.7
01EF 853780 250 MOV P0,LED_BIT_8
01F2 12023E 251 LCALL DLY_S
01F5 D2A7 252 SETB P2.7
01F7 C2A6 253 CLR P2.6
01F9 853680 254 MOV P0,LED_BIT_7
01FC 12023E 255 LCALL DLY_S
01FF D2A6 256 SETB P2.6
A51 MACRO ASSEMBLER 胈码薩 12/31/2008 17:06:11 PAGE 5
0201 C2A5 257 CLR P2.5
0203 853580 258 MOV P0,LED_BIT_6
0206 12023E 259 LCALL DLY_S
0209 D2A5 260 SETB P2.5
020B C2A4 261 CLR P2.4
020D 853480 262 MOV P0,LED_BIT_5
0210 12023E 263 LCALL DLY_S
0213 D2A4 264 SETB P2.4
0215 C2A3 265 CLR P2.3
0217 853380 266 MOV P0,LED_BIT_4
021A 12023E 267 LCALL DLY_S
021D D2A3 268 SETB P2.3
021F C2A2 269 CLR P2.2
0221 853280 270 MOV P0,LED_BIT_3
0224 12023E 271 LCALL DLY_S
0227 D2A2 272 SETB P2.2
0229 C2A1 273 CLR P2.1
022B 853180 274 MOV P0,LED_BIT_2
022E 12023E 275 LCALL DLY_S
0231 D2A1 276 SETB P2.1
0233 C2A0 277 CLR P2.0
0235 853080 278 MOV P0,LED_BIT_1
0238 12023E 279 LCALL DLY_S
023B D2A0 280 SETB P2.0
023D 22 281 RET
282 ;**********************************************
023E 7E01 283 DLY_S: MOV R6,#1
0240 7FFA 284 D1: MOV R7,#250;''''''''''''''''''''''''''''''''''''''''''''
0242 DFFE 285 DJNZ R7,$
0244 DEFA 286 DJNZ R6,D1
0246 22 287 RET
288
0247 7D64 289 DLY_L: MOV R5,#100
0249 7E64 290 D2: MOV R6,#100
024B 7FF8 291 D3: MOV R7,#248
024D DFFE 292 DJNZ R7,$
024F DEFA 293 DJNZ R6,D3
0251 DDF6 294 DJNZ R5,D2
0253 22 295 RET
0254 00 296 FINI: NOP
297 END
A51 MACRO ASSEMBLER 胈码薩 12/31/2008 17:06:11 PAGE 6
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
A0 . . . . . . . . C ADDR 006AH A
ALARM_1. . . . . . C ADDR 0172H A
ALARM_2. . . . . . C ADDR 0178H A
B. . . . . . . . . D ADDR 00F0H A
C1 . . . . . . . . C ADDR 00ACH A
C2 . . . . . . . . C ADDR 00B5H A
C3 . . . . . . . . C ADDR 00BEH A
CALCU. . . . . . . C ADDR 00C4H A
CNT_A. . . . . . . N NUMB 0044H A
CNT_B. . . . . . . N NUMB 0045H A
D1 . . . . . . . . C ADDR 0240H A
D2 . . . . . . . . C ADDR 0249H A
D3 . . . . . . . . C ADDR 024BH A
DISP . . . . . . . C ADDR 01EDH A
DLY_L. . . . . . . C ADDR 0247H A
DLY_S. . . . . . . C ADDR 023EH A
FINI . . . . . . . C ADDR 0254H A
IE . . . . . . . . D ADDR 00A8H A
INT_T0 . . . . . . C ADDR 0181H A
J1 . . . . . . . . C ADDR 00F6H A
J2 . . . . . . . . C ADDR 00DCH A
J3 . . . . . . . . C ADDR 0132H A
J4 . . . . . . . . C ADDR 012CH A
J5 . . . . . . . . C ADDR 0126H A
K1 . . . . . . . . C ADDR 0157H A
KEY_1. . . . . . . N NUMB 003EH A
KEY_2. . . . . . . N NUMB 003FH A
KEY_3. . . . . . . N NUMB 0040H A
KEY_4. . . . . . . N NUMB 0041H A
KEY_5. . . . . . . N NUMB 0042H A
KEY_6. . . . . . . N NUMB 0043H A
KEY_CNT. . . . . . N NUMB 0046H A
L1 . . . . . . . . C ADDR 0070H A
L2 . . . . . . . . C ADDR 007FH A
L3 . . . . . . . . C ADDR 008EH A
L4 . . . . . . . . C ADDR 009DH A
LED_BIT_1. . . . . N NUMB 0030H A
LED_BIT_2. . . . . N NUMB 0031H A
LED_BIT_3. . . . . N NUMB 0032H A
LED_BIT_4. . . . . N NUMB 0033H A
LED_BIT_5. . . . . N NUMB 0034H A
LED_BIT_6. . . . . N NUMB 0035H A
LED_BIT_7. . . . . N NUMB 0036H A
LED_BIT_8. . . . . N NUMB 0037H A
LINE . . . . . . . N NUMB 0047H A
LSCAN. . . . . . . C ADDR 006DH A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
P2 . . . . . . . . D ADDR 00A0H A
P3 . . . . . . . . D ADDR 00B0H A
RETUNE . . . . . . C ADDR 01A2H A
ROW. . . . . . . . N NUMB 0048H A
RSCAN. . . . . . . C ADDR 00A9H A
SHIFTL . . . . . . C ADDR 01A3H A
SHIFTR . . . . . . C ADDR 01C8H A
START. . . . . . . C ADDR 000EH A
TH0. . . . . . . . D ADDR 008CH A
TL0. . . . . . . . D ADDR 008AH A
TMOD . . . . . . . D ADDR 0089H A
TR0. . . . . . . . B ADDR 0088H.4 A
A51 MACRO ASSEMBLER 胈码薩 12/31/2008 17:06:11 PAGE 7
VAL. . . . . . . . N NUMB 0049H A
W00. . . . . . . . C ADDR 00E1H A
W01. . . . . . . . C ADDR 00ECH A
W02. . . . . . . . C ADDR 00F4H A
W10. . . . . . . . C ADDR 013CH A
W11. . . . . . . . C ADDR 0147H A
W12. . . . . . . . C ADDR 014FH A
W20. . . . . . . . C ADDR 015AH A
W21. . . . . . . . C ADDR 0165H A
W22. . . . . . . . C ADDR 016DH A
WORD_1 . . . . . . N NUMB 0038H A
WORD_2 . . . . . . N NUMB 0039H A
WORD_3 . . . . . . N NUMB 003AH A
WORD_4 . . . . . . N NUMB 003BH A
WORD_5 . . . . . . N NUMB 003CH A
WORD_6 . . . . . . N NUMB 003DH A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -