HDLVerilog课程设计报告自动售货机.docx

Verilog HDL课程设计报告
实 验 名 称：基于Verilog HDL旳自动售货机
指 导 老 师: 王 冠 军
班 级 ：信科12-1
姓 名 ：吴涛
学 号 ：;
price = 0;
beep = 0;
end
else
begin/*三种面值共8种组合*/
case(btn_mon)
3'b001:begin price_all = 5;end
3'b010:begin price_all = 10;end
3'b100:begin price_all = 50;end
3'b011:begin price_all = 15;end
3'b101:begin price_all = 55;end
3'b110:begin price_all = 60;end
3'b111:begin price_all = 65;end
default:begin price_all = 0;end
endcase

case(btn_sell)
4'b0001:begin price = 5;
end
4'b0010:begin price = 10;
end
4'b0100:begin price = 15;
end
4'b1000:begin price = 20;
end
default:begin price = 0;
end
endcase

if(btn_ok == 1)
begin
if(price_all < price) //放入钱局限性
begin
led_warn = 1;
price = 0;
end
else
begin //金钱足够
price_all = price_all-price;
beep = 1;

case(price) //LED灯显示货品卖出
5: begin led = 4'b0001;end
10:begin led = 4'b0010;end
15:begin led = 4'b0100;end
20:begin led = 4'b1000;end
endcase

end
end
else
beep = 0;
end
end
/*分频后将时钟给数码管，数码管分别显示放入钱旳多少、商品价格*/
always @(posedge clk_500Hz)
begin
case(flag)
2'b00:
begin
r=price_all%10;
case(r)
0:begin dis_mony=11'b111_0011_1111;end
1:begin dis_mony=11'b111_0000_0110;end
2:begin dis_mony=11'b111_0101_1011;end
3:begin dis_mony=11'b111_0100_1111;end
4:begin dis_mony=11'b111_0110_0110;end
5:begin dis_mony=11'b111_0110_1101;end
6:begin dis_mony=11'b111_0111_1101;end
7:begin dis_mony=11'b111_0000_0111;end
8:begin dis_mony=11'b111_0111_1111;end
9:begin dis_mony=11'b111_0110_1111;end
endcase
flag = 2'b01;
end
2'b01:
begin
r=price_all/10;
case(r)
0:begin dis_mony=11'b110_1011_1111;end
1:begin dis_mony=1