⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 clock.lst

📁 基于HC908GP32的时钟程序
💻 LST
📖 第 1 页 / 共 5 页
字号:
NO DEBUG INFORMATION AVAILABLE!
__text_start:
__start:
    803D 45 0240      ldHX	#0x0240
    8040 94           tXS	
    8041 CD 8072      jsr	__HC08Setup
    8044 45 0051      ldHX	#0x0051
    8047 65 006F      cpHX	#0x006F
    804A 27 06        beq	0x8052
    804C 6F 00        clr	0,X
    804E AF 01        aiX	#1
    8050 20 F5        bra	0x8047
    8052 45 004F      ldHX	#0x004F
    8055 94           tXS	
    8056 45 803A      ldHX	#0x803A
    8059 65 803D      cpHX	#0x803D
    805C 27 0B        beq	0x8069
    805E E6 00        ldA	0,X
    8060 9EE7 00      stA	0,S
    8063 AF 01        aiX	#1
    8065 A7 01        aiS	#1
    8067 20 F0        bra	0x8059
    8069 45 0240      ldHX	#0x0240
    806C 94           tXS	
    806D CD 80B2      jsr	_main
_exit:
    8070 20 FE        bra	0x8070
__HC08Setup:
    8072 A6 01        ldA	#1
    8074 B7 1E        stA	0x1E
    8076 A6 3D        ldA	#61
    8078 B7 1F        stA	0x1F
    807A 3F 36        clr	0x36
    807C A6 01        ldA	#1
    807E B7 36        stA	0x36
    8080 A6 01        ldA	#1
    8082 B7 38        stA	0x38
    8084 A6 2C        ldA	#44
    8086 B7 39        stA	0x39
    8088 A6 80        ldA	#-128
    808A B7 3A        stA	0x3A
    808C A6 01        ldA	#1
    808E B7 3B        stA	0x3B
    8090 1A 36        Bset	5,0x36
    8092 1E 37        Bset	7,0x37
    8094 18 36        Bset	4,0x36
    8096 81           rts	
_delay:
    8097 A7 FE        aiS	#-2
    8099 95           tSX	
    809A 6F 01        clr	1,X
    809C 20 02        bra	0x80A0
    809E 6C 01        inc	1,X
    80A0 E6 01        ldA	1,X
    80A2 A1 C8        cmp	#-56
    80A4 25 F8        bcs	0x809E
    80A6 7F           clr	0,X
    80A7 20 01        bra	0x80AA
    80A9 7C           inc	0,X
    80AA F6           ldA	0,X
    80AB A1 DC        cmp	#-36
    80AD 25 FA        bcs	0x80A9
    80AF A7 02        aiS	#2
    80B1 81           rts	
