#include<stdio.h>
#include<stdlib.H>
#include<time.h>
#include<string.h>
struct character{
  char name[20];
  int syuzokuchi;
  int kotaichi;
  int doryokuchi;
};
struct level{
  struct character *c;
  int level;
};

int main(){
  struct character *c;
  struct level *l;
  int ninzu,k,m,i,max=0,n,up,down,w=0,v=0,p,q,tmp,r,u;
  double nouryoku1,nouryoku2;
  char win[20],max_name[20],ans[5],ans2[5],boll[5],atari[5];
  
  srand((unsigned)time(NULL));
  printf("人数を入力してください(2人以上)>");
  scanf("%d",&ninzu);
  c=malloc(ninzu*sizeof(*c));
  l=malloc(ninzu*sizeof(*l));

  for(i=0;i<ninzu;i++){
     printf("名前、種族値、個体値、努力値の順に入力してください。(あなたの名前から入れてください)\n");
     scanf("%s %d %d %d",c[i].name,&c[i].syuzokuchi,&c[i].kotaichi,&c[i].doryokuchi); 
     l[i].c=&c[i];
     l[i].level=1;
  }
  for(i=0;i<100;i++){
     k=0;m=0;
      while(k==m){
         k=rand()%ninzu;
         m=rand()%ninzu;
      }
     if(i==30){
       printf("◆◆アクシデント発生◆◆\n");
       printf("誰か２人のレベルが入れ替わります！\n");
       printf("決意が固まったら 1 を押してください\n");
       scanf("%d",&p);
       p=rand()%(ninzu-1);
       printf("%s(%dレベル) と %s(%dレベル) のレベルが入れ替わります！！\n",c[p].name,l[p].level,c[p+1].name,l[p+1].level);
       tmp=l[p].level;
       l[p].level=l[p+1].level;
       l[p+1].level=tmp;
     }
     if(i==50){
       printf("！ボーナスポイント！%sさんが急激に食べ物を摂取したため、レベルが上がります!!\n",c[1].name);
       printf("ただし、何レベル上がるかはあなた次第です。好きな数字を２つ(それぞれ1桁)打ち込んでください。\n");
       scanf("%d %d",&q,&r);
       u=q*r;
       l[1].level=l[1].level+u;
       printf("%sさんのレベルが %d 上がりました!!\n",c[1].name,u);  
     }
     nouryoku1=(double)(c[k].syuzokuchi*2+c[k].kotaichi+c[k].doryokuchi/4)*l[k].level/100+l[k].level+10;
     nouryoku2=(double)(c[m].syuzokuchi*2+c[m].kotaichi+c[m].doryokuchi/4)*l[m].level/100+l[m].level+10;
     printf("""第%d戦開始""【%s vs %s】\n",i+1,c[k].name,c[m].name);
     printf("%s:能力 %.3f\n",c[k].name,nouryoku1);
     printf("%s:能力 %.3f\n",c[m].name,nouryoku2);
      if(nouryoku1>nouryoku2){
         l[k].level++;
         strcpy(win,c[k].name);
      }
      else{
         l[m].level++;
         strcpy(win,c[m].name);
      }
     printf("""第%d戦終了""(◇◇win:%s◇◇)\n",i+1,win);
      printf("~~~~~~~~~~~~~~~~~~~~\n");
  }
  for(i=0;i<ninzu;i++){
    printf("%s：%d勝　%d敗  レベル:%d\n",c[i].name,l[i].level-1,101-l[i].level,l[i].level);
  }
  v=l[0].level-1;
  for(i=0;i<ninzu;i++){
      if(l[i].level>max){
         max=l[i].level;
         strcpy(max_name,c[i].name);  
      }
  }     
  printf("優勝は………%sさんです!!!\n",max_name);
  printf("最後に、もし当たればレベルが上がり、外れれば下がる賭けに挑戦しますか？レベルの増減は0から150です。(yes or no 入力)\n");
  scanf("%s",ans);
  if(strcmp(ans,"yes")==0){
    printf("赤いボール、青いボールを発見!!どちらを選択するかはあなたの自由です。赤いボールを選択するときは""red"",青いボールを選択するときは""blue""と入力してください。\n");
    scanf("%s",boll);
    n=rand()%2;
    if(n==0)
      strcpy(atari,"red");
    else
      strcpy(atari,"blue");
    if(strcmp(atari,boll)==0){
      up=rand()%150+1;
      l[0].level+=up;
      w=l[0].level;
      printf("当たりました!!\n");
      printf("レベルが%d上がり、あなたのレベルは%dになりました\n",up,l[0].level);
    }
    else{
      down=rand()%150+1;
      l[0].level-=down;
      w=l[0].level;
      printf("外れました\n");
      printf("レベルが%d下がり、あなたのレベルは%dになりました\n",down,l[0].level);
    }  
    printf("最後にもう一度100戦しますか？(yes or no)\n");
    scanf("%s",ans2);
    if(strcmp(ans2,"yes")==0){
       for(i=100;i<200;i++){
          k=0;m=0;
             while(k==m){
                k=rand()%ninzu;
                m=rand()%ninzu;
             }
          nouryoku1=(double)(c[k].syuzokuchi*2+c[k].kotaichi+c[k].doryokuchi/4)*l[k].level/100+l[k].level+10;
          nouryoku2=(double)(c[m].syuzokuchi*2+c[m].kotaichi+c[m].doryokuchi/4)*l[m].level/100+l[m].level+10;
          printf("第%d戦開始(%s vs %s)\n",i+1,c[k].name,c[m].name);
          printf("%s:能力 %.3f\n",c[k].name,nouryoku1);
          printf("%s:能力 %.3f\n",c[m].name,nouryoku2);
             if(nouryoku1>nouryoku2){
                l[k].level++;
                strcpy(win,c[k].name);
             }
             else{
                l[m].level++;
                strcpy(win,c[m].name);
             }
          printf("第%d戦終了(win:%s)\n",i+1,win);
          printf("~~~~~~~~~~~~~~~~~~~~\n");
       }
       printf("%s：%d勝　%d敗  レベル:%d\n",c[0].name,l[0].level-w+v,200-l[0].level+w-v,l[0].level);
       for(i=1;i<ninzu;i++){
           printf("%s：%d勝　%d敗  レベル:%d\n",c[i].name,l[i].level-1,201-l[i].level,l[i].level);
       }
       for(i=0;i<ninzu;i++){
           if(l[i].level>max){
              max=l[i].level;
              strcpy(max_name,c[i].name);  
           } 
       }     
    printf("優勝は………%sさんです!!!\n",max_name);
    }
    else{
      printf("ゲーム終了です。\n");
    }
  }
  else 
    printf("ゲーム終了です。\n");
}