URL
https://opencores.org/ocsvn/csa/csa/trunk
Subversion Repositories csa
Compare Revisions
- This comparison shows the changes necessary to convert path
/csa/trunk/quartus10
- from Rev 33 to Rev 38
- ↔ Reverse comparison
Rev 33 → Rev 38
/csa_fpga.v
54,10 → 54,10
assign slcs =1'h0; |
assign pktend=1'h1; |
|
`define EP2_W 2'h0 |
`define EP6_R 2'h1 |
`define EP8_R 2'h2 |
`define NO_ACT 2'h3 |
`define EP2_W 2'h3 |
`define EP6_R 2'h2 |
`define EP8_R 2'h1 |
`define NO_ACT 2'h0 |
|
reg [ 1:0] last_action; |
reg [15:0] usb_dat_out; |
90,7 → 90,6
slwr<=1'h0; |
slrd<=1'h1; |
last_action<=`EP2_W; |
|
end |
else |
begin |
101,6 → 100,7
last_action<=`NO_ACT; |
end |
|
|
always @(posedge usbclk) |
if(last_action==`EP8_R ) |
usb_dat_in<=fd; |
/hex2seg.v
4,6 → 4,7
, output reg [7:0] seg |
); |
|
|
always @(hex) |
case (hex) // hgfedcba |
4'h0:seg<=~8'b00111111; |
/ledseg_cnt.v
12,23 → 12,23
, output [ 7:0] segd // led segment output |
); |
|
`define CNT_W 11 // count reg width |
|
`define CNT_W 15 // count reg width |
|
// interival variable |
reg [`CNT_W-1:0] cnt; |
|
always @(posedge clk) |
cnt<=cnt+11'h001; // up reg |
cnt<=cnt+`CNT_W'h1; // up reg |
|
reg h; |
reg [3:0] h; |
always @(cnt or data) |
begin |
case (cnt[`CNT_W-1:`CNT_W-2]) |
2'b00:h = data[15:12]; |
2'b01:h = data[11: 8]; |
2'b10:h = data[7 : 4]; |
2'b11:h = data[3 : 0]; |
default:h = 4'hf; |
2'b00:h <= data[15:12]; |
2'b01:h <= data[11: 8]; |
2'b10:h <= data[ 7: 4]; |
2'b11:h <= data[ 3: 0]; |
endcase |
end |
|
39,7 → 39,6
2'b01:seg = 4'b1101; |
2'b10:seg = 4'b1011; |
2'b11:seg = 4'b0111; |
default:seg = 4'hf; |
endcase |
end |
|