Verilog-HDL-电梯程序--精选文档

1、这个程序不需要你再添加任何的程序，你只需要添加楼层数就可以成功控制6层以上电梯，另外你必须得读懂每一块程序的作用，才能对这个程序有更好的应用module dtsj(clk,reset,up1,up2,up3,up4,up5,dn2,dn3,dn4,dn5,dn6,d1,d2,d3,d4,d5,d6,overw,pro,led,hex,Buzzer1,lig);input clk,reset; /reset键使用keyinput overw,pro,up1,up2,up3,up4,up5,dn2,dn3,dn4,dn5,dn6,d1,d2,d3,d4,d5,d6; /故障警报键output6:0

2、 hex,lig; /light和led用数码管output5:0 led;output Buzzer1;reg Buzzer1,door;reg6:0 hex,lig;reg2:0state,next_state,count;reg5:0 d,up,dn,now_f,curr,led; /d是内部按键，up外部上升按键，dn是外部下降按键， /now_f是当前楼层，curr是当前楼层的另外一个变量reg1:0 ud_f; /上升下降标志位reg light;/reg29:0 counter;/reg clkout;parameter idle_state=3'b001,open_st

3、ate=3'b010,close_state=3'b011, up_state=3'b100,down_state=3'b101,sleep_state=3'b110, alarm_state=3'b111,f1=6'b000001,f2=6'b000010,f3=6'b000100,f4=6'b001000 ,f5=6'b010000,f6=6'b100000,up_f=2'b01,dn_f=2'b10,idle=2'b00; /jiu zhong zhuang tai h

4、e shang sheng zhuang tai 'shang sheng zhuang tai he xia jia zhuang tai initial begin state<=idle_state; endalways (posedge clk or posedge reset) if(reset) state<=idle_state; else state<=next_state;always (state or up or dn or d or now_f or count or ud_f) case(state) open_state: begin if

5、(count<5) next_state=open_state; else next_state=close_state; end sleep_state: begin if(up|dn|d|ud_f)=0) begin next_state=close_state; end else next_state=idle_state; end idle_state: / 初始状态 begin if(up|dn|d|ud_f)=0) next_state=sleep_state; if(!overw|pro=1) next_state=alarm_state; else if(d>0)

6、begin if(d&now_f)>0) next_state=open_state; else if(d>now_f) next_state=up_state; else next_state=down_state; end else if(up&now_f)|(dn&now_f) next_state=open_state; else if(up>now_f)|(dn>now_f) next_state=up_state; else if(up|dn) next_state=down_state; else next_state=idle_s

7、tate; end up_state: begin if(up|dn|d|ud_f)=0) next_state=sleep_state; if(!overw|pro=1) next_state=alarm_state; else if(d&now_f)|(up&now_f) next_state=open_state; else if(d>now_f)|(up>now_f) next_state=up_state; else if(d<now_f)|(up<now_f) /else if(d|up) wait speak next_state=down

8、_state; else if(dn>0) begin if(dn>now_f) next_state=up_state; else if(dn&now_f)|(now_f<f6) next_state=open_state; else if(dn&now_f)&&(now_f=f6) next_state=open_state; else next_state=down_state; end else next_state=idle_state; end down_state: begin if(up|dn|d|ud_f)=0) next_s

9、tate=sleep_state; else if(!overw|pro=1) next_state=alarm_state; else if(d&now_f)|(dn&now_f) next_state=open_state; else if(d<now_f)&&(d!=6'b000001)|(dn<now_f)&&(dn!=6'b000001) next_state=down_state; else if(d>now_f)|(dn>now_f) next_state=up_state; else if(

10、up>0) begin if (up<now_f) next_state=down_state; else if(up&now_f)&&(now_f>f1) next_state=down_state; else if(up&now_f)&&(now_f=f1) next_state=open_state; else next_state=up_state; end else next_state=idle_state; end close_state: begin if(up|dn|d|ud_f)=0) next_state=

11、sleep_state; else if(!overw|pro=1) next_state=alarm_state; else if(ud_f=up_f) begin if(d&now_f)|(up&now_f) next_state=open_state; else if(d>now_f)|(up>now_f) next_state=up_state; else if(d|up) next_state=down_state; else if(dn>0) begin if(dn>now_f) next_state=up_state; else if(dn

12、&now_f)>0) next_state=open_state; else next_state=down_state; end else next_state=idle_state; end else if(ud_f=dn_f) begin if(d&now_f)|(dn&now_f) next_state=open_state; else if(d<now_f)&&(d!=6'b000000)|(dn<now_f)&&(dn!=6'b000000) next_state=down_state; el

13、se if(d|dn) next_state=up_state; else if(up>0) begin if(up<now_f) next_state=down_state; else if(up&now_f)>0) next_state=open_state; else next_state=up_state; end else next_state=idle_state; end else begin if(d>0) begin if(d&now_f)>0) next_state=open_state; else if(d>now_f)

14、 next_state=up_state; else next_state=down_state; end else if(up&now_f)&&(dn&now_f) next_state=open_state; else if(up>now_f)&&(dn>now_f) next_state=up_state; else if(up|dn) next_state=down_state; else next_state=idle_state; end end alarm_state: begin if(!overw|pro=1) be

15、gin /Buzzer1<=1'b1; next_state=open_state; end else begin /Buzzer1<=1'b0; if(d>0) begin if(d&now_f)>0) next_state=open_state; else if(d>now_f) next_state<=up_state; else next_state=down_state; end else if(up&now_f)|(dn&now_f) next_state=open_state; else if(up>

16、;now_f)|(dn>now_f) next_state=up_state; else if(up|dn) next_state=down_state; else next_state=idle_state; end end default: next_state<=idle_state; endcase always (up1 or up2 or up3 or up4 or up5) up =1'b0,up5,up4,up3,up2,up1; always (dn2 or dn3 or dn4 or dn5 or dn6) dn =dn6,dn5,dn4,dn3,dn2

17、,1'b0; always (d1 or d2 or d3 or d4 or d5 or d6) d =d6,d5,d4,d3,d2,d1; always (posedge clk or posedge reset) begin if(reset) count<=0; else if(next_state=open_state)&&(count<5) count<=count+1; else count<=0; endalways (posedge clk or posedge reset ) /always (reset or next_sta

18、te) if(reset) begin now_f<=f1; ud_f<=idle; led<=6'b000001; light<=1'b0; end else begin now_f<=now_f; curr=now_f; case(next_state) idle_state: begin now_f<=now_f; ud_f<=idle; led<=led; curr<=now_f; Buzzer1<=1'b0; end up_state: begin now_f<=now_f<<1;

19、ud_f<=up_f; led<=led+1; curr<=now_f; end down_state: begin now_f<=now_f>>1; ud_f<=dn_f; led<=led+1; curr<=now_f; end open_state: begin now_f<=now_f; ud_f<=ud_f; led<=led; door<=1'b1; light<=door; curr<=now_f; end close_state: begin now_f<=now_f; ud

20、_f<=ud_f; led<=led; curr<=now_f; door<=1'b0; light<=door; end alarm_state: begin now_f<=now_f; ud_f<=ud_f; led<=led; Buzzer1<=1'b1; curr<=now_f; door<=1'b1; light<=door; end sleep_state: begin now_f<=now_f; ud_f<=ud_f; led<=6'b000000; curr<=now_f; end default: begin now_f<=f1; ud_f<=idle; led<