cmd.v

一组两个电梯的控制器

module cmdteam(reset,outCmd,replyUp,replyDown,cmdUp,cmdDown);
input reset;
input[7:0] replyUp;
input[3:0] outCmd;
input[7:0] replyDown;
output[7:0] cmdUp;
output[7:0] cmdDown;
reg[7:0]  cmdUp;
reg[7:0]  cmdDown;
reg[3:0]  temp; 
always @(reset or replyUp or replyDown or outCmd)
begin
	if(!reset)
	begin
		cmdUp=0;
		cmdDown=0;
		temp=outCmd;
	end
	else
	begin
	    if(replyUp || replyDown)
	    begin
	        case (replyUp)
	            'b00000001:
	            cmdUp[0]=0;
	            'b00000010:
	            cmdUp[1]=0;
	            'b00000100:
	            cmdUp[2]=0;
	            'b00001000:
	            cmdUp[3]=0;
	            'b00010000:
	            cmdUp[4]=0;
	            'b00100000:
	            cmdUp[5]=0;
	            'b01000000:
	            cmdUp[6]=0;
	            'b10000000:
	            cmdUp[7]=0;
	        endcase
	        case (replyDown)
	            'b00000001:
	            cmdDown[0]=0;
	            'b00000010:
	            cmdDown[1]=0;
	            'b00000100:
	            cmdDown[2]=0;
	            'b00001000:
	            cmdDown[3]=0;
	            'b00010000:
	            cmdDown[4]=0;
	            'b00100000:
	            cmdDown[5]=0;
	            'b01000000:
	            cmdDown[6]=0;
	            'b10000000:
	            cmdDown[7]=0;
	        endcase
	    end
	    else if(outCmd!=temp && outCmd!='b1111 && outCmd!='b0000)
	    begin
	        	temp=outCmd;
	        if(outCmd[3]==1)
              cmdUp[outCmd[2:0]]='b1;
           else
              cmdDown[outCmd[2:0]]='b1;
	    end
	end
end
endmodule