URL
https://opencores.org/ocsvn/eco32/eco32/trunk
Subversion Repositories eco32
[/] [eco32/] [trunk/] [fpga/] [mc/] [src/] [dsp/] [common/] [timing.v] - Rev 314
Go to most recent revision | Compare with Previous | Blame | View Log
// // timing.v -- timing generator // `timescale 1ns/10ps `default_nettype none module timing(clk, pixclk, txtrow, txtcol, chrrow, chrcol, blank, hsync, vsync, blink); input clk; output pixclk; output [4:0] txtrow; output [6:0] txtcol; output [3:0] chrrow; output [2:0] chrcol; output blank; output hsync; output vsync; output reg blink; reg pclk; reg [9:0] hcnt; reg hblank, hsynch; reg [9:0] vcnt; reg vblank, vsynch; reg [5:0] bcnt; always @(posedge clk) begin pclk <= ~pclk; end assign pixclk = pclk; always @(posedge clk) begin if (pclk == 1) begin if (hcnt == 10'd799) begin hcnt <= 10'd0; hblank <= 1; end else begin hcnt <= hcnt + 1; end if (hcnt == 10'd639) begin hblank <= 0; end if (hcnt == 10'd655) begin hsynch <= 0; end if (hcnt == 10'd751) begin hsynch <= 1; end end end always @(posedge clk) begin if (pclk == 1 && hcnt == 10'd799) begin if (vcnt == 10'd524) begin vcnt <= 10'd0; vblank <= 1; end else begin vcnt <= vcnt + 1; end if (vcnt == 10'd479) begin vblank <= 0; end if (vcnt == 10'd489) begin vsynch <= 0; end if (vcnt == 10'd491) begin vsynch <= 1; end end end always @(posedge clk) begin if (pclk == 1 && hcnt == 10'd799 && vcnt == 10'd524) begin if (bcnt == 6'd59) begin bcnt <= 6'd0; blink <= 1; end else begin bcnt <= bcnt + 1; end if (bcnt == 6'd29) begin blink <= 0; end end end assign blank = hblank & vblank; assign hsync = hsynch; assign vsync = vsynch; assign txtrow[4:0] = vcnt[8:4]; assign txtcol[6:0] = hcnt[9:3]; assign chrrow[3:0] = vcnt[3:0]; assign chrcol[2:0] = hcnt[2:0]; endmodule
Go to most recent revision | Compare with Previous | Blame | View Log