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

Subversion Repositories ata

[/] [ata/] [trunk/] [rtl/] [verilog/] [ocidec-1/] [ud_cnt.v] - Blame information for rev 33

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 22 rherveille
/////////////////////////////////////////////////////////////////////
2
////                                                             ////
3
////  Generic Up/Down counter                                    ////
4
////                                                             ////
5
////  Author: Richard Herveille                                  ////
6
////          richard@asics.ws                                   ////
7
////          www.asics.ws                                       ////
8
////                                                             ////
9
/////////////////////////////////////////////////////////////////////
10
////                                                             ////
11
//// Copyright (C) 2001, 2002 Richard Herveille                  ////
12
////                          richard@asics.ws                   ////
13
////                                                             ////
14
//// This source file may be used and distributed without        ////
15
//// restriction provided that this copyright statement is not   ////
16
//// removed from the file and that any derivative work contains ////
17
//// the original copyright notice and the associated disclaimer.////
18
////                                                             ////
19
////     THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY     ////
20
//// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED   ////
21
//// TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS   ////
22
//// FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL THE AUTHOR      ////
23
//// OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,         ////
24
//// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES    ////
25
//// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE   ////
26
//// GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR        ////
27
//// BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF  ////
28
//// LIABILITY, WHETHER IN  CONTRACT, STRICT LIABILITY, OR TORT  ////
29
//// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT  ////
30
//// OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE         ////
31
//// POSSIBILITY OF SUCH DAMAGE.                                 ////
32
////                                                             ////
33
/////////////////////////////////////////////////////////////////////
34
 
35
//  CVS Log
36 15 rherveille
//
37 22 rherveille
//  $Id: ud_cnt.v,v 1.2 2002-02-16 10:42:17 rherveille Exp $
38 15 rherveille
//
39 22 rherveille
//  $Date: 2002-02-16 10:42:17 $
40
//  $Revision: 1.2 $
41
//  $Author: rherveille $
42
//  $Locker:  $
43
//  $State: Exp $
44 15 rherveille
//
45 22 rherveille
// Change History:
46
//               $Log: not supported by cvs2svn $
47
//
48 15 rherveille
 
49
 
50
/////////////////////////////
51
// general purpose counter //
52
/////////////////////////////
53
 
54
`include "timescale.v"
55
 
56 22 rherveille
module ud_cnt (clk, nReset, rst, cnt_en, ud, nld, d, q, rci, rco);
57 15 rherveille
        // parameter declaration
58
        parameter SIZE  = 8;
59 22 rherveille
        parameter RESD  = {SIZE{1'b0}}; // data after reset
60
 
61 15 rherveille
        // inputs & outputs
62
        input             clk;    // master clock
63
        input             nReset; // asynchronous active low reset
64
        input             rst;    // synchronous active high reset
65
        input             cnt_en; // count enable
66
        input             ud;     // up/not down
67
        input             nld;    // synchronous active low load
68
        input  [SIZE-1:0] d;      // load counter value
69
        output [SIZE-1:0] q;      // current counter value
70
        input             rci;    // carry input
71
        output            rco;    // carry output
72
 
73
        // variable declarations
74
        reg  [SIZE-1:0] Qi;  // intermediate value
75
        wire [SIZE:0]   val; // carry+result
76
 
77
        //
78
        // Module body
79
        //
80
 
81
        assign val = ud ? ( {1'b0, Qi} + rci) : ( {1'b0, Qi} - rci);
82
 
83
        always@(posedge clk or negedge nReset)
84
        begin
85
                if (~nReset)
86 22 rherveille
                        Qi <= #1 RESD;
87 15 rherveille
                else if (rst)
88 22 rherveille
                        Qi <= #1 RESD;
89 15 rherveille
                else    if (~nld)
90
                        Qi <= #1 d;
91
                else if (cnt_en)
92
                        Qi <= #1 val[SIZE-1:0];
93
        end
94
 
95
        // assign outputs
96
        assign q = Qi;
97
        assign rco = val[SIZE];
98
endmodule
99 22 rherveille
 
100
 

powered by: WebSVN 2.1.0

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