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

📄 clock.lst

📁 这是我自己在做实验设计时做的,用摩托罗拉飞思卡尔做的一个多功能电子钟
💻 LST
📖 第 1 页 / 共 5 页
字号:
    8C1C 86           pulA	
    8C1D B7 4D        stA	*__rlo
    8C1F 86           pulA	
    8C20 B7 4C        stA	*__rhi
    8C22 86           pulA	
    8C23 B7 4B        stA	*__r11
    8C25 86           pulA	
    8C26 B7 4A        stA	*__r10
    8C28 86           pulA	
    8C29 B7 49        stA	*__r9
    8C2B 86           pulA	
    8C2C B7 48        stA	*__r8
    8C2E 86           pulA	
    8C2F B7 47        stA	*__r7
    8C31 86           pulA	
    8C32 B7 46        stA	*__r6
    8C34 86           pulA	
    8C35 B7 45        stA	*__r5
    8C37 86           pulA	
    8C38 B7 44        stA	*__r4
    8C3A 86           pulA	
    8C3B B7 43        stA	*__r3
    8C3D 86           pulA	
    8C3E B7 42        stA	*__r2
    8C40 86           pulA	
    8C41 B7 41        stA	*__r1
    8C43 86           pulA	
    8C44 B7 40        stA	*__r0
    8C46 8A           pulH	
    8C47 80           rti	
_isrDummy:
    8C48 8B           pshH	
    8C49 8A           pulH	
    8C4A 80           rti	
_lcdshow:
    8C4B A7 FF        aiS	#-1
    8C4D 95           tSX	
    8C4E CD 8CB8      jsr	_LcdInit
    8C51 11 02        Bclr	0,0x02
    8C53 13 02        Bclr	1,0x02
    8C55 A6 80        ldA	#-128
    8C57 87           pshA	
    8C58 CD 8D0A      jsr	_Lcd_Command
    8C5B A7 01        aiS	#1
    8C5D 95           tSX	
    8C5E 10 02        Bset	0,0x02
    8C60 13 02        Bclr	1,0x02
    8C62 7F           clr	0,X
    8C63 20 18        bra	0x8C7D
    8C65 3F 40        clr	*__r0
    8C67 F6           ldA	0,X
    8C68 EB 04        add	4,X
    8C6A B7 41        stA	*__r1
    8C6C B6 40        ldA	*__r0
    8C6E E9 03        adc	3,X
    8C70 B7 40        stA	*__r0
    8C72 55 40        ldHX	*__r0
    8C74 F6           ldA	0,X
    8C75 87           pshA	
    8C76 CD 8D0A      jsr	_Lcd_Command
    8C79 A7 01        aiS	#1
    8C7B 95           tSX	
    8C7C 7C           inc	0,X
    8C7D F6           ldA	0,X
    8C7E A1 10        cmp	#16
    8C80 25 E3        bcs	0x8C65
    8C82 11 02        Bclr	0,0x02
    8C84 13 02        Bclr	1,0x02
    8C86 A6 C0        ldA	#-64
    8C88 87           pshA	
    8C89 CD 8D0A      jsr	_Lcd_Command
    8C8C A7 01        aiS	#1
    8C8E 95           tSX	
    8C8F 10 02        Bset	0,0x02
    8C91 13 02        Bclr	1,0x02
    8C93 A6 10        ldA	#16
    8C95 F7           stA	0,X
    8C96 20 18        bra	0x8CB0
    8C98 3F 40        clr	*__r0
    8C9A F6           ldA	0,X
    8C9B EB 04        add	4,X
    8C9D B7 41        stA	*__r1
    8C9F B6 40        ldA	*__r0
    8CA1 E9 03        adc	3,X
    8CA3 B7 40        stA	*__r0
    8CA5 55 40        ldHX	*__r0
    8CA7 F6           ldA	0,X
    8CA8 87           pshA	
    8CA9 CD 8D0A      jsr	_Lcd_Command
    8CAC A7 01        aiS	#1
    8CAE 95           tSX	
    8CAF 7C           inc	0,X
    8CB0 F6           ldA	0,X
    8CB1 A1 20        cmp	#32
    8CB3 25 E3        bcs	0x8C98
    8CB5 A7 01        aiS	#1
    8CB7 81           rts	
