找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

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

VB溫度曲線繪制 上位機和下位機單片機源碼

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:148938 發(fā)表于 2016-12-18 16:59 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
VB溫度曲線繪制


上位機vb源碼:
xine001_vb.zip (5.13 MB, 下載次數(shù): 116)

下位機單片機源程序:
xine001_keil.zip (18.13 KB, 下載次數(shù): 80)

單片機部分源碼預(yù)覽:
  1. #include <reg52.h>
  2. #include <intrins.h>
  3. #include <stdio.h>

  4. #define port_ad P2

  5. sbit ad_A=P0^0;
  6. sbit ad_B=P0^1;
  7. sbit ad_C=P0^2;
  8. sbit ad_ale=P0^3;
  9. sbit ad_st=P0^5;
  10. sbit ad_eoc=P0^6;
  11. sbit ad_oe=P0^7;

  12. unsigned char flag_com,ff,aa;
  13. float ff1;

  14. //void delayms(unsigned int x)
  15. //{
  16. //        unsigned int i,j;
  17. //        for(i=x;i>0;i--)
  18. //                for(j=110;j>0;j--);                          //11.0592MHz
  19. //}


  20. unsigned char get_ad()
  21. {
  22.         unsigned char val;
  23.         ad_oe=0;
  24.         ad_st=0;
  25.         ad_eoc=1;
  26.         ad_st=1;
  27.         _nop_();
  28.         ad_st=0;
  29.         while(ad_eoc);
  30.         while(!ad_eoc);
  31.         //delayms(1);
  32.         port_ad=0xff; //準(zhǔn)雙向
  33.         ad_oe=1;
  34.         _nop_();
  35.         val=port_ad;
  36.         _nop_();
  37.         ad_oe=0;
  38.         return val;
  39. }

  40. void init_com()
  41. {
  42.         TMOD=0x20;        //T1方式2
  43.         TH1=0xfd;TL1=0xfd; //T1->波特率9600bps
  44.         TR1=1;
  45.         SCON=0x50;//scon:sm0,sm1,sm2,ren,...
  46.         EA=1;ES=1;
  47. }

  48. void init_ad()
  49. {
  50.         ad_C=0;ad_B=0;ad_A=0; //ADC0809通道1
  51.         ad_ale=0;
  52.         _nop_();
  53.         ad_ale=1;
  54. }

  55. void main()
  56. {
  57.    init_com();
  58.    init_ad();
  59.         while(1)
  60.         {
  61.                 if(flag_com==1)
  62.                 {
  63.                         ES=0;
  64.                         flag_com=0;
  65.                         ff=get_ad();
  66.                         ff1=(float)ff*100.0/256.0;
  67.                         TI=1;
  68.                         printf("%4.1f",ff1);
  69.                         while(!TI);
  70.                         TI=0;
  71.                         ES=1;
  72.                 }
  73.         }
  74. }

  75. void serial() interrupt 4
  76. {
  77.         if(RI)
  78.         {
  79.                 RI=0;
  80.                 aa=SBUF;
  81.                 flag_com=1;
  82.         }
  83. }
復(fù)制代碼


評分

參與人數(shù) 2黑幣 +56 收起 理由
lgjdqm + 6 絕世好帖!
admin + 50 共享資料的黑幣獎勵!

查看全部評分

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

使用道具 舉報

沙發(fā)
ID:1 發(fā)表于 2017-1-3 21:42 | 只看該作者
51黑有你更精彩!!
回復(fù)

使用道具 舉報

板凳
ID:160725 發(fā)表于 2017-11-4 17:15 | 只看該作者
不錯的設(shè)計,學(xué)習(xí)學(xué)習(xí)
回復(fù)

使用道具 舉報

地板
ID:379771 發(fā)表于 2018-7-28 19:58 | 只看該作者
好東西學(xué)習(xí)了
回復(fù)

使用道具 舉報

5#
ID:552794 發(fā)表于 2019-7-11 21:54 | 只看該作者
精彩!下載學(xué)習(xí)。
回復(fù)

使用道具 舉報

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

本版積分規(guī)則

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

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

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