control.vhd

自己刚写的一个RISC的cpu

                             muxalu2_c<='0';
                             en_r1<='0';
                             en_r2<='0';
                             jmp_imm<=instr(11 downto 0);
                           --end if;
                           
                           when "0110"=>
                          --if((instr(15 downto 12)="0110"))  then                          
                              ----jls
                              re<='0';
                              en_ir<='0';
                              comp_c<="001";
                              rra1<=instr(11 downto 10);
                              en_r1<='1';
                              rra2<=instr(9 downto 8);
                              en_r2<='1';
                              --en_wr<='0';
                              pcalu_c<="000";
                              comp_imm<=instr(7 downto 0);
                             -- end i
                                                        
                              when "0111"=> 
                           --if((instr(15 downto 12)="0111"))  then                          
                              ----jls
                              re<='0';
                              en_ir<='0';
                              comp_c<="010";
                              rra1<=instr(11 downto 10);
                              en_r1<='1';
                              rra2<=instr(9 downto 8);
                              en_r2<='1';
                              en_wr<='0';
                              pcalu_c<="000";
                              comp_imm<=instr(7 downto 0);
                             -- end if;
                             
                             when "1000"=> 
                            --if((instr(15 downto 12)="1000"))  then                          
                              ----jlg
                              re<='0';
                              en_ir<='0';
                              comp_c<="100";
                              rra1<=instr(11 downto 10);
                              en_r1<='1';
                              rra2<=instr(9 downto 8);
                              en_r2<='1';
                              en_wr<='0';
                              pcalu_c<="000";
                              comp_imm<=instr(7 downto 0);
                              --end if;
                             
                               when "1001"=> 
                            --if (instr(15 downto 12)="1001") then
                               ---rdm
                                re<='1';
                                en_ir<='0';
                                rdm_imm<=instr(9 downto 0);
                                --en_ir<='0';
                                alu_c<="00";
                                en_r1<='0';
                                en_r2<='0';   
                                en_wr<='1';
                                wra<=rs;
                                muxwrd_c<="10";
                                re<='1';--ram output enable
                                pcalu_c<="001" ;
                           --end if;
                           when others=>
                                   null;
                            end case;
                         
                     
                      when EXECUTE =>
                             case temp is 
                             when "0001" =>
                          --IF((instr(15 downto 12)="0001")or (instr(15 downto 12)="0010")
                             --     or(instr(15 downto 12)="0011")) then
                             ----and,or,xor
                             alu_c<="00";
                             wra<=instr(7 downto 6);
                             en_r1<='0';
                             en_r2<='0';
                             muxwrd_c<="00";
                             en_wr<='1';
                             en_ir<='0';
                             re<='0';
                             pcalu_c<="100";  --pc+1
                             when "0010" =>
                          --IF((instr(15 downto 12)="0001")or (instr(15 downto 12)="0010")
                             --     or(instr(15 downto 12)="0011")) then
                             ----and,or,xor
                             alu_c<="00";
                             wra<=instr(7 downto 6);
                             en_r1<='0';
                             en_r2<='0';
                             muxwrd_c<="00";
                             en_wr<='1';
                             en_ir<='0';
                             re<='0';
                             pcalu_c<="100";  --pc+1
                          --end if;
                          --end if;
                             when "0011" =>
                          --IF((instr(15 downto 12)="0001")or (instr(15 downto 12)="0010")
                             --     or(instr(15 downto 12)="0011")) then
                             ----and,or,xor
                             alu_c<="00";
                             wra<=instr(7 downto 6);
                             en_r1<='0';
                             en_r2<='0';
                             muxwrd_c<="00";
                             en_wr<='1';
                             en_ir<='0';
                             re<='0';
                             pcalu_c<="100";  --pc+1
                          --end if;
                          
                            when "0100"=>
                          --if(instr(15 downto 12)="0100") then
                               ----mov
                            re<='0';
                            en_ir<='0';
                            en_r1<='0';
                            en_r2<='0';   
                            en_wr<='1';
                            wra<=rs;
                            muxwrd_c<="01";
                            --wrd<=instr(0);
                            muxwrd_mov<=instr(0);
                            pcalu_c<="100" ;
                           -- end if;
                           
                           when "0101" =>
                           --if(instr(15 downto 12)="0101") then
                           ----jmp
                             en_ir<='0';
                             re<='0';
                             pcalu_c<="010";
                             jmp_imm<=instr(11 downto 0);
                           --end if;
                           
                           --if((instr(15 downto 12)="0110"))  then                          
                              ----jls
                              when "0110"=>
                              en_r1<='1';
                              en_r2<='1';
                              en_wr<='1';
                              re<='0';
                              en_ir<='0';
                              en_wr<='0';
                              comp_c<="001";
                              rra1<=instr(11 downto 10);
                              rra2<=instr(9 downto 8);
                              pcalu_c<="000";
                              comp_imm<=instr(7 downto 0);
                              --end if;
                              
                            --if((instr(15 downto 12)="0110"))  then                          
                              ----jeq
                              when "0111" =>
                              en_r1<='1';
                              en_r2<='1';
                              en_wr<='1';
                              re<='0';
                              en_ir<='0';
                              en_wr<='0';
                              comp_c<="010";
                              rra1<=instr(11 downto 10);
                              rra2<=instr(9 downto 8);
                              pcalu_c<="000";
                              comp_imm<=instr(7 downto 0);
                             -- end if;
                              
                            --if((instr(15 downto 12)="0110"))  then                          
                              ----jlg
                              when "1000" =>
                              en_r1<='1';
                              en_r2<='1';
                              en_wr<='1';
                              re<='0';
                              en_wr<='0';
                              en_ir<='0';
                              comp_c<="100";
                              rra1<=instr(11 downto 10);
                              rra2<=instr(9 downto 8);
                              pcalu_c<="000";
                              comp_imm<=instr(7 downto 0);
                              --end if;  
                              
                               when "1001"=>
                            --if (instr(15 downto 12)="1001") then
                               ---rdm
                                rdm_imm<=instr(9 downto 0);
                                alu_c<="00";
                                en_r1<='0';
                                en_r2<='0';   
                                en_wr<='1';
                                wra<=rs;
                                muxwrd_c<="10";
                                re<='1';--ram output enable
                                pcalu_c<="001" ;
                           --end if;
                               when others=>
                                  null;
                              end case;
                      when others=>
                           null;
                  end case; 
                      
               end if;
            end process BODY_MAIN;
end one;