_main:
    80B2 A7 FB        aiS	#-5
    80B4 95           tSX	
    80B5 9B           seI	
    80B6 CD 84FC      jsr	_Timer1init
    80B9 CD 8D75      jsr	_KB_Init
    80BC 95           tSX	
    80BD 13 1A        Bclr	1,0x1A
    80BF 9A           clI	
    80C0 A6 02        ldA	#2
    80C2 B7 53        stA	*_alarm
    80C4 A6 02        ldA	#2
    80C6 B7 61        stA	*_time
    80C8 3F 54        clr	*_alarm+1
    80CA 3F 62        clr	*_time+1
    80CC 3F 55        clr	*_alarm+2
    80CE 3F 63        clr	*_time+2
    80D0 A6 07        ldA	#7
    80D2 B7 56        stA	*_alarm+3
    80D4 A6 07        ldA	#7
    80D6 B7 64        stA	*_time+3
    80D8 3F 57        clr	0x57
    80DA 3F 65        clr	0x65
    80DC A6 06        ldA	#6
    80DE B7 58        stA	0x58
    80E0 A6 06        ldA	#6
    80E2 B7 66        stA	0x66
    80E4 3F 59        clr	0x59
    80E6 3F 67        clr	0x67
    80E8 A6 06        ldA	#6
    80EA B7 5A        stA	0x5A
    80EC A6 06        ldA	#6
    80EE B7 68        stA	0x68
    80F0 3F 69        clr	0x69
    80F2 3F 5B        clr	0x5B
    80F4 A6 05        ldA	#5
    80F6 B7 6A        stA	0x6A
    80F8 A6 05        ldA	#5
    80FA B7 5C        stA	0x5C
    80FC A6 05        ldA	#5
    80FE B7 6B        stA	0x6B
    8100 A6 05        ldA	#5
    8102 B7 5D        stA	0x5D
    8104 A6 09        ldA	#9
    8106 B7 6C        stA	0x6C
    8108 A6 09        ldA	#9
    810A B7 5E        stA	0x5E
    810C A6 03        ldA	#3
    810E B7 6D        stA	0x6D
    8110 A6 04        ldA	#4
    8112 B7 5F        stA	0x5F
    8114 3F 6E        clr	0x6E
    8116 3F 60        clr	0x60
    8118 B6 6E        ldA	0x6E
    811A F7           stA	0,X
    811B A6 FF        ldA	#-1
    811D B7 06        stA	0x06
    811F CC 83C3      jmp	0x83C3
    8122 B6 6E        ldA	0x6E
    8124 E7 01        stA	1,X
    8126 F6           ldA	0,X
    8127 E1 01        cmp	1,X
    8129 27 07        beq	0x8132
    812B CD 850D      jsr	_Lcdshowtime
    812E 95           tSX	
    812F E6 01        ldA	1,X
    8131 F7           stA	0,X
    8132 B6 52        ldA	*_Key
    8134 A1 43        cmp	#67
    8136 26 0C        bne	0x8144
    8138 3C 50        inc	*__rlo+3
    813A A6 01        ldA	#1
    813C B7 50        stA	*__rlo+3
    813E A6 01        ldA	#1
    8140 27 02        beq	0x8144
    8142 3F 50        clr	*__rlo+3
    8144 B6 6D        ldA	0x6D
    8146 26 31        bne	0x8179
    8148 B6 6C        ldA	0x6C
    814A 26 2D        bne	0x8179
    814C B6 6B        ldA	0x6B
    814E 26 29        bne	0x8179
    8150 B6 69        ldA	0x69
    8152 AE 0A        ldX	#10
    8154 42           mul	
    8155 95           tSX	
    8156 B7 40        stA	*__r0
    8158 B6 6A        ldA	0x6A
    815A BB 40        add	*__r0
    815C E7 02        stA	2,X
    815E 6F 03        clr	3,X
    8160 20 11        bra	0x8173
    8162 12 02        Bset	1,0x02
    8164 CD 8097      jsr	_delay
    8167 B6 02        ldA	0x02
    8169 AA FD        orA	#-3
    816B B7 02        stA	0x02
    816D CD 8097      jsr	_delay
    8170 95           tSX	
    8171 6C 03        inc	3,X
    8173 E6 03        ldA	3,X
    8175 E1 02        cmp	2,X
    8177 25 E9        bcs	0x8162
    8179 B6 6E        ldA	0x6E
    817B B1 60        cmp	0x60
    817D 26 3F        bne	0x81BE
    817F B6 6D        ldA	0x6D
    8181 B1 5F        cmp	0x5F
    8183 26 39        bne	0x81BE
    8185 B6 6C        ldA	0x6C
    8187 B1 5E        cmp	0x5E
    8189 26 33        bne	0x81BE
    818B B6 6B        ldA	0x6B
    818D B1 5D        cmp	0x5D
    818F 26 2D        bne	0x81BE
    8191 B6 6A        ldA	0x6A
    8193 B1 5C        cmp	0x5C
    8195 26 27        bne	0x81BE
    8197 B6 69        ldA	0x69
    8199 B1 5B        cmp	0x5B
    819B 26 21        bne	0x81BE
    819D B6 50        ldA	*__rlo+3
    819F A1 01        cmp	#1
    81A1 26 1B        bne	0x81BE
    81A3 6F 03        clr	3,X
    81A5 20 11        bra	0x81B8
    81A7 12 02        Bset	1,0x02
    81A9 CD 8097      jsr	_delay
    81AC B6 02        ldA	0x02
    81AE AA FD        orA	#-3
    81B0 B7 02        stA	0x02
    81B2 CD 8097      jsr	_delay
    81B5 95           tSX	
    81B6 6C 03        inc	3,X
    81B8 E6 03        ldA	3,X
    81BA A1 02        cmp	#2
    81BC 23 E9        bls	0x81A7
    81BE B6 52        ldA	*_Key
    81C0 A1 41        cmp	#65
    81C2 27 03        beq	0x81C7
    81C4 CC 83C3      jmp	0x83C3
    81C7 CD 88BA      jsr	_LcdShowMenu
    81CA 95           tSX	
    81CB 3F 52        clr	*_Key
    81CD CC 83C0      jmp	0x83C0
    81D0 B6 52        ldA	*_Key
    81D2 A1 42        cmp	#66
    81D4 26 05        bne	0x81DB
    81D6 3F 52        clr	*_Key
    81D8 CC 83C3      jmp	0x83C3
    81DB B6 52        ldA	*_Key
    81DD A1 31        cmp	#49
    81DF 27 03        beq	0x81E4
    81E1 CC 82C7      jmp	0x82C7
    81E4 CD 850D      jsr	_Lcdshowtime
    81E7 CD 88AC      jsr	_LcdShowCursor
    81EA A6 04        ldA	#4
    81EC 87           pshA	
    81ED A6 01        ldA	#1
    81EF 87           pshA	
    81F0 CD 8883      jsr	_MoveCursor
    81F3 A7 02        aiS	#2
    81F5 95           tSX	
    81F6 3F 52        clr	*_Key
    81F8 CC 82C4      jmp	0x82C4
    81FB B6 52        ldA	*_Key
    81FD A1 23        cmp	#35
    81FF 26 44        bne	0x8245
    8201 3C 4E        inc	*__rlo+1
    8203 B6 4F        ldA	*__rlo+2
    8205 AE 02        ldX	#2
    8207 8C           clrH	
    8208 52           div	
    8209 8B           pshH	
    820A 86           pulA	
    820B 95           tSX	
    820C 4D           tstA	
    820D 26 1A        bne	0x8229
    820F B6 4E        ldA	*__rlo+1
    8211 A1 09        cmp	#9
    8213 23 02        bls	0x8217
    8215 3F 4E        clr	*__rlo+1
    8217 B6 4E        ldA	*__rlo+1
    8219 AB 04        add	#4
    821B 87           pshA	
    821C B6 4F        ldA	*__rlo+2
    821E AB 01        add	#1
    8220 87           pshA	
    8221 CD 8883      jsr	_MoveCursor
    8224 A7 02        aiS	#2
    8226 95           tSX	
    8227 20 1A        bra	0x8243
    8229 B6 4E        ldA	*__rlo+1
    822B A1 08        cmp	#8
    822D 23 04        bls	0x8233
    822F A6 01        ldA	#1
    8231 B7 4E        stA	*__rlo+1
    8233 B6 4E        ldA	*__rlo+1
    8235 AB 04        add	#4
    8237 87           pshA	
    8238 B6 4F        ldA	*__rlo+2
    823A AB 01        add	#1
    823C 87           pshA	
    823D CD 8883      jsr	_MoveCursor
    8240 A7 02        aiS	#2
    8242 95           tSX	
    8243 3F 52        clr	*_Key
    8245 B6 52        ldA	*_Key
    8247 A1 2A        cmp	#42
    8249 26 1C        bne	0x8267
    824B 3C 4F        inc	*__rlo+2
    824D B6 4F        ldA	*__rlo+2
    824F A1 01        cmp	#1
    8251 23 02        bls	0x8255
    8253 3F 4F        clr	*__rlo+2
    8255 B6 4E        ldA	*__rlo+1
    8257 AB 04        add	#4
    8259 87           pshA	
    825A B6 4F        ldA	*__rlo+2
    825C AB 01        add	#1
    825E 87           pshA	
    825F CD 8883      jsr	_MoveCursor
    8262 A7 02        aiS	#2
    8264 95           tSX	
    8265 3F 52        clr	*_Key
    8267 B6 52        ldA	*_Key
    8269 A1 42        cmp	#66
    826B 26 05        bne	0x8272
    826D 3F 52        clr	*_Key
    826F CC 81C7      jmp	0x81C7
    8272 B6 52        ldA	*_Key
    8274 A1 44        cmp	#68
    8276 26 05        bne	0x827D
    8278 3F 52        clr	*_Key
    827A CC 83C3      jmp	0x83C3
    827D B6 52        ldA	*_Key
    827F 27 43        beq	0x82C4
    8281 B6 52        ldA	*_Key
    8283 87           pshA	
    8284 CD 8D44      jsr	_Discriminant
    8287 A7 01        aiS	#1
    8289 95           tSX	
    828A B7 41        stA	*__r1
    828C 27 36        beq	0x82C4
    828E B6 52        ldA	*_Key
    8290 A0 30        sub	#48
    8292 E7 04        stA	4,X
    8294 B6 4E        ldA	*__rlo+1
    8296 AB 04        add	#4
    8298 87           pshA	
    8299 B6 4F        ldA	*__rlo+2
    829B AB 01        add	#1
    829D 87           pshA	
    829E A6 61        ldA	#97
    82A0 87           pshA	
    82A1 A6 00        ldA	#0
    82A3 87           pshA	
    82A4 E6 04        ldA	4,X
    82A6 87           pshA	
    82A7 CD 8958      jsr	_Transmission
    82AA A7 05        aiS	#5
    82AC CD 850D      jsr	_Lcdshowtime
    82AF CD 88AC      jsr	_LcdShowCursor
    82B2 B6 4E        ldA	*__rlo+1
    82B4 AB 04        add	#4
    82B6 87           pshA	
    82B7 B6 4F        ldA	*__rlo+2
    82B9 AB 01        add	#1
    82BB 87           pshA	
    82BC CD 8883      jsr	_MoveCursor
    82BF A7 02        aiS	#2
    82C1 95           tSX	
    82C2 3F 52        clr	*_Key
    82C4 CC 81FB      jmp	0x81FB
    82C7 B6 52        ldA	*_Key
    82C9 A1 32        cmp	#50
    82CB 27 03        beq	0x82D0
    82CD CC 83C0      jmp	0x83C0
    82D0 CD 8672      jsr	_Lcdshowalarm
    82D3 CD 88AC      jsr	_LcdShowCursor
    82D6 A6 0C        ldA	#12
    82D8 87           pshA	
    82D9 A6 02        ldA	#2
    82DB 87           pshA	
    82DC CD 8883      jsr	_MoveCursor
    82DF A7 02        aiS	#2
    82E1 95           tSX	
    82E2 3F 52        clr	*_Key
    82E4 CC 83BD      jmp	0x83BD
    82E7 B6 52        ldA	*_Key
    82E9 A1 23        cmp	#35
    82EB 26 44        bne	0x8331
    82ED 3C 4E        inc	*__rlo+1
    82EF B6 4F        ldA	*__rlo+2
    82F1 AE 02        ldX	#2
    82F3 8C           clrH	
    82F4 52           div	
    82F5 8B           pshH	
    82F6 86           pulA	
    82F7 95           tSX	
    82F8 4D           tstA	
    82F9 26 1A        bne	0x8315
    82FB B6 4E        ldA	*__rlo+1
    82FD A1 09        cmp	#9
    82FF 23 02        bls	0x8303
    8301 3F 4E        clr	*__rlo+1
    8303 B6 4E        ldA	*__rlo+1
    8305 AB 04        add	#4
    8307 87           pshA	
    8308 B6 4F        ldA	*__rlo+2
    830A AB 01        add	#1
    830C 87           pshA	
    830D CD 8883      jsr	_MoveCursor
    8310 A7 02        aiS	#2
    8312 95           tSX	
    8313 20 1A        bra	0x832F
    8315 B6 4E        ldA	*__rlo+1
    8317 A1 08        cmp	#8
    8319 23 04        bls	0x831F
    831B A6 01        ldA	#1
    831D B7 4E        stA	*__rlo+1
    831F B6 4E        ldA	*__rlo+1
    8321 AB 04        add	#4
    8323 87           pshA	
    8324 B6 4F        ldA	*__rlo+2
    8326 AB 01        add	#1
    8328 87           pshA	
    8329 CD 8883      jsr	_MoveCursor
    832C A7 02        aiS	#2
    832E 95           tSX	
    832F 3F 52        clr	*_Key
    8331 B6 52        ldA	*_Key
    8333 A1 2A        cmp	#42
    8335 26 2A        bne	0x8361
    8337 3C 4F        inc	*__rlo+2
    8339 B6 4E        ldA	*__rlo+1
    833B 26 02        bne	0x833F

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -