📄 电子钟.lst
字号:
8391 35 40 stHX *__r0
8393 38 41 lsl *__r1
8395 39 40 rol *__r0
8397 B6 41 ldA *__r1
8399 AB C6 add #-58
839B B7 41 stA *__r1
839D B6 40 ldA *__r0
839F A9 00 adc #0
83A1 B7 40 stA *__r0
83A3 55 40 ldHX *__r0
83A5 E6 01 ldA 1,X
83A7 95 tSX
83A8 87 pshA
83A9 A6 0A ldA #10
83AB 87 pshA
83AC CD 91A2 jsr __mod8s
83AF A7 02 aiS #2
83B1 AB 30 add #48
83B3 B7 41 stA *__r1
83B5 3F 42 clr *__r2
83B7 E6 06 ldA 6,X
83B9 AB 92 add #-110
83BB B7 43 stA *__r3
83BD B6 42 ldA *__r2
83BF A9 00 adc #0
83C1 B7 42 stA *__r2
83C3 B6 41 ldA *__r1
83C5 55 42 ldHX *__r2
83C7 F7 stA 0,X
83C8 95 tSX
83C9 6C 06 inc 6,X
83CB E6 07 ldA 7,X
83CD 26 16 bne 0x83E5
83CF 3F 40 clr *__r0
83D1 E6 06 ldA 6,X
83D3 AB 92 add #-110
83D5 B7 41 stA *__r1
83D7 B6 40 ldA *__r0
83D9 A9 00 adc #0
83DB B7 40 stA *__r0
83DD A6 2D ldA #45
83DF 55 40 ldHX *__r0
83E1 F7 stA 0,X
83E2 95 tSX
83E3 6C 06 inc 6,X
83E5 6C 07 inc 7,X
83E7 E6 07 ldA 7,X
83E9 A1 02 cmp #2
83EB 24 03 bcc 0x83F0
83ED CC 8343 jmp 0x8343
83F0 3F 40 clr *__r0
83F2 E6 06 ldA 6,X
83F4 AB 92 add #-110
83F6 B7 41 stA *__r1
83F8 B6 40 ldA *__r0
83FA A9 00 adc #0
83FC B7 40 stA *__r0
83FE A6 45 ldA #69
8400 55 40 ldHX *__r0
8402 F7 stA 0,X
8403 95 tSX
8404 6C 06 inc 6,X
8406 6F 07 clr 7,X
8408 CC 848D jmp 0x848D
840B 3F 40 clr *__r0
840D E6 07 ldA 7,X
840F AB CC add #-52
8411 B7 41 stA *__r1
8413 B6 40 ldA *__r0
8415 A9 00 adc #0
8417 B7 40 stA *__r0
8419 55 40 ldHX *__r0
841B F6 ldA 0,X
841C AE 0A ldX #10
841E 8C clrH
841F 52 div
8420 95 tSX
8421 AB 30 add #48
8423 B7 41 stA *__r1
8425 3F 42 clr *__r2
8427 E6 06 ldA 6,X
8429 AB 92 add #-110
842B B7 43 stA *__r3
842D B6 42 ldA *__r2
842F A9 00 adc #0
8431 B7 42 stA *__r2
8433 B6 41 ldA *__r1
8435 55 42 ldHX *__r2
8437 F7 stA 0,X
8438 95 tSX
8439 6C 06 inc 6,X
843B 3F 40 clr *__r0
843D E6 07 ldA 7,X
843F AB CC add #-52
8441 B7 41 stA *__r1
8443 B6 40 ldA *__r0
8445 A9 00 adc #0
8447 B7 40 stA *__r0
8449 55 40 ldHX *__r0
844B F6 ldA 0,X
844C AE 0A ldX #10
844E 8C clrH
844F 52 div
8450 8B pshH
8451 86 pulA
8452 95 tSX
8453 AB 30 add #48
8455 B7 41 stA *__r1
8457 3F 42 clr *__r2
8459 E6 06 ldA 6,X
845B AB 92 add #-110
845D B7 43 stA *__r3
845F B6 42 ldA *__r2
8461 A9 00 adc #0
8463 B7 42 stA *__r2
8465 B6 41 ldA *__r1
8467 55 42 ldHX *__r2
8469 F7 stA 0,X
846A 95 tSX
846B 6C 06 inc 6,X
846D E6 07 ldA 7,X
846F A1 02 cmp #2
8471 26 02 bne 0x8475
8473 20 21 bra 0x8496
8475 3F 40 clr *__r0
8477 E6 06 ldA 6,X
8479 AB 92 add #-110
847B B7 41 stA *__r1
847D B6 40 ldA *__r0
847F A9 00 adc #0
8481 B7 40 stA *__r0
8483 A6 3A ldA #58
8485 55 40 ldHX *__r0
8487 F7 stA 0,X
8488 95 tSX
8489 6C 06 inc 6,X
848B 6C 07 inc 7,X
848D E6 07 ldA 7,X
848F A1 03 cmp #3
8491 24 03 bcc 0x8496
8493 CC 840B jmp 0x840B
8496 3F 40 clr *__r0
8498 E6 06 ldA 6,X
849A AB 92 add #-110
849C B7 41 stA *__r1
849E B6 40 ldA *__r0
84A0 A9 00 adc #0
84A2 B7 40 stA *__r0
84A4 A6 45 ldA #69
84A6 55 40 ldHX *__r0
84A8 F7 stA 0,X
84A9 A6 92 ldA #-110
84AB 87 pshA
84AC A6 00 ldA #0
84AE 87 pshA
84AF CD 8E96 jsr _lcdshow
84B2 A7 02 aiS #2
84B4 95 tSX
84B5 B6 B3 ldA 0xFFFFFFB3
84B7 A1 01 cmp #1
84B9 26 0C bne 0x84C7
84BB A6 4C ldA #76
84BD 87 pshA
84BE A6 2A ldA #42
84C0 87 pshA
84C1 CD 8F3D jsr _lcdshow1
84C4 A7 02 aiS #2
84C6 95 tSX
84C7 A7 08 aiS #8
84C9 81 rts
_shilfL:
84CA A7 FF aiS #-1
84CC 95 tSX
84CD B6 B4 ldA 0xFFFFFFB4
84CF 26 3E bne 0x850F
84D1 11 02 Bclr 0,0x02
84D3 12 02 Bset 1,0x02
84D5 14 02 Bset 2,0x02
84D7 B6 01 ldA 0x01
84D9 F7 stA 0,X
84DA A4 7F and #127
84DC F7 stA 0,X
84DD 7A dec 0,X
84DE F6 ldA 0,X
84DF A1 04 cmp #4
84E1 27 0C beq 0x84EF
84E3 A1 07 cmp #7
84E5 27 08 beq 0x84EF
84E7 A1 42 cmp #66
84E9 27 04 beq 0x84EF
84EB A1 45 cmp #69
84ED 26 01 bne 0x84F0
84EF 7A dec 0,X
84F0 F6 ldA 0,X
84F1 A1 3F cmp #63
84F3 26 03 bne 0x84F8
84F5 A6 09 ldA #9
84F7 F7 stA 0,X
84F8 F6 ldA 0,X
84F9 A1 FF cmp #-1
84FB 26 03 bne 0x8500
84FD A6 47 ldA #71
84FF F7 stA 0,X
8500 F6 ldA 0,X
8501 AA 80 orA #-128
8503 F7 stA 0,X
8504 11 02 Bclr 0,0x02
8506 13 02 Bclr 1,0x02
8508 87 pshA
8509 CD 8FD8 jsr _Lcd_Command
850C A7 01 aiS #1
850E 95 tSX
850F A7 01 aiS #1
8511 81 rts
_shilfR:
8512 A7 FF aiS #-1
8514 95 tSX
8515 B6 B4 ldA 0xFFFFFFB4
8517 26 3C bne 0x8555
8519 11 02 Bclr 0,0x02
851B 12 02 Bset 1,0x02
851D 14 02 Bset 2,0x02
851F B6 01 ldA 0x01
8521 F7 stA 0,X
8522 A4 7F and #127
8524 F7 stA 0,X
8525 7C inc 0,X
8526 F6 ldA 0,X
8527 A1 04 cmp #4
8529 27 0C beq 0x8537
852B A1 07 cmp #7
852D 27 08 beq 0x8537
852F A1 42 cmp #66
8531 27 04 beq 0x8537
8533 A1 45 cmp #69
8535 26 01 bne 0x8538
8537 7C inc 0,X
8538 F6 ldA 0,X
8539 A1 0A cmp #10
853B 26 03 bne 0x8540
853D A6 40 ldA #64
853F F7 stA 0,X
8540 F6 ldA 0,X
8541 A1 48 cmp #72
8543 26 01 bne 0x8546
8545 7F clr 0,X
8546 F6 ldA 0,X
8547 AA 80 orA #-128
8549 F7 stA 0,X
854A 11 02 Bclr 0,0x02
854C 13 02 Bclr 1,0x02
854E 87 pshA
854F CD 8FD8 jsr _Lcd_Command
8552 A7 01 aiS #1
8554 95 tSX
8555 A7 01 aiS #1
8557 81 rts
_settime:
8558 A7 FF aiS #-1
855A 95 tSX
855B 7F clr 0,X
855C 20 13 bra 0x8571
855E 3F 40 clr *__r0
8560 F6 ldA 0,X
8561 AB B5 add #-75
8563 B7 41 stA *__r1
8565 B6 40 ldA *__r0
8567 A9 00 adc #0
8569 B7 40 stA *__r0
856B 4F clrA
856C 55 40 ldHX *__r0
856E F7 stA 0,X
856F 95 tSX
8570 7C inc 0,X
8571 F6 ldA 0,X
8572 A1 08 cmp #8
8574 25 E8 bcs 0x855E
8576 7F clr 0,X
8577 20 13 bra 0x858C
8579 3F 40 clr *__r0
857B F6 ldA 0,X
857C AB BD add #-67
857E B7 41 stA *__r1
8580 B6 40 ldA *__r0
8582 A9 00 adc #0
8584 B7 40 stA *__r0
8586 4F clrA
8587 55 40 ldHX *__r0
8589 F7 stA 0,X
858A 95 tSX
858B 7C inc 0,X
858C F6 ldA 0,X
858D A1 04 cmp #4
858F 25 E8 bcs 0x8579
8591 A6 01 ldA #1
8593 B7 B2 stA 0xFFFFFFB2
8595 3F B4 clr 0xFFFFFFB4
8597 A6 7D ldA #125
8599 87 pshA
859A A6 00 ldA #0
859C 87 pshA
859D CD 8E96 jsr _lcdshow
85A0 A7 02 aiS #2
85A2 11 02 Bclr 0,0x02
85A4 13 02 Bclr 1,0x02
85A6 A6 0F ldA #15
85A8 87 pshA
85A9 CD 8FD8 jsr _Lcd_Command
85AC A7 01 aiS #1
85AE A6 80 ldA #-128
85B0 87 pshA
85B1 CD 8FD8 jsr _Lcd_Command
85B4 A7 01 aiS #1
85B6 95 tSX
85B7 A7 01 aiS #1
85B9 81 rts
_sastimer:
85BA A7 FF aiS #-1
85BC 95 tSX
85BD 7F clr 0,X
85BE 20 13 bra 0x85D3
85C0 3F 40 clr *__r0
85C2 F6 ldA 0,X
85C3 AB C1 add #-63
85C5 B7 41 stA *__r1
85C7 B6 40 ldA *__r0
85C9 A9 00 adc #0
85CB B7 40 stA *__r0
85CD 4F clrA
85CE 55 40 ldHX *__r0
85D0 F7 stA 0,X
85D1 95 tSX
85D2 7C inc 0,X
85D3 F6 ldA 0,X
85D4 A1 04 cmp #4
85D6 25 E8 bcs 0x85C0
85D8 B6 B3 ldA 0xFFFFFFB3
85DA 26 12 bne 0x85EE
85DC A6 01 ldA #1
85DE B7 B3 stA 0xFFFFFFB3
85E0 A6 4C ldA #76
85E2 87 pshA
85E3 A6 2A ldA #42
85E5 87 pshA
85E6 CD 8F3D jsr _lcdshow1
85E9 A7 02 aiS #2
85EB 95 tSX
85EC 20 14 bra 0x8602
85EE B6 B3 ldA 0xFFFFFFB3
85F0 A1 01 cmp #1
85F2 26 0E bne 0x8602
85F4 3F B3 clr 0xFFFFFFB3
85F6 A6 4C ldA #76
85F8 87 pshA
85F9 A6 20 ldA #32
85FB 87 pshA
85FC CD 8F3D jsr _lcdshow1
85FF A7 02 aiS #2
8601 95 tSX
8602 A7 01 aiS #1
8604 81 rts
_settimer:
8605 A7 FE aiS #-2
8607 95 tSX
8608 B6 B2 ldA 0xFFFFFFB2
860A 27 03 beq 0x860F
860C CC 86F6 jmp 0x86F6
860F 6F 01 clr 1,X
8611 3F B4 clr 0xFFFFFFB4
8613 A6 01 ldA #1
8615 B7 B3 stA 0xFFFFFFB3
8617 A6 4C ldA #76
8619 87 pshA
861A A6 2A ldA #42
861C 87 pshA
861D CD 8F3D jsr _lcdshow1
8620 A7 02 aiS #2
8622 95 tSX
8623 3F 40 clr *__r0
8625 E6 01 ldA 1,X
8627 AB 92 add #-110
8629 B7 41 stA *__r1
862B B6 40 ldA *__r0
862D A9 00 adc #0
862F B7 40 stA *__r0
8631 A6 45 ldA #69
8633 55 40 ldHX *__r0
8635 F7 stA 0,X
8636 95 tSX
8637 6C 01 inc 1,X
8639 7F clr 0,X
863A CC 86BB jmp 0x86BB
863D 3F 40 clr *__r0
863F F6 ldA 0,X
8640 AB CF add #-49
8642 B7 41 stA *__r1
8644 B6 40 ldA *__r0
8646 A9 00 adc #0
8648 B7 40 stA *__r0
864A 55 40 ldHX *__r0
864C F6 ldA 0,X
864D AE 0A ldX #10
864F 8C clrH
8650 52 div
8651 95 tSX
8652 AB 30 add #48
8654 B7 41 stA *__r1
8656 3F 42 clr *__r2
8658 E6 01 ldA 1,X
865A AB 92 add #-110
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -