//接收
/*************火箭發射點火系統***************************/
#include "reg52.h"  
void mode1(void);
void mode2(void);
void mode3(void);
void mode4(void);
void mode5(void);
void  Config905(void);     //對PTR8000進行配置
unsigned int a[8],b[8];  
unsigned int flag=0;
int i,t;
 
sbit SCK = P2^5;
sbit MISO= P2^7;
sbit MOSI= P2^6;
sbit DR  = P2^1;     //數據就緒輸出
sbit CSN = P2^4;     //SPI使能
sbit PWR = P2^2;     //Power Down 模式
sbit TX_EN= P2^3;    //'1'發射模式 '0'接收模式
sbit TRX_CE=P2^0;    //使能發射/接收模式

/**********************************/
//延時大約為1S左右  
//以0.1S為單位計時 
//即 定時時間 time=t*0.1 S 
/*********************************/ 
void delay()
{
int i,j;
//for(k=0;k<t;k++)
for(i=0;i<500*5;i++)
for(j=0;j<100;j++);
}
/********************************/
//任意延時
/*******************************/
void Delay(int x)
{
     unsigned int i;
    for(i=0;i<x;i++);
}
/*******十進制數轉二進制數*************************/
void fun2(int n)	
{
unsigned int i,t=n;
for(i=0;i<8;i++)
{
a[i]=t%2;
t/=2;
}
}
/********************************/
//函數名：int fun22(int n)
//功能：計算2的n 次方  
/********************************/
int fun22(int n)
{
unsigned int i;
int f=1;
for(i=0;i<n;i++)
f*=2;
return f;
}
/**********將高位和低位進行交換*********************/
int fun21(void)
{
unsigned int  i,t;
int s=0;
for(i=0;i<4;i++)
{
t=b[i];               //高低位進行交換      
b[i]=b[7-i];
b[7-i]=t;       //   在PTR800發送時先發高位，再發低位
}
for(i=0;i<8;i++)
s+=(b[i]*fun22(i));   //將二進制數轉為十進制數
return s;
}

/*************************************/
void SpiWrite(int c)       //SPI寫         將單片機中數據寫到ptr8000中
{
    unsigned int i=8;
	fun2(c);               //將c轉換為二進制數
	for(i=0;i<8;i++)
	{
		Delay(10);
        SCK=0;
        MOSI=a[7-i];        //從高位到低位寫
        Delay(10);
        SCK=1;             ///sck給一個上升沿發送一位數據
        Delay(10);          //延時83us
        SCK=0;
	}
  SCK=0;
}
/**************************************/
int SpiRead(void)      //SPI讀           從外部ptr8000中讀入單片機
{
     unsigned int i=8;
     int ddata=0;
	for(i=0;i<8;i++)
	{

SCK=1 ;
if(MISO) b[i]=1;
else b[i]=0;
        
 SCK=0;
Delay(20);
	}
   SCK=0;
    Delay(20);
	ddata=fun21();       //data十進制數 
    return ddata;
}
/*******接收子程序********************************/
int PtrRead()      //PTR8000讀     
{
int key;
 Config905();     

 PWR=1; 
 TX_EN=0;
 TRX_CE=1;                    //接收      
 
while(!DR) ;                 //等待接收

 while(DR)                    //接收數據準備就緒
    {
     PWR=1;                      //進入待機模式 
     TRX_CE=0;
     TX_EN=0;
     CSN=0;                      //片選
     SpiWrite(0x24);             //寫讀rx（接收）有效數據（配置）
	{
     key=SpiRead();
	Delay(20);
	}
     CSN=1;
	Delay(20);
	return key;
}
}
/**********************************/
void Config905(void)          //配置nRF905 
{   CSN=1;
    SCK=0;
    PWR=1;
    TRX_CE=0;
    TX_EN=0;
    Delay(2);
    CSN=0;
    SpiWrite( 0x00);             //配置命令//
    SpiWrite( 0x4C);          //CH_NO,配置頻段在430MHZ  4c
    SpiWrite( 0x0C);          //輸出功率為10db,不重發，節電為正常模式  0c
    SpiWrite( 0x44);          //地址寬度設置，為4字節
    SpiWrite( 0x01);
    SpiWrite( 0x01);             //接收發送有效數據長度為1字節
    SpiWrite( 0x19);          //接收地址 4字節
    SpiWrite( 0x85);
    SpiWrite( 0x06);
    SpiWrite( 0x27);       
    SpiWrite( 0x58);          //16位CRC校驗,CRC充許，16M晶振        
 CSN=1;
}
/***********************************/
void TxPacket(int ddata)  //數據包發送
{	
int x=ddata;   
PWR=1;                    //待機和SPI編程模式
TRX_CE=0;
    TX_EN=1;     
    CSN=0;         
    SpiWrite(0x22);            //寫發送地址,后面跟4字節地址//
    SpiWrite(0x19);             //0x19
    SpiWrite(0x85);             //0x85
    SpiWrite(0x06);               //0x06
    SpiWrite(0x27);            //0x27
    CSN=1;
    Delay(20);                 //延時1/6ms
    CSN=0;
    SpiWrite(0x20);            //寫發送數據命令,后面跟一字節數據//
    SpiWrite(x);            //發送到數據
    CSN=1;
    Delay(20);
    TRX_CE=1;                  //使能發射模式//
    Delay(255);                //等帶發送完成//延時2ms
    TRX_CE=0;    
}
/*******主函數******************************/
void main()
{int key,i=0;
P1=0xff;                  //P1口初始化
Config905();

while(1)
{key=PtrRead(); 
if(key==1)
{
	P1=0x0f;
    Delay(40000);
    P1=0xff;
 
//while(1)                //一直循環查詢
for(i=0;i<5;i++)	  
   TxPacket(2);
}
 // key=0;
// key=PtrRead(); 
}
}