Преобразование m-арного дерева в бинарное

#include <iostream>
#include <fstream>
#include <string>
#define FILE "temp.txt"
 
 
 
 
using namespace std; //prostransvo imen;
//structura dereva
 
 
struct mTree{
       mTree *l,*m,*k;
       char value[50]; 
       mTree();      
};
mTree* H = NULL; 
 
 
mTree::mTree(){
      this->l = NULL;
      this->m = NULL;
      this->k = NULL;               
}
 
 
 
struct Tree{
   Tree *l,*r; //ukaz levprav   
   char value[50]; //par
   Tree();       
};
 
Tree* Head = NULL;        //der
//zdn vet
Tree::Tree(){
  this->l = NULL;    //prav ve //const ukaz na object
  this->r = NULL;    //lev ve 
}
 
 
 
int kk=1;
int pp=0;
int bb=0;
 
 
int cmp(const char *a,const char *b){     //коморатор
 if (strlen(a)!=strlen(b))
   return strlen(a) - strlen(b);//f sravn dlin strok 
   return strcmp(a,b);
}
 
//Udalenie dereva
void Delete(Tree* a){
  if (!a) return;
  Delete (a->l); //lev
  Delete (a->r); //prav  
  delete a;      
}
 
//obhod po derevu,poisk
//levoe->centr->pravoe
Tree * Search(const char* a,Tree* h){
       if (!h) return NULL;   //proverka na pust
       if (!strcmp(a,h->value)) return h;      
//fun cmp
       if (h->l) if (!strcmp(h->l->value,a)) return h;
       if (h->r) if (!strcmp(h->r->value,a)) return h;  
       if (cmp(a,h->value)>=0) return Search(a,h->l); //esli dlina stroki A <= stroki iz H (value) -> to pereidti vlevo po derevu  
       else  return Search(a,h->r);     //else vpravo
}
//udalenie
void Case3(){
  cout <<"Vvedite Element"<<endl; //vibor udalyaemogo elementa
  char s[50];      
  cin >> s;         //console input (hranim udal el)
  Tree * Find = Search(s,Head);
  if (!Find) return;
  if (Find->l) if (!strcmp(Find->l->value,s)){ Delete(Find->l); Find->l = NULL; return;} 
  if (Find->r) if (!strcmp(Find->r->value,s)){ Delete(Find->r); Find->r = NULL; return;}
  if (Find == Head && !strcmp(Find->value,s)) Head = NULL;
  Delete(Find);  
  bb=0;   
}
 
//dobav el v derevo  HEAD
Tree* Add(Tree* a,const char *s){
  if (!a){
     a = new Tree(); 
     strcpy(a->value,s);  //copy
     return a;
  }
  //if (!strcmp(a->value,s)) return a;  
//levoe
  if (cmp(a->value,s)<=0){     
     if (!(a->l)) a->l = Add(a->l,s);  //dob v derevo
     else Add(a->l,s);
  }
//pravoe
  else if (!(a->r)) a->r = Add(a->r,s);
                      else Add(a->r,s);
  return a;
       
}
 
//vvod
void Case1(){
  if (Head) Delete(Head);
  int h;
  cout <<"Kol: ";
  cin >> h;                                 //zagruzka v h
  cout <<endl<<h<<" Words:"<<endl;         //+vivod kol
  char s[50];
  Head = NULL;
  for (int i=0;i<h;i++){
      cin >> s;                             //zagruzka el v h
      Head = Add(Head,s);                   
  }        
}
//f print
void PR(Tree* a){
  if (!a) return;
  PR(a->l); //lev
  cout << a->value<<endl;
  PR(a->r); //prav  
}
 
//pe4at na ekran individ zadaniya
void Case2(){
     cout << "Tree"<<endl;
     PR(Head);               //print vizov
     char t; 
     cin >> t;               //cons input
}
 
//save file //potok na vihod
void SF(Tree *a, ofstream& out){
   if (!a) out << "----"<<endl;   //esli  pustaya vetv   
   else {
        out << a->value<<endl;    //loshim
        SF(a->l,out);             //prav
        SF(a->r,out);             //lev
   }  
}
 
void Case4(){
  ofstream out(FILE);   //potok na vida4u
  SF(Head,out);         //save
  out.close();          //zakritie
}
//zagruzka dereva v file
Tree* LF(ifstream& in){
    char s[50];
    Tree *a;
    in >> s;
    if (!strcmp(s,"----")) a = NULL;  //esli  pustaya vetv
    else {
         a = new Tree();
         strcpy(a->value,s);
         a->l = LF(in);  //podgruz prav
         a->r = LF(in);  //lev
    }
    return a;          
}
 
