洗衣机实验报告

1、数字电路与逻辑设计综合实验实验报告实验名称：基于CPLD的简易洗衣机控制器的设计与实现指导老师：班级：学号：班内序号：姓名：2015.11.9一设计课题的任务要求 题目：基于CPLD的简易洗衣机控制器的设计与实现基本要求:1、洗衣机的工作步骤为洗涤、漂洗和脱水三个过程,工作时间分别为:洗涤30秒(进水5秒,洗衣15秒,排水5秒,甩干5秒),漂洗25秒(进水5秒,漂洗10秒,排水5秒,甩干5秒),脱水15秒(排水5秒,甩干10秒)；2、用一个按键实现洗衣程序的手动选择:A、单洗涤;B、单漂洗;C、单脱水;D、漂洗和脱水;E、洗涤、漂洗和脱水全过程；3、用发光二极管显示洗衣机的工作状态(洗衣、漂洗

2、和脱水),并倒计时显示每个状态的工作时间,全部过程结束后,应有声音提示使用者,并保持在停止状态,直至再次开始；4、用点阵动画显示洗衣机工作过程中进水、波轮或滚筒转动、排水和甩干等的工作情况,四种工作情况的动画显示要有区别且尽可能的形；5、用一个按键实现暂停洗衣和继续洗衣的控制,暂停后继续洗衣应回到暂停之前保留的状态。提高要求:1、三个过程的时间有多个选项供使用者选择；2、可以预约洗衣时间；3、自拟其它功能；二、系统设计设计思路：从系统总体要求出发，将设计任务分解为5类不同的功能模式，3种工作类型。基本功能描述洗衣机控制器可工作于五种模式下:单洗涤、单漂洗、单脱水、漂洗十脱水、洗涤十漂洗+脱水，

3、由按键控制洗衣机控制器工作在任意一种模式，并显示出洗衣机的工作状态和剩余工作时间，在剩余时间结束后有报警声提示使用者，并且可实现暂停洗衣和继续的功能。3种工作类型：洗涤、漂洗、脱水。由此分析可将洗衣机控制器分为分频器模块、控制模块、倒计时模块、点阵模块、初始模式选择模块、报警模块、数码管显示模块等。总体框图：分块设计：分频器模块：利用分频模块将频率分频为500HZ、100HZ以及1HZ，分别用于不同模块。500HZ用于：数码管显示、扫描模块；100HZ用于：暂停按键、模式选择按键、开始按键；1HZ用于：蜂鸣器模块、点阵模块。倒计时模块：进行时间的倒计时，将减计数得到的剩余时间送给显示模块进行显

4、示。点阵模块：通过不同的状态配合倒计时显示不同的点阵动画，使洗衣机使用者能一目了然的知道现在洗衣工作进行到哪一步骤。初始模式选择模块：洗衣机使用者通过对模块选择按键的控制，选择指定模式，再通过开始及暂停键，控制洗衣机的工作与暂停。报警模块：当状态转移模块送出结束信号时，控制蜂鸣器响5秒钟。数码管显示模块：此模块的作用是洗衣模式显示以及该模式下的剩余时间显示。三、仿真波形及波形分析点阵：防抖：（6个时钟脉冲内，按下按键，只能产生一次按键脉冲信号）分频：模式选择：数码管显示：四、源程序顶层文件：LIBRARY IEEE;USE IEEE.STD_LOGIC_1164.ALL;USE IEEE.ST

5、D_LOGIC_UNSIGNED.ALL;ENTITY washing ISPORT(clk:IN STD_LOGIC;clear:IN STD_LOGIC;up,down,mode,sure,choice,pause,start:IN STD_LOGIC;-DISP:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);beep:OUT STD_LOGIC;LED1:OUT STD_LOGIC_VECTOR(4 DOWNTO 0);LED2:OUT STD_LOGIC_VECTOR(2 DOWNTO 0);CAT:OUT STD_LOGIC_VECTOR(5 DOWNTO 0);

6、row:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);colg:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);colr:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);END washing;ARCHITECTURE behave OF washing IS-clk_500,clk_1,clk_100分别对应500HZ信号，1HZ信号，100HZ信号-sure_tmp:数字钟模式下的标志信号，1表示数字钟开始，0表示暂停-pause_tmp:开始暂停的标志信号，1开始0暂停-choose_tmp:对应当前被选中的数码管-h_1,h_2,

7、m_1,m_2,s_1,s_2:用来保存在数字钟模式下的时分秒-hx_1,hx_2,mx_1,mx_2,sx_1,sx_2:用来保存在洗衣漂洗脱水等模式下的时间-H1,H2,M1,M2,S1,S2:对应从左到右6位数码管的每一位-model_tmp:对应当前模式-beep_flag:蜂鸣器是否响了5秒的标志信号-cl_beeper:cl_beeper的0、1决定beep_flag的1、0-SIGNAL clk_500,clk_1,clk_100,sure_tmp:STD_LOGIC;SIGNAL pause_tmp:STD_LOGIC:='1'-SIGNAL choice_tm

8、p:INTEGER RANGE 0 TO 2;SIGNAL h_1:INTEGER RANGE 0 TO 3;SIGNAL m_1,s_1:INTEGER RANGE 0 TO 6;SIGNAL h_2,m_2,s_2:INTEGER RANGE 0 TO 9;SIGNAL H1,H2:INTEGER RANGE 0 TO 9;SIGNAL M1,S1,M2,S2:INTEGER RANGE 0 TO 9;SIGNAL mode_tmp:INTEGER RANGE 0 TO 5;SIGNAL mode_m:INTEGER RANGE 0 TO 5;SIGNAL beep_flag:STD_LO

9、GIC;SIGNAL cl_beeper:STD_LOGIC;SIGNAL state:INTEGER RANGE 0 TO 3;-指示洗衣过程SIGNAL arr_mode:STD_LOGIC_VECTOR(2 DOWNTO 0);SIGNAL num1:INTEGER RANGE 0 TO 50:=30;-SHUZIKONGZHISIGNAL num2:INTEGER RANGE 0 TO 50:=25;SIGNAL num3:INTEGER RANGE 0 TO 50:=15;SIGNAL de1:INTEGER RANGE 0 TO 30:=15;-洗涤时洗衣时间SIGNAL de2:

10、INTEGER RANGE 0 TO 30:=10;-漂洗时洗衣时间SIGNAL de3:INTEGER RANGE 0 TO 30:=10;-甩干时脱水时间SIGNAL flag:INTEGER RANGE 0 TO 1;SIGNAL start_tmp:INTEGER RANGE 0 TO 1;-开始标志COMPONENT CLOCKPORT(clear:IN STD_LOGIC;clk_1,up,down,sure_tmp,mode:IN STD_LOGIC;mode_tmp:IN INTEGER RANGE 0 TO 5;h_1:OUT INTEGER RANGE 0 TO 9;h_2

11、:OUT INTEGER RANGE 0 TO 9;m_1,s_1:OUT INTEGER RANGE 0 TO 9;m_2,s_2:OUT INTEGER RANGE 0 TO 9;flag:OUT INTEGER RANGE 0 TO 1;-倒计时结束标志choice_tmp:IN INTEGER RANGE 0 TO 2);END COMPONENT;COMPONENT set_sure PORT(sure,clk_100:IN STD_LOGIC;-sure是数字钟模式下的确认按钮sure_tmp:OUT STD_LOGIC);END COMPONENT;COMPONENT clk_d

