#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>

#define F_CPU 1600000UL

#define RF_PORT PORTB
#define RF_DDR	DDRB
#define RF_PIN	PINB

#define CS		4
#define SDI		5
#define SDO		6
#define SCK		7

#define cbi(sfr, bit)     (_SFR_BYTE(sfr) &= ~_BV(bit)) 
#define sbi(sfr, bit)     (_SFR_BYTE(sfr) |= _BV(bit)) 


unsigned short rf12_trans(unsigned short wert)
{	unsigned short werti=0;
	unsigned char i;

	cbi(RF_PORT, CS);
	for (i=0; i<16; i++)
	{	if (wert&32768)
		sbi(RF_PORT, SDI);
		else
		cbi(RF_PORT, SDI);
		werti<<=1;
		if (RF_PIN&(1<<SDO))
		werti|=1;
		sbi(RF_PORT, SCK);
		wert<<=1;
		_delay_us(0.3);
		cbi(RF_PORT, SCK);
	}
	sbi(RF_PORT, CS);
	return werti;
}

void rf12_init(void)
{	
	RF_DDR |=(1<<SDI)|(1<<SCK)|(1<<CS);																	// "|" hinzugefüt
	RF_PORT|=(1<<CS);																					// "|" hinzugefüt

	for (unsigned char i=0; i<10; i++)
	_delay_ms(10);			// wait until POR done

	rf12_trans(0xC0E0);			// AVR CLK: 10MHz								
	rf12_trans(0x80E7);			// Enable FIFO															//EL,EF,868MHz,11.5pF
	rf12_trans(0xC2AB);			// Data Filter: internal
	rf12_trans(0xCA81);			// Set FIFO mode
	rf12_trans(0xE000);			// disable wakeuptimer
	rf12_trans(0xC800);			// disable low duty cycle
	rf12_trans(0xC4F7);			// AFC settings: autotuning: -10kHz...+7,5kHz
}

void rf12_setbandwidth(unsigned char bandwidth, unsigned char gain, unsigned char drssi)
{
	rf12_trans(0x9400|((bandwidth&7)<<5)|((gain&3)<<3)|(drssi&7));
}

void rf12_setfreq(unsigned short freq)
{	
	if (freq<96)				// 430,2400MHz
	freq=96;
	else if (freq>3903)			// 439,7575MHz
	freq=3903;
	rf12_trans(0xA000|freq);
}

void rf12_setbaud(unsigned short baud)
{
	if (baud<663)
	return;
	if (baud<5400)					// Baudrate= 344827,58621/(R+1)/(1+CS*7)
	rf12_trans(0xC680|((43104/baud)-1));
	else
	rf12_trans(0xC600|((344828UL/baud)-1));
}

void rf12_setpower(unsigned char power, unsigned char mod)
{
	rf12_trans(0x9800|(power&7)|((mod&15)<<4));
}

void rf12_ready(void)
{	
	cbi(RF_PORT, CS);
	while (!(RF_PIN&(1<<SDO))); // wait until FIFO ready
}

void rf12_txdata(unsigned char *data, unsigned char number)
{	
	unsigned char i;
	rf12_trans(0x8238);			// TX on
	rf12_ready();
	rf12_trans(0xB8AA);
	rf12_ready();
	rf12_trans(0xB8AA);
	rf12_ready();
	rf12_trans(0xB8AA);
	rf12_ready();
	rf12_trans(0xB82D);
	rf12_ready();
	rf12_trans(0xB8D4);
	for (i=0; i<number; i++)
	{		rf12_ready();
		rf12_trans(0xB800|(*data++));
	}
	rf12_ready();
	rf12_trans(0x8208);			// TX off
}

void rf12_rxdata(unsigned char *data, unsigned char number)
{	
	unsigned char i;
	rf12_trans(0x82C8);			// RX on
	rf12_trans(0xCA81);			// set FIFO mode
	rf12_trans(0xCA83);			// enable FIFO
	for (i=0; i<number; i++)
	{	rf12_ready();
		*data++=rf12_trans(0xB000);
	}
	rf12_trans(0x8208);			// RX off
}

void receive(void)
{	
	unsigned char test[32];
	rf12_rxdata(test,32);
	// daten verarbeiten
}

void send(void)
{	
	unsigned char test[]="Dies ist ein 868MHz Test !!!\n   ";
	rf12_txdata(test,32);
}


int main(void)
{
	/*
	RFM12
	nRES	PB0
	DCLK	PB1
	nIRQ	PB2
	FSK		PB3
	nSEL	PB4
	SDI		PB5
	SD0		PB6
	SCK		PB7

	VDI		PD2

	*/

	DDRB = 0b11010000;			//SCK SDO nSEL Out
	PORTB= 0b00001000;			//FSK Pullup

	for (unsigned char i=0; i<100; i++)
	_delay_ms(10);
	

	rf12_init();					// ein paar Register setzen (z.B. CLK auf 10MHz)
	rf12_setfreq(1664);				// Sende/Empfangsfrequenz auf 868,32Mhz einstellen								!!!
	rf12_setbandwidth(4, 1, 4);		// 200kHz Bandbreite, -6dB Verstärkung, DRSSI threshold: -79dBm
	rf12_setbaud(19200);			// 19200 baud
	rf12_setpower(0, 6);			// 1mW Ausgangangsleistung, 120kHz Frequenzshift

	while(1)
	{
		send();
		for (unsigned char i=0; i<100; i++)
		_delay_ms(10);

		//	receive();
	}

}