/*volatile long i,j,k=0,delay1;
int arr1[] = {1,100,500,1000,2000,1000,500,100,1};

int delayfunc1();
//int delayfunc2();

void setup() {
  //volatile char *dirf = (char *)0x30;
  volatile char *dirf;
  dirf = 0x30;
  *dirf = 0x03;
}

void loop() {
  //volatile char *outf = (char *)0x31;
  volatile char *outf;
  outf = 0x31;
  while(1)
  {
    delayfunc1();
    for(j = 0; j < 100; j++)
    {
      *outf = 0x01;
      for(i = 0; i < delay1; i++);
      *outf = 0x00;
      for(i = 0; i < 44250; i++);
    }
  }
}

int delayfunc1()
{
  if(k == 9)
    k = 0;
  delay1 = arr1[k];
  k++;
  return delay1;
}*/

volatile long i,j,k=0,delay1;
int arr1[] = {1,100,500,1000,2000,1000,500,100,1};

int delayfunc1();
//int delayfunc2();

void setup() {
  volatile char *dirf = (char *)0x30;
  *dirf = 0x03;
}

void loop() {
  volatile char *outf = (char *)0x31;
  while(1)
  {
    delayfunc1();
    for(j = 0; j < 100; j++)
    {
      *outf = 0x01;
      for(i = 0; i < delay1; i++);
      *outf = 0x00;
      for(i = 0; i < 44250; i++);
    }
  }
}

int delayfunc1()
{
  if(k == 9)
    k = 0;
  delay1 = arr1[k];
  k++;
  return delay1;
}