【正文】 8AH=1 0 00 101(地址) 0 LCALL WRDT 。寫入 MOV DPTR,DHZTAB6 LCALL DHZ LCALL KEYIN 。鍵盤輸入2位BCD碼 MOV 30H,84H 。時(shí)地址84H=1 0 00 010(地址) 0 LCALL WRDT 。寫入 MOV DPTR,DHZTAB7 LCALL DHZ LCALL KEYIN 。鍵盤輸入2位BCD碼 MOV 30H,82H 。分地址82H=1 0 00 001(地址) 0 LCALL WRDT 。寫入 MOV DPTR,DHZTAB8 LCALL DHZ LCALL KEYIN 。鍵盤輸入2位BCD碼 MOV 30H,80H 。秒地址80H=1 0 00 000(地址) 0 LCALL WRDT 。寫入 RET。*****************************************************KEYIN: LCALL DELAY_1S MOV R0,30H 。鍵盤輸入2位BCD碼 MOV R4,2 KEYIN1: JNB 00H,KEYIN1 CLR 00H MOV A,DATA_F LCALL LP MOV @R0,A INC R0 DJNZ R4,KEYIN1 MOV A,30H SWAP A ADD A,31H 。組合成壓縮的BCD碼如02H+03H23H MOV 31H,A LCALL DELAY_1S MOV A,01H 。清除LCD顯示器 LCALL COMMAND_GLCD RETLP: PUSH ACC ADD A,30H LCALL WRITE_GLCD POP ACC RET。WRDT: MOV R0,30H LCALL WRRTC RETDHZTAB1: DW 0A2B0H,0A2B0H,0B5E7H,0A2B0H,0A2B0H,0A2DBHDHZTAB0: DW 0A3D7H,0A3C8H,0A3D9H,0A2B0H,0A6ADH,0A6AFH,0A3D4H,0A3BFHDHZTAB2: DW 0A1EFH,0A3D9H,0A3BAHDHZTAB3: DW 0A1EFH,0A3CDH,0A3BAHDHZTAB4: DW 0A1EFH,0A3C4H,0A3BAHDHZTAB5: DW 0A1EFH,0A3D7H,0A3BAHDHZTAB6: DW 0A1EFH,0A3C8H,0A3BAHDHZTAB7: DW 0A1EFH,0A3EDH,0A3BAHDHZTAB8: DW 0A1EFH,0A3D3H,0A3BAHDHZTAB9: DW 0A1EFH,0BDBBH,0A1A0H,0CDA8H,0A1A0H,0B5C6H,0A1EFHDHZTABA: DW 0C7EBH,0D1A1H,0D4F1H,0B4E6H,0B4A2H,0C0E0H,0D0CDHDHZTABB: DW 0C7EBH,0CAE4H,0C8EBH,0C1BDH,0CEBBH,0CAFDH,0A3BAHDHZTABC: DW 0C7EBH,0D1A1H,0D4F1H,0B6C1H,0C8A1H,0C0E0H,0D0CDHDHZTABD: DW 0B6C1H,0C8A1H,0C8E7H,0CFC2H,0A3BAHDHZTABE: DW 0A1F1H,0D7F3H,0A1A0H,0A1F1H,0C7B0H,0A1A0H,0A1F1H,0D3D2HDHZTAC: DW 0B7A2H,0CBCDH,0D6D0HDHZTAB: DW 0D2D1H,0B7A2H,0CDEAHTAB: DW 0D0C7H,0C6DAH 。39。星期39。************顯示漢字16X16點(diǎn)陣************************DHZ: MOV ADDR,ADDR1 。 開始行位置 MOV R7,N1 。 顯示數(shù)量DHZ1: MOV A,ADDR ORL A,80H 。 送顯示地址 LCALL COMMAND_GLCD 。調(diào)寫命令子程序DHZ2: CLR A MOVC A,@A+DPTR 。 查找漢字的高位碼 INC DPTR LCALL WRITE_GLCD 。 送顯示 CLR A MOVC A,@A+DPTR 。 查找漢字的低位碼 INC DPTR LCALL WRITE_GLCD 。 送顯示 DJNZ R7,DHZ2 RET。點(diǎn)陣式 LCD（128X64）模塊顯示實(shí)驗(yàn)。LCD 初始化工作 INITIAL_GLCD: MOV A,30H 。功能設(shè)定0 0 1 DL 0 RE 0 0 LCALL COMMAND_GLCD 。DL=0/1(4/8位數(shù)據(jù)),RE=0/1(基本/擴(kuò)充指令) MOV A,30H 。功能設(shè)定 LCALL COMMAND_GLCD MOV A,30H LCALL COMMAND_GLCD 。S=0顯示畫面整體不移動(dòng) MOV A,06H 。游標(biāo)不顯示。但是字會(huì)閃爍I/D=1光標(biāo)向左移動(dòng) 地址1 LCALL COMMAND_GLCD 。0 0 0 0 0 1 I/D S I/D=0光標(biāo)向右移動(dòng) 地址+1 MOV A,01H 。清除顯示器 LCALL COMMAND_GLCD MOV A,0CH 。顯示狀態(tài)00001DCB, D=0/1顯示關(guān)/開 LCALL COMMAND_GLCD 。C=0/1光標(biāo)顯示關(guān)/開,B=0/1光標(biāo)位置字符不反白/反白 RET。檢查LCD 忙碌標(biāo)志CHKBUSY_GLCD: PUSH ACC MOV DPTR,R_B_GLCD 。讀標(biāo)志地址CHK: MOVX A,@DPTR JB ,CHK 。判別是不是忙? POP ACC RET。寫命令到 GLCDCOMMAND_GLCD: CLR EA PUSH DPH PUSH DPL LCALL CHKBUSY_GLCD 。判別是不是忙? MOV DPTR,W_C_GLCD MOVX @DPTR,A 。寫入命令 POP DPL POP DPH SETB EA RET。寫數(shù)據(jù)到 GLCDWRITE_GLCD: CLR EA PUSH DPH PUSH DPL LCALL CHKBUSY_GLCD 。判別是不是忙? MOV DPTR,W_D_GLCD 。寫入數(shù)據(jù) MOVX @DPTR,A POP DPL POP DPH SETB EA RET。清除 LCD 的顯示幕CLEAR_GLCD: MOV A,01H 。清除顯示器 LCALL COMMAND_GLCD RET。***********串行通訊發(fā)送****************TONGXIF: MOV TMOD,20H 。t1工作在2 ，16位的定時(shí)器 MOV TH1,0E8H 。波特率=1200 MOV TL1,0E8H SETB TR1 。 啟動(dòng)T1 CLR ET1 。禁止T1中斷 MOV SCON,50H 。串行控制寄存器 01010000b,方式1,8位數(shù)據(jù) 第四位REN=1，則啟動(dòng)串行口的接收器RDX， MOV PCON,00H 。 MOV 48H,1PQ0: MOV R0,30H MOV R7,11JD9: LCALL RDDATA 。讀記錄數(shù) MOV @R0,A INC R0 INC 48H LCALL DELAY10 DJNZ R7,JD9 MOV R7,11 MOV R0,30HPQ1: MOV A,@R0 。送值 MOV SBUF,A 。啟動(dòng)發(fā)送PQ2: JBC TI,PQ3 。判發(fā)送中斷標(biāo)志位 AJMP PQ2PQ3: INC R0 LCALL DELAY10 DJNZ R7,PQ1 LCALL YAN300 SETB EX1 RET。*****************串行通訊接收****************************TONGXIS: MOV TMOD,20H 。t1工作在2，16位定時(shí) MOV TH1,0E8H 。波特率=1200 串行通信中每秒鐘傳遞的位數(shù) MOV TL1,0E8H SETB TR1 。啟動(dòng)T1 CLR ET1 。 禁止T1溢出中斷 MOV SCON,50H 。串行控制寄存器 01010000b,方式1,8位數(shù)據(jù) 第四位REN=1，則啟動(dòng)串行口的接收器RDX， 。開始應(yīng)禁止接收