Subversion Repositories lpc

/////////////////////////////////////////////////////////////////////

////                                                             ////

////  LPC(Low Pin Count) GPIO(General Purpose Input Output)      ////

////                                                             ////

////                                                             ////

////  Author: Junbing Liang                                      ////

////          Junbing.Liang@googlemail.com                       ////

////                                                             ////

////                                                             ////

////  Downloaded from: http://www.opencores.org/                 ////

////                                                             ////

/////////////////////////////////////////////////////////////////////

////                                                             ////

//// Copyright (C) 2007 Junbing Liang                            ////

////                                                             ////

////                                                             ////

//// This source file may be used and distributed without        ////

//// restriction provided that this copyright statement is not   ////

//// removed from the file and that any derivative work contains ////

//// the original copyright notice and the associated disclaimer.////

////                                                             ////

////     THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY     ////

//// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED   ////

//// TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS   ////

//// FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL THE AUTHOR      ////

//// OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,         ////

//// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES    ////

//// (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE   ////

//// GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR        ////

//// BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF  ////

//// LIABILITY, WHETHER IN  CONTRACT, STRICT LIABILITY, OR TORT  ////

//// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT  ////

//// OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE         ////

//// POSSIBILITY OF SUCH DAMAGE.                                 ////

////                                                             ////

/////////////////////////////////////////////////////////////////////

module  lpc_gpio_top;

reg    [3:0]   LAD;

reg            LFRAME;

reg            LRESET;

reg            LCLK;

wire   [7:0]   gpio_out;

wire    [3:0]   LAD_w;

//LCLK

initial

begin

       LCLK=1;

end

//LRESET

initial

begin

//write date to gpio    

       LRESET = 0;

#50   LRESET = 1;

#10    LFRAME = 0;

       LAD = 4'b0000;   //1-start

#10    LFRAME = 1;

       LAD = 4'b0010;   //2- CT-DIR, 0010- IO WRITE

#10    LFRAME = 1;

       LAD = 4'b0000;   //3- address A15-A12

#10    LFRAME = 1;

       LAD = 4'b0100;   //4- A11-A8

#10    LFRAME = 1;

       LAD = 4'b0010;   //5- A7-A4

#10    LFRAME = 1;

       LAD = 4'b0001;   //6- A3-A0

#10    LFRAME = 1;

       LAD = 4'b0101;   //7- D3-D0

#10    LFRAME = 1;

       LAD = 4'b1010;   //8- D7-D4

#10    LFRAME = 1;

       LAD = 4'b1111;   //9- TAR

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //10- TAR       

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //11- SYNC

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //12- TAR

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //13- TAR

#50   LFRAME = 1;

       LAD = 4'bzzzz;   //13- TAR

#20    LFRAME = 0;

       LAD = 4'b0000;   //start

#10    LFRAME = 1;

       LAD = 4'b0010;   //CT-DIR, 0010- IO WRITE

#10    LFRAME = 1;

       LAD = 4'b0000;   //address A15-A12

#10    LFRAME = 1;

       LAD = 4'b0100;   //A11-A8

#10    LFRAME = 1;

       LAD = 4'b0010;   //A7-A4

#10    LFRAME = 1;

       LAD = 4'b0101;   //A3-A0

#10    LFRAME = 1;

       LAD = 4'b1011;   //D3-D0

#10    LFRAME = 1;

       LAD = 4'b0010;   //D7-D4

#10    LFRAME = 1;

       LAD = 4'b1111;   //TAR

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //TAR

#50    LFRAME = 1;

       LAD = 4'bzzzz;   //SYNC

//read data from LPC GPIO       

       LRESET = 0;

#50   LRESET = 1;

#10    LFRAME = 0;

       LAD = 4'b0000;   //1-start

#10    LFRAME = 1;

       LAD = 4'b0000;   //2- CT-DIR, 0000- IO READ

#10    LFRAME = 1;

       LAD = 4'b0000;   //3- address A15-A12

#10    LFRAME = 1;

       LAD = 4'b0100;   //4- A11-A8

#10    LFRAME = 1;

       LAD = 4'b0010;   //5- A7-A4

#10    LFRAME = 1;

       LAD = 4'b0001;   //6- A3-A0

#10    LFRAME = 1;

       LAD = 4'b1111;   //7- TAR

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //8- TAR       

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //9- SYNC

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //10 D3-D0

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //11 D7-D4       

#10    LFRAME = 1;

       LAD = 4'bzzzz;   //12- TAR

#100   LFRAME = 1;

       LAD = 4'bzzzz;   //13- TAR       

end

//LFRAME, LAD

initial

begin

    LFRAME = 0;

    LAD = 0;

end

//LCLK

always

begin

        #5 LCLK = !LCLK;

end

//hookup the gpip module

lpc_gpio gpio1(

   .LAD(LAD_w),

   .LFRAME(LFRAME),

   .LRESET(LRESET),

   .LCLK(LCLK),

   .gpio_addr_i(16'h0421),

   .gpio_i(8'ha5),

   .gpio_o(gpio_out)

   );

assign LAD_w = LAD;

endmodule