#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <string.h>

char char1[8][18] ={
  " ベビィマリオ",
  " ベビィルイージ",
  " ベビィピーチ",
  " ベビィデイジー",
  " キノピオ",
  " キノピコ",
  " ノコノコ",
  " カロン"
};

char char2[8][18] ={
  " マリオ",
  " ルイージ",
  " ピーチ",
  " デイジー",
  " ヨッシー",
  " キャサリン",
  " ディディーコング",
  " クッパJr. "
};

char char3[8][18] ={
  " ワリオ",
  " ワルイージ",
  " ドンキーコング",
  " クッパ",
  " キングテレサ",
  " ロゼッタ",
  " ファンキーコング",
  " ほねクッパ",
};

char kart1[6][24] ={
  " スタンダード・カートS",
  " スーパーベビィカー",
  " ミニ・チャージャー",
  " スーパープクプク",
  " ホットラリー",
  " ブルーファルコン"
};

char kart2[6][24] ={
  " スタンダード・カートM",
  " ノスタルジア",
  " ワイルドスター",
  " スーパーゲッソ\ー",
  " ファンタジア",
  " Bダッシュ Mk.2"
};

char kart3[6][24] ={
  " スタンダード・カートL",
  " サバイバルバギー",
  " ファイアホットロッド",
  " パックンカート",
  " ファストグライド",
  " トリッキー"
};

char bike1[6][24] ={
  " スタンダード・バイクS",
  " ロケットキラー",
  " ポケモーター",
  " スピードスワン",
  " ライド・オン・カメック",
  " ジェットボール"
};

char bike2[6][24] ={
  " スタンダード・バイクM",
  " マッハ・バイク",
  " キャンディ",
  " ポロネーズ",
  " インターセプター",
  " ドルフィンキック"
};

char bike3[6][24] ={
  " スタンダード・バイクL",
  " スーパーバウザー",
  " ワリオバイク",
  " トゥインクルスター",
  " ワイルドスピア",
  " ファントム"
};

char mem[15][12] ={
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規",
  "新規"
};

void swapi(int *i,int *j){
  int tmp;
  tmp = *i;
  *i = *j;
  *j = tmp;
  return;
}

void swapc(char *i,char *j){
  char tmp;
  tmp = *i;
  *i = *j;
  *j = tmp;
  return;
}

