电子万年历（at89s52/6b595/74hc595/16*32点阵）-面包板社区

程序;------------------------------------------------------------------------------- ;软件环境:VWForWindows ;硬件环境:AT89C52MCU,MCS-51系列MCU,etc. ;------------------------------------------------------------------------------- ;点阵屏引脚 ;DAT[数据引脚]-------------------P1.4 ;SH[移位时钟]-------------------P1.0 ;ST[锁存时钟]-------------------P1.2 ;------------------------------------------------------------------------------- ;单片机RAM定义 ;00H-1FH（四组寄存器） ;20H-2FH（可位寻址区） ;30H-5FH（变量定义区） ;60H-9FH（第一显存区） ;A0H-DFH（第二显存区） ;E0H-FFH（堆栈） ;------------------------------------------------------------------------------- ;以下为产品接口引脚在演示程序中的预定义 ;用户在编写应用程序时,需按自己的实际硬件连线来重新定义 DATBITP1.4;数据引脚 SHBITP1.0;移位时钟 STBITP1.2;锁存时钟 ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;寄存器定义 ;R0显存地址 ;R1缓存地址 ;R2画面选择（只能为1，2，4，5） ;R3移动字幕显示类型（长还是短） ;R4比秒更小的单位 ;------------------------------------------------------------------------------- ;以下变量用于指示当前操作字符的位置的预定义 ;用户在编写应用程序时,需按自己的实际软件程序需要来重新定义 XPOSEQU20H;点阵屏横向数据 YPOS1EQU21H;点纵屏横向数据 YPOS2EQU22H;点纵屏横向数据 YPOS3EQU23H;点纵屏横向数据 YPOS4EQU24H;点纵屏横向数据 LP8EQU25H;循环8次变量 MAXEQU29H;每月最多的天数 SECEQU30H;秒寄存器 MINEQU31H;分寄存器 HOUEQU32H;时寄存器 DATEEQU33H;日寄存器 WEEKEQU34H;星期寄存器 MONEQU35H;月寄存器 YEAREQU36H;年寄存器 TMMP1EQU37H;温度小数点前 TMMP2EQU38H;温度小数点后 GAOEQU40H;高四位 DIEQU41H;第四位 TEMEQU42H;时间变量暂时存放地（个位和十位） MGAOEQU43H;移动变量高位 MDIEQU44H;移动变量低位 DPH0EQU45H;移动图案起始地址高8位 DPL0EQU46H;移动图案起始地址低8位 DPH1EQU47H;指针1高8位 DPL1EQU48H;指针1低8位 DPH2EQU49H;指针2高8位 DPL2EQU50H;指针2低8位 COMR1EQU51H;选择移动画面的类型（画面二与画面四中显示不一样） COMR3EQU52H;移动字幕的长短控制（画面二中移动字幕比较短） ;------------------------------------------------------------------------------- ORG00H;整个程序开始于00H AJMPMAIN ORG0BH AJMPTIME0;定时器程序向量 ORG030H MAIN: MOVSEC,#56H;秒赋值 MOVMIN,#51H;分赋值 MOVHOU,#22H;时赋值 MOVWEEK,#01H;星期赋值 MOVDATE,#01H;日赋值 MOVMON,#2H;月份赋值 MOVYEAR,#10H;年份初始值 MOVTMMP1,#21H;温度小数点前初始值 MOVTMMP2,#23H;温度小数点后初始值 MOVR0,#060H;显存初始地址 MOVR1,#0A0H;缓存初始地址 MOVR2,#05H;显示画面一 MOVR3,#01H;移动变量显示控制 MOVR4,#01H;20分之一秒 MOVSP,#0DFH;堆栈指向0E0H CALLCLEAR;显存请屏 MOVTMOD,#01H;选择定时器及定时器工作方式 MOVTH0,#03CH; MOVTR0,#0B0H;设置为500MS SETBTR0;开始定时器0计时 SETBEA;中断总开关开 SETBET0;定时器开 CALLLONG;选择移动图案的长度及显示长度 CALLSTARTDPTR;移动图案首地址 MOVA,DPH; MOVDPH0,A; MOVA,DPL; MOVDPL0,A;因为后面要用到DPTR所以这先把DPTR保存起来 LOOP: MOVR2,#01H LOOP1: CALLPUTIN1 CALLPROCESS CALLDISPLAY;调用显示程序 CALLDISPLAY; MOVA,SEC CJNEA,#015H,LOOP1 MOVR2,#02H MOVR3,#01H;变量选择从头开始 CALLLONG;选择移动图案的长度及显示长度 CALLSTARTDPTR;移动图案首地址 MOVA,DPH; MOVDPH0,A; MOVA,DPL; MOVDPL0,A;因为后面要用到DPTR所以这先把DPTR保存起来 LOOP2: CALLPROCESS CALLPUTIN2; CALLPUTIN22_; CALLORLL CALLDISPLAY;调用显示程序 CALLDISPLAY; MOVA,SEC CJNEA,#030H,LOOP2 MOVR2,#04H LOOP3: CALLPROCESS CALLPUTIN3; CALLPUTIN32; CALLORLL;合成PUTIN3画面与PUTIN32画面 CALLDISPLAY;调用显示程序 CALLDISPLAY MOVA,SEC; CJNEA,#045H,LOOP3 MOVR2,#05H MOVR3,#01H;变量选择从头开始 CALLLONG;选择移动图案的长度及显示长度 CALLSTARTDPTR;移动图案首地址 MOVA,DPH; MOVDPH0,A; MOVA,DPL; MOVDPL0,A;因为后面要用到DPTR所以这先把DPTR保存起来 LOOP4: CALLPROCESS CALLPUTIN4; CALLPUTIN22_; CALLORLL; CALLDISPLAY;调用显示程序 CALLDISPLAY MOVA,SEC; CJNEA,#000H,LOOP4 AJMPLOOP; ;------------------------------------------------------------------------------- ;子程序名称:CLEAR(). ;功能:显存清零 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- CLEAR: MOV@R0,#00H INCR0 CJNER0,#0A0H,CLEAR;显存清零 MOVR0,#060H RET ;------------------------------------------------------------------------------- ;############################################################################### ;###############################四种时间画面的赋值############################## ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:PUTIN1(). ;功能:画面一的RAM赋值 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN1: CALLEMPTY;RAM写入两个空值 MOVA,HOU;取出时值 CALLFIGURE;数字写入RAM CALLPOINT1 MOVA,MIN;取出分值 CALLFIGURE;数字写入RAM CALLEMPTY RET ;------------------------------------------------------------------------------- ;子程序名称:PUTIN2(). ;功能:画面二的RAM赋值 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN2: CALLEMPTY MOVA,HOU;取出时值 CALLFIGURE;数字写入RAM CALLPOINT2 MOVA,MIN;取出分值 CALLFIGURE;数字写入RAM CALLEMPTY CALLEMPTY CALLEMPTY INCR2;秒大显示大小有变化 MOVA,SEC;取出秒值 CALLFIGURE;数字写入RAM DECR2 RET ;------------------------------------------------------------------------------- ;子程序名称:PUTIN3(). ;功能:画面三的RAM赋值 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN3: MOVA,HOU;取出时值 CALLFIGURE;数字写入RAM CALLPOINT3 MOVA,MIN;取出分值 CALLFIGURE;数字写入RAM CALLEMPTY CALLEMPTY MOVA,SEC;取出秒值 CALLFIGURE;数字写入RAM RET ;------------------------------------------------------------------------------- ;子程序名称:PUTIN4(). ;功能:画面四的RAM赋值 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN4: CALLEMPTY CALLEMPTY CALLEMPTY MOVA,HOU;取出时值 CALLFIGURE;数字写入RAM CALLPOINT4 MOVA,MIN;取出分值 CALLFIGURE;数字写入RAM CALLEMPTY CALLEMPTY MOVA,SEC;取出秒值 CALLFIGURE;数字写入RAM CALLEMPTY CALLEMPTY CALLEMPTY RET ;------------------------------------------------------------------------------- ;############################################################################### ;###############################其他数据写入RAM################################# ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:PUTIN22(). ;功能: ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN22_:; MOVA,DPH0; MOVDPH,A; MOVA,DPL0; MOVDPL,A;把DPTR0中的值释放出来 PUTIN22:; MOVR1,#0A0H; MOVA,#00H; MOVCA,@A+DPTR; CJNEA,#0EEH,PUTIN22_2;判断移动固定图案是否取完 MOVA,R3 CJNEA,COMR3,PUTIN22_1;判断整个移动图案是否取完 MOVR3,#01H;控制移动变量的取值 CALLSTARTDPTR;移动字幕的初始地址 AJMPPUTIN22;回到本开始 PUTIN22_1: INCDPTR;固定图案写完，使指针指向下一图案开始 MOVA,DPH MOVDPH2,A MOVA,DPL MOVDPL2,A;保存下一图案的指针到DPH2和DPL2 CALLPUTCHAR;利用R3选择出要显示的变量，并提取出变量的十位和个位 MOVA,MGAO; CALLTAKE;换算出对应的首地址 MOVMGAO,#0FFH;十位显示完后做标记 AJMPPUTIN22;回到本开始 PUTIN22_2: MOVA,#00H MOVCA,@A+DPTR CJNEA,#0BBH,PUTIN22_5;判断变量是否显示完毕 MOVA,MDI;提取个位 CJNEA,#0FFH,PUTIN22_3;判断个位是否已经显示 AJMPPUTIN22_4;显示过则跳到固定图案 PUTIN22_3: MOVA,MDI; MOVMDI,#0FFH; CALLTAKE; AJMPPUTIN22;回到本开始 PUTIN22_4: INCR3;指向下一固定图案 MOVA,DPH2 MOVDPH,A MOVA,DPL2 MOVDPL,A;取出保存的指针 AJMPPUTIN22;回到本开始 ;------------------------------------------------------------------------------- ;子程序名称:PUTIN22_5(). ;功能:整屏显示 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN22_5: PUSHMGAO; PUSHMDI; PUSHDPH; PUSHDPL; MOVA,R3; PUSHA; MOVA,DPH2 MOVDPH1,A MOVA,DPL2 MOVDPL1,A;变量的保存 PUTIN22_6:; MOVA,#00H; MOVCA,@A+DPTR; CJNEA,#0EEH,PUTIN22_8;判断移动图案显示是否完成 MOVA,R3 CJNEA,COMR3,PUTIN22_7;判断整个移动图案是否显示完毕 MOVR3,#01H;变量控制字复位 CALLSTARTDPTR;移动固定图案的首地址 AJMPPUTIN22_6;回到初始位置 PUTIN22_7:; INCDPTR;指向下一固定图案的首地址 MOVA,DPH; MOVDPH1,A; MOVA,DPL; MOVDPL1,A;保存指针 CALLPUTCHAR; MOVA,MGAO; CALLTAKE; MOVMGAO,#0FFH;标记十位，表示已经显示 AJMPPUTIN22_6;回到初始位置 PUTIN22_8:; MOVA,#00H; MOVCA,@A+DPTR; CJNEA,#0BBH,PUTIN22_11;判断变量已经显示完毕 MOVA,MDI; CJNEA,#0FFH,PUTIN22_9;判断变量已经完全显示完毕 AJMPPUTIN22_10; PUTIN22_9:; MOVA,MDI;显示个位 MOVMDI,#0FFH; CALLTAKE; AJMPPUTIN22_6;回到初始位置 PUTIN22_10:; INCR3;指向下一固定图案 MOVA,DPH1; MOVDPH,A; MOVA,DPL1; MOVDPL,A;取出固定图案指针 AJMPPUTIN22_6;回到初始位置 PUTIN22_11:;RAM赋值 MOVA,#00H; MOVCA,@A+DPTR; MOV@R1,A; INCR1; INCDPTR; MOVA,R1 CJNEA,COMR1,PUTIN22_6;判断整屏显示是否已完成 CALLADDWEEK;画面二中有静止的星期显示 POPA; MOVR3,A; POPDPL; POPDPH; INCDPTR; INCDPTR;为达到移动效果 MOVA,DPH MOVDPH0,A MOVA,DPL MOVDPL0,A POPMDI; POPMGAO;数据从堆栈弹出 MOVR1,#0A0H RET; ;------------------------------------------------------------------------------- ;子程序名称:PUTIN32(). ;功能:画面三中温度的合成 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTIN32: MOVR0,#0A0H; CALLEMPTY; CALLEMPTY; DECR2; DECR2; MOVA,TMMP1; CALLFIGURE; CALLPOINT32; MOVA,TMMP2; CALLFIGURE; CALLCHAR_C; MOVR0,#060H; INCR2; INCR2; RET; ;------------------------------------------------------------------------------- ;############################################################################### ;###############################缓存与显存相或################################## ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:ORLL(). ;功能:缓存与显存相或. ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- ORLL: MOVR0,#060H; MOVR1,#0A0H; ORLL1: MOVA,@R1; ORLA,@R0; MOV@R0,A; INCR0; INCR1; CJNER0,#0A0H,ORLL1; MOVR0,#060H; MOVR1,#0A0H; RET; ;------------------------------------------------------------------------------- ;############################################################################### ;##################################一列空格##################################### ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:EMPTY(). ;功能:连续写入两个'0'到RAM. ;输入:00H. ;输出:@R0=0. ;影响:DPTR,R0,@R0. ;------------------------------------------------------------------------------- EMPTY: MOV@R0,#00H INCR0 MOV@R0,#00H INCR0 RET ;------------------------------------------------------------------------------- ;############################################################################### ;##################################时间计算##################################### ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:PROCESS(). ;功能:时间换算程序. ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PROCESS: MOVA,SEC CJNEA,#060H,PROCESSEND MOVSEC,#00H INCMIN MOVA,MIN DAA MOVMIN,A CJNEA,#060H,PROCESSEND MOVMIN,#00H INCHOU MOVA,HOU DAA MOVHOU,A CJNEA,#024H,PROCESSEND MOVHOU,#00H INCWEEK MOVA,WEEK CJNEA,#08H,PROCESS1 MOVWEEK,#01H PROCESS1: INCDATE MOVA,DATE DAA LCALLMAXDATE MOVA,DATE CJNEA,MAX,PROCESSEND MOVDATE,#01H INCMON MOVA,MON DAA MOVMON,A CJNEA,#013H,PROCESSEND MOVMON,#01H INCYEAR MOVA,YEAR DAA MOVYEAR,A PROCESSEND: RET ;------------------------------------------------------------------------------- ;子程序名称:MAXDATE(). ;功能:算出每月的最多天数. ;输入:. ;输出:? ;影响:. ;------------------------------------------------------------------------------- MAXDATE: MOVA,MON DECA MOVB,#05H; MULAB; MOVDPTR,#MAXDATE1; JMP@A+DPTR; MAXDATE1:; MOVMAX,#032H;因为主程序是相等则循序执行所以这里用的是月最大天数加一 AJMPMAXDATEEND; MOVMAX,#031H; AJMPMAXDATEEND; MOVMAX,#032H AJMPMAXDATEEND MOVMAX,#031H AJMPMAXDATEEND MOVMAX,#032H AJMPMAXDATEEND MOVMAX,#031H AJMPMAXDATEEND MOVMAX,#032H AJMPMAXDATEEND MOVMAX,#032H AJMPMAXDATEEND MOVMAX,#031H AJMPMAXDATEEND MOVMAX,#032H AJMPMAXDATEEND MOVMAX,#031H AJMPMAXDATEEND MOVMAX,#032H AJMPMAXDATEEND MAXDATEEND: RET ;------------------------------------------------------------------------------- ;############################################################################### ;#################################代表秒的点#################################### ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:POINT1(). ;功能:RAM中写入代表秒的点（画面一）. ;输入:. ;输出:? ;影响:. ;------------------------------------------------------------------------------- POINT1: CALLEMPTY MOVA,R4 CJNEA,#0AH,POINT11 POINT11: JCPOINT12 CALLEMPTY CALLEMPTY AJMPPOINT1END POINT12: MOV@R0,#6H INCR0 MOV@R0,#030H INCR0 MOV@R0,#06H INCR0 MOV@R0,#030H INCR0 POINT1END: CALLEMPTY RET ;------------------------------------------------------------------------------- ;子程序名称:POINT2(). ;功能:RAM中写入代表秒的点（画面二）. ;输入:00H. ;输出:无. ;影响:R0,@R0. ;------------------------------------------------------------------------------- POINT2: CALLEMPTY MOVA,R4 CJNEA,#0AH,POINT21 POINT21: JCPOINT22 CALLEMPTY AJMPPOINT2END POINT22: MOV@R0,#00H INCR0 MOV@R0,#036H INCR0 POINT2END: CALLEMPTY RET ;------------------------------------------------------------------------------- ;子程序名称:POINT3(). ;功能:RAM中写入代表秒的点（画面三）. ;输入:00H. ;输出:无. ;影响:R0,@R0. ;------------------------------------------------------------------------------- POINT3: CALLEMPTY MOVA,R4 CJNEA,#0AH,POINT31 POINT31: JCPOINT322 CALLEMPTY AJMPPOINT3END POINT322: MOV@R0,#36H INCR0 MOV@R0,#00H INCR0 POINT3END: CALLEMPTY RET ;------------------------------------------------------------------------------- ;子程序名称:POINT4(). ;功能:RAM中写入代表秒的点（画面四）. ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- POINT4: CALLEMPTY MOVA,R4 CJNEA,#0AH,POINT41 POINT41: JCPOINT42 CALLEMPTY AJMPPOINT4END POINT42: MOV@R0,#050H INCR0 MOV@R0,#00H INCR0 POINT4END: CALLEMPTY RET ;------------------------------------------------------------------------------- ;############################################################################### ;###################################其它图样#################################### ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:POINT32(). ;功能:RAM中写入温度小数点（画面三）. ;输入:. ;输出:无. ;影响:. ;修改日期:2010.01.27 ;------------------------------------------------------------------------------- POINT32: CALLEMPTY MOV@R0,#00H INCR0 MOV@R0,#03H INCR0 CALLEMPTY RET ;------------------------------------------------------------------------------- ;子程序名称:CHAR_C(). ;功能:RAM中写入温度符号（画面三）. ;输入:. ;输出:无. ;影响:. ;修改日期:2010.01.27 ;------------------------------------------------------------------------------- CHAR_C: MOVDPTR,#TAB32_C CHAR_C1: MOVA,#00H MOVCA,@A+DPTR MOV@R0,A INCR0 INCDPTR MOVA,#00H MOVCA,@A+DPTR CJNEA,#0BBH,CHAR_C1 RET ;------------------------------------------------------------------------------- ;############################################################################### ;################################查表并写入RAM################################## ;############################################################################### ;------------------------------------------------------------------------------- ;------------------------------------------------------------------------------- ;子程序名称:FIGURE(). ;功能:数字写入RAM ;输入:A. ;输出:A. ;影响:@R0. ;------------------------------------------------------------------------------- FIGURE: CALLBRING;分离小时的十位和个位 MOVA,GAO; CALLFIND;DPTR值寻址 CALLRAM;寻址到的数据写入RAM CALLEMPTY;RAM写入两个空值 MOVA,DI CALLFIND CALLRAM RET ;------------------------------------------------------------------------------- ;子程序名称:BRING(). ;功能:提取十位和个位 ;输入:A. ;输出:. ;影响:. ;------------------------------------------------------------------------------- BRING: MOVTEM,A ANLA,#0FH MOVDI,A MOVA,TEM SWAPA ANLA,#0FH MOVGAO,A RET ;------------------------------------------------------------------------------- ;子程序名称:RAM(). ;功能:把查表的数据写入RAM ;输入:@DPTR. ;输出:@R0. ;影响:DPTR,R0. ;------------------------------------------------------------------------------- RAM: MOVA,#00H;偏移量清零 MOVCA,@A+DPTR;查表 MOV@R0,A;显存赋值 INCDPTR;表格地址加一 INCR0;显存地址加一 MOVA,#00H; MOVCA,@A+DPTR; CJNEA,#0BBH,RAM;数字赋值完成 RAMEND: RET ;------------------------------------------------------------------------------- ;子程序名称:FIND(). ;功能:分别提取十位和个位数字在表格中的首地址 ;输入:43H(TEM0). ;输出:40H（GAO）,41H（DI）. ;影响:42H（TEM）. ;------------------------------------------------------------------------------- FIND:; CALLPICTURE;选择将要送入首地址的值 MOVB,#05H; MULAB; JMP@A+DPTR; TDPTR1:;画面一数字查表 MOVDPTR,#TAB11_0; AJMPFINDEND; MOVDPTR,#TAB11_1; AJMPFINDEND; MOVDPTR,#TAB11_2; AJMPFINDEND; MOVDPTR,#TAB11_3; AJMPFINDEND; MOVDPTR,#TAB11_4; AJMPFINDEND; MOVDPTR,#TAB11_5; AJMPFINDEND; MOVDPTR,#TAB11_6; AJMPFINDEND; MOVDPTR,#TAB11_7; AJMPFINDEND; MOVDPTR,#TAB11_8; AJMPFINDEND; MOVDPTR,#TAB11_9; AJMPFINDEND; TDPTR2:;画面二数字查表 MOVDPTR,#TAB21_0; AJMPFINDEND; MOVDPTR,#TAB21_1; AJMPFINDEND; MOVDPTR,#TAB21_2; AJMPFINDEND; MOVDPTR,#TAB21_3; AJMPFINDEND; MOVDPTR,#TAB21_4; AJMPFINDEND; MOVDPTR,#TAB21_5; AJMPFINDEND; MOVDPTR,#TAB21_6; AJMPFINDEND; MOVDPTR,#TAB21_7; AJMPFINDEND; MOVDPTR,#TAB21_8; AJMPFINDEND; MOVDPTR,#TAB21_9; AJMPFINDEND; TDPTR22:;画面二数字查表 MOVDPTR,#TAB21_0_; AJMPFINDEND; MOVDPTR,#TAB21_1_; AJMPFINDEND; MOVDPTR,#TAB21_2_; AJMPFINDEND; MOVDPTR,#TAB21_3_; AJMPFINDEND; MOVDPTR,#TAB21_4_; AJMPFINDEND; MOVDPTR,#TAB21_5_; AJMPFINDEND; MOVDPTR,#TAB21_6_; AJMPFINDEND; MOVDPTR,#TAB21_7_; AJMPFINDEND; MOVDPTR,#TAB21_8_; AJMPFINDEND; MOVDPTR,#TAB21_9_; AJMPFINDEND; TDPTR3:;画面三数据查表 MOVDPTR,#TAB31_0; AJMPFINDEND; MOVDPTR,#TAB31_1; AJMPFINDEND; MOVDPTR,#TAB31_2; AJMPFINDEND; MOVDPTR,#TAB31_3; AJMPFINDEND; MOVDPTR,#TAB31_4; AJMPFINDEND; MOVDPTR,#TAB31_5; AJMPFINDEND; MOVDPTR,#TAB31_6; AJMPFINDEND; MOVDPTR,#TAB31_7; AJMPFINDEND; MOVDPTR,#TAB31_8; AJMPFINDEND; MOVDPTR,#TAB31_9; AJMPFINDEND; TDPTR4:;画面三数据查表 MOVDPTR,#TAB41_0; AJMPFINDEND; MOVDPTR,#TAB41_1; AJMPFINDEND; MOVDPTR,#TAB41_2; AJMPFINDEND; MOVDPTR,#TAB41_3; AJMPFINDEND; MOVDPTR,#TAB41_4; AJMPFINDEND; MOVDPTR,#TAB41_5; AJMPFINDEND; MOVDPTR,#TAB41_6; AJMPFINDEND; MOVDPTR,#TAB41_7; AJMPFINDEND; MOVDPTR,#TAB41_8; AJMPFINDEND; MOVDPTR,#TAB41_9; AJMPFINDEND; FINDEND:; RET ;------------------------------------------------------------------------------- ;子程序名称:PICTURE(). ;功能:选择将要送入首地址的值. ;输入:R2. ;输出:无. ;影响:无. ;------------------------------------------------------------------------------- PICTURE: CJNER2,#1H,PICTURE1 MOVDPTR,#TDPTR1; AJMPPICEND PICTURE1: CJNER2,#2H,PICTURE22 MOVDPTR,#TDPTR2;画面二的时间和画面三中的温度均要使用此查表指令 AJMPPICEND PICTURE22: CJNER2,#3H,PICTURE3 MOVDPTR,#TDPTR22;画面二中数字大小不一样 AJMPPICEND PICTURE3: CJNER2,#4H,PICTURE4 MOVDPTR,#TDPTR3; AJMPPICEND PICTURE4: MOVDPTR,#TDPTR4 PICEND: RET ;------------------------------------------------------------------------------- ;子程序名称:PUTCHAR(). ;功能:利用R3选择出要显示的变量 ;输入:R3. ;输出:. ;影响:. ;------------------------------------------------------------------------------- PUTCHAR: CJNER3,#1,CHAR1 MOVA,YEAR CALLBRING_ AJMPCHAREND;取出变量各位和十位对应的首地址 CHAR1: CJNER3,#2,CHAR2 MOVA,MON CALLBRING_ AJMPCHAREND CHAR2: CJNER3,#3,CHAR3 MOVA,DATE CALLBRING_ AJMPCHAREND CHAR3: CJNER3,#4,CHAR4 MOVA,WEEK CALLBRING_ AJMPCHAREND CHAR4: CJNER3,#5,CHAR5 MOVA,TMMP1 CALLBRING_ AJMPCHAREND CHAR5: CJNER3,#6,CHAREND MOVA,TMMP2 CALLBRING_ AJMPCHAREND CHAREND: RET ;------------------------------------------------------------------------------- ;子程序名称:BRING_(). ;功能:提取十位和个位 ;输入:A. ;输出:40H（MGAO）,41H（DI）. ;影响:42H（TEM）. ;------------------------------------------------------------------------------- BRING_: MOVTEM,A ANLA,#0FH MOVMDI,A MOVA,TEM SWAPA ANLA,#0FH MOVMGAO,A RET ;------------------------------------------------------------------------------- ;子程序名称:STARTDPTR(). ;功能:选择移动图案首地址的位置 ;输入:R2. ;输出:. ;影响:. ;------------------------------------------------------------------------------- STARTDPTR: CJNER2,#2H,STARTDPTR1 MOVDPTR,#TAB22_ AJMPSTARTDPTREND STARTDPTR1: CJNER2,#5H,STARTDPTREND MOVDPTR,#TAB42_ STARTDPTREND: RET ;------------------------------------------------------------------------------- ;子程序名称:LONG(). ;功能:选择移动图案的长度及显示长度 ;输入:R2. ;输出:. ;影响:. ;------------------------------------------------------------------------------- LONG:; CJNER2,#2H,LONG1 MOVCOMR3,#04H MOVCOMR1,#0D0H AJMPLONGEND LONG1: CJNER2,#5H,LONGEND MOVCOMR3,#06H MOVCOMR1,#0E0H LONGEND: RET ;------------------------------------------------------------------------------- ;子程序名称:ADDWEEK(). ;功能:画面二中有静止的星期显示 ;输入:. ;输出:. ;影响:. ;------------------------------------------------------------------------------- ADDWEEK: CJNER1,#0E0H,ADDWEEK1 AJMPADDWEEKEND ADDWEEK1: MOVA,WEEK DECA MOVDPTR,#ADDWEEK2 MOVB,#05H MULAB; JMP@A+DPTR; ADDWEEK2: MOVDPTR,#TAB22_W1; AJMPADDWEEK3; MOVDPTR,#TAB22_W2; AJMPADDWEEK3; MOVDPTR,#TAB22_W3; AJMPADDWEEK3; MOVDPTR,#TAB22_W4; AJMPADDWEEK3; MOVDPTR,#TAB22_W5; AJMPADDWEEK3; MOVDPTR,#TAB22_W6; AJMPADDWEEK3; MOVDPTR,#TAB22_W7; AJMPADDWEEK3; ADDWEEK3: MOVA,#00H MOVCA,@A+DPTR CJNEA,#0BBH,ADDWEEK4 AJMPADDWEEKEND ADDWEEK4: MOV@R1,A INCR1 INCDPTR AJMPADDWEEK3 ADDWEEKEND: RET ;------------------------------------------------------------------------------- ;子程序名称:TAKE(). ;功能:移动图案变量首地址赋值 ;输入:R2,R3. ;输出:. ;影响: ;------------------------------------------------------------------------------- TAKE: CJNER3,#4H,TAKE1 MOVDPTR,#TDPTR42 AJMPTAKE3 TAKE1: CJNER2,#2,TAKE2 MOVDPTR,#TDPTR22_ AJMPTAKE3 TAKE2: CJNER2,#5,TAKE2 MOVDPTR,#TDPTR32 AJMPTAKE3 TAKE3: MOVB,#05H; MULAB; JMP@A+DPTR; TDPTR22_:;画面二数字查表 MOVDPTR,#TAB22_0; AJMPTAKEDEND; MOVDPTR,#TAB22_1; AJMPTAKEDEND; MOVDPTR,#TAB22_2; AJMPTAKEDEND; MOVDPTR,#TAB22_3; AJMPTAKEDEND; MOVDPTR,#TAB22_4; AJMPTAKEDEND; MOVDPTR,#TAB22_5; AJMPTAKEDEND; MOVDPTR,#TAB22_6; AJMPTAKEDEND; MOVDPTR,#TAB22_7; AJMPTAKEDEND; MOVDPTR,#TAB22_8; AJMPTAKEDEND; MOVDPTR,#TAB22_9; AJMPTAKEDEND; TDPTR32:;画面四数字查表 MOVDPTR,#TAB42_0; AJMPTAKEDEND; MOVDPTR,#TAB42_1; AJMPTAKEDEND; MOVDPTR,#TAB42_2; AJMPTAKEDEND; MOVDPTR,#TAB42_3; AJMPTAKEDEND; MOVDPTR,#TAB42_4; AJMPTAKEDEND; MOVDPTR,#TAB42_5; AJMPTAKEDEND; MOVDPTR,#TAB42_6; AJMPTAKEDEND; MOVDPTR,#TAB42_7; AJMPTAKEDEND; MOVDPTR,#TAB42_8; AJMPTAKEDEND; MOVDPTR,#TAB42_9; AJMPTAKEDEND; TDPTR42: ;画面四星期查表 MOVDPTR,#TAB42_W0; AJMPTAKEDEND; MOVDPTR,#TAB42_W1; AJMPTAKEDEND; MOVDPTR,#TAB42_W2; AJMPTAKEDEND; MOVDPTR,#TAB42_W3; AJMPTAKEDEND; MOVDPTR,#TAB42_W4; AJMPTAKEDEND; MOVDPTR,#TAB42_W5; AJMPTAKEDEND; MOVDPTR,#TAB42_W6; AJMPTAKEDEND; MOVDPTR,#TAB42_W7; AJMPTAKEDEND; TAKEDEND: RET ;------------------------------------------------------------------------------- ;############################################################################### ;###############################点阵屏显示子程序################################ ;############################################################################### ;------------------------------------------------------------------------------- ;子程序名称:DISPLAY(). ;功能:点阵屏显示子程序 ;输入:RAM（060H-09FH）. ;输出:无. ;影响:20H，21H，22H，23H，24H，25H，A. ;------------------------------------------------------------------------------- DISPLAY: CLRSH;移位时钟清零 CLRST;锁存始终清零 MOVYPOS1,#080H;纵行移动赋值'10000000b' MOVYPOS2,#00H; MOVYPOS3,#00H; MOVYPOS4,#00H; MOVR0,#060H;显存起始地址 DISAGAIN:; CALLDISY;纵行显示程序调用 MOVA,@R0;RAM中的值A CALLDISX;横行显示调整程序调用 CALLDISOUT;把A中的值送到数据线DAT上 INCR0;RAM地址加1 MOVA,@R0; CALLDISX; CALLDISOUT; INCR0; MOVA,YPOS1; CALLDISOUT; MOVA,YPOS2; CALLDISOUT; MOVA,YPOS3; CALLDISOUT; MOVA,YPOS4; CALLDISOUT; SETBST; CLRST; JBYPOS1.7,DISEND;判断整个显存内容是否已经显示完成 AJMPDISAGAIN; DISEND: MOVA,#00H;再次给送显示数据，消除屏幕最后一列过于亮的BUG CALLDISOUT MOVA,#00H CALLDISOUT MOVA,#80H CALLDISOUT MOVA,#00H CALLDISOUT MOVA,#00H CALLDISOUT MOVA,#000H CALLDISOUT SETBST; CLRST; MOVR0,#060H RET ;------------------------------------------------------------------------------- ;子程序名称:DISY(). ;功能:纵行显示程序子程序（每次只能显示一纵行） ;输入:21H,22H,23H,24H. ;输出:21H,22H,23H,24H. ;影响:21H,22H,23H,24H，,A. ;------------------------------------------------------------------------------- DISY: MOVA,YPOS1; RLCA;把21H大高位'1'给'C' MOVA,YPOS4; RLCA;把上面从21H中取出的高位（C）给24H的首位 MOVYPOS4,A; MOVA,YPOS3; RLCA; MOVYPOS3,A; MOVA,YPOS2; RLCA; MOVYPOS2,A; MOVA,YPOS1; RLCA; MOVYPOS1,A;首次运行本子程序后个寄存器的值为:21H（00000000B），22H（00000000B），23H（00000000B），24H（00000001B） RET ;------------------------------------------------------------------------------- ;子程序名称:DISX(A). ;功能:横行显示调整程序（电路设计时为了方便，用程序调整锁存器引脚对应的横行） ;输入:A. ;输出:A. ;影响:20H（可位寻址去第一个寄存器），A. ;------------------------------------------------------------------------------- DISX: RLCA MOV04H,C RLCA MOV05H,C RLCA MOV03H,C RLCA MOV00H,C RLCA MOV02H,C RLCA MOV01H,C RLCA MOV06H,C RLCA MOV07H,C MOVA,XPOS RET ;------------------------------------------------------------------------------- ;子程序名称:DISOUT(). ;功能:把A中的值送到数据线DAT上 ;输入:A. ;输出:无. ;影响:A，25H. ;------------------------------------------------------------------------------- DISOUT: CLRSH MOVLP8,#08H DISOUT1: RLCA MOVDAT,C SETBSH CLRSH DJNZLP8,DISOUT1 RET ;------------------------------------------------------------------------------- ;子程序名称:TIME0(). ;功能:定时器0中断程序 ;输入:. ;输出:无. ;影响:. ;------------------------------------------------------------------------------- TIME0: PUSHPSW PUSHA MOVTH0,#03CH MOVTL0,#0B0H INCR4 CJNER4,#14H,TIME01 MOVR4,#00H INCSEC MOVA,SEC DAA MOVSEC,A TIME01: POPA POPPSW RETI ;------------------------------------------------------------------------------- ;############################################################################### ;##################################数据表格##################################### ;############################################################################### ;------------------------------------------------------------------------------- ;画面一 ;------------------------------------------------------------------------------- ;画面一中的时间变量 TAB11_0: DB03FH,0FCH,03FH,0FCH,030H,00CH,030H,00CH,03FH,0FCH,03FH,0FCH,0BBH;0 TAB11_1: DB000H,000H,000H,000H,000H,000H,000H,000H,03FH,0FCH,03FH,0FCH,0BBH;1 TAB11_2: DB031H,0FCH,031H,0FCH,031H,08CH,031H,08CH,03FH,08CH,03FH,08CH,0BBH;2 TAB11_3: DB031H,08CH,031H,08CH,031H,08CH,031H,08CH,03FH,0FCH,03FH,0FCH,0BBH;3 TAB11_4: DB03FH,080H,03FH,080H,001H,080H,001H,080H,03FH,0FCH,03FH,0FCH,0BBH;4 TAB11_5: DB03FH,08CH,03FH,08CH,031H,08CH,031H,08CH,031H,0FCH,031H,0FCH,0BBH;5 TAB11_6: DB03FH,0FCH,03FH,0FCH,031H,08CH,031H,08CH,031H,0FCH,031H,0FCH,0BBH;6 TAB11_7: DB030H,000H,030H,000H,030H,000H,030H,000H,03FH,0FCH,03FH,0FCH,0BBH;7 TAB11_8: DB03FH,0FCH,03FH,0FCH,031H,08CH,031H,08CH,03FH,0FCH,03FH,0FCH,0BBH;8 TAB11_9: DB03FH,08CH,03FH,08CH,031H,08CH,031H,08CH,03FH,0FCH,03FH,0FCH,0BBH;9 ;------------------------------------------------------------------------------- ;画面二 ;------------------------------------------------------------------------------- ;画面二中的时间变量1及画面三中的温度变量数字 TAB21_0: DB000H,07FH,000H,041H,000H,041H,000H,07FH,0BBH;0 TAB21_1: DB000H,000H,000H,000H,000H,000H,000H,07FH,0BBH;1 TAB21_2: DB000H,04FH,000H,049H,000H,049H,000H,079H,0BBH;2 TAB21_3: DB000H,049H,000H,049H,000H,049H,000H,07FH,0BBH;3 TAB21_4: DB000H,078H,000H,008H,000H,008H,000H,07FH,0BBH;4 TAB21_5: DB000H,079H,000H,049H,000H,049H,000H,04FH,0BBH;5 TAB21_6: DB000H,07FH,000H,049H,000H,049H,000H,04FH,0BBH;6 TAB21_7: DB000H,040H,000H,040H,000H,040H,000H,07FH,0BBH;7 TAB21_8: DB000H,07FH,000H,049H,000H,049H,000H,07FH,0BBH;8 TAB21_9: DB000H,079H,000H,049H,000H,049H,000H,07FH,0BBH;9 ;------------------------------------------------------------------------------- ;画面二中的时间变量2 TAB21_0_: DB000H,01FH,000H,011H,000H,01FH,0BBH;0 TAB21_1_: DB000H,000H,000H,000H,000H,01FH,0BBH;1 TAB21_2_: DB000H,017H,000H,015H,000H,01DH,0BBH;2 TAB21_3_: DB000H,015H,000H,015H,000H,01FH,0BBH;3 TAB21_4_: DB000H,01CH,000H,004H,000H,01FH,0BBH;4 TAB21_5_: DB000H,01DH,000H,015H,000H,017H,0BBH;5 TAB21_6_: DB000H,01FH,000H,015H,000H,017H,0BBH;6 TAB21_7_: DB000H,010H,000H,010H,000H,01FH,0BBH;7 TAB21_8_: DB000H,01FH,000H,015H,000H,01FH,0BBH;8 TAB21_9_: DB000H,01DH,000H,015H,000H,01FH,0BBH;9 ;------------------------------------------------------------------------------- ;画面二中移动字幕 TAB22_: DB063H,000H,085H,000H,089H,000H,091H,000H,061H,000H,000H,000H DB07EH,000H,081H,000H,081H,000H,081H,000H,07EH,000H,000H,000H;20 DB0EEH DB000H,000H,010H,000H,010H,000H,010H,000H,010H,000H,010H DB000H,000H,000H;- DB0EEH DB000H,000H,010H,000H,010H,000H,010H,000H,010H,000H,010H DB000H,000H,000H;- DB0EEH DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0EEH;______ ;------------------------------------------------------------------------------- ;画面二中的移动数字变量 TAB22_0: DB07EH,000H,081H,000H,081H,000H,081H,000H,07EH,000H,000H,000H,0BBH;0 TAB22_1: DB000H,000H,041H,000H,0FFH,000H,001H,000H,000H,000H,000H,000H,0BBH;1 TAB22_2: DB063H,000H,085H,000H,089H,000H,091H,000H,061H,000H,000H,000H,0BBH;2 TAB22_3: DB042H,000H,081H,000H,091H,000H,091H,000H,06EH,000H,000H,000H,0BBH;3 TAB22_4: DB000H,000H,034H,000H,044H,000H,0FFH,000H,004H,000H,000H,000H,0BBH;4 TAB22_5: DB0F2H,000H,091H,000H,091H,000H,091H,000H,08EH,000H,000H,000H,0BBH;5 TAB22_6: DB07EH,000H,091H,000H,091H,000H,0D1H,000H,00EH,000H,000H,000H,0BBH;6 TAB22_7: DB080H,000H,080H,000H,08FH,000H,0B0H,000H,0C0H,000H,000H,000H,0BBH;7 TAB22_8: DB076H,000H,089H,000H,089H,000H,089H,000H,076H,000H,000H,000H,0BBH;8 TAB22_9: DB070H,000H,08BH,000H,089H,000H,089H,000H,07EH,000H,000H,000H,0BBH;9 ;------------------------------------------------------------------------------- ;画面二中的星期变量 TAB22_W1: DB000H,000H,000H,000H,000H,000H,020H,080H,07FH,080H,000H,080H,000H,000H,000H,000H,0BBH;1 TAB22_W2: DB000H,000H,000H,000H,021H,080H,042H,080H,044H,080H,048H,080H,030H,080H,000H,000H,0BBH;2 TAB22_W3: DB000H,000H,000H,000H,040H,080H,048H,080H,048H,080H,048H,080H,037H,000H,000H,000H,0BBH;3 TAB22_W4: DB000H,000H,000H,000H,006H,000H,01AH,000H,022H,000H,07FH,080H,002H,000H,000H,000H,0BBH;4 TAB22_W5: DB000H,000H,000H,000H,078H,080H,048H,080H,048H,080H,048H,080H,04FH,080H,000H,000H,0BBH;5 TAB22_W6: DB000H,000H,000H,000H,07FH,080H,048H,080H,048H,080H,048H,080H,06FH,080H,000H,000H,0BBH;6 TAB22_W7: DB000H,000H,000H,000H,07FH,080H,048H,080H,048H,080H,048H,080H,07FH,080H,000H,000H,0BBH;日 ;------------------------------------------------------------------------------- ;画面三 ;------------------------------------------------------------------------------- ;画面三中的时间变量 TAB31_0: DB07FH,000H,041H,000H,041H,000H,07FH,000H,0BBH;0 TAB31_1: DB000H,000H,000H,000H,000H,000H,07FH,000H0BBH;1 TAB31_2: DB04FH,000H,049H,000H,049H,000H,079H,000H,0BBH;2 TAB31_3: DB049H,000H,049H,000H,049H,000H,07FH,000H0BBH;3 TAB31_4: DB078H,000H,008H,000H,008H,000H,07FH,000H,0BBH;4 TAB31_5: DB079H,000H,049H,000H,049H,000H,04FH,000H0BBH;5 TAB31_6: DB07FH,000H,049H,000H,049H,000H,04FH,000H,0BBH;6 TAB31_7: DB040H,000H,040H,000H,040H,000H,07FH,000H0BBH;7 TAB31_8: DB07FH,000H,049H,000H,049H,000H,07FH,000H,0BBH;8 TAB31_9: DB079H,000H,049H,000H,049H,000H,07FH,000H,0BBH;9 ;------------------------------------------------------------------------------- ;画面三中的温度符号 TAB32_C: DB000H,000H,000H,060H,000H,01CH,000H,022H,000H DB041H,000H,041H,000H,022H,000H,000H,000H,000H;C DB0BBH ;------------------------------------------------------------------------------- ;画面四 ;------------------------------------------------------------------------------- ;画面四中的时间 TAB41_0: DB0F8H,000H,088H,000H,0F8H,000H,0BBH;0 TAB41_1: DB000H,000H,000H,000H,0F8H,000H,0BBH;1 TAB41_2: DB0B8H,000H,0A8H,000H,0E8H,000H,0BBH;2 TAB41_3: DB0A8H,000H,0A8H,000H,0F8H,000H,0BBH;3 TAB41_4: DB0E0H,000H,020H,000H,0F8H,000H,0BBH;4 TAB41_5: DB0E8H,000H,0A8H,000H,0B8H,000H,0BBH;5 TAB41_6: DB0F8H,000H,0A8H,000H,0B8H,000H,0BBH;6 TAB41_7: DB080H,000H,080H,000H,0F8H,000H,0BBH;7 TAB41_8: DB0F8H,000H,0A8H,000H,0F8H,000H,0BBH;8 TAB41_9: DB0E8H,000H,0A8H,000H,0F8H,000H,0BBH;9 ;------------------------------------------------------------------------------- ;画面四中的移动字幕 TAB42_: DB000H,040H,000H,040H,000H,090H,001H,010H,002H,090H,004H,071H,002H,016H,001H,018H DB000H,080H,000H,040H,000H,040H,000H,000H,000H,041H,004H,041H,004H,042H,004H,044H DB004H,058H,007H,0E0H,004H,058H,004H,044H,004H,042H,004H,041H,000H,041H,000H,000H DB000H,011H,000H,012H,000H,01CH,007H,0D4H,005H,052H,005H,05FH,005H,055H,005H,055H DB007H,0D5H,000H,015H,000H,011H,000H,000H,000H,0C6H,001H,00AH,001H,012H,001H,022H DB000H,0C2H,000H,000H,000H,0FCH,001H,002H,001H,002H,001H,002H,000H,0FCH,000H,000H;今天是20 DB0EEH DB000H,088H,001H,008H,006H,078H,002H,048H,002H,048H,003H,0FFH,002H,048H,002H,048H DB002H,048H,002H,008H,000H,000H,000H,000H;年 DB0EEH DB000H,000H,000H,001H,000H,002H,007H,0FCH,004H,090H,004H,090H,004H,091H,004H,091H DB007H,0FFH,000H,000H,000H,000H,000H,000H;月 DB0EEH DB000H,000H,000H,000H,007H,0FFH,004H,042H,004H,042H,004H,042H,004H,042H,004H,042H DB004H,042H,007H,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,005H,000H,009H,007H,0F5H,005H,055H,005H,055H,005H,07FH,005H,055H,005H,055H DB005H,055H,007H,0D5H,000H,001H,000H,000H,002H,009H,007H,0FAH,002H,0ACH,002H,0A8H DB007H,0FCH,002H,00AH,000H,001H,007H,0FEH,004H,090H,004H,091H,007H,0FFH,000H,000H DB000H,000H;日星期 DB0EEH DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,000H,000H,000H,000H,000H,000H,000H,004H,08FH,002H,070H,000H,001H,000H,01FH DB007H,0D1H,005H,05FH,005H,051H,005H,05FH,005H,051H,007H,0DFH,000H,001H,000H,000H DB000H,003H,003H,0FCH,002H,081H,002H,089H,003H,0E9H,002H,0AEH,006H,0AAH,002H,0AEH DB003H,0E9H,002H,089H,002H,081H,000H,000H;温度 DB0EEH DB000H,000H,007H,000H,005H,000H,007H,000H,000H,000H,001H,0FCH,002H,002H,002H,002H DB002H,002H,002H,002H,001H,084H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H DB000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H;C DB0EEH ;------------------------------------------------------------------------------- ;画面四中的移动数字变量 TAB42_0: DB000H,0FCH,001H,002H,001H,002H,001H,002H,000H,0FCH,000H,000H,0BBH;0 TAB42_1: DB000H,000H,000H,082H,001H,0FEH,000H,002H,000H,000H,000H,000H,0BBH;1 TAB42_2: DB000H,0C6H,001H,00AH,001H,012H,001H,022H,000H,0C2H,000H,000H,0BBH;2 TAB42_3: DB000H,084H,001H,002H,001H,022H,001H,022H,000H,0DCH,000H,000H,0BBH;3 TAB42_4: DB000H,010H,000H,068H,000H,088H,001H,0FEH,000H,00AH,000H,000H,0BBH;4 TAB42_5: DB001H,0E4H,001H,022H,001H,022H,001H,022H,001H,01CH,000H,000H,0BBH;5 TAB42_6: DB000H,0FCH,001H,022H,001H,022H,001H,0A2H,000H,01CH,000H,000H,0BBH;6 TAB42_7: DB001H,080H,001H,000H,001H,03EH,001H,0C0H,001H,000H,000H,000H,0BBH;7 TAB42_8: DB000H,0DCH,001H,022H,001H,022H,001H,022H,000H,0DCH,000H,000H,0BBH;8 TAB42_9: DB000H,0E0H,001H,016H,001H,012H,001H,012H,000H,0FCH,000H,000H,0BBH;9 ;------------------------------------------------------------------------------- ;画面四中的星期变量 TAB42_W0: DB0BBH TAB42_W1: DB000H,020H,000H,020H,000H,020H,000H,020H,000H,020H,000H,020H,000H,020H,000H,020H DB000H,020H,000H,060H,000H,020H,000H,000H;一 DB0BBH TAB42_W2: DB000H,002H,001H,002H,001H,002H,001H,002H,001H,002H,001H,002H,001H,002H,001H,002H DB003H,002H,001H,002H,000H,002H,000H,000H;二 DB0BBH TAB42_W3: DB000H,001H,002H,001H,002H,001H,002H,021H,002H,021H,002H,021H,002H,021H,002H,021H DB006H,021H,002H,003H,000H,001H,000H,000H;三 DB0BBH TAB42_W4: DB000H,000H,007H,0FFH,004H,00AH,004H,012H,007H,0E2H,004H,002H,004H,002H,007H,0FAH DB004H,00AH,004H,00AH,007H,0FFH,000H,000H;四 DB0BBH TAB42_W5: DB000H,001H,004H,041H,004H,041H,004H,04FH,007H,0F1H,004H,041H,004H,041H,004H,041H DB004H,07FH,004H,001H,000H,001H,000H,000H;五 DB0BBH TAB42_W6: DB000H,081H,000H,082H,000H,08CH,000H,0B0H,004H,080H,003H,080H,000H,0A0H,000H,090H DB000H,08CH,000H,083H,000H,080H,000H,000H;六 DB0BBH TAB42_W7: DB000H,000H,000H,000H,007H,0FFH,004H,042H,004H,042H,004H,042H,004H,042H,004H,042H DB004H,042H,007H,0FFH,000H,000H,000H,000H;日 DB0BBH END……