X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=cpu%2Fsrc%2Fr_w_ram_b.vhd;h=585dc9260adcc46f276ef62ee4626ba43342fc6f;hb=d1e680464f7b7147dc4b435a27973621fd69f065;hp=9e530fad63d42eddf6d7b0d6c5204642e408bdd1;hpb=5356e3e07b4c3f16d4f2494100e2c4e937cb0e5b;p=calu.git

diff --git a/cpu/src/r_w_ram_b.vhd b/cpu/src/r_w_ram_b.vhd
index 9e530fa..585dc92 100644
--- a/cpu/src/r_w_ram_b.vhd
+++ b/cpu/src/r_w_ram_b.vhd
@@ -10,7 +10,51 @@ architecture behaviour of r_w_ram is
 	subtype RAM_ENTRY_TYPE is std_logic_vector(DATA_WIDTH -1 downto 0);
 	type RAM_TYPE is array (0 to (2**ADDR_WIDTH)-1) of RAM_ENTRY_TYPE;
 	
-	signal ram : RAM_TYPE := ((others => b"11100000000000001001000000000000"));
+									-- r0 = 0, r1 = 1, r2 = 3, r3 = A
+
+	signal ram : RAM_TYPE := (  
+				    1 => "11101101000010000000000000111000", -- r1 = 7
+				    2 => "11101101000100000000000000101000", -- r2 = 5
+				    3 => "11101101000110000000000000100000", -- r3 = 4
+				    4 => "11100000001000010001100000000000", -- r4 = r2 + r3
+				    5 => "11100010001010100000100000000000", -- r5 = r4 and r1
+
+				    6 => "11100001000000000000000000001000", -- r0 = r0 + 1
+				    7 => "11101100100000000000000000010000", -- cmpi r0 , 2       => 2-2 => 1001
+
+				    8 => "00001011011111111111110010000011", -- jump -7
+				    9 => "11101011000000000000000010000010", -- jump +1
+
+                                   10 => "11100111101010100000000000000001", -- stw r5,r4,1
+			 	   11 => "11101100001000100000000000000000", --cmp r4 , r4       => 2-2 => 1001
+
+				    0 => "11101101000000000000000000000000", -- r0 = 0
+
+
+				  others => x"F0000000");
+
+--	signal ram : RAM_TYPE := (  0 => "11100000000100001000000000000000", --add r2, r1, r0    => r2 = 1
+--				    1 => "11100000000110001000000000000000", --add r3, r1, r0    => r3 = 1
+--				    2 => "11100000001000011001000000000000", --add r4, r3, r2    => r4 = 2
+--				    3 => "11100000000100001000000000000000", --add r2, r1, r0    => r2 = 1
+--				    4 => "11100000000110001000000000000000", --add r3, r1, r0    => r3 = 1
+--				    5 => "11100000001000011001000000000000", --add r4, r3, r2    => r4 = 2
+--				    6 => "11101100000000001000000000000000", --cmp r0 , r1       => 0-1 => 0100
+--				    7 => "00000000001010101010000000000001", --addnqd r5, r5, r4 => r5 = 2
+--				    8 => "00000000001010101010000000000000", --addnq r5, r5, r4  => r5 = 4
+--				    9 => "11101100001000100000000000000000", --cmp r4 , r4       => 2-2 => 1001
+--				   10 => "00000001001100001000000001010000", --addinq r6, r1, 0xA => nix
+--				   11 => "00010001001100001000000001010000", --addieq r6, r1, 0xA => r6 = 0xB
+--				   12 => "00010001101100110000000001010000", --subieq r6, r5, 0xA => r6 = 1
+--				   13 => "11100000000100001000000000000000", --add r2, r1, r0     => r2 = 1
+--				   14 => "11100010000100001000000000000000", --and r2, r1, r0     => r2 = 0
+--				   15 => "11101100000000001000000000000000", --cmp r0 , r1        => 0-1 => 0100
+--				   16 => "10000000001010101010000000000001", --addabd r5, r5, r4  => r5 = 6
+--				   17 => "10110011101110001000010000110001", --orxltd r7, 1086    => r7 = 1086
+--				   18 => "10110101001110001000010000000001", --shiftltd r7, r1, 1 => r7 = 2
+--				   19 => "01010101001110001000100000000001", --shiftltd r7, r1, 2 => r7 = 4
+--				  others => x"F0000000");
+
 
 begin
 	process(clk)