void Case5(){
  Delete(Head);   
  ifstream in(FILE);
  Head = LF(in); //zagruzka dereva v file
  
  in.close();         
        
}
 
 
 
void PPrint(Tree *a,int level){
 
    if (a==NULL) return;
    if (a->r) PPrint(a->r,level+5); //если правое поддерево не пустое, вызываем ф-цию вывода для него
    for (int i=0; i<level; i++)
        printf(" "); //выводим отступы
    printf("%s\n",a->value); //выводим элемент дерева
    if (a->l) PPrint(a->l,level+5); //если левое поддерево не пустое, то вызываем ф-цию вывод для него
 
 
}
void mPrint(mTree *b,int level){
 
    if (b==NULL) return;
    if (b->k) 
       {
        pp=0;
        mPrint(b->k,level+5); //если правое поддерево не пустое, вызываем ф-цию вывода для него
       }    
    if (pp==0) 
    {
    for (int i=0; i<level; i++)
        printf(" "); //выводим отступы
    printf("%s\n",b->value);
    pp++;   
    } //выводим элемент дерева
    else 
    {
     if (b->m) 
        { 
          mPrint(b->m,level+5);
        } //если правое поддерево не пустое, вызываем ф-цию вывода для него
    for (int i=0; i<level; i++)
        printf(" "); //выводим отступы
    printf("%s\n",b->value); //выводим элемент дерева
    if (b->l) 
       { 
         mPrint(b->l,level+5); 
       }
    } //если левое поддерево не пустое, то вызываем ф-цию вывод для него
}
 
void Case6()
{ 
  system("cls");
      //potok na vida4u
  if  (bb==1) 
  {
  cout<< "Binarnaya"<<endl; 
  PPrint(Head,0); 
  cout<< "m-arnaya"<<endl;  
  mPrint(H,0); 
  char x;
  cin >> x;
  }
  else 
  {
    cout<< "Binarnaya"<<endl; 
    PPrint(Head,0); 
    char x;
    cin >> x;
  } 
 }
 
mTree* mAdd(mTree* b,const char *s){
  if (!b){
     b = new mTree(); 
     strcpy(b->value,s);  //copy
     return b;
  }
  if (!strcmp(b->value,s)) return b;  
//levoe
  if (kk==1){
          
     if (!(b->l)) { b->l = mAdd(b->l,s);kk++; }  //dob v derevo
     else { mAdd(b->l,s);  }
  }
//pravoe
  else 
  { if (kk==2)
       {
       if (!(b->m)) { b->m = mAdd(b->m,s); kk++; }
                      else  {  mAdd(b->m,s);  }
       }
  else  
   {
       if (!(b->k)) { b->k = mAdd(b->k,s); kk-=2; }
                      else { mAdd(b->k,s);   }
    }
}  
  return b;
       
}
 
 
mTree* FindM(mTree* H)
{
   while (H->m)
        return  FindM(H->m);
    return H;  
}
 
 
 
 
void ReInit(mTree * H){
   if (!H)
      return;
    FindM(H)->m = H->k;
    
    H->k = NULL;     
    ReInit(H->l);
    ReInit(H->m);
   
}
void mDelete(mTree* b){
  if (!b) return;
  mDelete (b->l); //lev
  mDelete (b->m);
  mDelete (b->k); //prav  
  delete b;      
}
 
 
void TestInit(){
    if (H) mDelete(H);
    kk=1;
/*  int h;
 /* cout <<"Kol: ";
  cin >> h;                                 //zagruzka v h
  /*cout <<endl<<" Words:"<<endl;         //+vivod kol
 */ char s[50];
  H = NULL;
  while(1){
      scanf("\n %s",&s);  
      if(!strcmp(s,"*")) break;                         //zagruzka el v h
      H = mAdd(H,s);    
     bb=1;        
  }       
    cout<< "m-arnaya"<<endl;  
    mPrint(H,0); 
    char x;
    cin >> x;
     ReInit(H);
    
     
}
 
 
//vivod menu
int main(){
while (1){
//clearscreen
    system("cls"); 
//pe4at punktov 
    cout << "0) Test"<<endl;        
    cout << "1) Vvod"<<endl;   
    cout << "2) Prosmotr"<<endl;
    cout << "3) Delete"<<endl;
    cout << "4) Sohranenie"<<endl;
    cout << "5) Zagruzka"<<endl;
    cout << "6) Check"<<endl;
    cout << "7) Exit"<<endl;
    
    int x;
    cin >> x;
    switch (x){
//case dlya viziva f
        case 0: TestInit(); break; 
        case 1: Case1(); break;
        case 2: Case2(); break;
        case 3: Case3(); break;
        case 4: Case4(); break;
        case 5: Case5(); break;
        case 6: Case6(); break;
        case 7:  return 0;
    } 
}          
    
}