欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 19775|回復: 12
收起左側

GP2D12紅外測距傳感器 單片機程序及PROTEUS仿真 實測可用

  [復制鏈接]
ID:262 發表于 2016-8-15 13:44 | 顯示全部樓層 |閱讀模式
GP2D12紅外測距傳感器的PROTEUS仿真原理圖如下：
0.png

QQ圖片20130612140336.jpg QQ圖片20130612140346.jpg QQ圖片20130612140349.jpg


GP2D12紅外測距傳感器的單片機程序：
  1. #include"reg52.h"
  2. #include<intrins.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char

  6. sbit cs = P3^2;
  7. long int read=0;
  8. sbit wela = P2^7;
  9. sbit dula = P2^6;
  10. sbit lcden=P3^4;
  11. sbit lcdrs=P3^5;

  13. uchar bai,shi,ge,num;

  15. uchar table[] ="123456789";

  17. void delayms(uint z)
  18. {
  19.         uint x,y;
  20.         for(x=z;x>0;x--)
  21.                 for(y=110;y>0;y-- );
  22. }

  24. void write_com(uchar com)
  25. {        
  26.         lcdrs=0;
  27.         P0=com;
  28.         delayms(5);
  29.         lcden=1;
  30.         delayms(5);
  31.         lcden=0;
  32. }

  34. void write_data(uchar date)
  35. {
  36.         lcdrs=1;
  37.         P0=date;
  38.         delayms(5);
  39.         lcden=1;
  40.         delayms(5);
  41.         lcden=0;
  42. }

  44. void init()
  45. {
  46.         dula=0;
  47.         wela=0;
  48.         lcden=0;
  49.         write_com(0x38);
  50.         write_com(0x0c);
  51.         write_com(0x06);
  52.         write_com(0x01);
  53. }
  54. void delay(uint a)           //  a 個1us延時
  55. {
  56.         for(;a > 0;a --)
  57.         _nop_();_nop_();
  58. }

  60. void T0_time() interrupt 1
  61. {
  62.         cs = 0;
  63.         RD = 0;
  64.         read = P1;
  65.         INT0 = 1;
  66. }
  67. uint adc0804()
  68. {
  69. TMOD=0X01;
  70. TH0=(65536-45872)/256;
  71. TL0=(65536-45872)/256;
  72. EA=1;
  73. ET0=1;
  74. TR0=1;

  76.         INT0 = 1;
  77.         cs = 0;
  78.         WR = 0;
  79.         delay(255);
  80.         cs = 1;
  81.         WR = 1;
  82.         delay(200);               
  83.         read = read * 196 /100;
  84.         return read;
  85.         
  86. }

  88. void math(uint x)
  89. {
  90.         bai = x / 100;
  91.         shi = x /10 % 10;
  92.         ge = x % 10;
  93. }/*
  94. void display()
  95. {         
  96.          
  97.         math(adc0804());
  98.         
  99.         dula=1;
  100.         P0 = table[bai+10];
  101.         dula=0;
  102.         P0=0xff;

  104.         wela = 1;
  105.         P0 = 0xfe;
  106.         wela=0;
  107.         delay(7000000);

  109.                
  110.         dula=1;
  111.         P0 = table[shi];
  112.         dula=0;
  113.         P0=0xff;

  115.         wela = 1;
  116.         P0 = 0xfd;
  117.         wela=0;
  118.         delay(7000000);

  120.                
  121.         dula=1;
  122.         P0 = table[ge];
  123.         dula=0;
  124.         P0=0xff;

  126.         wela = 1;
  127.         P0 = 0xfb;
  128.         wela=0;
  129.         delay(7000000);
  130.         
  131. }

  133.    */

  135. void main()
  136. {
  137.     cs=0;
  138.                 init();           


  141.                    while(1)
  142.                 {
  143.                

  145.             math(adc0804());
  146.                

  148.                 write_com(0x80+5);
  149.         
  150.                 write_data(table[bai]);
  151.                 write_data(table[shi]);
  152.                 write_data(table[ge]);
  153.                         delayms(500);
  154.                
  155.                 }
  156.         
  157. }
復制代碼

0.png

注意仿真工程只能用Proteus7.5這個版本,其他版本均無法仿真,必須要Proteus7.5才能用,如果你沒有安裝此版本的話就不必下載了
Keil代碼與Proteus7.5仿真下載: GP2D12仿真文件.zip (165.48 KB, 下載次數: 419)

評分

參與人數 1黑幣 +5 收起 理由
zzwk123456 + 5 很給力！

查看全部評分

回復

使用道具 舉報

ID:262 發表于 2021-12-24 04:42 | 顯示全部樓層
李12117 發表于 2017-5-3 23:02
仿真時說沒找到gp2d12這個元件怎么辦?

樓主說了,這個文件只能用Proteus7.5打開才可以,其他版本都仿真,我測試也是這樣的,其他版本打開 1602都是無顯示,下圖是用Proteus7.5打開的效果
51hei.gif
回復

使用道具 舉報

ID:196291 發表于 2017-5-3 23:02 | 顯示全部樓層
仿真時說沒找到gp2d12這個元件怎么辦?
回復

使用道具 舉報

ID:223290 發表于 2017-8-22 10:06 | 顯示全部樓層
仿真上LCD1602顯示的167是1.67V，GP2D12顯示的54是54cm嗎？
回復

使用道具 舉報

ID:240017 發表于 2017-10-16 19:40 來自觸屏版 | 顯示全部樓層
好資料，51黑有你更精彩!!!
回復

使用道具 舉報

ID:196311 發表于 2017-10-19 09:58 | 顯示全部樓層
下載學習，謝謝分享
回復

使用道具 舉報

6#
無效樓層，該帖已經被刪除
ID:310742 發表于 2018-4-18 11:31 | 顯示全部樓層
學習了，謝謝分享
回復

使用道具 舉報

8#
無效樓層，該帖已經被刪除
ID:269851 發表于 2018-12-17 19:57 | 顯示全部樓層
學習了，謝謝分享
回復

使用道具 舉報

ID:352562 發表于 2019-6-21 22:46 | 顯示全部樓層
學習學習
回復

使用道具 舉報

ID:625195 發表于 2019-10-16 18:32 來自觸屏版 | 顯示全部樓層
紅外測距傳感器與STC89C52怎么鏈接
回復

使用道具 舉報

ID:643554 發表于 2019-11-18 09:18 來自觸屏版 | 顯示全部樓層
怎么進行操作，數碼管燈不亮
回復

使用道具 舉報

13#
無效樓層，該帖已經被刪除
14#
無效樓層，該帖已經被刪除
15#
無效樓層，該帖已經被刪除
ID:987987 發表于 2021-12-9 11:19 | 顯示全部樓層
你好，我下載了你的GP2D12仿真文件，怎么不能仿真啊，是因為沒有lcd的程序文件嗎？
回復

使用道具 舉報

17#
無效樓層，該帖已經被刪除
18#
無效樓層，該帖已經被刪除
ID:262 發表于 2021-12-24 04:47 | 顯示全部樓層
小叔叔 發表于 2019-11-18 09:18
怎么進行操作，數碼管燈不亮

這個是用LCD1602來顯示的
回復

使用道具 舉報

21#
無效樓層，該帖已經被刪除
22#
無效樓層，該帖已經被刪除
23#
無效樓層，該帖已經被刪除
24#
無效樓層，該帖已經被刪除
您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表