微波炉控制器源程序.docVIP

KZQ源程序： LIBRARY IEEE; USE IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_ARITH.ALL; ENTITY KZQ IS PORT( RESET:IN STD_LOGIC; SET_T:IN STD_LOGIC; START:IN STD_LOGIC; TEST:IN STD_LOGIC; CLK:IN STD_LOGIC; DONE:IN STD_LOGIC; COOK:OUT STD_LOGIC; LD_TEST:OUT STD_LOGIC; LD_CLK:OUT STD_LOGIC; LD_DONE:OUT STD_LOGIC ); END KZQ; ARCHITECTURE one OF KZQ IS TYPE STATES IS(IDLE,LAMP_TEST,SET_CLOCK,TIMER,DONE_MSG); SIGNAL NXT,CUR:STATES; BEGIN PROCESS(CLK,RESET) BEGIN IF RESET=1THEN CUR=IDLE; ELSIF CLKEVENT AND CLK=1THEN CUR=NXT; END IF; END PROCESS; PROCESS(CLK,CUR,SET_T,START,TEST,DONE)IS BEGIN NXT=IDLE; LD_TE