［新連載］ＣＰＬＤ入門！
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
いつか使うことになるだろうと思ってはいたのですが。
何を今頃になって、というようなものですが。
ようやく本気で、ＣＰＬＤと四つに取り組みます。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
［第５０回］
●ＶＨＤＬプログラムリスト（ざっと説明）
また何日か間が空いてしまいました。
この数日間はどうしても手がけたい新しいことに首をつっこんで、悩んでおりました。
本日になって、やっとまあまあというところまでクリアできました。
そのことについても近いうちにホームページにて説明できると思います。
それで。
とりあえず本日のところは、前回お見せしたＣＰＬＤ版ＶＧＡＩＦのＶＨＤＬプログラムについて、ざっと簡単に説明します。
先頭の部分は定型的なおまじないのようなものです。
--vga controller 18/12/22 12/23 12/24 12/25 12/26 12/27
--19/1/12 1/13 1/29 3/24 3/25 3/26 3/27
--5/4 5/5 5/6
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
library ARITHMETIC;
use ARITHMETIC.std_logic_arith.all;
entity vgac2j is
PORT (
AHout:out std_logic_vector(6 downto 0);
ALout:out std_logic_vector(3 downto 0);
AHin:in std_logic_vector(6 downto 0);
ALin:in std_logic_vector(3 downto 0);
ROMadrs:out std_logic_vector(2 downto 0);
ROMDATA:in std_logic_vector(7 downto 0);
A11_15:in std_logic_vector(4 downto 0);
IOWR:in std_logic;
IORD:in std_logic;
MREQ:in std_logic;
MWR:in std_logic;
VRAMWR:out std_logic;
VRAMS:out std_logic;
D0IN:in std_logic;
D1IN:in std_logic;
D7OUT:out std_logic;
RGB_ROUT:out std_logic;
RGB_GOUT:out std_logic;
RGB_BOUT:out std_logic;
HSYNC :out std_logic;
VSYNC :out std_logic;
Notused58:in std_logic;
Notused73:in std_logic;
Notused74:in std_logic;
T57:out std_logic;--vblnkwk
T67:out std_logic;--vactive
T68:out std_logic;--hblnkwk
T69:out std_logic;--hblnkwk2
Resetin:in std_logic;
CKIN :in std_logic);
end vgac2j;
|
architecture rtl of vgac2j is
signal cntr1:std_logic_vector(2 downto 0);
signal cntr2:std_logic_vector(6 downto 0);
signal cntr3:std_logic_vector(8 downto 0);
signal ramadrswk:std_logic_vector(6 downto 0);
signal ramadrswk0:std_logic_vector(6 downto 0);
signal sftrgstr:std_logic_vector(7 downto 0);
signal hblnkwk:std_logic;
signal hblnkwk2:std_logic;
signal cntr3wk:std_logic;
signal vblnkwk:std_logic;
signal vrams2:std_logic;
signal vactive:std_logic;
signal rgbout:std_logic;
signal hsyncwk:std_logic;
signal vsyncwk:std_logic;
|
begin
T57<=vblnkwk;
T67<=vactive;
T68<=hblnkwk;
T69<=hblnkwk2;
Hsync<=hsyncwk;
Vsync<=vsyncwk;
|
--cntr1 & sftrgstr
process(CKIN)
begin
if CKIN'event and CKIN = '1' then
cntr1<=cntr1+"001";
sftrgstr<=sftrgstr(6 downto 0) & '0';
end if;
if CKIN='1' and cntr1="111" then
sftrgstr<=ROMDATA;
end if;
end process;
|
--cntr2
process(cntr1)
begin
if cntr1(2)'event and cntr1(2) = '0' then
cntr2 <= cntr2 +"0000001";
end if;
if cntr2="1100100" then
cntr2<="0000000";
end if;
end process;
|
--hblnk,hsync
process(cntr2)
begin
--hblnkwk
if cntr2="0000000" then
hblnkwk<='1';
--elsif cntr2="0000001" then see note 5/6
hblnkwk2<='1';
elsif cntr2="1010000" then
hblnkwk<='0';
elsif cntr2="1010001" then
hblnkwk2<='0';
--hsynkwk
elsif cntr2="1010011" then
hsyncwk<='0';
elsif cntr2="1011111" then
hsyncwk<='1';
end if;
end process;
|