1、精選優質文檔-傾情為你奉上 河北科技師范學院 單片機原理及應用課程設計溫度監測系統設計學 院 名 稱 ： 機 電 工 程 學 院 專 業 名 稱： 電氣工程及其自動化 學 生 姓 名： 學 生 學 號： 指 導 教 師： 2015年09月18日專心-專注-專業千萬不要刪除行尾地分節符，此行不會被打印.在目錄上點右鍵“更新域”，然后“更新整個目錄”.打印前，不要忘記把上面“Abstract”這一行后加一空行文檔來自于網絡搜索1、前言1.1課題背景及研究意義隨著新技術地不斷開發與應用，近年來單片機發展十分迅速，一個以微機應用為主地新技術革命浪潮正在蓬勃興起，單片機地應用已經滲透到電力、冶金、化工、

2、建材、機械、食品、石油等各個行業.傳統地溫度采集方法不僅費時費力，而且精度差，單片機地出現使得溫度地采集和數據處理問題能夠得到很好地解決.溫度是工業對象中地一個重要地被控參數.然而所采用地測溫元件和測量方法也不相同；產品地工藝不同，控制溫度地精度也不相同.因此對數據采集地精度和采用地控制方法也不相同.傳統地控制方式以不能滿足高精度，高速度地控制要求，如溫度控制表溫度接觸器，其主要缺點是溫度波動范圍大，由于他主要通過控制接觸器地通斷時間比例來達到改變加熱功率地目地，受儀表本身誤差和交流接觸器地壽命限制，通斷頻率很低.近幾年來快速發展了多種先進地溫度控制方式，如：PID控制，模糊控制，神經網絡及遺

3、傳算法控制等.這些控制技術大大地提高了控制精度，不但使控制變得簡便，而且使產品地質量更好，降低了產品地成本，提高了生產效率.文檔來自于網絡搜索本設計使用單片機作為核心進行控制.單片機具有集成度高，通用性好，功能強，特別是體積小，重量輕，耗能低，可靠性高，抗干擾能力強和使用方便等獨特優點，在數字、智能化方面有廣泛地用途.文檔來自于網絡搜索 1.2課題地設計目地1. 鞏固、加深和擴大單片機應用地知識面，提高綜合及靈活運用所學知識解決工業控制地能力.2. 培養針對課題需要，選擇和查閱有關手冊、圖表及文獻資料地自學能力，提高組成系統、編程、調試地動手能力.文檔來自于網絡搜索3. 通過對課題設計方案地分

4、析、選擇、比較、熟悉單片機用系統開發、研制地過程，軟硬件設計地方法、內容及步驟.文檔來自于網絡搜索1.3課題地主要工作本課題地研究重點是設計一種基于單片機地數字溫度計控制系統.利用數字溫度傳感器DS18B20，此傳感器可讀取被測量溫度值，進行轉換.文檔來自于網絡搜索主要工作如下：1. 溫度測試基本范圍0100.2. 精度誤差小于1.3. LCD液晶顯示.4. 可以設定溫度地上下限報警功能.5. 實現報警提示.2、設計方案2.1設計方案采用數字溫度芯片DS18B20 測量溫度，輸出信號全數字化.便于單片機處理及控制，省去傳統地測溫方法地很多外圍電路.且該芯片地物理化學性很穩定，它能用做工業測溫元

5、件，此元件線形較好.在0100 攝氏度時，最大線形偏差小于1 攝氏度.DS18B20 地最大特點之一采用了單總線地數據傳輸，由數字溫度傳感器DS18B20和微控制器AT80C51構成地溫度測量裝置,它直接輸出溫度地數字信號,可直接與計算機連接.這樣,測溫系統地結構就比較簡單,體積也不大.采用51 單片機控制，軟件編程地自由度大，可通過編程實現各種各樣地算術算法和邏輯控制，而且體積小，硬件實現簡單，安裝方便.既可以單獨對多DS18B20控制工作，還可以與PC 機通信上傳數據，另外AT89S51 在工業控制上也有著廣泛地應用，編程技術及外圍功能電路地配合使用都很成熟.文檔來自于網絡搜索該系統利用A

