標(biāo)題:
用Arduino做BP機(jī)編碼程序
[打印本頁(yè)]
作者:
PLA
時(shí)間:
2019-6-4 15:39
標(biāo)題:
用Arduino做BP機(jī)編碼程序
用Arduino做BP機(jī)POCSAG編碼程序,配合寶峰5R成功呼響大顧問(wèn)機(jī),用串口助手發(fā)送字符,發(fā)送格式a+1234567+b+信息(a=N或P向位,1234567為呼機(jī)在7位地址碼,b=1-4,為鈴聲)如:N12345671測(cè)試!
Arduino源程序如下:
#define uchar unsigned char
#define uint unsigned int
String comdata = "";
unsigned long addr;
int PTT = 10; //PTT控制端
int TX=9;//數(shù)據(jù)輸出端
int ys=819;//延時(shí)
unsigned long tem;
uchar Tx_Num;
unsigned long calc_bch_and_parity(unsigned long cw_e) //BCH校驗(yàn)和奇偶校驗(yàn)函數(shù)
{
uchar i;
uchar parity = 0; //奇偶校驗(yàn)計(jì)數(shù)
unsigned long local_cw; //臨時(shí)存放數(shù)
local_cw=cw_e;//保存cw_e參數(shù)值
for(i=1;i<=21; i++,cw_e<<=1)
if (cw_e & 0x80000000) cw_e ^= 0xED200000;
cw_e=cw_e&0xFFC00000;//保留前10位,BCH校驗(yàn)值共11位,只保留前10位有效數(shù)據(jù)
local_cw |= (cw_e >> 21); //BCH校驗(yàn)數(shù)移至第22位到31位,BCH共10位,并和原始數(shù)據(jù)相加
cw_e=local_cw;
for(i=0; i<31; i++, cw_e<<=1) if(cw_e&0x80000000) parity++;
if(parity%2) local_cw+=1;//從1至31位判斷為奇數(shù)則后面加1補(bǔ)充為偶數(shù)
return local_cw;
}
unsigned long calc_addr( unsigned long add,uchar fun ) //地址轉(zhuǎn)換,第1參數(shù)為地址,第2參數(shù)為功能
{
unsigned long adr;
unsigned long tem;
Tx_Num=(uchar)(add&0x00000007);//獲取地址發(fā)射的幀位次,111位第7幀,后3位地址數(shù)據(jù)隱藏不發(fā)送,接收按幀位還原
adr=0x00;
adr=add&0xFFFFFFF8; //去掉地址碼后3位
adr=adr<<10; //地址左移10位
tem=0x00;
tem=fun; //功能位
tem=tem<<11;//功能位左移11位,功能位為00 01 10 11四種狀態(tài),代表4個(gè)地址碼
adr=adr|tem; //地址碼和功能位合成地址碼;
return adr;
}
void Send_start(unsigned long s)
{
uchar i,n;
unsigned long tem;
for(i=0; i<20; i++)//發(fā)送576個(gè)前導(dǎo)10101010101010
{
tem=s;
for (n=0; n<32; n++)
{
if(tem&0x80000000)
{
digitalWrite(TX,HIGH);
}
else
{
digitalWrite(TX,LOW);
}
delayMicroseconds(ys);//等待延時(shí)結(jié)束 0.833ms
tem<<=1;
}
}
}
void Send_nill()//發(fā)送閑置位
{
uchar n;
unsigned long s=0x7A89C197;
for(n=0; n<32; n++)
{
if(s&0x80000000)
{
digitalWrite(TX,LOW);
}
else
{
digitalWrite(TX,HIGH);
}
delayMicroseconds(ys);//等待延時(shí)結(jié)束 0.833ms
s<<=1;
}
}
void Send_Num(unsigned long s,char npi) //發(fā)送數(shù)據(jù)
{
uchar n;
int xx0,xx1;
if(npi=='P'){xx1=1;xx0=0;}
if(npi=='N'){xx1=0;xx0=1;}
for (n=0; n<32; n++)
{
if(s&0x80000000)
{
digitalWrite(TX,xx1);
//Serial.print(xx1);
}
else
{
digitalWrite(TX,xx0);
//Serial.print(xx0);
}
delayMicroseconds(ys);//等待延時(shí)結(jié)束 0.833ms
s<<=1;
}
}
void setup() {
Serial.begin(9600); //設(shè)置波特率為9600,一般是這個(gè)波特率
pinMode(TX,OUTPUT);
pinMode(PTT,OUTPUT);
}
void loop() {
while (Serial.available() > 0) //讀取串口數(shù)據(jù)
{
comdata += char(Serial.read());
delay(2);
}
if (comdata.length() > 0) //如果有數(shù)據(jù)進(jìn)入處理
{
String np = comdata.substring(0,1);
char npzf=toupper(np[0]);
String ly=comdata.substring(8,9);
int lyi=ly[0];
String dz = comdata.substring(1,8); //獲取地址碼
unsigned long az=dz.toInt(); //地址碼s轉(zhuǎn)類型
tem=calc_addr(az,lyi-48); //地址碼移位處理
addr=calc_bch_and_parity(tem); //地址碼BCH校驗(yàn)
String msgdata = comdata.substring(9,200); //截取信息碼內(nèi)容
int len = msgdata.length()+10; //獲取信息碼字節(jié)長(zhǎng)度(+4為了讓長(zhǎng)度大于1幀,就不用1個(gè)漢字還用做判斷了)
byte hui[200]={0};
digitalWrite(PTT,LOW); //對(duì)講機(jī)ppt
delay(500); //延時(shí)500ms
unsigned long mess[200]={0}; //信息碼數(shù)組
//信息碼數(shù)組元素
unsigned long msg;
int ll=0;
int wz=0;
if(!(msgdata[0]&0x80)){hui[wz]=0x0f;wz++;}
for(int i=0;i<len;i++)
{
if(!(msgdata[i]&0x80) && msgdata[i-1]&0x80 && i>0){hui[wz]=0x0f;wz++;}
hui[wz]=msgdata[i];
wz++;
if(!(msgdata[i]&0x80) && msgdata[i+1]&0x80){hui[wz]=0x0e;wz++;}
}
wz=0;
int k=1;
for(int n=0;n<=len;n++)
{
for(int j=0;j<7;j++)
{
if(hui[wz]&0x01){msg|=0x00000001;}
msg<<=1;
hui[wz]>>=1;
ll++;
if(ll%20==0)
{
msg<<=10;
msg|=0x80000000;
mess[k]=calc_bch_and_parity(msg);
msg=0;
k++;
}
}
wz++;
}
Send_start(0xAAAAAAAA); //發(fā)送前言碼
Send_Num(0x7CD215D8,npzf); //發(fā)送同步碼
mess[0]=addr; //地址碼放入信息碼第一碼字
for(int j=0;j<120;j++) //循環(huán)發(fā)送信息碼
{
if(mess[j]!=0){Send_Num(mess[j],npzf);} //數(shù)組元素不為0的發(fā)送
Serial.println(mess[j],BIN);
if((j+1)%16==0 && j!=0){Send_Num(0x7CD215D8,npzf);} //每隔8幀發(fā)送一個(gè)同步碼
}
Send_Num(0x7A89C197,npzf); //末尾發(fā)送閑置碼
comdata="";
msgdata="";
}
digitalWrite(PTT,HIGH);
}
復(fù)制代碼
作者:
51hei團(tuán)團(tuán)
時(shí)間:
2019-6-5 05:50
好東東啊 家里剛好還有一個(gè)bp機(jī),不知道樓主的電路該如何連接啊?
作者:
azi197417
時(shí)間:
2019-7-8 16:13
有詳細(xì)電路連接就是最好不過(guò)了
作者:
cr8526
時(shí)間:
2019-10-10 20:30
把壓縮文件下了,,可能在那里有吧
作者:
rgbgirl
時(shí)間:
2019-10-13 11:05
這個(gè)BP機(jī)不是已經(jīng)淘汰了嗎?做這個(gè)有實(shí)際用處嗎?
作者:
osthink
時(shí)間:
2020-1-25 10:33
樓主,你好,請(qǐng)問(wèn)怎么配合寶峰5R,有具體的接線圖或說(shuō)明嗎,非常感謝!
作者:
confessor
時(shí)間:
2020-1-29 19:34
看 代碼應(yīng)該是9腳連對(duì)講機(jī)輸出 , 10腳連對(duì)講機(jī)輸出控制
作者:
eruera
時(shí)間:
2021-6-8 18:33
請(qǐng)問(wèn)一下有沒有連線實(shí)物圖呢?
作者:
13018573807
時(shí)間:
2022-5-31 10:15
請(qǐng)問(wèn)一下有沒有連線實(shí)物圖呢?
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1