#include<stdio.h>
#include<malloc.h>
#include<iostream.h>
#include<string.h>
#define len sizeof(struct school)
#define len1 sizeof(struct statitcs)
struct school
{int num;
int project_num;
char  name[20];
int score;
//int no;
struct school *next;
};
struct  school *insert(void)
{   cout<<"********************************\n";
	cout<<"特別提示:\n";
	cout<<"如果想退出,請在學校編號輸入0\n";
	cout<<"********************************\n";
struct  school *head,*rear,*p;
head=NULL;rear=NULL;
p=(struct school *)malloc(len);
cout<<"請輸入學校編號\n";cin>>p->num;
cout<<"請輸入項目\n";cin>>p->project_num;
cout<<"請輸入姓名\n";cin>>p->name;
cout<<"請輸入成績\n";cin>>p->score;
if(p->num==0)
return NULL;
while(p->num!=0)
{if(head==NULL)
{head=p;rear=p;}
else
{rear->next=p;
rear=p;
}
p=(struct school *)malloc(len);
cout<<"請輸入學校編號\n";cin>>p->num;
cout<<"請輸入項目\n";cin>>p->project_num;
cout<<"請輸入姓名\n";cin>>p->name;
cout<<"請輸入成績\n";cin>>p->score;
}
rear->next=NULL;
return head;
}
struct  school *add(struct  school *t)
{   
struct  school *s,*p;
p=(struct school *)malloc(len);
cout<<"請輸入學校編號\n";cin>>p->num;
cout<<"請輸入項目\n";cin>>p->project_num;
cout<<"請輸入姓名\n";cin>>p->name;
cout<<"請輸入成績\n";cin>>p->score;
s=t;
if(s==NULL)
{   p->next=s;
    s=p; 
	return  s;}
else
{while(s->next!=NULL)
{s=s->next;}
s->next=p;
p->next=NULL;
return   t;}
}

void print(struct  school *t)
{struct  school *p;
p=t;
cout<<"學校編號\t項目\t姓名\t成績\n";
while(p!=NULL)
{cout<<p->num<<"\t\t"<<p->project_num<<"\t"<<p->name<<"\t"<<p->score<<endl;
p=p->next;
}
}

void display(struct  school *t,int n)
{struct  school *p;
p=t;
while(p!=NULL)
{if(p->num==n)
  cout<<p->project_num<<"\t"<<p->name<<"\t"<<p->score<<endl;
p=p->next;
}
}

struct  school *deletes(struct  school *t)
{struct  school *p,*k,*k_head;int flag=0;
p=(struct school *)malloc(len);
cout<<"請輸入要刪除的信息\n";
cout<<"請輸入學校編號\n";cin>>p->num;
cout<<"請輸入項目\n";cin>>p->project_num;
cout<<"請輸入姓名\n";cin>>p->name;
cout<<"請輸入成績\n";cin>>p->score;
k=t;
while(k!=NULL)
{if((p->num==k->num)&&(k->project_num==p->project_num)&&!strcmp(p->name,k->name)&&(p->score==k->score))                          
{flag=1;
	if(k==t)
  {t=t->next;}  
  else 
  k_head->next=k->next;
}
else
k_head=k;
k=k->next; 
}
if(k==NULL&&flag==0)
cout<<"無法找到你要刪除的信息\n";
return t;  
}
void find(struct  school *t)
{struct  school *p;
p=t;
cout<<"學校編號\t項目\t姓名\t成績\n";
while(p!=NULL)
{cout<<p->num<<"\t\t"<<p->project_num<<"\t"<<p->name<<"\t"<<p->score<<endl;
p=p->next;
}
}

