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

QQ登錄

只需一步，快速開始

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

數(shù)控穩(wěn)壓電源代碼

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:834162 發(fā)表于 2021-4-12 09:02 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
  1. #include"reg52.h"
  2. //#include"math.h"
  3. #include"stdlib.h"
  4. #include"function.h"


  7. sbit RS = P1^4;
  8. sbit RW = P1^5;
  9. sbit E  = P1^6;

  11. #define DBUS P0
  12. sbit clk_574_1 = P2^3;
  13. //sbit clk_574_2 = P1^3;
  14. //sbit lcd_rs    = P1^4;

  16. uint idac;
  17.         

  19. idata uchar GOUT[7];
  20. idata float temp1;
  21. idata float dac_temp;
  22. idata float sheding_temp;
  23. idata float sheding_temp1;
  24. char  code dx516[3] _at_ 0x003b;//這是為了仿真設(shè)置的(大蝦仿真器)

  26. /************************************************************************************
  27.                               把浮點(diǎn)數(shù)拆開存儲(chǔ)指針型數(shù)據(jù)  
  28.                                                           輸入浮點(diǎn)數(shù)，方式0：設(shè)定值，1：檢測(cè)值  
  29. ************************************************************************************/
  30. void chai(float x,bit y)  
  31. {
  32.         uint i;
  33.         for(i = 0;i < 7;i ++)
  34.                 GOUT[i] = 0;
  35.         if(y == 0)
  36.         {
  37.                 i = x / 10;
  38.                 if(i == 0)
  39.                         GOUT[0] = ' ';
  40.                 else
  41.                         GOUT[0]        = i + '0';
  42.                 GOUT[1] = (int)x % 10 + '0';
  43.                 x = x * 10;
  44.                 GOUT[3] = (int)x % 10 + '0';

  46.                 x = x * 10;
  47.                 if(((int)x % 10) >= 5 )// 防止后面大于4的數(shù)被舍去  
  48.                 {GOUT[3] = GOUT[3] + 1;}
  49.                 else
  50.                 {;}

  52.                 GOUT[4] = ' ';
  53.                 GOUT[5] = ' ';
  54.         }
  55.         else
  56.         {
  57.                 i = x / 10;
  58.                 if(i == 0)
  59.                         GOUT[0] = ' ';
  60.                 else
  61.                         GOUT[0] = i + '0';
  62.                 GOUT[1] = (int)x % 10 + '0';
  63.                 x = x * 10;
  64.                 GOUT[3] = (int)x % 10 + '0';
  65.                 x = x * 10;
  66.                 GOUT[4] = (int)x % 10 + '0';
  67.                 x = (x * 10);
  68.                 GOUT[5] = (unsigned int)x % 10 + '0';
  69.         }
  70.         GOUT[2] =  '.';
  71.         GOUT[6] =  '\0';
  72. }

  74. /************************************************************************************

  76. //向LCM發(fā)送一個(gè)字符串,長(zhǎng)度64字符之內(nèi)。  

  78. ************************************************************************************/
  79. void lcm_w_word(uchar x,uchar y,uchar *str)
  80. {
  81.    x = x+y;
  82.    w_code(x);
  83.   while(*str != '\0')
  84.   {
  85.        w_data(*str++);
  86.    }
  87.   *str = 0;
  88. }
  89. /************************************************************************************
  90.                               顯示設(shè)定電壓  
  91. ************************************************************************************/
  92. void  disp_sheding()
  93. {
  94.     lcm_w_word(0x90,0x00,"設(shè)定：");
  95.     sheding_temp1 = sheding_temp + 0.0005;//------加0.0005修正有時(shí)顯示.0999
  96.         chai(sheding_temp1,1);  
  97.     lcm_w_word(0x90,3,GOUT);
  98.         w_code(0x96);
  99.     w_data('V');        
  100. }
  101. /************************************************************************************
  102.                  AD的16位整形數(shù)轉(zhuǎn)換成浮點(diǎn)電壓或電流值  
  103. ************************************************************************************/
  104. float adjisuan_U(uint x)
  105. {
  106.         temp1 = 11.990 / 0x5e1f;
  107.         temp1 = x * temp1;
  108.         return temp1;
  109. }

  111. float adjisuan_I(uint x)  //
  112. {
  113.         temp1 = 0.899 / 0x253d;
  114.         temp1 = (x * temp1)-0.005;
  115.         return temp1;
  116. }
  117. /************************************************************************************
  118. *
  119. *函數(shù)功能:輸入浮點(diǎn)數(shù)  
  120. *
  121. ************************************************************************************/
  122. float scanf_float(void)
  123. {
  124.         static uchar i = 0;
  125.         static uchar x[5] = {'0','0','0','0','0'};
  126.         static bit k = 1;
  127.         uchar temp1,temp2;
  128.         temp1 = key_sm();
  129.         temp2 = key_sm();
  130.         if((temp2 == 0xff) || (temp1 != temp2))
  131.         {
  132.                 k = 1;
  133.                 return(atof(x));
  134.         }
  135.         else if(k)
  136.         {
  137.                 k = 0;
  138.                 x[i] = temp1;
  139.                 i ++;
  140.                 if((temp1 == key_esc) || (i == 4))
  141.                 {
  142.                         x[0] = '0';
  143.                         x[1] = '0';
  144.                         x[2] = '0';
  145.                         x[3] = '0';
  146.                         x[4] = '0';
  147.                         i = 0;
  148.                 }
  149.                 return(atof(x));
  150.         }
  151. }

  153. /************************************************************************************

  155.                               掃描按鍵，并根據(jù)鍵值修改DAC的電壓  

  157. ************************************************************************************/
  158. void key_dac()
  159. {
  160.                 uchar key_qiao;
  161.            key_qiao = key_sm();
  162.         switch(key_sm())
  163.                 {
  164.         case key_shang:dac_temp = dac_temp + 1.0;break;//---按下上鍵電壓加1V
  165.         case key_xia  :dac_temp = dac_temp - 1.0;break;//---按下下鍵電壓減1
  166.         case key_zuo  :dac_temp = dac_temp - 0.1;break;//---按下左鍵電壓減0.1
  167.     case key_you  :dac_temp = dac_temp + 0.1;break;//---按下右鍵電壓加0.1
  168.     case key_0    :dac_temp = 0;             break;//---按下0鍵電壓歸0
  169.         default: key_qiao = 0xff;
  170.                  }
  171.                 if(key_qiao != 0xff)  //  10月1日 這里原來(lái)是0x00就讀AD不正常            
  172.                            {
  173.                        RS  =  1;                        
  174.                            RW  =  0;        //--------避免液晶屏干擾數(shù)據(jù)總線
  175.                            if(dac_temp < 0){dac_temp = 0;}        //----判斷電壓低于0大于30時(shí)把數(shù)據(jù)歸0
  176.                         if(dac_temp >= 30.10){dac_temp = 0;}        
  177.                         sheding_temp = dac_temp ;
  178.                         disp_sheding();
  179.                         idac = conver(dac_temp);  
  180.                           dac(idac);
  181.                         delay(50000);
  182.                         }
  183. }
  184. /************************************************************************************
  185.                                      主函數(shù)   
  186. ************************************************************************************/
  187. main()
  188. {

  190.                         lcd_rst(0);
  191.                         rst_ad();        
  192.                         dac_temp = 0 ;
  193.                        RS  =  1;                        
  194.                        RW  =  0;        //--------避免液晶屏干擾數(shù)據(jù)總線                  
  195.                              dac(conver(dac_temp));           //吸合低壓繼電器并輸出0V
  196.                        LED_ONOFF(1);//  打開背光源   
  197.                           set_7705_ch(0);
  198.                     read_AD_data(0x38);
  199.                     set_7705_ch(1);
  200.                     read_AD_data(0x39);

  202.                    disp_sheding();//顯示設(shè)定電壓   
  203.                    while(1)
  204.                    {
  205.                    lcm_w_word(0x80,0x02,"穩(wěn)壓電源");
  206.                    lcm_w_word(0x90,0x00,"設(shè)定：");                  
  207.                    lcm_w_word(0x88,0x00,"電壓：");   
  208.                    lcm_w_word(0x98,0x00,"電流：");
  209.                            
  210.                    write_ad(0x10);
  211.                write_ad(0x04);
  212.                    adjisuan_U(read_AD_data(0x38));
  213.                    chai(temp1,1);  
  214.            lcm_w_word(0x88,3,GOUT);
  215.                    key_dac();

  217.                    write_ad(0x11);
  218.                write_ad(0x14);
  219.                    adjisuan_I(read_AD_data(0x39));
  220.                    chai(temp1,1);  
  221.            lcm_w_word(0x98,3,GOUT);
  222.                    key_dac();
  223.                   
  224.                    }
  225.                                                                                                                                              
  226. }

復(fù)制代碼
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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