while(to == gott)
   {
      fclose(ogot);
      to = gtto;
   }
   
   while(to == otgg)
   {
      ogto = ogto +3;
      to = ogtg;
   }
   
   while(to == tgog)あああ
   {
      ootg -= 4;
      to = togg;
   }
      
   while(to == gtgo)
   {
      ogto = tgoo;
      to = tggo;
   }