void  find1(struct  school *t)
{struct  school *k;int flag=0;int  num;
cout<<"請輸入要查找的信息\n";
cout<<"請輸入學校編號\n";cin>>num;
cout<<"學校編號\t項目\t姓名\t成績\n";
k=t;
while(k!=NULL)
{if(num==k->num)                         
{flag=1;cout<<k->num<<"\t\t"<<k->project_num<<"\t"<<k->name<<"\t"<<k->score<<endl;}
k=k->next;
}
if(k==NULL&&flag==0)
cout<<"無法找到你要的信息\n";
}
void  find2(struct  school *t)
{struct  school *k;int flag=0;int  num;

cout<<"請輸入要查找的信息\n";
cout<<"請輸入項目號\n";cin>>num;
cout<<"學校編號\t項目\t姓名\t成績\n";
k=t;
while(k!=NULL)
{if(num==k->project_num)                         
{flag=1;cout<<k->num<<"\t\t"<<k->project_num<<"\t"<<k->name<<"\t"<<k->score<<endl;}
k=k->next;
}
if(k==NULL&&flag==0)
cout<<"無法找到你要的信息\n";
}
void  find3(struct  school *t)
{struct  school *k;int flag=0;char  name[20];

cout<<"請輸入要查找的信息\n";
cout<<"請輸入姓名\n";cin>>name;
cout<<"學校編號\t項目\t姓名\t成績\n";
k=t;
while(k!=NULL)
{if(!strcmp(name,k->name))                         
{flag=1;cout<<k->num<<"\t\t"<<k->project_num<<"\t"<<k->name<<"\t"<<k->score<<endl;}
k=k->next;
}
if(k==NULL&&flag==0)
cout<<"無法找到你要的信息\n";
}

struct  school *deletes1(struct  school *t)
{struct  school *k,*k_head;int flag=0;int num;
cout<<"請輸入要刪除的信息\n";
cout<<"請輸入學校編號\n";cin>>num;
k=t;
while(k!=NULL)
{if(k->num==num)                          
{flag=1;
	if(k==t)
  {t=t->next;}  
  else 
  k_head->next=k->next;
}
else
k_head=k;
k=k->next; 
}
if(k==NULL&&flag==0)
cout<<"無法找到你要刪除的信息\n";
return t;  
}

struct  school *deletes2(struct  school *t)
{struct  school *k,*k_head;int flag=0;int num;
cout<<"請輸入要刪除的信息\n";
cout<<"請輸入項目號\n";cin>>num;
k=t;
while(k!=NULL)
{if(k->project_num==num)                          
{flag=1;
	if(k==t)
  {t=t->next;}  
  else 
  k_head->next=k->next;
}
else
k_head=k;
k=k->next; 
}
if(k==NULL&&flag==0)
cout<<"無法找到你要刪除的信息\n";
return t;  
}

struct  school *deletes3(struct  school *t)
{struct  school *k,*k_head;int flag=0;char name[20];
cout<<"請輸入要刪除的信息\n";
cout<<"請輸入姓名\n";cin>>name;
k=t;
while(k!=NULL)
{if(!strcmp(k->name,name))                         
{flag=1;
	if(k==t)
  {t=t->next;}  
  else 
  k_head->next=k->next;
}
else
k_head=k;
k=k->next; 
}
if(k==NULL&&flag==0)
cout<<"無法找到你要刪除的信息\n";
return t;  
}

struct  statitcs
{
int  flag;
int total;
int  no;
struct  statitcs *next;
};

int total1(struct  school *t,int n)
{struct  school *p;
p=t;
int  sum=0;
while(p!=NULL)
{if(p->num==n)
sum+=p->score;
p=p->next;
}
return  sum;
}

void  swap(struct  statitcs *t1,struct  statitcs *t2)
{struct  statitcs *t;
t=(struct statitcs *)malloc(len1);
t->flag=t1->flag;t1->flag=t2->flag;t2->flag=t->flag;
t->total=t1->total;t1->total=t2->total;t2->total=t->total;
}

struct  statitcs *set_place(struct  statitcs *t)
{int i=1;
struct  statitcs *p,*q;
p=t;
if(p==NULL)return t;
else
{p->no=1;
while(p->next!=NULL)
{q=p->next;
 
a:if((q->total==p->total))
  {q->no=p->no;q=q->next;
  if(q==NULL) return t;
  goto a;}
  if(q==NULL) return t;
  else{p=q;i++;p->no=i;}
}
}
return  t;
}

struct  statitcs *  sort( struct  statitcs *t)
{struct  statitcs *p1,*p2;
 p1=t;
 while(p1!=NULL)
 { p2=p1->next;
    
    while(p2!=NULL)
	{if((p1->total)<(p2->total))
	    swap(p1,p2);
	  p2=p2->next;
	}
  p1=p1->next;
 }
 return  t;
}

void  show(struct  statitcs *t,struct  school *t1)
{struct  statitcs *p;
p=t;
 while(p!=NULL)
 {   
	 cout<<"\n學校編號"<<p->flag<<endl;
	 cout<<"項目\t"<<"姓名\t"<<"成績"<<endl;
	 display(t1,p->flag);
	 cout<<"\t總成績"<<p->total<<"\t總名次:"<<p->no<<endl;
 p=p->next;
 }
}

