6502/AtomBusMon
1
0
Fork 0
mirror of https://github.com/hoglet67/AtomBusMon.git synced 2025-08-15 15:27:23 +00:00
Code Issues Projects Releases Wiki Activity

Added new top level generics to 6502 and 6809 designs

Browse Source 
Change-Id: I14d70471b97948c165210bebad88b60965531207
This commit is contained in:
David Banks
2017-08-01 09:25:12 +01:00
parent f2974d12df
commit a4aa6df31a
4 changed files with 56 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/AtomBusMon.vhd
View File

@@ -24,7 +24,10 @@ entity AtomBusMon is
generic ( generic (
LEDsActiveHigh : boolean := false; -- default value correct for GODIL LEDsActiveHigh : boolean := false; -- default value correct for GODIL
SW1ActiveHigh : boolean := true; -- default value correct for GODIL SW1ActiveHigh : boolean := true; -- default value correct for GODIL
SW2ActiveHigh : boolean := false -- default value correct for GODIL SW2ActiveHigh : boolean := false; -- default value correct for GODIL
ClkMult : integer := 10; -- default value correct for GODIL
ClkDiv : integer := 31; -- default value correct for GODIL
ClkPer : real := 20.345 -- default value correct for GODIL
); );
port ( port (
clock49 : in std_logic; clock49 : in std_logic;
@@ -88,7 +91,13 @@ begin
led6 <= not led6_n when LEDsActiveHigh else led6_n; led6 <= not led6_n when LEDsActiveHigh else led6_n;
led8 <= not led8_n when LEDsActiveHigh else led8_n; led8 <= not led8_n when LEDsActiveHigh else led8_n;
inst_dcm0 : entity work.DCM0 port map( inst_dcm0 : entity work.DCM0
generic map (
ClkMult => ClkMult,
ClkDiv => ClkDiv,
ClkPer => ClkPer
)
port map(
CLKIN_IN => clock49, CLKIN_IN => clock49,
CLKFX_OUT => clock_avr CLKFX_OUT => clock_avr
); );

13
src/AtomCpuMon.vhd
View File

@@ -28,7 +28,10 @@ entity AtomCpuMon is
UseAlanDCore : boolean := false; UseAlanDCore : boolean := false;
LEDsActiveHigh : boolean := false; -- default value correct for GODIL LEDsActiveHigh : boolean := false; -- default value correct for GODIL
SW1ActiveHigh : boolean := true; -- default value correct for GODIL SW1ActiveHigh : boolean := true; -- default value correct for GODIL
SW2ActiveHigh : boolean := false -- default value correct for GODIL SW2ActiveHigh : boolean := false; -- default value correct for GODIL
ClkMult : integer := 10; -- default value correct for GODIL
ClkDiv : integer := 31; -- default value correct for GODIL
ClkPer : real := 20.345 -- default value correct for GODIL
); );
port ( port (
clock49 : in std_logic; clock49 : in std_logic;
@@ -111,7 +114,13 @@ begin
led6 <= not led6_n when LEDsActiveHigh else led6_n; led6 <= not led6_n when LEDsActiveHigh else led6_n;
led8 <= not led8_n when LEDsActiveHigh else led8_n; led8 <= not led8_n when LEDsActiveHigh else led8_n;
inst_dcm0 : entity work.DCM0 port map( inst_dcm0 : entity work.DCM0
generic map (
ClkMult => ClkMult,
ClkDiv => ClkDiv,
ClkPer => ClkPer
)
port map(
CLKIN_IN => clock49, CLKIN_IN => clock49,
CLKFX_OUT => clock_avr CLKFX_OUT => clock_avr
); );

13
src/AtomFast6502.vhd
View File

@@ -43,7 +43,10 @@ entity AtomFast6502 is
UseAlanDCore : boolean := false; UseAlanDCore : boolean := false;
LEDsActiveHigh : boolean := false; -- default value correct for GODIL LEDsActiveHigh : boolean := false; -- default value correct for GODIL
SW1ActiveHigh : boolean := true; -- default value correct for GODIL SW1ActiveHigh : boolean := true; -- default value correct for GODIL
SW2ActiveHigh : boolean := false -- default value correct for GODIL SW2ActiveHigh : boolean := false; -- default value correct for GODIL
ClkMult : integer := 10; -- default value correct for GODIL
ClkDiv : integer := 31; -- default value correct for GODIL
ClkPer : real := 20.345 -- default value correct for GODIL
); );
port ( port (
clock49 : in std_logic; clock49 : in std_logic;
@@ -136,7 +139,13 @@ begin
led6 <= not led6_n when LEDsActiveHigh else led6_n; led6 <= not led6_n when LEDsActiveHigh else led6_n;
led8 <= not led8_n when LEDsActiveHigh else led8_n; led8 <= not led8_n when LEDsActiveHigh else led8_n;
inst_dcm0 : entity work.DCM0 port map( inst_dcm0 : entity work.DCM0
generic map (
ClkMult => ClkMult,
ClkDiv => ClkDiv,
ClkPer => ClkPer
)
port map(
CLKIN_IN => clock49, CLKIN_IN => clock49,
CLKFX_OUT => clock_avr CLKFX_OUT => clock_avr
); );

13
src/MC6809ECpuMon.vhd
View File

@@ -26,7 +26,10 @@ entity MC6809ECpuMon is
UseCPU09Core : boolean := true; UseCPU09Core : boolean := true;
LEDsActiveHigh : boolean := false; -- default value correct for GODIL LEDsActiveHigh : boolean := false; -- default value correct for GODIL
SW1ActiveHigh : boolean := true; -- default value correct for GODIL SW1ActiveHigh : boolean := true; -- default value correct for GODIL
SW2ActiveHigh : boolean := false -- default value correct for GODIL SW2ActiveHigh : boolean := false; -- default value correct for GODIL
ClkMult : integer := 10; -- default value correct for GODIL
ClkDiv : integer := 31; -- default value correct for GODIL
ClkPer : real := 20.345 -- default value correct for GODIL
); );
port ( port (
clock49 : in std_logic; clock49 : in std_logic;
@@ -168,7 +171,13 @@ begin
led6 <= not led6_n when LEDsActiveHigh else led6_n; led6 <= not led6_n when LEDsActiveHigh else led6_n;
led8 <= not led8_n when LEDsActiveHigh else led8_n; led8 <= not led8_n when LEDsActiveHigh else led8_n;
inst_dcm0 : entity work.DCM0 port map( inst_dcm0 : entity work.DCM0
generic map (
ClkMult => ClkMult,
ClkDiv => ClkDiv,
ClkPer => ClkPer
)
port map(
CLKIN_IN => clock49, CLKIN_IN => clock49,
CLKFX_OUT => clock_avr CLKFX_OUT => clock_avr
); );