muxewave.ant

基于FPGA的波束成型

////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 1995-2003 Xilinx, Inc.
// All Right Reserved.
////////////////////////////////////////////////////////////////////////////////
//   ____  ____ 
//  /   /\/   / 
// /___/  \  /    Vendor: Xilinx 
// \   \   \/     Version : 7.1.03i
//  \   \         Application : ISE Foundation
//  /   /         Filename : muxewave.ant
// /___/   /\     Timestamp : Sat Jun 02 16:14:05 2007
// \   \  /  \ 
//  \___\/\___\ 
//
//Command: 
//Design Name: muxewave
//Device: Xilinx
//
`timescale 1ns/1ps

module muxewave;
    reg [15:0] mux2 = 16'b0000000000000000;
    reg [15:0] a0r = 16'b0000000000000000;
    reg [15:0] a0i = 16'b0000000000000000;
    reg [15:0] a1r = 16'b0000000000000000;
    reg [15:0] a1i = 16'b0000000000000000;
    reg [15:0] a2r = 16'b0000000000000000;
    reg [15:0] a2i = 16'b0000000000000000;
    reg [15:0] a3r = 16'b0000000000000000;
    reg [15:0] a3i = 16'b0000000000000000;
    reg [15:0] a4r = 16'b0000000000000000;
    reg [15:0] a4i = 16'b0000000000000000;
    reg [15:0] a5r = 16'b0000000000000000;
    reg [15:0] a5i = 16'b0000000000000000;
    reg [15:0] a6r = 16'b0000000000000000;
    reg [15:0] a6i = 16'b0000000000000000;
    reg [15:0] a7r = 16'b0000000000000000;
    reg [15:0] a7i = 16'b0000000000000000;
    wire [15:0] q0r;
    wire [15:0] q0i;
    wire [15:0] q1r;
    wire [15:0] q1i;
    wire [15:0] q2r;
    wire [15:0] q2i;
    wire [15:0] q3r;
    wire [15:0] q3i;
    wire [15:0] q4r;
    wire [15:0] q4i;
    wire [15:0] q5r;
    wire [15:0] q5i;
    wire [15:0] q6r;
    wire [15:0] q6i;
    wire [15:0] q7r;
    wire [15:0] q7i;
    reg clk = 1'b0;
    reg start = 1'b0;
    wire rdy;

    parameter PERIOD = 200;
    parameter real DUTY_CYCLE = 0.5;
    parameter OFFSET = 0;

    initial    // Clock process for clk
    begin
        #OFFSET;
        forever
        begin
            clk = 1'b0;
            #(PERIOD-(PERIOD*DUTY_CYCLE)) clk = 1'b1;
            #(PERIOD*DUTY_CYCLE);
        end
    end

    muxe UUT (
        .mux2(mux2),
        .a0r(a0r),
        .a0i(a0i),
        .a1r(a1r),
        .a1i(a1i),
        .a2r(a2r),
        .a2i(a2i),
        .a3r(a3r),
        .a3i(a3i),
        .a4r(a4r),
        .a4i(a4i),
        .a5r(a5r),
        .a5i(a5i),
        .a6r(a6r),
        .a6i(a6i),
        .a7r(a7r),
        .a7i(a7i),
        .q0r(q0r),
        .q0i(q0i),
        .q1r(q1r),
        .q1i(q1i),
        .q2r(q2r),
        .q2i(q2i),
        .q3r(q3r),
        .q3i(q3i),
        .q4r(q4r),
        .q4i(q4i),
        .q5r(q5r),
        .q5i(q5i),
        .q6r(q6r),
        .q6i(q6i),
        .q7r(q7r),
        .q7i(q7i),
        .clk(clk),
        .start(start),
        .rdy(rdy));

    integer TX_FILE = 0;
    integer TX_ERROR = 0;
    
    initial begin    // Annotation process for clock clk
        #0;
        ANNOTATE_q0r;
        ANNOTATE_q0i;
        ANNOTATE_q1r;
        ANNOTATE_q1i;
        ANNOTATE_q2r;
        ANNOTATE_q2i;
        ANNOTATE_q3r;
        ANNOTATE_q3i;
        ANNOTATE_q4r;
        ANNOTATE_q4i;
        ANNOTATE_q5r;
        ANNOTATE_q5i;
        ANNOTATE_q6r;
        ANNOTATE_q6i;
        ANNOTATE_q7r;
        ANNOTATE_q7i;
        ANNOTATE_rdy;
        #OFFSET;
        forever begin
            #115;
            ANNOTATE_q0r;
            ANNOTATE_q0i;
            ANNOTATE_q1r;
            ANNOTATE_q1i;
            ANNOTATE_q2r;
            ANNOTATE_q2i;
            ANNOTATE_q3r;
            ANNOTATE_q3i;
            ANNOTATE_q4r;
            ANNOTATE_q4i;
            ANNOTATE_q5r;
            ANNOTATE_q5i;
            ANNOTATE_q6r;
            ANNOTATE_q6i;
            ANNOTATE_q7r;
            ANNOTATE_q7i;
            ANNOTATE_rdy;
            #85;
        end
    end

    initial begin  // Open the annotations file...
        TX_FILE = $fopen("F:\\myfpga\\xilinx\\wopt\\muxewave.ano");
        #10200 // Final time:  10200 ns
        $display("Success! Annotation Simulation Complete.");
        $fdisplay(TX_FILE, "Total[%d]", TX_ERROR);
        $fclose(TX_FILE);
        $finish;
    end

    initial begin
        // -------------  Current Time:  85ns
        #85;
        mux2 = 16'b0000000000000010;
        a1i = 16'b0000000011001000;
        a4i = 16'b0000001001100011;
        // -------------------------------------
        // -------------  Current Time:  285ns
        #200;
        a0r = 16'b0001001110001000;
        a0i = 16'b0000011111010000;
        a1r = 16'b0000001001011000;
        a2r = 16'b0001101101011000;
        a2i = 16'b0000001100100000;
        a3r = 16'b0000000000101101;
        a3i = 16'b0001100101100100;
        a5r = 16'b0001101101011000;
        a5i = 16'b0001001110001000;
        a6r = 16'b0000001111011001;
        a6i = 16'b0001011101110000;
        a7r = 16'b0000110111101100;
        a7i = 16'b0000001011001000;
        // -------------------------------------
        // -------------  Current Time:  485ns
        #200;
        a4r = 16'b0000000001000001;
        // -------------------------------------
        // -------------  Current Time:  685ns
        #200;
        start = 1'b1;
        // -------------------------------------
    end

    task ANNOTATE_q0r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q0r,%b]", $time, q0r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q0i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q0i,%b]", $time, q0i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q1r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q1r,%b]", $time, q1r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q1i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q1i,%b]", $time, q1i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q2r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q2r,%b]", $time, q2r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q2i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q2i,%b]", $time, q2i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q3r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q3r,%b]", $time, q3r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q3i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q3i,%b]", $time, q3i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q4r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q4r,%b]", $time, q4r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q4i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q4i,%b]", $time, q4i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q5r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q5r,%b]", $time, q5r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q5i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q5i,%b]", $time, q5i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q6r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q6r,%b]", $time, q6r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q6i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q6i,%b]", $time, q6i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q7r;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q7r,%b]", $time, q7r);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_q7i;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,q7i,%b]", $time, q7i);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

    task ANNOTATE_rdy;
        #0 begin
            $fdisplay(TX_FILE, "Annotate[%d,rdy,%b]", $time, rdy);
            $fflush(TX_FILE);
            TX_ERROR = TX_ERROR + 1;
        end
    endtask

endmodule