EEPW论坛

* ---------------------------------------------------------------
clk(0,1,2)输入的时钟信号
gate(0,1,2)输入的门控信号
out（0,1,2）输出信号
data 数据总线
rd 输入读信号
wr 输入写操作
a0,a1 端口选择信号
cs 片选信号
control（0,1,2）控制字
控制口编程状态机：
state=00-----未编程或完毕
01-----已写控制字（等待输入数据）
10-----已写1字节数据（等待输入下一数据）
启动计数标志:
start(0,1,2)_Y=0, 不启动
1, 启动（当编程完毕）
装入数值开始计数标志
count(0,1,2)_Y=0-----未启动（未装入计数初值寄存器内容）或结束
1-----已装入，作减1计数
count (0,1,2) 输出的计数器数值
count(0,1,2)_b 输入的新的计数的初值
count(0,1,2)_b1 输入的计数的初值
g（0,1,2）_Y 门控信号的计数标志
b（0，1,2） 读操作时控制高低位
function 计数方式函数，BCD码计数和二进制计数
------------------------------------------------------------------------ */






module timer(//input
clk0,clk1,clk2,data,gate0,gate1,gate2,a0,a1,wr,rd,cs,out0,out1,out2,
//output
count0,count1,count2,count0_Y,count1_Y,count2_Y,control0,control1,control2,
start0_Y,start1_Y,start2_Y,count0_b,count1_b,count2_b,state);
input clk0,clk1,clk2,gate0,gate1,gate2,a0,a1,wr,rd,cs;
inout [7:0] data;
output out0,out1,out2,start0_Y,start1_Y,start2_Y,count0_Y,count1_Y,count2_Y;
output [15:0] count0,count1,count2,count0_b,count1_b,count2_b;
output [1:0] state;
output [7:0] control0,control1,control2;


reg [7:0] control0,control1,control2;
reg [15:0] count0_b,count1_b,count2_b,count0_b1,count1_b1,count2_b1,count0,count1,count2,count_rd;
reg [1:0] state;
reg start0_Y,start1_Y,start2_Y,out0,out1,out2,count0_Y,count1_Y,count2_Y,g0,g1,g2,g0_Y,g1_Y,g2_Y;
wire clock0,clock1,clock2,b0,b1,b2;


function [15:0] countnew;
input [15:0] cnt;

reg [3:0] temp1,temp2,temp3,temp4;

