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

📄 clock.lst

📁 摩托罗拉的时钟的原代码
💻 LST
📖 第 1 页 / 共 5 页
字号:
    8661 AF 01        aiX	#1
    8663 35 6C        stHX	*_Tdate
    8665 55 6C        ldHX	*_Tdate
    8667 65 2710      cpHX	#0x2710
    866A 95           tSX	
    866B 92 02        bgt	0x866F
    866D 20 04        bra	0x8673
    866F 3F 6D        clr	*_Tdate+1
    8671 3F 6C        clr	*_Tdate
    8673 A6 69        ldA	#105
    8675 87           pshA	
    8676 A6 00        ldA	#0
    8678 87           pshA	
    8679 A6 6C        ldA	#108
    867B 87           pshA	
    867C A6 00        ldA	#0
    867E 87           pshA	
    867F CD 8C46      jsr	_Changetime
    8682 A7 04        aiS	#4
    8684 95           tSX	
    8685 1F 20        Bclr	7,0x20
    8687 9A           clI	
    8688 A7 01        aiS	#1
    868A 86           pulA	
    868B B7 4D        stA	*__rlo
    868D 86           pulA	
    868E B7 4C        stA	*__rhi
    8690 86           pulA	
    8691 B7 4B        stA	*__r11
    8693 86           pulA	
    8694 B7 4A        stA	*__r10
    8696 86           pulA	
    8697 B7 49        stA	*__r9
    8699 86           pulA	
    869A B7 48        stA	*__r8
    869C 86           pulA	
    869D B7 47        stA	*__r7
    869F 86           pulA	
    86A0 B7 46        stA	*__r6
    86A2 86           pulA	
    86A3 B7 45        stA	*__r5
    86A5 86           pulA	
    86A6 B7 44        stA	*__r4
    86A8 86           pulA	
    86A9 B7 43        stA	*__r3
    86AB 86           pulA	
    86AC B7 42        stA	*__r2
    86AE 86           pulA	
    86AF B7 41        stA	*__r1
    86B1 86           pulA	
    86B2 B7 40        stA	*__r0
    86B4 8A           pulH	
    86B5 80           rti	
_isrKBI:
    86B6 8B           pshH	
    86B7 B6 40        ldA	*__r0
    86B9 87           pshA	
    86BA B6 41        ldA	*__r1
    86BC 87           pshA	
    86BD B6 42        ldA	*__r2
    86BF 87           pshA	
    86C0 B6 43        ldA	*__r3
    86C2 87           pshA	
    86C3 B6 44        ldA	*__r4
    86C5 87           pshA	
    86C6 B6 45        ldA	*__r5
    86C8 87           pshA	
    86C9 B6 46        ldA	*__r6
    86CB 87           pshA	
    86CC B6 47        ldA	*__r7
    86CE 87           pshA	
    86CF B6 48        ldA	*__r8
    86D1 87           pshA	
    86D2 B6 49        ldA	*__r9
    86D4 87           pshA	
    86D5 B6 4A        ldA	*__r10
    86D7 87           pshA	
    86D8 B6 4B        ldA	*__r11
    86DA 87           pshA	
    86DB B6 4C        ldA	*__rhi
    86DD 87           pshA	
    86DE B6 4D        ldA	*__rlo
    86E0 87           pshA	
    86E1 A7 FF        aiS	#-1
    86E3 95           tSX	
    86E4 9B           seI	
    86E5 12 1A        Bset	1,0x1A
    86E7 CD 92BA      jsr	_KB_Scan
    86EA 95           tSX	
    86EB B7 41        stA	*__r1
    86ED F7           stA	0,X
    86EE 87           pshA	
    86EF CD 9301      jsr	_KB_Def
    86F2 A7 01        aiS	#1
    86F4 B7 41        stA	*__r1
    86F6 B7 51        stA	*_Key
    86F8 CD 92A7      jsr	_KB_Init
    86FB 95           tSX	
    86FC 13 1A        Bclr	1,0x1A
    86FE 9A           clI	
    86FF A7 01        aiS	#1
    8701 86           pulA	
    8702 B7 4D        stA	*__rlo
    8704 86           pulA	
    8705 B7 4C        stA	*__rhi
    8707 86           pulA	
    8708 B7 4B        stA	*__r11
    870A 86           pulA	
    870B B7 4A        stA	*__r10
    870D 86           pulA	
    870E B7 49        stA	*__r9
    8710 86           pulA	
    8711 B7 48        stA	*__r8
    8713 86           pulA	
    8714 B7 47        stA	*__r7
    8716 86           pulA	
    8717 B7 46        stA	*__r6
    8719 86           pulA	
    871A B7 45        stA	*__r5
    871C 86           pulA	
    871D B7 44        stA	*__r4
    871F 86           pulA	
    8720 B7 43        stA	*__r3
    8722 86           pulA	
    8723 B7 42        stA	*__r2
    8725 86           pulA	
    8726 B7 41        stA	*__r1
    8728 86           pulA	
    8729 B7 40        stA	*__r0
    872B 8A           pulH	
    872C 80           rti	
