alu181.v

设计带进位算术逻辑运算单元

module alu181(A,B,F,S,CN,CO,M);
	input[7:0]		A,B;
	input[3:0]		S;
	input			M,CN;
	output 			CO;
	output[7:0]		F;
	reg[7:0]		F;

always @(S)
begin
	case(S)
		'b0000:
			begin
				if(M) F=!A;
				else
					begin
						if(CN)F=A+1;
						else F=A;
					end 
			end
		'b0001:
			begin
				if(M) F=!(A||B);
				else
					begin
						if(CN)F=(A||B)+1;
						else F=A||B;
					end 
			end
		'b0010:
			begin
				if(M) F=A&&B;
				else
					begin
						if(CN)F=A||B||1;
						else F=A||B;
					end 
			end
		'b0011:
			begin
				if(M) F=0;
				else
					begin
						if(CN)F=0;
						else F=F-1;
					end 
			end
		'b0100:
			begin
				if(M) F=!(A&&B);
				else
					begin
						if(CN)F=A+A&&(!B)+1;
						else F=A+A&&(!B);
					end 
			end
		'b0101:
			begin
				if(M) F=!B;
				else
					begin
						if(CN)F=((A||B)+A&&(!B))||1;
						else F=(A||B)+A&&(!B);
					end 
			end
		'b0110:
			begin
				if(M) F=A^B;
				else
					begin
						if(CN)F=A-B-1;
						else F=A-B;
					end 
			end
		'b0111:
			begin
				if(M) F=A&&(!B);
				else
					begin
						if(CN)F=A||(~B)-1;
						else F=A||(~B);
					end 
			end
		'b1000:
			begin
				if(M) F=(~A)||B;
				else
					begin
						if(CN)F=A+(A&&B)+1;
						else F=A+(A&&B);
					end 
			end
		'b1001:
			begin
				if(M) F=!(A^B);
				else
					begin
						if(CN)F=A+B+1;
						else F=A+B;
					end 
			end
		'b1010:
			begin
				if(M) F=B;
				else
					begin
						if(CN)F=A||(~B)+(A&&B)+1;
						else F=A||(~B)+(A&&B);
					end 
			end
		'b1011:
			begin
				if(M) F=A&&B;
				else
					begin
						if(CN)F=A&&B-1;
						else F=A&&B;
					end 
			end
		'b1100:
			begin
				if(M) F=1;
				else
					begin
						if(CN)F=A+A+1;
						else F=A+A*2;
					end 
			end
		'b1101:
			begin
				if(M) F=A||(!B);
				else
					begin
						if(CN)F=(A||B)+A+1;
						else F=(A||B)+A;
					end 
			end
		'b1110:
			begin
				if(M) F=A||B;
				else
					begin
						if(CN)F=(A||(!B))+A+1;
						else F=(A||(!B))+A;
					end 
			end
		'b1111:
			begin
				if(M) F=A;
				else
					begin
						if(CN)F=A-1;
						else F=A;
					end 
			end
			
			

	endcase
end
endmodule