DIPLOMARBEIT - FG Mikroelektronik, TU Berlin

Technische Universität Berlin
Institut für Mikroelektronik
Lukas Bauer
S_HCNT
entry
A: HCOUNT :=0;
HSYNC_out:=’0’;
CSYNC_out:=’0’;
VLINE :=0xFFFF;
RELAREA :=’0’;
HS_Enable:=’1’;
HBLANK :=’0’;
T1
T4 #1
T2 #2
Diplomarbeit
Hochleistungs-Grafikprozessor in Speedchart-VHDL
C: HS_Wait=’1’ and HCOUNT=HTOTAL
S1
T3 #0
C: HS_Coming=’1’
A: HCOUNT:=SETHCNT;
HSYNC_out:=’0’;
HS_Enable:=’0’;
CSYNC_out:=’0’;
HBLANK :=’0’;
A: -- HCOUNT, start HSYNC
if HCOUNT=HTOTAL then
HCOUNT:=0; -- reset counter
HSYNC_out:=’0’; -- start sync
HS_Enable:=’0’; -- ignore CSYNC_in
else
HCOUNT:=(HCOUNT+257) mod 65536
when TEST=’1’ and HCOUNT mod 256/=255
else (HCOUNT+1) mod 65536; -- count up
end if;
-- end HSYNC
if HCOUNT=HESYNC then
HSYNC_out:=’1’; -- end sync
end if;
-- start HBLANK
if HCOUNT=HSBLNK then
HBLANK:=’0’; -- start blank
HS_Enable:=’1’; -- accept CSYNC_in
-- initialize DPYNEXT and YZOOMCNT at start of field
if (ILE=’0’ and VCOUNT=VEBLNK) -- noninter line 0
or (ILE=’1’ and ODD=’0’ and VCOUNT=VEBLNK-1) then -- evenfield line 0
VLINE:=0;
RELAREA:=’1’;
DPYNEXT:=DPYSTRT;
RELOAD:=’1’;
if ILE=’1’ then
YZOOMCNT:=YZOOMST shr 1;
else
YZOOMCNT:=YZOOMST;
end if;
elsif ILE=’1’ and ODD=’1’ and VCOUNT=VEBLNK then -- oddfield line 1
VLINE:=1;
RELAREA:=’1’;
if YZ="000" then
DPYNEXT:=(DPYSTRT+DPYINC) mod 0x8000000;
else
DPYNEXT:=DPYSTRT;
end if;
RELOAD:=’1’;
YZOOMCNT:=YZOOMST shr 1;
-- end of field
elsif VCOUNT=VSBLNK -- last line
or (ILE=’1’ and ODD=’1’ and VCOUNT=VSBLNK+1) then -- last line ILE ODD
VLINE:=0xFFFF;
RELAREA:=’0’;
-- in the field: increment DPYNEXT
elsif RELAREA=’1’ then
VLINE:=(VLINE+1) mod 65536 when ILE=’0’ -- next line noninter
else (VLINE+2) mod 65536; -- next line interlaced
RELOAD:=’1’;
if YZOOMCNT=0 then
if ILE=’1’ then
YZOOMCNT:=YZOOMST shr 1;
if YZ="000" then
DPYNEXT:=(DPYNEXT+(DPYINC shl 1)) mod 0x8000000;-- line +2 ILE
else
DPYNEXT:=(DPYNEXT+DPYINC) mod 0x8000000; -- line +1 ILE zoom
end if;
else
YZOOMCNT:=YZOOMST;
DPYNEXT:=(DPYNEXT+DPYINC) mod 0x8000000; -- line +1 NI
end if;
else
YZOOMCNT:=(YZOOMCNT+127) mod 128; -- repeat last line
end if;
end if;
-- end HBLANK
elsif HCOUNT=HEBLNK then
RELOAD:=’0’;
HBLANK:=’1’; -- end blank
RELAT10:=’0’;
RELAT6:=’0’;
else
RELOAD:=’0’;
end if;
-- reload attention
if (ILE=’0’
and (VCOUNT=VEBLNK
or (RELAREA=’1’ and VCOUNT/=VSBLNK))) -- line preceding reload
or (ILE=’1’
and ((ODD=’0’ and VCOUNT=VEBLNK-1)
or (ODD=’1’ and VCOUNT=VEBLNK)
or (RELAREA=’1’ and VCOUNT/=VSBLNK and
(ODD=’0’ or VCOUNT/=VSBLNK+1)))) then
if HCOUNT=(HSBLNK+65526) mod 65536 then -- HSBLANK-10 reload att.
RELAT10:=’1’;
end if;
if HCOUNT=(HSBLNK+65530) mod 65536 then -- HSBLANK-6 reload att.
RELAT6:=’1’;
end if;
end if;
-- start CSYNC
if HCOUNT=HTOTAL -- start hs/eq/serr
or (HCOUNT=HTOTAL shr 1 and ILE=’1’ -- midline eq/serr
and ((IPhase(2)=’0’ and VCOUNT/=(VESYNC shr 1) + VTOTAL - VSBLNK)
-- midline csync in eq1/serr/eq2 but not when starting posteq.
or (IPhase="111" and ODD=’1’ and VCOUNT=VSBLNK))) then
-- midline csync when starting eq1
CSYNC_out:=’0’; --> start csync
end if;
-- end CSYNC
if (IPhase(2 downto 1)="11" and HCOUNT=HESYNC) -- end hsync
or (IPhase(2 downto 1)="01" -- end equalization
and (HCOUNT=HESYNC shr 1
or (ILE=’1’ and HCOUNT=((HTOTAL+1) shr 1) + (HESYNC shr 1))))
or (IPhase(2 downto 1)="00" -- end serration
and (HCOUNT=HESERR or HCOUNT=(HTOTAL+1) shr 1 + HESERR)) then
CSYNC_out:=’1’; --> end csync
end if;
Abbildung 49: Speedchart-Diagramm VIDEO/SYNC/S HCNT
Anhang C.2
Seite 82