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

Subversion Repositories pairing

[/] [pairing/] [trunk/] [rtl/] [fun.v] - Blame information for rev 8

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

Line No. Rev Author Line
1 2 homer.xing
// fun.v: Have you got fun reading the code ?
2
`include "inc.v"
3
 
4
// turn "00000001111111111111111" into "00000001000000000000000"
5 8 homer.xing
module func6(clk, reset, in, out);
6
    input clk, reset, in;
7 2 homer.xing
    output out;
8
    reg reg1, reg2;
9
    always @ (posedge clk)
10 8 homer.xing
        if (reset)
11
          begin
12
            reg1 <= 0; reg2 <= 0;
13
          end
14
        else
15
          begin
16
            reg2 <= reg1; reg1 <= in;
17
          end
18 2 homer.xing
    assign out = {reg2,reg1}==2'b01 ? 1 : 0;
19
endmodule
20
 

powered by: WebSVN 2.1.0

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