Sprite soll nur nach Tastendruck wandern..

[peter (Gast)]

Hallo, guten Tag.
Ich habe hier ein Sprite(Viereck) auf den VGA-Monitor welches ich von 
der Ps2-Tastatur mit den Tasten Up/Down/Left/Right  steuere/verschiebe.

Wenn ich die Taste drücke wandert das Sprite, auch wenn ich die Taste 
loslasse, erst mit einer fremdem Taste stopp es. Ist eine Variante.

Wo muss jetzt etwas geändert werden damit das Sprite sofort stoppt wenn 
ich die bestimmte Taste loslasse?

Ab der gestrichelten Linie ist der Steuerbereich.

Danke.
GRuss

library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use ieee.numeric_std.ALL;

entity vga_viereck_ps2 is
port(
  clk50_in  : in std_logic;
  hs_out    : out std_logic;
  vs_out    : out std_logic;
  
  ps2_clk   : in std_logic;
  ps2_data  : in std_logic;
  
  red_out   : OUT STD_LOGIC_VECTOR(3 downto 0);
  green_out : OUT STD_LOGIC_VECTOR(3 downto 0);
  blue_out  : OUT STD_LOGIC_VECTOR(3 downto 0)
  ); 
end vga_viereck_ps2;

architecture behavioral of vga_viereck_ps2 is

signal clk25    : std_logic:='0';
signal hcounter : integer := 0;
signal vcounter : integer := 0;
signal links_neu : integer := 100;
signal rechts_neu : integer := 120;
signal oben_neu : integer := 100;
signal unten_neu : integer := 120;
signal links : integer := 0;
signal rechts : integer := 0;
signal oben : integer := 0;
signal unten : integer := 0;
signal c : integer range 0 to 500000 := 0; 
signal red   : STD_LOGIC_VECTOR(3 downto 0);
signal green : STD_LOGIC_VECTOR(3 downto 0);
signal blue  : STD_LOGIC_VECTOR(3 downto 0);

signal ps2_clk_int: std_logic;
signal ps2_data_int: std_logic;
  
signal ps2_clk_falling_edge: std_logic;
signal last_ps2_clk: std_logic;
  
signal started: std_logic;

signal count    : integer range 0 to 10:=0;
signal data     : std_logic_vector(9 downto 0);
signal vga_data  :  STD_LOGIC_VECTOR(7 downto 0);

begin

process (clk50_in)               
begin
if rising_edge(clk50_in) then
  if vga_Data ="00000101" then  
    red<="1111";
    green<="0000";
    blue<="0000";
  end if;
  if vga_Data ="00000110" then 
    red<="0000";
    green<="1111";
    blue<="0000";
  end if;
  if vga_Data ="00000100" then 
    red<="0000";
    green<="0000";
    blue<="1111";
  end if;
end if;  
end process;  

process (clk50_in)               
begin
  if rising_edge(clk50_in) then
    if (clk25 = '0') then
      clk25 <= '1';
    else
      clk25 <= '0';
    end if;
  end if;
end process;
-----------------------------------------------------
process(clk50_in)
begin  
  if rising_edge(clk50_in) then
    if (c<200000) then       
      c <= c+1;                
    else    
      if vga_Data ="01110100" then -- rechts
        rechts_neu <= rechts_neu+1;
        links_neu <= links_neu+1;
        if rechts_neu = 640 then
          rechts_neu <=640;
          links_neu <=620;
        end if;  
      end if;
      if vga_Data ="01101011" then -- links
        rechts_neu <= rechts_neu-1;
        links_neu <= links_neu-1;
        if links_neu = 0 then
          rechts_neu <=20;
          links_neu <=0;
        end if;  
      end if;
      if vga_Data ="01110010" then -- unten
        unten_neu <= unten_neu+1;
        oben_neu <= oben_neu+1;
        if unten_neu = 480 then
          unten_neu <=480;
          oben_neu <=460;
        end if;  
      end if;
      if vga_Data ="01110101" then -- oben
        unten_neu <= unten_neu-1;
        oben_neu <= oben_neu-1;
        if oben_neu = 0 then
          unten_neu <=20;
          oben_neu <=0;
        end if;
      end if;
      
      c <= 0;  
    end if;  
  end if;