int main(void){
  int flag = -1;
  int mode = -1;
  int setting = 1;
  int all,kart,poi[12][9],allpoi[12];
  int a,b,c,d,i,j,k,l,m,n;
  char check[24],check2[17];
  srand(time(NULL));

  do{
    if(mode!=0 && mode!=1){
      printf("- マリオカートソ\フトウェア  -\n\n□モード選択(0:ランダムキャラマシン抽選,1:大会用ポイント集計,2:更新履歴):");
      scanf("%d",&mode);
    }
    printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");

    if(setting==1 && mode!=2){
      if(mode==0){
        printf("\n\n-= ランダムキャラ・マシン抽選 =-\n\n");
      }else{
        printf("\n\n-= 大会用ポイント集計 =-\n\n");
      }
      printf("\n");
      printf("□参加人数:");
      scanf("%d",&a);
      printf("□レース数:");
      scanf("%d",&b);
      printf("\n");
      for(i=0;i<a;i++){
        printf("□%d人目の名前:",i+1);
        scanf("%s",mem[i]);
      }
      setting = 2;
      l = -1;
    }
    printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");

    /*-------------------マシン抽選-------------------*/
    if(mode==0 && setting==2){/*キャラとマシンの縛りを設定する*/
      do{
	if(l!=0 && l!=1 && l!=2){
	  printf("\n(0:マシン縛りを設定 1:キャラ縛りを設定 2:縛りなし):");
	  scanf("%d",&l);
	}
        printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
	if(l==0){
	   k = -1;
           for(i=0;i<3;i++){
	     printf("1-%d:%23s　　　 1-%d:%23s\n",i+i+1,kart1[i+i],i+i+2,kart1[i+i+1]);
           }
           for(i=0;i<3;i++){
	     printf("2-%d:%23s　　　 2-%d:%23s\n",i+i+1,kart2[i+i],i+i+2,kart2[i+i+1]);
           }
           for(i=0;i<3;i++){
	     printf("3-%d:%23s　　　 3-%d:%23s\n",i+i+1,kart3[i+i],i+i+2,kart3[i+i+1]);
           }
           for(i=0;i<3;i++){
	     printf("4-%d:%23s　　　 4-%d:%23s\n",i+i+1,bike1[i+i],i+i+2,bike1[i+i+1]);
           }
           for(i=0;i<3;i++){
	     printf("5-%d:%23s　　　 5-%d:%23s\n",i+i+1,bike2[i+i],i+i+2,bike2[i+i+1]);
           }
           for(i=0;i<3;i++){
	     printf("6-%d:%23s　　　 6-%d:%23s\n",i+i+1,bike3[i+i],i+i+2,bike3[i+i+1]);
           }
	   printf("\n7-1:ﾛｹｯﾄｷﾗｰ、ﾏｯﾊﾊﾞｲｸ、ｽｰﾊﾟｰﾊﾞｳｻﾞｰ、ﾐﾆﾁｬｰｼﾞｬｰ禁止\n7-2:ﾗｲﾄﾞｵﾝｶﾒｯｸ、ﾄﾞﾙﾌｨﾝｷｯｸ、ｲﾝﾀｰｾﾌﾟﾀｰ禁止\n7-3:[7-1]+[7-2]\n7-4:ﾐﾆﾁｬｰｼﾞｬｰ、ﾜｲﾙﾄﾞｽﾀｰ、ﾄﾘｯｷｰ禁止\n7-5:カート限定　7-6:バイク限定　7-7:すべて解禁\n　7-8:すべて禁止");
	   printf("8:キャラ縛りを設定する\n0:設定終了\n");

           printf("\n□マシンの縛り選択\n(○-○の形式で選択、選択しなおせば戻る。「-」がついたマシンは出現しない):");
           scanf("%d-%d",&c,&d);
	   if(c==1 && kart1[d-1][0]=='-'){
	     kart1[d-1][0] = ' ';
	   }else if(c==2 && kart2[d-1][0]=='-'){
	     kart2[d-1][0] = ' ';
	   }else if(c==3 && kart3[d-1][0]=='-'){
	     kart3[d-1][0] = ' ';
	   }else if(c==4 && bike1[d-1][0]=='-'){
	     bike1[d-1][0] = ' ';
	   }else if(c==5 && bike2[d-1][0]=='-'){
	     bike2[d-1][0] = ' ';
           }else if(c==6 && bike3[d-1][0]=='-'){
	     bike3[d-1][0] = ' ';
	   }else if(c==1){
	     kart1[d-1][0] = '-';
	   }else if(c==2){
	     kart2[d-1][0] = '-';
	   }else if(c==3){
	     kart3[d-1][0] = '-';
	   }else if(c==4){
	     bike1[d-1][0] = '-';
	   }else if(c==5){
	     bike2[d-1][0] = '-';
	   }else if(c==6){
	     bike3[d-1][0] = '-';
	   }else if(c==8){
	     l = 1;
	   }
	   if(c==7){
	     k = d;
	   }
           if(k==1||k==3){
	     bike1[1][0] = '-';
	     bike2[1][0] = '-';
	     bike3[1][0] = '-';
	     kart1[2][0] = '-';
	   }
           if(k==2||k==3){
	     bike1[4][0] = '-';
	     bike2[5][0] = '-';
	     bike2[4][0] = '-';
	   }
           if(k==4){
	     kart2[2][0] = '-';
	     kart3[5][0] = '-';
	     kart1[2][0] = '-';
	   }
           if(k==5){
	     for(i=0;i<6;i++){
	       bike1[i][0] = '-';
	       bike2[i][0] = '-';
	       bike3[i][0] = '-';
	     }
	   }
           if(k==6){
	     for(i=0;i<6;i++){
	       kart1[i][0] = '-';
	       kart2[i][0] = '-';
	       kart3[i][0] = '-';
	     }
	   }
           if(k==7){
	     for(i=0;i<6;i++){
	       kart1[i][0] = ' ';
	       kart2[i][0] = ' ';
	       kart3[i][0] = ' ';
	       bike1[i][0] = ' ';
	       bike2[i][0] = ' ';
	       bike3[i][0] = ' ';
	    }
	  }
           if(k==8){
	     for(i=0;i<6;i++){
	       kart1[i][0] = '-';
	       kart2[i][0] = '-';
	       kart3[i][0] = '-';
	       bike1[i][0] = '-';
	       bike2[i][0] = '-';
	       bike3[i][0] = '-';
	    }
	  }
        printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
	}else if(l==1){
	  k = -1;
	  printf("軽量級\n");
          for(i=0;i<2;i++){
	    printf("1-%d:%17s　　 1-%d:%17s　　 1-%d:%17s\n",i+i+i+1,char1[i+i+i],i+i+i+2,char1[i+i+i+1],i+i+i+3,char1[i+i+i+2]);
           }
	  printf("1-%d:%17s　　 1-%d:%17s\n\n",i+i+i+1,char1[i+i+i],i+i+i+2,char1[i+i+i+1]);
	  printf("中量級\n");
          for(i=0;i<2;i++){
	    printf("2-%d:%17s　　 2-%d:%17s　　 2-%d:%17s\n",i+i+i+1,char2[i+i+i],i+i+i+2,char2[i+i+i+1],i+i+i+3,char2[i+i+i+2]);
          }
	  printf("2-%d:%17s　　 2-%d:%17s\n\n",i+i+i+1,char2[i+i+i],i+i+i+2,char2[i+i+i+1]);
	  printf("重量級\n");
          for(i=0;i<2;i++){
	    printf("3-%d:%17s　　 3-%d:%17s　　 3-%d:%17s\n",i+i+i+1,char3[i+i+i],i+i+i+2,char3[i+i+i+1],i+i+i+3,char3[i+i+i+2]);
          }
          printf("3-%d:%17s　　 3-%d:%17s\n",i+i+i+1,char3[i+i+i],i+i+i+2,char3[i+i+i+1]);
          printf("\n4-1:軽量級のみ　4-2:中量級のみ　4-3:重量級のみ　4-4:すべて解禁　4-5:すべて禁止\n");
	  printf("5:マシン縛りを設定する\n0:設定終了\n");

          printf("\n□キャラの縛り選択\n(○-○の形式で選択、選択しなおせば戻る。「-」がついたキャラは出現しない):");
          scanf("%d-%d",&c,&d);
	  if(c==1 && char1[d-1][0]=='-'){
	    char1[d-1][0] = ' ';
	  }else if(c==2 && char2[d-1][0]=='-'){
	    char2[d-1][0] = ' ';
	  }else if(c==3 && char3[d-1][0]=='-'){
	    char3[d-1][0] = ' ';
	  }else if(c==1){
            char1[d-1][0] = '-';
	  }else if(c==2){
	    char2[d-1][0] = '-';
	  }else if(c==3){
	    char3[d-1][0] = '-';
	  }else if(c==5){
	    l = 0;
	  }
	  if(c==4){
	    k = d;
	  }
          if(k==1){
	    for(i=0;i<8;i++){
	      char2[i][0] = '-';
	      char3[i][0] = '-';
	    }
	  }
          if(k==2){
	    for(i=0;i<8;i++){
	      char1[i][0] = '-';
	      char3[i][0] = '-';
	    }
	  }
          if(k==3){
	    for(i=0;i<8;i++){
	      char1[i][0] = '-';
	      char2[i][0] = '-';
	    }
	  }
	  if(k==4){
	    for(i=0;i<8;i++){
	      char1[i][0] = ' ';
	      char2[i][0] = ' ';
	      char3[i][0] = ' ';
	    }
	  }
	  if(k==5){
	    for(i=0;i<8;i++){
	      char1[i][0] = '-';
	      char2[i][0] = '-';
	      char3[i][0] = '-';
	    }
	  }
	}else if(l==2){
	  c = 0;
	}
      printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
      }while(c!=0);
      setting = 3;
    }

    if(mode==0 && setting==3){/*抽選をする*/
      printf("\n-----------------------------\n");
      for(i=0;i<a;i++){
        all = b;
        kart = all / 2;
        if(all%2==1){
          kart++;
        }
        if(b>1){
          printf("%s:\n",mem[i]);
        }
        for(j=0;j<b;j++){
          do{
	      k = rand()%3;
	      l = rand()%all+1;
	      m = rand()%8;
	      n = rand()%6;
	      if(b==1){
		l = rand()%4;
		kart = 1;
	      }
       	      if(k==0){
	        if(l<=kart){
	          strcpy(check2,char1[m]);
	          strcpy(check,kart1[n]);
	        }else{
	          strcpy(check2,char1[m]);
	          strcpy(check,bike1[n]);
	        }
	      }else if(k==1){
	        if(l<=kart){
	          strcpy(check2,char2[m]);
	          strcpy(check,kart2[n]);
	        }else{
	          strcpy(check2,char2[m]);
	          strcpy(check,bike2[n]);
	        }
	      }else if(k==2){
	        if(l<=kart){
	          strcpy(check2,char3[m]);
	          strcpy(check,kart3[n]);
	        }else{
	          strcpy(check2,char3[m]);
	          strcpy(check,bike3[n]);
	        }
	      }
	  }while(check[0]=='-'||check2[0]=='-');
          if(b==1){
	    printf(" %s: %s /%s\n",mem[i],check2,check);
	  }else{
	    printf("%d: %s /%s\n",j+1,check2,check);
	  }
	  if(l<=kart){
	    kart--;
	  }
        all--;
	}
      }
    printf("-----------------------------\n\n");
    }

    if(mode==0 && setting!=4){/*この後どうするか決定する*/
      printf("■□キャラ・マシン抽選終了□■\n0:同条件で繰り返す\n1:縛りキャラ・マシンを変える\n2:参加者を変える\n3:最初から\n4:大会用得点計算へ\n5:終了する\n");
      scanf("%d",&flag);
      if(flag==0){
	setting = 3;
      }else if(flag==1){
	setting = 2;
	l = -1;
      }else if(flag==2){
	setting = 4;
      }else if(flag==3){
	mode = 0;
	setting = 1;
      }else if(flag==4){
	mode = 1;
	setting = 1;
      }else if(flag==5){
	break;
      }
    }
    printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");


    if(mode==0 && setting==4){
      printf("-------------------\n");
      for(i=0;i<a;i++){
	printf("%d人目 %s\n",i+1,mem[i]);
      }
      printf("-------------------\n\n");
      printf("□何人目の人が抜けた？(人数が増える場合,%d):",a+1);
      scanf("%d",&i);
      if(i==a+1){
	printf("□新たに参加する人を入力:");
	a++;
	scanf("%s",mem[a-1]);
      }else{
	for(j=i-1;j<a-1;j++){
	  strcpy(mem[j],mem[j+1]);
        }
	strcpy(mem[j+1],"新規");
	a--;
      }
      printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
      printf("-------------------\n");
      for(i=0;i<a;i++){
	printf("%d人目 %s\n",i+1,mem[i]);
      }
      printf("-------------------\n\n");
      printf("■□変更完了□■\n0:変更完了\n1:まだ変更点がある\n");
      scanf("%d",&flag);
      printf("\n");
      if(flag==0){
	setting = 3;
      }
    }
    printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");

    /*----------------大会ポイント集計--------------*/
    if(mode==1 && setting==2){
      for(i=0;i<a;i++){
	allpoi[i] = 0;
      }
      for(i=0;i<a;i++){
	for(j=0;j<b;j++){
	  printf("%sさんの第%dレースの得点を入力:",mem[i],j+1);
	  scanf("%d",&poi[i][j]);
	  allpoi[i] = allpoi[i] + poi[i][j];
	}
      }
      for(i=0;i<a-1;i++){
	for(j=0;j<a-1;j++){
	  if(allpoi[j]-allpoi[j+1]<0){
	    swapi(&allpoi[j],&allpoi[j+1]);
	    swapc(mem[j],mem[j+1]);
	    for(k=0;k<b;k++){
	      swapi(&poi[j][k],&poi[j+1][k]);
	    }
	  }
	}
      }
      printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
      printf("\n計算結果\n------------------------------------\n■○○杯　結果\n");
      for(i=0;i<a;i++){
	if(allpoi[i-1]!=allpoi[i]){
	  printf("%2d",i+1);
	  l = i;
	}else{
	  printf("%2d",l+1);
	}
	if(l==0){
	  printf("st　");
	}else if(l==1){
	  printf("nd　");
	}else if(l==2){
	  printf("rd　");
	}else{
	  printf("th　");
	}
	printf("[");
	for(j=0;j<b-1;j++){
	  printf("%2d+",poi[i][j]);
	}
        printf("%2d] %3dpts　%s\n",poi[i][j],allpoi[i],mem[i]);
      }
      printf("------------------------------------\n※そのままコピペするとずれまくってるので各自調整してください\n");
      setting = 3;
    }

    if(mode==1 && setting==3){
      printf("■□計算終了□■\n0:マシン抽選へ\n1:最初から\n2:終了する\n:");
      scanf("%d",&flag);
      if(flag==0){
	mode = 0;
	setting = 1;
      }else if(flag==1){
	mode = 1;
	setting = 1;
      }else if(flag==2){
	break;
      }
    }

    if(mode==2){
      printf("\n更新履歴\n----------------------------------------------\nver2.2　7/30\n抽選機能\において、キャラの縛りが自由に選択できるようになった\nver2.1　7/27\n得点計算機能\において各レースの小計を表\示するようにした\nver2.0　7/27\n一から一新！抽選機能\において、マシンの縛りが自由にできるようになった\n得点計算機能\において、ポイントが高い順にソ\ートしてくれるようにした\nver1.1　7/3\n抽選機能\において、抽選終了後、参加者や参加人数を変更できるようにした\nver1.0\nとりあえず公開、抽選機能\と得点計算機能\を実装\n----------------------------------------------\n\n");
    }
  }while(1);
  return 0;
}