找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 7720|回复: 8
打印 上一主题 下一主题
收起左侧

用Arduino做BP机编码程序

  [复制链接]
跳转到指定楼层
楼主
ID:18867 发表于 2019-6-4 15:39 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
用Arduino做BP机POCSAG编码程序,配合宝峰5R成功呼响大顾问机,用串口助手发送字符,发送格式a+1234567+b+信息(a=N或P向位,1234567为呼机在7位地址码,b=1-4,为铃声)如:N12345671测试!

Arduino源程序如下:
  1. #define uchar unsigned char
  2. #define uint unsigned int
  3. String comdata = "";
  4. unsigned long addr;

  5. int PTT = 10; //PTT控制端
  6. int TX=9;//数据输出端
  7. int ys=819;//延时
  8. unsigned long tem;
  9. uchar  Tx_Num;
  10. unsigned long  calc_bch_and_parity(unsigned long cw_e) //BCH校验和奇偶校验函数
  11. {
  12.     uchar i;
  13.    uchar  parity = 0; //奇偶校验计数   
  14.    unsigned long local_cw; //临时存放数         
  15.    local_cw=cw_e;//保存cw_e参数值
  16.    for(i=1;i<=21; i++,cw_e<<=1)           
  17.        if (cw_e & 0x80000000) cw_e ^= 0xED200000;  
  18.    cw_e=cw_e&0xFFC00000;//保留前10位,BCH校验值共11位,只保留前10位有效数据         
  19.    local_cw |= (cw_e >> 21); //BCH校验数移至第22位到31位,BCH共10位,并和原始数据相加
  20.    cw_e=local_cw;         
  21.    for(i=0; i<31; i++, cw_e<<=1) if(cw_e&0x80000000) parity++;        
  22.    if(parity%2) local_cw+=1;//从1至31位判断为奇数则后面加1补充为偶数
  23.    return local_cw;
  24.       
  25. }  
  26. unsigned long  calc_addr( unsigned long add,uchar fun ) //地址转换,第1参数为地址,第2参数为功能
  27. {
  28.   unsigned long adr;
  29.   unsigned long tem;   
  30.   Tx_Num=(uchar)(add&0x00000007);//获取地址发射的帧位次,111位第7帧,后3位地址数据隐藏不发送,接收按帧位还原
  31.   adr=0x00;
  32.   adr=add&0xFFFFFFF8;        //去掉地址码后3位
  33.   adr=adr<<10;  //地址左移10位
  34.   tem=0x00;
  35.   tem=fun;  //功能位
  36.   tem=tem<<11;//功能位左移11位,功能位为00 01 10 11四种状态,代表4个地址码
  37.   adr=adr|tem; //地址码和功能位合成地址码;
  38.   return adr;
  39. }

  40. void Send_start(unsigned long s)
  41. {
  42.     uchar i,n;
  43.     unsigned long tem;
  44.     for(i=0; i<20; i++)//发送576个前导10101010101010
  45.     {
  46.         tem=s;
  47.         for (n=0; n<32; n++)
  48.         {
  49.             if(tem&0x80000000)
  50.             {
  51.                 digitalWrite(TX,HIGH);
  52.             }
  53.             else
  54.             {
  55.                 digitalWrite(TX,LOW);
  56.             }
  57.             delayMicroseconds(ys);//等待延时结束 0.833ms
  58.             tem<<=1;
  59.         }
  60.     }
  61. }
  62. void Send_nill()//发送闲置位
  63. {
  64.     uchar n;
  65.     unsigned long s=0x7A89C197;
  66.     for(n=0; n<32; n++)
  67.     {
  68.         if(s&0x80000000)
  69.         {
  70.             digitalWrite(TX,LOW);
  71.         }
  72.         else
  73.         {
  74.             digitalWrite(TX,HIGH);
  75.         }
  76.         delayMicroseconds(ys);//等待延时结束 0.833ms
  77.         s<<=1;
  78.     }
  79. }
  80. void Send_Num(unsigned long s,char npi)         //发送数据
  81. {
  82.     uchar n;
  83.     int xx0,xx1;
  84.     if(npi=='P'){xx1=1;xx0=0;}
  85.     if(npi=='N'){xx1=0;xx0=1;}
  86.     for (n=0; n<32; n++)
  87.     {
  88.         if(s&0x80000000)
  89.         {
  90.             digitalWrite(TX,xx1);
  91.             //Serial.print(xx1);
  92.         }
  93.         else
  94.         {
  95.             digitalWrite(TX,xx0);
  96.             //Serial.print(xx0);
  97.         }
  98.         delayMicroseconds(ys);//等待延时结束 0.833ms
  99.         s<<=1;
  100.     }
  101. }
  102. void setup() {
  103.   Serial.begin(9600); //设置波特率为9600,一般是这个波特率
  104.   pinMode(TX,OUTPUT);   
  105.   pinMode(PTT,OUTPUT);
  106. }

  107. void loop() {
  108.    while (Serial.available() > 0)  //读取串口数据
  109.     {
  110.       comdata += char(Serial.read());
  111.       delay(2);
  112.       }
  113.       if (comdata.length() > 0) //如果有数据进入处理
  114.       {
  115.         String np = comdata.substring(0,1);         
  116.         char npzf=toupper(np[0]);
  117.         String ly=comdata.substring(8,9);
  118.         int lyi=ly[0];
  119.         String dz = comdata.substring(1,8);         //获取地址码
  120.         unsigned long az=dz.toInt();                //地址码s转类型
  121.         tem=calc_addr(az,lyi-48);                        //地址码移位处理
  122.         addr=calc_bch_and_parity(tem);              //地址码BCH校验
  123.         String msgdata = comdata.substring(9,200);  //截取信息码内容
  124.         int len = msgdata.length()+10;               //获取信息码字节长度(+4为了让长度大于1帧,就不用1个汉字还用做判断了)
  125.         byte hui[200]={0};
  126.         digitalWrite(PTT,LOW);                      //对讲机ppt
  127.         delay(500);                                 //延时500ms                              
  128.         unsigned long mess[200]={0};                //信息码数组         
  129.                                             //信息码数组元素
  130.         unsigned long msg;
  131.         int ll=0;
  132.         int wz=0;
  133.         if(!(msgdata[0]&0x80)){hui[wz]=0x0f;wz++;}
  134.         for(int i=0;i<len;i++)
  135.         {
  136.          if(!(msgdata[i]&0x80) && msgdata[i-1]&0x80 && i>0){hui[wz]=0x0f;wz++;}
  137.           hui[wz]=msgdata[i];
  138.           wz++;
  139.           if(!(msgdata[i]&0x80) && msgdata[i+1]&0x80){hui[wz]=0x0e;wz++;}
  140.          }
  141.           wz=0;
  142.           int k=1;
  143.           for(int n=0;n<=len;n++)
  144.           {
  145.             for(int j=0;j<7;j++)
  146.             {
  147.               if(hui[wz]&0x01){msg|=0x00000001;}
  148.               msg<<=1;
  149.               hui[wz]>>=1;
  150.               ll++;
  151.               if(ll%20==0)
  152.               {
  153.                 msg<<=10;
  154.                 msg|=0x80000000;
  155.                 mess[k]=calc_bch_and_parity(msg);
  156.                 msg=0;
  157.                 k++;
  158.               }
  159.             }
  160.             wz++;
  161.           }
  162.             Send_start(0xAAAAAAAA);                 //发送前言码
  163.             Send_Num(0x7CD215D8,npzf);                   //发送同步码
  164.             mess[0]=addr;                           //地址码放入信息码第一码字
  165.             for(int j=0;j<120;j++)                  //循环发送信息码
  166.             {
  167.               if(mess[j]!=0){Send_Num(mess[j],npzf);}    //数组元素不为0的发送
  168.               Serial.println(mess[j],BIN);

  169.               if((j+1)%16==0 && j!=0){Send_Num(0x7CD215D8,npzf);}  //每隔8帧发送一个同步码
  170.             }
  171.           Send_Num(0x7A89C197,npzf);                   //末尾发送闲置码
  172.           comdata="";
  173.           msgdata="";
  174.           }
  175.           digitalWrite(PTT,HIGH);
  176.           }

