【正文】 柱 Add A,80h Call SENDDC 。 Call SENDDC 。異或即相同為 0，不同為 1 NOREVERSE: RET /************************************************************************** * 函數(shù)原型 : Lcd_set_xy * 功 能 : LCD 定位坐標 **************************************************************************/ Lcd_set_xy: Mov A,Row 。有進位 DPH 加 1 JMP JIAFA2 JIAFA1: INC DPH JIAFA2: MOV A,B ADD A,DPH MOV DPH,A RET /************************************************************************** * 函數(shù)原型 : IFREVERSE * 功 能 : 判斷液晶是否要取反顯 ? **************************************************************************/ IFREVERSE: JNB REVERSE,NOREVERSE 。偏移量加 1 DJNZ R2,NUM2 DEC ROW 。判斷是否反顯 CALL SENDDC1 。下半部分 NUM2: MOV A,HZ_SZ_BIT 。開始寫下半部分 CALL Lcd_set_xy 。傳送數(shù)據(jù) INC HZ_SZ_BIT 。上部分 MOV HZ_SZ_BIT,0 NUM1: MOV A,HZ_SZ_BIT MOVC A,A+DPTR CALL IFREVERSE 。數(shù)放于 BA CALL JIAFA 。指向下一個字的地址 MOV A,COL ADD A,12 MOV COL,A RET /************************************************************************** * 函數(shù)原型 : LCD_NUM * 功 能 : 寫數(shù)字子程序 **************************************************************************/ LCD_NUM:MOVDPTR,TAB_NUM MOV B,16 。傳送數(shù)據(jù) INC HZ_SZ_BIT 。偏移量為 12 MOVC A,A+DPTR CALL IFREVERSE 。尋址 MOV R2,12 。偏移量加 1 DJNZ R2,HANZI3 INC ROW 。判斷是否反顯 CALL SENDDC1 。調(diào)用加法 CALL Lcd_set_xy MOV R2,12 。一個數(shù)字由 24 十六進制數(shù)組成 MUL AB 。命令 CALL LCDCLR 。發(fā)送命令 MOV A,00001100B 。 對比度 / 偏置電壓 C0H~CBH CALL SENDDC MOV A,00100000B 。使用擴展指令。暫存差值 MOV A,R5 SUBBA,0 JC NEXT INC R4 MOV R5,A MOV A,R7 MOV R6,A NEXT: DJNZB,COM MOV A,R3 MOV R0,A MOV A,R4 MOV R1,A MOV A,30H RET /************************************************************************** * 函數(shù)原型 : BCD * 功 能 : 雙字節(jié) BCD 碼轉(zhuǎn)換， R0,R1 中是 16 位二進制數(shù)，其中 R0 中是高 8 位 , 結(jié)果存放在 50H,51H,52H 中 **************************************************************************/ BCD: MOV 30H,A MOV R2, 0 MOV R3, 0 MOV R5, 16 LOOP: CLR C MOV A,R1 RLC A MOV R1,A MOV A,R0 RLC A MOV R0,A MOV A,R3 ADDC A,R3 DA A MOV R3,A MOV A,R2 ADDC A,R2 DA A MOV R2,A DJNZR5,LOOP MOV B,16 MOV A,R3 DIV AB MOV 50H,R2 MOV 51H,A MOV 52H,B MOV A,30H RET /************************************************************************** * 函數(shù)原型 : DPLY_JL * 功 能 : LCD 初始化子程序 **************************************************************************/ LCD_INIT: CLR LCD_RES 。 R2 為最高位 **************************************************************************/ CHENGFA: MOV A,R1 MOV B,11H MUL AB MOV R4,A MOV R3,B MOV A,R0 MOV B,11H MUL AB ADD A,R3 MOV R3,A MOV A,B ADDC A,00H MOV R2,A RET /************************************************************************** * 函數(shù)原型 : CHENGFA * 功 能 : 三字節(jié)除以 1000，除數(shù) R2， R3， R4。個位 CALL LCD_NUM RET /************************************************************************** * 函數(shù)原型 : LCD_W * 功 能 : 對液晶寫剛開始需顯示的數(shù)據(jù) **************************************************************************/ LCD_W: MOV ROW,0 。百位 CALL LCD_NUM MOV A,51H 。調(diào)用語音報距程序 JM1: CALL DELAY_200ms TL: LJMP MAIN L4: CLR TR1 CLR EX1 LJMP MAIN /************************************************************************** * 函數(shù)原型 : DPLY_JL * 功 能 : 屏幕距離數(shù)據(jù)更新子程序 **************************************************************************/ DPLY_JL:MOV ROW,2 。距離值更新 JB ,JM1 。調(diào)用雙字節(jié)除法子程序 CALL BCD 。接收成功標志位是不否為 1，如果沒就跳轉(zhuǎn)到 L2 CALL CHENGFA 。定時器 T1 是否有溢出，如果沒就跳轉(zhuǎn)到 L3 LJMP L4 。停止發(fā)送超聲波 SETB EX1 。開始發(fā)送超聲波 CALL DELAY_8ms 。定時器的設(shè)置 MAIN: MOV TH1,00H MOV TL1,00H JB ,JM0 CALL ISD_1720 JM0: CLR TF1 CLR F0 SETB EA CLR IT1 SETB TR1 。語音芯片定點播放的 結(jié)束地址高八位為 00H CALL LCD_W 。LCD 初始化 MOV ST_H,00H 。距離緩沖區(qū)初始化 MOV 51H,0 MOV 52H,0 CLR REVERSE 。等 9 參考文獻 1 張迎新 .單片機初級教程 —— 單片機基礎(chǔ) . 北京航空航天大學出版社 2 張永楓 .單片機應用實訓教程 清華大學出版社 25 10附 錄 主電路原理圖 與 PCB 圖 26 圖 101 主電路原理圖 圖 102 主電路 PCB圖 語音電路原理圖 和 PCB 圖 27 圖 103 語音電路原理圖 圖 104語音電路 PCB圖 硬件電路板外觀圖片 28 圖 105 未上電硬件電路板外觀圖 圖 105 未上電硬件電路板外觀圖 源程序： REVERSE BIT ST_L EQU 60H ST_H EQU 61H ED_LEQU 62H ED_H EQU 63H SR0_L EQU 64H SR0_H EQU 65H SR1 EQU 66H SEND_BIT EQU 67H HZ_SZ_BIT EQU 68H ROW EQU 71H COL EQU 72H SS BIT SCLK BIT MOSI BIT MOSO BIT LCD_SCLK BIT LCD_SDIN BIT LCD_DC BIT LCD_RES BIT LCD_SCE BIT ORG 0000H SJMPMAIN1 ORG 0013H LJMP SUB_1 /************************************************************************** *************** 主程序 *********************************** **************************************************************************/ MAIN1: MOV SP,80H CALL ISD_INT 。在設(shè)計中可以添加一個溫 度傳感器，進行溫度補償，使得結(jié)果更加準確；一些功能實現(xiàn)方法可以改變，如 40kHz的脈沖產(chǎn)生，可以用 40kHz 的晶振振出 40kHz的脈沖。