语言的自动售货机

1、Verilog课程设计-自动售货机一、实验目的1）设计一个自动售货机，此机能出售1元、2元、5元、10元的四种商品。出售哪种商品可有顾客按动相应的一个按键即可，并同时用数码管显示出此商品的价格。2）顾客投入硬币的钱数也是有1元、2元、5元、10元四种，但每次只能投入其中的一种硬币，此操作通过按动相应的一个按键来模拟，并同时用数码管将投币额显示出来。3）顾客投币后，按一次确认键，如果投币额不足时则报警，报警时间3秒（可用点阵模拟报警）。如果投币额足够时自动送出货物（送出的货物用相应不同的指示灯显示来模拟），同时多余的钱应找回，找回的钱数用数码管显示出来。4）顾客一旦按动确认键3秒后，自动售货机即

2、可自动恢复到初始状态，此时才允许顾客进行下一次购货操作。5）售货机还应具有供商家使用的累加卖货额的功能，累加的钱数要用数码管显示，显示2位即可。此累加器只有商家可以控制清零。6）此售货机要设有一个由商家控制的整体复位控制。二、实验原理首先应搭建识别模块，将代表每种硬币的拨码开关信号转变为BCD码进行累加。当累加完成后，将累加结果与代表商品的BCD码相比较。如果大于售出商品并对两个BCD码求差，求差的结果作为找钱信号；如果等于直接售出商品；小于则报警。至于统计卖钱额，则是对售出的商品进行累加。三、分析与设计思路可分为以下模块1)分频模块。2）计时模块。用于控制确认键后到恢复初始化的3秒计时。3）

3、识别模块。将每种硬币、货品的拨码开关信号转变为编码 。4）清零模块 。用于销售总额的清零。5）初始化模块6）控制模块。用于数据读入、投币不足、交易成功状态的控制及转化。7）显示模块四、程序代码段module autoseller(clk,g,m,yes,read,zero,led_dig,led_seg,led_c,led_r,led);input clk,yes,read,zero;/确定键，商家读取键，清零键input 3:0 g , m; /货品及投币选择键output led_dig,led_seg,led_c,led_r,led;/数码管输出及点阵输出reg f_100;/分频时钟

4、reg f_1;reg 3:0 goods,money,led,change,g_c;integer r,a,b, a_tmp2,a_tmp1;integer ret=0;/用于控制各状态间的转换reg 9:0count;reg 7:0 led_c,led_r,led_dig,led_seg;reg 1:0state;integer i;reg x;always (posedge clk)/分频模块beginif(a_tmp2=999)beginf_100=f_100;a_tmp2<=0;endelsea_tmp2<=a_tmp2+1; endalways (posedge clk

5、)beginif(a_tmp1=9999999)beginf_1=f_1;a_tmp1<=0;endelsea_tmp1<=a_tmp1+1; endalways (posedge f_1)beginif(ret!=0) /用于按确认键后的计时begina=a+1;endelsebegina=0;endendalways (posedge f_100)beginif(zero=0) /清零begincount=0;endif(read!=0) /非商家读取模式（普通读写模式）begin / 识别模块 case(g) /表每种货品的拨码开关信号转变为编码4'b0001:beg

6、in goods=1;end 4'b0010:begin goods=2;end4'b0100:begin goods=5;end4'b1000:begin goods=10;enddefault:begin goods=0;endendcasecase(m) /表每种硬币的拨码开关信号转变为编码4'b0001:begin money=1;end4'b0010:begin money=2;end4'b0100:begin money=5;end4'b1000:begin money=10;enddefault:begin money=0;

7、endendcaseif(a=3) /初始化beginret=0; led=4'b0000;led_c=8'b0000_0000;led_r=8'b1111_1111;x=0;endif(yes=0) /按确定键beginif(money<goods) /金钱不足beginchange=0;ret=1;endelsebegin/金钱足够change=money-goods;ret=2;if(x=0) /交易成功销售总额增加begincount=count+goods;x=1; endendendg_c=goods; /显示模块if(ret=1) /金额不足，数码管

8、报警beginled_c=8'b1111_1111;led_r=8'b0000_0000;endif(ret=2)/交易成功begincase(goods) /LED灯显示货物 1:begin led=4'b0001;end2:begin led=4'b0010;end5:begin led=4'b0100;end10:begin led=4'b1000;endendcaseg_c=change;endcase(state) /显示选择的货物0:beginr=g_c % 10;led_dig=8'b1111_1011;case(r) 0:

9、begin led_seg=8'b1111_1100;end 1:begin led_seg=8'b0110_0000;end 2:begin led_seg=8'b1101_1010;end 3:begin led_seg=8'b1111_0010;end 4:begin led_seg=8'b0110_0110;end 5:begin led_seg=8'b1011_0110;end 6:begin led_seg=8'b1011_1110;end 7:begin led_seg=8'b1110_0000;end 8:begi

10、n led_seg=8'b1111_1110;end 9:begin led_seg=8'b1111_0110;end endcase end1:beginr=g_c / 10;led_dig=8'b0111_1111;case(r) 0:begin led_seg=8'b1111_1100;end 1:begin led_seg=8'b0110_0000;end 2:begin led_seg=8'b1101_1010;end 3:begin led_seg=8'b1111_0010;end 4:begin led_seg=8'

11、b0110_0110;end 5:begin led_seg=8'b1011_0110;end 6:begin led_seg=8'b1011_1110;end 7:begin led_seg=8'b1110_0000;end 8:begin led_seg=8'b1111_1110;end 9:begin led_seg=8'b1111_0110;end endcase end/显示投入的钱数及余额2:beginr=money % 10;led_dig=8'b1110_1111;case(r) 0:begin led_seg=8'b11

12、11_1100;end 1:begin led_seg=8'b0110_0000;end 2:begin led_seg=8'b1101_1010;end 3:begin led_seg=8'b1111_0010;end 4:begin led_seg=8'b0110_0110;end 5:begin led_seg=8'b1011_0110;end 6:begin led_seg=8'b1011_1110;end 7:begin led_seg=8'b1110_0000;end 8:begin led_seg=8'b1111_1

13、110;end 9:begin led_seg=8'b1111_0110;end endcase end3:beginr=money / 10;led_dig=8'b1111_0111;case(r) 0:begin led_seg=8'b1111_1100;end 1:begin led_seg=8'b0110_0000;end 2:begin led_seg=8'b1101_1010;end 3:begin led_seg=8'b1111_0010;end 4:begin led_seg=8'b0110_0110;end 5:begi

14、n led_seg=8'b1011_0110;end 6:begin led_seg=8'b1011_1110;end 7:begin led_seg=8'b1110_0000;end 8:begin led_seg=8'b1111_1110;end 9:begin led_seg=8'b1111_0110;end endcase endendcasestate=state+1;endif(read=0)/商家读取模式begincase(i) /显示销售总额0:beginb=count/10;led_dig=8'b1111_1110;case(b

15、) 0:begin led_seg=8'b1111_1100;end 1:begin led_seg=8'b0110_0000;end 2:begin led_seg=8'b1101_1010;end 3:begin led_seg=8'b1111_0010;end 4:begin led_seg=8'b0110_0110;end 5:begin led_seg=8'b1011_0110;end 6:begin led_seg=8'b1011_1110;end 7:begin led_seg=8'b1110_0000;end 8:

16、begin led_seg=8'b1111_1110;end 9:begin led_seg=8'b1111_0110;end endcase end1:begin b=count%10;led_dig=8'b1111_1101; case(b) 0:begin led_seg=8'b1111_1100;end 1:begin led_seg=8'b0110_0000;end 2:begin led_seg=8'b1101_1010;end 3:begin led_seg=8'b1111_0010;end 4:begin led_seg=8'b0110_0110;end 5:be