//本例实现单片机用pocsag码向数字机发送pocsag数字28167的全部编码
//包括引导码、同步码、闲置码、地址码、信息码。、
//本例用stc12C5a60s2用32M晶振成功呼响了motorola大顾问传呼机
//本例仅供传呼机爱好者地pocsag进行了解和试验，切勿用于商业用途
#include "STC12C5A60S2.H"
//#include "string.h"
//#include "intrins.h"
//#include"stdio.h"
#define uchar unsigned char
#define uint unsigned int
#define TIMER0_ENABLE TR0=1;
#define TIMER0_DISABLE TR0=0;
#define TX P2_0 //数据输出端
#define PTT P2_2 //PTT控制端
#define HIGH 1
#define LOW 0
unsigned long xdata addr; //地址
uchar Tx_Num;//地址码发射次序
bit TM0_FLAG=0;
void UartInit(void) //9600bps@32.000MHz
{
PCON &= 0x7F; //波特率不倍速
SCON = 0x50; //8位数据,可变波特率
AUXR |= 0x40; //定时器1时钟为Fosc,即1T
AUXR &= 0xFE; //串口1选择定时器1为波特率发生器
TMOD &= 0x0F; //清除定时器1模式位
TMOD |= 0x20; //设定定时器1为8位自动重装方式
TL1 = 0x98; //设定定时初值
TH1 = 0x98; //设定定时器重装值
ET1 = 0; //禁止定时器1中断
TR1 = 1; //启动定时器1
// TI = 1;
}
void Delay200ms() //@32MHz
{
unsigned char i, j, k;
i = 25;
j = 82;
k = 145;
do
{
do
{
while (--k);
} while (--j);
} while (--i);
}
unsigned long calc_bch_and_parity( unsigned long cw_e ) //BCH校验和奇偶校验函数
{
uchar i;
uchar parity = 0; //奇偶校验计数
unsigned long local_cw; //临时存放数
local_cw=cw_e;//保存cw_e参数值
for(i=1;i<=21; i++,cw_e<<=1)
if (cw_e & 0x80000000) cw_e ^= 0xED200000;
cw_e=cw_e&0xFFC00000;//保留前10位，BCH校验值共11位，只保留前10位有效数据
local_cw |= (cw_e >> 21); //BCH校验数移至第22位到31位，BCH共10位，并和原始数据相加
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位判断为奇数则后面加1补充为偶数
return local_cw;
}
unsigned long calc_addr( unsigned long add,uchar fun ) //地址转换，第1参数为地址，第2参数为功能
{
unsigned long adr;
unsigned long tem;
Tx_Num=(uchar)(add&0x00000007);//获取地址发射的帧位次，111位第7帧，后3位地址数据隐藏不发送，接收按帧位还原
adr=0x00;
adr=add&0xFFFFFFF8; //去掉地址码后3位
adr=adr<<10; //地址左移10位
tem=0x00;
tem=fun; //功能位
tem=tem<<11;//功能位左移11位，功能位为00 01 10 11四种状态，代表4个地址码
adr=adr|tem; //地址码和功能位合成地址码；
return adr;
}
void IntTimer0() interrupt 1 //设定中断时间为0.8333毫秒，1/1200=0.8333，1200比特速率
{
TL0 = 0x53; //设置定时初值
TH0 = 0xF7; //设置定时初值
TM0_FLAG=1;
}
void WaitTF0( void )
{
while(!TM0_FLAG);
TM0_FLAG=0; //清标志位
}
void Send_start(unsigned long s)
{
uchar i,n;
unsigned long tem;
for(i=0;i<20;i++) //发送576个前导10101010101010
{
tem=s;
for (n=0;n<32;n++)
{
if(tem&0x80000000)TX= HIGH ;else TX=LOW;
WaitTF0();//等待延时结束 0.833ms
tem<<=1;
}
}
}
void Send_nill()//发送闲置位
{
uchar n;
unsigned long s=0x7A89C197;
for(n=0;n<32;n++)
{
if(s&0x80000000)TX= HIGH ;else TX=LOW;
WaitTF0();//等待延时结束 0.833ms
s<<=1;
}
}
void Send_Num(unsigned long s) //发送数据
{
uchar n;
for (n=0;n<32;n++)
{
if(s&0x80000000)TX= HIGH ;else TX=LOW;
WaitTF0();//等待延时结束 0.833ms
s<<=1;
}
}
void Print_code(unsigned long p) //串口打印，用于测试BCH值
{
uchar i;
unsigned long t;
t=p;
for(i=0;i<32;i++,t<<=1)
{
if(t&0x80000000)
{
SBUF=0x31;
while(TI==0);
TI=0;
}
else
{
SBUF=0x30;
while(TI==0);
TI=0;
}
}
SBUF=0x0D;
while(TI==0);
TI=0;
SBUF=0x0A;
while(TI==0);
TI=0;
t=p;
t<<=21;
for(i=0;i<10;i++,t<<=1)
{
if(t&0x80000000)
{
SBUF=0x31;
while(TI==0);
TI=0;
}
else
{
SBUF=0x30;
while(TI==0);
TI=0;
}
}
SBUF=0x0D;
while(TI==0);
TI=0;
SBUF=0x0A;
while(TI==0);
TI=0;
}
main()
{
uchar i,n;
unsigned long tem;
unsigned long star;
unsigned long sync; //同步码
unsigned long mess; //信息码
UartInit(); //串口初始化
TMOD|=0x01; //定时器0为模式1 (16位定时器）
TL0 = 0x53; //设置定时初值
TH0 = 0xF7; //设置定时初值
ET0=1; //定时器0充许中断
TR0=0;
EA=1; //开总中断
TX = 0;
P2M0 = 0x01;//设P2_0为推挽输出模式
P2M1 = 0x00;
PTT= 0;
star = 0xAAAAAAAA; //前导码
sync = 0x7CD215D8; //同步码
tem=calc_addr(1234567,1);//前面是地址码，后面是BB机内00 01 10 11 代表0，1，2，3种不同的声音
addr=calc_bch_and_parity(tem);//取得BCH校验后的地址码序列
mess=calc_bch_and_parity( 0xA0C37000);//信息码28167数字码，取0010（2）的反顺序0100输入
Print_code(mess); //从串口打印32位信息码和BCH校验码
while(1)
{
PTT = 0;
Delay200ms();
TL0 = 0x53; //设置定时初值
TH0 = 0xF7; //设置定时初值
TIMER0_ENABLE; //启动定时器
Send_start(star); //引导码
Send_Num(sync); //同步码
for(i=0;i<8;i++) //发送一个批次，共8帧数据
{
if(Tx_Num==i) //计算地址码插入的帧位，本例为第7帧
{
Send_Num(addr); //地址码
Send_Num(mess); //信息码
}
else
{
Send_nill(); //闲置码
Send_nill(); //闲置码
}
}
Send_Num(0xFFFFFFFF);
TX=LOW;
TIMER0_DISABLE;
Delay200ms();
Delay200ms();
Delay200ms();
Delay200ms();
Delay200ms();
PTT = 1;
}
}
|
[复制链接]
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
顶
踩