end process;  
------------------------------------------------------------
process (clk50_in)
begin
if rising_edge(clk50_in) then
  if clk25 = '1' then
    if (hcounter >= links) and (hcounter < rechts) and (vcounter >= oben) and (vcounter < unten) then 
       red_out<= red;
       green_out<=green;
       blue_out<=blue;
     else
       red_out<="0000";
       green_out<="0000";
       blue_out<="0000";
   end if;
  end if;
end if;  
end process;

process (clk50_in)
begin
if rising_edge(clk50_in) then 
  if clk25 = '1' then
    if hcounter >= (639+16) and hcounter <= (639+16+96) then
      hs_out <= '0';
    else
      hs_out <= '1';
    end if;
  
    if vcounter >= (479+10) and vcounter <= (479+10+2) then
      vs_out <= '0';
     else
      vs_out <= '1';
    end if;
  
--- horizontal counts from 0 to 799
    hcounter <= hcounter+1;
  
    if hcounter = 799 then
      vcounter <= vcounter+1;
      hcounter <= 0;
    end if;
  
--- vertical counts from 0 to 524
    if vcounter = 524 then 
      rechts <= rechts_neu;
      links <= links_neu;
      oben <= oben_neu;
      unten <= unten_neu;
      vcounter <= 0;
    end if;
  end if;
end if;  
end process;

process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      ps2_clk_int <= ps2_clk;
      ps2_data_int <= ps2_data;
    end if;
end process;
  
process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      last_ps2_clk <= ps2_clk_int;
      
      if last_ps2_clk = '1' and ps2_clk_int = '0' then
        ps2_clk_falling_edge <= '1';
      else
        ps2_clk_falling_edge <= '0';
      end if;
    end if;
end process;
  
process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      if ps2_clk_falling_edge = '1' and ps2_data_int = '0' then 
        started <= '1';
      end if;
      
      if count = 10 then
        started <= '0';
      end if;
    end if;
end process;
            
process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      if ps2_clk_falling_edge = '1' and started = '1' then
        count <= count + 1;
        data <= ps2_data_int & data(9 downto 1);
      end if;
      
      if count = 10 then
        count <= 0;
      end if;
    end if;
end process;
  
process(clk50_in)
  begin
    if rising_edge(clk50_in) then    
      if count = 10 and data(9) = '1'   then  
        vga_data <= data(7 downto 0);
      end if;
    end if;
end process;

end behavioral;

[PittyJ (Gast)]

Ist ja alles super kommentiert. Die Prozesse haben einen Namen, der 
aussagt, was sie tun. Und zum Glück gibt es auch keine Signale die data 
heissen, sondern nur aussagekräftige Namen. (Data gibt es nur auf der 
Enterprise)

Also: ich blicke bei deinem Code nicht durch, das könnte alles besser 
beschrieben sein.
Gibt es dazu einen Testbench? Was sagt die Simulation?

[Sabine W. (sabine_w)]

Wenn eine Taste losgelassen wird, wird als Break-Code eine 
Zwei-Byte-Folge gesendet, 0xF0 und dann nochmal der Scancode der Taste. 
Eine Tastatur sendet mit der Scancodepage 2, in PCs wird da aber gleich 
intern Codepage 1 daraus gemacht (liegt in der Historie der PCs 
begründet, die Umwandlung dient dazu, dass Programme, die eine 
XT-Tastatur erwarten, auch mit einer AT-Tastatur funktionieren, obwohl 
abschaltbar, wurde da nie was dann geändert), da ist der Breakcode dann 
der Make-Code mit gesetztem obersten Bit. Da du mit deinem FPGA die 
Tastatur ja direkt siehst, wirst du dieses 0xF0 irgendwie 
berücksichtigen müssen, um zwischen dem Drücken einer Taste und ihrem 
Loslassen unterscheiden zu können.

[Jo S. (scherzkeks)]

peter schrieb:
> if rising_edge(clk50_in) then
>     if (clk25 = '0') then
>       clk25 <= '1';
>     else
>       clk25 <= '0';
>     end if;

Falls das ein Takteiler sein soll kann man das auch besser schreiben.

if rising_edge(clk50_in) then
     clk25 <= not clk25;
end if;

[peter (Gast)]

Jup danke für die Hinweise.

Gruss

[Lattice User (Gast)]

Bevor du weitermachst, solltest du lernen wie man das Design in Module 
aufteilt. Es ist bereits jetzt sehr unübersichtlich.

[klausro (Gast)]

