wsm318.v

在MAXPULS II环境下

module wsm318(key1,key2,key3,key4,hz1,hz1k,start,sound,l1,l2,l3,s);


input key1,key2,key3,key4,start,hz1,hz1k,s;
output sound,l1,l2,l3;
reg cnt,tt,st,px,ts,W,l1,l2,l3,k,sound,ss;

always @(posedge hz1) 
  begin
if (start==1)
 begin
      if (key1==1)
           begin
              if (cnt<30)
                 begin
                 cnt=cnt+1;
                 k=1;
                 l1=1;
                 end 
               else
                 begin
                  cnt=0;
                  k=0;            
                  W=1;
                  l1=0;                 
                 end           
             end
       if (key2==1)
           begin
              if (cnt<20)
                 begin
                 cnt=cnt+1;
                 k=1;
                 l1=1;
                 end
               else
                 begin
                  cnt=0;
                  k=0;            
                  W=1;
                  l1=0;
                 end           
             end

      if (key3==1)
           begin
              if (cnt<10)
                 begin 
                 cnt=cnt+1;
                 k=1;
                 l1=1;
                 end
               else
                 begin
                  cnt=0;
                  k=0;            
                  W=1;
                  l1=0;                 
                 end           
             end
   //עˮģʽ
   if (key4==1)
        begin
          if ( cnt<3)
            begin
            cnt=cnt+1;
            k=1;
            end
          else
            begin
            cnt=0;
            k=0;
          end
        end
         
   if (W==1 && cnt<3)
    begin
    cnt=cnt+1;
    l3=1;
    end
   else
    begin
     cnt=0;
     W=0;
     l3=0;
    end
  if (tt!=2 && W==0 ) 
   begin
     if (s==1 )
        begin            
         if(cnt<2 && st!=1)
           begin
             cnt=cnt+1;
             sound=hz1k;
             ss=1;
            end
          else
            begin
             sound=0;
             cnt=0;
             st=1;
             ss=0;
                        
            end
        end
      if (cnt<5 && px==0 && st==1)
         begin
         cnt=cnt+1;
         l2=1;
         end
       else
         begin
           cnt=0;
           px=1;
           l2=0;
           ts=0;
           px=0; 
         end
      if (ts==0 && px==1 )
          begin
          if (cnt<5)     
             begin
               cnt=cnt+1;
               l3=1;
               end
             else
               begin
                 cnt=0;                 
                 tt=tt+1;
                 st=0;
                 px=0;
                 l3=0;
               end
         end 
    end
 end
end



endmodule