📄 skdy1.lst
字号:
01B3 2558 234 ADD A,58H
01B5 F558 235 MOV 58H,A
01B7 4117 236 AJMP kkk0_T
01B9 755AAA 237 kkk1_T: MOV 5AH,#0AAh
01BC E55B 238 MOV A,5BH
01BE 540F 239 ANL A, #0FH
01C0 C4 240 SWAP A
01C1 F55B 241 MOV 5BH,A
01C3 E558 242 MOV A, 58H
01C5 54F0 243 ANL A ,#0F0H
01C7 C4 244 SWAP A
01C8 255B 245 ADD A,5BH
01CA F55B 246 MOV 5BH,A ;;CHU LI 5BH
247
01CC E558 248 MOV A,58H
01CE 540F 249 ANL A ,#0FH
01D0 C4 250 SWAP A
01D1 F558 251 MOV 58H ,A
01D3 E559 252 MOV A ,59H
01D5 C4 253 SWAP A
01D6 540F 254 ANL A ,#0FH
01D8 2558 255 ADD A ,58H
01DA F558 256 MOV 58H, A ;; CHU LI 58H
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 5
257
01DC 4117 258 AJMP KKK0_T
01DE 85AA5A 259 KKK2_T: MOV 5AH,0AAH
01E1 E558 260 MOV A ,58H
01E3 54F0 261 ANL A,#0F0H
01E5 C4 262 SWAP A
01E6 755BA0 263 MOV 5BH,#0A0H
01E9 255B 264 ADD A,5BH
01EB F55B 265 MOV 5BH,A
01ED E558 266 MOV A,58H
01EF 540F 267 ANL A ,#0FH
01F1 C4 268 SWAP A
01F2 F558 269 MOV 58H ,A
01F4 E559 270 MOV A ,59H
01F6 C4 271 SWAP A
01F7 540F 272 ANL A ,#0FH
01F9 2558 273 ADD A ,58H
01FB F558 274 MOV 58H, A ;; CHU LI 58H
01FD 4117 275 AJMP KKK0_T
01FF 755AAA 276 kkk3_T: MOV 5AH,#0AAH
0202 755BAA 277 MOV 5BH,#0AAH
0205 E558 278 MOV A,58H
0207 540F 279 ANL A ,#0FH
0209 C4 280 SWAP A
020A F558 281 MOV 58H ,A
020C E559 282 MOV A ,59H
020E C4 283 SWAP A
020F 540F 284 ANL A ,#0FH
0211 2558 285 ADD A ,58H
0213 F558 286 MOV 58H, A ;; CHU LI 58H
0215 4117 287 AJMP KKK0_T
288
0217 755AAA 289 KKK0_T: MOV 5AH,#0AAH
021A 7930 290 MOV R1, #30H
021C E558 291 mov a, 58H
021E C4 292 SWAP A
021F 540F 293 anl a, #0fh
0221 F7 294 mov @R1, a ;;30H
0222 09 295 INC R1 ;;31H
0223 E558 296 mov a, 58H
0225 540F 297 anl a, #0fh
0227 F7 298 mov @R1, a
299
0228 09 300 INC R1 ;;32H
0229 E559 301 mov a, 59H
022B C4 302 SWAP A
303 ; anl a, #0fh
022C 770C 304 mov @R1, #0ch; a
022E 09 305 INC R1 ;;33H
022F E559 306 mov a, 59H
0231 540F 307 anl a, #0fh
0233 F7 308 mov @R1, a
309
0234 09 310 INC R1 ;;34H
0235 E55A 311 mov a, 5AH
0237 C4 312 SWAP A
0238 540F 313 anl a, #0fh
023A F7 314 mov @R1, a
023B 09 315 INC R1 ;;35H
023C E55A 316 mov a, 5AH
023E 540F 317 anl a, #0fh
0240 F7 318 mov @R1, a
0241 09 319 INC R1 ;;36H
0242 E55B 320 mov a, 5BH
0244 C4 321 SWAP A
0245 540F 322 anl a, #0fh
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 6
0247 F7 323 mov @R1, a
0248 09 324 INC R1 ;;37H
0249 E55B 325 mov a, 5BH
024B 540F 326 anl a, #0fh
024D F7 327 mov @R1, a
024E 1203F0 328 LCALL PRN
0251 120412 329 LCALL PRNNC
330 ;;.......................
0254 857F5A 331 MOV 5AH, 7fh; #00H ;;HOUR
0257 7850 332 mov r0 ,#50h
0259 865B 333 MOV 5BH, @r0 ;#11H ;;MIN
025B 7854 334 mov r0,#54h
025D 8659 335 mov 59h, @r0; #23h ;;SEC
336 ;****************************
025F E55B 337 mov a, 5bh
0261 540F 338 anl a, #0fh
0263 24C0 339 add a, #0c0h
0265 C4 340 SWAP A
0266 F558 341 MOV 58H, a
0268 E55B 342 mov a, 5bh
026A 54F0 343 anl a, #0f0h
026C 240D 344 add a, #0Dh
026E C4 345 SWAP A
026F F55B 346 mov 5bh ,a
0271 7930 347 MOV R1, #30H ;; ;;DATE
0273 120389 348 lcall prtsts1 ;zzzzzz等候时间
349 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>
0276 7851 350 mov r0,#51h
0278 865B 351 MOV 5BH , @r0 ;#00H ;55.80 YUANG
027A 08 352 inc r0
027B 8658 353 MOV 58H, @r0 ;#55H
027D 08 354 inc r0
027E 8659 355 MOV 59H, @r0 ;;#80H
356 ;*********************
0280 755AAA 357 MOV 5AH ,#0AAH
0283 7930 358 MOV R1, #30H ;; ;;JING E 金额
0285 E558 359 mov a, 58H
0287 540F 360 anl a, #0fh
0289 F7 361 mov @R1, a ;;30H
028A 09 362 INC R1 ;;31H
028B 740C 363 mov a, #0CH ; 58H
028D F7 364 mov @R1, a
028E 09 365 INC R1 ;;32H
028F E559 366 mov a, 59H
0291 C4 367 SWAP A
0292 540F 368 anl a, #0fh
0294 F7 369 mov @R1, a
0295 09 370 INC R1 ;;33H
0296 E559 371 mov a, 59H
0298 540F 372 anl a, #0fh
029A F7 373 mov @R1, a
029B 09 374 INC R1 ;;34H
029C E55A 375 mov a, 5AH
029E C4 376 SWAP A
029F 540F 377 anl a, #0fh
02A1 F7 378 mov @R1, a
02A2 09 379 INC R1 ;;35H
02A3 E55A 380 mov a, 5AH
02A5 540F 381 anl a, #0fh
02A7 F7 382 mov @R1, a
02A8 09 383 INC R1 ;;36H
02A9 E55B 384 mov a, 5BH
02AB 540F 385 anl a, #0fh
02AD B4000D 386 CJNE A ,#00H, KKK_1
02B0 E558 387 MOV A,58H
02B2 C4 388 SWAP A
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 7
02B3 540F 389 ANL A ,#0FH
02B5 B40017 390 CJNE A,#00H,KKK_2
02B8 755BAA 391 MOV 5BH,#0AAH
02BB 41D8 392 AJMP KKK_3
02BD E55B 393 KKK_1: MOV A,5BH
02BF C4 394 SWAP A
02C0 54F0 395 ANL A,#0F0H
02C2 F55B 396 MOV 5BH ,A
02C4 E558 397 MOV A,58H
02C6 C4 398 SWAP A
02C7 540F 399 ANL A,#0FH
02C9 255B 400 ADD A,5BH
02CB F55B 401 MOV 5BH,A
02CD 41D8 402 AJMP KKK_3
02CF E558 403 KKK_2: MOV A,58H
02D1 C4 404 SWAP A
02D2 540F 405 ANL A ,#0FH
02D4 24A0 406 ADD A,#0A0H
02D6 F55B 407 MOV 5BH ,A
02D8 E55B 408 KKK_3: mov a, 5BH
02DA C4 409 SWAP A
02DB 540F 410 anl a, #0fh
02DD F7 411 mov @R1, a
02DE 09 412 INC R1 ;;37H
02DF E55B 413 mov a, 5BH
02E1 540F 414 anl a, #0fh
02E3 F7 415 mov @R1, a
02E4 1203F0 416 LCALL PRN
02E7 120412 417 LCALL PRNNC
418 ;.......
02EA 85705A 419 MOV 5aH, 70h ; #56h
02ED E55A 420 MOV A, 5AH
02EF 54F0 421 ANL A,#0F0H
02F1 C4 422 SWAP A
02F2 6400 423 XRL A,#00H
02F4 7038 424 JNZ INO0
02F6 E55A 425 MOV A,5AH
02F8 540F 426 ANL A,#0FH
02FA F527 427 MOV 27H,A
02FC 6400 428 XRL A,#00H
02FE 6008 429 JZ ICHEAK_5B
0300 74A0 430 MOV A, #0A0H
0302 2527 431 ADD A,27H
0304 F55A 432 MOV 5AH,A
0306 612E 433 AJMP INO0
434
0308 755AAA 435 ICHEAK_5B:MOV 5AH,#0AAH
030B 85715B 436 MOV 5BH ,71H
030E E55B 437 MOV A,5BH
0310 54F0 438 ANL A,#0F0H
0312 C4 439 SWAP A
0313 6400 440 XRL A,#00H
0315 7017 441 JNZ INO0
0317 E55B 442 MOV A,5BH
0319 540F 443 ANL A,#0FH
031B F527 444 MOV 27H,A
031D 6400 445 XRL A,#00H
031F 6008 446 JZ INOCHEAK
0321 74A0 447 MOV A,#0A0H
0323 2527 448 ADD A,27H
0325 F55B 449 MOV 5BH,A
0327 612E 450 AJMP INO058
0329 755BAA 451 INOCHEAK: MOV 5BH,#0AAH
032C 612E 452 AJMP INO058
453
032E 454 INO0:
A51 MACRO ASSEMBLER SKDY1 09/21/2006 14:28:08 PAGE 8
032E 455 INO058:
456
457
458 ;;.......................
459
032E 120412 460 LCALL PRNNC
0331 120412 461 LCALL PRNNC
0334 120412 462 LCALL PRNNC
0337 120412 463 LCALL PRNNC
033A 120412 464 LCALL PRNNC
033D 120412 465 LCALL PRNNC
0340 120412 466 LCALL PRNNC
0343 120412 467 lcall prnnc ;tang
0346 120412 468 lcall prnnc
0349 120412 469 lcall prnnc
470 ;;.......................
034C D2B7 471 setb LINE
034E D295 472 setb SYN
0350 C217 473 clr 17h
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -