標(biāo)題: 電流檢測(cè)裝置仿真,使用51單片機(jī)主控芯片,數(shù)碼管進(jìn)行顯示 [打印本頁(yè)]

作者: 溫水煮青蛙    時(shí)間: 2019-7-23 17:40
標(biāo)題: 電流檢測(cè)裝置仿真,使用51單片機(jī)主控芯片,數(shù)碼管進(jìn)行顯示
電流檢測(cè)裝置,使用51單片機(jī)主控芯片,數(shù)碼管進(jìn)行顯示,很實(shí)用

仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)


單片機(jī)源程序如下:
  1. #include <reg51.h>

  2. #define x 1                        //修正系數(shù)
  3. #define p 2                //放大倍數(shù)
  4. void main()
  5.         {
  6.         int i,j;
  7.         EA=1;
  8.         EX0=1;
  9.         IT0=1;
  10.         P3_0=0;
  11.         P3_1=0;
  12.         P0=0;
  13.         P2=0;
  14.         while(1)
  15.         {
  16.         for (j=0;j<1;j++)                //采樣延遲,可以用定時(shí)器比較準(zhǔn)確
  17.         for (i=0;i<500;i++)
  18.                 ;
  19.         P3_0=1;                                        //地址鎖存
  20.         for (i=0;i<50;i++)
  21.         ;
  22.         P3_1=1;                                        //啟動(dòng)AD
  23.         for (i=0;i<100;i++)
  24.         ;
  25.         P3_0=0;
  26.         P3_1=0;
  27.         }}

  28. void int0() interrupt 0
  29.         {
  30.         char a,b,c,d;
  31.         int out;
  32.         EA=0;
  33.         out=(P1*100.0/255.0)*5/p/0.1;                //計(jì)算輸出值
  34.         b=out%100/10;                                //取小數(shù)點(diǎn)后一位
  35.         a=out%1000/100*16;                        //取個(gè)位
  36.         if(out>=1000)                                //取十位
  37.         c=out/1000*16;
  38.         else
  39.         c=0;
  40.         d=out%10;                                        //取小數(shù)點(diǎn)后兩位
  41.         P2=a|b;
  42.         P0=c|d;
  43.         EA=1;
  44.         }
  45.        
復(fù)制代碼

所有資料51hei提供下載:
電流檢測(cè).zip (33.03 KB, 下載次數(shù): 28)







歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1