_LcdInit:
    8CB8 A7 FF        aiS	#-1
    8CBA 95           tSX	
    8CBB A6 FF        ldA	#-1
    8CBD B7 05        stA	0x05
    8CBF 14 06        Bset	2,0x06
    8CC1 10 06        Bset	0,0x06
    8CC3 12 06        Bset	1,0x06
    8CC5 14 02        Bset	2,0x02
    8CC7 11 02        Bclr	0,0x02
    8CC9 13 02        Bclr	1,0x02
    8CCB A6 38        ldA	#56
    8CCD 87           pshA	
    8CCE CD 8D0A      jsr	_Lcd_Command
    8CD1 A7 01        aiS	#1
    8CD3 A6 08        ldA	#8
    8CD5 87           pshA	
    8CD6 CD 8D0A      jsr	_Lcd_Command
    8CD9 A7 01        aiS	#1
    8CDB A6 01        ldA	#1
    8CDD 87           pshA	
    8CDE CD 8D0A      jsr	_Lcd_Command
    8CE1 A7 01        aiS	#1
    8CE3 95           tSX	
    8CE4 7F           clr	0,X
    8CE5 20 01        bra	0x8CE8
    8CE7 7C           inc	0,X
    8CE8 F6           ldA	0,X
    8CE9 A1 FA        cmp	#-6
    8CEB 25 FA        bcs	0x8CE7
    8CED 7F           clr	0,X
    8CEE 20 01        bra	0x8CF1
    8CF0 7C           inc	0,X
    8CF1 F6           ldA	0,X
    8CF2 A1 FA        cmp	#-6
    8CF4 25 FA        bcs	0x8CF0
    8CF6 A6 14        ldA	#20
    8CF8 87           pshA	
    8CF9 CD 8D0A      jsr	_Lcd_Command
    8CFC A7 01        aiS	#1
    8CFE A6 0C        ldA	#12
    8D00 87           pshA	
    8D01 CD 8D0A      jsr	_Lcd_Command
    8D04 A7 01        aiS	#1
    8D06 95           tSX	
    8D07 A7 01        aiS	#1
    8D09 81           rts	
_Lcd_Command:
    8D0A A7 FF        aiS	#-1
    8D0C 95           tSX	
    8D0D 7F           clr	0,X
    8D0E 20 01        bra	0x8D11
    8D10 7C           inc	0,X
    8D11 F6           ldA	0,X
    8D12 A1 14        cmp	#20
    8D14 25 FA        bcs	0x8D10
    8D16 E6 03        ldA	3,X
    8D18 B7 01        stA	0x01
    8D1A 14 02        Bset	2,0x02
    8D1C 9D           nop	
    8D1D 9D           nop	
    8D1E 9D           nop	
    8D1F 15 02        Bclr	2,0x02
    8D21 7F           clr	0,X
    8D22 20 01        bra	0x8D25
    8D24 7C           inc	0,X
    8D25 F6           ldA	0,X
    8D26 A1 14        cmp	#20
    8D28 25 FA        bcs	0x8D24
    8D2A A7 01        aiS	#1
    8D2C 81           rts	
_Lcd_show_cursor:
    8D2D 95           tSX	
    8D2E E6 02        ldA	2,X
    8D30 26 1A        bne	0x8D4C
    8D32 11 02        Bclr	0,0x02
    8D34 13 02        Bclr	1,0x02
    8D36 A6 0F        ldA	#15
    8D38 87           pshA	
    8D39 CD 8D0A      jsr	_Lcd_Command
    8D3C A7 01        aiS	#1
    8D3E 95           tSX	
    8D3F E6 03        ldA	3,X
    8D41 AA 80        orA	#-128
    8D43 87           pshA	
    8D44 CD 8D0A      jsr	_Lcd_Command
    8D47 A7 01        aiS	#1
    8D49 95           tSX	
    8D4A 20 20        bra	0x8D6C
    8D4C E6 02        ldA	2,X
    8D4E A1 01        cmp	#1
    8D50 26 1A        bne	0x8D6C
    8D52 11 02        Bclr	0,0x02
    8D54 13 02        Bclr	1,0x02
    8D56 A6 0F        ldA	#15
    8D58 87           pshA	
    8D59 CD 8D0A      jsr	_Lcd_Command
    8D5C A7 01        aiS	#1
    8D5E 95           tSX	
    8D5F E6 03        ldA	3,X
    8D61 AB 40        add	#64
    8D63 AA 80        orA	#-128
    8D65 87           pshA	
    8D66 CD 8D0A      jsr	_Lcd_Command
    8D69 A7 01        aiS	#1
    8D6B 95           tSX	
    8D6C 81           rts	
