h08sci_1.lst
来自「要用到开发工具SD-H08」· LST 代码 · 共 230 行
LST
230 行
NO DEBUG INFORMATION AVAILABLE!
__start:
__text_start:
8000 45 0240 ldHX #0x0240
8003 94 tXS
8004 CD 8035 jsr __HC08Setup
8007 45 0044 ldHX #0x0044
800A 65 0045 cpHX #0x0045
800D 27 06 beq 0x8015
800F 6F 00 clr 0,X
8011 AF 01 aiX #1
8013 20 F5 bra 0x800A
8015 45 0045 ldHX #0x0045
8018 94 tXS
8019 45 8000 ldHX #0x8000
801C 65 8000 cpHX #0x8000
801F 27 0B beq 0x802C
8021 E6 00 ldA 0,X
8023 9EE7 00 stA 0,S
8026 AF 01 aiX #1
8028 A7 01 aiS #1
802A 20 F0 bra 0x801C
802C 45 0240 ldHX #0x0240
802F 94 tXS
8030 CD 805A jsr _main
_exit:
8033 20 FE bra 0x8033
__HC08Setup:
8035 A6 01 ldA #1
8037 B7 1E stA 0x1E
8039 A6 3D ldA #61
803B B7 1F stA 0x1F
803D 3F 36 clr 0x36
803F A6 01 ldA #1
8041 B7 36 stA 0x36
8043 A6 01 ldA #1
8045 B7 38 stA 0x38
8047 A6 2C ldA #44
8049 B7 39 stA 0x39
804B A6 80 ldA #-128
804D B7 3A stA 0x3A
804F A6 01 ldA #1
8051 B7 3B stA 0x3B
8053 1A 36 Bset 5,0x36
8055 1E 37 Bset 7,0x37
8057 18 36 Bset 4,0x36
8059 81 rts
_main:
805A A7 FF aiS #-1
805C 95 tSX
805D CD 8089 jsr _SCIInit
8060 95 tSX
8061 20 21 bra 0x8084
8063 45 0044 ldHX #0x0044
8066 89 pshX
8067 8B pshH
8068 A6 01 ldA #1
806A 87 pshA
806B CD 8142 jsr _SCIReN
806E A7 03 aiS #3
8070 95 tSX
8071 B7 41 stA *__r1
8073 F7 stA 0,X
8074 26 0E bne 0x8084
8076 45 0044 ldHX #0x0044
8079 89 pshX
807A 8B pshH
807B A6 01 ldA #1
807D 87 pshA
807E CD 80A5 jsr _SCISendN
8081 A7 03 aiS #3
8083 95 tSX
8084 20 DD bra 0x8063
8086 A7 01 aiS #1
8088 81 rts
_SCIInit:
8089 A6 02 ldA #2
808B B7 19 stA 0x19
808D A6 40 ldA #64
808F B7 13 stA 0x13
8091 A6 0C ldA #12
8093 B7 14 stA 0x14
8095 81 rts
_SCISend1:
8096 95 tSX
8097 20 09 bra 0x80A2
8099 0F 1606 BRclr 7,0x16,0x80A2
809C E6 02 ldA 2,X
809E B7 18 stA 0x18
80A0 20 02 bra 0x80A4
80A2 20 F5 bra 0x8099
80A4 81 rts
_SCISendN:
80A5 A7 FE aiS #-2
80A7 95 tSX
80A8 6F 01 clr 1,X
80AA 7F clr 0,X
80AB 20 1F bra 0x80CC
80AD E6 01 ldA 1,X
80AF EB 06 add 6,X
80B1 B7 41 stA *__r1
80B3 F6 ldA 0,X
80B4 E9 05 adc 5,X
80B6 B7 40 stA *__r0
80B8 55 40 ldHX *__r0
80BA F6 ldA 0,X
80BB 87 pshA
80BC CD 8096 jsr _SCISend1
80BF A7 01 aiS #1
80C1 95 tSX
80C2 E6 01 ldA 1,X
80C4 AB 01 add #1
80C6 E7 01 stA 1,X
80C8 F6 ldA 0,X
80C9 A9 00 adc #0
80CB F7 stA 0,X
80CC 3F 40 clr *__r0
80CE E6 04 ldA 4,X
80D0 B7 41 stA *__r1
80D2 E6 01 ldA 1,X
80D4 B7 43 stA *__r3
80D6 F6 ldA 0,X
80D7 B7 42 stA *__r2
80D9 55 42 ldHX *__r2
80DB 75 40 cpHX *__r0
80DD 95 tSX
80DE 91 CD blt 0x80AD
80E0 A7 02 aiS #2
80E2 81 rts
_SCIRe1:
80E3 A7 FD aiS #-3
80E5 95 tSX
80E6 6F 02 clr 2,X
80E8 6F 01 clr 1,X
80EA 20 21 bra 0x810D
80EC 0B 1612 BRclr 5,0x16,0x8101
80EF B6 18 ldA 0x18
80F1 F7 stA 0,X
80F2 E6 06 ldA 6,X
80F4 B7 41 stA *__r1
80F6 E6 05 ldA 5,X
80F8 B7 40 stA *__r0
80FA 4F clrA
80FB 55 40 ldHX *__r0
80FD F7 stA 0,X
80FE 95 tSX
80FF 20 1C bra 0x811D
8101 E6 02 ldA 2,X
8103 AB 01 add #1
8105 E7 02 stA 2,X
8107 E6 01 ldA 1,X
8109 A9 00 adc #0
810B E7 01 stA 1,X
810D E6 02 ldA 2,X
810F B7 41 stA *__r1
8111 E6 01 ldA 1,X
8113 B7 40 stA *__r0
8115 55 40 ldHX *__r0
8117 65 FBBB cpHX #0xFBBB
811A 95 tSX
811B 25 CF bcs 0x80EC
811D E6 02 ldA 2,X
811F B7 41 stA *__r1
8121 E6 01 ldA 1,X
8123 B7 40 stA *__r0
8125 55 40 ldHX *__r0
8127 65 FBBB cpHX #0xFBBB
812A 95 tSX
812B 25 11 bcs 0x813E
812D A6 FF ldA #-1
812F F7 stA 0,X
8130 E6 06 ldA 6,X
8132 B7 41 stA *__r1
8134 E6 05 ldA 5,X
8136 B7 40 stA *__r0
8138 A6 01 ldA #1
813A 55 40 ldHX *__r0
813C F7 stA 0,X
813D 95 tSX
813E F6 ldA 0,X
813F A7 03 aiS #3
8141 81 rts
_SCIReN:
8142 A7 FD aiS #-3
8144 95 tSX
8145 6F 02 clr 2,X
8147 6F 01 clr 1,X
8149 20 31 bra 0x817C
814B 89 pshX
814C 8B pshH
814D CD 80E3 jsr _SCIRe1
8150 A7 02 aiS #2
8152 95 tSX
8153 B7 41 stA *__r1
8155 E6 02 ldA 2,X
8157 EB 07 add 7,X
8159 B7 43 stA *__r3
815B E6 01 ldA 1,X
815D E9 06 adc 6,X
815F B7 42 stA *__r2
8161 B6 41 ldA *__r1
8163 55 42 ldHX *__r2
8165 F7 stA 0,X
8166 95 tSX
8167 F6 ldA 0,X
8168 A1 01 cmp #1
816A 26 04 bne 0x8170
816C A6 01 ldA #1
816E 20 22 bra 0x8192
8170 E6 02 ldA 2,X
8172 AB 01 add #1
8174 E7 02 stA 2,X
8176 E6 01 ldA 1,X
8178 A9 00 adc #0
817A E7 01 stA 1,X
817C 3F 40 clr *__r0
817E E6 05 ldA 5,X
8180 B7 41 stA *__r1
8182 E6 02 ldA 2,X
8184 B7 43 stA *__r3
8186 E6 01 ldA 1,X
8188 B7 42 stA *__r2
818A 55 42 ldHX *__r2
818C 75 40 cpHX *__r0
818E 95 tSX
818F 91 BA blt 0x814B
8191 4F clrA
8192 A7 03 aiS #3
8194 81 rts
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?