#include <malloc.h>
#include <stdio.h>
#include <stdlib.h>
#define LEN sizeof(struct scorenode)
#define DEBUG
#include <string.h>
struct scorenode
{int number;/*学号*/
char name[10];/*姓名*/
float xiaofei;/*消费情况*/
struct scorenode *next;
};
typedef struct scorenode score;
int n,k;/*n,k为全局变量，本程序中的函数均可以使用它*/
/*==============================================================================================*/
score *creat2311(void)
/*函数creat2311,功能：创建链表，此函数带回一个指向链表头的指针*/
{
 score*head;
 score *p1,*p2,*p3,*max;
 int i,j;
 float fen;
    char t[10];
  n=0;
     p1=p2=p3=(score *)malloc(LEN);head=p3; /*开辟一个新单元*/
       printf("请输入学生资料，输0退出!\n");
repeat1: printf("请输入学生学号(学号应大于0)：");/*输入学号，学号应大于0*/
       scanf("%d",&p1->number);
     while(p1->number<0)
   {getchar();
    printf("输入错误，请重新输入学生学号:");
       scanf("%d",&p1->number);}      
  /*输入学号为字符或小于0时，程序报错，提示重新输入学号*/
  if(p1->number==0)
   goto end;/*当输入的学号为0时，转到末尾，结束创建链表*/
  else
  {
  p3=head;
  if(n>0)
   {for(i=0;i<n;i++)
           {if(p1->number!=p3->number)
     p3=p3->next;
     else
     {printf("学号重复,请重输!\n");
     goto repeat1;
     /*当输入的学号已经存在，程序报错，返回前面重新输入*/
        }
    }    
   }         
  }
       printf("请输入学生姓名：");
       scanf("%s",&p1->name);/*输入学生姓名*/
       printf("请输入消费情况：");/*输入消费情况;

     head=NULL;
 while(p1->number!=0)
  {
    n=n+1;
 if(n==1) 
  head=p1;
 else
 
    p2->next=p1;
    p2=p1;
    p1=(score *)malloc(LEN);
    printf("请输入学生资料，输0退出!\n");
repeat2:printf("请输入学生学号(学号应大于0)：");
      scanf("%d",&p1->number);/*输入学号，学号应大于0*/
  
   while(p1->number<0)
   {getchar();
    printf("输入错误,请重新输入学生学号:");
       scanf("%d",&p1->number);}     
   /*输入学号为字符或小于0时，程序报错，提示重新输入学号*/
  if(p1->number==0)
   goto end;/*当输入的学号为0时，转到末尾，结束创建链表*/
  else
  {
  p3=head;
  if(n>0)
   {for(i=0;i<n;i++)
      {if(p1->number!=p3->number)
    p3=p3->next;
    else
    {printf("学号重复,请重输!\n");
     goto repeat2;
     /*当输入的学号已经存在，程序报错，返回前面重新输入*/
    }
    }    
   }         
  }
  printf("请输入学生姓名：");
       scanf("%s",&p1->name);/*输入学生姓名*/
     printf("请输入消费情况：");
       scanf("%f",&p1->xiaofei);/*输入消费情况;
     }

end: p1=head;
     p3=p1;
  for(i=1;i<n;i++)
               {
             for(j=i+1;j<=n;j++)
                 {
       max=p1;
       p1=p1->next;
     
       if(max->number>p1->number)
        {
        k=max->number;
        max->number=p1->number;
        p1->number=k;
         /*交换前后结点中的学号值，使得学号大者移到后面的结点中*/
       
        strcpy(t,max->name);
        strcpy(max->name,p1->name);
        strcpy(p1->name,t);
     /*交换前后结点中的姓名，使之与学号相匹配*/
                        /*交换前后结点中的消费情况，使之与学号相匹配*/
           }

                 }
    max=head;p1=head;/*重新使max,p指向链表头*/
  }
p2->next=NULL;/*链表结尾*/
       printf("输入的学生数为:%d个!\n",n);
       return(head);

}
/*==============================================================================================*/
/*==============================================================================================*/
score *load2311(score *head)
/*函数load2311，功能:从文件读入学生记录*/
{       score *p1,*p2;
        int m=0;
        char filepn[10];
  FILE *fp;
  
  printf("请输入文件路径及文件名:");
     scanf("%s",filepn);/*输入文件路径及名称*/
     if((fp=fopen(filepn,"r+"))==NULL)
 {
  printf("不能打开文件!\n");
  return 0;
 }
   {
  
  p1=(score *)malloc(LEN); /*开辟一个新单元*/
  fscanf(fp,"%d%s%f%f%f",&p1->number,p1->name,&p1->yuwen,&p1->yingyu,&p1->shuxue);
         printf("|%d\t|%s\t|%.1f\t|%.1f\t|%.1f\t|\n",p1->number,p1->name,p1->yuwen,p1->yingyu,p1->shuxue);
    /*文件读入与显示*/
  head=NULL;
     do
  {
   n=n+1;
   if(n==1) head=p1;
   else p2->next=p1;
   p2=p1;
   p1=(score *)malloc(LEN);  /*开辟一个新单元*/   
      fscanf(fp,"%d%s%f%f%f\n",&p1->number,p1->name,&p1->yuwen,&p1->yingyu,&p1->shuxue);
            printf("|%d\t|%s\t|%.1f\t|%.1f\t|%.1f\t|\n",p1->number,p1->name,p1->yuwen,p1->yingyu,p1->shuxue);
           /*文件读入与显示*/
  }while(!feof(fp));
  p2->next=p1;
  p1->next=NULL;
  n=n+1;
 }printf("-----------------------------------------\n");/*表格下线*/
  fclose(fp);/*结束读入，关闭文件*/
     
 return (head);
}

/*==============================================================================================*/
/*==============================================================================================*/
score *add2311(score *head,score *stu)
/*函数add2311,功能：追加学生资料,并且将所有学生资料按学号排序*/
{
 score *p0,*p1,*p2,*p3,*max;
    int i,j;
 float fen;
    char t[10];

   p3=stu=(score *)malloc(LEN);/*开辟一个新单元*/
   printf("\n输入要增加的学生的资料!");
  repeat4: printf("请输入学生学号(学号应大于0)：");
  scanf("%d",&stu->number);
  /*输入学号，学号应大于0*/
      while(stu->number<0)
   {getchar();
    printf("输入错误，请重新输入学生学号:");
       scanf("%d",&stu->number);}/*输入错误，重新输入学号*/
     /******************************************************/
    if(stu->number==0)
   goto end2;/*当输入的学号为0时，转到末尾，结束追加*/
  else
  {
   p3=head;
  if(n>0)
   {for(i=0;i<n;i++)
           {if(stu->number!=p3->number)
     p3=p3->next;
     else
     {printf("学号重复,请重输!\n");
     goto repeat4;
     /*当输入的学号已经存在，程序报错，返回前面重新输入*/
        }
    }    
   }         

  }
  
  /******************************************************/ 
   printf("输入学生姓名：");
         scanf("%s",stu->name);            /*输入学生姓名*/
      printf("请输入消费情况：");
         scanf("%f",&stu->xiaofei);    /*输入消费情况，成绩应在0-100*/
 p1=head;
p0=stu;
if(head==NULL)
 {head=p0;p0->next=NULL;}/*当原来链表为空时，从首结点开始存放资料*/
 else/*原来链表不为空*/
 {
  if(p1->next==NULL)/*找到原来链表的末尾*/
  {
   p1->next=p0;
      p0->next=NULL;/*将它与新开单元相连接*/
  }
     else
  {
    while(p1->next!=NULL)/*还没找到末尾，继续找*/
    {
     p2=p1;p1=p1->next;
    }
        p1->next=p0;
        p0->next=NULL;
  }

 }
 n=n+1;

p1=head;
p0=stu;
  for(i=1;i<n;i++)
               {
             for(j=i+1;j<=n;j++)
                 {
       max=p1;
       p1=p1->next;
     
       if(max->number>p1->number)
        {
        k=max->number;
        max->number=p1->number;
        p1->number=k;
         /*交换前后结点中的学号值，使得学号大者移到后面的结点中*/
       
        strcpy(t,max->name);
        strcpy(max->name,p1->name);
        strcpy(p1->name,t);
     /*交换前后结点中的姓名，使之与学号相匹配*/
                  /*交换前后结点中的消费情况，使之与学号相匹配*/
                      }
    max=head;p1=head;/*重新使max,p指向链表头*/
  } end2:
 printf("现在的学生数为:%d个!\n",n);
  return(head);

}
/*==============================================================================================*/
/*==============================================================================================*/
score *search2311(score *head)
/*函数search2311,功能：查询学生消费情况*/
{int number;
 score *p1,*p2;
 printf("输入要查询的学生的学号,");
 scanf("%d",&number);

while(number!=0)
{
   if(head==NULL)
  {printf("\n没有任何学生资料!\n");return(head);}

   printf("-----------------------------------------\n");
   printf("|学号\t|姓名\t|消费情况\t \n");
   printf("-----------------------------------------\n");/*打印表格域*/
   p1=head;
     while(number!=p1->number&&p1->next!=NULL)

  {p2=p1;p1=p1->next;}
         if(number==p1->number) 
    {printf("|%d\t|%s\t|%.1f\t|%.1f\t|%.1f\t|\n",p1->number,p1->name,p1->yuwen,p1->yingyu,p1->shuxue);
          printf("-----------------------------------------\n");}/*打印表格域*/
         else
           printf("%d不存在此学生!\n",number);
 
         printf("输入要查询的学生的学号,");
         scanf("%d",&number);
}
printf("已经退出了!\n");
return(head);}

/*==============================================================================================*/
/*==============================================================================================*/
score *del2311(score *head)/*函数del2311，功能：删除学生资料*/
{
 score *p1,*p2;
int number;
 printf("输入要删除的学生的学号(输入0时退出):");
 scanf("%d",&number);
 getchar();
 while(number!=0)/*输入学号为0时退出*/
 {
 
  if(head==NULL)
  {
   printf("\n没有任何学生资料!\n");
   return(head);
  }

  p1=head;
 
  while(number!=p1->number&&p1->next!=NULL)
   /*p1指向的不是所要找的首结点，并且后面还有结点*/
  {
   p2=p1;p1=p1->next;
  } /*p1后移一个结点*/
    
  if(number==p1->number) 
   /*找到了*/ 
  {
   if(p1==head)
    head=p1->next;
   /*若p1指向的是首结点，把地二个结点地址赋予head*/
   else
      p2->next=p1->next;
   /*否则将下一个结点地址 赋给前一结点地址*/
   printf("删除:%d\n",number);n=n-1;
  }
  else
   printf("%d不存在此学生!\n",number);
  /*找不到该结点*/
  
  
  printf("输入要删除的学生的学号:");
  scanf("%d",&number);
  getchar();
 }
#ifdef DEBUG 
 printf("已经退出了!\n");
#endif
printf("现在的学生数为:%d个!\n",n);
 return(head);
}

 /*==============================================================================================*/
 /*==============================================================================================*/
void print2311(score *head)
/*函数print2311,功能：显示学生成绩*/
{
 score *p;
 if(head==NULL)     
         {printf("\n没有任何学生资料!\n");}
 else
 {printf("%d\n",n);
 printf("-----------------------------------------\n");
 printf("|学号\t|姓名\t|消费情况\t |\n");
 printf("-----------------------------------------\n");/*打印表格域*/
 p=head;
     do
    {printf("|%d\t|%s\t|%.1f\t|%.1f\t|%.1f\t|\n",p->number,p->name,p->yuwen,p->yingyu,p->shuxue);
        printf("-----------------------------------------\n");/*打印表格域*/
       p=p->next;}while (p!=NULL);/*打印完成了*/
 }
}

save2311(score *p1)
/*函数save2311,功能：保存学生的资料*/
{
 FILE *fp;
 
 char filepn[20];/*用来存放文件保存路径以及文件名*/
 
 printf("请输入文件路径及文件名:");
 scanf("%s",filepn);
 if((fp=fopen(filepn,"w+"))==NULL)
 {
  printf("不能打开文件!\n");
  return 0;
 }

main() /*主函数main,功能：通过调用creat,search,del,add,print,ststistics,save,taxis等函数，实现学生消费情况查询系统功能*/
{score *head=0,*stu=0;

while(1)
{k=menu2311(k);
switch(k)/*用switch语句实现功能选择*/
{case 1: head=creat2311();break;/*调用创建链表函数*/
 case 2: head=load2311(head);break;/*从文件调入记录函数*/
 case 3: head=search2311(head);break;/*调用成绩查询函数*/
 case 4: head=del2311(head); break;/*调用删除学生资料函数*/
 case 5: head=add2311(head,stu);break;/*调用追加学生资料函数*/
 case 6: print2311(head); break;/*调用显示学生资料函数*/
 case 7: statistics2311(head); break;/*调用统计函数*/
 case 8: save2311(head);break;/*调用保存函数*/
 case 9: taxis2311(head);break;/*调用排序函数*/ 
 case 0: exit(0);/*退出系统，返回主界面*/
 default: printf("输入错误,请重试!\n"); }
}
}