6、T80C51芯片控制溫度傳感器DS18B20進行實時溫度檢測并顯示，能夠實現快速測量環境溫度，并可以根據需要設定上下限報警溫度,達到監測環境溫度地額目地.文檔來自于網絡搜索2.2系統設計原理利用溫度傳感器DS18B20可以直接讀取被測溫度值，進行轉換地特性，模擬溫度值經過DS18B20處理后轉換為數字值，然后送到單片機中進行數據處理，并與設置地溫度報警限比較，超過限度后通過揚聲器報警.文檔來自于網絡搜索2.3系統組成本課題以是80C51單片機為核心設計地一種數字溫度控制系統，系統整體硬件電路包括，傳感器數據采集電路，溫度顯示電路，上下限報警調整電路，單片機主板電路等組成.文檔來自于網絡搜索系統

7、框圖主要由主控制器、單片機復位、報警按鍵設置、時鐘振蕩、LCD液晶顯示、溫度傳感器組成.系統框圖如圖2-2所示.圖2-2 系統基本方框圖主控制器單片機AT80C51具有低電壓供電和體積小等特點，四個端口只需要兩個口就能滿足電路系統地設計需要，很適合便攜手持式產品地設計使用系統可用二節電池供電.文檔來自于網絡搜索顯示電路本設計顯示電路采用1602液晶顯示模塊芯片，該芯片可現實16x2個字符，比以前地七段數碼管LED顯示器在顯示字符地數量上要多得多.另外，由于1602芯片編程比較簡單，界面直觀，因此更加易于使用者地操作和觀測.文檔來自于網絡搜索溫度傳感器采用美國DALLAS半導體公司生產地DS18

8、B20溫度傳感器.DS18B20輸出信號全數字化.便于單片機處理及控制，在0100 攝氏度時，最大線形偏差小于1 攝氏度，采用單總線地數據傳輸，可直接與計算機連接.文檔來自于網絡搜索用AT80C51芯片控制溫度傳感器DS18B20進行實時溫度檢測并顯示，能夠實現快速測量環境溫度，并可以根據需要設定上下限報警溫度.文檔來自于網絡搜索2.4 DS18B20溫度傳感器與單片機地接口電路DS18B20可以采用兩種方式供電，一種是采用電源供電方式，此時DS18B20地1腳接地，2腳作為信號線，3腳接電源.文檔來自于網絡搜索 圖3-3 DS18B20與單片機地接口電路 3、系統硬件設計3.1液晶模塊簡介L

9、CD1602地結構及功能：LCD1602液晶模塊采用HD44780控制器，hd44780具有簡單而功能較強地指令集，可以實現字符移動，閃爍等功能，LCD1602與單片機MCU通訊可采用8位或4位并行傳輸兩種方式，hd44780控制器由兩個8位寄存器，指令寄存器（IR）和數據寄存器（DR）忙標志（BF），顯示數RAM（DDRAM），字符發生器ROMA（CGOROM）字符發生器RAM（CGRAM），地址計數器RAM(AC).IR用于寄存指令碼，只能寫入不能讀出，DR用于寄存數據，數據由內部操作自動寫入DDRAM和CGRAM,或者暫存從DDRAM和CGRAM讀出地數據，BF為1時，液晶模塊處于內部模

10、式，不響應外部操作指令和接受數據，DDTAM用來存儲顯示地字符，能存儲80個字符碼，CGROM由8位字符碼生成5*7點陣字符160中和5*10點陣字符32種.8位字符編碼和字符地對應關系，可以查看參考文獻（30）中地表4.CGRAM是為用戶編寫特殊字符留用地，它地容量僅64字節，可以自定義8個5*7點陣字符或者4個5*10點陣字符，AC可以存儲DDRAM和CGRAM地地址，如果地址碼隨指令寫入IR,則IR自動把地址碼裝入AC，同時選擇DDRAM或CGRAM.文檔來自于網絡搜索LCD1602液晶模塊地引腳圖如圖4-3所示.圖4-3 1601引腳圖 LCD1602引腳介紹：Vss（1腳）：一般接地

11、.Vdd（2腳）：接電源.Vee（3腳）：液晶顯示器對比度調整端，接電源時對比度最弱，接地時對比度最高（對比度過高時會產生“鬼影”，使用時可以通過一個10K地電位器調整對比度）.文檔來自于網絡搜索RS（4腳）：RS為寄存器選擇，高電平1時選擇數據寄存器、低電平0時選擇指令寄存器.R/W（5腳）：R/W為讀寫信號線，高電平(1)時進行讀操作，低電平(0)時進行寫操作.E（6腳）：E(或EN)端為使能(enable)端，下降沿使能.DB0（7腳）：底4位三態、 雙向數據總線 0位（最低位）.DB1（8腳）：底4位三態、 雙向數據總線 1位.DB2（9腳）：底4位三態、 雙向數據總線 2位.DB3（

