📄 电子钟.lst
字号:
8C77 E6 06 ldA 6,X
8C79 A0 30 sub #48
8C7B B7 41 stA *__r1
8C7D E6 05 ldA 5,X
8C7F A2 00 sbc #0
8C81 4E 41C4 mov *__r1,0xC4
8C84 E6 02 ldA 2,X
8C86 87 pshA
8C87 E6 06 ldA 6,X
8C89 87 pshA
8C8A CD 8F3D jsr _lcdshow1
8C8D A7 02 aiS #2
8C8F 95 tSX
8C90 A7 03 aiS #3
8C92 81 rts
_cancel:
8C93 B6 B4 ldA 0xFFFFFFB4
8C95 26 13 bne 0x8CAA
8C97 A6 01 ldA #1
8C99 B7 B4 stA 0xFFFFFFB4
8C9B 3F B2 clr 0xFFFFFFB2
8C9D 11 02 Bclr 0,0x02
8C9F 13 02 Bclr 1,0x02
8CA1 A6 0C ldA #12
8CA3 87 pshA
8CA4 CD 8FD8 jsr _Lcd_Command
8CA7 A7 01 aiS #1
8CA9 95 tSX
8CAA 81 rts
_reset:
8CAB 9B seI
8CAC A6 01 ldA #1
8CAE B7 B4 stA 0xFFFFFFB4
8CB0 3F B3 clr 0xFFFFFFB3
8CB2 3F B2 clr 0xFFFFFFB2
8CB4 A6 01 ldA #1
8CB6 B7 07 stA 0x07
8CB8 A6 01 ldA #1
8CBA B7 C5 stA 0xFFFFFFC5
8CBC 3F CF clr 0xFFFFFFCF
8CBE 3F D0 clr 0xFFFFFFD0
8CC0 3F CC clr 0xFFFFFFCC
8CC2 3F CD clr 0xFFFFFFCD
8CC4 3F CE clr 0xFFFFFFCE
8CC6 3F C7 clr 0xFFFFFFC7
8CC8 3F C6 clr 0xFFFFFFC6
8CCA 3F C9 clr 0xFFFFFFC9
8CCC 3F C8 clr 0xFFFFFFC8
8CCE 3F CB clr 0xFFFFFFCB
8CD0 3F CA clr 0xFFFFFFCA
8CD2 CD 8F86 jsr _LcdInit
8CD5 A6 4E ldA #78
8CD7 87 pshA
8CD8 A6 00 ldA #0
8CDA 87 pshA
8CDB CD 8E96 jsr _lcdshow
8CDE A7 02 aiS #2
8CE0 CD 901C jsr _KB_Init
8CE3 13 1A Bclr 1,0x1A
8CE5 CD 900B jsr _Timer1init
8CE8 95 tSX
8CE9 9A clI
8CEA 81 rts
_set:
8CEB A7 FE aiS #-2
8CED 95 tSX
8CEE 7F clr 0,X
8CEF E6 04 ldA 4,X
8CF1 E7 01 stA 1,X
8CF3 F6 ldA 0,X
8CF4 26 09 bne 0x8CFF
8CF6 E6 01 ldA 1,X
8CF8 A1 2A cmp #42
8CFA 26 03 bne 0x8CFF
8CFC CC 8D7F jmp 0x8D7F
8CFF E6 01 ldA 1,X
8D01 B7 41 stA *__r1
8D03 F6 ldA 0,X
8D04 B7 40 stA *__r0
8D06 55 40 ldHX *__r0
8D08 65 002A cpHX #0x002A
8D0B 95 tSX
8D0C 92 0C bgt 0x8D1A
8D0E F6 ldA 0,X
8D0F 26 06 bne 0x8D17
8D11 E6 01 ldA 1,X
8D13 A1 23 cmp #35
8D15 27 62 beq 0x8D79
8D17 CC 8D9D jmp 0x8D9D
8D1A F6 ldA 0,X
8D1B 26 06 bne 0x8D23
8D1D E6 01 ldA 1,X
8D1F A1 30 cmp #48
8D21 27 62 beq 0x8D85
8D23 F6 ldA 0,X
8D24 26 06 bne 0x8D2C
8D26 E6 01 ldA 1,X
8D28 A1 31 cmp #49
8D2A 27 65 beq 0x8D91
8D2C E6 01 ldA 1,X
8D2E B7 41 stA *__r1
8D30 F6 ldA 0,X
8D31 B7 40 stA *__r0
8D33 55 40 ldHX *__r0
8D35 65 0030 cpHX #0x0030
8D38 95 tSX
8D39 91 62 blt 0x8D9D
8D3B F6 ldA 0,X
8D3C 26 06 bne 0x8D44
8D3E E6 01 ldA 1,X
8D40 A1 41 cmp #65
8D42 27 1D beq 0x8D61
8D44 F6 ldA 0,X
8D45 26 06 bne 0x8D4D
8D47 E6 01 ldA 1,X
8D49 A1 42 cmp #66
8D4B 27 1A beq 0x8D67
8D4D F6 ldA 0,X
8D4E 26 06 bne 0x8D56
8D50 E6 01 ldA 1,X
8D52 A1 43 cmp #67
8D54 27 17 beq 0x8D6D
8D56 F6 ldA 0,X
8D57 26 06 bne 0x8D5F
8D59 E6 01 ldA 1,X
8D5B A1 44 cmp #68
8D5D 27 14 beq 0x8D73
8D5F 20 3C bra 0x8D9D
8D61 CD 84CA jsr _shilfL
8D64 95 tSX
8D65 20 44 bra 0x8DAB
8D67 CD 8512 jsr _shilfR
8D6A 95 tSX
8D6B 20 3E bra 0x8DAB
8D6D CD 85BA jsr _sastimer
8D70 95 tSX
8D71 20 38 bra 0x8DAB
8D73 CD 8605 jsr _settimer
8D76 95 tSX
8D77 20 32 bra 0x8DAB
8D79 CD 86F9 jsr _ok
8D7C 95 tSX
8D7D 20 2C bra 0x8DAB
8D7F CD 8C93 jsr _cancel
8D82 95 tSX
8D83 20 26 bra 0x8DAB
8D85 B6 B4 ldA 0xFFFFFFB4
8D87 A1 01 cmp #1
8D89 26 06 bne 0x8D91
8D8B CD 8558 jsr _settime
8D8E 95 tSX
8D8F 20 1A bra 0x8DAB
8D91 B6 B4 ldA 0xFFFFFFB4
8D93 A1 01 cmp #1
8D95 26 06 bne 0x8D9D
8D97 CD 8CAB jsr _reset
8D9A 95 tSX
8D9B 20 0E bra 0x8DAB
8D9D 3F 40 clr *__r0
8D9F E6 04 ldA 4,X
8DA1 87 pshA
8DA2 B6 40 ldA *__r0
8DA4 87 pshA
8DA5 CD 88D4 jsr _input
8DA8 A7 02 aiS #2
8DAA 95 tSX
8DAB A7 02 aiS #2
8DAD 81 rts
_isrDummy:
8DAE 8B pshH
8DAF 8A pulH
8DB0 80 rti
_isrTIMER1:
8DB1 8B pshH
8DB2 B6 40 ldA *__r0
8DB4 87 pshA
8DB5 B6 41 ldA *__r1
8DB7 87 pshA
8DB8 B6 42 ldA *__r2
8DBA 87 pshA
8DBB B6 43 ldA *__r3
8DBD 87 pshA
8DBE B6 44 ldA *__r4
8DC0 87 pshA
8DC1 B6 45 ldA *__r5
8DC3 87 pshA
8DC4 B6 46 ldA *__r6
8DC6 87 pshA
8DC7 B6 47 ldA *__r7
8DC9 87 pshA
8DCA B6 48 ldA *__r8
8DCC 87 pshA
8DCD B6 49 ldA *__r9
8DCF 87 pshA
8DD0 B6 4A ldA *__r10
8DD2 87 pshA
8DD3 B6 4B ldA *__r11
8DD5 87 pshA
8DD6 B6 4C ldA *__rhi
8DD8 87 pshA
8DD9 B6 4D ldA *__rlo
8DDB 87 pshA
8DDC 9B seI
8DDD 1F 20 Bclr 7,0x20
8DDF CD 820D jsr _addtime
8DE2 CD 827D jsr _displaytime
8DE5 95 tSX
8DE6 9A clI
8DE7 86 pulA
8DE8 B7 4D stA *__rlo
8DEA 86 pulA
8DEB B7 4C stA *__rhi
8DED 86 pulA
8DEE B7 4B stA *__r11
8DF0 86 pulA
8DF1 B7 4A stA *__r10
8DF3 86 pulA
8DF4 B7 49 stA *__r9
8DF6 86 pulA
8DF7 B7 48 stA *__r8
8DF9 86 pulA
8DFA B7 47 stA *__r7
8DFC 86 pulA
8DFD B7 46 stA *__r6
8DFF 86 pulA
8E00 B7 45 stA *__r5
8E02 86 pulA
8E03 B7 44 stA *__r4
8E05 86 pulA
8E06 B7 43 stA *__r3
8E08 86 pulA
8E09 B7 42 stA *__r2
8E0B 86 pulA
8E0C B7 41 stA *__r1
8E0E 86 pulA
8E0F B7 40 stA *__r0
8E11 8A pulH
8E12 80 rti
_isrTIMER2:
8E13 33 C5 com 0xFFFFFFC5
8E15 4E C503 mov 0xFFFFFFC5,0x03
8E18 81 rts
_isrKBI:
8E19 8B pshH
8E1A B6 40 ldA *__r0
8E1C 87 pshA
8E1D B6 41 ldA *__r1
8E1F 87 pshA
8E20 B6 42 ldA *__r2
8E22 87 pshA
8E23 B6 43 ldA *__r3
8E25 87 pshA
8E26 B6 44 ldA *__r4
8E28 87 pshA
8E29 B6 45 ldA *__r5
8E2B 87 pshA
8E2C B6 46 ldA *__r6
8E2E 87 pshA
8E2F B6 47 ldA *__r7
8E31 87 pshA
8E32 B6 48 ldA *__r8
8E34 87 pshA
8E35 B6 49 ldA *__r9
8E37 87 pshA
8E38 B6 4A ldA *__r10
8E3A 87 pshA
8E3B B6 4B ldA *__r11
8E3D 87 pshA
8E3E B6 4C ldA *__rhi
8E40 87 pshA
8E41 B6 4D ldA *__rlo
8E43 87 pshA
8E44 A7 FF aiS #-1
8E46 95 tSX
8E47 9B seI
8E48 12 1A Bset 1,0x1A
8E4A CD 9031 jsr _KB_Scan
8E4D 95 tSX
8E4E B7 41 stA *__r1
8E50 F7 stA 0,X
8E51 87 pshA
8E52 CD 9078 jsr _KB_Def
8E55 A7 01 aiS #1
8E57 95 tSX
8E58 B7 41 stA *__r1
8E5A F7 stA 0,X
8E5B 87 pshA
8E5C CD 8CEB jsr _set
8E5F A7 01 aiS #1
8E61 9A clI
8E62 CD 901C jsr _KB_Init
8E65 95 tSX
8E66 13 1A Bclr 1,0x1A
8E68 A7 01 aiS #1
8E6A 86 pulA
8E6B B7 4D stA *__rlo
8E6D 86 pulA
8E6E B7 4C stA *__rhi
8E70 86 pulA
8E71 B7 4B stA *__r11
8E73 86 pulA
8E74 B7 4A stA *__r10
8E76 86 pulA
8E77 B7 49 stA *__r9
8E79 86 pulA
8E7A B7 48 stA *__r8
8E7C 86 pulA
8E7D B7 47 stA *__r7
8E7F 86 pulA
8E80 B7 46 stA *__r6
8E82 86 pulA
8E83 B7 45 stA *__r5
8E85 86 pulA
8E86 B7 44 stA *__r4
8E88 86 pulA
8E89 B7 43 stA *__r3
8E8B 86 pulA
8E8C B7 42 stA *__r2
8E8E 86 pulA
8E8F B7 41 stA *__r1
8E91 86 pulA
8E92 B7 40 stA *__r0
8E94 8A pulH
8E95 80 rti
_lcdshow:
8E96 A7 FF aiS #-1
8E98 95 tSX
8E99 7F clr 0,X
8E9A 11 02 Bclr 0,0x02
8E9C 13 02 Bclr 1,0x02
8E9E A6 80 ldA #-128
8EA0 87 pshA
8EA1 CD 8FD8 jsr _Lcd_Command
8EA4 A7 01 aiS #1
8EA6 95 tSX
8EA7 10 02 Bset 0,0x02
8EA9 13 02 Bclr 1,0x02
8EAB 20 18 bra 0x8EC5
8EAD 3F 40 clr *__r0
8EAF F6 ldA 0,X
8EB0 EB 04 add 4,X
8EB2 B7 41 stA *__r1
8EB4 B6 40 ldA *__r0
8EB6 E9 03 adc 3,X
8EB8 B7 40 stA *__r0
8EBA 55 40 ldHX *__r0
8EBC F6 ldA 0,X
8EBD 87 pshA
8EBE CD 8FD8 jsr _Lcd_Command
8EC1 A7 01 aiS #1
8EC3 95 tSX
8EC4 7C inc 0,X
8EC5 3F 40 clr *__r0
8EC7 F6 ldA 0,X
8EC8 EB 04 add 4,X
8ECA B7 41 stA *__r1
8ECC B6 40 ldA *__r0
8ECE E9 03 adc 3,X
8ED0 B7 40 stA *__r0
8ED2 55 40 ldHX *__r0
8ED4 F6 ldA 0,X
8ED5 95 tSX
8ED6 A1 45 cmp #69
8ED8 27 05 beq 0x8EDF
8EDA F6 ldA 0,X
8EDB A1 10 cmp #16
8EDD 25 CE bcs 0x8EAD
8EDF 3F 40 clr *__r0
8EE1 F6 ldA 0,X
8EE2 EB 04 add 4,X
8EE4 B7 41 stA *__r1
8EE6 B6 40 ldA *__r0
8EE8 E9 03 adc 3,X
8EEA B7 40 stA *__r0
8EEC 55 40 ldHX *__r0
8EEE F6 ldA 0,X
8EEF 95 tSX
8EF0 A1 45 cmp #69
8EF2 26 01 bne 0x8EF5
8EF4 7C inc 0,X
8EF5 11 02 Bclr 0,0x02
8EF7 13 02 Bclr 1,0x02
8EF9 A6 C0 ldA #-64
8EFB 87 pshA
8EFC CD 8FD8 jsr _Lcd_Command
8EFF A7 01 aiS #1
8F01 95 tSX
8F02 10 02 Bset 0,0x02
8F04 13 02 Bclr 1,0x02
8F06 20 18 bra 0x8F20
8F08 3F 40 clr *__r0
8F0A F6 ldA 0,X
8F0B EB 04 add 4,X
8F0D B7 41 stA *__r1
8F0F B6 40 ldA *__r0
8F11 E9 03 adc 3,X
8F13 B7 40 stA *__r0
8F15 55 40 ldHX *__r0
8F17 F6 ldA 0,X
8F18 87 pshA
8F19 CD 8FD8 jsr _Lcd_Command
8F1C A7 01 aiS #1
8F1E 95 tSX
8F1F 7C inc 0,X
8F20 3F 40 clr *__r0
8F22 F6 ldA 0,X
8F23 EB 04 add 4,X
8F25 B7 41
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -