Subversion Repositories socgen

initial
  begin

   TX_Data                <=  32'h00000000;
   START                  <=  1'b0;

   rx_data_exp            <=  32'h00000000;    




   
  end

   

task next;
  input [31:0] num;
  repeat (num)       @ (posedge clk);       
endtask


task send_packet;
  input [31:0] byte_out;
  input [31:0] byte_back;


begin
  $display("%t %m      %4h  --- %4h   ",$realtime ,byte_out,byte_back  );
  TX_Data  <= byte_out;
  rx_data_exp            <=  byte_back;    
next(3);
  START  <= 1'b1;
  next(30);


end
endtask // send_packet