summaryrefslogtreecommitdiffstats
path: root/hexled.v
blob: 1c25a597a39ac8919eabc948fb7132e210ed46e8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
module hexled (
	       value,
	       s7
	       );

   input [3:0]   value;
   output [6:0]  s7;
   reg [6:0] 	 s7;

   always @( value )
     begin
	case ( value )
	  4'h0: s7 = ~7'b0111111;
	  4'h1: s7 = ~7'b0000110;
	  4'h2: s7 = ~7'b1011011;
	  4'h3: s7 = ~7'b1001111;
	  4'h4: s7 = ~7'b1100110;
	  4'h5: s7 = ~7'b1101101;
	  4'h6: s7 = ~7'b1111101;
	  4'h7: s7 = ~7'b0000111;
	  4'h8: s7 = ~7'b1111111;
	  4'h9: s7 = ~7'b1101111;
	  4'hA: s7 = ~7'b1110111;
	  4'hB: s7 = ~7'b1111100;
	  4'hC: s7 = ~7'b0111001;
	  4'hD: s7 = ~7'b1011110;
	  4'hE: s7 = ~7'b1111001;
	  4'hF: s7 = ~7'b1110001;
	endcase
     end
endmodule // hexled

module hexledx (
	       value,
	       blank,
	       minus,
	       s7
	       );

   input [3:0]   value;
   input 	 blank;
   input 	 minus;
   output [6:0]  s7;
   reg [6:0] 	 s7;

   always @( value or blank or minus )
     begin
	if ( blank )
	  s7 = ~7'b0000000;
	else if ( minus )
	  s7 = ~7'b1000000;
	else case ( value )
	       4'h0: s7 = ~7'b0111111;
	       4'h1: s7 = ~7'b0000110;
	       4'h2: s7 = ~7'b1011011;
	       4'h3: s7 = ~7'b1001111;
	       4'h4: s7 = ~7'b1100110;
	       4'h5: s7 = ~7'b1101101;
	       4'h6: s7 = ~7'b1111101;
	       4'h7: s7 = ~7'b0000111;
	       4'h8: s7 = ~7'b1111111;
	       4'h9: s7 = ~7'b1101111;
	       4'hA: s7 = ~7'b1110111;
	       4'hB: s7 = ~7'b1111100;
	       4'hC: s7 = ~7'b0111001;
	       4'hD: s7 = ~7'b1011110;
	       4'hE: s7 = ~7'b1111001;
	       4'hF: s7 = ~7'b1110001;
	     endcase
     end
endmodule // hexledx