设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 单片机车载智能设备程序源码
返回列表 发新帖
查看: 1024|回复: 2
收起左侧

单片机车载智能设备程序源码

[复制链接]
ID:834151 发表于 2020-11-20 13:09 | 显示全部楼层 |阅读模式
这个程序是实现泥头车远程智能管理，远程平台可以实时对车辆进行监控。车载智能设备每隔3秒钟就给平台发送车辆位置，油剩余量，车速，扬尘量数据发送到平台。

单片机源程序如下:
  1. #include "eeprom.h"
  2. #include "bianma.h"
  3. #include <reg52.h>
  4. #include <intrins.h>


  7. sbit AM=P3^2;
  8. sbit BM=P3^3;
  9. sbit k=P3^7;
  10. sbit s=P3^6;
  11. extern uint temp,temp2;

  13. extern uint AR,BR;
  14. extern uint date;
  15. extern uchar kc;

  17. extern uint AT,BT;

  19. uchar num_a=0;
  20. uchar num_b=0;
  21. uint dateA, dateB,numB;
  22. uchar cofig,key,a=0;
  23. uchar ok,u;
  24. uchar i,r;
  25. uint Compare[5]={0,0,0,0,0};
  26. uint Compare1[5]={0,0,0,0,0};
  27. void waiint()
  28. {
  29. EX0=1;
  30. IT0=0;
  31. EA=1;   
  32.     }
  33. void delayss(UINT16 z)
  34. {
  35. UINT16 x,y;
  36.   for(x=z;x>0;x--)
  37.   for(y=120;y>0;y--);
  38. }


  41. void main()
  42. {  
  43.   waiint();
  44.   intt();
  45.         
  46.   num_a=EEPROMReadByte(1);delayss(60);
  47.   num_b=EEPROMReadByte(2);delayss(60);

  49.    //date=num_a+(254*num_b);
  50.    
  51.    SBUF=num_a;while(TI==0);TI=0;
  52.       TR1=1;
  53.     SBUF=num_b;while(TI==0);TI=0;
  54.   delay(100);
  55.   date=num_a;
  56.   date=(date<<8)&0xff00;
  57.   date=date|num_b;
  58.    key=2;
  59.    kc=0;
  60.    dateA=0;

  62.   while(1)
  63.   {
  64.    
  65.    if(s==0)
  66.    {
  67.      delay(10);
  68.      if(s==0)
  69.       {  AR=0;}}

  71.   while(k==0)
  72.   {   TR0=1;
  73.     while(k==0)
  74.      {
  75.          
  76.       
  77.      
  78.        ok=1;
  79.      if(Compare1[0]==0xff&&Compare1[1]==0xff&&Compare1
  80.    [2]==0xff&&Compare1[3]==0xff&&Compare1[4]==0xff)
  81.        {r++;}
  82.           else
  83.    if(Compare1[0]==0x00&&Compare1[1]==0x00&&Compare1
  84.    [2]==0x00&&Compare1[3]==0x00&&Compare1[4]==0x00)
  85.        {r++;}
  86.           else
  87.        { Compare[4]=0x00;}   
  88.   if(r==5&&Compare[0]<Compare[4])            
  89.       {dateA=Compare[4];r=0;}
  90.     // dateA=Compare[9];
  91.       
  92.          TR1=1;
  93.          
  94.     if(dateA!=0)
  95.      {      
  96.      SBUF=num_a=dateA>>8;
  97.      while(TI==0);TI=0;TR1=1;
  98.      SBUF=num_b=dateA&0XFF;   
  99.       while(TI==0);TI=0; }}
  100.         
  101.       TR0=0;
  102.       delay(1);
  103.      EA=0;
  104.      EEPROMSectorErase(1);
  105.       
  106.      EEPROMWriteByte(1,num_a);
  107.       
  108.      EEPROMWriteByte(2,num_b);
  109.        delay(1000); EA=1; }
  110.                            
  111.      
  112.      
  113.    //  mm: dateA=caiji();
  114.          

  116.       // if(dateA==0xff)
  117.        //  {goto mm;}

  119.   
  120.    if(Compare1[0]==0xff&&Compare1[1]==0xff&&Compare1
  121.    [2]==0xff&&Compare1[3]==0xff&&Compare1[4]==0xff)
  122.        {r++;}
  123.           else
  124.    if(Compare1[0]==0x00&&Compare1[1]==0x00&&Compare1
  125.    [2]==0x00&&Compare1[3]==0x00&&Compare1[4]==0x00)
  126.        {r++;}
  127.           else
  128.        { Compare[4]=0x00;}   
  129.   if(r==5&&Compare[0]<Compare[4])            
  130.       {dateA=Compare[4];r=0;}               


  133.     if(key==10)//顺时针转cofig=1;(关闭 )
  134.     {  
  135.       
  136.       if(dateA>20)
  137.       {   TR2=1;
  138.          if(temp>=1000)
  139.            {
  140.              temp=0;
  141.            if(date<=(dateA+5))// 车蓬闭合良好
  142.            { SBUF=0xd2;while(TI==0);TI=0;dateA=0;
  143.              key=2;AT=BT=0;TF2=0;TR2=0;delay(1000);}
  144.                     else
  145.              {SBUF=0xd1;while(TI==0);TI=0;TF2=0; delay(100);}
  146.                                              
  147.                                                    }}
  148.          
  149.            
  150.            
  151.                                                    }
  152.                  
  153.                  
  154.     if(key==2) //逆时针转cofig=0;( 打开  )
  155.     {
  156.         
  157.      
  158.      if((dateA>=30)&&(dateA<=300))//车蓬没关好
  159.        {      
  160.                TR2=1;
  161.             if(temp>1000)            
  162.             {SBUF=0xd1;while(TI==0);TI=0;temp=0;}
  163.                            }
  164.            
  165.        if(dateA>350)
  166.          {temp=0;TR2=0;}
  167.   
  168.      if(date<=(dateA+30)) //车篷全开
  169.        {
  170.         temp=0;
  171.         TR2=0;SBUF=0xd3;while(TI==0);
  172.          TI=0;dateA=0;key=1;AT=BT=0;TF2=0;delay(10);}
  173.       
  174.                   }                  
  175.                            
  176.         
  177.                            

  179.                         }}
  180.    



  184.                                  
  185. void teim(void) interrupt 0                        
  186. {    uchar h,l;
  187.       while(AM==0);
  188.      if(ok==1)  
  189.       {
  190.        if(BM==1)
  191.        {h++;if(h==5){dateA++;cofig=0xff;h=0;u++;}}//顺时针
  192.                   else
  193.        if(BM==0)
  194.        {l++;if(l==5){dateA++;cofig=0x00;l=0;u++;}}//逆时针
  195.        Compare[u]=dateA;
  196.        Compare1[u]=cofig;
  197.        if(u==5){u=0;}
  198.                   
  199.                ok=0; }TR0=0;TR1=1;}
  200.                            
  201.                
  202.       
  203.   void time4(void) interrupt 4                  
  204.    {TR1=0;}               
  205.                  
  206. void time0(void) interrupt 1                  
  207.   {   
  208.    TH0=(65536-5000)/256;                        
  209.    TL0=(65536-5000)%256;
  210.     temp++; temp2++;      
  211.    if (temp2>5000)
  212.        {temp2=0;}
  213.    if(temp>2000)   
  214.       {temp=0;}
  215.      }               
复制代码


回复

使用道具 举报

ID:1 发表于 2020-11-21 22:04 | 显示全部楼层
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

ID:834151 发表于 2020-11-30 14:22 | 显示全部楼层
车载智能管理设备电路原理图现在上传
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表