peter schrieb:
> process(clk50_in)
>   begin
>     if rising_edge(clk50_in) then
>       if ps2_clk_falling_edge = '1' and ps2_data_int = '0' then
>         started <= '1';
>       end if;
>
>       if count = 10 then
>         started <= '0';
>       end if;
>     end if;
> end process;
>

Also, ich bin jetzt weder VHDL noch ein PS2 Guru, aber es sieht so aus, 
dass du nur "gedrückte" Tasten detektierst (Make Code), und nicht das 
loslassen (den Break-Code), da du nur auf ps2_data_int = 0 prüfst. IMHO 
ist beim Break-Code das erste Bit gesetzt, oder?

[peter (Gast)]

JUp, nur die gedrückte Taste wird berücksichtigt.

Gruss

[klausro (Gast)]

peter schrieb:
> JUp, nur die gedrückte Taste wird berücksichtigt.

Jetzt denk doch mal nach: Wenn das Sprite beim loslassen der Taste 
stehen bleiben soll, dann musst du in deinem VHDL Code das loslassen 
erkennen und dein vga_Data (da steht doch der Tastencode drin?) löschen. 
Solange in vga_Data ein sinnvoller Tastencode steht, wird dein Sprite 
verschoben.

[peter (Gast)]

klausro (Gast):
Jetzt denk doch mal nach: Wenn das Sprite beim loslassen der Taste
stehen bleiben soll, dann musst du in deinem VHDL Code das loslassen
erkennen und dein vga_Data (da steht doch der Tastencode drin?) löschen.


Das ist das Problem, es kommt bei einem Tastendruck "A" =  1C F0 1C
3 Code. Und da weiß ich noch nicht, wie ich die abfangen kann.

WEnn ich als 2.tes F0 abfange, kommt das 3.te hinterher und löst das 
laufen Sprite wieder aus.

GRuss

[lulu (Gast)]

Für so etwas benutzt man gerne eine State Machine (FSM)

[peter (Gast)]

Hallo, erklär mal bitte für mein Problem diese FSM? Vielleicht mit Code?

Danke.

[Sabine W. (sabine_w)]

Du könntest doch einfach noch auf 0xF0 testen und ein Signal setzen, 
wenn dann der Tastencode beim Loslassen nochmal gesendet wird, kannst du 
mit diesem Signal unterscheiden, ob die Taste nun gedrückt oder 
losgelassen wurde. (Warum nennst du denn das für die Taste vga_data? Das 
ist verwirrend, es geht ja um den Tastenwert, key_data oder ähnliches 
wäre klarer.)

   if vga_Data = "11110000" then -- 0xF0
        key_released <= '1';
   end if;
....
  if count = 10 and data(9) = '1'   then        
        if key_released = '1' then
            vga_data <= "00000000";
            key_released <= '0';
        else 
            vga_data <= data(7 downto 0);
        end if;
  end if;

[peter (Gast)]

Jup, danke.

vga_data, weil ich damit das sprite auf dem  vga_monitor ansteuere.

Danke.
Gruss

[peter (Gast)]

Hmm...was ist das für eine Meldung?
---------------------------------
Error (10028): Can't resolve multiple constant drivers for net 
"key_released" at vga_viereck_ps2.vhd(245)
Error (10029): Constant driver at vga_viereck_ps2.vhd(92)
Error (12153): Can't elaborate top-level user hierarchy
-------------------------------------------

Wenn ich dieses oben mit reinsetze als Abfrage:
 if vga_Data = "11110000" then -- 0xF0
    key_released <= '1';
  end if;
kommt die obige Fehlermeldung und das ist mein Problem, weil ich so eine 
Abfrsage nicht hinbekomme.
Die Zuweisung am Ende wird nicht reklamiert.

Danke.
GRuss

signal key_released : std_logic;
...............
...............
process(clk50_in)
begin  
  if rising_edge(clk50_in) then
    if (c<200000) then       
      c <= c+1;                
    else  
    
      if vga_Data = "11110000" then -- 0xF0
        key_released <= '1';
      end if;
      
      if vga_Data ="01110100" then -- rechts
        rechts_neu <= rechts_neu+add_sub;
        links_neu <= links_neu+add_sub;
        if rechts_neu = 640 then
          rechts_neu <=640;
          links_neu <=620;
        end if;  
      end if;
      ..................
      ................
      process(clk50_in)
  begin
    if rising_edge(clk50_in) then    
      if key_released = '1' then
         vga_data <= "00000000";
         key_released <= '0';
      else 
         vga_data <= data(7 downto 0);
      end if;
    end if;
