Subversion Repositories socgen

initial

 begin

 $display("              ");

 $display("          ===================================================");

 $display("%t  Test Start",$realtime);

 $display("          ===================================================");

 $display("              ");

 test.R_PosD           = 16'h0000;

 test.R_PosL           = 8'b00000000;

 test.R_sw_pad_in      = 8'b00000000;

 test.R_btn_pad_in     = 4'b0000;

 test.cg.next(8);

 test.cg.next(88);

 $display("%t   Start xmit test ",$realtime  );

fork

begin

 test.cg.next(1000);

 test.R_PosL           = 8'b10101010;

 test.R_sw_pad_in      = 8'b10101010;

 test.R_btn_pad_in     = 4'b1010;

 test.cg.next(1000);

 test.R_PosL           = 8'b11111111;

 test.R_sw_pad_in      = 8'b11111111;

 test.R_btn_pad_in     = 4'b1111;

end

begin

 test.cg.next(1000);

 test.R_PosD           = 16'h1234;

 test.cg.next(1000);

 test.R_PosD           = 16'h5678;

 test.cg.next(1000);

 test.R_PosD           = 16'h9abc;

 test.cg.next(1000);

 test.R_PosD           = 16'hdef0;

end

join

 test.cg.next(1000);

 $display("%t   Stop  xmit test ",$realtime  );

 test.cg.exit;

end