12、ivPORT(clear,clk:IN STD_LOGIC;clk_500,clk_1,clk_100:OUT STD_LOGIC);END COMPONENT;COMPONENT SHOWPORT(clk_500:IN STD_LOGIC;clear:IN STD_LOGIC;H1:IN INTEGER RANGE 0 TO 9;H2:IN INTEGER RANGE 0 TO 9;M1,S1:IN INTEGER RANGE 0 TO 9;M2,S2:IN INTEGER RANGE 0 TO 9;CAT:OUT STD_LOGIC_VECTOR(5 DOWNTO 0);DISP:OUT

13、STD_LOGIC_VECTOR(7 DOWNTO 0);END COMPONENT;COMPONENT set_pausePORT(clear,pause,clk_100:IN STD_LOGIC;pause_tmp:OUT STD_LOGIC);END COMPONENT;COMPONENT set_modePORT(mode,clear,clk_100:IN STD_LOGIC;choice:IN STD_LOGIC;mode_tmp:OUT INTEGER RANGE 0 TO 5;LED1:OUT STD_LOGIC_VECTOR(4 DOWNTO 0);flag:IN INTEGE

14、R RANGE 0 TO 1;choice_tmp:OUT INTEGER RANGE 0 TO 2);END COMPONENT;COMPONENT set_beep-SET_BEEPPORT(clk_1,clk_100:IN STD_LOGIC; mode:IN STD_LOGIC; clk_500:IN STD_LOGIC; beep_flag:IN STD_LOGIC; cl_beep:OUT STD_LOGIC; beep:OUT STD_LOGIC);END COMPONENT;COMPONENT set_led PORT(clear,clk_1:IN STD_LOGIC;stat

15、e:IN INTEGER RANGE 0 TO 3;led_out:OUT STD_LOGIC_VECTOR(2 DOWNTO 0);END COMPONENT;COMPONENT set_arrayPORT(clear,clk_1,clk_500:IN STD_LOGIC;arr_mode:IN STD_LOGIC_VECTOR(2 DOWNTO 0);-四种状态row:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);colg:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);colr:OUT STD_LOGIC_VECTOR(7 DOWNTO 0);END

16、 COMPONENT;COMPONENT set_startPORT(start,clk_100,mode:IN STD_LOGIC;flag:IN INTEGER RANGE 0 TO 1;start_tmp:OUT INTEGER RANGE 0 TO 1);END COMPONENT;-PORT MAP-BEGIN u1:CLOCK PORT MAP(clear=>clear,clk_1=>clk_1,up=>up,down=>down,sure_tmp=>sure_tmp,mode=>mode,mode_tmp=>mode_tmp,h_1=&g

17、t;h_1,h_2=>h_2,m_1=>m_1,m_2=>m_2,s_1=>s_1,s_2=>s_2,choice_tmp=>choice_tmp,flag=>flag);-u2:set_sure PORT MAP(clk_100=>clk_100,sure=>sure,sure_tmp=>sure_tmp);u3:clk_div PORT MAP(clear=>clear,clk=>clk,clk_500=>clk_500,clk_1=>clk_1,clk_100=>clk_100);u4:SHOW P

18、ORT MAP(clk_500=>clk_500,clear=>clear,H1=>H1,H2=>H2,M1=>M1,M2=>M2,S1=>S1,S2=>S2,CAT=>CAT,DISP=>DISP);u5:set_pause PORT MAP(clk_100=>clk_100,clear=>clear,pause=>pause,pause_tmp=>pause_tmp);u6:set_mode PORT MAP(clk_100=>clk_100,mode=>mode,clear=>clear

19、,choice=>choice,LED1=>LED1, flag=>flag,choice_tmp=>choice_tmp,mode_tmp=>mode_tmp);u7:set_beep PORT MAP(beep_flag=>beep_flag,clk_1=>clk_1,clk_100=>clk_100,mode=>mode,clk_500=>clk_500,cl_beep=>cl_beeper,beep=>beep);-u8:set_led PORT MAP(clk_1=>clk_1,clear=>clea

20、r,state=>state,led_out=>LED2);u9:set_array PORT MAP(clear=>clear,clk_1=>clk_1,clk_500=>clk_500, arr_mode=>arr_mode,row=>row,colr=>colr,colg=>colg);u10:set_start PORT MAP(start=>start,clk_100=>clk_100,mode=>mode,start_tmp=>start_tmp,flag=>flag);倒计时：PROCESS(cl

21、ear,clk,up,down,clk_1)BEGINIF clear='1' THENH1<=0;H2<=0;M1<=0;M2<=0;S1<=0;S2<=0;num1<=30;num2<=25;num3<=15;state<=3;arr_mode<="000"de1<=15;de2<=10;de3<=10;ELSIF(mode='1')THENnum1<=30;num2<=25;num3<=15;state<=3;arr_mode&l

22、t;="000"ELSIF (clk_1'event AND clk_1='1')THENCASE mode_tmp IS-0,CLOCK MODE-WHEN 0=>H1<=h_1;H2<=h_2;M1<=m_1;M2<=m_2;S1<=s_1;S2<=s_2;-1.单洗衣模式-WHEN 1=>H1<=num1/10;H2<=(num1)mod(10);IF(start_tmp=1)THENIF pause_tmp='0' THENstate<=0;-xiyiarr_m

23、ode<="001"IF(num1<=10+de1)THEN -arr_mode<="010" IF(num1<=10)THENarr_mode<="011"IF(num1<=5)THENarr_mode<="100"END IF;END IF;END IF;IF(num1=0)THENstate<=3;-结束arr_mode<="000"CASE cl_beeper ISWHEN '1'=>beep_flag<=

24、'0'WHEN OTHERS=>beep_flag<='1'END CASE;ELSEnum1<=num1-1;END IF;END IF;ELSIF up='1' THENnum1<=num1+1;de1<=de1+1;ELSIF down='1'THEN-暂停洗衣，down高电平调时，实现减1-IF(num1/=0)THENnum1<=num1-1;de1<=de1-1;END IF;ELSENULL;END IF; -2.单漂洗模式-WHEN 2 =>H1<=0;H2&l

25、t;=0;M1<=num2/10;M2<=(num2)mod(10);IF(start_tmp=1)THENIF pause_tmp='0' THEN-开始漂洗，倒计时-state<=1;arr_mode<="001"-piaoxiIF(num2<=10+de2)THENarr_mode<="010"IF(num2<=10)THENarr_mode<="011"IF(num2<=5)THENarr_mode<="100"END IF;END

26、 IF;END IF;IF(num2=0)THENstate<=3;-结束arr_mode<="000"CASE cl_beeper ISWHEN '1'=>beep_flag<='0'WHEN OTHERS=>beep_flag<='1'END CASE;ELSEnum2<=num2-1;END IF;END IF;ELSIF up='1'THEN-暂停漂洗，up高电平调时，实现加1-num2<=num2+1;de2<=de2+1;ELSIF down=&

27、#39;1'THEN-暂停漂洗，down高电平调时，实现减1-IF(num2/=0)THENnum2<=num2-1;de2<=de2-1;END IF;ELSENULL;END IF;-3.单脱水模式-WHEN 3 =>S1<=num3/10;S2<=(num3)mod(10);H1<=0;H2<=0;M1<=0;M2<=0; -sx_1<=1;sx_2<=5;IF(start_tmp=1)THENIF pause_tmp='0' THEN-开始脱水，倒计时-state<=2;arr_mode&l

28、t;="011"IF(num3<=de3)THENarr_mode<="100"END IF;IF(num3=0)THENstate<=3;-结束arr_mode<="000"CASE cl_beeper ISWHEN '1'=>beep_flag<='0'WHEN OTHERS=>beep_flag<='1'END CASE;ELSEnum3<=num3-1;END IF;END IF;ELSIF up='1'THE

29、N-暂停脱水，up高电平调时，实现加1-num3<=num3+1;de3<=de3+1;ELSIF down='1'THEN-暂停脱水，down高电平调时，实现减1-IF(num3/=0) THENnum3<=num3-1;de3<=de3-1;END IF;ELSENULL;END IF;-4.漂洗脱水模式-WHEN 4=>H1<=0;H2<=0;M1<=num2/10;M2<=(num2)mod(10);S1<=num3/10;S2<=(num3)mod(10); IF(start_tmp=1)THENIF

30、pause_tmp='0' THEN-开始漂洗脱水，先漂洗后脱水，倒计时- -先漂洗state<=1;arr_mode<="001"IF(num2<=10+de2)THENarr_mode<="010"IF(num2<=10)THENarr_mode<="011"IF(num2<=5)THENarr_mode<="100"END IF;END IF;END IF;IF(num2=0) THEN state<=2;-后脱水arr_mode<=

31、"011"IF(num3<=de3)THENarr_mode<="100"END IF;IF(num3=0) THEN state<=3;-结束arr_mode<="000"CASE cl_beeper IS-结束,蜂鸣器报警-WHEN '1'=> beep_flag<='0'WHEN OTHERS=> beep_flag<='1'END CASE;ELSE num3<=num3-1;END IF;ELSE num2<=num2

32、-1;END IF;END IF;ELSIF up='1'THEN-暂停，up高电平调时，实现加1-IF(choice_tmp=0) THEN -根据choice_tmp选择加1操作的数码管-num2<=num2+1;de2<=de2+1;ELSEnum3<=num3+1;de3<=de3+1;END IF;ELSIF down='1'THEN-暂停，down高电平调时，实现减1-IF(choice_tmp=0) THEN -根据choice_tmp选择减1操作的数码管-IF(num2/=0)THENnum2<=num2-1;de2

33、<=de2-1;END IF;ELSEIF(num3/=0)THENnum3<=num3-1;de3<=de3-1;END IF;END IF;ELSENULL;END IF;-5.洗衣漂洗脱水模式-WHEN 5 => H1<=num1/10;H2<=(num1)mod(10);M1<=num2/10;M2<=(num2)mod(10);S1<=num3/10;S2<=(num3)mod(10);IF(start_tmp=1)THENIF pause_tmp='0' THEN-开始洗衣漂洗脱水，先洗衣后漂洗后脱水，倒计

34、时-开始洗衣state<=0;arr_mode<="001"IF(num1<=10+de1)THEN arr_mode<="010"IF(num1<=10)THENarr_mode<="011"IF(num1<=5)THENarr_mode<="100"END IF;END IF;END IF;IF(num1=0) THEN state<=1; -后漂洗arr_mode<="001"IF(num2<=10+de2)THENarr_

35、mode<="010"IF(num2<=10)THENarr_mode<="011"IF(num2<=5)THENarr_mode<="100"END IF;END IF;END IF;IF(num2=0)THENstate<=2; -后脱水arr_mode<="011"IF(num3<=de3)THENarr_mode<="100"END IF;IF(num3=0) THEN state<=3;-结束 arr_mode<=&qu

36、ot;000" CASE cl_beeper IS-结束,蜂鸣器报警- WHEN '1'=> beep_flag<='0' WHEN OTHERS=> beep_flag<='1' END CASE;ELSE num3<=num3-1;END IF;ELSE num2<=num2-1;END IF;ELSE num1<=num1-1;END IF;END IF;ELSIF up='1'THEN-暂停，up高电平调时，实现加1-IF(choice_tmp=0) THEN -根据ch

37、oice_tmp选择加1操作的数码管-num1<=num1+1;de1<=de1+1;ELSIF(choice_tmp=1) THENnum2<=num2+1;de2<=de2+1;ELSEnum3<=num3+1;de3<=de3+1;END IF;ELSIF down='1'THEN-暂停，down高电平调时，实现减1-IF(choice_tmp=0) THEN -根据choice_tmp选择减1操作的数码管-IF(num1/=0)THEN num1<=num1-1;de1<=de1-1;END IF;ELSIF(choice

38、_tmp=1) THENIF(num2/=0)THEN num2<=num2-1;de2<=de2-1;END IF;ELSEIF(num3/=0)THEN num3<=num3-1;de3<=de3-1;END IF;END IF;ELSENULL;END IF;- WHEN OTHERS =>NULL; END CASE;END IF;END PROCESS;END behave;分频：-div-LIBRARY IEEE;USE IEEE.STD_LOGIC_1164.ALL;USE IEEE.STD_LOGIC_UNSIGNED.ALL;ENTITY clk

39、_div ISPORT( clear,clk:IN STD_LOGIC; clk_500,clk_1,clk_100:BUFFER STD_LOGIC);-构造体内部可再用END clk_div;ARCHITECTURE behave OF clk_div IS CONSTANT DIV1:INTEGER:=50000;-分出500HZ用到的计数器模值-CONSTANT DIV2:INTEGER:=500;-500HZ分出1HZ用到的计数器模值-CONSTANT DIV3:INTEGER:=5;-500HZ分出100HZ用到的计数器模值-SIGNAL tmp1:INTEGER RANGE 0

40、TO DIV1;SIGNAL tmp2:INTEGER RANGE 0 TO DIV2;SIGNAL tmp3:INTEGER RANGE 0 TO DIV3;SIGNAL clktmp1:STD_LOGIC;SIGNAL clktmp2:STD_LOGIC;SIGNAL clktmp3:STD_LOGIC; BEGINp1:PROCESS(clear,clk)BEGIN IF clear='1'THENtmp1<=0;ELSIF(clk'EVENT AND clk='1') THENIF (tmp1=DIV1/2) THENtmp1<=0;

41、clktmp1<=NOT clktmp1; ELSEtmp1<=tmp1+1; END IF;END IF;END PROCESS p1;clk_500<=clktmp1;p2:PROCESS(clk_500,clear) BEGIN IF clear='1'THENtmp2<=0;ELSIF(clk_500'EVENT AND clk_500='1') THENIF (tmp2=DIV2/2) THENtmp2<=0;clktmp2<=NOT clktmp2; ELSEtmp2<=tmp2+1; END IF;

42、END IF;END PROCESS p2;clk_1<=clktmp2;p3:PROCESS(clk_500,clear) BEGIN IF clear='1'THENtmp3<=0;ELSIF(clk_500'EVENT AND clk_500='1') THENIF (tmp3=DIV3/2) THENtmp3<=0;clktmp3<=NOT clktmp3; ELSEtmp3<=tmp3+1; END IF;END IF;END PROCESS p3;clk_100<=clktmp3; END behave;数

43、码管显示模块：LIBRARY IEEE;USE IEEE.STD_LOGIC_1164.ALL;USE IEEE.STD_LOGIC_UNSIGNED.ALL;ENTITY SHOW ISPORT(clk_500:IN STD_LOGIC;-500HZ信号，用于扫描数码管-clear:IN STD_LOGIC; -复位信号-H1,H2,M1,M2,S1,S2:IN INTEGER RANGE 0 TO 9;-对应从左到右6位数码管的每一位-CAT:OUT STD_LOGIC_VECTOR(5 DOWNTO 0);-数码管选通信号DISP:OUT STD_LOGIC_VECTOR(7 DOWNT

44、O 0);-控制数码管显示的数字的信号-END SHOW;ARCHITECTURE behave OF SHOW ISSIGNAL count:INTEGER RANGE 0 TO 5;-模值为5的计数器-SIGNAL disp_tmp:INTEGER RANGE 0 TO 9;-从0到9，显示在数码管上的数字-BEGINp1:PROCESS(clk_500,clear) -500HZ扫描信号控制计数器当前值-BEGIN IF clear='1' THENcount<=0;ELSIF clk_500'event AND clk_500='1' TH

45、ENIF(count=5) THEN count<=0;ELSE count<=count+1;END IF;END IF;END PROCESS p1;p2:PROCESS(count,H1,H2,M1,M2,S1,S2)-根据计数器当前值选通对应的数码管,并将对应的信号送disp_tmp-BEGIN CASE count ISWHEN 0 =>disp_tmp<=H1;CAT<="011111"WHEN 1 =>disp_tmp<=H2;CAT<="101111"WHEN 2 =>disp_tmp

46、<=M1;CAT<="110111"WHEN 3 =>disp_tmp<=M2;CAT<="111011"WHEN 4 =>disp_tmp<=S1;CAT<="111101"WHEN 5 =>disp_tmp<=S2;CAT<="111110"WHEN OTHERS =>disp_tmp<=0;CAT<="000000"-全亮？END CASE;END PROCESS p2;p3:PROCESS(disp_tm

47、p)-根据disp_tmp的值显示对应的数字-BEGINCASE disp_tmp IS -补一位小数点，最高位WHEN 0 => DISP<="00111111"-0 WHEN 1 => DISP<="00000110"-1WHEN 2 => DISP<="01011011"-2WHEN 3 => DISP<="01001111"-3WHEN 4 => DISP<="01100110"-4WHEN 5 => DISP<=&

48、quot;01101101"-5WHEN 6 => DISP<="01111101"-6WHEN 7 => DISP<="00000111"-7WHEN 8 => DISP<="01111111"-8WHEN 9 => DISP<="01101111"-9WHEN OTHERS => DISP<="00111111"-0END CASE;END PROCESS p3;END behave;防抖模块：LIBRARY IEEE;USE IEEE.STD_LOGIC_1164.ALL;USE IEEE.STD_LOGIC_UNSIGNED.ALL;ENTITY fangdou is PORT( clk_100,d_in:IN STD_LOGIC;-clk_x为100HZ信号，d_in输入的要防抖的信号- d_out:OUT STD_LOGIC);-d_o