end process;

[peter (Gast)]

Mal den ganzen Code:

library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use ieee.numeric_std.ALL;

entity vga_viereck_ps2 is
port(
  clk50_in  : in std_logic;
  hs_out    : out std_logic;
  vs_out    : out std_logic;
  
  ps2_clk   : in std_logic;
  ps2_data  : in std_logic;
  
  led_g     : OUT STD_LOGIC_VECTOR(7 downto 0);
  
  red_out   : OUT STD_LOGIC_VECTOR(3 downto 0);
  green_out : OUT STD_LOGIC_VECTOR(3 downto 0);
  blue_out  : OUT STD_LOGIC_VECTOR(3 downto 0)
  ); 
end vga_viereck_ps2;

architecture behavioral of vga_viereck_ps2 is

signal clk25    : std_logic:='0';
signal hcounter : integer range 0 to 1000 := 0;
signal vcounter : integer range 0 to 1000 := 0;
signal links_neu : integer range 0 to 1000 := 100;
signal rechts_neu : integer range 0 to 1000 := 120;
signal oben_neu : integer range 0 to 1000 := 100;
signal unten_neu : integer range 0 to 1000 := 120;
signal links : integer range 0 to 1000 := 0;
signal rechts : integer range 0 to 1000 := 0;
signal oben : integer range 0 to 1000 := 0;
signal unten : integer range 0 to 1000 := 0;
signal add_sub : integer range 0 to 100 := 1;
signal c : integer range 0 to 500000 := 0; 
signal red   : STD_LOGIC_VECTOR(3 downto 0);
signal green : STD_LOGIC_VECTOR(3 downto 0);
signal blue  : STD_LOGIC_VECTOR(3 downto 0);

signal ps2_clk_int: std_logic;
signal ps2_data_int: std_logic;
  
signal ps2_clk_falling_edge: std_logic;
signal last_ps2_clk: std_logic;
  
signal started: std_logic;

signal count    : integer range 0 to 10:=0;
signal data     : std_logic_vector(9 downto 0);
signal vga_data  :  STD_LOGIC_VECTOR(7 downto 0);
signal key_released : std_logic;------------------------------------ für die Abfrage

begin

process (clk50_in)               
begin
if rising_edge(clk50_in) then
  if vga_Data ="00000101" then  
    red<="1111";
    green<="0000";
    blue<="0000";
  end if;
  
  if vga_Data ="00000110" then 
    red<="0000";
    green<="1111";
    blue<="0000";
  end if;
  
  if vga_Data ="00000100" then 
    red<="0000";
    green<="0000";
    blue<="1111";
  end if;
end if;  
end process;  

process (clk50_in)               
begin
  if rising_edge(clk50_in) then
    if (clk25 = '0') then
      clk25 <= '1';
    else
      clk25 <= '0';
    end if;
  end if;
end process;

process(clk50_in)
begin  
  if rising_edge(clk50_in) then
    if (c<200000) then       
      c <= c+1;                
    else  
----------------------------------------------------    
      if vga_Data = "11110000" then -- 0xF0
        key_released <= '1';                       ----- neu reingesetzt, wir als Fehler rausgeschmissen
      end if;
------------------------------------------------------    
      if vga_Data ="01110100" then -- rechts
        rechts_neu <= rechts_neu+add_sub;
        links_neu <= links_neu+add_sub;
        if rechts_neu = 640 then
          rechts_neu <=640;
          links_neu <=620;
        end if;  
      end if;
      
      if vga_Data ="01101011" then -- links
        rechts_neu <= rechts_neu-add_sub;
        links_neu <= links_neu-add_sub;
        if links_neu = 0 then
          rechts_neu <=20;
          links_neu <=0;
        end if;  
      end if;
      
      if vga_Data ="01110010" then -- unten
        unten_neu <= unten_neu+add_sub;
        oben_neu <= oben_neu+add_sub;
        if unten_neu = 480 then
          unten_neu <=480;
          oben_neu <=460;
        end if;  
      end if;
      
      if vga_Data ="01110101" then -- oben
        unten_neu <= unten_neu-add_sub;
        oben_neu <= oben_neu-add_sub;
        if oben_neu = 0 then
          unten_neu <=20;
          oben_neu <=0;
        end if;
      end if;
      
      c <= 0;  
    end if;  
  end if;
