OpenCores
URL https://opencores.org/ocsvn/socgen/socgen/trunk

Subversion Repositories socgen

[/] [socgen/] [trunk/] [common/] [opencores.org/] [Testbench/] [bfms/] [display_model/] [rtl/] [verilog/] [top.rtl] - Rev 135

Go to most recent revision | Compare with Previous | Blame | View Log







reg [3:0] decode;

always@(*)
if      (seg == 7'b1000000) decode = 4'b0000;
else if (seg == 7'b1111001) decode = 4'b0001;
else if (seg == 7'b0100100) decode = 4'b0010;
else if (seg == 7'b0110000) decode = 4'b0011;
else if (seg == 7'b0011001) decode = 4'b0100;
else if (seg == 7'b0010010) decode = 4'b0101;
else if (seg == 7'b0000010) decode = 4'b0110;
else if (seg == 7'b1111000) decode = 4'b0111;
else if (seg == 7'b0000000) decode = 4'b1000;
else if (seg == 7'b0011000) decode = 4'b1001;
else if (seg == 7'b0001000) decode = 4'b1010;
else if (seg == 7'b0000011) decode = 4'b1011;
else if (seg == 7'b1000110) decode = 4'b1100;
else if (seg == 7'b0100001) decode = 4'b1101;
else if (seg == 7'b0000110) decode = 4'b1110;
else                        decode = 4'b1111;






reg [3:0] segment0;
reg [3:0] segment1;
reg [3:0] segment2;
reg [3:0] segment3;



always@(posedge clk)
if(reset)             segment0 <= 4'h0;
else
if(!an[0])            segment0 <= decode;
else                  segment0 <= segment0;


always@(posedge clk)
if(reset)             segment1 <= 4'h0;
else
if(!an[1])            segment1 <= decode;
else                  segment1 <= segment1;


always@(posedge clk)
if(reset)             segment2 <= 4'h0;
else
if(!an[2])            segment2 <= decode;
else                  segment2 <= segment2;


always@(posedge clk)
if(reset)             segment3 <= 4'h0;
else
if(!an[3])            segment3 <= decode;
else                  segment3 <= segment3;







   

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.