单片机原理及接口技术.doc

哈尔滨理工大学单片机原理及接口技术课程设计报告 设计题目： 数字钟 （CLOCK.ASM) 专 业： 班 级： 姓名： 学 号： 一、课程设计目的1、通过本次课程设计加深对单片机课程的认识和掌握，对单片机的应用做进一步了解。2、通过本次课程设计提高学生的编程能力、调试能力、文献资料查阅能力，为毕业设计和以后工作打基础。3.进一步熟悉I2C的总线；掌握时钟芯片的使用；掌握使用液晶显示器显示时间。二、课程设计内容1) 选定题目:数字钟（CLOCK.ASM） 2) 实验目的：进一步熟悉I2C的总线；掌握时钟芯片的使用；掌握使用液晶显示器显示时间。3) 实验设备：STAR系列试验仪一套、PC机一台。4) 实验内容：A.PCF8563： 实时时钟芯片，可计时时间1900-2099年，不具有周调整功能。 数据传输采用I2C总线，固定片选地址；闹铃中断功能，可编程频率输出。B.实验过程 读写PCF8563中的时间数据；在12864J液晶显示器上显示时间、星期、日期 5） 实验原理图 6）实验步骤A.主机连线说明： E4区：SDA A3区：P1.0 E4区：SCL A3区：P1.1 A1区：CS、RW、RS、CS1/2 A3区：CS1 A0 A1 A2B.初始化PCF8563，设置初始化时间（2005-07-01 Fri 12:30:00），读取时间数据；C.调整读取的时间数据，转换为可以在图形液晶显示器上显示的数据，显示时间（年、月、日、星期、小时、分、秒）7）实验程序在星研软件环境下，这次要有三个程序共同完成。程序一：PCF8563子程序 ;*;PCF8563时钟芯片;PCF8563: 1.实时时钟芯片，可计时时间1900-2099年; 2.数据传输采用IIC总线，固定片选地址; 3.闹铃中断，可编程频率输出 ;*NAMEPCF8563PUBLICTIME,Sec_ReadPUBLICPCF8563_INIT,Write,Read,Read_Sequence,Time_INIT,Time_Write,Time_Read,Alarm_Read,Alarm_StopSDABITP1.0;数据传输口SCLBITP1.1;时钟INT BITP3.2;闹钟/定时中断输出PCF8563_DATASEGMENTDATARSEGPCF8563_DATATime:DS7;数据缓冲区;内部寄存器地址CS1EQU00H;控制/状态寄存器1CS2EQU01H;控制/状态寄存器2SecondEQU02H;秒寄存器MinuteEQU03H;分寄存器HourEQU04H;时寄存器DayEQU05H;天寄存器WeekdayEQU06H;周寄存器MouthEQU07H;月寄存器YearEQU08H;年寄存器MinuteAEQU09H;分闹铃寄存器HourAEQU0AH;时闹铃寄存器DayAEQU0BH;天闹铃寄存器WeekdayAEQU0CH;周闹铃寄存器COEQU0DH;时钟输出控制寄存器TimerCtrlEQU0EH;定时控制寄存器TimerEQU0FH;定时设置寄存器;PCF8563的片选地址：001HPCF8563_WRITEEQU0A2H;写指令PCF8563_READEQU0A3H;读指令PCF8563_CODESEGMENTCODERSEGPCF8563_CODE;初始化PCF8563_INIT:LCALLDelay8ms;IIC总线从通电到开始操作要求8ms延时LCALLRegister_INIT;寄存器初始化LCALLTime_INIT;时间初始化INIT_1:RET;寄存器初始化Register_INIT:LCALLCS1_Set;设置控制/状态寄存器1LCALLCS2_Set;设置控制/状态寄存器2LCALLDayA_Set;设置天闹铃寄存器LCALLWeekdayA_Set;设置周闹铃寄存器LCALLCO_Set;设置时钟输出寄存器RETCS1_Set:MOVA,#CS1;A-寄存器地址，B-寄存器设置值MOVB,#00H;全设为正常模式LCALLWrite;数据写入子程序RETCS2_Set:MOVA,#CS2MOVB,#02H;开闹铃中断，关定时器中断LCALLWriteRET DayA_Set:MOVA,#DayAMOVB,#00H;关天闹铃LCALLWriteRETWeekdayA_Set:MOVA,#WeekdayAMOVB,#00H;关周闹铃LCALLWriteRETCO_Set:MOVA,#COMOVB,#00H;关时钟输出LCALLWriteRET;时间初始化，05年7月1日 12:30:00，压缩BCD码格式(1个字节包含2个BCD码)Time_INIT:MOVA,#Year;A-寄存器地址;B-设置参数MOVB,#05HLCALLWrite;写入一个字节数据子程序MOVA,#MouthMOVB,#07H;最高位表示世纪：0-20XX,1-19XXLCALLWriteMOVA,#Weekday;周是不会自动调整的，需要自已核对MOVB,#05HLCALLWriteMOVA,#DayMOVB,#1HLCALLWriteMOVA,#HourMOVB,#12HLCALLWriteMOVA,#MinuteMOVB,#30HLCALLWriteMOVA,#SecondMOVB,#00HLCALLWriteRET;读秒,返回A-秒数据Sec_Read:MOVA,#SecondLCALLReadANLA,#7FHRET;读取时间，TIME-时间数据缓冲区Time_Read:MOVA,#Second;起始读取地址，从秒开始MOVR7,#7;连续读取数据个数：秒，分，时，天，周，月，年MOVR0,#TIME;时间数据缓冲区LCALLRead_Sequence;连续读取子程序LCALLTime_AdjustRET;时间写入，将秒，分，时，日，周，月，年写入;TIME-欲写入时间数据缓冲区Time_Write:MOVR0,#TIME;时间数据缓冲区首地址MOVA,#Second;秒数据地址为起始写入地址Time_Write_1:PUSHACCMOVB,R0;B-时间数据LCALLWritePOPACCINCAINCR0CJNER0,#TIME+7,Time_Write_1RET;闹钟时间读取，只开启了时，分闹铃Alarm_Read:MOVA,#MinuteA;起始读取地址，从分钟闹铃开始MOVR7,#2;读取数据个数：分，时LCALLRead_Sequence;连续读取子程序RET;时间调整，去除不必要的位数据Time_Adjust:MOVR0,#TIMEMOVA,R0ANLA,#7FH;调整秒XCHA,R0INCR0MOVA,R0ANLA,#7FH;调整分钟XCHA,R0INCR0MOVA,R0ANLA,#3FH;调整小时XCHA,R0INCR0MOVA,R0ANLA,#3FH;调整日XCHA,R0INCR0MOVA,R0ANLA,#07H;调整周XCHA,R0INCR0MOVA,R0ANLA,#1FH;调整月，年不用调整XCHA,R0RET;停止闹铃Alarm_Stop:MOVA,#CS2;控制/状态2寄存器地址LCALLRead;读出当前控制/状态2寄存器值,在A中ANLA,#0F7H;清AF闹铃标志,AF在CS2第3位MOVB,A;欲写入数据放B中MOVA,#CS2LCALLWriteRET;写入1个字节数据,A-寄存器地址，B-数据Write:PUSHACC;寄存器地址压栈LCALLStart;开始信号MOVA,#PCF8563_WRITE;写操作指令LCALLWrite_8bits;写入8位数据LCALLAcknowledge;查询接收端应答信号POPACC;写入寄存器地址LCALLWrite_8bitsLCALLAcknowledgeMOVA,B;写入设置值LCALLWrite_8bitsLCALLAcknowledgeLCALLStop;停止信号RET;读取数据，分为两种模式：字节读取和连续读取;字节读取，一次读取一个字节的数据,A-读取地址及存放读出的数据Read:PUSHACC;寄存器地址压栈LCALLStart;开始信号MOVA,#PCF8563_WRITE;写操作指令LCALLWrite_8bits;写入8位数据LCALLAcknowledge;查询接收端应答信号POPACC;写入寄存器地址LCALLWrite_8bitsLCALLAcknowledgeLCALLStartMOVA,#PCF8563_Read;读操作指令LCALLWrite_8bitsLCALLAcknowledgeLCALLRead_8bits;读取数据LCALLStop;停止信号RET;连续读取n个数据，n16;A-寄存器首地址，R7-读取数据个数，RO-读取数据存放首地址Read_Sequence:PUSHACC;寄存器地址压栈LCALLStart;开始信号MOVA,#PCF8563_WRITE;写操作指令LCALLWrite_8bits;写入8位数据LCALLAcknowledge;查询接收端应答信号POPACC;写入寄存器地址LCALLWrite_8bitsLCALLAcknowledgeLCALLStartMOVA,#PCF8563_Read;读操作指令LCALLWrite_8bitsLCALLAcknowledgeSJMPRead_Sequence_1Read_Sequence_2:LCALLMasterACKRead_Sequence_1:LCALLRead_8bits;读取数据MOVR0,AINCR0DJNZR7,Read_Sequence_2LCALLStopRETDelay_tHD_DATMACRONOPENDMDelay_tSU_DATMACRONOPENDMDelay_tHIGHMACRONOPNOPENDMDelay_tLOWMACRONOPENDMDelay_tHD_STAMACRONOPENDMDelay_tSU_STOMACRONOPENDMDelay_tBUFMACRONOPNOPENDM;写入8位数据Write_8bits:PUSH07HMOVR7,#8Write_8bits_1:CLRSCLDelay_tHD_DATRLCAMOVSDA,C;数据在SCL为低时,将数据送上SDADelay_tSU_DATSETBSCLDelay_tHIGHDJNZR7,Write_8bits_1CLRSCLPOP07HRET;读取8位数据Read_8bits:PUSH07HMOVR7,#8Read_8bits_1:CLRSCLDelay_tLOWSETBSCL;SCL高电平时，读取SDA数据Delay_tHIGHMOVC,SDARLCADJNZR7,Read_8bits_1CLRSCLPOP07HRET;开始信号Start:SETBSDA;IIC总线操作开始信号：SCL为高时，SDA由高-低SETBSCLDelay_tBUFCLRSDADelay_tHD_STACLRSCLRET;结束信号Stop:Delay_tHD_DATCLRSDA;IIC总线操作结束信号：SCL为高时，SDA由低-高SETBSCLDelay_tSU_STOSETBSDA;操作结束后，确保IIC总线处于释放状态RET;从机应答查询Acknowledge:Delay_tLOWSETBSDA;查询接收端应答信号，要先释放总线SETBSCLDelay_tHIGHJBSDA,$;接收端应答标志:将SDA置低CLRSCLRET;主机应答MasterACK:Delay_tHD_DATCLRSDA;数据线SDA置0应答Delay_tSU_DATSETBSCLDelay_tHIGHCLRSCLSETBSDA;置高数据，必须RET;延时8msDelay8ms:PUSH07HPUSH06HMOVR7,#36Delay8ms_1:MOVR6,#100DJNZR6,$DJNZR7,Delay8ms_1POP06HPOP07HRETEND程序二：主程序主程序说明：1. 初始化PCF8563,写入初始化时间。 因为没有给PCF8563配置电池，所以对PCF8563初始化后，给它赋时间初值，才能正确显示。2.读取时间，调整为非压缩BCD码，显示在液晶显示器12863J上 NAMEMAIN;演示主程序EXTRNDATA(TIME)EXTRNCODE(PCF8563_INIT,Write,Read,Time_Write,Time_Read,Sec_Read)EXTRNCODE(KeyRead)EXTRNCODE(LCD_INIT,LCDClear,ByteDisL,ByteDisR,WordDisL,WordDisR,LineDisL)MAIN_CODESEGMENTCODEMAIN_DATASEGMENTDATASTACKSEGMENTIDATAMAIN_BITSEGMENT BITRSEGMAIN_BITbKEY:DBIT1;按键标志RSEGMAIN_DATATIMEDATA:DS1;时间设置数据缓冲区TSFLAG:DS1;时间设置识别标识SECONDSAVE:DS1;保存秒数据，用于检测秒变化SEC:DS1;保存秒数据，用于检测秒变化TEMP:DS2;时间显示缓冲区XSET:DS1;时间起始显示行设置YSET:DS1;时间起始显示列设置Cursor:DS1;光标位置RSEG STACKDS 20H ;32 Bytes StackCSEGAT0000H;定位0LJMPSTARTCSEGAT0003H;定位1，按键中断LJMPKEYINT0RSEGMAIN_CODE;开始程序段START:MOVSP,#STACK-1CLRbKEY;清按键标志LCALLDelay_Time;延时，等待通电稳定LCALLMainINIT;主程序初始化MAIN:JNBbKEY,MAIN_1;KEY=1,有键按下LCALLKeyScan;键扫描CJNEA,#3,MAIN_1LCALLTimeSet;进入时间设置MAIN_1:LCALLSec_Change;检测秒是否变化JNCMAIN;1-秒有变化，显示；0-秒无变化，返回LCALLTime_Read;读取时间MOVSEC,TIME;保存秒数据，用于检测秒变化LCALLTime_Display;显示时间JMPMAIN;循环进行实验内容介绍与PCF8563测试;主程序初始化MainINIT:LCALLLCD_INIT;液晶显示初始化LCALLPCF8563_INIT;PCF8563初始化LCALLBackGround;显示背景，即显示不会变化的部分LCALLTime_Read;读取时间,读取的时间数据存放在TIME中MOVSEC,TIME;保存秒数据，用于检测秒变化LCALLTime_Display;显示时间SETBIT0;跳沿触发SETBEX0;开中断0SETBEA;开按键中断RET;*;时间显示;*;检测秒变化,给出判断标志F0,1-秒有变化；0-秒无变化Sec_Change:LCALLSec_Read;读取秒CJNEA,SEC,Sec_Change_1;与前一次读取的秒比较，判断秒是否有变化CLRCRETSec_Change_1:SETBCRET;显示时间背景 BackGround:MOVDPTR,#PIC2;显示2MOVA,#2MOVB,#8LCALLByteDisL;显示1个字节子程序，左单屏MOVDPTR,#PIC0;显示0MOVA,#2MOVB,#16LCALLByteDisLMOVDPTR,#BG1;第1行背景-MOVA,#2;起始显示行：第2行MOVB,#40;起始显示列：第40列LCALLByteDisLMOVDPTR,#BG1MOVA,#2MOVB,#0LCALLByteDisRMOVDPTR,#BG2;第2行背景:MOVA,#4MOVB,#48LCALLByteDisL;显示1个字节子程序,左半屏MOVDPTR,#BG2MOVA,#4MOVB,#8LCALLByteDisR;显示1个字节子程序,右半屏RETBG1:;-DB 000H,000H,000H,000H,000H,000H,000H,000H,001H,001H,001H,001H,001H,001H,001H,001HBG2:;:DB 000H,000H,000H,0C0H,0C0H,000H,000H,000H,000H,000H,000H,030H,030H,000H,000H,000H;*;时间显示;*;时间显示,时间数据在TIME缓冲区中,顺序：秒，分，时，日，周，月，年Time_Display:LCALLDisplay_SecLCALLDisplay_MinLCALLDisplay_HourLCALLDisplay_DayLCALLDisplay_WeekLCALLDisplay_MonthLCALLDisplay_YearRET;显示秒Display_Sec:MOVA,TIME;显示秒ANLA,#0F0HSWAPAACALLTEMPChangeMOVA,#4;起始显示行在第4行(从第0行开始算)MOVB,#16;起始显示列在第16列(从第0列开始算)LCALLByteDisR;显示秒，右半屏MOVA,TIMEANLA,#0FHLCALLTEMPChangeMOVA,#4MOVB,#24LCALLByteDisRRET;显示分Display_Min:MOVA,TIME+1;显示分ANLA,#0F0HSWAPALCALLTEMPChange;时间数据转换为图形显示数据MOVA,#4;起始显示行在第4行(从第0行开始算)MOVB,#56;起始显示列在第56列(从第0列开始算)LCALLByteDisL;显示分，左半屏MOVA,TIME+1ANLA,#0FHLCALLTEMPChangeMOVA,#4MOVB,#0LCALLByteDisRRET;显示小时Display_Hour:MOVA,TIME+2;显示小时ANLA,#0F0HSWAPALCALLTEMPChange;时间数据转换为图形显示数据MOVA,#4;起始显示行在第4行(从第0行开始算)MOVB,#32;起始显示列在第32列(从第0列开始算)LCALLByteDisL;显示小时，左半屏MOVA,TIME+2ANLA,#0FHLCALLTEMPChangeMOVA,#4MOVB,#40LCALLByteDisLRET;显示日Display_Day:MOVA,TIME+3ANLA,#0F0HSWAPALCALLTEMPChange;时间数据转换为图形显示数据MOVA,#2;起始显示行在第2行(从第0行开始算)MOVB,#8;起始显示列在第0列(从第0列开始算)LCALLByteDisR;显示日，右半屏MOVA,TIME+3ANLA,#0FHLCALLTEMPChangeMOVA,#2MOVB,#16LCALLByteDisRRET;显示周Display_Week:MOVA,TIME+4LCALLWeekChange;周数据转换为图形显示数据MOVA,#2;起始显示行在第2行(从第0行开始算)MOVB,#32;起始显示列在第32列(从第0列开始算)LCALLWeekDisplay;显示周，右半屏RETWeekDisplay:PUSHACC;A,B-X行,Y列序数PUSHBLCALLByteDisR;右半屏显示一个字节子程序POPACCADDA,#8MOVB,APOPACCPUSHACCPUSHBLCALLByteDisR;显示第2个字母POPACCADDA,#8MOVB,APOPACCLCALLByteDisR;显示第3个字母RET;显示月Display_Month:MOVA,TIME+5ANLA,#0F0HSWAPALCALLTEMPChange;时间数据转换为图形显示数据MOVA,#2;起始显示行在第2行(从第0行开始算)MOVB,#48;起始显示列在第40列(从第0列开始算)LCALLByteDisL;显示月，左半屏MOVA,TIME+5ANLA,#0FHLCALLTEMPChangeMOVA,#2MOVB,#56LCALLByteDisLRET;显示年Display_Year:MOVA,TIME+6ANLA,#0F0HSWAPALCALLTEMPChange;时间数据转换为图形显示数据MOVA,#2;起始显示行在第2行(从第0行开始算)MOVB,#24;起始显示列在第16列(从第0列开始算)LCALLByteDisL;显示年，左半屏MOVA,TIME+6ANLA,#0FHLCALLTEMPChangeMOVA,#2MOVB,#32LCALLByteDisLRET;时间数据转换为图形显示数据的起始地址，存在TEMPDis中TEMPChange:RLAMOVB,AMOVDPTR,#Time_TabMOVCA,A+DPTRXCHA,BINCAMOVCA,A+DPTRMOVDPL,AMOVDPH,BRETTime_Tab:DWPIC0, PIC1, PIC2, PIC3, PIC4, PIC5, PIC6, PIC7, PIC8, PIC9PIC0:;- 文字: 0 -DB 000H,0E0H,010H,008H,008H,010H,0E0H,000H,000H,00FH,010H,020H,020H,010H,00FH,000HPIC1:;- 文字: 1 -DB 000H,010H,010H,0F8H,000H,000H,000H,000H,000H,020H,020H,03FH,020H,020H,000H,000HPIC2:;- 文字: 2 -DB 000H,070H,008H,008H,008H,088H,070H,000H,000H,030H,028H,024H,022H,021H,030H,000HPIC3:;- 文字: 3 -DB 000H,030H,008H,088H,088H,048H,030H,000H,000H,018H,020H,020H,020H,011H,00EH,000HPIC4:;- 文字: 4 -DB 000H,000H,0C0H,020H,010H,0F8H,000H,000H,000H,007H,004H,024H,024H,03FH,024H,000HPIC5:;- 文字: 5 -DB 000H,0F8H,008H,088H,088H,008H,008H,000H,000H,019H,021H,020H,020H,011H,00EH,000HPIC6:;- 文字: 6 -DB 000H,0E0H,010H,088H,088H,018H,000H,000H,000H,00FH,011H,020H,020H,011H,00EH,000HPIC7:;- 文字: 7 -DB 000H,038H,008H,008H,0C8H,038H,008H,000H,000H,000H,000H,03FH,000H,000H,000H,000HPIC8:;- 文字: 8 -DB 000H,070H,088H,008H,008H,088H,070H,000H,000H,01CH,022H,021H,021H,022H,01CH,000HPIC9:;- 文字: 9 -DB 000H,0E0H,010H,008H,008H,010H,0E0H,000H,000H,000H,031H,022H,022H,011H,00FH,000H;周数据转换为图形显示数据的起始地址，存在TEMPDis中WeekChange:RLAMOVB,AMOVDPTR,#Week_TabMOVCA,A+DPTRXCHA,BINCAMOVCA,A+DPTRMOVDPL,AMOVDPH,BRETWeek_Tab:DWWeek0, Week1, Week2, Week3, Week4, Week5, Week6Week0:;SunDB 000H,070H,088H,008H,008H,008H,038H,000H,000H,038H,020H,021H,021H,022H,01CH,000HDB 080H,080H,000H,000H,000H,080H,080H,000H,000H,01FH,020H,020H,020H,010H,03FH,020HDB 080H,080H,000H,080H,080H,080H,000H,000H,020H,03FH,021H,000H,000H,020H,03FH,020HWeek1:;MonDB 008H,0F8H,0F8H,000H,0F8H,0F8H,008H,000H,020H,03FH,000H,03FH,000H,03FH,020H,000HDB 000H,000H,080H,080H,080H,080H,000H,000H,000H,01FH,020H,020H,020H,020H,01FH,000HDB 080H,080H,000H,080H,080H,080H,000H,000H,020H,03FH,021H,000H,000H,020H,03FH,020HWeek2:;TueDB 018H,008H,008H,0F8H,008H,008H,018H,000H,000H,000H,020H,03FH,020H,000H,000H,000HDB 080H,080H,000H,000H,000H,080H,080H,000H,000H,01FH,020H,020H,020H,010H,03FH,020HDB 000H,000H,080H,080H,080H,080H,000H,000H,000H,01FH,022H,022H,022H,022H,013H,000HWeek3:;WedDB 0F8H,008H,000H,0F8H,000H,008H,0F8H,000H,003H,03CH,007H,000H,007H,03CH,003H,000HDB 000H,000H,080H,080H,080H,080H,000H,000H,000H,01FH,022H,022H,022H,022H,013H,000HDB 000H,000H,000H,080H,080H,088H,0F8H,000H,000H,00EH,011H,020H,020H,010H,03FH,020HWeek4:;ThuDB 018H,008H,008H,0F8H,008H,008H,018H,000H,000H,000H,020H,03FH,020H,000H,000H,000HDB 008H,0F8H,000H,080H,080H,080H,000H,000H,020H,03FH,021H,000H,000H,020H,03FH,020HDB 080H,080H,000H,000H,000H,080H,080H,000H,000H,01FH,020H,020H,020H,010H,03FH,020HWeek5:;FriDB 008H,0F8H,088H,088H,0E8H,008H,010H,000H,020H,03FH,020H,000H,003H,000H,000H,000HDB 080H,080H,080H,000H,080H,080H,080H,000H,020H,020H,03FH,021H,020H,000H,001H,000HDB 000H,080H,098H,098H,000H,000H,000H,000H,000H,020H,020H,03FH,020H,020H,000H,000HWeek6:;SatDB 000H,070H,088H,008H,008H,008H,038H,000H,000H,038H,020H,021H,021H,022H,01CH,000HDB 000H,000H,080H,080H,080H,080H,000H,000H,000H,019H,024H,022H,022H,022H,03FH,020HDB 000H,080H,080H,0E0H,080H,080H,000H,000H,000H,000H,000H,01FH,020H,020H,000H,000H;*;时间设置;*TimeSet:MOVCursor,#0;时间设置识别标志，如：1-设置年，2-月TimeSet_1:LCALLCursor_Flash;令当前设置时间闪烁JNZTimeSet_2JNBbKEY,TimeSet_1LCALLKeyScan;按键扫描JZTimeSet_1TimeSet_2:MOVDPTR,#TimeSet_TDECAMOVB,ARLAADDA,BJMPA+DPTRTimeSet_T:LJMPTimeInc;1号键，时间+1LJMPTimeDec;2号键，时间-1LJMPTimeCursor;按下3号键，更改光标位置;*;时间设置操作;*;更改光标位置TimeCursor:INCCursor;按一下3号键，光标识别标志+1MOVA,CursorCJNEA,#7,TimeCursor_1;判断时间设置是否过了秒LCALLTime_Write;写入修改后的时间RET;退出时间设置TimeCursor_1:LJMPTimeSet_1;当前设置光标闪烁Cursor_Flash:MOVDPTR,#CursorFlash_TMOVA,CursorRLAJMPA+DPTRCursorFlash_T:AJMPFlash_YearAJMPFlash_MonthAJMPFlash_DayAJMPFlash_WeekAJMPFlash_HourAJMPFlash_MinAJMPFlash_Sec;年闪烁Flash_Year:MOVDPTR,#Cursor_TMOVA,#2MOVB,#24LCALLWordDisLLCALLDelay_Time;延时PUSHACCLCALLDisplay_Year;显示年Flash_Time:POPACCJNZFlash_Time1LCALLDelay_TimeFlash_Time1:RET;月闪烁Flash_Month:MOVDPTR,#Cursor_TMOVA,#2MOVB,#48LCALLWordDisLLCALLDelay_Time;延时PUSHACCLCALLDisplay_Month;显示月SJMPFlash_Time;日闪烁Flash_Day:MOVDPTR,#Cursor_TMOVA,#2MOVB,#8LCALLWordDisRLCALLDelay_Time;延时PUSHACCLCALLDisplay_Day;显示日SJMPFlash_Time;周闪烁Flash_Week:MOVDPTR,#Cursor_TMOVA,#2MOVB,#32LCALLWordDisRMOVDPTR,#Cursor_TMOVA,#2MOVB,#48LCALLByteDisRLCALLDelay_Time;延时PUSHACCLCALLDisplay_Week;显示周SJMPFlash_Time;小时闪烁Flash_Hour:MOVDPTR,#Cursor_TMOVA,#4MOVB,#32LCALLWordDisLLCALLDelay_Time;延时PUSHACCLCALLDisplay_Hour;显示小时SJMPFlash_Time;分钟闪烁Flash_Min:MOVDPTR,#Cursor_TMOVA,#4MOVB,#56LCALLByteDisLMOVA,#4MOVB,#0LCALLByteDisRLCALLDelay_Time;延时PUSHACCLCALLDisplay_Min;显示分钟LJMPFlash_Time;秒闪烁Flash_Sec:MOVDPTR,#Cursor_TMOVA,#4MOVB,#16LCALLWordDisRLCALLDelay_Time;延时PUSHACCLCALLDisplay_Sec