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

標題: GP2D12紅外測距傳感器 單片機程序及PROTEUS仿真 實測可用 [打印本頁]
作者: heicad    時間: 2016-8-15 13:44
標題: GP2D12紅外測距傳感器 單片機程序及PROTEUS仿真 實測可用
GP2D12紅外測距傳感器的PROTEUS仿真原理圖如下：





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. }
復制代碼



注意仿真工程只能用Proteus7.5這個版本,其他版本均無法仿真,必須要Proteus7.5才能用,如果你沒有安裝此版本的話就不必下載了
Keil代碼與Proteus7.5仿真下載: GP2D12仿真文件.zip (165.48 KB, 下載次數: 419)
作者: 李12117    時間: 2017-5-3 23:02
仿真時說沒找到gp2d12這個元件怎么辦?
作者: bingo大幅度    時間: 2017-8-22 10:06
仿真上LCD1602顯示的167是1.67V，GP2D12顯示的54是54cm嗎？
作者: 1229330235    時間: 2017-10-16 19:40
好資料，51黑有你更精彩!!!
作者: jxdianqi    時間: 2017-10-19 09:58
下載學習，謝謝分享
作者: 風流有何罪    時間: 2018-4-18 11:31
學習了，謝謝分享
作者: luo1084036180    時間: 2018-12-17 19:57
學習了，謝謝分享
作者: 畢鈺    時間: 2019-6-21 22:46
學習學習
作者: x3050421831    時間: 2019-10-16 18:32
紅外測距傳感器與STC89C52怎么鏈接
作者: 小叔叔    時間: 2019-11-18 09:18
怎么進行操作，數碼管燈不亮
作者: evilshadow    時間: 2021-12-9 11:19
你好，我下載了你的GP2D12仿真文件，怎么不能仿真啊，是因為沒有lcd的程序文件嗎？
作者: heicad    時間: 2021-12-24 04:42
李12117 發表于 2017-5-3 23:02
仿真時說沒找到gp2d12這個元件怎么辦?

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

51hei.gif (103.18 KB, 下載次數: 41)

51hei.gif
作者: heicad    時間: 2021-12-24 04:47
小叔叔 發表于 2019-11-18 09:18
怎么進行操作，數碼管燈不亮

這個是用LCD1602來顯示的



歡迎光臨 (http://www.zg4o1577.cn/bbs/) Powered by Discuz! X3.1
主站蜘蛛池模板： 亚洲一区二区三区免费在线观看 | 麻豆changesxxx国产| 国产女人与拘做受视频 | 日韩欧美一区二区三区四区 | 少妇无套高潮一二三区 | 一区二区三区亚洲 | 欧美日韩一区在线观看 | 欧美在线小视频 | 国产乱码精品一品二品 | 国产欧美精品 | 亚洲久在线 | 在线播放一区 | 欧美精品一区二区三区四区 在线 | 干干天天 | 91精品久久久久久久久久入口 | 一区二区免费看 | 亚洲一区二区三区免费视频 | 久久国产成人 | caoporn国产精品免费公开 | 岛国av一区二区 | 国产91视频播放 | 麻豆av网| 成人网在线 | av国产精品| 国产精品美女久久久久久不卡 | 午夜视频在线播放 | 性欧美hd | 国产精品久久久久久久久免费相片 | 久草院线| 日韩高清国产一区在线 | 国产欧美精品一区二区三区 | 婷婷综合网| 国产乱码精品1区2区3区 | 日韩欧美一区二区三区免费观看 | 欧美激情在线精品一区二区三区 | 亚洲精品中文字幕在线 | 成人h动漫精品一区二区器材 | 国产在视频一区二区三区吞精 | 国产激情片在线观看 | 玖玖综合在线 | 中文字幕日本一区二区 |