📄 timer1.lst
字号:
8607 10 02 Bset 0,0x02
8609 13 02 Bclr 1,0x02
860B 7F clr 0,X
860C 20 18 bra 0x8626
860E 3F 40 clr *__r0
8610 F6 ldA 0,X
8611 EB 04 add 4,X
8613 B7 41 stA *__r1
8615 B6 40 ldA *__r0
8617 E9 03 adc 3,X
8619 B7 40 stA *__r0
861B 55 40 ldHX *__r0
861D F6 ldA 0,X
861E 87 pshA
861F CD 8709 jsr _Lcd_Command
8622 A7 01 aiS #1
8624 95 tSX
8625 7C inc 0,X
8626 F6 ldA 0,X
8627 A1 0A cmp #10
8629 25 E3 bcs 0x860E
862B 11 02 Bclr 0,0x02
862D 13 02 Bclr 1,0x02
862F A6 C0 ldA #-64
8631 87 pshA
8632 CD 8709 jsr _Lcd_Command
8635 A7 01 aiS #1
8637 95 tSX
8638 10 02 Bset 0,0x02
863A 13 02 Bclr 1,0x02
863C A6 0A ldA #10
863E F7 stA 0,X
863F 20 18 bra 0x8659
8641 3F 40 clr *__r0
8643 F6 ldA 0,X
8644 EB 04 add 4,X
8646 B7 41 stA *__r1
8648 B6 40 ldA *__r0
864A E9 03 adc 3,X
864C B7 40 stA *__r0
864E 55 40 ldHX *__r0
8650 F6 ldA 0,X
8651 87 pshA
8652 CD 8709 jsr _Lcd_Command
8655 A7 01 aiS #1
8657 95 tSX
8658 7C inc 0,X
8659 F6 ldA 0,X
865A A1 12 cmp #18
865C 25 E3 bcs 0x8641
865E A7 01 aiS #1
8660 81 rts
_lcdshow1:
8661 A7 FF aiS #-1
8663 95 tSX
8664 CD 86B7 jsr _LcdInit
8667 11 02 Bclr 0,0x02
8669 13 02 Bclr 1,0x02
866B A6 80 ldA #-128
866D 87 pshA
866E CD 8709 jsr _Lcd_Command
8671 A7 01 aiS #1
8673 95 tSX
8674 10 02 Bset 0,0x02
8676 13 02 Bclr 1,0x02
8678 7F clr 0,X
8679 20 18 bra 0x8693
867B 3F 40 clr *__r0
867D F6 ldA 0,X
867E EB 04 add 4,X
8680 B7 41 stA *__r1
8682 B6 40 ldA *__r0
8684 E9 03 adc 3,X
8686 B7 40 stA *__r0
8688 55 40 ldHX *__r0
868A F6 ldA 0,X
868B 87 pshA
868C CD 8709 jsr _Lcd_Command
868F A7 01 aiS #1
8691 95 tSX
8692 7C inc 0,X
8693 F6 ldA 0,X
8694 E1 05 cmp 5,X
8696 25 E3 bcs 0x867B
8698 A7 01 aiS #1
869A 81 rts
_lcdshow2:
869B 95 tSX
869C 11 02 Bclr 0,0x02
869E 13 02 Bclr 1,0x02
86A0 A6 06 ldA #6
86A2 87 pshA
86A3 CD 8709 jsr _Lcd_Command
86A6 A7 01 aiS #1
86A8 95 tSX
86A9 10 02 Bset 0,0x02
86AB 13 02 Bclr 1,0x02
86AD E6 02 ldA 2,X
86AF 87 pshA
86B0 CD 8709 jsr _Lcd_Command
86B3 A7 01 aiS #1
86B5 95 tSX
86B6 81 rts
_LcdInit:
86B7 A7 FF aiS #-1
86B9 95 tSX
86BA A6 FF ldA #-1
86BC B7 05 stA 0x05
86BE 14 06 Bset 2,0x06
86C0 10 06 Bset 0,0x06
86C2 12 06 Bset 1,0x06
86C4 14 02 Bset 2,0x02
86C6 11 02 Bclr 0,0x02
86C8 13 02 Bclr 1,0x02
86CA A6 38 ldA #56
86CC 87 pshA
86CD CD 8709 jsr _Lcd_Command
86D0 A7 01 aiS #1
86D2 A6 08 ldA #8
86D4 87 pshA
86D5 CD 8709 jsr _Lcd_Command
86D8 A7 01 aiS #1
86DA A6 01 ldA #1
86DC 87 pshA
86DD CD 8709 jsr _Lcd_Command
86E0 A7 01 aiS #1
86E2 95 tSX
86E3 7F clr 0,X
86E4 20 01 bra 0x86E7
86E6 7C inc 0,X
86E7 F6 ldA 0,X
86E8 A1 FA cmp #-6
86EA 25 FA bcs 0x86E6
86EC 7F clr 0,X
86ED 20 01 bra 0x86F0
86EF 7C inc 0,X
86F0 F6 ldA 0,X
86F1 A1 FA cmp #-6
86F3 25 FA bcs 0x86EF
86F5 A6 14 ldA #20
86F7 87 pshA
86F8 CD 8709 jsr _Lcd_Command
86FB A7 01 aiS #1
86FD A6 0C ldA #12
86FF 87 pshA
8700 CD 8709 jsr _Lcd_Command
8703 A7 01 aiS #1
8705 95 tSX
8706 A7 01 aiS #1
8708 81 rts
_Lcd_Command:
8709 A7 FF aiS #-1
870B 95 tSX
870C 7F clr 0,X
870D 20 01 bra 0x8710
870F 7C inc 0,X
8710 F6 ldA 0,X
8711 A1 14 cmp #20
8713 25 FA bcs 0x870F
8715 E6 03 ldA 3,X
8717 B7 01 stA 0x01
8719 14 02 Bset 2,0x02
871B 9D nop
871C 9D nop
871D 9D nop
871E 15 02 Bclr 2,0x02
8720 7F clr 0,X
8721 20 01 bra 0x8724
8723 7C inc 0,X
8724 F6 ldA 0,X
8725 A1 14 cmp #20
8727 25 FA bcs 0x8723
8729 A7 01 aiS #1
872B 81 rts
_delay:
872C A7 FF aiS #-1
872E 95 tSX
872F 7F clr 0,X
8730 20 01 bra 0x8733
8732 7C inc 0,X
8733 F6 ldA 0,X
8734 A1 6E cmp #110
8736 23 FA bls 0x8732
8738 A7 01 aiS #1
873A 81 rts
_Timer1init:
873B A6 66 ldA #102
873D B7 20 stA 0x20
873F 3F 21 clr 0x21
8741 3F 22 clr 0x22
8743 A6 96 ldA #-106
8745 B7 23 stA 0x23
8747 3F 24 clr 0x24
8749 1B 20 Bclr 5,0x20
874B 81 rts
_InitTime:
874C A6 14 ldA #20
874E B7 6B stA *_time
8750 A6 08 ldA #8
8752 B7 6C stA *_time+1
8754 A6 06 ldA #6
8756 B7 6D stA *_time+2
8758 A6 12 ldA #18
875A B7 6E stA *_time+3
875C A6 17 ldA #23
875E B7 6F stA 0x6F
8760 A6 3B ldA #59
8762 B7 70 stA 0x70
8764 A6 36 ldA #54
8766 B7 71 stA 0x71
8768 81 rts
_SetTime:
8769 A7 E8 aiS #-24
876B 95 tSX
876C AF 0B aiX #11
876E 35 40 stHX *__r0
8770 95 tSX
8771 A6 0B ldA #11
8773 87 pshA
8774 4F clrA
8775 87 pshA
8776 A6 00 ldA #0
8778 87 pshA
8779 A6 80 ldA #-128
877B 87 pshA
877C B6 41 ldA *__r1
877E 87 pshA
877F B6 40 ldA *__r0
8781 87 pshA
8782 CD 9099 jsr __asgnblk
8785 A7 06 aiS #6
8787 35 40 stHX *__r0
8789 A6 0B ldA #11
878B 87 pshA
878C 4F clrA
878D 87 pshA
878E A6 0B ldA #11
8790 87 pshA
8791 A6 80 ldA #-128
8793 87 pshA
8794 B6 41 ldA *__r1
8796 87 pshA
8797 B6 40 ldA *__r0
8799 87 pshA
879A CD 9099 jsr __asgnblk
879D A7 06 aiS #6
879F A6 0B ldA #11
87A1 87 pshA
87A2 AF 0B aiX #11
87A4 89 pshX
87A5 8B pshH
87A6 CD 8661 jsr _lcdshow1
87A9 A7 03 aiS #3
87AB 11 02 Bclr 0,0x02
87AD 13 02 Bclr 1,0x02
87AF A6 C0 ldA #-64
87B1 87 pshA
87B2 CD 8709 jsr _Lcd_Command
87B5 A7 01 aiS #1
87B7 95 tSX
87B8 20 08 bra 0x87C2
87BA CD 9009 jsr _KB_Scan
87BD 95 tSX
87BE B7 41 stA *__r1
87C0 B7 72 stA *_KB_valve
87C2 B6 72 ldA *_KB_valve
87C4 A1 FF cmp #-1
87C6 26 F2 bne 0x87BA
87C8 20 08 bra 0x87D2
87CA CD 9009 jsr _KB_Scan
87CD 95 tSX
87CE B7 41 stA *__r1
87D0 B7 72 stA *_KB_valve
87D2 B6 72 ldA *_KB_valve
87D4 A1 FF cmp #-1
87D6 27 F2 beq 0x87CA
87D8 B6 72 ldA *_KB_valve
87DA 87 pshA
87DB CD 9050 jsr _KB_Def
87DE A7 01 aiS #1
87E0 95 tSX
87E1 B7 41 stA *__r1
87E3 B7 72 stA *_KB_valve
87E5 B6 72 ldA *_KB_valve
87E7 A0 30 sub #48
87E9 E7 16 stA 22,X
87EB B6 72 ldA *_KB_valve
87ED 87 pshA
87EE CD 869B jsr _lcdshow2
87F1 A7 01 aiS #1
87F3 95 tSX
87F4 20 08 bra 0x87FE
87F6 CD 9009 jsr _KB_Scan
87F9 95 tSX
87FA B7 41 stA *__r1
87FC B7 72 stA *_KB_valve
87FE B6 72 ldA *_KB_valve
8800 A1 FF cmp #-1
8802 26 F2 bne 0x87F6
8804 20 08 bra 0x880E
8806 CD 9009 jsr _KB_Scan
8809 95 tSX
880A B7 41 stA *__r1
880C B7 72 stA *_KB_valve
880E B6 72 ldA *_KB_valve
8810 A1 FF cmp #-1
8812 27 F2 beq 0x8806
8814 B6 72 ldA *_KB_valve
8816 87 pshA
8817 CD 9050 jsr _KB_Def
881A A7 01 aiS #1
881C 95 tSX
881D B7 41 stA *__r1
881F B7 72 stA *_KB_valve
8821 B6 72 ldA *_KB_valve
8823 A0 30 sub #48
8825 E7 17 stA 23,X
8827 B6 72 ldA *_KB_valve
8829 87 pshA
882A CD 869B jsr _lcdshow2
882D A7 01 aiS #1
882F 95 tSX
8830 E6 16 ldA 22,X
8832 AE 0A ldX #10
8834 42 mul
8835 95 tSX
8836 EB 17 add 23,X
8838 B7 6B stA *_time
883A 20 08 bra 0x8844
883C CD 9009 jsr _KB_Scan
883F 95 tSX
8840 B7 41 stA *__r1
8842 B7 72 stA *_KB_valve
8844 B6 72 ldA *_KB_valve
8846 A1 FF cmp #-1
8848 26 F2 bne 0x883C
884A 20 08 bra 0x8854
884C CD 9009 jsr _KB_Scan
884F 95 tSX
8850 B7 41 stA *__r1
8852 B7 72 stA *_KB_valve
8854 B6 72 ldA *_KB_valve
8856 A1 FF cmp #-1
8858 27 F2 beq 0x884C
885A B6 72 ldA *_KB_valve
885C 87 pshA
885D CD 9050 jsr _KB_Def
8860 A7 01 aiS #1
8862 95 tSX
8863 B7 41 stA *__r1
8865 B7 72 stA *_KB_valve
8867 B6 72 ldA *_KB_valve
8869 A0 30 sub #48
886B E7 16 stA 22,X
886D B6 72 ldA *_KB_valve
886F 87 pshA
8870 CD 869B jsr _lcdshow2
8873 A7 01 aiS #1
8875 95 tSX
8876 20 08 bra 0x8880
8878 CD 9009 jsr _KB_Scan
887B 95 tSX
887C B7 41 stA *__r1
887E B7 72 stA *_KB_valve
8880 B6 72 ldA *_KB_valve
8882 A1 FF cmp #-1
8884 26 F2 bne 0x8878
8886 20 08 bra 0x8890
8888 CD 9009 jsr _KB_Scan
888B 95 tSX
888C B7 41 stA *__r1
888E B7 72 stA *_KB_valve
8890 B6 72 ldA *_KB_valve
8892 A1 FF cmp #-1
8894 27 F2 beq 0x8888
8896 B6 72 ldA *_KB_valve
8898 87 pshA
8899 CD 9050 jsr _KB_Def
889C A7 01 aiS #1
889E 95 tSX
889F B7 41 stA *__r1
88A1 B7 72 stA *_KB_valve
88A3 B6 72 ldA *_KB_valve
88A5 A0 30 sub #48
88A7 E7 17 stA 23,X
88A9 B6 72 ldA *_KB_valve
88AB 87 pshA
88AC CD 869B jsr _lcdshow2
88AF A7 01 aiS #1
88B1 95 tSX
88B2 E6 16 ldA 22,X
88B4 AE 0A ldX #10
88B6 42 mul
88B7 95 tSX
88B8 EB 17 add 23,X
88BA B7 6C stA *_time+1
88BC A6 2E ldA #46
88BE 87 pshA
88BF CD 869B jsr _lcdshow2
88C2 A7 01 aiS #1
88C4 95 tSX
88C5 20 08 bra 0x88CF
88C7 CD 9009 jsr _KB_Scan
88CA 95 tSX
88CB B7 41 stA *__r1
88CD B7 72 stA *_KB_valve
88CF B6 72 ldA *_KB_valve
88D1 A1 FF cmp #-1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -