Ошибка при записи в файл

struct list{
    char aa[10];
    struct list *next;
    struct list2 *p2,*top2;
}*p,*top;
struct list2{
    char xx[44];
    list2 *next;
};
FILE *f;
int n,i,k=0,count;
 
void show();
void save();
void push();
void pop();
void correct();
 
void correct()
{
    char c[33];
    p=top;
    printf("\n input for correct:\n");
    scanf("%s",&p->aa);
    if(strcmp(p->aa,p->aa)==0)
    {
 
        pop();
        printf("\n input with begin\n");
        push();
    }
    else 
    {
        printf("\n Error\n");
            getch();
    }
}
void pop()
{
    p=top;
    if(top!=NULL)
        top=top->next;
    free (p);
    if(count-1<count){ printf("\n become less on one\n");getch();}
}
void push()
{
    int t=0;
    top=NULL;
    printf(" how mach?:\n");
    scanf("%i",&n);
    printf("\n input:\n");
    for(;n;n--)
    {
        p=new list;
        scanf("%s",&p->aa);
        p->next=top;
        top=p;
        count++;
    }
    p=top;
    while(p)
    {
        printf("\n%s",p->aa);
    printf("\n how mach(will be into the inside) :\n");
    scanf("%i",&i);
    printf("\n input in :\n");
    for(;i;i--)
    {
        p->p2=new list2;
        scanf("%s",&p->p2->xx);
        if(!t)                      
                p->top2=NULL;
            t++;
        p->p2->next=p->top2;
        p->top2=p->p2;
    }
    t=0;
    p=p->next;
    }
    }
void show(){
    
    p=top; 
    if(p==NULL) printf("\n list is empty\n");
    while(p)
    {
        printf("\n%s ",p->aa);
        p->p2=p->top2;      
        while(p->p2)
        {
            if(k%2==0)
            printf("\n  %s",p->p2->xx);
            p->p2=p->p2->next;
            k++;
        }
        p=p->next;
    }
    printf("\n");
system("PAUSE");
}
void save()
{   
    if(!(f=fopen("test1.txt","r+")))
{
        printf("\n impossible to open the file\n");getch();
    }
 
    p=top; 
    if(p==NULL) fprintf(f,"\n list is empty\n");
    while(p)
    {
        fprintf(f,"\n%s ",p->aa);
        p->p2=p->top2;      
        while(p->p2)
        {
            if(k%2==0)
            fprintf(f,"\n  %s",p->p2->xx);
            p->p2=p->p2->next;
            k++;
        }
        p=p->next;
    }
    printf("\n");
system("PAUSE");
fclose(f);
    
}
int main(){
    char key;
    int done=false;
    while(!done)
    {
        system("cls");
        
printf("\nA)dd\nD)elete\nC)orrect\nS)how\n\nF)ile\nQ)uit\n");
key=getchar();
switch(toupper(key))
{
case 'A':
push();
break;
case 'D':
    pop();
    break;
case 'S':
    show();
    break;
case 'C':
    correct();
    break;
case 'F':
    save();
    break;
case 'Q':
    done=true;
    break;
}
    }
return 0;
}