【正文】 。不到末地址繼續(xù)接收數(shù)據(jù) MOV R2,03H 。* 接著送 INC DPTR 。方式一時(shí)第一屏標(biāo)志 RT: POPB POPDPL POPDPH POPA POPPSW CLRRS0 reti 。清屏子程 CLR: MOV R2,00H MOV A,00H CL1: MOVX DPTR,A INC DPTR DJNZ R2,CL1 RET 。入棧保護(hù) PUSH DPL 。關(guān)顯示 MOV DPH,1CH MOV DPL,14H 。對(duì)應(yīng)行數(shù)從顯示緩沖區(qū)取相應(yīng)的字節(jié)送 A JNB 03H, ZHENG CPL A ZHENG: MOV SBUF, A 。送回低地址 JNC DR1 DR2: JNB TI, DR2 。行數(shù)清 0 CLR 02H 。 POP DPL 。 33 CHMODE: CLR01H 。初始 1C MOV 1BH,1EH 。是 0C? MOV DPTR,RUNROM 。是 02? MOV DPTR,MODE2 。是 04? MOV DPTR,MODE4 。是 06? MOV DPTR,MODE6 ?；謴?fù)工作寄存器區(qū) 0 MOV SP,50H 。 TIMEUP: ACALL LOADA 。分三屏 :一九九五年 34 ACALL INST 。字位置指針 一屏初始化一次 MOV DPTR,2032H ACALL SDSCRZ MOV DPTR,2021H ACALL SDSCRZ MOV DPTR,NAN ACALL RDZ RET LOADB: ACALL CLR1E 。月 ACALL RDZ MOV DPTR,2021H ACALL SDSCR MOV DPTR,RII 。期 35 ACALL RDZ MOV DPTR,2021H 。從第二字符位置開始 MOV DPTR,2021H ACALL SDSCR MOV DPTR,DAN ACALL RDZ MOV DPTR,2021H ACALL SDSCR MOV DPTR,FEN ACALL RDZ MOV DPTR,2021H ACALL SDSCR MOV DPTR,MAO ACALL RDZ RET 。 MOV R0,00H 。月 ACALL SDSCR MOV DPTR,2021H 。分 ACALL SDSCR MOV DPTR,2021H 。 ADD A,0FH 。寫 _ MOV A,R1 ADD A,10H 。查鍵 *** ACALL DELY JNB , $ 。 JJ: MOV DPTR,200BH 。月 M72: CJNE R6,3,M73 MOV DPTR,2021H 。分 M76: CJNE R6,7,M77 MOV DPTR,2021H 。是星期嗎 ? ****** CJNE R2,06H,FXQ 。SET=0 開始計(jì)數(shù) MOVX DPTR,A RET 38 。讀點(diǎn)陣 到顯示區(qū) MOV A,R3 ACALL NUADR 。星期是跳過高位 ACALL NUADRZ 。讀點(diǎn)陣到顯示區(qū) RET DIW: MOV A,R3 CJNE A,07H,F7 。標(biāo)志期星還原 RET 。讀 146818 MOV R3,A 。一二三 MOV B,20H SJMP NUBNZ NUADR: MOV DPTR,XNB 。 RDZ: MOV R7,20H SJMP RZN RDN: MOV R7,10H RZN: CLR A MOVC A,A+DPTR MOVX R0,A INC DPTR INC R0 DJNZ R7,RZN RET 。置 1 MOV R7,1AH 。裝顯示 RAM 40 LCALL LOAD 。 MODE2: LCALL MLEFT 。1c1B, 上電 1C:1FH, 1B:1EH MOV A,10H 。因 001=FF DJNZ 用 NN0: MOV 2FH,A 。高位結(jié)果送 2EH MOV DPTR,0000H 。送移動(dòng)區(qū) INC DPTR 。存 字庫(kù)地址 MOV R5,DPH 。顯示 RAM 右上角指針 .第一行 CAGAIN2:MOV DPH,1BH 。C MOV R0,A 。移動(dòng)區(qū)指針加 1 CJNE R0,38H,NEXT8 。為 0,切換 MOV 1CH,1BH MOV 1BH,A 。延時(shí) NEXT8: CJNE R0,40H,CAGAIN2 。為 0,切換 MOV 1CH,1BH MOV 1BH,A 。延時(shí) DJNZ R3,BAGAIN2 。準(zhǔn)備裝下一個(gè)字符至移動(dòng)區(qū) DJNZ 2EH,AGAIN2 。從 F0FF 開始 ,最后一字符 SUBB A,10H 。裝完否 ? RET 。RAM 字庫(kù)指針 MOV 7DH,00H 。入口 :7CH,7DH 字庫(kù)地址 ACALL INST ACALL ZOUT DJNZ R7,XAG ACALL ZOUT RET LOAD: MOV R0,00H 。讀入 MOV P2,R2 。HELP 區(qū)指針加 1 CJNE R0,00H,LD 。 INST: MOV R1,00H 。讀入 DEC R0 。送顯示 RAM 指針 ANL A,0FH 。讀 HELP 區(qū)相應(yīng)字節(jié) MOV P2,1FH 。指向下一個(gè)字符 MOV R1,A 。上移一行后 ,延時(shí) INC R1 。 ZOUT: MOV R1,08H 。讀入 DEC R0 。送顯示 RAM 指針 ANL A,0FH 。送到字符的最后一個(gè)字節(jié) INC R0 。夠 8 行空了 嗎 ? RET 。右移 LCALL LDELY 。返回 。裝顯示區(qū) (1F001FFF)子程指針 MOV R7,1AH MD5: MOVX A,DPTR 。字庫(kù)指針加 1 INC R0 。01111111 MOV 23H,00H XCLR1: MOV R4,22H 。* LCALL XCL 。 XCL: MOV P2,1FH 。對(duì)一行屏蔽子程 MOV A,R1 。二 DB 00H,00H,10H,0F8H,00H,00H,00H,00H,00H,00H,00H,04H,0FEH,00H,00H,00H, DB 00H,00H,7FH,00H,00H,00H,00H,3FH,00H,00H,00H,00H,00H,0FFH,0。０ DB 00H,00H,0E0H,30H,18H,18H,18H,18H,18H,18H,18H,18H,30H,0E0H,00H,00H, DB 00H,00H,00H,00H,00H,00H,00H,0FFH,00H,00H,00H,00H,00H,00H,00H,00H,。讀顯示 RAM ANL A,R4 MOVX R0,A INC R0 CJNE R0,00H,XCL 。送起始字節(jié) INC 23H LCALL XCL1 。* RR A 。到 256 字節(jié)了嗎 ? MOV 18H,0FFH LCALL DLDL LCALL XCLR 45 DJNZ R7,MD5 AJMP MODE5 。送顯示 RAM 高位地址 MOVX R0,A 。調(diào)清屏程序 MOV DPTR,0000H 。時(shí)間 LCALL LDELY 。左移 LCALL LDELY 。FF 是顯示區(qū)的最后一個(gè)字節(jié) LCALL LDELY 。一個(gè)字符沒移完 ,再移 CLRA 。送入 44 INC R0 。顯示區(qū)指針 MOV P2,1FH 。一屏全部移入了嗎 ? MOV 18H,0F0H LCALL DLDL 。顯示區(qū)指針指向下一個(gè)字符 0F+1=10 FF+1=00 CJNE R0,00H,INS 。送到字符的最后一個(gè)字節(jié) MOV A,R1 。一個(gè)字符沒移完 ,再移 MOV P2,1EH 。送入 INC R0 。顯示區(qū)指針 MOV P2,1FH 。存字庫(kù)指針 MOV 7DH,DPH 。送 HELP 區(qū) INC DPTR 。送字庫(kù)指針 MOV DPH,7DH 。漢字屏數(shù) XAG: MOV R2,1EH 。上移 : 計(jì)算屏數(shù) .裝入 HELP 區(qū) 移入 移出 MODE3: LCALLMOVEUP SJMP MODE3 MOVEUP: LCALL CLEAR 。到最低端產(chǎn)生借位 42 RET SRAM: MOV R1,00H 。顯示緩沖區(qū)一行中的內(nèi)容移動(dòng)一位 MOV C,06H RLC A MOVX DPTR,A MOV 06H,C CLR C 。送字庫(kù)地址 MOV DPH,R5 。調(diào)雙顯 RAM 子程 。YES CONT: JB 02H,CONT 。調(diào)雙顯 RAM 子程 。YES WAIT: JB 02H,WAIT 。調(diào)移動(dòng)一行子程序 INC R2 。取顯示緩沖區(qū)地址 MOV A,R0 。R3 控制移動(dòng)字節(jié)為 8 位 BAGAIN2:MOV R0,30H 。內(nèi)部指針加 1 CJNE R0,40H,L2 。定義 HELP 移動(dòng)區(qū) 30~3F L2: MOVX A,DPTR 。送字符個(gè)數(shù)高位 ADDC A,01H 。加一屏空字符數(shù) JNZ NN0 。重復(fù) MLEFT: LCALL CLEAR 。顯示完時(shí) ,重初始化指針 CLR05H 。RAM 指針 MOV 7DH,00H 。1F00H: 緩沖區(qū)初始地 址 . 0000H: 點(diǎn)陣首地址 . MODE1: JB 05H,MOD1 。找字模地址 MUL AB 。準(zhǔn)備高位處理 RET 。讀狀態(tài)字 MOVX A,DPTR JB ,WAT 。底位處理 Y7: ACALL RDZ 。讀點(diǎn)陣到顯示區(qū) MOV A,R3 ACALL NUADRZ 。讀點(diǎn)陣到顯示區(qū) RET 。讀 146818 ACALL NUADR 。是則星期 =7 FXQ: MOVX DPTR,A MOV DPTR,200BH 。取出對(duì)應(yīng)地址的內(nèi)容 ADD A,01H DA A JB F0,JA1 ADD A,98H 。期星 M74: CJNE R6,5,M75 MOV DPTR,2021H 。SET=1 仃止計(jì)數(shù) MOVX DPTR,A CJNE R6,1,M71 MOV DPTR,2021H 。要修改的位置 CJNE R6,08H,NP17 MOV R6,1 。 MOVX R1,A 。 MOV A,0FFH 。在當(dāng)前要修改的項(xiàng)下畫 __. MOV B,20H 。期星 SETB 04H ACALL SDSCRZ MOV DPTR,2021H 。年 ACALL SDSCR MOV DPTR,2021H 。位置標(biāo)志 MOD7: SETB 02H 。只要低位 ACALL SDSCRZ RET LOADC: ACALL CLR1E 。空一字符 MOV R0,A MOV DPTR,XYI 。第一字顯示位置 MOV DPTR,2021H 。 18 點(diǎn) 30 分 44 秒 ACALL LOADC 。1EXX1FXX 移入 ACALL ZOUT 。進(jìn)入相應(yīng)顯示方式子程序 。是 07? MOV DPTR,MODE7 。是 05? MOV DPTR,MODE5 。是 03? MOV DPTR,MODE3