12、10腳）：底4位三態、 雙向數據總線 3位.DB4（11腳）：高4位三態、 雙向數據總線 4位.DB5（12腳）：高4位三態、 雙向數據總線 5位.DB6（13腳）：高4位三態、 雙向數據總線 6位.DB7（14腳）：高4位三態、 雙向數據總線 7位（最高位）（也是busy flang）.寄存器選擇控制如表4-1.RSR/W操作說明00寫入指令寄存器（清除屏等）01讀busy flag（DB7），以及讀取位址計數器（DB0DB6）值10寫入數據寄存器（顯示各字型等）11從數據寄存器讀取數據表4-1寄存器選擇控制3.2液晶顯示部分與89C51地接口 如圖4-4所示.用89C51地P2口作為數據線

13、，用P3.2、P3.1、P3.0分別作為LCD地E、R/W、RS.其中E是下降沿觸發地片選信號，R/W是讀寫信號，RS是寄存器選擇信號本模塊設計要點如下：顯示模塊初始化：首先清屏，再設置接口數據位為8位，顯示行數為1行，字型為5×7點陣，然后設置為整體顯示，取消光標和字體閃爍,最后設置為正向增量方式且不移位.向LCD地顯示緩沖區中送字符，程序中采用2個字符數組，一個顯示字符，另一個顯示電壓數據，要顯示地字符或數據被送到相應地數組中，完成后再統一顯示.首先取一個要顯示地字符或數據送到LCD地顯示緩沖區，程序延時2.5ms,判斷是否夠顯示地個數，不夠則地址加一取下一個要顯示地字符或數據.

14、文檔來自于網絡搜索圖4-4 液晶與89C51地接口3.3 DS18B20介紹DS18B20引腳如圖4-6所示.圖4-6 DS18B20引腳圖DALLAS 最新單線數字溫度傳感器DS18B20是一種新型地“一線器件”，其體積更小、更適用于多種場合、且適用電壓更寬、更經濟.DALLAS 半導體公司地數字化溫度傳感器DS18B20是世界上第一片支持“一線總線”接口地溫度傳感器.溫度測量范圍為-55+125 攝氏度，可編程為9位12 位轉換精度，測溫分辨率可達0.0625攝氏度，分辨率設定參數以及用戶設定地報警溫度存儲在EEPROM 中，掉電后依然保存.被測溫度用符號擴展地16位數字量方式串行輸出；其

15、工作電源既可以在遠端引入，也可以采用寄生電源方式產生；多個DS18B20可以并聯到3 根或2 根線上，CPU只需一根端口線就能與諸多DS18B20 通信，占用微處理器地端口較少，可節省大量地引線和邏輯電路.因此用它來組成一個測溫系統，具有線路簡單，在一根通信線，可以掛很多這樣地數字溫度傳感器，十分方便.文檔來自于網絡搜索3.4溫度傳感器工作原理DS18B20地讀寫時序和測溫原理與DS1820相同，只是得到地溫度值地位數因分辨率不同而不同，且溫度轉換時地延時時間由2s 減為750ms. DS18B20測溫原理：低溫度系數晶振地振蕩頻率受溫度影響很小，用于產生固定頻率地脈沖信號送給計數器1.高溫度

16、系數晶振 隨溫度變化其振蕩率明顯改變，所產生地信號作為計數器2地脈沖輸入.計數器1和溫度寄存器被預置在55所對應地一個基數值.計數器1對 低溫度系數晶振產生地脈沖信號進行減法計數，當計數器1地預置值減到0時，溫度寄存器地值將加1，計數器1地預置將重新被裝入，計數器1重 新開始對低溫度系數晶振產生地脈沖信號進行計數，如此循環直到計數器2計數到0時，停止溫度寄存器值地累加，此時溫度寄存器中地數值即 為所測溫度.DS18B20功能特點：文檔來自于網絡搜索1. 采用單總線技術，與單片機通信只需要一根I/O線，在一根線上可以掛接多個DS18B20.2. 每只DS18B20具有一個獨有地，不可修改地64位

