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

📄 clock.lst

📁 摩托罗拉的时钟的原代码
💻 LST
📖 第 1 页 / 共 5 页
字号:
    8BF3 55 40        ldHX	*__r0
    8BF5 F7           stA	0,X
    8BF6 95           tSX	
    8BF7 A7 02        aiS	#2
    8BF9 81           rts	
_Discriminant:
    8BFA 95           tSX	
    8BFB E6 02        ldA	2,X
    8BFD A1 31        cmp	#49
    8BFF 27 24        beq	0x8C25
    8C01 A1 32        cmp	#50
    8C03 27 20        beq	0x8C25
    8C05 A1 33        cmp	#51
    8C07 27 1C        beq	0x8C25
    8C09 A1 34        cmp	#52
    8C0B 27 18        beq	0x8C25
    8C0D A1 35        cmp	#53
    8C0F 27 14        beq	0x8C25
    8C11 A1 36        cmp	#54
    8C13 27 10        beq	0x8C25
    8C15 A1 37        cmp	#55
    8C17 27 0C        beq	0x8C25
    8C19 A1 38        cmp	#56
    8C1B 27 08        beq	0x8C25
    8C1D A1 39        cmp	#57
    8C1F 27 04        beq	0x8C25
    8C21 A1 30        cmp	#48
    8C23 26 04        bne	0x8C29
    8C25 A6 01        ldA	#1
    8C27 20 01        bra	0x8C2A
    8C29 4F           clrA	
    8C2A 81           rts	
_Delay:
    8C2B A7 FE        aiS	#-2
    8C2D 95           tSX	
    8C2E 7F           clr	0,X
    8C2F 20 0D        bra	0x8C3E
    8C31 6F 01        clr	1,X
    8C33 20 02        bra	0x8C37
    8C35 6C 01        inc	1,X
    8C37 E6 01        ldA	1,X
    8C39 A1 FA        cmp	#-6
    8C3B 23 F8        bls	0x8C35
    8C3D 7C           inc	0,X
    8C3E F6           ldA	0,X
    8C3F A1 FA        cmp	#-6
    8C41 23 EE        bls	0x8C31
    8C43 A7 02        aiS	#2
    8C45 81           rts	
