//F_Div_20
//20分頻程序
module F_Div_20(Fout,Fin,Reset_N);
 output Fout;
 input Fin,Reset_N;
 reg Fout;
 reg [7:0] j;
 
 always @(posedge Fin)
  if (!Reset_N)     //復位信號，低電平有效
   begin  
    j<=0;
       Fout<=0;
   end
  else 
   begin 
    if (j==9) //2N分頻時，用（N－1）替換19，N<256
     begin
      j<=0;
      Fout<=~Fout;
     end
    else j<=j+1;
    
   end
  
 endmodule

//這個程序直接用在QII上會出現for語句不可綜合的問題，很奇怪。