module controller_tp;  //控制器測試模塊
reg reset; 
reg clk1,clk2; 
wire [3:0] n;
wire OE;
parameter DELY=100;
controller mycontroller(clk1,clk2,n,OE);  //調用控制器模塊
always #(DELY/2) clk2=~clk2;  //使clk1為clk2的10倍
always #(5*DELY) clk1=~clk1;
initial
begin clk1=0;reset=1;clk2=0;
#DELY reset=0;
#DELY reset=1;   
#(DELY*50) $finish;
end
initial $monitor($time,,," clk1=%d clk2=%d n=%d OE=%d",clk1,clk2,n,OE);
endmodule