1 ---------------------------------------------------------------------------------
2 -- Filename : rs232_tx_arc.vhd
5 -- Beschreibung : Versand von Daten ueber die RS232 Schnittstelle
8 -- Autoren : Martin Perner, Schwarz Manfred
10 ----------------------------------------------------------------------------------
13 use IEEE.std_logic_1164.all;
14 use IEEE.numeric_std.all;
16 use work.common_pkg.all;
17 use work.core_pkg.all;
18 use work.extension_uart_pkg.all;
20 architecture beh of rs232_tx is
21 -- definierern der intern verwendeten Signale
22 type STATE_TYPE is (IDLE,SEND);
23 signal state, state_next : STATE_TYPE;
24 signal bus_tx_int, bus_tx_nxt : std_logic := '1';
25 signal baud_cnt,baud_cnt_next : integer := 0;
26 signal cnt, cnt_next : natural range 0 to 11 := 0;
27 signal idle_sig, idle_sig_next : std_logic := '0';
30 -- syncronisierungs Prozess
31 rs232_tx_syn : process(sys_clk, sys_res_n)
33 if (sys_res_n = RESET_VALUE) then
41 elsif rising_edge(sys_clk) then
42 -- sync Zustand, uebernehmen der next-Signale
43 baud_cnt <= baud_cnt_next;
46 idle_sig <= idle_sig_next;
47 bus_tx_int <= bus_tx_nxt;
53 -- Zustandsmaschienen Prozess
54 rs232_tx_state : process(state, new_tx_data, idle_sig)
59 -- wenn neue Sendedaten anliegen wird in den Zustand SEND gewechselt
60 if new_tx_data = '1' then
64 -- wenn das Byte inklusive Start- und Stopbit versendet wurde, geht
65 -- der Prozess wieder in den IDLE Zustand.
66 if idle_sig = '1' then
73 rs232_tx_baud : process(sys_clk, sys_res_n, state, baud_cnt, cnt, tx_data, bus_tx_int,stop_bit, bd_rate)
75 -- Solang idle_sig auf 0 ist wird im SEND Zustand verblieben
77 bus_tx_nxt <= bus_tx_int;
79 -- Counter erhoehen um die Zeit einer Bitdauer abzuwarten
80 baud_cnt_next <= baud_cnt + 1;
84 -- tx-Signale im idle Zustand halten
86 baud_cnt_next <= to_integer(unsigned(bd_rate));
88 -- Signalisiert dass gerade ein Byte versendet wird
90 if baud_cnt = bd_rate then
91 -- wenn die Bitdauer erreicht ist, Counter reseten
93 -- Counter um die einzelen Bits zu versenden
97 -- counter = 0 => Startbit versenden
100 -- counter = 9 => Stopbit versenden
102 -- stop_bit 0 heit 1 stop bit
103 if stop_bit = '0' then
105 idle_sig_next <= '1';
109 -- stop_bit 1 heit 2 stop bits
110 if stop_bit = '1' then
112 -- Signalisieren dass der Sendevorgang beendet ist
113 idle_sig_next <= '1';
116 -- counter von 1 bis 8 => Datenbits versenden
117 bus_tx_nxt <= tx_data(cnt-1);
123 end architecture beh;