_isrDummy:
    872D 8B           pshH	
    872E 8A           pulH	
    872F 80           rti	
_Timer1init:
    8730 A6 66        ldA	#102
    8732 B7 20        stA	0x20
    8734 3F 21        clr	0x21
    8736 3F 22        clr	0x22
    8738 A6 96        ldA	#-106
    873A B7 23        stA	0x23
    873C 3F 24        clr	0x24
    873E 1B 20        Bclr	5,0x20
    8740 81           rts	
_LcdshowCharacter:
    8741 95           tSX	
    8742 11 02        Bclr	0,0x02
    8744 13 02        Bclr	1,0x02
    8746 E6 04        ldA	4,X
    8748 A0 01        sub	#1
    874A B7 40        stA	*__r0
    874C E6 03        ldA	3,X
    874E A0 01        sub	#1
    8750 62           nsa	
    8751 A4 F0        and	#-16
    8753 48           lslA	
    8754 48           lslA	
    8755 BB 40        add	*__r0
    8757 AA 80        orA	#-128
    8759 87           pshA	
    875A CD 89EC      jsr	_Lcd_Command
    875D A7 01        aiS	#1
    875F 95           tSX	
    8760 10 02        Bset	0,0x02
    8762 13 02        Bclr	1,0x02
    8764 E6 02        ldA	2,X
    8766 87           pshA	
    8767 CD 89EC      jsr	_Lcd_Command
    876A A7 01        aiS	#1
    876C 95           tSX	
    876D 81           rts	
_ChangeASCII:
    876E A7 FF        aiS	#-1
    8770 95           tSX	
    8771 E6 03        ldA	3,X
    8773 AB 30        add	#48
    8775 B7 41        stA	*__r1
    8777 F7           stA	0,X
    8778 4E 4140      mov	*__r1,*__r0
    877B B6 41        ldA	*__r1
    877D A7 01        aiS	#1
    877F 81           rts	
_LcdShowString:
    8780 A7 FF        aiS	#-1
    8782 95           tSX	
    8783 CD 89A2      jsr	_LcdInit
    8786 95           tSX	
    8787 7F           clr	0,X
    8788 20 1F        bra	0x87A9
    878A F6           ldA	0,X
    878B AB 01        add	#1
    878D 87           pshA	
    878E E6 06        ldA	6,X
    8790 87           pshA	
    8791 3F 40        clr	*__r0
    8793 F6           ldA	0,X
    8794 EB 04        add	4,X
    8796 B7 41        stA	*__r1
    8798 B6 40        ldA	*__r0
    879A E9 03        adc	3,X
    879C B7 40        stA	*__r0
    879E 55 40        ldHX	*__r0
    87A0 F6           ldA	0,X
    87A1 87           pshA	
    87A2 CD 8741      jsr	_LcdshowCharacter
    87A5 A7 03        aiS	#3
    87A7 95           tSX	
    87A8 7C           inc	0,X
    87A9 F6           ldA	0,X
    87AA E1 05        cmp	5,X
    87AC 25 DC        bcs	0x878A
    87AE A7 01        aiS	#1
    87B0 81           rts	
