Subversion Repositories turbo8051

task uart_test1;

reg [1:0] data_bit        = 2'b11;

reg       stop_bits       = 0; // 0: 1 stop bit; 1: 2 stop bit;

reg       stick_parity    = 0; // 1: force even parity

reg       parity_en       = 1; // parity enable

reg       even_odd_parity = 1; // 0: odd parity; 1: even parity

reg [7:0] data;

reg [15:0] divisor        = 3;   // divided by n * 16

reg [15:0] timeout        = 500;// wait time limit

reg [15:0] rx_nu;

reg [15:0] tx_nu;

reg [7:0] write_data [0:39];

reg     fifo_enable       = 0;   // fifo mode disable

integer i,j;

tb_uart.uart_init;

tb_top.cpu_write('h3,8'h0,{27'h0,2'b10,1'b1,1'b1,1'b1});

for (i=0; i<40; i=i+1)

        write_data[i] = $random;

  tb_top.tb_uart.control_setup (data_bit, stop_bits, parity_en, even_odd_parity, stick_parity, timeout, divisor, fifo_enable);

   fork

   begin

      for (i=0; i<40; i=i+1)

      begin

        $display ("\n... Writing char %d ...", write_data[i]);

         tb_top.tb_uart.write_char (write_data[i]);

      end

   end

   begin

      for (j=0; j<40; j=j+1)

      begin

        tb_top.tb_uart.read_char_chk(write_data[j]);

      end

   end

   join

   #100

   tb_top.tb_uart.report_status(rx_nu, tx_nu);

endtask