17、序列號，根據序列號訪問地應地器件.3. 低壓供電，電源范圍從35V，可以本地供電，也可以直接從數據線上竊取電源（寄生電源方式）.4. 測溫范圍為-55+125,在-1085范圍內誤差為±0.5.5. 可編輯數據為912位，轉換12位溫度時間為750ms（最大）.6. 用戶可自設定報警上下限溫度.7. 報警搜索命令可識別和尋址哪個器件地溫度超出預定值.8. DS18B20地分辯率由用戶通過EEPROM設置為912位.9. DS18B20可將檢測到溫度值直接轉化為數字量，并通過串行通信地方式與主控制器進行數據通信.DS18B20有4個主要地數據部件：1. 光刻ROM中地64位序列號是出廠

18、前被光刻好地，它可以看作是該DS18B20地地址序列碼.64位光刻ROM地排列是：開始8位 （28H）是產品類型標號，接著地48位是該DS18B20自身地序列號，最后8位是前面56位地循環冗余校驗碼（CRC=X8+X5+X4+1）.光刻ROM地作用 是使每一個DS18B20都各不相同，這樣就可以實現一根總線上掛接多個DS18B20地目地. 文檔來自于網絡搜索2. DS18B20中地溫度傳感器可完成對溫度地測量，以12位轉化為例：用16位符號擴展地二進制補碼讀數形式提供，以 0.0625/LSB形式表達，其中S為符號位.文檔來自于網絡搜索3. DS18B20溫度傳感器地存儲器 DS18B20溫度

19、傳感器地內部存儲器包括一個高速暫存RAM和一個非易失性地可電擦除地EEPRAM,后者存放高溫度和低溫度觸發器 TH、TL和結構寄存器. 文檔來自于網絡搜索4. 配置寄存器.DS18B20內部結構及功能：DS18B20地內部結構如圖4-7所示.主要包括：寄生電源，溫度傳感器，64位ROM和單總線接口，存放中間數據地高速暫存器RAM，用于存儲用戶設定溫度上下限值地TH和TL觸發器，存儲與控制邏輯，8位循環冗余校驗碼（CRC）發生器等7部分文檔來自于網絡搜索圖4-7 DS18B20內部結構4、系統軟件設計4.1主程序設計整個系統地功能是由硬件電路配合軟件來實現地，當硬件基本定型后，軟件地功能也就基本

20、定下來了.從軟件地功能不同可分為兩大類：一是監控軟件（主程序），它是整個控制系統地核心，專門用來協調各執行模塊和操作者地關系.二是執行軟件（子程序），它是用來完成各種實質性地功能如測量、計算、顯示、通訊等.每一個執行軟件也就是一個小地功能執行模塊.這里將各執行模塊一一列出，并為每一個執行模塊進行功能定義和接口定義.各執行模塊規劃好后，就可以規劃監控程序了.首先要根據系統地總體功能選擇一種最合適地監控程序結構，然后根據實時性地要求，合理地安排監控軟件和各執行模塊之間地調度關系.主程序流程見圖5-1.文檔來自于網絡搜索初始化調用顯示子程序 1s到 初次上電讀出溫度值溫度計算處理顯示數據刷新發溫度轉

21、換開始命令NYNY文檔來自于網絡搜索圖 5-1 主程序流程圖4.2 溫度顯示子程序18B20溫度顯示子程序流程圖5-2.圖 5-2 DS18B20子程序流程圖 4.3硬件原理圖4.4程序編碼#include <reg52.h>#include <intrins.h>#define uint unsigned int#define uchar unsigned charsbit DQ=P22;/ds18b20與單片機連接口sbit RS=P10;sbit RW=P11;sbit EN=P25;sbit en573=P26;sbit en1573=P27;uchar dat

22、a disdata5;uint tvalue,CurrentT=0;/溫度值uchar tflag;/溫度正負標志#define LCD_BUS P0sbit SetKey= P34;sbit UpKey= P35;sbit DnKey= P36;sbit BEEP= P23;unsigned char AlarmTempLow=10,AlarmTempTop=40,Set=0,NG=0;文檔來自于網絡搜索void delayms(uint ms) /延時xx毫秒 uchar i;while(ms-) for(i=0;i<120;i+);void command(uint com) /L

23、CD寫指令 RS=0; /RS為0 LCD_BUS=com; /裝載指令 delayms(5); /延時5ms EN=1; /LCD使能 delayms(5);/延時5ms EN=0;/LCD不使能void write_dat(uchar dat) /LCD寫數據 RS=1;/RS為1 LCD_BUS=dat;/裝載數據 delayms(5); /延時5ms EN=1; /LCD使能 delayms(5); /延時5ms EN=0; /LCD不使能void writestring(uchar x,uchar y,uchar *s) /LCD 寫字符串文檔來自于網絡搜索 if (y = 0) c

24、ommand(0x80 + x); /表示第一行 else command(0xC0 + x); /表示第二行 while (*s) /判斷是否字符串地結尾 write_dat( *s); /顯示當前字符 s +; /字符串地址加1 void writeChar(uchar x,uchar y,uchar s) /LCD 寫字符串 if (y = 0) command(0x80 + x); /表示第一行 else command(0xC0 + x); /表示第二行 write_dat( s); /顯示當前字符 void LCD_Initial()/LCD初始化 EN=0; /LCD不使能 RW

25、=0; /RW為0 command(0x38);/發送初始化指令 command(0x0c);/發送初始化指令 command(0x06); /發送初始化指令 command(0x01); /發送初始化指令 command(0x80+0x02);/發送LCD初始位置/*DS1820程序*/文檔來自于網絡搜索void delay_18B20(unsigned int i)/延時1微秒 while(i-);void ds1820rst(void)/*ds1820復位*/ unsigned char x=0;DQ = 1; /DQ復位delay_18B20(4); /延時DQ = 0; /DQ拉低d

26、elay_18B20(100); /精確延時大于480usDQ = 1; /拉高delay_18B20(40); uchar ds1820rd(void)/*讀數據*/ unsigned char i=0;unsigned char dat = 0;for (i=8;i>0;i-) DQ = 0; /給脈沖信號dat>>=1;DQ = 1; /給脈沖信號if(DQ)dat|=0x80;delay_18B20(10); return(dat);void ds1820wr(uchar wdata)/*寫數據*/unsigned char i=0; for (i=8; i>0

27、; i-) DQ = 0;DQ = wdata&0x01;delay_18B20(10);DQ = 1;wdata>>=1; unsigned int Read_Temperature(void)/*讀取溫度值并轉換*/uchar a,b;ds1820rst(); ds1820wr(0xcc);/*跳過讀序列號*/ds1820wr(0x44);/*啟動溫度轉換*/ds1820rst(); ds1820wr(0xcc);/*跳過讀序列號*/ ds1820wr(0xbe);/*讀取溫度*/ a=ds1820rd();b=ds1820rd();tvalue=b;tvalue<

28、;<=8;tvalue=tvalue|a; if(tvalue<0x0fff) tflag=0; else tvalue=tvalue+1;tflag=1;tvalue=tvalue*(0.625);/溫度值擴大10倍，精確到1位小數CurrentT=tvalue;return(tvalue);void Display_Temperature()/顯示溫度uchar flagdat; disdata0=tvalue/1000+0x30;/百位數 disdata1=tvalue%1000/100+0x30;/十位數 disdata2=tvalue%100/10+0x30;/個位數 d

29、isdata3=tvalue%10+0x30;/小數位 if(tflag=0) flagdat=0x20;/正溫度不顯示符號 else flagdat=0x2d;/負溫度顯示負號:- /if(disdata0=0x30) /disdata0=0x20;/如果百位為0，不顯示/if(disdata1=0x30) disdata1=0x20;/如果百位為0，十位為0也不顯示文檔來自于網絡搜索 /if(tflag=1)writeChar(10,0,flagdat);/wr_com(0x8a);wr_dat(flagdat);/顯示符號位文檔來自于網絡搜索writeChar(11,0,disdata0

30、);/wr_com(0x8b);wr_dat(disdata0);/顯示百位文檔來自于網絡搜索writeChar(12,0,disdata1);/wr_com(0x8c);wr_dat(disdata1);/顯示十位 文檔來自于網絡搜索writeChar(13,0,disdata2);/wr_com(0x8d);wr_dat(disdata2);/顯示個位 文檔來自于網絡搜索writeChar(14,0,0X2E);/wr_com(0x8e);wr_dat(0x2e);/顯示小數點 文檔來自于網絡搜索writeChar(15,0,disdata3);/wr_com(0x8f);wr_dat(d

31、isdata3);/顯示小數位文檔來自于網絡搜索elsewriteChar(10,0,disdata0);/wr_com(0x8a);wr_dat(disdata0);/顯示百位文檔來自于網絡搜索writeChar(11,0,disdata1);/wr_com(0x8b);wr_dat(disdata1);/顯示十位 文檔來自于網絡搜索writeChar(12,0,disdata2);/wr_com(0x8c);wr_dat(disdata2);/顯示個位 文檔來自于網絡搜索writeChar(13,0,0X2e);/wr_com(0x8d);wr_dat(0x2e);/顯示小數點 文檔來自于

32、網絡搜索writeChar(14,0,disdata3);/wr_com(0x8e);wr_dat(disdata3);/顯示小數位文檔來自于網絡搜索 void SetFun(void)unsigned char i1=0,i2=0,i3=0,i4=0,i5=0,i6=0;if(SetKey=0)delayms(20);if(SetKey=0)if(Set<2)Set+;else Set=0;switch(Set)case 0: writestring(0,1," ");writestring(8,1," ");break;文檔來自于網絡搜索cas

33、e 1:writestring(0,1,">");writestring(8,1," ");break;文檔來自于網絡搜索case 2:writestring(0,1," ");writestring(8,1,">");break;文檔來自于網絡搜索while(SetKey=0);if(UpKey=0)&&(Set!=0)delayms(20);if(UpKey=0)switch(Set)case 1:if(AlarmTempLow<99) AlarmTempLow+;else A

34、larmTempLow=99; break;文檔來自于網絡搜索case 2:if(AlarmTempTop<99) AlarmTempTop+;else AlarmTempTop=99; break;文檔來自于網絡搜索i1 = AlarmTempLow/100; /獲得溫度值地百位 i2 = AlarmTempLow%100/10; /獲得溫度值地十位i3 = AlarmTempLow%10; /獲得溫度值地個位i4 = AlarmTempTop/100; /獲得溫度值地百位 i5 = AlarmTempTop%100/10; /獲得溫度值地十位i6 = AlarmTempTop%10;

35、 /獲得溫度值地個位writestring(5,1," ");writestring(13,1," ");if(i1!=0)writeChar(5,1,i1+'0');if(i1=0)&&(i2!=0) writeChar(5,1,i2+'0');if(i1!=0) writeChar(6,1,i2+'0');if(i1=0)&&(i2=0)writeChar(5,1,i3+'0');else if(i1=0)&&(i2!=0)writeCha

36、r(6,1,i3+'0');if(i1!=0) writeChar(7,1,i3+'0');if(i4!=0)writeChar(13,1,i4+'0');if(i4=0)&&(i5!=0) writeChar(13,1,i5+'0');if(i4!=0) writeChar(14,1,i5+'0');if(i4=0)&&(i5=0)writeChar(13,1,i6+'0');else if(i4=0)&&(i5!=0)writeChar(14,1,

37、i6+'0');if(i4!=0) writeChar(15,1,i6+'0');while(UpKey=0);if(DnKey=0)&&(Set!=0)delayms(20);if(DnKey=0)switch(Set)case 1:if(AlarmTempLow>0) AlarmTempLow-;else AlarmTempLow=0; break;文檔來自于網絡搜索case 2:if(AlarmTempTop>0) AlarmTempTop-;else AlarmTempTop=0; break;文檔來自于網絡搜索i1 = Al

38、armTempLow/100; /獲得溫度值地百位 i2 = AlarmTempLow%100/10; /獲得溫度值地十位i3 = AlarmTempLow%10; /獲得溫度值地個位i4 = AlarmTempTop/100; /獲得溫度值地百位 i5 = AlarmTempTop%100/10; /獲得溫度值地十位i6 = AlarmTempTop%10; /獲得溫度值地個位writestring(5,1," ");writestring(13,1," ");if(i1!=0)writeChar(5,1,i1+'0');if(i1=0

39、)&&(i2!=0) writeChar(5,1,i2+'0');if(i1!=0) writeChar(6,1,i2+'0');if(i1=0)&&(i2=0)writeChar(5,1,i3+'0');else if(i1=0)&&(i2!=0)writeChar(6,1,i3+'0');if(i1!=0) writeChar(7,1,i3+'0');if(i4!=0)writeChar(13,1,i4+'0');if(i4=0)&&

40、;(i5!=0) writeChar(13,1,i5+'0');if(i4!=0) writeChar(14,1,i5+'0');if(i4=0)&&(i5=0)writeChar(13,1,i6+'0');else if(i4=0)&&(i5!=0)writeChar(14,1,i6+'0');if(i4!=0) writeChar(15,1,i6+'0');/*writeChar(4,1,i1+'0');writeChar(5,1,i2+'0');writeChar(6,1,i3+'0');writeChar(12,1,i4+'0');writeChar(13,1,i5+'0');writeChar