struct  statitcs *creat(struct  school *t)
{int a[100];int i=0;int flag1;
struct  statitcs *head,*rear,*p;
struct  school *k;k=t;
head=NULL;if(k==NULL)return NULL;
p=(struct statitcs *)malloc(len1);
p->flag=k->num;
p->total=total1(t,p->flag);
if(head==NULL)
head=p;rear=p;
k=k->next;
a[i]=p->flag;
while(k!=NULL)
{flag1=1;
for(int m=0;m<=i;m++)
  if(a[m]==k->num)
	  flag1=0;
if(flag1)
{p=(struct statitcs *)malloc(len1);
p->flag=k->num; i++;a[i]=p->flag;
p->total=total1(t,p->flag);
rear->next=p;rear=p;}
k=k->next;
}
rear->next=NULL;
return head;
}
void  swap1(struct  school *t1, struct  school *t2)
{struct  school *t;
t=(struct school *)malloc(len);
t->num=t1->num;t1->num=t2->num;t2->num=t->num;
t->score=t1->score;t1->score=t2->score;t2->score=t->score;
strcmp(t->name,t1->name);strcmp(t1->name,t2->name);strcmp(t2->name,t->name);
}
struct  school  *  sort1( struct  school *t,int n)
{struct   school *p1,*p2;
 p1=t;
 while(p1!=NULL)
 { p2=p1->next;
    
    while(p2!=NULL&&p1->project_num==n&&p2->project_num==n)
	{if((p1->score)<(p2->score))
	    swap1(p1,p2);
	  p2=p2->next;
	}
  p1=p1->next;
 }
 return  t;
}
/*struct  school *setplace1(struct  school *t,int n)
{int i=1;
struct  school *p,*q;
p=t;
if(p==NULL)return t;
else
{if(p->project_num==n)
p->no=1;
while(p->next!=NULL)
{q=p->next;
 a:if((q->score==p->score)&&p->project_num==n&&q->project_num==n)
  {q->no=p->no;q=q->next;
  if(q==NULL) return t;
  goto a;}
  if(q==NULL) return t;
  else{p=q;
  if((q->score==p->score)&&p->project_num==n&&q->project_num==n)
  {i++;p->no=i;}}
}
}
return  t;
}
*/
void show1(struct  school *t,int n)
{struct  school *p;
p=t;
cout<<"項目:"<<n<<"\n學校編號\t"<<"姓名\t"<<"成績\t"<<endl;
while(p!=NULL)
{if(p->project_num==n)
  cout<<p->num<<"\t\t"<<p->name<<"\t"<<p->score<<"\t"<<endl;
p=p->next;
}
}

void  sort_display(struct  school *t)
{int a[100];int i=0;int flag1;
struct  school *k;k=t;
if(k==NULL)cout<< "NULL\n";
a[i]=k->project_num;
k=k->next;
while(k!=NULL)
{flag1=1;
for(int m=0;m<=i;m++)
  if(a[m]==k->project_num)
	  flag1=0;
if(flag1)
{i++;a[i]=k->project_num;}
k=k->next;
}
for(int m=0;m<=i;m++)
{t=sort1(t,a[m]);
//setplace1(t,a[m]);
show1(t,a[m]);
}
}

