【正文】 ,A 。25H,下半屏待發(fā)送緩沖區(qū)：25H MOV 20H,26H MOV 21H,27H MOV R7,8 UP_SEN2: CLR SCK MOV A,24H RRC A MOV DATA1,C MOV 24H,A MOV A,25H RRC A MOV 25H,A MOV DATA2,C SETB SCK DJNZ R7,UP_SEN2 LCALL DEC_RAM DJNZ R6,UP_SEN1 SETB SEL_0 RET。***************LF_SEND***********************LF_SEND: SETB SEL 。左滾類子程序發(fā)送子程序 CLR SEL_0 MOV R6,16 。共發(fā)送字節(jié)數(shù)：L*2 MOV R7,8 。共發(fā)送一字節(jié)位數(shù)：8LF_SEN0: MOV DPH,20H MOV DPL,21H MOVX A,@DPTR MOV 24H,A 。24H,上半屏待發(fā)送緩沖區(qū)：24H MOV 26H,20H 。26H,27H地址緩存 MOV 27H,21H MOV A,21H ADD A,10H 。上、下半屏數(shù)據(jù)地址相差：hex((L*2+1)*16) MOV 21H,A INC 20H JNC LF_SEN1 INC 20HLF_SEN1: MOV DPH,20H MOV DPL,21H MOVX A,@DPTR MOV 25H,A 。25H,下半屏待發(fā)送緩沖區(qū)：25H MOV 20H,26H MOV 21H,27H MOV R7,8 LF_SEN2: CLR SCK MOV A,24H RRC A MOV DATA1,C MOV 24H,A MOV A,25H RRC A MOV 25H,A MOV DATA2,C SETB SCK DJNZ R7,LF_SEN2 LCALL DEC_RAM DJNZ R6,LF_SEN0 SETB SEL_0 RET。**************M1_SHIFT***********************M1_SHIFT: SETB SEL 。16x16上滾模式字符移動子程序 CLR SEL_0 MOV 20H,00H MOV 21H,00H MOV 26H,00H MOV 27H,10H 。移位數(shù)據(jù)首址：hex(L*2) MOV R6,40 MOV R7,16 M1_SHIF1: MOV DPH,26H MOV DPL,27H MOVX A,@DPTR INC DPTR MOV 26H,DPH MOV 27H,DPL MOV DPH,20H MOV DPL,21H MOVX @DPTR,A INC DPTR MOV 20H,DPH MOV 21H,DPL DJNZ R7,M1_SHIF1 MOV R7,16 DJNZ R6,M1_SHIF1 SETB SEL_0 RET。**************M2_SHIFT***********************M2_SHIFT: SETB SEL 。32x32上滾模式字符移動子程序 CLR SEL_0 MOV 20H,00H MOV 21H,10H 。移位數(shù)據(jù)首址：hex(L*2) MOV R6,17 。待處理數(shù)據(jù)個數(shù)：L*2+1 MOV R7,33 。2個字M2_SHIF1: MOV DPH,20H MOV DPL,21H MOVX A,@DPTR MOV C,F0 RLC A MOVX @DPTR,A MOV F0,C LCALL DEC_RAM DJNZ R6,M2_SHIF1 MOV R6,17 。待處理數(shù)據(jù)個數(shù)：L*2+1 CLR C MOV A,34 。轉(zhuǎn)到下一行，相鄰兩行地址相差：（L*2+1）*2 ADD A,21H MOV 21H,A JNC M2_SHIF3 INC 20HM2_SHIF3: DJNZ R7,M2_SHIF1 SETB SEL_0 RET。**************M6_SHIFT***********************M6_SHIFT: SETB SEL 。時間模式日期字符移動子程序 CLR SEL_0 MOV 20H,00H MOV 21H,10H 。時間區(qū)移位數(shù)據(jù)首址：hex(L*2) LCALL M6_SHIF SETB SEL_0 RETM6_SHIFD: SETB SEL 。時間模式文字字符移動子程序 CLR SEL_0 MOV 20H,01H MOV 21H,20H 。數(shù)據(jù)區(qū)移位數(shù)據(jù)首址：hex(((L*2+1)*17)1) LCALL M6_SHIF SETB SEL_0 RET。*********************************************M6_SHIF: MOV R7,16 MOV R6,17 。待處理數(shù)據(jù)個數(shù)：L*2+1M6_SHIF1: MOV DPH,20H MOV DPL,21H MOVX A,@DPTR MOV C,F0 RLC A MOVX @DPTR,A MOV F0,C LCALL DEC_RAM DJNZ R6,M6_SHIF1 MOV R6,17 。待處理數(shù)據(jù)個數(shù)：L*2+1 CLR C MOV A,34 。轉(zhuǎn)到下一行，相鄰兩行地址相差：（L*2+1）*2 ADD A,21H MOV 21H,A JNC M6_SHIF3 INC 20HM6_SHIF3: DJNZ R7,M6_SHIF1 RET。***********************************************GET_T: CLR BUSY 。發(fā)送讀取時間聯(lián)絡(luò)信號 MOV R7,5 DJNZ R7,$ SETB BUSYWAITBT: MOV C,BUSY 。等待完成 JC WAITBT CLR SEL_0 MOV DPTR,1C00H 。讀取存在特定緩沖區(qū)中的時間信息 MOVX A,@DPTR MOV 40H,A INC DPTR MOVX A,@DPTR MOV 41H,A INC DPTR MOVX A,@DPTR MOV 42H,A INC DPTR MOVX A,@DPTR MOV 48H,A INC DPTR MOVX A,@DPTR MOV 49H,A INC DPTR MOVX A,@DPTR MOV 4AH,A SETB SEL_0 RET。***********************************************GET_D: CLR BUSY 。發(fā)送讀取日期聯(lián)絡(luò)信號 CLR DOWN NOP NOP NOP NOP NOP SETB BUSYWAITBD: MOV C,BUSY 。等待完成 JC WAITBD SETB DOWN RET。***************************************SAVE_NEWT: LCALL SERP 。更新時間子程序 MOV DPTR,NUM_SEG MOV 53H,DPH MOV 54H,DPL MOV 55H,53H MOV 56H,54H MOV A,51H LCALL ADDR_SHIF MOV 20H,2EH MOV 21H,2FH LCALL UPDATA_NUM MOV 55H,53H MOV 56H,54H MOV A,2FH CLR C ADD A,1 MOV 2FH,A JNC SAVE_NEWT1 INC 2EHSAVE_NEWT1: MOV A,52H LCALL ADDR_SHIF MOV 20H,2EH MOV 21H,2FH LCALL UPDATA_NUM RET。*******************************************UPDATA_NUM: SETB SEL CLR SEL_0 MOV R7,16 MOV R6,00UPDATA_NUM1: MOV DPH,55H MOV DPL,56H MOV A,R6 MOVC A,@A+DPTR MOV DPH,20H MOV DPL,21H MOVX @DPTR,A INC R6 MOV A,21H CLR C ADD A,17 。下一行地址相差：2*L+1 MOV 21H,A JNC UPDATA_NUM2 INC 20HUPDATA_NUM2: DJNZ R7,UPDATA_NUM1 SETB SEL_0 RET。*******************************************SERP: MOV A,50H 。單字節(jié)數(shù)據(jù)分離子程序 SWAP A ANL A,0FH MOV 51H,A MOV A,50H ANL A,0FH MOV 52H,A RET。*****************************************ADDR_SHIF: MOV B,16 。地址偏移子程序 MUL AB CLR C ADD A,56H MOV 56H,A JNC ADDR_SHIF1 INC 55HADDR_SHIF1: MOV A,B ADD A,55H MOV 55H,A RET。*********************************************************數(shù)據(jù)表NUM_SEG:DB 0FFH,0FFH,0FFH,0C3H,099H,091H,091H,099H,089H,089H,099H,0C3H,0FFH,0FFH,0FFH,0FFH 。0DB 0FFH,0FFH,0FFH,0F3H,0E3H,083H,0F3H,0F3H,0F3H,0F3H,0F3H,0F3H,0FFH,0FFH,0FFH,0FFH 。1DB 0FFH,0FFH,0FFH,0C3H,099H,099H,0F9H,0F3H,0E7H,0CFH,09FH,081H,0FFH,0FFH,0FFH,0FFH 。2DB 0FFH,0FFH,0FFH,0C3H,099H,099H,0F9H,0E3H,0F9H,099H,099H,0C3H,0FFH,0FFH,0FFH,0FFH 。3DB 0FFH,0FFH,0FFH,0CFH,0CFH,0C9H,0C9H,0C9H,099H,080H,0F9H,0F9H,0FFH,0FFH,0FFH,0FFH 。4DB 0FFH,0FFH,0FFH,081H,09FH,09FH,09FH,083H,0F9H,0F9H,0F3H,087H,0FFH,0FFH,0FFH,0FFH 。5DB 0FFH,0FFH,0FFH,0E3H,0E7H,0CFH,083H,099H,099H,099H,099H,0C3H,0FFH,0FFH,0FFH,0FFH 。6DB 0FFH,0FFH,0FFH,081H,0F9H,0F3H,0F3H,0E7H,0E7H,0CFH,0CFH,0CFH,0FFH,0FFH,0FFH,0FFH 。7DB 0FFH,0FFH,0FFH,0C3H,099H,099H,089H,0C3H,091H,099H,099H,0C3H,0FFH,0FFH,0FFH,0FFH 。8DB 0FFH,0FFH,0FFH,0C3H,099H,099H,099H,099H,0C1H,0F3H,0E7H,0C7H,0FFH,0FFH,0FFH,0FFH 。9NOD_SEG:DB 0FFH,0FFH,0FFH,0FFH,0E3H,0E3H,0FFH,0FFH,0FFH,0E3H,0E3H,0FFH,0FFH,0FFH,0FFH,0FFH 。:POS_SEG:DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH 。 NEV_SEG:DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,081H,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH 。DOT_SEG:DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0E3H,0E3H,0FFH,0FFH,0FFH,0FFH 。.TMP_SEG1:DB 0FFH,08FH,0AEH,08DH,0FBH,0F7H,0F7H,