begin
{temp4,temp3,temp2,temp1} = cnt;
temp1 = temp1-1;
if(temp1 == 4'b1111) begin
temp1 = 4'b1001;
temp2 = temp2-1;
if(temp2 == 4'b1111) begin
temp2 = 4'b1001;
temp3 = temp3-1;
if(temp3 == 4'b1111) begin
temp3 = 4'b1001;
temp4 = temp4-1;
if(temp4 == 4'b1111) begin
temp3 = 4'b1001;
end
end
end
end
countnew = {temp4,temp3,temp2,temp1};
end

endfunction




always@(negedge rd)
begin
if(!a0 && !a1)count_rd<=count0;
else if(a0 && !a1)count_rd<=count1;
else if(!a0 && a1)count_rd<=count2;
end


always @(posedge wr)
if(cs==0)
begin
case(state)
2'b00:
if (cs==0 && a0==1 && a1==1 && data[7:6]==2'b00)
begin control0<=data;start0_Y<=0;state<=2'b01; end
else if (cs==0 && a0==1 && a1==1 && data[7:6]==2'b01)
begin control1<=data;start1_Y<=0;state<=2'b01; end
else if (cs==0 && a0==1 && a1==1 && data[7:6]==2'b10)
begin control2<=data;start2_Y<=0;state<=2'b01; end

2'b01:
if(control0[5:4]==2'b11 && a0==0 && a1==0)
begin state<=2'b10;count0_b[7:0]<=data; end
else if(control0[5:4]==2'b01 && a0==0 && a1==0)
begin state<=2'b01;start0_Y<=1;count0_b[7:0]<=data;count0_b[15:8]<=0;
end
else if(control0[5:4]==2'b10 && a0==0 && a1==0)
begin state<=2'b01;start0_Y<=1;count0_b[7:0]<=0;count0_b[15:8]<=data;
end
else if(control1[5:4]==2'b11 && a0==1 && a1==0)
begin state<=2'b10;count1_b[7:0]<=data; end
else if(control1[5:4]==2'b01 && a0==1 && a1==0)
begin state<=2'b01;start1_Y<=1;count1_b[7:0]<=data;count1_b[15:8]<=0;
end
else if(control1[5:4]==2'b10 && a0==1 && a1==0)
begin state<=2'b01;start1_Y<=1;count1_b[7:0]<=0;count1_b[15:8]<=data;
end
else if(control2[5:4]==2'b11 && a0==0 && a1==1)
begin state<=2'b10;count2_b[7:0]<=data; end
else if(control2[5:4]==2'b01 && a0==0 && a1==1)
begin state<=2'b01;start2_Y<=1;count2_b[7:0]<=data;count2_b[15:8]<=0;
end
else if(control2[5:4]==2'b10 && a0==0 && a1==1)
begin state<=2'b01;start2_Y<=1;count2_b[7:0]<=0;count2_b[15:8]<=data;
end
else state<=2'b00;

2'b10:
if(control0[5:4]==2'b11 && a0==0 && a1==0)
begin state<=2'b01;start0_Y<=1;count0_b[15:8]<=data; end
else if(control1[5:4]==2'b11 && a0==1 && a1==0)
begin state<=2'b01;start1_Y<=1;count1_b[15:8]<=data; end
else if(control2[5:4]==2'b11 && a0==0 && a1==1)
begin state<=2'b01;start2_Y<=1;count2_b[15:8]<=data; end
else state<=2'b00;
endcase
end


//端口0
assign b0=(!rd && !cs && !a0 && !a1 && clock0)?1'b1:1'b0;


assign data=(!rd && !cs && !a0 && !a1 && clock0 && b0)?count_rd[7:0]:8'bzzzzzzzz;

assign data=(!rd && !cs && !a0 && !a1 && !clock0 && !b0)?count_rd[15:8]:8'bzzzzzzzz;

assign clock0=!clk0 && start0_Y;


always@(posedge gate0 )
if(gate0)g0<=1;
else g0<=0;



always@(negedge start0_Y or negedge clock0)
if(start0_Y==0)
begin count0_b1<=0;
count0_Y<=0;
if(control0[3:1]==3'b000)out0<=0;
else out0<=1;
end
else
begin
case(control0[3:0])
4'b0000:
if(gate0 && start0_Y==1)
begin
if(count0_b1!=count0_b)
count0_b1<=count0_b;count0<=count0_b;out0<=0;count0_Y<=1;
end
else
if(count0==0)
begin count0<=0;out0<=1;count0_Y<=0; end
else if (count0==1)
begin count0<=count0-1;out0<=1;
end
else begin count0<=count0-1;out0<=0; end
4'b0001:
if(gate0 && start0_Y==1)
if(count0_b1!=count0_b)
begin
count0_b1<=count0_b;count0<=count0_b;out0<=0;count0_Y<=1;
end
else
if(count0==0)
begin count0<=0;out0<=1;count0_Y<=0; end
else if (count0==1)
begin count0<=countnew(count0);out0<=1;
end
else begin count0<=countnew(count0);out0<=0; end

4'b0010:
if(start0_Y==1)
begin
if(g0)
g0_Y<=1;
if(g0_Y==1)
begin
count0<=count0_b;
out0<=0;
g0_Y<=0;
count0_Y<=1;
end
else if(count0==0)
begin
count0<=0;
out0<=1;
count0_Y<=0;
end
else if(count0==1)
begin
count0<=count0-1;
out0<=1;
end
else begin count0<=count0-1;out0<=0; end
end
4'b0011:
if(start0_Y==1)
begin
if(g0)
g0_Y<=1;
if(g0_Y==1)
begin
count0<=count0_b;
out0<=0;
g0_Y<=0;
count0_Y<=1;
end
else if(count0==0)
begin
count0<=0;
out0<=1;
count0_Y<=0;
end
else if(count0==1)
begin
count0<=countnew(count0);
out0<=1;
end
else begin count0<=countnew(count0);out0<=0; end
end


4'b1010:
if(start0_Y==1)
begin
if(g0)
g0_Y<=1;
if(g0_Y==1)
begin
count0<=count0_b;
out0<=1;
g0_Y<=0;
count0_Y<=1;
end
else if(count0==0)
begin
count0<=0;
out0<=1;
count0_Y<=0;
end
else if(count0==1)
begin
out0<=0;
count0<=count0-1;
end
else begin count0<=count0-1;out0<=1; end
end
4'b1011:
if(start0_Y==1)
begin
if(g0)
g0_Y<=1;
if(g0_Y==1)
begin
count0<=count0_b;
out0<=1;
g0_Y<=0;
count0_Y<=1;
end
else if(count0==0)
begin
count0<=0;
out0<=1;
count0_Y<=0;
end
else if(count0==1)
begin
out0<=0;
count0<=countnew(count0);
end
else begin count0<=countnew(count0);out0<=1; end
end
default: count0_Y<=0;
endcase
end