2 use ieee.std_logic_1164.all;
3 use ieee.numeric_std.all;
5 use work.textmode_vga_component_pkg.all;
6 use work.textmode_vga_pkg.all;
7 use work.textmode_vga_platform_dependent_pkg.all;
8 use work.ps2_keyboard_controller_pkg.all;
13 CLK_50MHZ : in std_logic;
14 sys_res : in std_logic;
15 -- btnA (here: "btn west")
21 vsync_n : out std_logic;
22 hsync_n : out std_logic;
23 r : out std_logic_vector(RED_BITS - 1 downto 0);
24 g : out std_logic_vector(GREEN_BITS - 1 downto 0);
25 b : out std_logic_vector(BLUE_BITS - 1 downto 0);
27 ps2_clk : inout std_logic;
28 ps2_data : inout std_logic
32 architecture top of calc is
34 signal sys_res_n : std_logic;
36 signal new_data : std_logic;
37 signal data : std_logic_vector(7 downto 0);
39 signal vga_clk, free : std_logic;
41 signal command : std_logic_vector(COMMAND_SIZE - 1 downto 0);
42 signal command_data : std_logic_vector(3 * COLOR_SIZE + CHAR_SIZE -1 downto 0);
44 signal d_new_eingabe, d_new_result, d_new_bs : std_logic;
45 signal d_zeile : hzeile;
46 signal d_spalte : hspalte;
47 signal d_get, d_done : std_logic;
48 signal d_char : hbyte;
50 signal s_char : hbyte;
51 signal s_take, s_done, s_backspace : std_logic;
53 signal p_rget : std_logic;
54 signal p_rdone : std_logic;
55 signal p_read : hbyte;
56 signal p_wtake : std_logic;
57 signal p_wdone : std_logic;
58 signal p_write : hbyte;
59 signal p_finished : std_logic;
61 signal pc_get : std_logic;
62 signal pc_spalte : hspalte;
63 signal pc_zeile : hzeile;
64 signal pc_char : hbyte;
65 signal pc_done : std_logic;
66 signal pc_busy : std_logic;
68 signal do_it, finished : std_logic;
70 signal rx_new, rxd_sync : std_logic;
71 signal rx_data : std_logic_vector (7 downto 0);
72 signal tx_new, tx_done : std_logic;
73 signal tx_data : std_logic_vector (7 downto 0);
75 sys_res_n <= not sys_res;
78 textmode_vga_inst : entity work.textmode_vga(struct)
80 VGA_CLK_FREQ => 25000000,
81 BLINK_INTERVAL_MS => 500,
86 sys_res_n => sys_res_n,
88 command_data => command_data,
91 vga_res_n => sys_res_n,
100 clk_vga_s3e_inst : entity work.clk_vga_s3e(beh)
107 display_inst : entity work.display(beh)
109 sys_clk => CLK_50MHZ,
110 sys_res_n => sys_res_n,
112 d_new_eingabe => d_new_eingabe,
113 d_new_result => d_new_result,
114 d_new_bs => d_new_bs,
116 d_spalte => d_spalte,
122 command_data => command_data,
127 history_inst : entity work.history(beh)
129 sys_clk => CLK_50MHZ,
130 sys_res_n => sys_res_n,
135 s_backspace => s_backspace,
137 d_new_eingabe => d_new_eingabe,
138 d_new_result => d_new_result,
139 d_new_bs => d_new_bs,
141 d_spalte => d_spalte,
152 p_finished => p_finished,
155 pc_spalte => pc_spalte,
156 pc_zeile => pc_zeile,
163 parser_inst : entity work.parser(beh)
165 sys_clk => CLK_50MHZ,
166 sys_res_n => sys_res_n,
174 p_finished => p_finished,
181 scanner_inst : entity work.scanner(beh)
183 sys_clk => CLK_50MHZ,
184 sys_res_n => sys_res_n,
186 new_data => new_data,
192 s_backspace => s_backspace,
199 ps2_inst : entity work.ps2_keyboard_controller(beh)
201 CLK_FREQ => 50000000,
205 sys_clk => CLK_50MHZ,
206 sys_res_n => sys_res_n,
208 new_data => new_data,
214 -- synchronizer fuer rxd
215 sync_rxd_inst : entity work.sync(beh)
221 sys_clk => CLK_50MHZ,
222 sys_res_n => sys_res_n,
228 rs232rx_inst : entity work.uart_rx(beh)
230 CLK_FREQ => 50000000,
234 sys_clk => CLK_50MHZ,
235 sys_res_n => sys_res_n,
242 rs232tx_inst : entity work.uart_tx(beh)
244 CLK_FREQ => 50000000,
248 sys_clk => CLK_50MHZ,
249 sys_res_n => sys_res_n,
257 pc_com_inst : entity work.pc_communication(beh)
259 sys_clk => CLK_50MHZ,
260 sys_res_n => sys_res_n,
271 pc_zeile => pc_zeile,
272 pc_spalte => pc_spalte,
278 end architecture top;