📄 clock.lst
字号:
8634 3F 83 clr 0xFFFFFF83
8636 81 rts
_Day_adjust:
8637 A6 01 ldA #1
8639 B7 84 stA 0xFFFFFF84
863B A6 09 ldA #9
863D 87 pshA
863E 4F clrA
863F 87 pshA
8640 CD 8D2D jsr _Lcd_show_cursor
8643 A7 02 aiS #2
8645 95 tSX
8646 B6 82 ldA 0xFFFFFF82
8648 26 03 bne 0x864D
864A CC 86E9 jmp 0x86E9
864D B6 50 ldA *__rlo+3
864F A1 02 cmp #2
8651 27 06 beq 0x8659
8653 B6 50 ldA *__rlo+3
8655 A1 01 cmp #1
8657 27 24 beq 0x867D
8659 B6 50 ldA *__rlo+3
865B A1 03 cmp #3
865D 27 1E beq 0x867D
865F B6 50 ldA *__rlo+3
8661 A1 05 cmp #5
8663 27 18 beq 0x867D
8665 B6 50 ldA *__rlo+3
8667 A1 07 cmp #7
8669 27 12 beq 0x867D
866B B6 50 ldA *__rlo+3
866D A1 08 cmp #8
866F 27 0C beq 0x867D
8671 B6 50 ldA *__rlo+3
8673 A1 0A cmp #10
8675 27 06 beq 0x867D
8677 B6 50 ldA *__rlo+3
8679 A1 0C cmp #12
867B 26 10 bne 0x868D
867D B6 51 ldA 0x51
867F A1 1F cmp #31
8681 24 04 bcc 0x8687
8683 3C 51 inc 0x51
8685 20 60 bra 0x86E7
8687 A6 01 ldA #1
8689 B7 51 stA 0x51
868B 20 5A bra 0x86E7
868D B6 50 ldA *__rlo+3
868F A1 02 cmp #2
8691 27 06 beq 0x8699
8693 B6 50 ldA *__rlo+3
8695 A1 04 cmp #4
8697 27 12 beq 0x86AB
8699 B6 50 ldA *__rlo+3
869B A1 06 cmp #6
869D 27 0C beq 0x86AB
869F B6 50 ldA *__rlo+3
86A1 A1 09 cmp #9
86A3 27 06 beq 0x86AB
86A5 B6 50 ldA *__rlo+3
86A7 A1 0B cmp #11
86A9 26 10 bne 0x86BB
86AB B6 51 ldA 0x51
86AD A1 1E cmp #30
86AF 24 04 bcc 0x86B5
86B1 3C 51 inc 0x51
86B3 20 32 bra 0x86E7
86B5 A6 01 ldA #1
86B7 B7 51 stA 0x51
86B9 20 2C bra 0x86E7
86BB 55 4E ldHX *__rlo+1
86BD 89 pshX
86BE 8B pshH
86BF CD 8565 jsr _Is_yunnian
86C2 A7 02 aiS #2
86C4 95 tSX
86C5 B7 41 stA *__r1
86C7 26 10 bne 0x86D9
86C9 B6 51 ldA 0x51
86CB A1 1C cmp #28
86CD 24 04 bcc 0x86D3
86CF 3C 51 inc 0x51
86D1 20 14 bra 0x86E7
86D3 A6 01 ldA #1
86D5 B7 51 stA 0x51
86D7 20 0E bra 0x86E7
86D9 B6 51 ldA 0x51
86DB A1 1D cmp #29
86DD 24 04 bcc 0x86E3
86DF 3C 51 inc 0x51
86E1 20 04 bra 0x86E7
86E3 A6 01 ldA #1
86E5 B7 51 stA 0x51
86E7 3F 82 clr 0xFFFFFF82
86E9 B6 83 ldA 0xFFFFFF83
86EB 26 03 bne 0x86F0
86ED CC 878C jmp 0x878C
86F0 B6 50 ldA *__rlo+3
86F2 A1 02 cmp #2
86F4 27 06 beq 0x86FC
86F6 B6 50 ldA *__rlo+3
86F8 A1 01 cmp #1
86FA 27 24 beq 0x8720
86FC B6 50 ldA *__rlo+3
86FE A1 03 cmp #3
8700 27 1E beq 0x8720
8702 B6 50 ldA *__rlo+3
8704 A1 05 cmp #5
8706 27 18 beq 0x8720
8708 B6 50 ldA *__rlo+3
870A A1 07 cmp #7
870C 27 12 beq 0x8720
870E B6 50 ldA *__rlo+3
8710 A1 08 cmp #8
8712 27 0C beq 0x8720
8714 B6 50 ldA *__rlo+3
8716 A1 0A cmp #10
8718 27 06 beq 0x8720
871A B6 50 ldA *__rlo+3
871C A1 0C cmp #12
871E 26 10 bne 0x8730
8720 B6 51 ldA 0x51
8722 A1 01 cmp #1
8724 23 04 bls 0x872A
8726 3A 51 dec 0x51
8728 20 60 bra 0x878A
872A A6 1F ldA #31
872C B7 51 stA 0x51
872E 20 5A bra 0x878A
8730 B6 50 ldA *__rlo+3
8732 A1 02 cmp #2
8734 27 06 beq 0x873C
8736 B6 50 ldA *__rlo+3
8738 A1 04 cmp #4
873A 27 12 beq 0x874E
873C B6 50 ldA *__rlo+3
873E A1 06 cmp #6
8740 27 0C beq 0x874E
8742 B6 50 ldA *__rlo+3
8744 A1 09 cmp #9
8746 27 06 beq 0x874E
8748 B6 50 ldA *__rlo+3
874A A1 0B cmp #11
874C 26 10 bne 0x875E
874E B6 51 ldA 0x51
8750 A1 01 cmp #1
8752 23 04 bls 0x8758
8754 3A 51 dec 0x51
8756 20 32 bra 0x878A
8758 A6 1E ldA #30
875A B7 51 stA 0x51
875C 20 2C bra 0x878A
875E 55 4E ldHX *__rlo+1
8760 89 pshX
8761 8B pshH
8762 CD 8565 jsr _Is_yunnian
8765 A7 02 aiS #2
8767 95 tSX
8768 B7 41 stA *__r1
876A 26 10 bne 0x877C
876C B6 51 ldA 0x51
876E A1 01 cmp #1
8770 23 04 bls 0x8776
8772 3A 51 dec 0x51
8774 20 14 bra 0x878A
8776 A6 01 ldA #1
8778 B7 51 stA 0x51
877A 20 0E bra 0x878A
877C B6 51 ldA 0x51
877E A1 01 cmp #1
8780 23 04 bls 0x8786
8782 3A 51 dec 0x51
8784 20 04 bra 0x878A
8786 A6 01 ldA #1
8788 B7 51 stA 0x51
878A 3F 83 clr 0xFFFFFF83
878C 81 rts
_Hour_adjust:
878D A6 01 ldA #1
878F B7 84 stA 0xFFFFFF84
8791 A6 01 ldA #1
8793 87 pshA
8794 87 pshA
8795 CD 8D2D jsr _Lcd_show_cursor
8798 A7 02 aiS #2
879A 95 tSX
879B B6 82 ldA 0xFFFFFF82
879D 27 0E beq 0x87AD
879F B6 52 ldA 0x52
87A1 A1 3B cmp #59
87A3 24 04 bcc 0x87A9
87A5 3C 52 inc 0x52
87A7 20 02 bra 0x87AB
87A9 3F 52 clr 0x52
87AB 3F 82 clr 0xFFFFFF82
87AD B6 83 ldA 0xFFFFFF83
87AF 27 10 beq 0x87C1
87B1 B6 52 ldA 0x52
87B3 A1 00 cmp #0
87B5 23 04 bls 0x87BB
87B7 3A 52 dec 0x52
87B9 20 04 bra 0x87BF
87BB A6 3B ldA #59
87BD B7 52 stA 0x52
87BF 3F 83 clr 0xFFFFFF83
87C1 81 rts
_Minute_adjust:
87C2 A6 01 ldA #1
87C4 B7 84 stA 0xFFFFFF84
87C6 A6 04 ldA #4
87C8 87 pshA
87C9 A6 01 ldA #1
87CB 87 pshA
87CC CD 8D2D jsr _Lcd_show_cursor
87CF A7 02 aiS #2
87D1 95 tSX
87D2 B6 82 ldA 0xFFFFFF82
87D4 27 0E beq 0x87E4
87D6 B6 53 ldA 0x53
87D8 A1 3B cmp #59
87DA 24 04 bcc 0x87E0
87DC 3C 53 inc 0x53
87DE 20 02 bra 0x87E2
87E0 3F 53 clr 0x53
87E2 3F 82 clr 0xFFFFFF82
87E4 B6 83 ldA 0xFFFFFF83
87E6 27 10 beq 0x87F8
87E8 B6 53 ldA 0x53
87EA A1 00 cmp #0
87EC 23 04 bls 0x87F2
87EE 3A 53 dec 0x53
87F0 20 04 bra 0x87F6
87F2 A6 3B ldA #59
87F4 B7 53 stA 0x53
87F6 3F 83 clr 0xFFFFFF83
87F8 81 rts
_A_Year_adjust:
87F9 3F 84 clr 0xFFFFFF84
87FB A6 41 ldA #65
87FD B7 67 stA 0x67
87FF A6 4C ldA #76
8801 B7 68 stA 0x68
8803 A6 41 ldA #65
8805 B7 69 stA 0x69
8807 A6 52 ldA #82
8809 B7 6A stA 0x6A
880B A6 4D ldA #77
880D B7 6B stA 0x6B
880F B6 82 ldA 0xFFFFFF82
8811 27 0E beq 0x8821
8813 B6 56 ldA 0x56
8815 AB 01 add #1
8817 B7 56 stA 0x56
8819 B6 55 ldA 0x55
881B A9 00 adc #0
881D B7 55 stA 0x55
881F 3F 82 clr 0xFFFFFF82
8821 B6 83 ldA 0xFFFFFF83
8823 27 0E beq 0x8833
8825 B6 56 ldA 0x56
8827 A0 01 sub #1
8829 B7 56 stA 0x56
882B B6 55 ldA 0x55
882D A2 00 sbc #0
882F B7 55 stA 0x55
8831 3F 83 clr 0xFFFFFF83
8833 A6 03 ldA #3
8835 87 pshA
8836 4F clrA
8837 87 pshA
8838 CD 8D2D jsr _Lcd_show_cursor
883B A7 02 aiS #2
883D 95 tSX
883E 81 rts
_A_Month_adjust:
883F 3F 84 clr 0xFFFFFF84
8841 A6 06 ldA #6
8843 87 pshA
8844 4F clrA
8845 87 pshA
8846 CD 8D2D jsr _Lcd_show_cursor
8849 A7 02 aiS #2
884B 95 tSX
884C B6 82 ldA 0xFFFFFF82
884E 27 04 beq 0x8854
8850 3C 57 inc 0x57
8852 3F 82 clr 0xFFFFFF82
8854 B6 83 ldA 0xFFFFFF83
8856 27 04 beq 0x885C
8858 3A 57 dec 0x57
885A 3F 83 clr 0xFFFFFF83
885C 81 rts
_A_Day_adjust:
885D 3F 84 clr 0xFFFFFF84
885F A6 09 ldA #9
8861 87 pshA
8862 4F clrA
8863 87 pshA
8864 CD 8D2D jsr _Lcd_show_cursor
8867 A7 02 aiS #2
8869 95 tSX
886A B6 82 ldA 0xFFFFFF82
886C 27 04 beq 0x8872
886E 3C 58 inc 0x58
8870 3F 82 clr 0xFFFFFF82
8872 B6 83 ldA 0xFFFFFF83
8874 27 04 beq 0x887A
8876 3A 58 dec 0x58
8878 3F 83 clr 0xFFFFFF83
887A 81 rts
_A_Hour_adjust:
887B 3F 84 clr 0xFFFFFF84
887D A6 01 ldA #1
887F 87 pshA
8880 87 pshA
8881 CD 8D2D jsr _Lcd_show_cursor
8884 A7 02 aiS #2
8886 95 tSX
8887 B6 82 ldA 0xFFFFFF82
8889 27 04 beq 0x888F
888B 3C 59 inc 0x59
888D 3F 82 clr 0xFFFFFF82
888F B6 83 ldA 0xFFFFFF83
8891 27 04 beq 0x8897
8893 3A 59 dec 0x59
8895 3F 83 clr 0xFFFFFF83
8897 81 rts
_A_Minute_adjust:
8898 3F 84 clr 0xFFFFFF84
889A A6 04 ldA #4
889C 87 pshA
889D A6 01 ldA #1
889F 87 pshA
88A0 CD 8D2D jsr _Lcd_show_cursor
88A3 A7 02 aiS #2
88A5 95 tSX
88A6 B6 82 ldA 0xFFFFFF82
88A8 27 04 beq 0x88AE
88AA 3C 5A inc 0x5A
88AC 3F 82 clr 0xFFFFFF82
88AE B6 83 ldA 0xFFFFFF83
88B0 27 04 beq 0x88B6
88B2 3A 5A dec 0x5A
88B4 3F 83 clr 0xFFFFFF83
88B6 81 rts
_Alarm_handle:
88B7 A7 FE aiS #-2
88B9 95 tSX
88BA B6 7F ldA 0x7F
88BC 26 08 bne 0x88C6
88BE 4F clrA
88BF F7 stA 0,X
88C0 A6 01 ldA #1
88C2 E7 01 stA 1,X
88C4 20 03 bra 0x88C9
88C6 6F 01 clr 1,X
88C8 7F clr 0,X
88C9 E6 01 ldA 1,X
88CB B7 7F stA 0x7F
88CD B6 7F ldA 0x7F
88CF 27 0E beq 0x88DF
88D1 A6 20 ldA #32
88D3 B7 79 stA 0x79
88D5 A6 45 ldA #69
88D7 B7 7A stA 0x7A
88D9 A6 4E ldA #78
88DB B7 7B stA 0x7B
88DD 20 0C bra 0x88EB
88DF A6 44 ldA #68
88E1 B7 79 stA 0x79
88E3 A6 49 ldA #73
88E5 B7 7A stA 0x7A
88E7 A6 53 ldA #83
88E9 B7 7B stA 0x7B
88EB A7 02 aiS #2
88ED 81 rts
_Alarm_play:
88EE 10 07 Bset 0,0x07
88F0 10 03 Bset 0,0x03
88F2 81 rts
_Alarm_Off:
88F3 10 07 Bset 0,0x07
88F5 B6 03 ldA 0x03
88F7 A4 FE and #-2
88F9 B7 03 stA 0x03
88FB 81 rts
_swap:
88FC A7 FF aiS #-1
88FE 95 tSX
88FF E6 03 ldA 3,X
8901 EE 04 ldX 4,X
8903 87 pshA
8904 8A pulH
8905 F6 ldA 0,X
8906 95 tSX
8907 F7 stA 0,X
8908 E6 05 ldA 5,X
890A EE 06 ldX 6,X
890C 87 pshA
890D 8A pulH
890E F6 ldA 0,X
890F 95 tSX
8910 B7 41 stA *__r1
8912 E6 04 ldA 4,X
8914 B7 43 stA *__r3
8916 E6 03 ldA 3,X
8918 B7 42 stA *__r2
891A B6 41 ldA *__r1
891C 55 42 ldHX *__r2
891E F7 stA 0,X
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -