下载

2下载券

加入VIP
  • 专属下载券
  • 上传内容扩展
  • 资料优先审核
  • 免费资料无限下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 第8章程序部分8.21 自动售货机VHDL程序与仿真

第8章程序部分8.21 自动售货机VHDL程序与仿真.doc

第8章程序部分8.21 自动售货机VHDL程序与仿真

。CYSTE,M
2018-09-08 0人阅读 举报 0 0 0 暂无简介

简介:本文档为《第8章程序部分8.21 自动售货机VHDL程序与仿真doc》,可适用于工程科技领域

自动售货机VHDL程序与仿真()自动售货机VHDL程序如下:文件名:plautovhd。功能:货物信息存储进程控制硬币处理余额计算显示等功能。说明:显示的钱数coin的以角为单位。最后修改日期:。libraryieeeuseieeestdlogicarithalluseieeestdlogicalluseieeestdlogicunsignedallentityPLautoisport(clk:instdlogic系统时钟set,get,sel,finish:instdlogic设定、买、选择、完成信号coin,coin:instdlogic角硬币、元硬币price,quantity:instdlogicvector(downto)价格、数量数据item,act:outstdlogicvector(downto)显示、开关信号y,y:outstdlogicvector(downto)钱数、商品数量显示数据act,act:outstdlogic)元硬币、角硬币endPLautoarchitecturebehavofPLautoistyperamtypeisarray(downto)ofstdlogicvector(downto)signalram:ramtype定义RAMsignalitem:stdlogicvector(downto)商品种类signalcoin:stdlogicvector(downto)币数计数器signalpri,qua:stdlogicvector(downto)商品单价、数量signalclk:stdlogic控制系统的时钟信号begincom:process(set,clk)variablequan:stdlogicvector(downto)beginifset=''thenram(convinteger(item))<=pricequantityact<=""把商品的单价、数量置入到RAMelsifclk'eventandclk=''thenact<=''act<=''ifcoin=''thenifcoin<""thencoin<=coin投入角硬币coin自加elsecoin<=""endifelsifcoin=''thenifcoin<""thencoin<=coin投入元硬币coin自加elsecoin<=""endifelsifsel=''thenitem<=item对商品进行循环选择elsifget=''then对商品进行购买ifqua>""andcoin>=prithencoin<=coinpriquan:=quanram(convinteger(item))<=priquanifitem=""thenact<=""购买时自动售货机对种商品的操作elsifitem=""thenact<=""elsifitem=""thenact<=""elsifitem=""thenact<=""endifendifelsiffinish=''then结束交易退币(找币)ifcoin>""thenact<=''coin<=coin此IF语句完成找币操作elsifcoin>""thenact<=''coin<=coinelseact<=''act<=''endifelsifget=''thenact<=""foriintolooppri(i)<=ram(convinteger(item))(i)商品单价的读取endloopforiintoloopquan(i):=ram(convinteger(item))(i)商品数量的读取endloopendifendifqua<=quanendprocesscomm:process(clk)此进程完成对Mhz的脉冲分频variableq:stdlogicvector(downto)beginifclk'eventandclk=''thenq:=qendififq=""thenclk<=''elseclk<=''endifendprocessmcode:process(item)商品指示灯译码begincaseitemiswhen""=>item<=""when""=>item<=""when""=>item<=""whenothers=>item<=""endcaseendprocesscode:process(coin)钱数的BCD到七段码的译码begincasecoiniswhen""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""whenothers=>y<=""endcaseendprocesscode:process(qua)单价的BCD到七段码的译码begincasequaiswhen""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""when""=>y<=""whenothers=>y<=""endcaseendprocessendbehav()程序仿真注:仿真图里没有对clk信号进行分频处理。图系统仿真全图图系统仿真图预置部分图系统仿真图商品种类选择部分图系统仿真图投币部分图系统仿真图购买、找币结束交易部分第页共页

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

评分:

/8

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利