#include <tiny2313.h>
#include <delay.h>
#define f0 PORTB.0
#define f1 PORTB.1
#define f2 PORTB.2

 int k;
 float n=5001; 
 float j=1000;

 void MKS(int n)
  {
   for (k=0; k<n; k++) 
    {
     delay_us(10);
    }
  }  

 int m;


 void main(void)
 {
  int i=0;

  #pragma optsize-
  CLKPR=0x80;
  CLKPR=0x00;
  #ifdef _OPTIMIZE_SIZE_
  #pragma optsize+
  #endif


  DDRB=0xFF;
  PORTB=0x00; 
 
  DDRD=0x00;
  PORTD=0x7F;

  m=1;
 
  while (1)
  {
   for(i=0; i<m; i++)
   {
    f0=1;
    f1=0;
    f2=0;
    MKS(n);
 
    f0=1;
    f1=1;
    f2=0;
    MKS(n);
  
    f0=0;
    f1=1;
    f2=0;
    MKS(n);
  
    f0=0;
    f1=1;
    f2=1;
    MKS(n);
  
    f0=0;
    f1=0;
    f2=1;
    MKS(n);
  
    f0=1;
    f1=0;
    f2=1;
    MKS(n);
   }
  
   
   if (n<5000 && n>1501) 
    {
     j=500;
    }  
    
   if (n<1500 && n>1000)
    { 
     j=50;
    }  
    
   if (n<1001 && n>507)
    { 
     j=8;
    }  
    
   if (n<506 & n>252)
    { 
     j=5;
     m=10;
    }
   
   if (n<252 & n>155)
    { 
     j=3;
     m=20;
    }
  
   if (n<154 & n>122)
    { 
     j=1;
     m=40;
    } 
  
   if (n==121 & n>102)
    { 
     j=0.75;
     m=150;
     PINB.3=1;
    } 
  
   if (n<101 & n>89.9)
     {
      j=0.65; 
      m=500;
      PINB.6=1;
     }
   
   if (n<90 & n>85.2)
     {
      j=0;
      PINB.5=1;
     }
    
    n=n-j;
   };
 }