基于quartus2的mealy机类型控制adc0809采样的状态机

------------------------------------------------------------------------基于quartus2的mealy机类型控制adc0809采样的状态机LIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;ENTITYADC0809ISPORT(D:INSTD_LOGIC_VECTOR(7DOWNTO0);CLK,RST:INSTD_LOGIC; EOC:INSTD_LOGIC; ALE:OUTSTD_LOGIC; START,OE:OUTSTD_LOGIC; ADDA,LOCK_T:OUTSTD_LOGIC; Q:OUTSTD_LOGIC_VECTOR(7DOWNTO0));ENDADC0809;--------------跟moore型一样；ARCHITECTUREBEHAVOFADC0809ISTYPESTATESIS(S0,S1,S2,S3,S4);SIGNALPST:STATES;--------------跟moore型不同，因为是由输入信号eoc控制状态转变，所以SIGNALREGL:STD_LOGIC_VECTOR(7DOWNTO0);只需一个pst状态信号；SIGNALLOCK:STD_LOGIC;BEGINADDA<='0';LOCK_T<=LOCK;REGCOM:PROCESS(CLK,RST,PST,EOC) BEGIN--------------regcom进程是一个时序与组合混合型进程；IFRST='1'THENPST<=S0;ELSIFRISING_EDGE(CLK)THENCASEPSTIS WHENS0=>IFEOC='1'THENPST<=S1;ELSEPST<=S0;ENDIF; WHENS1=>IFEOC='0'THENPST<=S2;ELSEPST<=S1;ENDIF; WHENS2=>IFEOC='1'THENPST<=S3;ELSEPST<=S2;ENDIF; WHENS3=>IFEOC='1'THENPST<=S4;ELSEPST<=S3;ENDIF; WHENS4=>IFEOC='1'THENPST<=S0;ELSEPST<=S4;ENDIF; WHENOTHERS=>PST<=S0;--------------由eoc信号控制状态转变，如果eoc与当前状态下eoc的值一 ENDCASE;ENDIF;致，就转到下一态；其中状态2中eoc=‘0’表示正在转换， ENDPROCESSREGCOM;eoc=’1‘表示转换结束；COM:PROCESS(PST) BEGIN--------------com进程主控组合进程；CASEPSTISWHENS0=>ALE<='0';START<='0';OE<='0';LOCK<='0';WHENS1=>ALE<='1';START<='1';OE<='0';LOCK<='0';WHENS2=>ALE<='0';START<='0';OE<='0';LOCK<='0';WHENS3=>ALE<='0';START<='0';OE<='1';LOCK<='0';WHENS4=>ALE<='0';START<='0';OE<='1';LOCK<='1';WHENOTHERS=>ALE<='0';START<='0';OE<='0';LOCK<='0';ENDCASE;ENDPROCESSCOM;LATCH1:PROCESS(LOCK)BEGIN--------------锁存器进程latch1；IFLOCK='1'ANDLOCK'EVENTTHENREGL<=D;ENDIF; ENDPROCESSLATCH1; Q<=REGL; ENDBEHAV;--------------