void main()
{struct  school *t;struct statitcs *s;char a;int flag=1,flag1=1,flag2=1;
t=NULL;
cout<<"\t\t***************************************************\n";
cout<<" \t\t    *請勿盜版*\t   *請勿盜版*\t  *請勿盜版*\n ";  
cout<<"\t\t\t\t產品信息:\n\t\t\t\t學號:020410107\n\t\t\t\t姓名:胡小勇\n\t\t\t\t電子郵件:huxiaoyong1983@163.com\n\t\t\t\t電話:0631-5696421\n";
cout<<" \t\t\t\t使用有問題 請與我聯系\n\t\t    *請勿盜版*\t   *請勿盜版*\t  *請勿盜版*\n ";    
cout<<"\t\t***************************************************\n";     
cout<<"\t\t***************************************************\n";
cout<<"\t\t\t      運動會信息管理系統\n\t\t\t\t1:創建信息\n\t\t\t\t2:添加信息\n\t\t\t\t3:刪除信息\n\t\t\t\t4:查找信息\n\t\t\t\t5:排序并顯示\n\t\t\t\t6:退出\n";
cout<<"\t\t***************************************************\n";
cin>>a;
while(a!='6')
{switch(a)
{case'1':flag=0;flag1=0;flag2=0;
       t=insert();
	   cout<<"你輸入的所有信息\n"; 
	   print(t);break;
case'2':cout<<"*****************\n1:添加一條信息\n2:退出\n*****************\n";
	    cin>>a;
		while(a!='2')
		{switch(a)
		{case'1':t=add(t);break;
         default:cout<<"\n請正確輸入\n";break;
		}
        cout<<"*****************\n1:添加一條信息\n2:退出\n*****************\n";
		cin>>a;
		}
        print(t);
		break;
case'3':if(flag==1)
		{cout<<"\t\t請先輸入數據\n";break;}
	    cout<<"\t\t***************************************************\n";
	    cout<<"\t\t\t1:刪除某一學校某一項目某一姓名某一成績的信息\n\t\t\t2:刪除某一學校的信息\n\t\t\t3:刪除某一項目的信息\n\t\t\t4:刪除某一姓名的信息\n\t\t\t5:退出\n";
        cout<<"\t\t***************************************************\n";
		cin>>a;
		while(a!='5')
		{switch(a)
		{case'1':t=deletes(t); cout<<"刪除后的信息\n";print(t);break;
		case'2':t=deletes1(t);cout<<"刪除后的信息\n"; print(t);break;
		case'3':t=deletes2(t); cout<<"刪除后的信息\n"; print(t);break;
		case'4':t=deletes3(t); cout<<"刪除后的信息\n";print(t);break;
		default:cout<<"請正確輸入\n";break;
		}
		cout<<"\t\t***************************************************\n";
		cout<<"\t\t\t1:刪除某一學校某一項目某一姓名某一成績的信息\n\t\t\t2:刪除某一學校的信息\n\t\t\t3:刪除某一項目的信息\n\t\t\t4:刪除某一姓名的信息\n\t\t\t5:退出\n";
		cout<<"\t\t***************************************************\n";
		cin>>a;
		}	
		break;
case'4':if(flag2==1)
		{cout<<"\t\t請先輸入數據\n";break;}
        cout<<"\t\t***************************************************\n";
	    cout<<"\t\t\t1:查找所有信息\n\t\t\t2:查找某一學校的信息\n\t\t\t3:查找某一項目的信息\n\t\t\t4:查找某一姓名的信息\n\t\t\t5:退出\n";
        cout<<"\t\t***************************************************\n";
		cin>>a;
        while(a!='5')
		{switch(a)
		{case'1':find(t);break;
		case'2':find1(t);break;
		case'3':find2(t);break;
		case'4':find3(t);break;
		default:cout<<"請正確輸入\n";break;
		}  
		cout<<"\t\t***************************************************\n";
	    cout<<"\t\t\t1:查找所有信息\n\t\t\t2:查找某一學校的信息\n\t\t\t3:查找某一項目的信息\n\t\t\t4:查找某一姓名的信息\n\t\t\t5:退出\n";
        cout<<"\t\t***************************************************\n";
		cin>>a;
		}
		break;
case'5':if(flag1==1)
		{cout<<"\t\t請先輸入數據\n";break;}
	    cout<<"\t\t*************************************\n";
	    cout<<"\t\t1:按學?？偝煽兣判騖n\t\t2:按每個項目的成績高低排序\n\t\t3:退出\n";
		cout<<"\t\t*************************************\n";
	    cin>>a;
		while(a!='3')
		{switch(a)
		{case'1':s=creat(t);s=sort(s);s=set_place(s);show(s,t);break;
		case'2':sort_display(t);break;
	    default:cout<<"請正確輸入\n";break;
		}
		cout<<"\t\t*************************************\n";
	    cout<<"\t\t1:按學?？偝煽兣判騖n\t\t2:按每個項目的成績高低排序\n\t\t3:退出\n";
		cout<<"\t\t*************************************\n";
	    cin>>a;
		}
		break;
default:cout<<"請正確輸入\n";
}
cout<<"\t\t***************************************************\n";
cout<<"\t\t\t      運動會成績信息系統\n\t\t\t\t1:創建信息\n\t\t\t\t2:添加信息\n\t\t\t\t3:刪除信息\n\t\t\t\t4:查找信息\n\t\t\t\t5:排序并顯示\n\t\t\t\t6:退出\n";
cout<<"\t\t***************************************************\n";
cin>>a;
}
cout<<"謝謝使用\n";
}