标题: STC89C51单片机主从双机蓝牙通讯 发送与接收程序及仿真 [打印本页]
作者: 玫瑰传说    时间: 2018-11-6 22:37
标题: STC89C51单片机主从双机蓝牙通讯 发送与接收程序及仿真
分控制板和动作板，控制板上连接主机蓝牙，转动控制板上的电位器，动作板上连接的LED变亮
蓝牙仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序(发射)如下:
  1. #include <reg51.h>
  2. #include <I2C.H>
  3. #define uchar unsigned char
  4. #define uint  unsigned int

  6. uchar ad;
  7. #define  PCF8591 0x90    //PCF8591 地址

  9. void delay(uchar x)                                                          
  10. {
  11. uchar i,j;
  12. for(j=0;j<x;j++)  
  13.         for(i=0;i<110;i++);
  14. }

  16. /*******************************************************************
  17. ADC发送字节[命令]数据函数               
  18. *******************************************************************/
  19. bit ISendByte(unsigned char sla,unsigned char c)
  20. {
  21.    Start_I2c();              //启动总线
  22.    SendByte(sla);            //发送器件地址
  23.    if(ack==0)return(0);
  24.    SendByte(c);              //发送数据
  25.    if(ack==0)return(0);
  26.    Stop_I2c();               //结束总线
  27.    return(1);
  28. }

  30. /*******************************************************************
  31. ADC读字节数据函数               
  32. *******************************************************************/
  33. unsigned char IRcvByte(unsigned char sla)
  34. {  unsigned char c;

  36.    Start_I2c();          //启动总线
  37.    SendByte(sla+1);      //发送器件地址
  38.    if(ack==0)return(0);
  39.    c=RcvByte();          //读取数据0

  41.    Ack_I2c(1);           //发送非就答位
  42.    Stop_I2c();           //结束总线
  43.    return(c);
  44. }  


  47. /************主函数**********************/
  48. void main()
  49.     {
  50.          TMOD=0x20;
  51.          SCON=0x50;
  52.         TH1=0xFD;
  53.         TL1=0xFD;
  54.         TR1=1;
  55.          while(1)
  56.           {
  57.        ISendByte(PCF8591,0x43);
  58.        ad=IRcvByte(PCF8591);
  59.            SBUF=ad;
  60.            while(!TI);
  61.            TI=0;
  62.            delay(200);
  63.            delay(200);
  64.            delay(200);
  65.            delay(200);
  66.            delay(200);
  67.           
  68.           }
  69.     }
复制代码

所有资料51hei提供下载（接收程序）:
串口通信-双机.rar (293.07 KB, 下载次数: 148)


作者: 3290700544    时间: 2019-8-8 00:11
非常感谢 希望有朝一日  我也能成为您这样的大佬



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1