找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4542|回复: 10
打印 上一主题 下一主题
收起左侧

ht1625 Segment code LCD与点阵液晶屏的资料与菜单源码

  [复制链接]
跳转到指定楼层
楼主
自己用到的段式液晶与点阵液晶的资料的一些分享



全部资料51hei下载地址:
Display module.zip (9.83 MB, 下载次数: 254)


1.给ht1625发送命令控制字  数据必须是9位
2.ht1625初始化时 控制端口初始状态为高电平

ht1625单片机源程序如下:
  1. #include "lcd.h"


  2. static void nop(void)//
  3. {
  4.   u8 i;
  5.   for(i=0;i<90;i++)
  6.         ;
  7. }
  8. //给1625发送命令与地址,写入3位ID命令或A6A5A4A3A2A1A0七位地址
  9. static void SendBit_1625(u8 mdata,u8 cnt)   //mdata的高cnt位写入HT1625,高位在前
  10. {
  11.   u8 i;
  12.   for(i=0;i<cnt;i++)
  13.   {
  14.         LWR_L;
  15.     if((mdata&0x80)==0)
  16.       LDA_L;
  17.     else
  18.       LDA_H;        
  19.         nop();
  20.     LWR_H;
  21.     nop();        
  22.     mdata<<=1;
  23.   }
  24. }

  25. //给1625发送数据,写入D0D1D2D3..cnt位数据到RAM
  26. static void SendDataBit_1625(u8 mdata,u8 cnt)   //mdata的低cnt位写入HT1625,低位在前
  27. {
  28.   u8 i;
  29.   for(i=0;i<cnt;i++)
  30.   {        
  31.         LWR_L;
  32.      if((mdata&0x01)==0x00)
  33.        LDA_L;
  34.      else
  35.        LDA_H;         
  36.      nop();
  37.      LWR_H;
  38.          nop();
  39.      mdata>>=1;
  40.   }
  41. }

  42. //读一个地址
  43. u8 Read_1625(u8 addr,u8 cnt)
  44. {
  45.   u8 rd=0x00,i=0;
  46.   LCS_L;
  47.   SendBit_1625(0xc0,3);                        //控制命令110,启动读模式
  48. //  SendBit_1625(addr<<1,7);
  49. //  //读入的数据放在RD的低四位
  50. //  for(i=0;i<cnt;i++)
  51. //  {
  52. //    if(LDA)
  53. //       rd|=0x08;
  54. //    else
  55. //       rd&=0xf7;
  56. //     LRD_L;
  57. //     nop();//
  58. //     LRD_H;
  59. //    nop();//
  60. //     rd = rd>>1;                //rd>>1;
  61. //  }
  62. //  if(LDA)
  63. //     rd|=0x08;
  64. //  else
  65. //     rd&=0xf7;
  66. //  LCS=1;
  67.   return rd;
  68. }

  69. //给1625发送命令控制字
  70. void SendCmd(u8 command)
  71. {
  72.   LCS_L;
  73.   SendBit_1625(0x80,3);                        //控制命令100,启动命令模式
  74.   SendBit_1625(command,9);                //jjk命令处 数据数必须是9   将命令command发送给1625
  75.   LCS_H;
  76. }

  77. //LCD初始化,向HT1625写入命令
  78. void LCD_init(void)
  79. {  
  80.         //LCD端口初始化,定义控制引脚数据方向
  81.           LCS_H;LWR_H;LDA_H;LRD_H;nop();         
  82.           SendCmd(0x01);                //命令2:0x01,打开系统晶振SYS_EN
  83.           SendCmd(0x03);                //命令3:0x03,开LCD显示        LCD_ON  
  84.           SendCmd(0x18);                //命令1:0x18,使用片上RC振荡器RC_32K
  85. }  

  86. //写一个地址
  87. void Write_1625(u8 addr,u8 mdata)
  88. {  
  89.   LCS_L;
  90.   SendBit_1625(0xa0,3);                        //启动写模式
  91.   SendBit_1625(addr,7);                        //写入A6A5A4A3A2A1A0七位地址
  92.   SendDataBit_1625(mdata,4);        //写入D0D1D2D3数据到RAM
  93.   LCS_H;
  94. }

  95. //从一地址处连续写入
  96. void WriteAll_1625(u8 addr,u8 *p,u8 cnt)                //起始地址,数组指针,数据字节数
  97. {
  98.   u8 i;
  99.   LCS_L;
  100.   SendBit_1625(0xa0,3);                //启动写模式
  101.   SendBit_1625(addr,7);                //写入A6A5A4A3A2A1A0七位地址
  102.   for(i=0;i<cnt;i++,p++)        //依次写入cnt个字节数据
  103.   {
  104.     SendDataBit_1625(*p,8);
  105.   }
  106.   LCS_H;
  107. }

  108. //清屏&全屏显示
  109. void full_or_clear (u8 F_C)        //1:全显,0:清屏
  110. {
  111.   u8 i,p;
  112.   if(F_C)
  113.     p=0xff;
  114.   else
  115.     p=0x00;
  116.   LCS_L;
  117.   SendBit_1625(0xa0,3);                //启动写模式
  118.   SendBit_1625(0x00,7);                //地址0000H
  119.   for(i=0;i<64;i++)
  120.   {
  121.     SendDataBit_1625(p,8);        //将全显或清屏数据写入1625
  122.   }
  123.   LCS_H;
  124. }



复制代码

Segment code LCD菜单程序:
  1. #include "stm32f10x_it.h"
  2. #include "lcd.h"
  3. #include "string.h"
  4. #include "drv_sys.h"
  5. #include "delay.h"
  6. #include "drv_rtc.h"
  7. #include "math.h"


  8. u16 SystemPara[18] =
  9. {0,100,1,246,200,0,0,0,10,1,300,180,100,100,300,0,1,20};

  10. unsigned char dis_buffer[64]; //液晶显示字符缓存数组
  11. //1-4行数字 字母                                                0          1           2   3    4    5    6    7    8    9     .   C    c    o     d    E   F    H     h   n    u
  12. const unsigned char my_7seg_J[21]={0xEE,0x24,0xBA,0xB6,0x74,0xD6,0xDE,0xA4,0xFE,0xF4,0x01,0xCA,0x1A,0x1E,0x3E,0xDA,0xD8,0x7C,0x5C,0x1C,0x0E,};
  13. //1-4符号                                                  XJ   %    M     K    V    A   M    K    W    Var
  14. const unsigned char my_unit[10]={0x80,0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01,0x01};
  15. //5符号                                                           M     K    W    h   M    K    V    ar   
  16. const unsigned char my_unit5[9]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};        
  17. //指示行 数字 字母                                          0           1        2    3    4    5    6   7    8    9    C    U     I    P   Q     F
  18. const unsigned char my_13seg_J[16]={0x9A,0x18,0x92,0x9A,0x18,0x8A,0x8A,0x98,0x9A,0x98,0x82,0x1A,0xC2,0x90,0x9E,0x80};
  19. const unsigned char my_13seg_K[16]={0x84,0x00,0x24,0x20,0xA0,0xA0,0xA4,0x00,0x84,0xA0,0x84,0x84,0x10,0xA4,0x84,0xA4};
  20. //*****8位字节翻转
  21. unsigned char ru8(unsigned char s)  
  22. {  
  23.     unsigned char rtn = 0,i=0;
  24.     for(i = 0 ; i < 8 ; i++)  
  25.     {  
  26.         rtn |= ((s & (1 << i)) >> i) << (7 - i) ;  
  27.     }  
  28.     return rtn ;  
  29. }  
  30. void Refurbish_Disply(unsigned char *dis_buff,unsigned char dat0,unsigned char dat1,unsigned char dat2,unsigned char dat3,unsigned char dat4,unsigned char line_number)
  31. {
  32.         switch(line_number)
  33.         {
  34.                 case 0:{
  35.                         dis_buff[6] =  my_7seg_J[dat0];
  36.                         dis_buff[7] =  my_7seg_J[dat1];
  37.                         dis_buff[8] =  my_7seg_J[dat2];
  38.                         dis_buff[9] =  my_7seg_J[dat3];//此处应考虑X9--Var
  39.                         //符号
  40.                         if(dat4) dis_buff[4] |=0x02;
  41.                         else dis_buff[4] &=0xFD;
  42.                         //测量内容
  43.                         dis_buff[5] |=0x01;//a
  44.                         dis_buff[4] |=0x01;//b
  45.                         dis_buff[3] |=0x01;//E        
  46.                         
  47.                 }        break;
  48.                 case 1:{
  49.                         dis_buff[12] =  my_7seg_J[dat0];
  50.                         dis_buff[13] =  my_7seg_J[dat1];
  51.                         dis_buff[14] =  my_7seg_J[dat2];
  52.                         dis_buff[15] =  my_7seg_J[dat3];//此处应考虑X18--Var
  53.                         //符号
  54.                         if(dat4)dis_buff[63] |=0x02;
  55.                         else dis_buff[63] &=0xFD;
  56.                         //测量内容
  57.                         dis_buff[0] |=0x01;//b
  58.                         dis_buff[63] |=0x01;//c
  59.                         dis_buff[63] |=0x04;//E
  60.                         
  61.                 }        break;
  62.                 case 2:{
  63.                         dis_buff[39] =  ru8(my_7seg_J[dat0]);
  64.                         dis_buff[38] =  ru8(my_7seg_J[dat1]);
  65.                         dis_buff[37] =  ru8(my_7seg_J[dat2]);
  66.                         dis_buff[18] =  ru8(my_7seg_J[dat3]);//此处应考虑X27--Var
  67.                         //符号
  68.                         if(dat4)dis_buff[59] |=0x01;
  69.                         else dis_buff[59] &=0xFE;
  70.                         //测量内容
  71.                         dis_buff[60] |=0x02;//c
  72.                         dis_buff[60] |=0x01;//a
  73.                         dis_buff[59] |=0x02;//E
  74.                         
  75.                         
  76.                 }        break;
  77.                 case 3:{
  78.                         dis_buff[40] =  my_7seg_J[dat0];
  79.                         dis_buff[41] =  my_7seg_J[dat1];
  80.                         dis_buff[42] =  my_7seg_J[dat2];
  81.                         dis_buff[43] =  my_7seg_J[dat3];//此处应考虑X37--Var
  82.                         //符号
  83.                         if(dat4)dis_buff[55] |=0x04;
  84.                         else dis_buff[55] &=0xFB;
  85.                         //测量内容
  86.                         dis_buff[57] |=0x01;//Avg
  87.                         dis_buff[56] |=0x01;//n
  88.                         dis_buff[55] |=0x08;//E
  89.                         //单位
  90.                         dis_buff[44] =  my_unit[dat3];
  91.                         //Hz
  92.                         dis_buff[54] |=0x20;//
  93.                 }        break;
  94.                
  95.                 default :break;
  96.         }
  97.         
  98. }
  99. //1,2,3,4行数码管显示数字,缓存数组指针、更新数据、第几行显示
  100. void dis_number(unsigned char *dis_buf,long data,unsigned char line_number)
  101. {
  102.         unsigned long  mydata;
  103.         unsigned char dat0,dat1,dat2,dat3,dat4;
  104.                
  105.                 if(data < 0)
  106.                 {
  107.                         mydata = fabs(data);
  108.                         dat4 = 1;
  109.                         
  110.                 }else
  111.                 {
  112.                         mydata = data;
  113.                         dat4 = 0;
  114.                 }
  115.                 dat3 = mydata%10;
  116.                 dat2 = mydata%100/10;
  117.                 dat1 = mydata%1000/100;
  118.                 dat0 = mydata%10000/1000;
  119.         Refurbish_Disply(dis_buf,dat0,dat1,dat2,dat3,dat4,line_number);
  120. }

  121. //显示数据高4位值,缓存数组指针、更新数据、第几行显示
  122. void  dis_num_H(unsigned char *dis_buf,long data,unsigned char line_number)
  123. {
  124.         long  mydata;

  125.         if(data / 1000000000)
  126.                 mydata = data /1000000;
  127.         else if(data / 100000000)
  128.                 mydata = data /100000;
  129.         else if(data / 10000000)
  130.                 mydata = data /10000;
  131.         else if(data / 1000000)
  132.                 mydata = data /1000;
  133.         else if(data / 100000)
  134.                 mydata = data /100;
  135.         else if(data / 10000)
  136.                 mydata = data /10;
  137.         else mydata = data;
  138.         
  139.         dis_number(dis_buf,mydata,line_number);
  140. }
  141. //5行数码管显示数字,缓存数组指针、更新数据、第几行显示
  142. void dis_number5(unsigned char *dis_buf,long data)
  143. {
  144.         unsigned long  mydata;
  145.         unsigned char dat0,dat1,dat2,dat3,dat4,dat5,dat6,dat7;
  146.         
  147.         if(data < 0)
  148.         {
  149.                 mydata = fabs(data);
  150.                 dis_buf[54] |=0x01; //负号        
  151.         }else
  152.         {
  153.                 mydata = data;
  154.                 dis_buf[54] &=0xFE; //负号
  155.         }
  156.         
  157.         dat7 = mydata%10;
  158.         dat6 = mydata%100/10;
  159.         dat5 = mydata%1000/100;
  160.         dat4 = mydata%10000/1000;
  161.         dat3 = mydata%100000/10000;
  162.         dat2 = mydata%1000000/100000;
  163.         dat1 = mydata%10000000/1000000;
  164.         dat0 = mydata%100000000/10000000;
  165.                
  166.         dis_buf[53] =  ru8(my_7seg_J[dat0]);
  167.         dis_buf[52] =  ru8(my_7seg_J[dat1]);
  168.         dis_buf[51] =  ru8(my_7seg_J[dat2]);
  169.         dis_buf[50] =  ru8(my_7seg_J[dat3]);
  170.         dis_buf[49] =  ru8(my_7seg_J[dat4]);
  171.         dis_buf[48] =  ru8(my_7seg_J[dat5]);
  172.         dis_buf[47] =  ru8(my_7seg_J[dat6]);
  173.         dis_buf[46] =  ru8(my_7seg_J[dat7]);//此处应考虑X37--Var
  174.         //冒号
  175.         dis_buf[54] |=0x04; //P16
  176.         dis_buf[54] |=0x08; //P19
  177.         //测量内容
  178.         dis_buf[55] |=0x40;//a
  179.         dis_buf[55] |=0x20;//b
  180.         dis_buf[55] |=0x10;//c
  181.         dis_buf[55] |=0x80;//E
  182.         //单位
  183.         dis_buf[45] |=my_unit5[my_S_M];//
  184.         dis_buf[46] |=0x80;//h

  185. }
  186. //指示行 数码管显示数字,缓存数组指针、更新数据
  187. void Instruct_line(unsigned char *dis_buff,unsigned char dat0,unsigned char dat1,unsigned char dat2)
  188. {        
  189.         unsigned char Temp[6];
  190.         Temp[0] = dis_buff[0]&0x03;
  191.         Temp[1] = dis_buff[1]&0x01;
  192.         Temp[2] = dis_buff[2]&0x03;
  193.         Temp[3] = dis_buff[3]&0x01;
  194.         Temp[4] = dis_buff[4]&0x03;
  195.         Temp[5] = dis_buff[5]&0x01;
  196.         
  197.         dis_buff[1] = my_13seg_J[dat0] |Temp[1] ;//
  198.         dis_buff[0] = my_13seg_K[dat0] |Temp[0];//
  199.         
  200.         dis_buff[3] = my_13seg_J[dat1] |Temp[3];//
  201.         dis_buff[2] = my_13seg_K[dat1] |Temp[2];//
  202.         
  203.         dis_buff[5] = my_13seg_J[dat2] |Temp[5];//
  204.         dis_buff[4] = my_13seg_K[dat2] |Temp[4];//
  205. }
  206. //电压单位转换 小数点
  207. void Change_U(long data,unsigned char ABC)
  208. {
  209.         unsigned long Temp_U = 0;        
  210.         Temp_U = fabs(data);
  211.         if(Temp_U<10000)//xxx.x V
  212.         {
  213.                 switch(ABC){                         //V                擦除var       小数点
  214.                         case 0:{dis_buffer[10] = my_unit[my_V];dis_buffer[9] &= 0XFE;dis_buffer[8] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[7] &= 0xFE;}break;
  215.                         case 1:{dis_buffer[16] = my_unit[my_V];dis_buffer[15] &= 0XFE;dis_buffer[14] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[13] &= 0xFE;}break;
  216.                         case 2:{dis_buffer[17] =ru8(my_unit[my_V]);dis_buffer[18] &= 0X7F;dis_buffer[37] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[38] &= 0x7F;}break;
  217.                         case 3:{dis_buffer[44] = my_unit[my_V];dis_buffer[43] &= 0XFE;dis_buffer[42] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[41] &= 0xFE;}break;
  218.                         default: break;
  219.                 }
  220.         }
  221.         else if(Temp_U<100000)//x.xxx KV
  222.         {
  223.                 switch(ABC){
  224.                         case 0:{dis_buffer[10] = my_unit[my_V] | my_unit[my_K]; dis_buffer[9] &= 0XFE;dis_buffer[6] |= 0x01;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  225.                         case 1:{dis_buffer[16] = my_unit[my_V] | my_unit[my_K];dis_buffer[15] &= 0XFE;dis_buffer[12] |= 0x01;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  226.                         case 2:{dis_buffer[17] =ru8(my_unit[my_V] | my_unit[my_K]);dis_buffer[18] &= 0X7F;dis_buffer[39] |= 0x80;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  227.                         case 3:{dis_buffer[44] = my_unit[my_V] | my_unit[my_K];dis_buffer[43] &= 0XFE;dis_buffer[40] |= 0x01;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  228.                         default: break;
  229.                 }
  230.         }
  231.         else if(Temp_U<1000000)//xx.xx KV
  232.         {
  233.                 switch(ABC){
  234.                         case 0:{dis_buffer[10] = my_unit[my_V] | my_unit[my_K]; dis_buffer[9] &= 0XFE;dis_buffer[7] |= 0x01; dis_buffer[6] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  235.                         case 1:{dis_buffer[16] = my_unit[my_V] | my_unit[my_K];dis_buffer[15] &= 0XFE;dis_buffer[13] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  236.                         case 2:{dis_buffer[17] =ru8(my_unit[my_V] | my_unit[my_K]);dis_buffer[18] &= 0X7F;dis_buffer[38] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  237.                         case 3:{dis_buffer[44] = my_unit[my_V] | my_unit[my_K];dis_buffer[43] &= 0XFE;dis_buffer[41] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  238.                         default: break;
  239.                 }
  240.         }
  241.         else if(Temp_U<10000000)//xxx.x KV
  242.         {        
  243.                 switch(ABC){
  244.                         case 0:{dis_buffer[10] = my_unit[my_V] | my_unit[my_K];dis_buffer[9] &= 0XFE;dis_buffer[8] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[7] &= 0xFE;}break;
  245.                         case 1:{dis_buffer[16] = my_unit[my_V] | my_unit[my_K];dis_buffer[15] &= 0XFE;dis_buffer[14] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[13] &= 0xFE;}break;
  246.                         case 2:{dis_buffer[17] =ru8(my_unit[my_V] | my_unit[my_K]);dis_buffer[18] &= 0X7F;dis_buffer[37] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[38] &= 0x7F;}break;
  247.                         case 3:{dis_buffer[44] = my_unit[my_V] | my_unit[my_K];dis_buffer[43] &= 0XFE;dis_buffer[42] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[41] &= 0xFE;}break;
  248.                         
  249.                         default: break;
  250.                 }
  251.         }
  252.         else //x.xxx MV
  253.         {
  254.                 switch(ABC){
  255.                         case 0:{dis_buffer[10] = my_unit[my_V] | my_unit[my_M]; dis_buffer[9] &= 0XFE;dis_buffer[6] |= 0x01;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  256.                         case 1:{dis_buffer[16] = my_unit[my_V] | my_unit[my_M];dis_buffer[15] &= 0XFE;dis_buffer[12] |= 0x01;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  257.                         case 2:{dis_buffer[17] =ru8(my_unit[my_V] | my_unit[my_M]);dis_buffer[18] &= 0X7F;dis_buffer[39] |= 0x80;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  258.                         case 3:{dis_buffer[44] = my_unit[my_V] | my_unit[my_M];dis_buffer[43] &= 0XFE;dis_buffer[40] |= 0x01;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  259.                         
  260.                         default: break;
  261.                 }
  262.         }
  263. }

  264. //电流单位转换
  265. void Change_I(long data,unsigned char ABC)
  266. {
  267.         unsigned long Temp_A = 0;
  268.         //dis_buffer[6] |= 0x01;dis_buffer[7] |= 0x01;dis_buffer[8] |= 0x01;
  269.         //dis_buffer[12] |= 0x01;dis_buffer[13] |= 0x01;dis_buffer[14] |= 0x01;
  270.         //dis_buffer[39] |= 0x80;dis_buffer[38] |= 0x80;dis_buffer[37] |= 0x80;
  271.         //dis_buffer[40] |= 0x01;dis_buffer[41] |= 0x01;dis_buffer[42] |= 0x01;
  272.         //擦除小数点
  273. //        dis_buffer[6] &= 0xFE;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;
  274. //        dis_buffer[12] &= 0xFE;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;
  275. //        dis_buffer[39] &= 0x7F;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;
  276. //        dis_buffer[40] &= 0xFE;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;
  277.         Temp_A = fabs(data);
  278.         if(Temp_A<10000)                //x.xxx A
  279.         {
  280.                 switch(ABC)
  281.                 {                                    //V                擦除var       小数点
  282.                         case 0:{dis_buffer[10] = my_unit[my_A]; dis_buffer[9] &= 0XFE;dis_buffer[6] |= 0x01;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  283.                         case 1:{dis_buffer[16] = my_unit[my_A] ;dis_buffer[15] &= 0XFE;dis_buffer[12] |= 0x01;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  284.                         case 2:{dis_buffer[17] =ru8(my_unit[my_A] );dis_buffer[18] &= 0X7F;dis_buffer[39] |= 0x80;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  285.                         case 3:{dis_buffer[44] = my_unit[my_A] ;dis_buffer[43] &= 0XFE;dis_buffer[40] |= 0x01;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  286.                         default :break;
  287.                 }
  288.         }
  289.         else if(Temp_A<100000)        //xx.xx A
  290.         {
  291.                 switch(ABC)
  292.                 {
  293.                         case 0:{dis_buffer[10] = my_unit[my_A]; dis_buffer[9] &= 0XFE;dis_buffer[7] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  294.                         case 1:{dis_buffer[16] = my_unit[my_A];dis_buffer[15] &= 0XFE;dis_buffer[13] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  295.                         case 2:{dis_buffer[17] =ru8(my_unit[my_A] );dis_buffer[18] &= 0X7F;dis_buffer[38] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  296.                         case 3:{dis_buffer[44] = my_unit[my_A];dis_buffer[43] &= 0XFE;dis_buffer[41] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  297.                         default :break;
  298.                 }
  299.         }
  300.         else if(Temp_A<1000000)        //xxx.x A
  301.         {
  302.                 switch(ABC)
  303.                 {
  304.                         case 0:{dis_buffer[10] = my_unit[my_A] ;dis_buffer[9] &= 0XFE;dis_buffer[8] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[7] &= 0xFE;}break;
  305.                         case 1:{dis_buffer[16] = my_unit[my_A] ;dis_buffer[15] &= 0XFE;dis_buffer[14] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[13] &= 0xFE;}break;
  306.                         case 2:{dis_buffer[17] =ru8(my_unit[my_A] );dis_buffer[18] &= 0X7F;dis_buffer[37] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[38] &= 0x7F;}break;
  307.                         case 3:{dis_buffer[44] = my_unit[my_A] ;dis_buffer[43] &= 0XFE;dis_buffer[42] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[41] &= 0xFE;}break;
  308.                         default :break;
  309.                 }
  310.         }
  311.         else if(Temp_A<10000000)        //x.xxx kA
  312.         {
  313.                 switch(ABC)
  314.                 {
  315.                         
  316.                         case 0:{dis_buffer[10] = my_unit[my_A] | my_unit[my_K]; dis_buffer[9] &= 0XFE;dis_buffer[6] |= 0x01;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  317.                         case 1:{dis_buffer[16] = my_unit[my_A] | my_unit[my_K];dis_buffer[15] &= 0XFE;dis_buffer[12] |= 0x01;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  318.                         case 2:{dis_buffer[17] =ru8(my_unit[my_A] | my_unit[my_K]);dis_buffer[18] &= 0X7F;dis_buffer[39] |= 0x80;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  319.                         case 3:{dis_buffer[44] = my_unit[my_A] | my_unit[my_K];dis_buffer[43] &= 0XFE;dis_buffer[40] |= 0x01;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  320.                         default :break;
  321.                 }
  322.         }
  323.         else
  324.         {
  325.                 switch(ABC)                //xx.xx kA
  326.                 {
  327.                         case 0:{dis_buffer[10] = my_unit[my_A] | my_unit[my_K]; dis_buffer[9] &= 0XFE;dis_buffer[7] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  328.                         case 1:{dis_buffer[16] = my_unit[my_A] | my_unit[my_K];dis_buffer[15] &= 0XFE;dis_buffer[13] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  329.                         case 2:{dis_buffer[17] =ru8(my_unit[my_A] | my_unit[my_K]);dis_buffer[18] &= 0X7F;dis_buffer[38] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  330.                         case 3:{dis_buffer[44] = my_unit[my_A] | my_unit[my_K];dis_buffer[43] &= 0XFE;dis_buffer[41] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  331.                         default :break;
  332.                 }
  333.         }
  334.         
  335. }
  336. //功率单位转换unsigned char *dis_buf,
  337. void Change_P(long data,unsigned char ABCD)        //电流单位转换,A:0  B:1  C:2
  338. {
  339.         unsigned long Temp_A = 0;
  340.         Temp_A = fabs(data);
  341.         if(Temp_A<10000)        //x.xxx kW
  342.         {
  343.                 switch(ABCD)
  344.                 {                                                          //V                擦除var       小数点
  345.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_K] ; dis_buffer[9] &= 0XFE;dis_buffer[6] |= 0x01;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  346.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[15] &= 0XFE;dis_buffer[12] |= 0x01;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  347.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_K]);dis_buffer[18] &= 0X7F;dis_buffer[39] |= 0x80;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  348.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[43] &= 0XFE;dis_buffer[40] |= 0x01;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  349.                         default :break;
  350.                 }
  351.         }
  352.         else if(Temp_A<100000)        //xx.xx kW
  353.         {
  354.                 switch(ABCD)
  355.                 {
  356.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_K]; dis_buffer[9] &= 0XFE;dis_buffer[7] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  357.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[15] &= 0XFE;dis_buffer[13] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  358.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_K]);dis_buffer[18] &= 0X7F;dis_buffer[38] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  359.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[43] &= 0XFE;dis_buffer[41] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  360.                         default :break;
  361.                 }
  362.         }
  363.         else if(Temp_A<1000000)        //xxx.x kW
  364.         {
  365.                 switch(ABCD)
  366.                 {
  367.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[9] &= 0XFE;dis_buffer[8] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[7] &= 0xFE;}break;
  368.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[15] &= 0XFE;dis_buffer[14] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[13] &= 0xFE;}break;
  369.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_K]);dis_buffer[18] &= 0X7F;dis_buffer[37] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[38] &= 0x7F;}break;
  370.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[43] &= 0XFE;dis_buffer[42] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[41] &= 0xFE;}break;
  371.                         default :break;
  372.                 }
  373.         }
  374.         else if(Temp_A<10000000)        //x.xxx MW
  375.         {
  376.                 switch(ABCD)
  377.                 {
  378.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_M]; dis_buffer[9] &= 0XFE;dis_buffer[6] |= 0x01;dis_buffer[7] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  379.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[15] &= 0XFE;dis_buffer[12] |= 0x01;dis_buffer[13] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  380.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_M]);dis_buffer[18] &= 0X7F;dis_buffer[39] |= 0x80;dis_buffer[38] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  381.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[43] &= 0XFE;dis_buffer[40] |= 0x01;dis_buffer[41] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  382.                         default: break;
  383.                 }
  384.         }
  385.         else if(Temp_A<100000000)                //xx.xx MW
  386.         {
  387.                 switch(ABCD)
  388.                 {
  389.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_M]; dis_buffer[9] &= 0XFE;dis_buffer[7] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[8] &= 0xFE;}break;
  390.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[15] &= 0XFE;dis_buffer[13] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[14] &= 0xFE;}break;
  391.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_M]);dis_buffer[18] &= 0X7F;dis_buffer[38] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[37] &= 0x7F;}break;
  392.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[43] &= 0XFE;dis_buffer[41] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[42] &= 0xFE;}break;
  393.                         default: break;
  394.                 }
  395.         }
  396.         else if(Temp_A<1000000000)        //xxx.x MW
  397.         {
  398.                 switch(ABCD)
  399.                 {
  400.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[9] &= 0XFE;dis_buffer[8] |= 0x01;dis_buffer[6] &= 0xFE;dis_buffer[7] &= 0xFE;}break;
  401.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[15] &= 0XFE;dis_buffer[14] |= 0x01;dis_buffer[12] &= 0xFE;dis_buffer[13] &= 0xFE;}break;
  402.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_M]);dis_buffer[18] &= 0X7F;dis_buffer[37] |= 0x80;dis_buffer[39] &= 0x7F;dis_buffer[38] &= 0x7F;}break;
  403.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_M];dis_buffer[43] &= 0XFE;dis_buffer[42] |= 0x01;dis_buffer[40] &= 0xFE;dis_buffer[41] &= 0xFE;}break;
  404.                         default: break;
  405.                 }
  406.         }
  407.         else                //xxxx MW
  408.         {
  409.                 switch(ABCD)
  410.                 {
  411.                         case 0:{dis_buffer[10] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[9] &= 0XFE;}break;
  412.                         case 1:{dis_buffer[16] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[15] &= 0XFE;}break;
  413.                         case 2:{dis_buffer[17] =ru8(my_unit[Power_W] | my_unit[Power_K]);dis_buffer[18] &= 0X7F;}break;
  414.                         case 3:{dis_buffer[44] = my_unit[Power_W] | my_unit[Power_K];dis_buffer[43] &= 0XFE;}break;
  415.                         default: break;
  416.                 }
  417.         }
  418. }
  419. void Display_tiaoshi(void)
  420. {
  421.         LIGHT_H;
  422.         dis_buffer[11] = 0x80;//许继标
  423.         
  424.         dis_buffer[2] |=  0x02;//谐波分量
  425.         dis_buffer[2] |=  0x01;//LINE 3-
  426.         dis_buffer[1] |=  0x01;//3   T7
  427.         dis_buffer[0] |=  0x02;//4   T8
  428.         dis_buffer[63] |=  0x10;//电话谐波因子T9
  429.         dis_buffer[63] |=  0x40;//铃 图案T14
  430.         dis_buffer[63] |=  0x20;//H系数 T15
  431.         dis_buffer[63] |=  0x80;//开入 T16
  432.         dis_buffer[63] |=  0x08;//MAX T17
  433.         
  434.         dis_buffer[62] |=  0x02;//MIN T18
  435.         dis_buffer[62] |=  0x01;//需量 T19
  436.         dis_buffer[62] |=  0x80;//1开入开关座 图标 T20
  437.         dis_buffer[62] |=  0x20;//1开入开 图标 T21
  438.         dis_buffer[62] |=  0x40;//1开入闭 图标 T22
  439.         
  440.         dis_buffer[62] |=  0x10;//2开入开关座 图标 T23
  441.         dis_buffer[62] |=  0x04;//2开入开 图标 T24
  442.         dis_buffer[62] |=  0x08;//2开入闭 图标 T25
  443.         
  444.         dis_buffer[61] |=  0x80;//3开入开关座 图标 T26
  445.         dis_buffer[61] |=  0x20;//3开入开 图标 T27
  446.         dis_buffer[61] |=  0x40;//3开入闭 图标 T28
  447.         
  448.         dis_buffer[61] |=  0x10;//4开入开关座 图标 T29
  449.         dis_buffer[61] |=  0x04;//4开入开 图标 T30
  450.         dis_buffer[61] |=  0x08;//4开入闭 图标 T31
  451.         
  452.         dis_buffer[61] |=  0x02;//开出 T32
  453.         dis_buffer[61] |=  0x01;//电压合格率T33
  454.         dis_buffer[60] |=  0x80;//1开出开关座 图标 T38
  455.         dis_buffer[60] |=  0x20;//1开出开 图标 T39
  456.         dis_buffer[60] |=  0x40;//1开出闭 图标 T40
  457.         
  458.         dis_buffer[60] |=  0x10;//2开出开关座 图标 T41
  459.         dis_buffer[60] |=  0x04;//2开出开 图标 T42
  460.         dis_buffer[60] |=  0x08;//2开出闭 图标 T43
  461.         
  462.         dis_buffer[59] |=  0x80;//3开出开关座 图标 T44
  463.         dis_buffer[59] |=  0x20;//3开出开 图标 T45
  464.         dis_buffer[59] |=  0x40;//3开出闭 图标 T46
  465.         
  466.         dis_buffer[59] |=  0x10;//4开出开关座 图标 T47
  467.         dis_buffer[59] |=  0x04;//4开出开 图标 T48
  468.         dis_buffer[59] |=  0x08;//4开出闭 图标 T49
  469.         
  470.         dis_buffer[58] |=  0x01;//电流K系数 T50
  471.         dis_buffer[58] |=  0x02;//电感图标 T52
  472.         dis_buffer[57] |=  0x02;//电压波峰系数 T53
  473.         dis_buffer[58] |=  0x04;//电容图标 T55
  474.         dis_buffer[56] |=  0x02;//三相不平衡度T56
  475.         
  476.         dis_buffer[58] |=  0x08;//电脑图标 T59
  477.         dis_buffer[57] |=  0x08;//本 T60
  478.         dis_buffer[57] |=  0x04;//上 T61
  479.         dis_buffer[56] |=  0x08;//上 T62
  480.         dis_buffer[56] |=  0x04;//月 T63
  481.         dis_buffer[57] |=  0x20;//尖 T64
  482.         dis_buffer[57] |=  0x10;//峰 T65
  483.         dis_buffer[56] |=  0x20;//平 T66
  484.         dis_buffer[56] |=  0x10;//谷 T67
  485.         dis_buffer[58] |=  0x20;//正 T68
  486.         dis_buffer[58] |=  0x10;//负 T69
  487.         dis_buffer[57] |=  0x40;//有功 T70
  488.         dis_buffer[56] |=  0x40;//电度 T71
  489.         dis_buffer[58] |=  0x40;//正 T75
  490.         dis_buffer[58] |=  0x80;//负 T76
  491.         dis_buffer[57] |=  0x80;//无功 T77
  492.         dis_buffer[56] |=  0x80;//电度 T78
  493.         
  494.         dis_number5(dis_buffer,9876);
  495.         dis_num_H(dis_buffer,9876,0);
  496.         Change_P(9876,0);
  497.         dis_num_H(dis_buffer,-54321,1);
  498.         Change_P(-54321,1);
  499.         WriteAll_1625(0x00,dis_buffer,64);
  500.         dis_num_H(dis_buffer,543212,2);
  501.         Change_P(543211,2);
  502.         WriteAll_1625(0x00,dis_buffer,64);
  503.         dis_num_H(dis_buffer,5432123,3);
  504.         Change_P(5432123,3);
  505.         WriteAll_1625(0x00,dis_buffer,64);
  506.         Instruct_line(dis_buffer,Ins_C,Ins_0,Ins_5);//cos
  507.         
  508.         
  509. }
复制代码

ht1621b中文.pdf
ht1625v170.pdf

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏3 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:59423 发表于 2018-3-22 18:21 | 只看该作者
段码屏的程序用来学习,现在在做电表相关的工作。
回复

使用道具 举报

板凳
ID:110257 发表于 2018-8-4 23:09 | 只看该作者
学习了。谢谢!
回复

使用道具 举报

地板
ID:375880 发表于 2018-8-6 10:46 来自手机 | 只看该作者
我先在在做电表,感谢!
回复

使用道具 举报

5#
ID:234890 发表于 2018-8-31 15:12 | 只看该作者
下载还要金币啊!
回复

使用道具 举报

6#
ID:234890 发表于 2018-8-31 16:02 | 只看该作者
代码不全啊!
回复

使用道具 举报

7#
ID:415572 发表于 2018-12-5 00:17 | 只看该作者
学习一下
回复

使用道具 举报

8#
ID:241249 发表于 2019-4-9 21:25 | 只看该作者
代码量有点大啊
回复

使用道具 举报

9#
ID:312300 发表于 2019-5-20 11:57 | 只看该作者
学习了。。。。。。
回复

使用道具 举报

10#
ID:96552 发表于 2019-8-4 21:08 | 只看该作者
好资料,谢谢了
回复

使用道具 举报

11#
ID:76567 发表于 2019-10-22 16:08 | 只看该作者
感谢分享,很好的学习资料
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表