void setup() {
  volatile char *dirf, *dirk, *outf, *outk;
  dirf = 0x30; dirk = 0x107; outf = 0x31; outk = 0x108;
  *dirf = 0x03; *dirk = 0x03;
  volatile long i;
  while(1){
    *outf = 0x01;
    *outk = 0x02;
    for(i=0;i<500000;i++);
    *outf = 0x01;
    *outk = 0x01;
    for(i=0;i<500000;i++);*outf = 0x01;
    *outf = 0x02;
    *outk = 0x02;
    for(i=0;i<500000;i++);*outf = 0x01;
    *outf = 0x02;
    *outk = 0x01;
    for(i=0;i<500000;i++);*outf = 0x01;
  }


}