end process;  

process (clk50_in)
begin
if rising_edge(clk50_in) then
  if clk25 = '1' then
    if (hcounter >= links) and (hcounter < rechts) and (vcounter >= oben) and (vcounter < unten) then 
       red_out<= red;
       green_out<=green;
       blue_out<=blue;
     else
       red_out<="0000";
       green_out<="0000";
       blue_out<="0000";
   end if;
  end if;
end if;  
end process;

process (clk50_in)
begin
if rising_edge(clk50_in) then 
  if clk25 = '1' then
    if hcounter >= (639+16) and hcounter <= (639+16+96) then
      hs_out <= '0';
    else
      hs_out <= '1';
    end if;
  
    if vcounter >= (479+10) and vcounter <= (479+10+2) then
      vs_out <= '0';
     else
      vs_out <= '1';
    end if;
  
--- horizontal counts from 0 to 799
    hcounter <= hcounter+1;
  
    if hcounter = 799 then
      vcounter <= vcounter+1;
      hcounter <= 0;
    end if;
  
--- vertical counts from 0 to 524
    if vcounter = 524 then 
      rechts <= rechts_neu;
      links <= links_neu;
      oben <= oben_neu;
      unten <= unten_neu;
      vcounter <= 0;
    end if;
  end if;
end if;  
end process;

process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      ps2_clk_int <= ps2_clk;
      ps2_data_int <= ps2_data;
    end if;
end process;
  
process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      last_ps2_clk <= ps2_clk_int;
      
      if last_ps2_clk = '1' and ps2_clk_int = '0' then
        ps2_clk_falling_edge <= '1';
      else
        ps2_clk_falling_edge <= '0';
      end if;
    end if;
end process;
  
process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      if ps2_clk_falling_edge = '1' and ps2_data_int = '0' then 
        started <= '1';
      end if;
      
      if count = 10 then
        started <= '0';
      end if;
    end if;
end process;
            
process(clk50_in)
  begin
    if rising_edge(clk50_in) then
      if ps2_clk_falling_edge = '1' and started = '1' then
        count <= count + 1;
        data <= ps2_data_int & data(9 downto 1);
      end if;
      
      if count = 10 then
        count <= 0;
      end if;
    end if;
end process;
  
process(clk50_in)
  begin
    if rising_edge(clk50_in) then    
      if key_released = '1' then     ---------------------------------------------
         vga_data <= "00000000";     ---- dieses wird anerkannt.
         key_released <= '0';         ---------------------------------------------
       else 
         vga_data <= data(7 downto 0);
         led_g <= data(7 downto 0);
       end if;
    end if;
end process;

end behavioral;

[lulu (Gast)]

du schreibst von zwei Prozessen auf das "key_released" Signal. Das ist, 
wenn man es diskret aufbaut, ein Kurzschluss. Deswegen kann der 
Synthesizer das auch nicht lösen.



Zum Thema FSM, ich habe das PS2 Protkoll nicht genau im Kopf, deswegen 
orintiere ich mich an diese Aussage:
>> "A" =  1C F0 1C

Du hast neben IDLE noch zwei States, wo du diese Kombination 
detektierst:
IDLE State:
- Habe ich ein F0 (Break) empfangen, dann ist der nächste State 
STATE_BREAK
- Habe ich ein "A" (1C) Zeichen bekommen, dann ist dies der Make-Code 
für das Zeichen -> gedrückte Taste

STATE_BREAK:
- Habe ich ich das nächste Zeichen erhalten (das ist das zugehörige 
Zeichen für den Break-Code) -> losgelassene Taste, nächster State ist 
wieder IDLE


So in etwa würde das in Worten aussehen. Wie du das genau umsetzt ist 
aus deinem VHDL Buch zu entnehmen.

Grüße

[peter (Gast)]

JUp danke.

Gruss

[Duke Scarring (Gast)]

Wie Du vielleicht schon gemerkt hast, hat ein Signal eine Quelle, aber 
u.U. mehrere Senken.
Daher bennene ich die Signale zu 99,9% nach der Quelle, da bleibt es 
übersichtlich.

peter schrieb:
> vga_data, weil ich damit das sprite auf dem  vga_monitor ansteuere

Oder wie würdest Du Dein vga_data benennen, wenn es zusätzlich noch zu 
einer LED geht und in einem Debug-Modul genutzt wird?

Duke