_KB_Init:
    8D6D 3F 00        clr	0x00
    8D6F A6 0F        ldA	#15
    8D71 B7 04        stA	0x04
    8D73 A6 F0        ldA	#-16
    8D75 B7 0D        stA	0x0D
    8D77 12 1A        Bset	1,0x1A
    8D79 A6 F0        ldA	#-16
    8D7B B7 1B        stA	0x1B
    8D7D 14 1A        Bset	2,0x1A
    8D7F 81           rts	
_KB_Scan:
    8D80 A7 FD        aiS	#-3
    8D82 95           tSX	
    8D83 A6 FE        ldA	#-2
    8D85 F7           stA	0,X
    8D86 A6 01        ldA	#1
    8D88 E7 01        stA	1,X
    8D8A 20 26        bra	0x8DB2
    8D8C B6 00        ldA	0x00
    8D8E E7 02        stA	2,X
    8D90 AA 0F        orA	#15
    8D92 E7 02        stA	2,X
    8D94 F4           and	0,X
    8D95 B7 00        stA	0x00
    8D97 9D           nop	
    8D98 9D           nop	
    8D99 B6 00        ldA	0x00
    8D9B E7 02        stA	2,X
    8D9D A4 F0        and	#-16
    8D9F E7 02        stA	2,X
    8DA1 A1 F0        cmp	#-16
    8DA3 27 06        beq	0x8DAB
    8DA5 B6 00        ldA	0x00
    8DA7 E7 02        stA	2,X
    8DA9 20 0D        bra	0x8DB8
    8DAB F6           ldA	0,X
    8DAC 48           lslA	
    8DAD AA 01        orA	#1
    8DAF F7           stA	0,X
    8DB0 6C 01        inc	1,X
    8DB2 E6 01        ldA	1,X
    8DB4 A1 04        cmp	#4
    8DB6 23 D4        bls	0x8D8C
    8DB8 E6 01        ldA	1,X
    8DBA A1 05        cmp	#5
    8DBC 26 04        bne	0x8DC2
    8DBE A6 FF        ldA	#-1
    8DC0 E7 02        stA	2,X
    8DC2 E6 02        ldA	2,X
    8DC4 A7 03        aiS	#3
    8DC6 81           rts	
_KB_Def:
    8DC7 A7 FD        aiS	#-3
    8DC9 95           tSX	
    8DCA 6F 01        clr	1,X
    8DCC 20 3C        bra	0x8E0A
    8DCE 3F 40        clr	*__r0
    8DD0 E6 01        ldA	1,X
    8DD2 AB 00        add	#0
    8DD4 B7 41        stA	*__r1
    8DD6 B6 40        ldA	*__r0
    8DD8 A9 80        adc	#-128
    8DDA B7 40        stA	*__r0
    8DDC 55 40        ldHX	*__r0
    8DDE F6           ldA	0,X
    8DDF 95           tSX	
    8DE0 E7 02        stA	2,X
    8DE2 26 05        bne	0x8DE9
    8DE4 A6 FF        ldA	#-1
    8DE6 F7           stA	0,X
    8DE7 20 23        bra	0x8E0C
    8DE9 E6 02        ldA	2,X
    8DEB E1 05        cmp	5,X
    8DED 26 15        bne	0x8E04
    8DEF 3F 40        clr	*__r0
    8DF1 E6 01        ldA	1,X
    8DF3 AB 01        add	#1
    8DF5 B7 41        stA	*__r1
    8DF7 B6 40        ldA	*__r0
    8DF9 A9 80        adc	#-128
    8DFB B7 40        stA	*__r0
    8DFD 55 40        ldHX	*__r0
    8DFF F6           ldA	0,X
    8E00 95           tSX	
    8E01 F7           stA	0,X
    8E02 20 08        bra	0x8E0C
    8E04 E6 01        ldA	1,X
    8E06 AB 02        add	#2
    8E08 E7 01        stA	1,X
    8E0A 20 C2        bra	0x8DCE
    8E0C F6           ldA	0,X
    8E0D A7 03        aiS	#3
    8E0F 81           rts	