复制代码


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏6 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:328014 发表于 2019-6-5 05:50 | 只看该作者
好东东啊 家里刚好还有一个bp机,不知道楼主的电路该如何连接啊?
回复

使用道具 举报

板凳
ID:452731 发表于 2019-7-8 16:13 | 只看该作者
有详细电路连接就是最好不过了
回复

使用道具 举报

地板
ID:373684 发表于 2019-10-10 20:30 | 只看该作者
把压缩文件下了,,可能在那里有吧
回复

使用道具 举报

5#
ID:617305 发表于 2019-10-13 11:05 | 只看该作者
这个BP机不是已经淘汰了吗?做这个有实际用处吗?
回复

使用道具 举报

6#
ID:688099 发表于 2020-1-25 10:33 | 只看该作者
楼主,你好,请问怎么配合宝峰5R,有具体的接线图或说明吗,非常感谢!
回复

使用道具 举报

7#
ID:686444 发表于 2020-1-29 19:34 | 只看该作者
看 代码应该是9脚连对讲机输出 , 10脚连对讲机输出控制
回复

使用道具 举报

8#
ID:934976 发表于 2021-6-8 18:33 | 只看该作者
请问一下有没有连线实物图呢?
回复

使用道具 举报

9#
ID:1031190 发表于 2022-5-31 10:15 | 只看该作者
请问一下有没有连线实物图呢?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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