/* Example for transmitting frames */
/*****************************************/

//thermo
#include <avr/io.h>
#include <stdio.h>
#include <stdint.h>
#include <stdlib.h>
#include <util/delay.h>

// send
#include "board.h"
#include "transceiver.h"
#include "ioutil.h"
#include "xmpl.h"
//thermo
#define DD_MISO 3
#define DD_MOSI 2
#define DD_SCK 1
#define DD_SS 0
//send

static volatile bool tx_in_progress;
static volatile uint8_t tx_cnt;
static volatile uint8_t irgendwas;
static volatile uint8_t len;


//thermo function


void SPI_MasterInit(void)
{
	//Outputs: MOSI, SCK, SS
	DDRB = (1<<DD_MOSI)|(1<<DD_SCK)|(1<<DD_SS);

	//Enable SPI, Master-Mode, set clock rate fck/16
	SPCR = (1<<SPE)|(1<<MSTR)|(1<<SPR0);
}


int SPI_MasterTransmit(char MOSI)
{
	//start Transmission
	SPDR = MOSI;
	
	//wait for transmission complete
	while(!(SPSR & (1<<SPIF)));

	//returned data from slave to master
	return SPDR;
}

//end thermo function

int main(void)
{
//thermo


	// Thermoelement an CH0 und CH1
	char masterOut1 = 0b10100000;
	//char masterOut2 = 0b10000000;

	// interne Temperaturmessung:
	char masterOut2 = 0b11000000;

	char result;
	uint32_t masterIn = 0;
	uint32_t Temp = 0;


	SPI_MasterInit();

	
	for(;;)
	{
	
		_delay_ms(500);

		//CS des Thermochips auf low
		PORTB &= !(1<<DD_SS);

		
		//Byte1
		result = SPI_MasterTransmit(masterOut1);		
		masterIn = (result & 0b00011111);  //die ersten drei Bit löschen


		//Byte2
		result = SPI_MasterTransmit(masterOut2);
		masterIn = (masterIn<<8) + result;


		//Byte3
		result = SPI_MasterTransmit(0);
		masterIn = (masterIn<<8) + result;


		//Byte4
		result = SPI_MasterTransmit(0);
		masterIn = (masterIn<<8) + result;

		
		//CS des Thermochips auf high
		PORTB |= (1<<DD_SS);


		masterIn = (masterIn>>5) & 0b00000000111111111111111111111111; //die letzten 5 Bit löschen


		//bei interner Temperaturmessung: Temperatur in °C berechnen laut Datenblatt Seite21
		Temp = (masterIn*4/1570)-273;

		_delay_ms(2000);
	}
//end thermo

trx_regval_t rval;

irgendwas=Temp;

uint8_t txfrm[] = {irgendwas,0, /* faked ieee 802.15.4 data frame control field
                         * this is just needed, that a sniffer has to display something.*/
                   42,  /* sequence counter, updated by software */
                  'h','e','l','l','o',' ','µ','r','a','c','o','l','i','!', /* data */
                  'X','X' /* these bytes are overwritten from transceivers CRC generator just before sent. */
                  };
    /* This will stop the application before initializing the radio transceiver
     * (ISP issue with MISO pin, see FAQ)
     */
   // trap_if_key_pressed();

    /* Step 0: init MCU peripherals */
    LED_INIT();
    trx_io_init(SPI_RATE_1_2);
    LED_SET_VALUE(LED_MAX_VALUE);
    LED_SET_VALUE(0);

    /* Step 1: initialize the transceiver */
    DELAY_US(TRX_INIT_TIME_US);
    TRX_RESET_LOW();
    TRX_SLPTR_LOW();
    DELAY_US(TRX_RESET_TIME_US);
    TRX_RESET_HIGH();
    trx_reg_write(RG_TRX_STATE,CMD_TRX_OFF);
    DELAY_US(TRX_INIT_TIME_US);
    rval = trx_bit_read(SR_TRX_STATUS);
    ERR_CHECK_DIAG(TRX_OFF!=rval,1);
    LED_SET_VALUE(1);

    /* Step 2: setup transmitter
     * - configure radio channel
     * - enable transmitters automatic crc16 generation
     * - go into TX state,
     * - enable "transmit end" IRQ
     */
    trx_bit_write(SR_CHANNEL,CHANNEL);
    trx_bit_write(SR_TX_AUTO_CRC_ON,1);
    trx_reg_write(RG_TRX_STATE,CMD_PLL_ON);
#if defined(TRX_IRQ_TRX_END)
    trx_reg_write(RG_IRQ_MASK,TRX_IRQ_TRX_END);
#elif defined(TRX_IRQ_TX_END)
    trx_reg_write(RG_IRQ_MASK,TRX_IRQ_TX_END);
#else
#  error "Unknown IRQ bits"
#endif
    sei();
    LED_SET_VALUE(2);

    /* Step 3: send a frame each 500ms */
    tx_cnt = 0;
    tx_in_progress = false;
    LED_SET_VALUE(0);

    while(1)
    {
        WAIT500MS();
        if (tx_in_progress == false)
        {
			
            txfrm[2] = tx_cnt;

            trx_frame_write (len + 3 + 2, txfrm);

            tx_in_progress = true;
            TRX_SLPTR_HIGH();
            TRX_SLPTR_LOW();
            LED_SET(1);
            LED_TOGGLE(0);
        }
    }
}

#if defined(TRX_IF_RFA1)
ISR(TRX24_TX_END_vect)
{
    /* transmission completed */
    tx_in_progress = false;
    tx_cnt ++;
    LED_CLR(1);
}
#else  /* !RFA1 */
ISR(TRX_IRQ_vect)
{
static volatile trx_regval_t irq_cause;
    irq_cause = trx_reg_read(RG_IRQ_STATUS);
    if (irq_cause & TRX_IRQ_TRX_END)
    {
        /* transmission completed */
        tx_in_progress = false;
        tx_cnt ++;
        LED_CLR(1);
    }
}
#endif

/* EOF */