_Lcdshow:
    87B1 A7 FF        aiS	#-1
    87B3 95           tSX	
    87B4 CD 89A2      jsr	_LcdInit
    87B7 95           tSX	
    87B8 7F           clr	0,X
    87B9 20 2A        bra	0x87E5
    87BB 3F 40        clr	*__r0
    87BD F6           ldA	0,X
    87BE EB 04        add	4,X
    87C0 B7 41        stA	*__r1
    87C2 B6 40        ldA	*__r0
    87C4 E9 03        adc	3,X
    87C6 B7 40        stA	*__r0
    87C8 55 40        ldHX	*__r0
    87CA F6           ldA	0,X
    87CB 87           pshA	
    87CC CD 876E      jsr	_ChangeASCII
    87CF A7 01        aiS	#1
    87D1 95           tSX	
    87D2 B7 41        stA	*__r1
    87D4 F6           ldA	0,X
    87D5 AB 04        add	#4
    87D7 87           pshA	
    87D8 A6 01        ldA	#1
    87DA 87           pshA	
    87DB B6 41        ldA	*__r1
    87DD 87           pshA	
    87DE CD 8741      jsr	_LcdshowCharacter
    87E1 A7 03        aiS	#3
    87E3 95           tSX	
    87E4 7C           inc	0,X
    87E5 F6           ldA	0,X
    87E6 A1 04        cmp	#4
    87E8 25 D1        bcs	0x87BB
    87EA A6 08        ldA	#8
    87EC 87           pshA	
    87ED A6 01        ldA	#1
    87EF 87           pshA	
    87F0 A6 2D        ldA	#45
    87F2 87           pshA	
    87F3 CD 8741      jsr	_LcdshowCharacter
    87F6 A7 03        aiS	#3
    87F8 95           tSX	
    87F9 E6 04        ldA	4,X
    87FB AB 04        add	#4
    87FD B7 41        stA	*__r1
    87FF E6 03        ldA	3,X
    8801 A9 00        adc	#0
    8803 B7 40        stA	*__r0
    8805 55 40        ldHX	*__r0
    8807 F6           ldA	0,X
    8808 87           pshA	
    8809 CD 876E      jsr	_ChangeASCII
    880C A7 01        aiS	#1
    880E B7 41        stA	*__r1
    8810 A6 09        ldA	#9
    8812 87           pshA	
    8813 A6 01        ldA	#1
    8815 87           pshA	
    8816 B6 41        ldA	*__r1
    8818 87           pshA	
    8819 CD 8741      jsr	_LcdshowCharacter
    881C A7 03        aiS	#3
    881E 95           tSX	
    881F E6 04        ldA	4,X
    8821 AB 05        add	#5
    8823 B7 41        stA	*__r1
    8825 E6 03        ldA	3,X
    8827 A9 00        adc	#0
    8829 B7 40        stA	*__r0
    882B 55 40        ldHX	*__r0
    882D F6           ldA	0,X
    882E 87           pshA	
    882F CD 876E      jsr	_ChangeASCII
    8832 A7 01        aiS	#1
    8834 B7 41        stA	*__r1
    8836 A6 0A        ldA	#10
    8838 87           pshA	
    8839 A6 01        ldA	#1
    883B 87           pshA	
    883C B6 41        ldA	*__r1
    883E 87           pshA	
    883F CD 8741      jsr	_LcdshowCharacter
    8842 A7 03        aiS	#3
    8844 A6 0B        ldA	#11
    8846 87           pshA	
    8847 A6 01        ldA	#1
    8849 87           pshA	
    884A A6 2D        ldA	#45
    884C 87           pshA	
    884D CD 8741      jsr	_LcdshowCharacter
    8850 A7 03        aiS	#3
    8852 95           tSX	
    8853 E6 04        ldA	4,X
    8855 AB 06        add	#6
    8857 B7 41        stA	*__r1
    8859 E6 03        ldA	3,X
    885B A9 00        adc	#0
    885D B7 40        stA	*__r0
    885F 55 40        ldHX	*__r0
    8861 F6           ldA	0,X
    8862 87           pshA	
    8863 CD 876E      jsr	_ChangeASCII
    8866 A7 01        aiS	#1
    8868 B7 41        stA	*__r1
    886A A6 0C        ldA	#12
    886C 87           pshA	
    886D A6 01        ldA	#1
    886F 87           pshA	
    8870 B6 41        ldA	*__r1
    8872 87           pshA	
    8873 CD 8741      jsr	_LcdshowCharacter
    8876 A7 03        aiS	#3
    8878 95           tSX	
    8879 E6 04        ldA	4,X
    887B AB 07        add	#7
    887D B7 41        stA	*__r1
    887F E6 03        ldA	3,X
    8881 A9 00        adc	#0
    8883 B7 40        stA	*__r0
    8885 55 40        ldHX	*__r0
    8887 F6           ldA	0,X
    8888 87           pshA	
    8889 CD 876E      jsr	_ChangeASCII
    888C A7 01        aiS	#1
    888E B7 41        stA	*__r1
    8890 A6 0D        ldA	#13
    8892 87           pshA	
    8893 A6 01        ldA	#1
    8895 87           pshA	
    8896 B6 41        ldA	*__r1
    8898 87           pshA	
    8899 CD 8741      jsr	_LcdshowCharacter
    889C A7 03        aiS	#3
    889E 95           tSX	
    889F E6 04        ldA	4,X
    88A1 AB 08        add	#8
    88A3 B7 41        stA	*__r1
    88A5 E6 03        ldA	3,X
    88A7 A9 00        adc	#0
    88A9 B7 40        stA	*__r0
    88AB 55 40        ldHX	*__r0
    88AD F6           ldA	0,X
    88AE 87           pshA	
    88AF CD 876E      jsr	_ChangeASCII
    88B2 A7 01        aiS	#1
    88B4 B7 41        stA	*__r1
    88B6 A6 05        ldA	#5
    88B8 87           pshA	
    88B9 A6 02        ldA	#2
    88BB 87           pshA	
    88BC B6 41        ldA	*__r1
    88BE 87           pshA	
    88BF CD 8741      jsr	_LcdshowCharacter
    88C2 A7 03        aiS	#3
    88C4 95           tSX	
    88C5 E6 04        ldA	4,X
    88C7 AB 09        add	#9
    88C9 B7 41        stA	*__r1
    88CB E6 03        ldA	3,X
    88CD A9 00        adc	#0
    88CF B7 40        stA	*__r0
    88D1 55 40        ldHX	*__r0
    88D3 F6           ldA	0,X
    88D4 87           pshA	
    88D5 CD 876E      jsr	_ChangeASCII
    88D8 A7 01        aiS	#1
    88DA B7 41        stA	*__r1
    88DC A6 06        ldA	#6
    88DE 87           pshA	
    88DF A6 02        ldA	#2
    88E1 87           pshA	
    88E2 B6 41        ldA	*__r1
    88E4 87           pshA	
    88E5 CD 8741      jsr	_LcdshowCharacter
    88E8 A7 03        aiS	#3
    88EA A6 07        ldA	#7
    88EC 87           pshA	
    88ED A6 02        ldA	#2
    88EF 87           pshA	
    88F0 A6 3A        ldA	#58
    88F2 87           pshA	
    88F3 CD 8741      jsr	_LcdshowCharacter
    88F6 A7 03        aiS	#3
    88F8 95           tSX	
    88F9 E6 04        ldA	4,X
    88FB AB 0A        add	#10
    88FD B7 41        stA	*__r1
    88FF E6 03        ldA	3,X
    8901 A9 00        adc	#0
    8903 B7 40        stA	*__r0
    8905 55 40        ldHX	*__r0
    8907 F6           ldA	0,X
    8908 87           pshA	
    8909 CD 876E      jsr	_ChangeASCII
    890C A7 01        aiS	#1
    890E B7 41        stA	*__r1
    8910 A6 08        ldA	#8

⌨️ 快捷键说明

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