📄 电子钟.lst
字号:
865C B7 43 stA *__r3
865E B6 42 ldA *__r2
8660 A9 00 adc #0
8662 B7 42 stA *__r2
8664 B6 41 ldA *__r1
8666 55 42 ldHX *__r2
8668 F7 stA 0,X
8669 95 tSX
866A 6C 01 inc 1,X
866C 3F 40 clr *__r0
866E F6 ldA 0,X
866F AB CF add #-49
8671 B7 41 stA *__r1
8673 B6 40 ldA *__r0
8675 A9 00 adc #0
8677 B7 40 stA *__r0
8679 55 40 ldHX *__r0
867B F6 ldA 0,X
867C AE 0A ldX #10
867E 8C clrH
867F 52 div
8680 8B pshH
8681 86 pulA
8682 95 tSX
8683 AB 30 add #48
8685 B7 41 stA *__r1
8687 3F 42 clr *__r2
8689 E6 01 ldA 1,X
868B AB 92 add #-110
868D B7 43 stA *__r3
868F B6 42 ldA *__r2
8691 A9 00 adc #0
8693 B7 42 stA *__r2
8695 B6 41 ldA *__r1
8697 55 42 ldHX *__r2
8699 F7 stA 0,X
869A 95 tSX
869B 6C 01 inc 1,X
869D F6 ldA 0,X
869E A1 02 cmp #2
86A0 26 02 bne 0x86A4
86A2 20 1F bra 0x86C3
86A4 3F 40 clr *__r0
86A6 E6 01 ldA 1,X
86A8 AB 92 add #-110
86AA B7 41 stA *__r1
86AC B6 40 ldA *__r0
86AE A9 00 adc #0
86B0 B7 40 stA *__r0
86B2 A6 3A ldA #58
86B4 55 40 ldHX *__r0
86B6 F7 stA 0,X
86B7 95 tSX
86B8 6C 01 inc 1,X
86BA 7C inc 0,X
86BB F6 ldA 0,X
86BC A1 03 cmp #3
86BE 24 03 bcc 0x86C3
86C0 CC 863D jmp 0x863D
86C3 3F 40 clr *__r0
86C5 E6 01 ldA 1,X
86C7 AB 92 add #-110
86C9 B7 41 stA *__r1
86CB B6 40 ldA *__r0
86CD A9 00 adc #0
86CF B7 40 stA *__r0
86D1 A6 45 ldA #69
86D3 55 40 ldHX *__r0
86D5 F7 stA 0,X
86D6 A6 92 ldA #-110
86D8 87 pshA
86D9 A6 00 ldA #0
86DB 87 pshA
86DC CD 8E96 jsr _lcdshow
86DF A7 02 aiS #2
86E1 11 02 Bclr 0,0x02
86E3 13 02 Bclr 1,0x02
86E5 A6 0F ldA #15
86E7 87 pshA
86E8 CD 8FD8 jsr _Lcd_Command
86EB A7 01 aiS #1
86ED A6 C0 ldA #-64
86EF 87 pshA
86F0 CD 8FD8 jsr _Lcd_Command
86F3 A7 01 aiS #1
86F5 95 tSX
86F6 A7 02 aiS #2
86F8 81 rts
_ok:
86F9 A7 FF aiS #-1
86FB 95 tSX
86FC B6 B4 ldA 0xFFFFFFB4
86FE 27 03 beq 0x8703
8700 CC 881A jmp 0x881A
8703 B6 B2 ldA 0xFFFFFFB2
8705 A1 01 cmp #1
8707 27 03 beq 0x870C
8709 CC 881A jmp 0x881A
870C 1A 20 Bset 5,0x20
870E 3F CC clr 0xFFFFFFCC
8710 3F CD clr 0xFFFFFFCD
8712 3F CE clr 0xFFFFFFCE
8714 3F C7 clr 0xFFFFFFC7
8716 3F C6 clr 0xFFFFFFC6
8718 3F C9 clr 0xFFFFFFC9
871A 3F C8 clr 0xFFFFFFC8
871C 3F CB clr 0xFFFFFFCB
871E 3F CA clr 0xFFFFFFCA
8720 7F clr 0,X
8721 20 38 bra 0x875B
8723 3F 40 clr *__r0
8725 F6 ldA 0,X
8726 AB B5 add #-75
8728 B7 41 stA *__r1
872A B6 40 ldA *__r0
872C A9 00 adc #0
872E B7 40 stA *__r0
8730 55 40 ldHX *__r0
8732 F6 ldA 0,X
8733 B7 41 stA *__r1
8735 3F 40 clr *__r0
8737 55 C6 ldHX 0xFFFFFFC6
8739 89 pshX
873A 8B pshH
873B 95 tSX
873C AF 02 aiX #2
873E A6 0A ldA #10
8740 87 pshA
8741 4F clrA
8742 87 pshA
8743 CD 91CD jsr __mul16
8746 A7 04 aiS #4
8748 4E 4D43 mov *__rlo,*__r3
874B 4E 4C42 mov *__rhi,*__r2
874E B6 43 ldA *__r3
8750 BB 41 add *__r1
8752 B7 C7 stA 0xFFFFFFC7
8754 B6 42 ldA *__r2
8756 B9 40 adc *__r0
8758 B7 C6 stA 0xFFFFFFC6
875A 7C inc 0,X
875B F6 ldA 0,X
875C A1 04 cmp #4
875E 25 C3 bcs 0x8723
8760 20 54 bra 0x87B6
8762 3F 40 clr *__r0
8764 F6 ldA 0,X
8765 AB B5 add #-75
8767 B7 41 stA *__r1
8769 B6 40 ldA *__r0
876B A9 00 adc #0
876D B7 40 stA *__r0
876F 55 40 ldHX *__r0
8771 F6 ldA 0,X
8772 B7 41 stA *__r1
8774 3F 40 clr *__r0
8776 55 C8 ldHX 0xFFFFFFC8
8778 89 pshX
8779 8B pshH
877A 95 tSX
877B AF 02 aiX #2
877D A6 0A ldA #10
877F 87 pshA
8780 4F clrA
8781 87 pshA
8782 CD 91CD jsr __mul16
8785 A7 04 aiS #4
8787 4E 4D43 mov *__rlo,*__r3
878A 4E 4C42 mov *__rhi,*__r2
878D B6 43 ldA *__r3
878F BB 41 add *__r1
8791 B7 C9 stA 0xFFFFFFC9
8793 B6 42 ldA *__r2
8795 B9 40 adc *__r0
8797 B7 C8 stA 0xFFFFFFC8
8799 3F 40 clr *__r0
879B F6 ldA 0,X
879C AB B9 add #-71
879E B7 41 stA *__r1
87A0 B6 40 ldA *__r0
87A2 A9 00 adc #0
87A4 B7 40 stA *__r0
87A6 55 40 ldHX *__r0
87A8 F6 ldA 0,X
87A9 B7 41 stA *__r1
87AB B6 CC ldA 0xFFFFFFCC
87AD AE 0A ldX #10
87AF 42 mul
87B0 95 tSX
87B1 BB 41 add *__r1
87B3 B7 CC stA 0xFFFFFFCC
87B5 7C inc 0,X
87B6 F6 ldA 0,X
87B7 A1 06 cmp #6
87B9 25 A7 bcs 0x8762
87BB 20 54 bra 0x8811
87BD 3F 40 clr *__r0
87BF F6 ldA 0,X
87C0 AB B5 add #-75
87C2 B7 41 stA *__r1
87C4 B6 40 ldA *__r0
87C6 A9 00 adc #0
87C8 B7 40 stA *__r0
87CA 55 40 ldHX *__r0
87CC F6 ldA 0,X
87CD B7 41 stA *__r1
87CF 3F 40 clr *__r0
87D1 55 CA ldHX 0xFFFFFFCA
87D3 89 pshX
87D4 8B pshH
87D5 95 tSX
87D6 AF 02 aiX #2
87D8 A6 0A ldA #10
87DA 87 pshA
87DB 4F clrA
87DC 87 pshA
87DD CD 91CD jsr __mul16
87E0 A7 04 aiS #4
87E2 4E 4D43 mov *__rlo,*__r3
87E5 4E 4C42 mov *__rhi,*__r2
87E8 B6 43 ldA *__r3
87EA BB 41 add *__r1
87EC B7 CB stA 0xFFFFFFCB
87EE B6 42 ldA *__r2
87F0 B9 40 adc *__r0
87F2 B7 CA stA 0xFFFFFFCA
87F4 3F 40 clr *__r0
87F6 F6 ldA 0,X
87F7 AB B9 add #-71
87F9 B7 41 stA *__r1
87FB B6 40 ldA *__r0
87FD A9 00 adc #0
87FF B7 40 stA *__r0
8801 55 40 ldHX *__r0
8803 F6 ldA 0,X
8804 B7 41 stA *__r1
8806 B6 CD ldA 0xFFFFFFCD
8808 AE 0A ldX #10
880A 42 mul
880B 95 tSX
880C BB 41 add *__r1
880E B7 CD stA 0xFFFFFFCD
8810 7C inc 0,X
8811 F6 ldA 0,X
8812 A1 08 cmp #8
8814 25 A7 bcs 0x87BD
8816 3F B2 clr 0xFFFFFFB2
8818 1B 20 Bclr 5,0x20
881A B6 B4 ldA 0xFFFFFFB4
881C 26 53 bne 0x8871
881E B6 B2 ldA 0xFFFFFFB2
8820 26 4F bne 0x8871
8822 3F CF clr 0xFFFFFFCF
8824 3F D0 clr 0xFFFFFFD0
8826 3F D1 clr 0xFFFFFFD1
8828 7F clr 0,X
8829 20 1D bra 0x8848
882B 3F 40 clr *__r0
882D F6 ldA 0,X
882E AB C1 add #-63
8830 B7 41 stA *__r1
8832 B6 40 ldA *__r0
8834 A9 00 adc #0
8836 B7 40 stA *__r0
8838 55 40 ldHX *__r0
883A F6 ldA 0,X
883B B7 41 stA *__r1
883D B6 CF ldA 0xFFFFFFCF
883F AE 0A ldX #10
8841 42 mul
8842 95 tSX
8843 BB 41 add *__r1
8845 B7 CF stA 0xFFFFFFCF
8847 7C inc 0,X
8848 F6 ldA 0,X
8849 A1 02 cmp #2
884B 25 DE bcs 0x882B
884D 20 1D bra 0x886C
884F 3F 40 clr *__r0
8851 F6 ldA 0,X
8852 AB C1 add #-63
8854 B7 41 stA *__r1
8856 B6 40 ldA *__r0
8858 A9 00 adc #0
885A B7 40 stA *__r0
885C 55 40 ldHX *__r0
885E F6 ldA 0,X
885F B7 41 stA *__r1
8861 B6 D0 ldA 0xFFFFFFD0
8863 AE 0A ldX #10
8865 42 mul
8866 95 tSX
8867 BB 41 add *__r1
8869 B7 D0 stA 0xFFFFFFD0
886B 7C inc 0,X
886C F6 ldA 0,X
886D A1 04 cmp #4
886F 25 DE bcs 0x884F
8871 11 02 Bclr 0,0x02
8873 13 02 Bclr 1,0x02
8875 A6 0C ldA #12
8877 87 pshA
8878 CD 8FD8 jsr _Lcd_Command
887B A7 01 aiS #1
887D 95 tSX
887E A6 01 ldA #1
8880 B7 B4 stA 0xFFFFFFB4
8882 A7 01 aiS #1
8884 81 rts
_Delay_ms:
8885 A7 FE aiS #-2
8887 95 tSX
8888 7F clr 0,X
8889 20 0D bra 0x8898
888B 6F 01 clr 1,X
888D 20 02 bra 0x8891
888F 6C 01 inc 1,X
8891 E6 01 ldA 1,X
8893 A1 FA cmp #-6
8895 23 F8 bls 0x888F
8897 7C inc 0,X
8898 F6 ldA 0,X
8899 E1 04 cmp 4,X
889B 25 EE bcs 0x888B
889D A7 02 aiS #2
889F 81 rts
_beep:
88A0 A7 FF aiS #-1
88A2 95 tSX
88A3 7F clr 0,X
88A4 20 26 bra 0x88CC
88A6 A6 01 ldA #1
88A8 B7 03 stA 0x03
88AA A6 32 ldA #50
88AC 87 pshA
88AD CD 8885 jsr _Delay_ms
88B0 A7 01 aiS #1
88B2 3F 03 clr 0x03
88B4 A6 C8 ldA #-56
88B6 87 pshA
88B7 CD 8885 jsr _Delay_ms
88BA A7 01 aiS #1
88BC A6 C8 ldA #-56
88BE 87 pshA
88BF CD 8885 jsr _Delay_ms
88C2 A7 01 aiS #1
88C4 95 tSX
88C5 B6 B3 ldA 0xFFFFFFB3
88C7 26 02 bne 0x88CB
88C9 20 06 bra 0x88D1
88CB 7C inc 0,X
88CC F6 ldA 0,X
88CD E1 03 cmp 3,X
88CF 25 D5 bcs 0x88A6
88D1 A7 01 aiS #1
88D3 81 rts
_input:
88D4 A7 FD aiS #-3
88D6 95 tSX
88D7 B6 B4 ldA 0xFFFFFFB4
88D9 27 03 beq 0x88DE
88DB CC 8C90 jmp 0x8C90
88DE B6 B2 ldA 0xFFFFFFB2
88E0 A1 01 cmp #1
88E2 27 03 beq 0x88E7
88E4 CC 8B9E jmp 0x8B9E
88E7 11 02 Bclr 0,0x02
88E9 12 02 Bset 1,0x02
88EB 14 02 Bset 2,0x02
88ED B6 01 ldA 0x01
88EF E7 02 stA 2,X
88F1 A4 7F and #127
88F3 E7 02 stA 2,X
88F5 7F clr 0,X
88F6 E7 01 stA 1,X
88F8 F6 ldA 0,X
88F9 26 07 bne 0x8902
88FB E6 01 ldA 1,X
88FD 26 03 bne 0x8902
88FF CC 899B jmp 0x899B
8902 F6 ldA 0,X
8903 26 09 bne 0x890E
8905 E6 01 ldA 1,X
8907 A1 01 cmp #1
8909 26 03 bne 0x890E
890B CC 89B7 jmp 0x89B7
890E F6 ldA 0,X
890F 26 09 bne 0x891A
8911 E6 01 ldA 1,X
8913 A1 02 cmp #2
8915 26 03 bne 0x891A
8917 CC 89D3 jmp 0x89D3
891A F6 ldA 0,X
891B 26 09 bne 0x8926
891D E6 01 ldA 1,X
891F A1 03 cmp #3
8921 26 03 bne 0x8926
8923 CC 89EF jmp 0x89EF
8926 F6 ldA 0,X
8927 26 09 bne 0x8932
8929 E6 01 ldA 1,X
892B A1 05 cmp #5
892D 26 03 bne 0x8932
892F CC 8A0B jmp 0x8A0B
8932 F6 ldA 0,X
8933 26 09 bne 0x893E
8935 E6 01 ldA 1,X
8937 A1 06 cmp #6
8939 26 03 bne 0x893E
893B CC 8A3E jmp 0x8A3E
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -