数字电路与逻辑设计综合实验-掷骰子游戏

数字电路与逻辑设计综合实验掷骰子游戏电路的设计与实现学院：信息与通信工程学院班级：2012XXXXXX学号：2012XXXXXX姓名：学渣数字电路与逻辑设计综合实验数字电路与逻辑设计综合实验--PAGE20-目录：一、设计课题的任务要求……3二、系统设计……31、设计思路……32、总体框图……4ASM……4MDS……63分频器模块……6状态机控制模块（主功能模块）……7数码管显示模块……13点阵显示模块三、仿真波形及波形分析……15四、源程序及注释……17五、功能说明及资源利用情况……39六、实现效果图……40七、故障及问题分析……43八、总结和结论……44一、设计课题的任务要求：设计并实现一个掷骰子游戏电路。基本要求：1BTN0BTN1。2、每按一次按键，代表掷一次骰子，可随机得到1～6范围内的两个数字。3、甲乙按键产生的随机数字分别用数码管DISP0-DISP1、DISP2-DISP3显DISP78×8效果。4、具体游戏规则如下：711者胜；若无人取胜，则进行第二局比赛；（2胜者为止。游戏局数最多进行六局。在第六局比赛时，若重复进行步骤（2）仍未出现胜者，以按键所得两数之和最大者为获胜方。提高要求：1、增加多人游戏的功能，数码管可分时记录显示每个游戏者的骰子点数。2、点阵显示增加游戏开机动画、结束动画，并伴有乐曲播放。3、自拟其它功能。二、系统设计1、设计思路：系统结构框图如下：游戏控制模块以外部输入的随机数生成信号、游戏控制信号以及时钟信号为依同的分频器给出。为了更加方便的实现状态机、实现状态之间的跳转以及各个模块之间的连VHDL当中，其中以不同的进程来划分不同的模块。2、总体框图：ASM图：游戏控制及状态转移部分的MDS图：9athrowbthrow分别是甲和乙掷骰子的状态，athrowbthrowbthrows1~s6否则将会保持在本状态。s0是过渡状态，在这个状态将所有的信号都初始化为原始的状态。s1~s6s1~s6next_state信号决定的。3、分块设计：分频器模块（以用于产生随机数两个分频器为例：FENPINONE:PROCESS(clk)BEGINIFclk'eventANDclk='1'THENIFtmp1=6THENtmp1<=1;clktmp1<=notclktmp1;ELSEtmp1<=tmp1+1;ENDIF;ENDIF;ENDPROCESSFENPINONE;FENPINTWO:PROCESS(clktmp1)BEGINIFclktmp1'eventANDclktmp1='1'THENIFtmp2=6THENtmp2<=1;clktmp2<=notclktmp2;ELSEtmp2<=tmp2+1;ENDIF;ENDIF;ENDPROCESSFENPINTWO;这两个分频器实现了两个功能：tmp216tmp1disp0disp2tmp2disp1disp3tmp1tmp2disp0<=disp1<=jiaadd<=tmp1+disp2<=tmp1;disp3<=tmp2;yiadd <=tmp1+tmp2;不相同，所以随机性得以保证。其次，这两个分频器结合，实现了对原始时钟信号的196分频。clktmptmp状态机控制模块（主功能模块：转移，以及实现胜利的声音效果和开机声音效果。该模块主要用CASE-WHEN语句实现，关键分析如下：CASEathrow这个游戏状态时，将进WHENbtn0‘1’，则将当前tmp1tmp2tmp1tmp2gamestatebthrowgameresult3，athrow这个状态。SIGNAL的时候信号赋值才会生效（其实这个时间很短，人看起来是近乎同时的，所以register_disp7disp7信号，实现上述功能。s0状态。s0实现对所有信号的初始化或者清零，避免进入下一场比赛后影响比赛的比较判断。s1s1711，那么那一方将获胜，否则将进入下一局。若甲乙双方都满足以上条件，则产生平局，然后进入下一局。在这个状态中，next_state信号也想当于一个寄存器，存储了该局比赛结束后的下一个状态，这样在掷骰子的时候才能判断该跳转进入哪一个状态。tmpjtmpy局至第六局的比较判断。s2~s5s6s6s0状态，将所有的信号初始化或者清零。甲乙胜利之后的声音效果。为了区别甲胜或者乙胜，还分别使用了不10’的时候，蜂鸣器不鸣响。reset0CASE语句检测tmp81当时钟信号为’1’时，蜂鸣器鸣响，不同的时钟信号，对应于不同的频率，频数码管显示模块：dispNUMCASE中立刻检测，然后让当前点亮的数码管显示出相应的随机数。当扫描频率大于（30*6）Hz时，由于人眼暂留效应，玩家将看到五个数码管上的数字持续显示（有一个数码管没有用上，禁止其显示。但是，频率不能取得太高，否则会出现数码管亮度不够的情况。点阵显示模块（只截取部分作解释：CASEgameresultCASEtmp818011就可以一个一个将开机动画的图案在稿纸上确定下来，然后用程序实现。三、仿真波形及波形分析：上图是乙按下按键之后的状态转移波形图。（btn1为低电平ebthrows1athrow状态，等待甲下一次按键。上图是点阵显示的仿真波形。01在甲掷骰子之后、乙掷骰子之前，点阵将显示绿色的过渡图案，即一个笑脸图案；甲乙第一次掷出骰子后，程序将进行比较判断，由图可以看出，仿真中出现的结果是平局，在点阵上将显示一个红色的“平”字样；甲乙第二次掷出骰子后，仿真中出现的结果是乙胜，在点阵上将显示绿色的“乙胜”字样，在下一次按键按下之前，可以看到，扫描会重复进行；甲乙第三次掷出骰子后，点阵将显示红色的“平”字样。上图左边和右边分别是甲、乙第一次按键之前之后的数码管信号的仿真波形图。都在逐个定时扫描，其中一直设置为1，也即禁止其显示。首先看左图，由于是第一次按键，甲按键之前的各种状态都是初始状态，所以SMGOUT 信号为也即显示中间的一条横杆当甲按键按下产生两个随机数之后和为0时，也即前两个数码管可以显示的时候，对应的SMGOUT信号的值变为”0110000”和”1011011”，分别对应数字1和5。然后看右图，乙按键之前的状态一直保持不变，乙按键之后，和0SMGOUT信号的值变为”0110000”和”011000011SMGOUT信号没有变化，也即甲乙投掷骰子产生的随机数互相不影响。四、源程序及注释：--掷骰子游戏——信通XXXXXXX——2012XXXXXXLIBRARYIEEE;USEIEEE.STD_LOGIC_1164.ALL;USEIEEE.STD_LOGIC_UNSIGNED.ALL;ENTITYtouziISPORT(clk:INSTD_LOGIC;--时钟输入信号reset:INSTD_LOGIC;--开机动画开启关闭输入信号start:INSTD_LOGIC;--开始游戏按键bnt0,bnt1:INSTD_LOGIC;--按键信号输入SMGCAT:OUTSTD_LOGIC_VECTOR(5DOWNTO0);--数码管使能端输出信号SMGOUT:OUTSTD_LOGIC_VECTOR(6DOWNTO0);--数码管显示输出信号clkout1,clkout2,clkout3,clkout4:OUTSTD_LOGIC;--分频器输出时钟信号，为了分析的方便，仅此而已row,col1,col2:outstd_logic_vector(7downto0);--点阵行列输出信号，col1是红，col2是绿（行0列1时点阵亮）beep_out:OUTSTD_LOGIC--蜂鸣器输出信号);ENDtouzi;ARCHITECTUREtouzisignalOFtouziISTYPEstate_typeIS(athrow,bthrow,s0,s1,s2,s3,s4,s5,s6);--游戏状态（甲掷乙掷&1~6局&s0过渡态用于复位）gamestate,next_state:state_type;--游戏状态信号--分频器中的计数标志SIGNALtmp1:INTEGERRANGE1TO6;--只取1~6避免出现异常情况SIGNALtmp2:INTEGERRANGE1TO6;SIGNALtmp3:INTEGERRANGE0TOSIGNALtmp4:INTEGERRANGE0TOSIGNALtmp5:INTEGERRANGE0TOSIGNALtmp6:INTEGERRANGE0TOSIGNALtmp7:INTEGERRANGE0TO5;SIGNALtmp8:INTEGERRANGE0TO--分频后的时钟信号SIGNALclktmp1:STD_LOGIC;SIGNALclktmp2:STD_LOGIC;SIGNALclktmp3:STD_LOGIC;SIGNALclktmp4:STD_LOGIC;SIGNALclktmp5:STD_LOGIC;SIGNALclktmp6:STD_LOGIC;SIGNALclktmp7:STD_LOGIC;SIGNALclktmp8:STD_LOGIC;L:RE0O胜平，用于判断游戏状态走向点阵显示--SIGNALwinorlose:STD_LOGIC;--胜利OR平局SIGNALdisp0:INTEGERRANGE0TO6;--D0~D3数码管信号的传递信号,显示随机数SIGNALdisp1:INTEGERRANGE0TO6;SIGNALdisp2:INTEGERRANGE0TO6;SIGNALdisp3:INTEGERRANGE0TO6;SIGNALdisp7:INTEGERRANGE0TO6;--显示局数SIGNALregister_disp7:INTEGERRANGE0TO6;--用于在上一个状态寄存局数信号SIGNALjiaadd:INTEGERRANGE0TO12;--甲两数和SIGNALyiadd:INTEGERRANGE0TO12;--乙两数和SIGNALtmpj:INTEGERRANGE0TO12;--甲的第一次两数和，用于判断前后合数是否相等SIGNALtmpy:INTEGERRANGE0TO12;--同上，为乙的SIGNALcount:INTEGERRANGE0TO5;--计数，用在SMG扫描显示中--SIGNALkeybeep:STD_LOGIC;--SIGNALbeepcount:INTEGERRANGE0TO40000;--SIGNALbeeptmp:STD_LOGIC;SIGNALbeepstart:STD_LOGIC;--SIGNALmusic_state:INTEGERRANGE0TO35;--音乐的状态--SIGNALmcount1:INTEGERRANGE0TO1000;--SIGNALtone:INTEGERRANGE0TO100000;--SIGNALmspk_count:INTEGERRANGE0TO100000;BEGIN--分频器组FENPINONE:PROCESS(clk)--tmp1,tmp2用于产生随机数1~6BEGINIFclk'eventANDclk='1'THENIFtmp1=6THENtmp1<=1;clktmp1<=notclktmp1;ELSEtmp1<=tmp1+1;ENDIF;ENDIF;ENDPROCESSFENPINONE;FENPINTWO:PROCESS(clktmp1)BEGINIFclktmp1'eventANDclktmp1='1'THENIFtmp2=6THENtmp2<=1;clktmp2<=notclktmp2;ELSEtmp2<=tmp2+1;ENDIF;ENDIF;ENDPROCESSFENPINTWO;FENPINTHREE:PROCESS(clktmp2)BEGINIFclktmp2'eventANDclktmp2='1'THENIFtmp3=7THENtmp3<=0;clktmp3<=notclktmp3;ELSEtmp3<=tmp3+1;ENDIF;ENDIF;ENDPROCESSFENPINTHREE;FENPINFOURE:PROCESS(clktmp3)BEGINIFclktmp3'eventANDclktmp3='1'THENIFtmp4=1THENtmp4<=0;clktmp4<=notclktmp4;ELSEtmp4<=tmp4+1;ENDIF;ENDIF;ENDPROCESSFENPINFOURE;FENPINFIVE:PROCESS(clktmp4)--用tmp5来控制点阵扫描显示单个图案所以0~7BEGINIFclktmp4'eventANDclktmp4='1'THENIFtmp5=7THENtmp5<=0;clktmp5<=notclktmp5;ELSEtmp5<=tmp5+1;ENDIF;ENDIF;ENDPROCESSFENPINFIVE;FENPINJIASOUND:PROCESS(clktmp5)--用其中的clktmp6信号来控制甲胜之后的声音效果BEGINIFclktmp5'eventANDclktmp5='1'THENIFtmp6=12THENtmp6<=0;clktmp6<=notclktmp6;ELSEtmp6<=tmp6+1;ENDIF;ENDIF;ENDPROCESSFENPINJIASOUND;FENPINYISOUND:PROCESS(clktmp6)--用其中的clktmp7信号来控制乙胜之后的声音效果BEGINIFclktmp6'eventANDclktmp6='1'THENIFtmp7=2THENtmp7<=0;clktmp7<=notclktmp7;ELSEtmp7<=tmp7+1;ENDIF;ENDIF;ENDPROCESSFENPINYISOUND;FENPINDONGHUA:PROCESS(clktmp7)--用tmp8信号控制点阵动画BEGINIFclktmp7'eventANDclktmp7='1'THENIFtmp8=24THENtmp8<=0;clktmp8<=notclktmp8;ELSEtmp8<=tmp8+1;ENDIF;ENDIF;ENDPROCESSFENPINDONGHUA;clkout1<=clktmp1;clkout2<=clktmp2;clkout3<=clkout4<=状态机控制模块产生随机数&比较判断&状态转移&声音效果SUIJISHU:PROCESS(clk)BEGINIF(start='0')THEN--初始化&disp0<=0;disp1<=0;disp2<=0;disp3<=0;gamestate<=gameresult<=3;--比赛过渡部分，显示过渡画面next_state<=s1;disp7<=0;register_disp7<=1;beepstart<='0';ELSIF(clk'eventANDclk='1')THENCASEgamestateISWHENathrow=>IF(bnt0='1')THENdisp0<=disp1<=disp2<=0;disp3<=0;jiaadd<=tmp1+tmp2;gamestate<=bthrow;disp7<=register_disp7;gameresult<=3;beepstart<='1';ELSEgamestate<=athrow;beepstart<='0';ENDIF;WHENbthrow=>

IF(bnt1='1')THENdisp2<=tmp1;disp3<=tmp2;yiadd <=tmp1+tmp2;WHENs0=>WHENs1=>WHENs2=>

gamestate<=next_state;beepstart<='1';ELSEgamestate<=bthrow;beepstart<='0';ENDIF;disp0<=0;disp1<=0;disp2<=0;disp3<=0;tmpj<=0;tmpy<=0;jiaadd<=0;yiadd<=0;gameresult<=3;gamestate<=athrow;next_state<=s1;register_disp7<=1;beepstart<='0';beepstart<='0';tmpj<=jiaadd;tmpy<=yiadd;IF(jiaadd=7ORjiaadd=11)THENIF(yiadd/=7ANDyiadd/=11)THENgameresult<=1;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s2;register_disp7<=2;ENDIF;ELSEIF(yiadd=7ORyiadd=11)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s2;register_disp7<=2;ENDIF;ENDIF;WHENs3=>WHENs4=>

beepstart<='0';IF(jiaadd=tmpjANDyiadd/=tmpy)THENgameresult<=1;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSIF(jiaadd/=tmpjANDyiadd=tmpy)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s3;register_disp7<=3;ENDIF;beepstart<='0';IF(jiaadd=tmpjANDyiadd/=tmpy)THENgameresult<=1;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSIF(jiaadd/=tmpjANDyiadd=tmpy)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s4;register_disp7<=4;ENDIF;beepstart<='0';IF(jiaadd=tmpjANDyiadd/=tmpy)THENgameresult<=1;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSIF(jiaadd/=tmpjANDyiadd=tmpy)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s5;register_disp7<=5;ENDIF;WHENs5=>

beepstart<='0';IF(jiaadd=tmpjANDyiadd/=tmpy)THENgameresult<=1;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSIF(jiaadd/=tmpjANDyiadd=tmpy)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s6;register_disp7<=6;ENDIF;WHENs6=>beepstart<='0';IF(jiaadd=tmpjANDyiadd/=tmpy)THENgameresult<=1;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSIF(jiaadd/=tmpjANDyiadd=tmpy)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEIF(jiaadd>yiadd)THENgameresult<=1;gamestate<=next_state<=s0;register_disp7<=0;ELSIF(jiaadd<yiadd)THENgameresult<=2;gamestate<=athrow;next_state<=s0;register_disp7<=0;ELSEgameresult<=0;gamestate<=athrow;next_state<=s0;register_disp7<=0;ENDIF;ENDIF;WHENOTHERS=>beepstart<='0';gameresult<=0;gamestate<=athrow;next_state<=s0;register_disp7<=0;ENDCASE;--胜利之后的声音效果IF(beepstart='1')THENbeep_out<='1';ENDIF;

ELSECASEgameresultISWHEN0=>beep_out<='0';WHEN1=> IF(clktmp6='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN2=> IF(clktmp7='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN3=>beep_out<='0';WHENOTHERS=>beep_out<='0';ENDCASE;ENDIF;开机音乐IF(reset='0')CASEtmp8ISWHEN0=>IF(clk='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN1=>IF(clktmp1='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN2=>IF(clktmp2='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN3=>IF(clktmp3='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN4=>IF(clktmp4='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN5=>IF(clktmp5='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN6=>IF(clktmp6='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN7=>IF(clktmp7='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN8=>IF(clktmp8='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN9=>IF(clktmp7='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN10=>IF(clktmp6='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN11=>IF(clktmp5='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN12=>IF(clktmp4='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN13=>IF(clktmp3='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN14=>IF(clktmp2='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN15=>IF(clktmp1='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN16=>IF(clk='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN17=>IF(clktmp2='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN18=>IF(clktmp4='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN19=>IF(clktmp6='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN20=>IF(clktmp8='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN21=>IF(clktmp1='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN22=>IF(clktmp3='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN23=>IF(clktmp5='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHEN24=>IF(clktmp7='1')THENbeep_out<='1';ELSEbeep_out<='0';ENDIF;WHENOTHERS=>beep_out<='0';ENDCASE;ENDIF;ENDPROCESSSUIJISHU;数码管显示模块SMGSHOW:PROCESS(clktmp1)VARIABLENUM:INTEGERRANGE0TO6;--变量传送信号，立即生效BEGINIF(clktmp1'eventANDclktmp1='1')THENIFreset='0'THENSMGCAT<="000000";SMGOUT<="0000001";ELSIFstart='0'THENSMGCAT<="000000";SMGOUT<="0000001";ELSEIF(count=5)THENcount<=0;ELSEcount<=count+1;ENDIF;CASEcountISWHEN0=> NUM:=disp0;WHEN1=> NUM:=disp1;WHEN2=> NUM:=disp2;WHEN3=> NUM:=disp3;WHEN4=> WHEN5=> NUM:=disp7;WHENOTHERS=>SMGCAT<="111111";ENDCASE;CASENUMISWHEN1=>SMGOUT<="0110000";WHEN2=>SMGOUT<="1101101";3=><=WHEN4=>SMGOUT<="0110011";WHEN5=>SMGOUT<="1011011";6=><=WHENOTHERS=>SMGOUT<="0000001";ENDCASE;ENDIF;ENDIF;ENDPROCESSSMGSHOW;点阵显示模块（行扫描）DIANZHEN:PROCESS(clk)BEGINIF(reset='1')THENCASEgameresultISWHEN0=> CASEtmp5ISWHEN0=> col1<="00000000";WHEN1=> col1<="00111110";WHEN2=> col1<="00101010";WHEN3=> col1<="00011100";WHEN4=> WHEN5=> col1<="00001000";WHEN6=> col1<="00001000";WHEN7=> col1<="00001000";WHENOTHERS=>NULL;ENDCASE;WHEN1=> col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> WHEN2=> WHEN3=> WHEN4=> col2<="11111010";WHEN5=> col2<="00010110";WHEN6=> col2<="00000010";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN2=> col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> WHEN2=> col2<="11111010";WHEN3=> col2<="11111101";WHEN4=> WHEN5=> col2<="00010100";WHEN6=> col2<="00000000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN3=> 过渡画面col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> col2<="00100010";WHEN2=> col2<="01010101";WHEN3=> col2<="01010101";WHEN4=> col2<="00000000";WHEN5=> col2<="00010100";WHEN6=> col2<="00010100";WHEN7=> col2<="00001000";WHENOTHERS=>NULL;ENDCASE;ENDCASE;ELSE--开机动画，显示WELCOMETOTHEGAME^^321名字CASEtmp8ISWHEN0=> col1<="00000000";CASEtmp5ISWHEN0=> col2<="00000000";WHEN1=> col2<="01000001";WHEN2=> col2<="01000001";WHEN3=> col2<="01001001";WHEN4=> col2<="01001001";WHEN5=> col2<="00101010";WHEN6=> col2<="00010100";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN1=> col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> col2<="00111100";WHEN2=> col2<="00000100";WHEN3=> col2<="00011100";WHEN4=> col2<="00000100";WHEN5=> col2<="00111100";WHEN6=> col2<="00000000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN2=> col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> col2<="00000100";WHEN2=> col2<="00000100";WHEN3=> col2<="00000100";WHEN4=> col2<="00000100";WHEN5=> col2<="00000100";WHEN6=> col2<="00111100";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN3=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<="00111100";WHEN2=> col2<="00100010";WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<="00111100";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN4=>col1<="00000000";casetmp5iswhen0=> col2<=

WHEN1=> col2<="00011000";WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<="00011000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN5=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<=WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<=WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN6=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<="00111100";WHEN2=> col2<="00000100";WHEN3=> col2<="00011100";WHEN4=> col2<="00000100";WHEN5=> col2<="00111100";WHEN6=> col2<="00000000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;

ENDCASE;WHEN7=> col1<="00000000";casetmp5iswhen0=> <=WHEN1=> <=WHEN2=> col2<="00011000";WHEN3=> col2<="00011000";WHEN4=> col2<="00011000";WHEN5=> col2<="00011000";WHEN6=> col2<="00011000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN8=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<="00011000";WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<="00011000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN9=>col1<="00000000";casetmp5iswhen0=> <=WHEN1=> <=WHEN2=> col2<="00011000";WHEN3=> col2<="00011000";WHEN4=> col2<="00011000";WHEN5=>

col2<="00011000";WHEN6=> col2<="00011000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN10=> col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> col2<="01100110";WHEN2=> col2<="01100110";WHEN3=> col2<="01111110";WHEN4=> col2<="01111110";WHEN5=> col2<="01100110";WHEN6=> col2<="01100110";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN11=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<="00111100";WHEN2=> col2<="00000100";WHEN3=> col2<="00011100";WHEN4=> col2<="00000100";WHEN5=> col2<="00111100";WHEN6=> col2<="00000000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN12=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<="00011100";WHEN2=>

col2<=WHEN3=> col2<=WHEN4=> col2<="00111010";WHEN5=> col2<="00100010";WHEN6=> col2<="00111100";WHEN7=> col2<="00100000";WHENOTHERS=>NULL;ENDCASE;WHEN13=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<=WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<="00011100";WHEN5=> col2<="00011100";WHEN6=> col2<="00010100";WHEN7=> col2<="00010100";WHENOTHERS=>NULL;ENDCASE;WHEN14=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<=WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<=WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN15=>col1<="00000000";

casetmp5iswhen0=> col2<=WHEN1=> col2<="00111100";WHEN2=> col2<="00000100";WHEN3=> col2<="00011100";WHEN4=> col2<="00000100";WHEN5=> col2<="00111100";WHEN6=> col2<="00000000";WHEN7=> col2<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN16=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<=WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<=WHEN7=> col2<="00001000";WHENOTHERS=>NULL;ENDCASE;WHEN17=>col1<="00000000";casetmp5iswhen0=> col2<=WHEN1=> col2<=WHEN2=> col2<=WHEN3=> col2<=WHEN4=> col2<=WHEN5=> col2<=WHEN6=> col2<=

--^^--^^WHEN7=> col2<="00001000";WHENOTHERS=>NULL;ENDCASE;WHEN18=> --^^col1<="00000000";casetmp5iswhen0=> col2<="00000000";WHEN1=> col2<="00100010";WHEN2=> col2<="01010101";WHEN3=> col2<="01010101";WHEN4=> col2<="00000000";WHEN5=> col2<="00010100";WHEN6=> col2<="00010100";WHEN7=> col2<="00001000";WHENOTHERS=>NULL;ENDCASE;WHEN19=>col2<="00000000";CASEtmp5ISWHEN0=> col1<=WHEN1=> col1<="00111100";WHEN2=> col1<="00100000";WHEN3=> col1<="00111100";WHEN4=> col1<="00100000";WHEN5=> col1<="00111100";WHEN6=> col1<="00000000";WHEN7=> col1<="00001000";WHENOTHERS=>NULL;ENDCASE;WHEN20=>col2<="00000000";CASEtmp5ISWHEN0=> col1<=WHEN1=> col1<="00111100";WHEN2=> col1<="00100000";WHEN3=> col1<="00111100";

WHEN4=> col1<="00000100";WHEN5=> col1<="00111100";WHEN6=> col1<="00000000";WHEN7=> col1<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN21=> col2<="00000000";CASEtmp5ISWHEN0=> col1<="00000000";WHEN1=> col1<="00010000";WHEN2=> col1<="00011000";WHEN3=> col1<="00010000";WHEN4=> col1<="00010000";WHEN5=> col1<="00111000";WHEN6=> col1<="00000000";WHEN7=> col1<="00000000";WHENOTHERS=>NULL;ENDCASE;WHEN22=>col1<="00000000";casetmp5iswhen0=> col2<="00111100";WHEN1=> col