3 use IEEE.std_logic_1164.all;
4 use IEEE.numeric_std.all;
8 architecture behaviour of r_w_ram is
10 subtype RAM_ENTRY_TYPE is std_logic_vector(DATA_WIDTH -1 downto 0);
11 type RAM_TYPE is array (0 to (2**ADDR_WIDTH)-1) of RAM_ENTRY_TYPE;
13 -- r0 = 0, r1 = 1, r2 = 3, r3 = A
15 signal ram : RAM_TYPE := ( 0 => "11101101000010000000000000111000", -- r1 = 7
16 1 => "11101101000100000000000000101000", -- r2 = 5
17 2 => "11101101000110000000000000100000", -- r3 = 4
18 3 => "11100000001000010001100000000000", -- r4 = r2 + r3
19 4 => "11100010001010100000100000000000", -- r5 = r4 and r1
20 others => x"F0000000");
22 -- signal ram : RAM_TYPE := ( 0 => "11100000000100001000000000000000", --add r2, r1, r0 => r2 = 1
23 -- 1 => "11100000000110001000000000000000", --add r3, r1, r0 => r3 = 1
24 -- 2 => "11100000001000011001000000000000", --add r4, r3, r2 => r4 = 2
25 -- 3 => "11100000000100001000000000000000", --add r2, r1, r0 => r2 = 1
26 -- 4 => "11100000000110001000000000000000", --add r3, r1, r0 => r3 = 1
27 -- 5 => "11100000001000011001000000000000", --add r4, r3, r2 => r4 = 2
28 -- 6 => "11101100000000001000000000000000", --cmp r0 , r1 => 0-1 => 0100
29 -- 7 => "00000000001010101010000000000001", --addnqd r5, r5, r4 => r5 = 2
30 -- 8 => "00000000001010101010000000000000", --addnq r5, r5, r4 => r5 = 4
31 -- 9 => "11101100001000100000000000000000", --cmp r4 , r4 => 2-2 => 1001
32 -- 10 => "00000001001100001000000001010000", --addinq r6, r1, 0xA => nix
33 -- 11 => "00010001001100001000000001010000", --addieq r6, r1, 0xA => r6 = 0xB
34 -- 12 => "00010001101100110000000001010000", --subieq r6, r5, 0xA => r6 = 1
35 -- 13 => "11100000000100001000000000000000", --add r2, r1, r0 => r2 = 1
36 -- 14 => "11100010000100001000000000000000", --and r2, r1, r0 => r2 = 0
37 -- 15 => "11101100000000001000000000000000", --cmp r0 , r1 => 0-1 => 0100
38 -- 16 => "10000000001010101010000000000001", --addabd r5, r5, r4 => r5 = 6
39 -- 17 => "10110011101110001000010000110001", --orxltd r7, 1086 => r7 = 1086
40 -- 18 => "10110101001110001000010000000001", --shiftltd r7, r1, 1 => r7 = 2
41 -- 19 => "01010101001110001000100000000001", --shiftltd r7, r1, 2 => r7 = 4
42 -- others => x"F0000000");
48 if rising_edge(clk) then
49 data_out <= ram(to_integer(UNSIGNED(rd_addr)));
52 ram(to_integer(UNSIGNED(wr_addr))) <= data_in;
56 end architecture behaviour;