📄 clock.lst
字号:
8B9E 55 40 ldHX *__r0
8BA0 F7 stA 0,X
8BA1 95 tSX
8BA2 E6 07 ldA 7,X
8BA4 A1 02 cmp #2
8BA6 27 03 beq 0x8BAB
8BA8 CC 8D41 jmp 0x8D41
8BAB 7F clr 0,X
8BAC E6 08 ldA 8,X
8BAE E7 01 stA 1,X
8BB0 F6 ldA 0,X
8BB1 26 06 bne 0x8BB9
8BB3 E6 01 ldA 1,X
8BB5 A1 05 cmp #5
8BB7 27 3F beq 0x8BF8
8BB9 F6 ldA 0,X
8BBA 26 09 bne 0x8BC5
8BBC E6 01 ldA 1,X
8BBE A1 06 cmp #6
8BC0 26 03 bne 0x8BC5
8BC2 CC 8C35 jmp 0x8C35
8BC5 F6 ldA 0,X
8BC6 26 09 bne 0x8BD1
8BC8 E6 01 ldA 1,X
8BCA A1 08 cmp #8
8BCC 26 03 bne 0x8BD1
8BCE CC 8CA9 jmp 0x8CA9
8BD1 F6 ldA 0,X
8BD2 26 09 bne 0x8BDD
8BD4 E6 01 ldA 1,X
8BD6 A1 09 cmp #9
8BD8 26 03 bne 0x8BDD
8BDA CC 8CE2 jmp 0x8CE2
8BDD F6 ldA 0,X
8BDE 26 09 bne 0x8BE9
8BE0 E6 01 ldA 1,X
8BE2 A1 0B cmp #11
8BE4 26 03 bne 0x8BE9
8BE6 CC 8CF6 jmp 0x8CF6
8BE9 F6 ldA 0,X
8BEA 26 09 bne 0x8BF5
8BEC E6 01 ldA 1,X
8BEE A1 0C cmp #12
8BF0 26 03 bne 0x8BF5
8BF2 CC 8D2F jmp 0x8D2F
8BF5 CC 8D41 jmp 0x8D41
8BF8 E6 06 ldA 6,X
8BFA AB 08 add #8
8BFC B7 41 stA *__r1
8BFE E6 05 ldA 5,X
8C00 A9 00 adc #0
8C02 B7 40 stA *__r0
8C04 E6 04 ldA 4,X
8C06 55 40 ldHX *__r0
8C08 F7 stA 0,X
8C09 95 tSX
8C0A E6 06 ldA 6,X
8C0C AB 08 add #8
8C0E B7 41 stA *__r1
8C10 E6 05 ldA 5,X
8C12 A9 00 adc #0
8C14 B7 40 stA *__r0
8C16 55 40 ldHX *__r0
8C18 F6 ldA 0,X
8C19 95 tSX
8C1A A1 02 cmp #2
8C1C 22 03 bhi 0x8C21
8C1E CC 8D41 jmp 0x8D41
8C21 E6 06 ldA 6,X
8C23 AB 08 add #8
8C25 B7 41 stA *__r1
8C27 E6 05 ldA 5,X
8C29 A9 00 adc #0
8C2B B7 40 stA *__r0
8C2D 4F clrA
8C2E 55 40 ldHX *__r0
8C30 F7 stA 0,X
8C31 95 tSX
8C32 CC 8D41 jmp 0x8D41
8C35 E6 06 ldA 6,X
8C37 AB 09 add #9
8C39 B7 41 stA *__r1
8C3B E6 05 ldA 5,X
8C3D A9 00 adc #0
8C3F B7 40 stA *__r0
8C41 E6 04 ldA 4,X
8C43 55 40 ldHX *__r0
8C45 F7 stA 0,X
8C46 95 tSX
8C47 E6 06 ldA 6,X
8C49 AB 08 add #8
8C4B B7 41 stA *__r1
8C4D E6 05 ldA 5,X
8C4F A9 00 adc #0
8C51 B7 40 stA *__r0
8C53 55 40 ldHX *__r0
8C55 F6 ldA 0,X
8C56 95 tSX
8C57 A1 02 cmp #2
8C59 26 39 bne 0x8C94
8C5B E6 06 ldA 6,X
8C5D AB 09 add #9
8C5F B7 41 stA *__r1
8C61 E6 05 ldA 5,X
8C63 A9 00 adc #0
8C65 B7 40 stA *__r0
8C67 55 40 ldHX *__r0
8C69 F6 ldA 0,X
8C6A 95 tSX
8C6B A1 03 cmp #3
8C6D 23 25 bls 0x8C94
8C6F E6 06 ldA 6,X
8C71 AB 08 add #8
8C73 B7 41 stA *__r1
8C75 E6 05 ldA 5,X
8C77 A9 00 adc #0
8C79 B7 40 stA *__r0
8C7B 4F clrA
8C7C 55 40 ldHX *__r0
8C7E F7 stA 0,X
8C7F 95 tSX
8C80 E6 06 ldA 6,X
8C82 AB 09 add #9
8C84 B7 41 stA *__r1
8C86 E6 05 ldA 5,X
8C88 A9 00 adc #0
8C8A B7 40 stA *__r0
8C8C 4F clrA
8C8D 55 40 ldHX *__r0
8C8F F7 stA 0,X
8C90 95 tSX
8C91 CC 8D41 jmp 0x8D41
8C94 E6 06 ldA 6,X
8C96 AB 09 add #9
8C98 B7 41 stA *__r1
8C9A E6 05 ldA 5,X
8C9C A9 00 adc #0
8C9E B7 40 stA *__r0
8CA0 E6 04 ldA 4,X
8CA2 55 40 ldHX *__r0
8CA4 F7 stA 0,X
8CA5 95 tSX
8CA6 CC 8D41 jmp 0x8D41
8CA9 E6 06 ldA 6,X
8CAB AB 0A add #10
8CAD B7 41 stA *__r1
8CAF E6 05 ldA 5,X
8CB1 A9 00 adc #0
8CB3 B7 40 stA *__r0
8CB5 E6 04 ldA 4,X
8CB7 55 40 ldHX *__r0
8CB9 F7 stA 0,X
8CBA 95 tSX
8CBB E6 06 ldA 6,X
8CBD AB 0A add #10
8CBF B7 41 stA *__r1
8CC1 E6 05 ldA 5,X
8CC3 A9 00 adc #0
8CC5 B7 40 stA *__r0
8CC7 55 40 ldHX *__r0
8CC9 F6 ldA 0,X
8CCA 95 tSX
8CCB A1 05 cmp #5
8CCD 23 72 bls 0x8D41
8CCF E6 06 ldA 6,X
8CD1 AB 0A add #10
8CD3 B7 41 stA *__r1
8CD5 E6 05 ldA 5,X
8CD7 A9 00 adc #0
8CD9 B7 40 stA *__r0
8CDB 4F clrA
8CDC 55 40 ldHX *__r0
8CDE F7 stA 0,X
8CDF 95 tSX
8CE0 20 5F bra 0x8D41
8CE2 E6 06 ldA 6,X
8CE4 AB 0B add #11
8CE6 B7 41 stA *__r1
8CE8 E6 05 ldA 5,X
8CEA A9 00 adc #0
8CEC B7 40 stA *__r0
8CEE E6 04 ldA 4,X
8CF0 55 40 ldHX *__r0
8CF2 F7 stA 0,X
8CF3 95 tSX
8CF4 20 4B bra 0x8D41
8CF6 E6 06 ldA 6,X
8CF8 AB 0C add #12
8CFA B7 41 stA *__r1
8CFC E6 05 ldA 5,X
8CFE A9 00 adc #0
8D00 B7 40 stA *__r0
8D02 E6 04 ldA 4,X
8D04 55 40 ldHX *__r0
8D06 F7 stA 0,X
8D07 95 tSX
8D08 E6 06 ldA 6,X
8D0A AB 0C add #12
8D0C B7 41 stA *__r1
8D0E E6 05 ldA 5,X
8D10 A9 00 adc #0
8D12 B7 40 stA *__r0
8D14 55 40 ldHX *__r0
8D16 F6 ldA 0,X
8D17 95 tSX
8D18 A1 05 cmp #5
8D1A 23 25 bls 0x8D41
8D1C E6 06 ldA 6,X
8D1E AB 0C add #12
8D20 B7 41 stA *__r1
8D22 E6 05 ldA 5,X
8D24 A9 00 adc #0
8D26 B7 40 stA *__r0
8D28 4F clrA
8D29 55 40 ldHX *__r0
8D2B F7 stA 0,X
8D2C 95 tSX
8D2D 20 12 bra 0x8D41
8D2F E6 06 ldA 6,X
8D31 AB 0D add #13
8D33 B7 41 stA *__r1
8D35 E6 05 ldA 5,X
8D37 A9 00 adc #0
8D39 B7 40 stA *__r0
8D3B E6 04 ldA 4,X
8D3D 55 40 ldHX *__r0
8D3F F7 stA 0,X
8D40 95 tSX
8D41 A7 02 aiS #2
8D43 81 rts
_Discriminant:
8D44 95 tSX
8D45 E6 02 ldA 2,X
8D47 A1 31 cmp #49
8D49 27 24 beq 0x8D6F
8D4B A1 32 cmp #50
8D4D 27 20 beq 0x8D6F
8D4F A1 33 cmp #51
8D51 27 1C beq 0x8D6F
8D53 A1 34 cmp #52
8D55 27 18 beq 0x8D6F
8D57 A1 35 cmp #53
8D59 27 14 beq 0x8D6F
8D5B A1 36 cmp #54
8D5D 27 10 beq 0x8D6F
8D5F A1 37 cmp #55
8D61 27 0C beq 0x8D6F
8D63 A1 38 cmp #56
8D65 27 08 beq 0x8D6F
8D67 A1 39 cmp #57
8D69 27 04 beq 0x8D6F
8D6B A1 30 cmp #48
8D6D 26 04 bne 0x8D73
8D6F A6 01 ldA #1
8D71 20 01 bra 0x8D74
8D73 4F clrA
8D74 81 rts
_KB_Init:
8D75 3F 00 clr 0x00
8D77 A6 0F ldA #15
8D79 B7 04 stA 0x04
8D7B A6 F0 ldA #-16
8D7D B7 0D stA 0x0D
8D7F 12 1A Bset 1,0x1A
8D81 A6 F0 ldA #-16
8D83 B7 1B stA 0x1B
8D85 14 1A Bset 2,0x1A
8D87 81 rts
_KB_Scan:
8D88 A7 FD aiS #-3
8D8A 95 tSX
8D8B A6 FE ldA #-2
8D8D F7 stA 0,X
8D8E A6 01 ldA #1
8D90 E7 01 stA 1,X
8D92 20 26 bra 0x8DBA
8D94 B6 00 ldA 0x00
8D96 E7 02 stA 2,X
8D98 AA 0F orA #15
8D9A E7 02 stA 2,X
8D9C F4 and 0,X
8D9D B7 00 stA 0x00
8D9F 9D nop
8DA0 9D nop
8DA1 B6 00 ldA 0x00
8DA3 E7 02 stA 2,X
8DA5 A4 F0 and #-16
8DA7 E7 02 stA 2,X
8DA9 A1 F0 cmp #-16
8DAB 27 06 beq 0x8DB3
8DAD B6 00 ldA 0x00
8DAF E7 02 stA 2,X
8DB1 20 0D bra 0x8DC0
8DB3 F6 ldA 0,X
8DB4 48 lslA
8DB5 AA 01 orA #1
8DB7 F7 stA 0,X
8DB8 6C 01 inc 1,X
8DBA E6 01 ldA 1,X
8DBC A1 04 cmp #4
8DBE 23 D4 bls 0x8D94
8DC0 E6 01 ldA 1,X
8DC2 A1 05 cmp #5
8DC4 26 04 bne 0x8DCA
8DC6 A6 FF ldA #-1
8DC8 E7 02 stA 2,X
8DCA E6 02 ldA 2,X
8DCC A7 03 aiS #3
8DCE 81 rts
_KB_Def:
8DCF A7 FD aiS #-3
8DD1 95 tSX
8DD2 6F 01 clr 1,X
8DD4 20 3C bra 0x8E12
8DD6 3F 40 clr *__r0
8DD8 E6 01 ldA 1,X
8DDA AB 19 add #25
8DDC B7 41 stA *__r1
8DDE B6 40 ldA *__r0
8DE0 A9 80 adc #-128
8DE2 B7 40 stA *__r0
8DE4 55 40 ldHX *__r0
8DE6 F6 ldA 0,X
8DE7 95 tSX
8DE8 E7 02 stA 2,X
8DEA 26 05 bne 0x8DF1
8DEC A6 FF ldA #-1
8DEE F7 stA 0,X
8DEF 20 23 bra 0x8E14
8DF1 E6 02 ldA 2,X
8DF3 E1 05 cmp 5,X
8DF5 26 15 bne 0x8E0C
8DF7 3F 40 clr *__r0
8DF9 E6 01 ldA 1,X
8DFB AB 1A add #26
8DFD B7 41 stA *__r1
8DFF B6 40 ldA *__r0
8E01 A9 80 adc #-128
8E03 B7 40 stA *__r0
8E05 55 40 ldHX *__r0
8E07 F6 ldA 0,X
8E08 95 tSX
8E09 F7 stA 0,X
8E0A 20 08 bra 0x8E14
8E0C E6 01 ldA 1,X
8E0E AB 02 add #2
8E10 E7 01 stA 1,X
8E12 20 C2 bra 0x8DD6
8E14 F6 ldA 0,X
8E15 A7 03 aiS #3
8E17 81 rts
_GetKey:
8E18 A7 FF aiS #-1
8E1A 95 tSX
8E1B CD 8D88 jsr _KB_Scan
8E1E 95 tSX
8E1F B7 41 stA *__r1
8E21 F7 stA 0,X
8E22 87 pshA
8E23 CD 8DCF jsr _KB_Def
8E26 A7 01 aiS #1
8E28 95 tSX
8E29 B7 41 stA *__r1
8E2B F7 stA 0,X
8E2C A7 01 aiS #1
8E2E 81 rts
__asgnblk:
8E2F 35 4C stHX *__rhi
8E31 95 tSX
8E32 E6 02 ldA 2,X
8E34 B7 40 stA *__r0
8E36 E6 03 ldA 3,X
8E38 B7 41 stA *__r1
8E3A E6 04 ldA 4,X
8E3C B7 42 stA *__r2
8E3E E6 05 ldA 5,X
8E40 B7 43 stA *__r3
8E42 E6 06 ldA 6,X
8E44 B7 44 stA *__r4
8E46 E6 07 ldA 7,X
8E48 B7 45 stA *__r5
8E4A 3F 46 clr *__r6
8E4C 3F 47 clr *__r7
8E4E 55 46 ldHX *__r6
8E50 75 44 cpHX *__r4
8E52 27 16 beq 0x8E6A
8E54 AF 01 aiX #1
8E56 35 46 stHX *__r6
8E58 55 42 ldHX *__r2
8E5A E6 00 ldA 0,X
8E5C AF 01 aiX #1
8E5E 35 42 stHX *__r2
8E60 55 40 ldHX *__r0
8E62 E7 00 stA 0,X
8E64 AF 01 aiX #1
8E66 35 40 stHX *__r0
8E68 20 E4 bra 0x8E4E
8E6A 55 4C ldHX *__rhi
8E6C 81 rts
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -