找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開(kāi)始

搜索
查看: 18378|回復(fù): 14
打印 上一主題 下一主題
收起左側(cè)

基于51單片機(jī)的電表抄讀（DLT645-1997規(guī)約）

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
硬件設(shè)計(jì)：AT89S52單片機(jī)通過(guò)MAX232實(shí)現(xiàn)電平轉(zhuǎn)換與串口連接。由于電能表采用RS485通信，因此串口與電能表之間必須使用RS232/RS485轉(zhuǎn)換器UT-2216進(jìn)行連接。
軟件設(shè)計(jì)：實(shí)時(shí)時(shí)間的顯示和通信程序設(shè)計(jì)。要實(shí)現(xiàn)實(shí)時(shí)顯示就需要對(duì)DS1302時(shí)鐘芯片和液晶LCD1602進(jìn)行編程，將DS1302的數(shù)據(jù)讀出來(lái)顯示在LCD1602第一行上，LCD1602也要顯示電能表數(shù)據(jù)。通信方式為主從站方式通信，單片機(jī)為主站，主站需要發(fā)送讀數(shù)據(jù)命令幀和接收電能表應(yīng)答回復(fù)的數(shù)據(jù)，因此，就需要設(shè)計(jì)單片機(jī)發(fā)送命令和接收數(shù)據(jù)的程序。將接收到的數(shù)據(jù)儲(chǔ)存在單片機(jī)存儲(chǔ)器中，在程序中將其存于數(shù)組中。最后把數(shù)組中的數(shù)據(jù)取出來(lái)寫(xiě)入液晶LCD1602中，顯示在液晶上。

源代碼如下：
  1. # include<reg52.h>
  2. # include<intrins.h>   //包含_nop_()函數(shù)定義的頭文件
  3. # define uchar unsigned char
  4. # define uint  unsigned int
  5. sbit SCLK=P1^0;   //位定義1302芯片的接口，時(shí)鐘輸出端口定義在P1.0引腳
  6. sbit DATA=P1^1;   //位定義1302芯片的接口，數(shù)據(jù)輸出端定義在P1.1引腳
  7. sbit RST=P1^2;    //位定義1302芯片的接口，復(fù)位端口定義在P1.2引腳
  8. sbit RS=P2^0;           //寄存器選擇位，將RS位定義為P2.0引腳
  9. sbit RW=P2^1;           //讀寫(xiě)選擇位，將RW位定義為P2.1引腳
  10. sbit E=P2^2;            //使能信號(hào)位，將E位定義為P2.2引腳
  11. sbit BF=P0^7;           //忙碌標(biāo)志位，，將BF位定義為P0.7引腳
  12. uchar RecNum=0;   
  13. uint  cs;//存放校驗(yàn)碼
  14. uchar con;//存放控制碼
  15. uchar add[6];
  16. uchar idata rdata[6];
  17. uchar code string[ ]= {"Welcome to use"};
  18. uchar code string1[ ]= {"kWh"};
  19. uchar code digit[10]={"0123456789"};   //定義字符數(shù)組顯示數(shù)字
  20. unsigned char code key_code[]={ 0xee,0xde,0xbe,0x7e,0xed,0xdd,0xbd,0x7d,0xeb,0xdb,0xbb,0x7b,0xe7,0xd7,0xb7,0x77}; //鍵盤編碼
  21. uchar  add1[6]={0x53,0x50,0x00,0x00,0x00,0x00};//  存放1#電能表地址碼，（地址碼已經(jīng)確定，通過(guò)電能表測(cè)試軟件確定）
  22. uchar  add2[6];//  存放2#電能表地址碼
  23. uchar  tdata[2]={0x10,0x90};// 存放要發(fā)送的數(shù)據(jù)
  24. uchar  tdata1[2]={0x20,0x90};
  25. uchar  tdata2[2]={0x10,0x94};
  26. uchar  tdata3[2]={0x20,0x94};
  27. /***************************特殊字符定義************************/
  28. # define PRECURSOR_CHAR 0xfe;//定義前導(dǎo)字符
  29. # define START_CHAR 0x68;//定義幀起始符
  30. # define END_CHAR 0x16;//定義幀結(jié)束符
  31. /***************************接收狀態(tài)定義************************/
  32. # define RS_WAIT  0;//等待狀態(tài)
  33. # define RS_AWAKEN 1;//喚醒狀態(tài)
  34. # define RS_ADD 2;//接收地址域狀態(tài)
  35. # define RS_HEADER 3;//接收幀頭狀態(tài)
  36. # define RS_CON 4;//接收控制碼狀態(tài)
  37. # define RS_DATALEN 5;//接收數(shù)據(jù)域長(zhǎng)度狀態(tài)
  38. # define RS_DATA 6;//接收數(shù)據(jù)域狀態(tài)
  39. # define RS_CHECK 7;//接收校驗(yàn)碼狀態(tài)
  40. # define RS_END 8;//接收結(jié)束符狀態(tài)
  41. /********************************延時(shí)若干毫秒 ****************************/
  42. void delaynms(uchar n)
  43. {
  44.    uchar i,j;
  45.    while(n--)
  46.    {
  47. for(i=0;i<10;i++)
  48.    for(j=0;j<33;j++);
  49.     }
  50. }[/color][/size][/align][size=3][color=#000000][font=宋體][align=left]
  51. /*****************************延時(shí)若干微秒******************************/
  52. void delaynus(uchar n)
  53. {
  54. uchar i;
  55. for(i=0;i<n;i++);
  56. }
  57.   
  58. /************矩陣鍵盤程序***********************/[/align][align=left]uchar  keyscan()
  59. {
  60.    uchar  scan1,scan2,keycode;[/align][align=left]   P1=0xf0;
  61.    scan1=P1;
  62.    if((scan1&0xf0)!=0xf0)           //判鍵是否按下
  63.    {
  64.      delaynms(20);                   //延時(shí)20ms
  65.      scan1=P1;
  66.      if((scan1&0xf0)!=0xf0)         //二次判鍵是否按下
  67.      {
  68.         P1=0x0f;  //線反轉(zhuǎn)法的核心
  69.         scan2=P1;
  70.         keycode=scan1|scan2;         //組合成鍵編碼
  71.   }
  72.       
  73.     return(keycode);
  74.     }
  75.      
  76. }
  77. /**********************判斷液晶模塊的忙碌狀態(tài)***********************/
  78. bit BusyTest(void)
  79.   {
  80.         bit result;
  81.      RS=0;       //根據(jù)規(guī)定，RS為低電平，RW為高電平時(shí)，可以讀狀態(tài)
  82.      RW=1;
  83.      E=1;        //E=1，才允許讀寫(xiě)
  84.      _nop_();   //空操作
  85.      _nop_();
  86.      _nop_();
  87.      _nop_();   //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
  88.      result=BF;  //將忙碌標(biāo)志電平賦給result
  89.     E=0;         //將E恢復(fù)低電平
  90.     return result;
  91.   }
  92. /********************將模式設(shè)置指令或顯示地址寫(xiě)入液晶模塊************************/
  93. void WriteInstruction (uchar dictate)
  94. {   
  95.     while(BusyTest()==1);   //如果忙就等待
  96.   RS=0;                  //根據(jù)規(guī)定，RS和R/W同時(shí)為低電平時(shí)，可以寫(xiě)入指令
  97.   RW=0;   
  98.   E=0;                   //E置低電平(根據(jù)表8-6，寫(xiě)指令時(shí)，E為高脈沖，
  99.                            // 就是讓E從0到1發(fā)生正跳變，所以應(yīng)先置"0"
  100.   _nop_();
  101.   _nop_();               //空操作兩個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
  102.   P0=dictate;            //將數(shù)據(jù)送入P0口，即寫(xiě)入指令或地址
  103.   _nop_();
  104.   _nop_();
  105.   _nop_();
  106.   _nop_();               //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
  107.   E=1;                   //E置高電平
  108.   _nop_();
  109.   _nop_();
  110.   _nop_();
  111.   _nop_();               //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
  112.    E=0;                  //當(dāng)E由高電平跳變成低電平時(shí)，液晶模塊開(kāi)始執(zhí)行命令
  113. }
  114. /*****************指定字符顯示的實(shí)際地址*********************/
  115. void WriteAddress(uchar x)
  116. {
  117.      WriteInstruction(x|0x80); //顯示位置的確定方法規(guī)定為"80H+地址碼x"
  118. }
  119. /*********************將數(shù)據(jù)(字符的標(biāo)準(zhǔn)ASCII碼)寫(xiě)入液晶模塊**************************/
  120. void WriteData(uchar y)
  121. {
  122.     while(BusyTest()==1);  
  123.    RS=1;           //RS為高電平，RW為低電平時(shí)，可以寫(xiě)入數(shù)據(jù)
  124.    RW=0;
  125.    E=0;            //E置低電平(根據(jù)表8-6，寫(xiě)指令時(shí)，E為高脈沖，
  126.                      // 就是讓E從0到1發(fā)生正跳變，所以應(yīng)先置"0"
  127.    P0=y;           //將數(shù)據(jù)送入P0口，即將數(shù)據(jù)寫(xiě)入液晶模塊
  128.    _nop_();
  129.    _nop_();
  130.     _nop_();
  131.      _nop_();       //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
  132.    E=1;           //E置高電平
  133.    _nop_();
  134.    _nop_();
  135.    _nop_();
  136.   _nop_();        //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
  137.   E=0;            //當(dāng)E由高電平跳變成低電平時(shí)，液晶模塊開(kāi)始執(zhí)行命令
  138. }[/align][align=left]/*********************向1302寫(xiě)一個(gè)字節(jié)數(shù)據(jù)******************************/
  139. void Write1302(uchar dat)
  140. {
  141.   uchar i;
  142.   SCLK=0;            //拉低SCLK，為脈沖上升沿寫(xiě)入數(shù)據(jù)做好準(zhǔn)備
  143.   delaynus(2);       //稍微等待，使硬件做好準(zhǔn)備
  144.   for(i=0;i<8;i++)      //連續(xù)寫(xiě)8個(gè)二進(jìn)制位數(shù)據(jù)
  145.     {
  146.       DATA=dat&0x01;    //取出dat的第0位數(shù)據(jù)寫(xiě)入1302  低位在前，高位在后
  147.    delaynus(2);       //稍微等待，使硬件做好準(zhǔn)備
  148.    SCLK=1;           //上升沿寫(xiě)入數(shù)據(jù)
  149.    delaynus(2);      //稍微等待，使硬件做好準(zhǔn)備
  150.    SCLK=0;           //重新拉低SCLK，形成脈沖
  151.    dat>>=1;          //將dat的各數(shù)據(jù)位右移1位，準(zhǔn)備寫(xiě)入下一個(gè)數(shù)據(jù)位
  152.      }
  153. }
  154. /********************根據(jù)命令字，向1302寫(xiě)一個(gè)字節(jié)數(shù)據(jù) Cmd，儲(chǔ)存命令字；dat，儲(chǔ)存待寫(xiě)的數(shù)據(jù)***************/
  155. void WriteSet1302(uchar Cmd,uchar dat)
  156. {   
  157.         RST=0;           //禁止數(shù)據(jù)傳遞
  158.         SCLK=0;          //確保寫(xiě)數(shù)居前SCLK被拉低
  159.      RST=1;           //啟動(dòng)數(shù)據(jù)傳輸
  160.      delaynus(2);     //稍微等待，使硬件做好準(zhǔn)備
  161.      Write1302(Cmd);  //寫(xiě)入命令字
  162.      Write1302(dat);  //寫(xiě)數(shù)據(jù)
  163.      SCLK=1;          //將時(shí)鐘電平置于高電平狀態(tài)
  164.      RST=0;           //禁止數(shù)據(jù)傳遞
  165. }
  166. /************************從1302讀一個(gè)字節(jié)數(shù)據(jù)***************************/
  167. uchar Read1302(void)
  168. {
  169.     uchar i,dat;
  170. delaynus(2);       //稍微等待，使硬件做好準(zhǔn)備
  171. for(i=0;i<8;i++)   //連續(xù)讀8個(gè)二進(jìn)制位數(shù)據(jù)
  172.   {  dat>>=1;
  173.    if(DATA==1)    //如果讀出的數(shù)據(jù)是1
  174.    dat|=0x80;    //將1取出，寫(xiě)在dat的最高位
  175.    SCLK=1;       //將SCLK置于高電平，為下降沿讀出
  176.    delaynus(2);  //稍微等待
  177.    SCLK=0;       //拉低SCLK，形成脈沖下降沿
  178.    delaynus(2);  //稍微等待
  179.    }  
  180.   return dat;        //將讀出的數(shù)據(jù)返回
  181. }  
  182. /*****************從1302讀取一個(gè)字節(jié)數(shù)據(jù)**********************/
  183. uchar  ReadSet1302(uchar Cmd)
  184. {
  185.   uchar dat;
  186.   RST=0;                 //拉低RST
  187.   SCLK=0;                //確保寫(xiě)數(shù)居前SCLK被拉低
  188.   RST=1;                 //啟動(dòng)數(shù)據(jù)傳輸
  189.   Write1302(Cmd);       //寫(xiě)入命令字
  190.   dat=Read1302();       //讀出數(shù)據(jù)
  191.   SCLK=1;              //將時(shí)鐘電平置于已知狀態(tài)
  192.   RST=0;               //禁止數(shù)據(jù)傳遞
  193.   return dat;          //將讀出的數(shù)據(jù)返回
  194. }
  195. /************************顯示秒***********************/
  196. void DisplaySecond(uchar x)
  197. {
  198. uchar i,j;     //j,k分別儲(chǔ)存十位和個(gè)位
  199. i=x/10;//取十位
  200. j=x%10;//取個(gè)位     
  201. WriteAddress(0x0e);    //寫(xiě)顯示地址,將在第1行第15列開(kāi)始顯示
  202. WriteData(digit[i]);    //將百位數(shù)字的字符常量寫(xiě)入LCD
  203. WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
  204. delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
  205. }[/i][/align][align=left][i]/*************************顯示分鐘*********************/
  206. void DisplayMinute(uchar x)
  207. {
  208. unsigned char i,j;     //j,k十位和個(gè)位
  209. i=x/10;//取十位
  210. j=x%10;//取個(gè)位     
  211. WriteAddress(0x0b);    //寫(xiě)顯示地址,將在第1行第12列開(kāi)始顯示
  212. WriteData(digit[i]);    //將百位數(shù)字的字符常量寫(xiě)入LCD
  213. WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
  214. delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
  215. }
  216. /*************************顯示小時(shí)********************/
  217. void DisplayHour(uchar x)
  218. {
  219. uchar i,j;     //j,k十位和個(gè)位
  220. i=x/10;//取十位
  221. j=x%10;//取個(gè)位     
  222. WriteAddress(0x08);    //寫(xiě)顯示地址,將在第1行第9列開(kāi)始顯示
  223. WriteData(digit[i]);    //將百位數(shù)字的字符常量寫(xiě)入LCD
  224. WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
  225. delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
  226. }
  227. /*******************顯示日*********************/
  228. void DisplayDay(uchar x)
  229. {
  230.   uchar i,j;     //j,k十位和個(gè)位
  231. i=x/10;//取十位
  232. j=x%10;//取個(gè)位     
  233. WriteAddress(0x06);    //寫(xiě)顯示地址,將在第1行第7列開(kāi)始顯示
  234. WriteData(digit[i]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
  235. WriteData(digit[j]);    //將個(gè)位數(shù)字的字符常量寫(xiě)入LCD
  236. delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
  237. }
  238. /************************顯示月**************/
  239. void DisplayMonth(uchar x)
  240. {
  241. uchar i,j;     //j,k分別儲(chǔ)存十位和個(gè)位
  242. i=x/10;//取十位
  243. j=x%10;//取個(gè)位     
  244. WriteAddress(0x03);    //寫(xiě)顯示地址,將在第1行第4列開(kāi)始顯示
  245. WriteData(digit[i]);    //將十位位數(shù)字的字符常量寫(xiě)入LCD
  246. WriteData(digit[j]);    //將個(gè)位數(shù)字的字符常量寫(xiě)入LCD
  247. delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
  248. }
  249. /*************************顯示年**************/
  250. void DisplayYear(uchar x)
  251. {
  252.     uchar i,j;     //j,k分別儲(chǔ)存十位和個(gè)位
  253. i=x/10;//取十位
  254. j=x%10;//取個(gè)位     
  255. WriteAddress(0x00);    //寫(xiě)顯示地址,將在第1行第1列開(kāi)始顯示
  256. WriteData(digit[i]);    //將十位位數(shù)字的字符常量寫(xiě)入LCD
  257. WriteData(digit[j]);    //將個(gè)位數(shù)字的字符常量寫(xiě)入LCD
  258. delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
  259. }[/i][/i][/i][/i][/i][/i][/align][align=left][i][i][i] /********************時(shí)間顯示********************/
  260. void display_time(void)
  261. {
  262.      
  263.    uchar second,minute,hour,day,month,year;      //分別儲(chǔ)存秒、分、小時(shí)，日，月，年
  264.       uchar ReadValue;   //儲(chǔ)存從1302讀取的數(shù)據(jù)
  265.    WriteAddress(0x02);  //寫(xiě)年月分隔符的顯示地址， 顯示在第1行第3列
  266.       WriteData('-');      //將字符常量寫(xiě)入LCD
  267.       WriteAddress(0x05);  //寫(xiě)月日分隔符的顯示地址， 顯示在第1行第12列
  268.       WriteData('-');      //將字符常量寫(xiě)入LCD
  269.       WriteAddress(0x0a);  //寫(xiě)小時(shí)與分鐘分隔符的顯示地址， 顯示在第1行第6列
  270.       WriteData(':');      //將字符常量寫(xiě)入LCD
  271.       WriteAddress(0x0d);  //寫(xiě)分鐘與秒分隔符的顯示地址， 顯示在第1行第14列
  272.       WriteData(':');      //將字符常量寫(xiě)入LCD
  273.    ReadValue = ReadSet1302(0x81);   //從秒寄存器讀數(shù)據(jù)
  274.       second=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);//將讀出數(shù)據(jù)轉(zhuǎn)化
  275.    DisplaySecond(second);          //顯示秒
  276.    ReadValue = ReadSet1302(0x83);  //從分寄存器讀
  277.       minute=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
  278.    DisplayMinute(minute);        //顯示分
  279.       ReadValue = ReadSet1302(0x85);  //從分寄存器讀
  280.       hour=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
  281.    DisplayHour(hour);              //顯示小時(shí)
  282.       ReadValue = ReadSet1302(0x87);  //從分寄存器讀
  283.       day=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
  284.    DisplayDay(day);                //顯示日
  285.    ReadValue = ReadSet1302(0x89);  //從分寄存器讀
  286.       month=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
  287.    DisplayMonth(month);            //顯示月
  288.    ReadValue = ReadSet1302(0x8d);  //從分寄存器讀
  289.       year=((ReadValue&0xf0)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
  290.    DisplayYear(year);             //顯示年[/i][/i][/i][/align][align=left][i][i][i]
  291. }
  292. /*****************數(shù)據(jù)解析*********************/
  293. void message_proc()
  294. {
  295.     uchar mm,m,n,i;[/i][/i][/i][/align][align=left][i][i][i] WriteAddress(0x42);  // 設(shè)置顯示位置
  296. for(i=5;i>=3;i--)
  297.     {
  298.     mm=((rdata[i]&0x70)>>4)*10 + (rdata[i]&0x0F);
  299.     m=mm/10;
  300. n=mm%10;
  301. WriteData(digit[m]);
  302. WriteData(digit[n]);
  303. delaynms(100);
  304. }
  305. WriteData('.');
  306. delaynms(100);
  307.     mm=((rdata[2]&0x70)>>4)*10 + (rdata[2]&0x0f);//將BCD碼轉(zhuǎn)化成字符
  308.     m=mm/10; //取十位
  309. n=mm%10; //取個(gè)位
  310. WriteData(digit[m]);
  311. WriteData(digit[n]); //顯示在LCD1602上
  312. delaynms(100);
  313.     for(i=0;i<3;i++)   
  314. WriteData(string1[i]);
  315. delaynms(100);
  316. }
  317. /***************************1302初始化********************/
  318. void Init_DS1302(void)
  319. {[/i][/i][/i][/i][/i][/i][/align][align=left][i][i][i]   /*--------------------這是每次都初始化的語(yǔ)句-----------------*/
  320.   
  321.    /*  
  322.   
  323.    WriteSet1302(0x8E,0x00);                 //根據(jù)寫(xiě)狀態(tài)寄存器命令字，寫(xiě)入不保護(hù)指令
  324.    WriteSet1302(0x80,((20/10)<<4|(20%10)));   //根據(jù)寫(xiě)秒寄存器命令字，寫(xiě)入秒的初始值[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x82,((28/10)<<4|(28%10)));   //根據(jù)寫(xiě)分寄存器命令字，寫(xiě)入分的初始值[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x84,((10/10)<<4|(10%10))); //根據(jù)寫(xiě)小時(shí)寄存器命令字，寫(xiě)入小時(shí)的初始值[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x86,((10/10)<<4|(10%10))); //根據(jù)寫(xiě)日寄存器命令字，寫(xiě)入日的初始值[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x88,((5/10)<<4|(5%10))); //根據(jù)寫(xiě)月寄存器命令字，寫(xiě)入月的初始值[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x8c,((13/10)<<4|(13%10)));   //根據(jù)寫(xiě)年寄存器命令字，寫(xiě)入年的初始值[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x90,0xa5);                //打開(kāi)充電功能 選擇2K電阻充電方式[/i][/i][/i][/align][align=left][i][i][i] WriteSet1302(0x8E,0x80);              //根據(jù)寫(xiě)狀態(tài)寄存器命令字，寫(xiě)入保護(hù)指令
  325. */
  326.     uchar flag;
  327.    
  328.     flag= ReadSet1302(0x81);
  329. if(flag&0x80)
  330. {      //判斷時(shí)鐘芯片是否關(guān)閉
  331.     WriteSet1302(0x8E,0x00);                 //根據(jù)寫(xiě)狀態(tài)寄存器命令字，寫(xiě)入不保護(hù)指令
  332.     WriteSet1302(0x80,((10/10)<<4|(10%10)));   //根據(jù)寫(xiě)秒寄存器命令字，寫(xiě)入秒的初始值
  333. WriteSet1302(0x82,((28/10)<<4|(28%10)));   //根據(jù)寫(xiě)分寄存器命令字，寫(xiě)入分的初始值
  334. WriteSet1302(0x84,((10/10)<<4|(10%10))); //根據(jù)寫(xiě)小時(shí)寄存器命令字，寫(xiě)入小時(shí)的初始值
  335. WriteSet1302(0x86,((10/10)<<4|(10%10))); //根據(jù)寫(xiě)日寄存器命令字，寫(xiě)入日的初始值
  336. WriteSet1302(0x88,((5/10)<<4|(5%10))); //根據(jù)寫(xiě)月寄存器命令字，寫(xiě)入月的初始值
  337. WriteSet1302(0x8c,((13/10)<<4|(13%10)));  //根據(jù)寫(xiě)年寄存器命令字，寫(xiě)入年的初始值
  338. WriteSet1302(0x90,0xa5);                //打開(kāi)充電功能 選擇2K電阻充電方式
  339. WriteSet1302(0x8E,0x80);      //根據(jù)寫(xiě)狀態(tài)寄存器命令字，寫(xiě)入保護(hù)指令
  340.   }
  341.       

  343.      //如果不想每次都初始化時(shí)間，也就是掉電后還想讓時(shí)鐘繼續(xù)走時(shí)的話 就用上面的語(yǔ)句   [/i][/i][/i][/align][align=left][i][i][i]  }
  344. /***************串口初始化*********************/
  345. void initial_serial(void)
  346. {[/i][/i][/i][/align][align=left][i][i][i]  TMOD=0x20;   // 定時(shí)器1工作于8位自動(dòng)重載模式(工作方式2), 用于產(chǎn)生波特率
  347.   TH1=TL1=0xe8;   // 波特率為1200bps
  348.   TF1=0;    // 計(jì)數(shù)未滿
  349.   TR1=1;          //啟動(dòng)定時(shí)器1
  350.   SCON=0xd0;   // 設(shè)定串行口工作方式3（11位異步收發(fā)方式） ,允許接收數(shù)據(jù)
  351.   PCON=0x00;            //波特率不加倍                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 //波特率不加倍（SMOD=0）
  352.   ES=1;     //開(kāi)串行口中斷
  353.   EA=1;                 //開(kāi)總中斷[/i][/i][/i][/align][align=left][i][i][i]}
  354. /*************************LCD初始化**************************/
  355. void LcdInitiate(void)
  356. {
  357.     delaynms(15);               //延時(shí)15ms，首次寫(xiě)指令時(shí)應(yīng)給LCD一段較長(zhǎng)的反應(yīng)時(shí)間
  358.     WriteInstruction(0x38);     //顯示模式設(shè)置：16×2顯示，5×7點(diǎn)陣，8位數(shù)據(jù)接口
  359. delaynms(5);                //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
  360.     WriteInstruction(0x38);
  361. delaynms(5);               //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
  362. WriteInstruction(0x38);     //連續(xù)三次，確保初始化成功
  363. delaynms(5);               //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
  364. WriteInstruction(0x0c);     //顯示模式設(shè)置：顯示開(kāi)，無(wú)光標(biāo)，光標(biāo)不閃爍
  365. delaynms(5);               //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
  366. WriteInstruction(0x06);     //顯示模式設(shè)置：光標(biāo)右移，字符不移
  367. delaynms(5);                //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
  368. WriteInstruction(0x01);     //清屏幕指令，將以前的顯示內(nèi)容清除
  369. delaynms(5);             //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間[/i][/i][/i][/align][align=left][i][i][i] }
  370. /***************單片機(jī)（主站）發(fā)送函數(shù)********************/
  371. void send(uchar * add,uchar con1,uchar DataLen1,uchar *tdata)
  372. {
  373.   uchar  sh,j,m,ecc=0;  //定義變量
  374.   TI=0;// 發(fā)送中斷標(biāo)志復(fù)位
  375.   sh=START_CHAR;//發(fā)送幀起始符0x68;
  376.   ACC=sh;
  377.   TB8=P;
  378.   SBUF=sh;
  379.   ecc=ecc+sh;//計(jì)算校驗(yàn)和 (校驗(yàn)和指從幀起始符到檢驗(yàn)碼之前所有各字節(jié)二進(jìn)制和)
  380.   while(!TI);
  381.   TI=0;
  382.   for(j=0;j<6;j++)
  383.   {
  384.     sh=*(add+j);//發(fā)送地址
  385.     ACC=sh;
  386.     TB8=P;
  387.     SBUF=sh;
  388.     ecc=ecc+sh;//再一次計(jì)算校驗(yàn)和
  389.     while(!TI);
  390.     TI=0;
  391.    }
  392.   sh=START_CHAR;//發(fā)送幀起始符0x68;
  393.   ACC=sh;
  394.   TB8=P;
  395.   SBUF=sh;
  396.   ecc=ecc+sh;//計(jì)算校驗(yàn)和 (校驗(yàn)和指從幀起始符到檢驗(yàn)碼之前所有各字節(jié)二進(jìn)制和)
  397.   while(!TI);
  398.   TI=0;
  399.   sh=con1;//發(fā)送控制碼
  400.   ACC=sh;
  401.   TB8=P;
  402.   SBUF=sh;
  403.   ecc=ecc+sh;//計(jì)算校驗(yàn)和
  404.   while(!TI);
  405.   TI=0;
  406.   sh=DataLen1; //發(fā)送數(shù)據(jù)長(zhǎng)度
  407.   ACC=sh;
  408.   TB8=P;
  409.   SBUF=sh;
  410.   ecc=ecc+sh;//計(jì)算校驗(yàn)和
  411.   while(!TI);
  412.   TI=0;
  413.   for(m=0;m<DataLen1;m++)
  414.   {
  415.    sh=(*(tdata+m)+0x33);// 發(fā)送數(shù)據(jù)標(biāo)識(shí)DI0 DI1，傳輸時(shí)發(fā)送方按字節(jié)進(jìn)行加33H 處理
  416.    ACC=sh;
  417.    TB8=P;
  418.    SBUF=sh;
  419.    ecc=ecc+sh;//計(jì)算校驗(yàn)和
  420.    while(!TI);
  421.    TI=0;
  422.    }
  423.    sh=ecc;
  424.    ACC=sh;
  425.    TB8=P;
  426.    SBUF=sh;
  427.    while(!TI);
  428.    TI=0;
  429.    ecc=0;//校驗(yàn)和清0
  430.    sh=END_CHAR; //發(fā)送幀結(jié)束符0x16
  431.    ACC=sh;
  432.    TB8=P;
  433.    SBUF=sh;
  434.    while(!TI);
  435.    TI=0;
  436.   [/i][/i][/i][/align][align=left][i][i][i]}                    

  438. /********************主函數(shù)********************/
  439. void main(void)
  440. {
  441.   uchar tt,i;
  442.   LcdInitiate();      //液晶初始化
  443.   initial_serial();  //串口初始化
  444.   Init_DS1302();    //DS1302初始化
  445.   WriteAddress(0x01);  // 設(shè)置顯示位置為第一行的第1個(gè)字
  446.   i = 0;
  447.   while(string[i] != '\0')    //'\0'是數(shù)組結(jié)束標(biāo)志
  448. {     
  449. WriteData(string[i]);
  450. i++;
  451. delaynms(20);

  453. }

  455.   WriteAddress(0x42);  // 設(shè)置顯示位置為第二行的第5個(gè)字
  456.   for(i=0;i<12;i++)
  457.   WriteData('-'); //顯示在LCD1602上
  458.   while(1)
  459.   {
  460.      P1=0xf0;
  461.   if((P1&0xf0)!=0xf0)
  462. {
  463.        tt=keyscan();
  464.     switch (tt)
  465.     {
  466.      case 0xe7:  send(&add1,0x01,0x02,&tdata);display_time();break;//發(fā)送讀正向有功總電能命令幀
  467.      case 0xd7:  send(&add1,0x01,0x02,&tdata1);display_time();break; //讀反向有功總電能
  468.   case 0xb7: send(&add1,0x01,0x02,&tdata2);display_time();break;  //讀上月正向有功總電能
  469.   case 0x77:  send(&add1,0x01,0x02,&tdata3);display_time();break; //讀上月反向有功總電能
  470.     }
  471. }
  472. message_proc();
  473. [/i][/i][/i][/i][/i][/align][align=left][i][i][i]  }

  475. }[/i][/i][/i][/align][/font][/color][/size][align=left][size=3][color=#000000][font=宋體][i][i][i]/********************單片機(jī)（主站接收）串行口中斷函數(shù)********************/
  476. void serial() interrupt 4
  477. {
  478.    uchar ch;//存放當(dāng)前接收的字符
  479.    static uchar ecc,flag=0;
  480.    static uchar AddCount;//地址域計(jì)數(shù)器
  481.    static uchar DataCount;//數(shù)據(jù)域計(jì)數(shù)器
  482.    static uchar DataLen;//數(shù)據(jù)域長(zhǎng)度
  483.    static uchar RecState=RS_WAIT;//串口初始接收狀態(tài)為等待
  484.    if(RI) //接收中斷
  485.    {
  486.      RI=0;//中斷標(biāo)志復(fù)位
  487.   ch=SBUF;// 將接收的字符存入ch
  488.   ACC=ch;
  489.   if(RB8==P) //判斷偶校驗(yàn)
  490.   {
  491.    if(flag==1)
  492.    ecc=ecc+ch;//計(jì)算校驗(yàn)和
  493.   }
  494. else
  495.     RecState=RS_WAIT;//如果偶校驗(yàn)錯(cuò)誤，返回等待狀態(tài)
  496. if(RecNum!=0) return;//如果主程序正在處理接收緩沖區(qū)內(nèi)容，返回
  497. switch(RecState)  //根據(jù)當(dāng)前狀態(tài)和接收字節(jié)判斷接收狀態(tài)
  498. {
  499.    case 0://等待狀態(tài)
  500.    if(ch==0xfe) //前導(dǎo)字符
  501.    {
  502.      RecState++;
  503.   flag=1;//從下一個(gè)狀態(tài)開(kāi)始計(jì)算校驗(yàn)和
  504.   
  505.    }
  506.    break;
  507.    case 1:    //喚醒狀態(tài)
  508.    if(ch==0x68)   //如果接收幀起始符68H
  509.    {
  510.     RecState++;        //進(jìn)入接收地址域狀態(tài)
  511.         AddCount=0;
  512.    }
  513.    else
  514.    {
  515.     flag=0;
  516.     ecc=0;
  517.     RecState=RS_WAIT;//返回等待狀態(tài)
  518.    }
  519.    break;
  520.    case 2: //接收地址域狀態(tài)
  521.    *(add+AddCount)=ch;
  522.    AddCount++;
  523.    if(AddCount==6)//如果接受完地址域6個(gè)字節(jié)
  524.    {
  525.      AddCount=0;// 地址域計(jì)數(shù)器復(fù)位
  526.   RecState++;
  527.     }
  528.       break;
  529.    case 3:  //接收幀頭狀態(tài)
  530.    if(ch==0x68)
  531.    RecState++;
  532.    break;
  533.    case 4:  //接收控制碼狀態(tài)
  534.    con=ch;//保存控制碼
  535.    RecState++;
  536.    break;
  537.    case 5: //接收數(shù)據(jù)域長(zhǎng)度狀態(tài)
  538.    DataLen=ch;//取出數(shù)據(jù)域長(zhǎng)度
  539.    if(DataLen==0)
  540.    RecState=RecState+2;//如果數(shù)據(jù)域長(zhǎng)度為0，直接進(jìn)入校驗(yàn)和狀態(tài)
  541.    else
  542.    {
  543.     RecState++;
  544.     DataCount=0; //賦初值
  545.    }
  546.    break;
  547.    case 6:   //接收數(shù)據(jù)狀態(tài)
  548.    *(rdata+DataCount)=ch-0x33; //保存數(shù)據(jù)在rdata[10]數(shù)組中
  549.    DataCount++;
  550.    if(DataCount==DataLen) //接收完DataLen個(gè)數(shù)據(jù)
  551.    {
  552.     RecState++;
  553.     DataCount=0;//數(shù)據(jù)域計(jì)數(shù)器復(fù)位，準(zhǔn)備接收下一幀數(shù)據(jù)
  554.     flag=0; //下一個(gè)狀態(tài)停止計(jì)算檢驗(yàn)和
  555.    }
  556.    break;
  557.    case  7:
  558.    cs=ch;//保存校驗(yàn)和
  559.    ecc=ecc^cs;
  560.    if(ecc==0)//校驗(yàn)和正確
  561.    {
  562.     RecState++;
  563.     ecc=0;
  564.    }
  565.    else
  566.    RecState=RS_WAIT;  //如果校驗(yàn)和錯(cuò)誤，返回等待狀態(tài)
  567.    break;
  568.    case  8: //接收結(jié)束符
  569.    if(ch==0x16) //如果接收幀結(jié)束符，表明這一幀接收正確
  570.    {
  571.     RecNum=DataLen;//取出字節(jié)數(shù)
  572.   DataLen=0;

  574.    }
  575.    RecState=RS_WAIT;// 返回等待狀態(tài)
  576.    break;
  577.     }
  578.   }
  579. }
復(fù)制代碼

基于 單片機(jī)開(kāi)發(fā)板讀表系統(tǒng)仿真電路.PDF

31.83 KB, 下載次數(shù): 131, 下載積分: 黑幣 -5

評(píng)分

參與人數(shù) 3黑幣 +110 收起 理由
海水千山 + 5 贊一個(gè)！
寧采塵 + 5 很給力！
admin + 100 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏14 分享淘帖 頂頂1 踩踩

相關(guān)帖子
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:209219 發(fā)表于 2017-6-8 15:48 | 只看該作者
樓主方便加下QQ嗎，有些問(wèn)題想請(qǐng)教，875576671謝謝！
回復(fù)

使用道具 舉報(bào)

板凳
ID:214844 發(fā)表于 2017-6-26 17:00 | 只看該作者
新手很多不懂
回復(fù)

使用道具 舉報(bào)

地板
ID:217617 發(fā)表于 2017-7-7 13:36 | 只看該作者
很實(shí)用的作品
回復(fù)

使用道具 舉報(bào)

5#
ID:157057 發(fā)表于 2017-7-7 23:05 | 只看該作者
感謝分享，51黑有你更精彩�。�！
回復(fù)

使用道具 舉報(bào)

6#
ID:249957 發(fā)表于 2017-11-16 10:21 | 只看該作者
多謝分享！感覺(jué)這個(gè)51論壇還是有很多好文章呢。
回復(fù)

使用道具 舉報(bào)

7#
ID:301327 發(fā)表于 2018-4-3 10:17 | 只看該作者
樓主，方便說(shuō)一下用的哪一種電能表嗎
回復(fù)

使用道具 舉報(bào)

8#
ID:51443 發(fā)表于 2018-4-6 13:55 | 只看該作者
菩提樹(shù)下 發(fā)表于 2018-4-3 10:17
樓主，方便說(shuō)一下用的哪一種電能表嗎

通用（DLT645-1997規(guī)約），但無(wú)用，表不讓讀。
回復(fù)

使用道具 舉報(bào)

9#
ID:311865 發(fā)表于 2018-4-21 16:44 | 只看該作者
電量采集裝置有什么推薦的嗎？直接用一塊電表？
回復(fù)

使用道具 舉報(bào)

10#
ID:313732 發(fā)表于 2018-4-23 13:30 | 只看該作者
怎么回事

錯(cuò)誤.PNG (103.22 KB, 下載次數(shù): 189)

錯(cuò)誤.PNG
回復(fù)

使用道具 舉報(bào)

11#
ID:69408 發(fā)表于 2019-12-24 10:16 | 只看該作者
感謝分享，51黑有你更精彩�。�！
回復(fù)

使用道具 舉報(bào)

12#
ID:29579 發(fā)表于 2021-10-3 17:19 | 只看該作者
感謝分享，51黑有你更精彩�。�！
回復(fù)

使用道具 舉報(bào)

13#
ID:137736 發(fā)表于 2022-11-2 10:30 | 只看該作者
貼的程序中間亂碼有點(diǎn)多
回復(fù)

使用道具 舉報(bào)

14#
ID:137736 發(fā)表于 2022-11-2 10:31 | 只看該作者

程序中間亂碼需要?jiǎng)h除
回復(fù)

使用道具 舉報(bào)

15#
ID:195496 發(fā)表于 2022-11-3 13:16 | 只看該作者
電度表的地址怎么確定的？
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表