From 3056c3fd118be634a4d192e5491a1176f49ef9c2 Mon Sep 17 00:00:00 2001
From: Eggert Jung <eggert.s.jung@wischhof13.de>
Date: Thu, 20 Aug 2020 15:38:49 +0200
Subject: [PATCH] progress on xmega port

---
 newcode/yaMBSiavr.c | 24 ++++++++++++++++++++----
 1 file changed, 20 insertions(+), 4 deletions(-)

diff --git a/newcode/yaMBSiavr.c b/newcode/yaMBSiavr.c
index c733b47..f5f0583 100644
--- a/newcode/yaMBSiavr.c
+++ b/newcode/yaMBSiavr.c
@@ -199,7 +199,6 @@ ISR(UART_RECEIVE_INTERRUPT)
         }
 }
 
-//TODO
 ISR(UART_TRANSMIT_INTERRUPT)
 {
 	BusState&=~(1<<TransmitRequested);
@@ -207,7 +206,11 @@ ISR(UART_TRANSMIT_INTERRUPT)
 	UART_DATA=rxbuffer[DataPos];
 	DataPos++;
 	if (DataPos==(PacketTopIndex+1)) {
+#ifndef __AVR_ATxmega32A4__
 		UART_CONTROL&=~(1<<UART_UDRIE);
+#else
+        USARTD0_CTRLA &= ~(USART_DREINTLVL_gm);
+#endif
 	}
 }
 
@@ -222,13 +225,14 @@ ISR(UART_TRANSMIT_COMPLETE_INTERRUPT)
 //TODO
 void modbusInit(void)
 {
+#ifndef __AVR_ATxmega32A4__
 	UBRRH = (unsigned char)((UBRR) >> 8);
 	UBRRL = (unsigned char) UBRR;
 	UART_STATUS = (1<<U2X); //double speed mode.
 #ifdef URSEL   // if UBRRH and UCSRC share the same I/O location , e.g. ATmega8
 	UCSRC = (1<<URSEL)|(3<<UCSZ0); //Frame Size
 #else
-   UCSRC = (3<<UCSZ0); //Frame Size
+    UCSRC = (3<<UCSZ0); //Frame Size
 #endif
 	UART_CONTROL = (1<<TXCIE)|(1<<RXCIE)|(1<<RXEN)|(1<<TXEN); // USART receiver and transmitter and receive complete interrupt
 	#if PHYSICAL_TYPE == 485
@@ -236,6 +240,13 @@ void modbusInit(void)
 	transceiver_rxen();
 	#endif
 	BusState=(1<<TimerActive);
+#elif
+    //BRR
+    //RX, TX enable
+    //Interrupt enable (levels)
+    //Physical type
+    //Busstate
+#endif
 }
 
 /* @brief: Sends a response.
@@ -243,7 +254,6 @@ void modbusInit(void)
 *         Arguments: - packtop: Position of the last byte containing data.
 *                               modbusSendException is a good usage example.
 */
-//TODO
 void modbusSendMessage(unsigned char packtop)
 {
 	PacketTopIndex=packtop+2;
@@ -253,7 +263,13 @@ void modbusSendMessage(unsigned char packtop)
 	#if PHYSICAL_TYPE == 485
 	transceiver_txen();
 	#endif
-	UART_CONTROL|=(1<<UART_UDRIE);
+
+#ifndef __AVR_ATxmega32A4__
+    UART_CONTROL|=(1<<UART_UDRIE);
+#else
+    USARTD0_CTRLA |= USART_DREINTLVL_HI_gc;
+#endif
+
 	BusState&=~(1<<ReceiveCompleted);
 }