Changes between Version 6 and Version 7 of ToolsCourseTp1
- Timestamp:
- May 4, 2007, 3:38:21 PM (18 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
ToolsCourseTp1
v6 v7  66 66 type ETAT_TYPE is (E0, E1, E2, E3) ; 67 67 signal EF, EP : ETAT_TYPE; 68  pra--__ppp�--- pragma CURRENT_STATE EP69  ô€€€í¯€ í°€pragma NEXT_STATE EF70 Â í¯€ í°€ô€€€ pragma CLOCK CK 68 -- pragma CURRENT_STATE EP  69 ô€€€í¯€pragma NEXT_STATE EF  70 í¯€ô€€€ pragma CLOCK CK 71 71 begin 72 72 process (EP, i, reset) 73 73 begin 74  ACSI M2 5 75  TP2 Synthèse logique et génération de chemin de données  74  75  76 76 77 if (reset=’1’) then 77  EF<=E0; 78 EF<=E0; 78 79 else 79  case EP is80  when E0 =>81  if (i=’1’) then82  EF <= E1 ;83  else84  EF <= E0 ;85  end if ;86  when E1 =>87  if (i=’1’) then88  EF <= E2 ;89  else90  EF <= E0 ;91  end if ;92  when E2 =>93  if (i=’1’) then94  EF <= E3 ;95  else96  EF <= E0 ;97  end if ;98  when E3 =>99  if (i=’1’) then100  EF <= E3 ;101  else102  EF <= E0 ;103  end if ;104  when others => assert (’1’)105  report "etat illegal";106  end case ;107  end if ;108  case EP is109  when E0 =>110  o <= ’0’ ;111  when E1 =>112  o <= ’0’ ;113  when E2 =>114  o <= ’0’ ;115  when E3 =>116  o <= ’1’ ;117  when others => assert (’1’)118  report "etat illegal" ;119  end case ; 80 case EP is  81 when E0 =>  82 if (i=’1’) then  83 EF <= E1 ;  84 else  85 EF <= E0 ;  86 end if ;  87 when E1 =>  88 if (i=’1’) then  89 EF <= E2 ;  90 else  91 EF <= E0 ;  92 end if ;  93 when E2 =>  94 if (i=’1’) then  95 EF <= E3 ;  96 else  97 EF <= E0 ;  98 end if ;  99 when E3 =>  100 if (i=’1’) then  101 EF <= E3 ;  102 else  103 EF <= E0 ;  104 end if ;  105 when others => assert (’1’)  106 report "etat illegal";  107 end case ;  108 end if ;  109 case EP is  110 when E0 =>  111 o <= ’0’ ;  112 when E1 =>  113 o <= ’0’ ;  114 when E2 =>  115 o <= ’0’ ;  116 when E3 =>  117 o <= ’1’ ;  118 when others => assert (’1’)  119 report "etat illegal" ;  120 end case ; 120 121 end process ; 121  process(ck) 122  begin 123  if (ck=’1’ and not ck’stable) then 124  EP <= EF ; 125  end if ; 126  end process ;  122  123 process(ck)  124 begin  125 if (ck=’1’ and not ck’stable) then  126 EP <= EF ;  127 end if ;  128 end process ; 127 129 end MOORE ; 128 130