main_sender.c

/*

 * Ampel_Code.c

 *

 * Created: 18.05.2016 11:23:34

 * Author : Marvin

 */ 

/* Dies ist der Code zur Ampelsteuerung des FC Pfeil Broistedt.

   Geschrieben von Marvin Wenzel im Frühjahr 2016.

   Dieser Codeteil ist für die AMPELN-Fernbedinung, d.h. den Sender.

   Verwendet wird ein Atmega328PU sowie ein NRF24L01+ Funkmodul.

   Betrieben wird beides mit 3,3V. Getaktet wird mit den internen 8 MHz.

   Im folgenden sind die Pinbelegungen aufgeführt:

   PB0: CE

   PB1: CSN

   PB2: SSnot

   PB3: MOSI

   PB4: MISO

   PB5: SCK

   PB6: IRQ (PCint6)

   PB7:

   PC0: 

   PC1: 

   PC2: 

   PC3: 

   PC4: 

   PC5:

   RESETnot: 3,3V

   PD0:

   PD1:

   PD2:

   PD3:

   PD4:

   PD5:

   PD6: 

   PD7:

*/

#ifndef F_CPU        //Define F_CPU if not done

#define F_CPU 8000000UL

#endif

#define BAUD 9600UL      // Baudrate

// Berechnungen

#define UBRR_VAL ((F_CPU+BAUD*8)/(BAUD*16)-1)   // clever runden

#define BAUD_REAL (F_CPU/(16*(UBRR_VAL+1)))     // Reale Baudrate

#define BAUD_ERROR ((BAUD_REAL*1000)/BAUD) // Fehler in Promille, 1000 = kein Fehler.

#if ((BAUD_ERROR<990) || (BAUD_ERROR>1010))

#error Systematischer Fehler der Baudrate groesser 1% und damit zu hoch!

#endif

#include <avr/io.h>

#include <avr/interrupt.h>

#include <util/delay.h>

#include "wl_module.h"

#include "nRF24L01.h"

#include "spi.h"

void atmega_init();

void uart_init(void);

int uart_putuint8_1(uint8_t c);

void uart_putuint8_s(uint8_t *s);

int uart_putc(char c);

void uart_puts (char *s);

uint8_t sendedaten[wl_module_PAYLOAD] = "Dies sind 32 Zeichen. Gesendet!!";

uint8_t counter = 0;

uint8_t status_funk = 71;

volatile uint8_t PTX;

int main(void)

{

  uart_init();

  uart_puts("Beginne Initialisierungen...\n");

  atmega_init();    // Atmega initialisieren

  wl_module_init();  // Funkmodul initialisieren

  _delay_ms(50);    // kurz warten

  sei();

  wl_module_tx_config(wl_module_TX_NR_0);

  wl_module_config_register(EN_AA,EN_AA_ENAA_ALL);    //Auto Acknowledgment bei allen

  //wl_module_config_register(EN_RXADDR,EN_RXADDR_ERX_ALL);  // RX pipe alle aktivieren

  // Status lesen

  uart_puts("Status: ");

  status_funk = wl_module_get_status();

  uart_putuint8_1(status_funk + '0');

  uart_puts(" \n");

  uart_puts("RX_payload: ");

  status_funk = wl_module_get_rx_pw(0);

  uart_putuint8_1(status_funk + '0');

  uart_puts(" \n");

  // ACHTUNG: Payload steht momentan auf 32

    while (1) 

    {

    uart_puts("Sende: ...\n");

    sendedaten[wl_module_PAYLOAD-1] = counter+'0';    // Text ändern

    wl_module_send(sendedaten,wl_module_PAYLOAD);    // senden

    while (PTX)

    {

      uart_puts("Package lost: ");

      status_funk = wl_module_get_plos_cnt();

      uart_putuint8_1(status_funk + '0');

      uart_puts(" \n");

      uart_puts("Retransmitted Count: ");

      status_funk = wl_module_get_arc_cnt();

      uart_putuint8_1(status_funk + '0');

      uart_puts(" \n");

      _delay_ms(1500);

    }

    //uart_putuint8_s(sendedaten);

    counter++;

    if (counter >=5)

    {

      counter = 0;

    }

    _delay_ms(1000);

    }

}

void atmega_init()

{

  // Auf 8 MHz intern umstellen

  CLKPR = 0x80;            // Aenderungen erlauben

  CLKPR = 0x00;            // internen CLK nicht teilen = 8 MHz

  // Interrupt Funkmodul

  DDRB &= ~(1<<PINB6);      // als Eingang definieren

  PCMSK0 = (1<<PCINT6);      // PCint6 aktivieren (ACHTUNG: darf später nur auf fallende Flanke reagieren)

  PCICR = (1<<PCIE0);

}

ISR(PCINT0_vect)

{

  uart_puts("ISR:...\n");

  if (!(PINB & (1<<PINB6)))  // wenn interrupt aufgrund fallender Flanke

  {

    uint8_t status;

    uart_puts("ISR_IF...\n");

    // Read wl_module status

    wl_module_CSN_lo;                               // Pull down chip select

    status = spi_fast_shift(NOP);          // Read status register

    wl_module_CSN_hi;                               // Pull up chip select

    if (status & (1<<TX_DS))              // IRQ: Package has been sent

    {

      uart_puts("ISR_package_send...\n");

      wl_module_config_register(STATUS, (1<<TX_DS));  //Clear Interrupt Bit

      PTX=0;

    }

    if (status & (1<<MAX_RT))              // IRQ: Package has not been sent, send again

    {

      uart_puts("ISR_package_not_send_send_again...\n");

      wl_module_config_register(STATUS, (1<<MAX_RT));  // Clear Interrupt Bit

      wl_module_CE_hi;                // Start transmission

      _delay_us(10);

      wl_module_CE_lo;

    }

    if (status & (1<<TX_FULL))              //TX_FIFO Full <-- this is not an IRQ

    {

      uart_puts("ISR_FIFO_full...\n");

      wl_module_CSN_lo;                               // Pull down chip select

      spi_fast_shift(FLUSH_TX);            // Flush TX-FIFO

      wl_module_CSN_hi;                               // Pull up chip select

    }

  }

}

void uart_init(void)

{

  UBRR0H = UBRR_VAL >> 8;

  UBRR0L = UBRR_VAL & 0xFF;

  UCSR0B |= (1<<TXEN0);  // UART TX einschalten

  UCSR0C = (1<<UCSZ01)|(1<<UCSZ00);  // Asynchron 8N1

}

int uart_putuint8_1(uint8_t c)

{

  while (!(UCSR0A & (1<<UDRE0)))  /* warten bis Senden moeglich */

  {

  }

  UDR0 = c;                      /* sende Zeichen */

  return 0;

}

void uart_putuint8_s(uint8_t *s)

{

  while (*s)

  {   /* so lange *s != '\0' also ungleich dem "String-Endezeichen(Terminator)" */

    uart_putuint8_1(*s);

    s++;

  }

}

int uart_putc(char c)

{

  while (!(UCSR0A & (1<<UDRE0)))  /* warten bis Senden moeglich */

  {

  }

  UDR0 = c;                      /* sende Zeichen */

  return 0;

}

void uart_puts(char *s)

{

  while (*s)

  {   /* so lange *s != '\0' also ungleich dem "String-Endezeichen(Terminator)" */

    uart_putc(*s);

    s++;

  }

}