//本例實現單片機用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;
}
}
|
[復制鏈接]
