33
145- -- map the pixel to a color if the video is not blanked
146- IF pblank='0' THEN
147-
CASE pixrg(1 DOWNTO 0) IS
148-
WHEN "00" => rgb <= "110000";
-- red
149-
WHEN "01" => rgb <= "001100";
-- green
150-
WHEN "10" => rgb <= "000011";
-- blue
151-
WHEN OTHERS => rgb <= "111111";
-- white
152-
END CASE;
153- ELSE
-- otherwise, output black if the video is blanked
154-
rgb <= "000000";
-- black
155- END IF;
156- END IF;
157- END PROCESS;
158-
159- END vga_generator_arch;
•
Listing 18:
XS40 UCF file for the VGA signal generator.
001- net clk
loc=p13;
002- net reset
loc=p44;
003- net data<0>
loc=p41;
004- net data<1>
loc=p40;
005- net data<2>
loc=p39;
006- net data<3>
loc=p38;
007- net data<4>
loc=p35;
008- net data<5>
loc=p81;
009- net data<6>
loc=p80;
010- net data<7>
loc=p10;
011- net address<0>
loc=p3;
012- net address<1>
loc=p4;
013- net address<2>
loc=p5;
014- net address<3>
loc=p78;
015- net address<4>
loc=p79;
016- net address<5>
loc=p82;
017- net address<6>
loc=p83;
018- net address<7>
loc=p84;
019- net address<8>
loc=p59;
020- net address<9>
loc=p57;
021- net address<10>
loc=p51;
022- net address<11>
loc=p56;
023- net address<12>
loc=p50;
024- net address<13>
loc=p58;
025- net address<14>
loc=p60;
026- net ceb
loc=p65;
027- net web
loc=p62;
028- net oeb
loc=p61;
029- net rgb<0>
loc=p25;
030- net rgb<1>
loc=p26;
031- net rgb<2>
loc=p24;
032- net rgb<3>
loc=p20;
033- net rgb<4>
loc=p23;
034- net rgb<5>
loc=p18;
Summary of Contents for XStend XS40
Page 17: ...16 Figure 5 Programmer s model of the XS40 XStend Board combination...
Page 18: ...17...
Page 20: ......
Page 31: ......
Page 33: ......
Page 41: ......
Page 58: ...Appendix A XStend Schematics...
Page 59: ...XStend V1 3 XS Board Connectors...
Page 60: ...XStend V1 3 RAM...
Page 61: ......
Page 62: ...XStend V1 3 Stereo Codec...
Page 63: ......