cpld.txt

利用拨码开关为可编程器件输入读写命令和相应的地址、数据

module try(data,seg7,clk,sel,control,inco);
input clk;
input [7:0]data;      //p1口,从E2PROM中读出的数据 
input [7:0]inco;      //从拨码开关获得控制信号，包括控制，数据高低位，地址高低位
output [7:0]control;   //p2口，送出控制信号
output [6:0]seg7;      //数码管段选码
output [1:0]sel;       //数码管位选码


reg [7:0]control;
reg [6:0]seg7;
reg [1:0]sel;
reg num;


always@(posedge clk)
begin
control=inco;
if(num==0)
begin
   seg7<=7'b0000000; 
   sel<=2'b01;
   num<=1;
      case(data[3:0])
 
      4'h0: begin 
        seg7<=7'b0000000; 
        seg7<=7'b1111110;     
        end
      4'h1:begin
        seg7<=7'b0000000; 
        seg7<=7'b0110000;
        end   
      4'h2: begin
        seg7<=7'b0000000; 
  	    seg7<=7'b1101101;      
		end
      4'h3:begin
        seg7<=7'b0000000; 
		seg7<=7'b1111001;
		end  
      4'h4:begin
        seg7<=7'b0000000; 
 		seg7<=7'b0110011;
   	    end
      4'h5:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1011011;       
	    end
      4'h6:begin
        seg7<=7'b0000000; 
 	    seg7<=7'b1011111;
	    end
      4'h7:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1110000;
	    end
      4'h8:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111111;
	    end
      4'h9: begin
        seg7<=7'b0000000; 
		seg7<=7'b1111011;
        end
      4'ha:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1110111;
        end
      4'hb:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111111;
		end
      4'hc: begin
        seg7<=7'b0000000; 
 		seg7<=7'b1001110;
		end
      4'hd:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111110;
		end
      4'he:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1001111;
		end
      4'hf:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1000111;
		end
    endcase
end

if(num==1)
   begin
seg7<=7'b0000000; 
sel<=2'b10;
num<=0;
   case(data[7:4])
   4'h0: begin
        seg7<=7'b0000000; 
        seg7<=7'b1111110;               
		end
   4'h1:begin
        seg7<=7'b0000000; 
		seg7<=7'b0110000;
		end
   4'h2:begin
        seg7<=7'b0000000; 
  		seg7<=7'b1101101;
 		end
   4'h3:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111001;
 		end
   4'h4:begin
        seg7<=7'b0000000; 
 		seg7<=7'b0110011;
	    end
   4'h5:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1011011;
 		end
   4'h6:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1011111;
 		end
   4'h7:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1110000;
		end
   4'h8:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111111;
 		end
   4'h9:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111011;
 		end
   4'ha:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1110111;
 		end
   4'hb:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111111;
 		end
   4'hc:begin
        seg7<=7'b0000000; 
  		seg7<=7'b1001110;
        end
   4'hd:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1111110;
        end
   4'he:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1001111;
        end
   4'hf:begin
        seg7<=7'b0000000; 
 		seg7<=7'b1000111;
        end
    endcase
end
 
end
endmodule