]> Joshua Wise's Git repositories - vterm.git/blame_incremental - VTerm.v
working VGA out
[vterm.git] / VTerm.v
... / ...
CommitLineData
1module MulDivDCM(input xtal, output clk);
2 parameter div = 5;
3 parameter mul = 2;
4
5 wire CLKFX_BUF;
6 wire GND_BIT = 0;
7 BUFG CLKFX_BUFG_INST (.I(CLKFX_BUF),
8 .O(clk));
9 DCM_SP DCM_SP_INST (.CLKFB(GND_BIT),
10 .CLKIN(xtal),
11 .DSSEN(GND_BIT),
12 .PSCLK(GND_BIT),
13 .PSEN(GND_BIT),
14 .PSINCDEC(GND_BIT),
15 .RST(GND_BIT),
16 .CLKFX(CLKFX_BUF));
17 defparam DCM_SP_INST.CLK_FEEDBACK = "NONE";
18 defparam DCM_SP_INST.CLKDV_DIVIDE = 2.0;
19 defparam DCM_SP_INST.CLKFX_DIVIDE = div;
20 defparam DCM_SP_INST.CLKFX_MULTIPLY = mul;
21 defparam DCM_SP_INST.CLKIN_DIVIDE_BY_2 = "FALSE";
22 defparam DCM_SP_INST.CLKIN_PERIOD = 20.000;
23 defparam DCM_SP_INST.CLKOUT_PHASE_SHIFT = "NONE";
24 defparam DCM_SP_INST.DESKEW_ADJUST = "SYSTEM_SYNCHRONOUS";
25 defparam DCM_SP_INST.DFS_FREQUENCY_MODE = "LOW";
26 defparam DCM_SP_INST.DLL_FREQUENCY_MODE = "LOW";
27 defparam DCM_SP_INST.DUTY_CYCLE_CORRECTION = "TRUE";
28 defparam DCM_SP_INST.FACTORY_JF = 16'hC080;
29 defparam DCM_SP_INST.PHASE_SHIFT = 0;
30 defparam DCM_SP_INST.STARTUP_WAIT = "TRUE";
31endmodule
32
33module VTerm(
34 input xtal,
35 output wire vs, hs,
36 output reg [2:0] red,
37 output reg [2:0] green,
38 output reg [1:0] blue
39 );
40
41 wire clk25;
42
43 wire [11:0] x, y;
44 wire border;
45
46 MulDivDCM dcm25(xtal, clk25);
47 defparam dcm25.div = 4;
48 defparam dcm25.mul = 2;
49
50 SyncGen sync(clk25, vs, hs, x, y, border);
51
52 always @(posedge clk25) begin
53 red <= border ? 0 : 3'b100;
54 green <= border ? 0 : 0;
55 blue <= border ? 0 : 0;
56 end
57endmodule
58
59module SyncGen(
60 input pixclk,
61 output reg vs, hs,
62 output reg [11:0] x, y,
63 output reg border);
64
65 parameter XRES = 640;
66 parameter XFPORCH = 16;
67 parameter XSYNC = 96;
68 parameter XBPORCH = 48;
69
70 parameter YRES = 480;
71 parameter YFPORCH = 10;
72 parameter YSYNC = 2;
73 parameter YBPORCH = 29;
74
75 always @(posedge pixclk)
76 begin
77 if (x >= (XRES + XFPORCH + XSYNC + XBPORCH))
78 begin
79 if (y >= (YRES + YFPORCH + YSYNC + YBPORCH))
80 y = 0;
81 else
82 y = y + 1;
83 x = 0;
84 end else
85 x = x + 1;
86 hs <= (x >= (XRES + XFPORCH)) && (x < (XRES + XFPORCH + XSYNC));
87 vs <= (y >= (YRES + YFPORCH)) && (y < (YRES + YFPORCH + YSYNC));
88 border <= (x > XRES) || (y > YRES);
89 end
90endmodule
This page took 0.026991 seconds and 4 git commands to generate.