void setup (){
volatile char* dir ;
dir= 0x30; // port F direction 
*dir=0xFF; // output 
dir=0x107; // port k direction register
*dir =0xFF; // output 



}
void loop(){
volatile char*out ;
volatile long i;

out =0x108;  // port k 
*out=0x02;
out=0x31; //port F
*out=0x01;
for(i=0;i<100000;i++);


out =0x108;  // port k 
*out=0x01;
out=0x31; //port F
*out=0x01;

}