_Changetime:
    8C46 95           tSX	
    8C47 E6 02        ldA	2,X
    8C49 EE 03        ldX	3,X
    8C4B 87           pshA	
    8C4C 8A           pulH	
    8C4D E6 01        ldA	1,X
    8C4F B7 41        stA	*__r1
    8C51 F6           ldA	0,X
    8C52 95           tSX	
    8C53 B7 40        stA	*__r0
    8C55 4E 414D      mov	*__r1,*__rlo
    8C58 4E 404C      mov	*__r0,*__rhi
    8C5B A6 E8        ldA	#-24
    8C5D 87           pshA	
    8C5E A6 03        ldA	#3
    8C60 87           pshA	
    8C61 CD 9388      jsr	__divmod16s
    8C64 A7 02        aiS	#2
    8C66 4E 4D41      mov	*__rlo,*__r1
    8C69 4E 4172      mov	*__r1,*_time
    8C6C E6 02        ldA	2,X
    8C6E EE 03        ldX	3,X
    8C70 87           pshA	
    8C71 8A           pulH	
    8C72 E6 01        ldA	1,X
    8C74 B7 41        stA	*__r1
    8C76 F6           ldA	0,X
    8C77 95           tSX	
    8C78 B7 40        stA	*__r0
    8C7A 4E 414D      mov	*__r1,*__rlo
    8C7D 4E 404C      mov	*__r0,*__rhi
    8C80 A6 64        ldA	#100
    8C82 87           pshA	
    8C83 4F           clrA	
    8C84 87           pshA	
    8C85 CD 9388      jsr	__divmod16s
    8C88 A7 02        aiS	#2
    8C8A 4E 4C40      mov	*__rhi,*__r0
    8C8D 4E 4D41      mov	*__rlo,*__r1
    8C90 4E 414D      mov	*__r1,*__rlo
    8C93 4E 404C      mov	*__r0,*__rhi
    8C96 A6 0A        ldA	#10
    8C98 87           pshA	
    8C99 4F           clrA	
    8C9A 87           pshA	
    8C9B CD 9388      jsr	__divmod16s
    8C9E 86           pulA	
    8C9F 86           pulA	
    8CA0 B7 73        stA	*_time+1
    8CA2 E6 02        ldA	2,X
    8CA4 EE 03        ldX	3,X
    8CA6 87           pshA	
    8CA7 8A           pulH	
    8CA8 E6 01        ldA	1,X
    8CAA B7 41        stA	*__r1
    8CAC F6           ldA	0,X
    8CAD 95           tSX	
    8CAE B7 40        stA	*__r0
    8CB0 4E 414D      mov	*__r1,*__rlo
    8CB3 4E 404C      mov	*__r0,*__rhi
    8CB6 A6 0A        ldA	#10
    8CB8 87           pshA	
    8CB9 4F           clrA	
    8CBA 87           pshA	
    8CBB CD 9388      jsr	__divmod16s
    8CBE A7 02        aiS	#2
    8CC0 4E 4C40      mov	*__rhi,*__r0
    8CC3 4E 4D41      mov	*__rlo,*__r1
    8CC6 4E 414D      mov	*__r1,*__rlo
    8CC9 4E 404C      mov	*__r0,*__rhi
    8CCC A6 0A        ldA	#10
    8CCE 87           pshA	
    8CCF 4F           clrA	
    8CD0 87           pshA	
    8CD1 CD 9388      jsr	__divmod16s
    8CD4 86           pulA	
    8CD5 86           pulA	
    8CD6 B7 74        stA	*_time+2
    8CD8 E6 02        ldA	2,X
    8CDA EE 03        ldX	3,X
    8CDC 87           pshA	
    8CDD 8A           pulH	
    8CDE E6 01        ldA	1,X
    8CE0 B7 41        stA	*__r1
    8CE2 F6           ldA	0,X
    8CE3 95           tSX	
    8CE4 B7 40        stA	*__r0
    8CE6 4E 414D      mov	*__r1,*__rlo
    8CE9 4E 404C      mov	*__r0,*__rhi
    8CEC A6 0A        ldA	#10
    8CEE 87           pshA	
    8CEF 4F           clrA	
    8CF0 87           pshA	
    8CF1 CD 9388      jsr	__divmod16s
    8CF4 86           pulA	
    8CF5 86           pulA	
    8CF6 B7 75        stA	*_time+3
    8CF8 E6 03        ldA	3,X
    8CFA AB 02        add	#2
    8CFC B7 41        stA	*__r1
    8CFE E6 02        ldA	2,X
    8D00 A9 00        adc	#0
    8D02 B7 40        stA	*__r0
    8D04 55 40        ldHX	*__r0
    8D06 E6 01        ldA	1,X
    8D08 B7 41        stA	*__r1
    8D0A F6           ldA	0,X
    8D0B 95           tSX	
    8D0C B7 40        stA	*__r0
    8D0E 4E 414D      mov	*__r1,*__rlo
    8D11 4E 404C      mov	*__r0,*__rhi
    8D14 A6 0A        ldA	#10
    8D16 87           pshA	
    8D17 4F           clrA	
    8D18 87           pshA	
    8D19 CD 9388      jsr	__divmod16s
    8D1C A7 02        aiS	#2
    8D1E 4E 4D41      mov	*__rlo,*__r1
    8D21 4E 4176      mov	*__r1,0x76
    8D24 E6 03        ldA	3,X
    8D26 AB 02        add	#2
    8D28 B7 41        stA	*__r1
    8D2A E6 02        ldA	2,X
    8D2C A9 00        adc	#0
    8D2E B7 40        stA	*__r0
    8D30 55 40        ldHX	*__r0
    8D32 E6 01        ldA	1,X
    8D34 B7 41        stA	*__r1
    8D36 F6           ldA	0,X
    8D37 95           tSX	
    8D38 B7 40        stA	*__r0
    8D3A 4E 414D      mov	*__r1,*__rlo
    8D3D 4E 404C      mov	*__r0,*__rhi
    8D40 A6 0A        ldA	#10
    8D42 87           pshA	
    8D43 4F           clrA	
    8D44 87           pshA	
    8D45 CD 9388      jsr	__divmod16s
    8D48 86           pulA	
    8D49 86           pulA	
    8D4A B7 77        stA	0x77
    8D4C E6 03        ldA	3,X
    8D4E AB 04        add	#4
    8D50 B7 41        stA	*__r1
    8D52 E6 02        ldA	2,X
    8D54 A9 00        adc	#0
    8D56 B7 40        stA	*__r0
    8D58 55 40        ldHX	*__r0
    8D5A E6 01        ldA	1,X
    8D5C B7 41        stA	*__r1
    8D5E F6           ldA	0,X
    8D5F 95           tSX	
    8D60 B7 40        stA	*__r0
    8D62 4E 414D      mov	*__r1,*__rlo
    8D65 4E 404C      mov	*__r0,*__rhi
    8D68 A6 0A        ldA	#10
    8D6A 87           pshA	
    8D6B 4F           clrA	
    8D6C 87           pshA	
    8D6D CD 9388      jsr	__divmod16s
    8D70 A7 02        aiS	#2
    8D72 4E 4D41      mov	*__rlo,*__r1
    8D75 4E 4178      mov	*__r1,0x78
    8D78 E6 03        ldA	3,X
    8D7A AB 04        add	#4
    8D7C B7 41        stA	*__r1
    8D7E E6 02        ldA	2,X
    8D80 A9 00        adc	#0
    8D82 B7 40        stA	*__r0
    8D84 55 40        ldHX	*__r0
    8D86 E6 01        ldA	1,X
    8D88 B7 41        stA	*__r1
    8D8A F6           ldA	0,X
    8D8B 95           tSX	
    8D8C B7 40        stA	*__r0
    8D8E 4E 414D      mov	*__r1,*__rlo
    8D91 4E 404C      mov	*__r0,*__rhi
    8D94 A6 0A        ldA	#10
    8D96 87           pshA	
    8D97 4F           clrA	
    8D98 87           pshA	
    8D99 CD 9388      jsr	__divmod16s
    8D9C 86           pulA	
    8D9D 86           pulA	
    8D9E B7 79        stA	0x79
    8DA0 E6 04        ldA	4,X
    8DA2 EE 05        ldX	5,X
    8DA4 87           pshA	
    8DA5 8A           pulH	
    8DA6 F6           ldA	0,X
    8DA7 AE 0A        ldX	#10
    8DA9 8C           clrH	
    8DAA 52           div	
    8DAB 95           tSX	
    8DAC B7 7A        stA	0x7A
    8DAE E6 04        ldA	4,X
    8DB0 EE 05        ldX	5,X
    8DB2 87           pshA	
    8DB3 8A           pulH	
    8DB4 F6           ldA	0,X
    8DB5 AE 0A        ldX	#10
    8DB7 8C           clrH	
    8DB8 52           div	
    8DB9 8B           pshH	
    8DBA 86           pulA	
    8DBB 95           tSX	
    8DBC B7 7B        stA	0x7B
    8DBE E6 05        ldA	5,X
    8DC0 AB 01        add	#1
    8DC2 B7 41        stA	*__r1
    8DC4 E6 04        ldA	4,X
    8DC6 A9 00        adc	#0
    8DC8 B7 40        stA	*__r0
    8DCA 55 40        ldHX	*__r0
    8DCC F6           ldA	0,X
    8DCD AE 0A        ldX	#10
    8DCF 8C           clrH	
    8DD0 52           div	
    8DD1 95           tSX	
    8DD2 B7 7C        stA	0x7C
    8DD4 E6 05        ldA	5,X
    8DD6 AB 01        add	#1
    8DD8 B7 41        stA	*__r1
    8DDA E6 04        ldA	4,X
    8DDC A9 00        adc	#0
    8DDE B7 40        stA	*__r0
    8DE0 55 40        ldHX	*__r0
    8DE2 F6           ldA	0,X
    8DE3 AE 0A        ldX	#10
    8DE5 8C           clrH	
    8DE6 52           div	
    8DE7 8B           pshH	
    8DE8 86           pulA	
    8DE9 95           tSX	
    8DEA B7 7D        stA	0x7D
    8DEC E6 05        ldA	5,X
    8DEE AB 02        add	#2
    8DF0 B7 41        stA	*__r1
    8DF2 E6 04        ldA	4,X
    8DF4 A9 00        adc	#0
    8DF6 B7 40        stA	*__r0
    8DF8 55 40        ldHX	*__r0
    8DFA F6           ldA	0,X
    8DFB AE 0A        ldX	#10
    8DFD 8C           clrH	
    8DFE 52           div	
    8DFF 95           tSX	
    8E00 B7 7E        stA	0x7E
    8E02 E6 05        ldA	5,X
    8E04 AB 02        add	#2
    8E06 B7 41        stA	*__r1
    8E08 E6 04        ldA	4,X
    8E0A A9 00        adc	#0
    8E0C B7 40        stA	*__r0
    8E0E 55 40        ldHX	*__r0
    8E10 F6           ldA	0,X
    8E11 AE 0A        ldX	#10
    8E13 8C           clrH	
    8E14 52           div	
    8E15 8B           pshH	
    8E16 86           pulA	
    8E17 95           tSX	
    8E18 B7 7F        stA	0x7F
    8E1A 81           rts	
_Change:
    8E1B 3F 40        clr	*__r0
    8E1D B6 73        ldA	*_time+1
    8E1F B7 41        stA	*__r1
    8E21 A6 64        ldA	#100
    8E23 87           pshA	
    8E24 4F           clrA	
    8E25 87           pshA	
    8E26 B6 41        ldA	*__r1
    8E28 87           pshA	
    8E29 B6 40        ldA	*__r0
    8E2B 87           pshA	
    8E2C CD 9440      jsr	__mul16
    8E2F A7 04        aiS	#4
    8E31 4E 4D41      mov	*__rlo,*__r1
    8E34 4E 4C40      mov	*__rhi,*__r0
    8E37 3F 42        clr	*__r2
    8E39 B6 72        ldA	*_time
    8E3B B7 43        stA	*__r3
    8E3D A6 E8        ldA	#-24
    8E3F 87           pshA	
    8E40 A6 03        ldA	#3
    8E42 87           pshA	
    8E43 B6 43        ldA	*__r3
    8E45 87           pshA	
    8E46 B6 42        ldA	*__r2
    8E48 87           pshA	
    8E49 CD 9440      jsr	__mul16
    8E4C A7 04        aiS	#4
    8E4E 4E 4D43      mov	*__rlo,*__r3
    8E51 4E 4C42      mov	*__rhi,*__r2
    8E54 B6 43        ldA	*__r3
    8E56 BB 41        add	*__r1
    8E58 B7 41        stA	*__r1
    8E5A B6 42        ldA	*__r2
    8E5C B9 40        adc	*__r0
    8E5E B7 40        stA	*__r0
    8E60 3F 42        clr	*__r2
    8E62 B6 74        ldA	*_time+2
    8E64 B7 43        stA	*__r3
    8E66 A6 0A        ldA	#10
    8E68 87           pshA	
    8E69 4F           clrA	
    8E6A 87           pshA	
    8E6B B6 43        ldA	*__r3
    8E6D 87           pshA	
    8E6E B6 42        ldA	*__r2
    8E70 87           pshA	
    8E71 CD 9440      jsr	__mul16
    8E74 A7 04        aiS	#4
    8E76 4E 4D43      mov	*__rlo,*__r3
    8E79 4E 4C42      mov	*__rhi,*__r2
    8E7C B6 41        ldA	*__r1
    8E7E BB 43        add	*__r3
    8E80 B7 41        stA	*__r1
    8E82 B6 40        ldA	*__r0
    8E84 B9 42        adc	*__r2
    8E86 B7 40        stA	*__r0
    8E88 3F 42        clr	*__r2
    8E8A B6 75        ldA	*_time+3
    8E8C B7 43        stA	*__r3
    8E8E B6 41        ldA	*__r1
    8E90 BB 43        add	*__r3
    8E92 B7 6D        stA	*_Tdate+1
    8E94 B6 40        ldA	*__r0
    8E96 B9 42        adc	*__r2
    8E98 B7 6C        stA	*_Tdate
    8E9A 3F 40        clr	*__r0
    8E9C B6 77        ldA	0x77
    8E9E B7 41        stA	*__r1
    8EA0 3F 42        clr	*__r2
    8EA2 B6 76        ldA	0x76
    8EA4 B7 43        stA	*__r3
    8EA6 A6 0A        ldA	#10
    8EA8 87           pshA	
    8EA9 4F           clrA	
    8EAA 87           pshA	
    8EAB B6 43        ldA	*__r3
    8EAD 87           pshA	
    8EAE B6 42        ldA	*__r2
    8EB0 87           pshA	
    8EB1 CD 9440      jsr	__mul16
    8EB4 A7 04        aiS	#4
    8EB6 4E 4D43      mov	*__rlo,*__r3
    8EB9 4E 4C42      mov	*__rhi,*__r2
    8EBC B6 43        ldA	*__r3
    8EBE BB 41        add	*__r1
    8EC0 B7 6F        stA	*_Tdate+3
    8EC2 B6 42        ldA	*__r2
    8EC4 B9 40        adc	*__r0
    8EC6 B7 6E        stA	*_Tdate+2
    8EC8 3F 40        clr	*__r0
    8ECA B6 79        ldA	0x79
    8ECC B7 41        stA	*__r1
    8ECE 3F 42        clr	*__r2
    8ED0 B6 78        ldA	0x78
    8ED2 B7 43        stA	*__r3
    8ED4 A6 0A        ld

⌨️ 快捷键说明

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