久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 4188|回復: 1
打印 上一主題 下一主題
收起左側

用單片機對機械式電度表進行改進 附源程序

[復制鏈接]
跳轉到指定樓層
樓主
電動車是吃得多才能跑的遠，為方便測試電動車電瓶的容量，前段時間在某寶入手了一個機械式電度表，到手只有十幾元。不過便宜沒好貨，這貨經常停走。檢查發現是機械計數器阻力太大造成的。于是采用單片機對其進行改進，改進思路是用單片機記錄電度表的光耦輸出脈沖，轉換成電度數用數碼管顯示出來。另外還分時顯示了充電器功率（瓦數）和充電時間（小時數）。程序見附件。


單片機源程序如下:
  1. #define MAIN_Fosc                11059200L        //定義主時鐘
  2. //#include<reg52.h>
  3. #include        "STC15Fxxxx.H"
  4. #define uchar unsigned char
  5. #define uint unsigned int

  7. sbit COUNT_IN=P3^2;
  8. unsigned code table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};
  9. #define   DataPort P1;
  10. sbit led1=P3^4;
  11. sbit led2=P3^5;
  12. sbit led3=P3^6;
  13. sbit led4=P3^7;

  15. unsigned long count;
  16. unsigned long  kwh;
  17. unsigned int w,h;
  18. float s;
  19. bit flag;

  21. void init()
  22. {
  23.    IT0=1;        //INT0負跳變觸發        
  24.    TMOD=0x01;//定時器工作于方式1
  25.    TH0=0x3c;          //50ms
  26.    TL0=0xb0;
  27.    EA=1; //CPU開中斷總允許
  28.    ET0=1;//開定時中斷
  29.    EX0=1;//開外部INTO中斷
  30.    TR0=1;//啟動定時
  31. }
  32. //========================================================================
  33. // 函數: void  Delayms(unsigned int ms)
  34. // 描述: 延時函數。
  35. // 參數: ms,要延時的ms數, 這里只支持1~65535ms. 自動適應主時鐘.
  36. // 返回: none.
  37. // 版本: VER1.0
  38. // 日期: 2013-4-1
  39. // 備注:
  40. //========================================================================
  41. void  Delayms(unsigned int ms)
  42. {
  43.      unsigned int i;
  44.          do{
  45.              i = MAIN_Fosc / 13000;
  46.                   while(--i)        ;   //14T per loop
  47.      }while(--ms);
  48. }
  49. //**********************************************
  50. void EXINT0() interrupt 0
  51. {
  52. //  kwh=kwh+.000625;
  53.   count++;         //累計電度表輸出脈沖個數
  54. }

  56. void time0() interrupt 1
  57. {
  58.   TH0=0x3c;
  59.   TL0=0xb0;         //50ms（實測每次循環52.9514ms，使用STC15W408AS內部時鐘，11.0592Mhz，環境溫度29℃）
  60.   s=s+.0529514;          //累計秒數
  61. }

  63. void display_SMG_kwh(void)
  64. {
  65.    P1=table[kwh/1000];
  66.    led1= 0;
  67.    Delayms(5);
  68.    led1 = 1;

  70.    P1=table[kwh%1000/100]&0x7f;
  71.    led2 = 0;
  72.    Delayms(5);
  73.    led2 = 1;

  75.    P1=table[kwh%100/10];
  76.    led3 = 0;
  77.    Delayms(5);
  78.    led3 = 1;

  80.    P1=table[kwh%10];
  81.    led4 = 0;
  82.    Delayms(5);
  83.    led4 = 1;
  84. }

  86. void display_SMG_w(void)
  87. {
  88.    P1=table[w%10000/1000];
  89.    led1= 0;
  90.    Delayms(5);
  91.    led1 = 1;

  93.    P1=(table[w%1000/100]);
  94.    led2 = 0;
  95.    Delayms(5);
  96.    led2 = 1;

  98.    P1=table[w%100/10];
  99.    led3 = 0;
  100.    Delayms(5);
  101.    led3 = 1;

  103.    P1=table[w%10];
  104.    led4 = 0;
  105.    Delayms(5);
  106.    led4 = 1;
  107. }

  109. void display_SMG_h(void)
  110. {
  111.    P1=0x8b;
  112. //   P1=table[h/1000];
  113.    led1= 0;
  114.    Delayms(5);
  115.    led1 = 1;

  117.    P1=table[h%1000/100];
  118.    led2 = 0;
  119.    Delayms(5);
  120.    led2 = 1;

  122.    P1=table[h%100/10]&0x7f;
  123.    led3 = 0;
  124.    Delayms(5);
  125.    led3 = 1;

  127.    P1=table[h%10];
  128.    led4 = 0;
  129.    Delayms(5);
  130.    led4 = 1;
  131. }

  133. void main()
  134. {
  135.   unsigned char a;
  136.   init();
  137.   while(1)
  138.   {
  139.    for(a=0;a<=50;a++)
  140.    {
  141.     kwh=count*.0625;               //用電度數=電度表閃燈次數*.000625kwh/1000*100，(2位小數)
  142.     display_SMG_kwh();
  143.    }
  144.    for(a=0;a<=50;a++)
  145.    {
  146.     w=kwh*1000*3600/s;                   //用電瓦數=累計千瓦時*1000*3600/累計秒數
  147.     display_SMG_w();
  148.    }
  149.    for(a=0;a<=50;a++)
  150.    {
  151.     h=s/360;                            //用電小時數=累計秒數/3600*10,(1位小數)
  152. ……………………

  154. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
STC15W408AS+電度表smg4.rar (47.84 KB, 下載次數: 17)


評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

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

使用道具 舉報

沙發
ID:137736 發表于 2022-11-2 09:37 | 只看該作者
請介紹的再詳細些，多上些圖。
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 91国内外精品自在线播放 | 成人高清网站 | 伊人精品在线视频 | 中文字字幕一区二区三区四区五区 | 激情小说综合网 | 久久国产视频播放 | 少妇特黄a一区二区三区88av | 国产男女视频网站 | 在线视频一区二区 | 国产高清视频 | 在线国产小视频 | 国产精品一区二区久久久久 | 一级毛片在线播放 | 久久i | 爱爱小视频 | 精品久久久久久久 | 欧美日韩国产精品一区 | 国产专区在线 | 日韩午夜| 亚洲精品一区二区另类图片 | 欧美三区在线观看 | 7777在线 | 欧美大片黄 | 国产精品久久久久久久久免费高清 | 久久久片 | 精品欧美一区二区三区久久久小说 | 色婷婷一区 | 日韩免| 秋霞在线一区 | 日本三级电影在线观看视频 | 婷婷午夜天 | 91亚洲精品在线观看 | 成人欧美一区二区三区在线观看 | 性一交一乱一透一a级 | 精品国产欧美一区二区三区成人 | 久久新 | 99精品国产一区二区三区 | 精品日韩在线 | 国产97在线视频 | 狠狠干综合视频 | 亚洲精品久久久久久久久久久久久 |