__divmod16s:
    8E10 89           pshX	
    8E11 8B           pshH	
    8E12 A7 FF        aiS	#-1
    8E14 95           tSX	
    8E15 6F 00        clr	0,X
    8E17 3D 4C        tst	*__rhi
    8E19 2A 0E        bpl	0x8E29
    8E1B A6 03        ldA	#3
    8E1D E7 00        stA	0,X
    8E1F 4F           clrA	
    8E20 B0 4D        sub	*__rlo
    8E22 B7 4D        stA	*__rlo
    8E24 4F           clrA	
    8E25 B2 4C        sbc	*__rhi
    8E27 B7 4C        stA	*__rhi
    8E29 6D 05        tst	5,X
    8E2B 2A 10        bpl	0x8E3D
    8E2D A6 02        ldA	#2
    8E2F E8 00        eor	0,X
    8E31 E7 00        stA	0,X
    8E33 4F           clrA	
    8E34 E0 06        sub	6,X
    8E36 E7 06        stA	6,X
    8E38 4F           clrA	
    8E39 E2 05        sbc	5,X
    8E3B E7 05        stA	5,X
    8E3D E6 06        ldA	6,X
    8E3F 87           pshA	
    8E40 E6 05        ldA	5,X
    8E42 87           pshA	
    8E43 AD 29        bsr	0x8E6E
    8E45 86           pulA	
    8E46 E7 05        stA	5,X
    8E48 86           pulA	
    8E49 E7 06        stA	6,X
    8E4B E6 00        ldA	0,X
    8E4D A5 02        bit	#2
    8E4F 27 0A        beq	0x8E5B
    8E51 4F           clrA	
    8E52 B0 4D        sub	*__rlo
    8E54 B7 4D        stA	*__rlo
    8E56 4F           clrA	
    8E57 B2 4C        sbc	*__rhi
    8E59 B7 4C        stA	*__rhi
    8E5B A5 01        bit	#1
    8E5D 27 0A        beq	0x8E69
    8E5F 4F           clrA	
    8E60 E0 06        sub	6,X
    8E62 E7 06        stA	6,X
    8E64 4F           clrA	
    8E65 E2 05        sbc	5,X
    8E67 E7 05        stA	5,X
    8E69 A7 01        aiS	#1
    8E6B 8A           pulH	
    8E6C 88           pulX	
    8E6D 81           rts	
__divmod16u:
__divmodu_16X16_16:
    8E6E 89           pshX	
    8E6F 8B           pshH	
    8E70 A7 FC        aiS	#-4
    8E72 95           tSX	
    8E73 6F 02        clr	2,X
    8E75 6F 03        clr	3,X
    8E77 A6 10        ldA	#16
    8E79 E7 00        stA	0,X
    8E7B 38 4D        lsl	*__rlo
    8E7D 39 4C        rol	*__rhi
    8E7F 69 03        rol	3,X
    8E81 69 02        rol	2,X
    8E83 24 0E        bcc	0x8E93
    8E85 E6 09        ldA	9,X
    8E87 EB 03        add	3,X
    8E89 E7 03        stA	3,X
    8E8B E6 08        ldA	8,X
    8E8D E9 02        adc	2,X
    8E8F E7 02        stA	2,X
    8E91 20 0C        bra	0x8E9F
    8E93 E6 03        ldA	3,X
    8E95 E0 09        sub	9,X
    8E97 E7 03        stA	3,X
    8E99 E6 02        ldA	2,X
    8E9B E2 08        sbc	8,X
    8E9D E7 02        stA	2,X
    8E9F 2B 06        bmi	0x8EA7
    8EA1 A6 01        ldA	#1
    8EA3 BA 4D        orA	*__rlo
    8EA5 B7 4D        stA	*__rlo
    8EA7 6A 00        dec	0,X
    8EA9 26 D0        bne	0x8E7B
    8EAB 6D 02        tst	2,X
    8EAD 2A 0C        bpl	0x8EBB
    8EAF E6 09        ldA	9,X
    8EB1 EB 03        add	3,X
    8EB3 E7 03        stA	3,X
    8EB5 E6 08        ldA	8,X
    8EB7 E9 02        adc	2,X
    8EB9 E7 02        stA	2,X
    8EBB E6 02        ldA	2,X
    8EBD E7 08        stA	8,X
    8EBF E6 03        ldA	3,X
    8EC1 E7 09        stA	9,X
    8EC3 A7 04        aiS	#4
    8EC5 8A           pulH	
    8EC6 88           pulX	
    8EC7 81           rts	

⌨️ 快捷键说明

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