📄 xdlkz.lst
字号:
01F8 E548 214 MOV A,48H
01FA 2401 215 ADD A,#1
01FC B43C02 216 CJNE A,#60,E2
01FF 7400 217 MOV A,#0
0201 F548 218 E2:MOV 48H,A
0203 22 219 RET
0204 B4030C 220 M3:CJNE A,#3,M4
0207 E54B 221 MOV A,4BH
0209 2401 222 ADD A,#1
020B B43C02 223 CJNE A,#60,E3
020E 7400 224 MOV A,#0
0210 F54B 225 E3:MOV 4BH,A
0212 22 226 RET
0213 B4040C 227 M4:CJNE A,#4,M5
0216 E54D 228 MOV A,4DH
0218 2401 229 ADD A,#1
021A B43C02 230 CJNE A,#60,E4
021D 7400 231 MOV A,#0
021F F54D 232 E4:MOV 4DH,A
0221 22 233 RET
0222 B4050B 234 M5:CJNE A,#5,M6
0225 E54F 235 MOV A,4FH
0227 2401 236 ADD A,#1
0229 B43C02 237 CJNE A,#60,E5
022C 7400 238 MOV A,#0
022E F54F 239 E5:MOV 4FH,A
0230 22 240 M6:RET
241 ;功能选择程序
0231 E556 242 KEYGNXZ:MOV A,56H
0233 2401 243 ADD A,#1
0235 B40802 244 CJNE A,#8,G1
0238 7400 245 MOV A,#0
023A F556 246 G1:MOV 56H,A
023C B4000B 247 CJNE A,#0,S1
023F D296 248 SETB P1.6
0241 D297 249 SETB P1.7
0243 D293 250 SETB P1.3
0245 D294 251 SETB P1.4
0247 D295 252 SETB P1.5
0249 22 253 RET
024A B4010B 254 S1:CJNE A,#1,S2
024D D296 255 SETB P1.6
024F D297 256 SETB P1.7
A51 MACRO ASSEMBLER XDLKZ 09/06/07 21:12:44 PAGE 5
0251 D293 257 SETB P1.3
0253 D294 258 SETB P1.4
0255 C295 259 CLR P1.5
0257 22 260 RET
0258 B4020B 261 S2:CJNE A,#2,S3
025B D296 262 SETB P1.6
025D D297 263 SETB P1.7
025F D293 264 SETB P1.3
0261 C294 265 CLR P1.4
0263 D295 266 SETB P1.5
0265 22 267 RET
0266 B4030B 268 S3:CJNE A,#3,S4
0269 D296 269 SETB P1.6
026B D297 270 SETB P1.7
026D D293 271 SETB P1.3
026F C294 272 CLR P1.4
0271 C295 273 CLR P1.5
0273 22 274 RET
0274 B4040B 275 S4:CJNE A,#4,S5
0277 D296 276 SETB P1.6
0279 D297 277 SETB P1.7
027B C293 278 CLR P1.3
027D D294 279 SETB P1.4
027F D295 280 SETB P1.5
0281 22 281 RET
0282 B4050B 282 S5:CJNE A,#5,S6
0285 C296 283 CLR P1.6
0287 C297 284 CLR P1.7
0289 C293 285 CLR P1.3
028B D294 286 SETB P1.4
028D C295 287 CLR P1.5
028F 22 288 RET
0290 B4060B 289 S6:CJNE A,#6,S7
0293 D296 290 SETB P1.6
0295 D297 291 SETB P1.7
0297 C293 292 CLR P1.3
0299 C294 293 CLR P1.4
029B D295 294 SETB P1.5
029D 22 295 RET
029E B4070A 296 S7:CJNE A,#7,S8
02A1 D296 297 SETB P1.6
02A3 D297 298 SETB P1.7
02A5 C293 299 CLR P1.3
02A7 C294 300 CLR P1.4
02A9 C295 301 CLR P1.5
02AB 22 302 S8:RET
303 ;定时器1控制
02AC E556 304 YLKZ:MOV A,56H
02AE B40004 305 CJNE A,#0,K11
02B1 1203BD 306 LCALL ALARM
02B4 22 307 RET
02B5 B40106 308 K11:CJNE A,#1,K12
02B8 C296 309 CLR P1.6
02BA 1203BD 310 LCALL ALARM
02BD 22 311 RET
02BE B40206 312 K12:CJNE A,#2,K13
02C1 C296 313 CLR P1.6
02C3 1203BD 314 LCALL ALARM
02C6 22 315 RET
02C7 B40303 316 K13:CJNE A,#3,K14
02CA C296 317 CLR P1.6
02CC 22 318 RET
02CD B40403 319 K14:CJNE A,#4,K15
02D0 C296 320 CLR P1.6
02D2 22 321 RET
02D3 B40503 322 K15:CJNE A,#5,K16
A51 MACRO ASSEMBLER XDLKZ 09/06/07 21:12:44 PAGE 6
02D6 D296 323 SETB P1.6
02D8 22 324 RET
02D9 B40603 325 K16:CJNE A,#6,K17
02DC C296 326 CLR P1.6
02DE 22 327 RET
02DF B40705 328 K17:CJNE A,#7,K18
02E2 C296 329 CLR P1.6
02E4 1203BD 330 LCALL ALARM
02E7 22 331 K18:RET
332 ;定时器2
02E8 E556 333 ELKZ:MOV A,56H
02EA B40004 334 CJNE A,#0,K21
02ED 1203BD 335 LCALL ALARM
02F0 22 336 RET
02F1 B40106 337 K21:CJNE A,#1,K22
02F4 D296 338 SETB P1.6
02F6 1203BD 339 LCALL ALARM
02F9 22 340 RET
02FA B40206 341 K22:CJNE A,#2,K23
02FD C297 342 CLR P1.7
02FF 1203BD 343 LCALL ALARM
0302 22 344 RET
0303 B40303 345 K23:CJNE A,#3,K24
0306 D296 346 SETB P1.6
0308 22 347 RET
0309 B40403 348 K24:CJNE A,#4,K25
030C C297 349 CLR P1.7
030E 22 350 RET
030F B40503 351 K25:CJNE A,#5,K26
0312 D297 352 SETB P1.7
0314 22 353 RET
0315 B40603 354 K26:CJNE A,#6,K27
0318 C297 355 CLR P1.7
031A 22 356 RET
031B B40705 357 K27:CJNE A,#7,K28
031E C297 358 CLR P1.7
0320 1203BD 359 LCALL ALARM
0323 22 360 K28:RET
361 ;定时器3
0324 E556 362 SLKZ:MOV A,56H
0326 B40004 363 CJNE A,#0,K31
0329 1203BD 364 LCALL ALARM
032C 22 365 RET
032D B40104 366 K31:CJNE A,#1,K32
0330 1203BD 367 LCALL ALARM
0333 22 368 RET
0334 B40204 369 K32:CJNE A,#2,K33
0337 1203BD 370 LCALL ALARM
033A 22 371 RET
033B B40605 372 K33:CJNE A,#6,K34
033E D296 373 SETB P1.6
0340 D297 374 SETB P1.7
0342 22 375 RET
0343 B40707 376 K34:CJNE A,#7,K35
0346 D296 377 SETB P1.6
0348 D297 378 SETB P1.7
034A 1203BD 379 LCALL ALARM
034D 22 380 K35:RET
034E E551 381 JY:MOV A,51H
0350 75F00A 382 MOV B,#10
0353 84 383 DIV AB
0354 85F034 384 MOV 34H,B
0357 F535 385 MOV 35H,A
0359 E548 386 MOV A,48H
035B 75F00A 387 MOV B,#10
035E 84 388 DIV AB
A51 MACRO ASSEMBLER XDLKZ 09/06/07 21:12:44 PAGE 7
035F 85F036 389 MOV 36H,B
0362 F537 390 MOV 37H,A
0364 E549 391 MOV A,49H
0366 75F00A 392 MOV B,#10
0369 84 393 DIV AB
036A 85F032 394 MOV 32H,B
036D F533 395 MOV 33H,A
036F E54A 396 MOV A,4AH
0371 75F00A 397 MOV B,#10
0374 84 398 DIV AB
0375 85F030 399 MOV 30H,B
0378 F531 400 MOV 31H,A
037A E54C 401 MOV A,4CH ;解码程序
037C 75F00A 402 MOV B,#10
037F 84 403 DIV AB
0380 85F038 404 MOV 38H,B
0383 F539 405 MOV 39H,A
0385 E54B 406 MOV A,4BH
0387 75F00A 407 MOV B,#10
038A 84 408 DIV AB
038B 85F03A 409 MOV 3AH,B
038E F53B 410 MOV 3BH,A
0390 E54E 411 MOV A,4EH
0392 75F00A 412 MOV B,#10
0395 84 413 DIV AB
0396 85F03C 414 MOV 3CH,B
0399 F53D 415 MOV 3DH,A
039B E54D 416 MOV A,4DH
039D 75F00A 417 MOV B,#10
03A0 84 418 DIV AB
03A1 85F03E 419 MOV 3EH,B
03A4 F53F 420 MOV 3FH,A
03A6 E550 421 MOV A,50H
03A8 75F00A 422 MOV B,#10
03AB 84 423 DIV AB
03AC 85F040 424 MOV 40H,B
03AF F541 425 MOV 41H,A
03B1 E54F 426 MOV A,4FH
03B3 75F00A 427 MOV B,#10
03B6 84 428 DIV AB
03B7 85F042 429 MOV 42H,B
03BA F543 430 MOV 43H,A
03BC 22 431 RET
03BD 755700 432 ALARM:MOV 57H,#00 ;音乐程序（兰花草）
03C0 E557 433 NEXT:MOV A,57H
03C2 900452 434 MOV DPTR,#TABLE2
03C5 93 435 MOVC A,@A+DPTR ;音乐程序参考《单片机实践与应用》,有所改动
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -