shit not working
[calu.git] / cpu / src / extension_lcd_b_8.vhd
index 119a1bd4a929a1c81cc9e751a5c3792558cd9775..7016a1953fbd2502014000f0f37374cfa5f05fd9 100644 (file)
@@ -15,6 +15,8 @@ use work.extension_lcd_pkg_8.all;
 architecture behav of extension_lcd_8 is
 
 constant CLK_Divide : integer := 16;
+constant LCD_Delay : std_logic_vector(19 downto 0) := x"3fffe";
+--constant LCD_Delay : std_logic_vector(19 downto 0) := x"0000e"; -- for simulation
 
 --w1_st_co(0) == 1 => ready for data
 --w1_st_co(1) == 1 => setup finished
@@ -184,7 +186,7 @@ begin
                                end if;
 
                        when DO_WAIT =>
-                               if lcd_set_delay < x"3fffe" then
+                               if lcd_set_delay < LCD_Delay then
                                        lcd_set_delay_nxt <= lcd_set_delay + 1;
                                else
                                        lcd_set_delay_nxt <= (others => '0');
@@ -216,7 +218,7 @@ begin
                                end if;
 
                        when DO_WAIT =>
-                               if lcd_set_delay < x"3fffe" then
+                               if lcd_set_delay < LCD_Delay then
                                        lcd_set_delay_nxt <= lcd_set_delay + 1;
                                else
                                        lcd_set_delay_nxt <= (others => '0');
@@ -267,6 +269,7 @@ begin
                        lcd_done_nxt  <= '1';
                        lcd_count_nxt <= 0;
                        lcd_st_nxt <= "00";
+               when others => null;
        end case;
 
 
@@ -283,6 +286,7 @@ begin
                when "100" => lcd_rom_data <= x"001";
                when "101" => lcd_rom_data <= x"006";
                when "110" => lcd_rom_data <= x"080";
+               when "111" => lcd_rom_data <= x"13C";
                when others => lcd_rom_data <= x"0b0"; --goto 0,0
                --      Line 1
                --when "000111" => lcd_rom_data <= x"120";      --      Welcome to the