Tugas Besar Kartu Sesetanan dengan Bahasa C

Program 1 Modul.h

/*File       : modul.h
Deskripsi    : modul untuk program 1cangkul.cpp
Author       : Trisna Ari Roshinta
Tanggal      : 28 September 2012
Rev          : 6 Jan 2013
*/

/*tipe record untuk kartu asli*/
typedef struct{
    char angka[5];
    char jenis[5];
    int warna;
}kartu;

/*tipe record untuk kartu cangkulan*/
typedef struct{
    char angka[5];
    char jenis[5];
    int warna;
    int acak;
    int status;
}kartu1;

/*tipe record untuk kartu ditangan pemain*/
typedef struct{
    char angka[5];
    char jenis[5];
    int warna;
    int status;
}kartu2;

/*tipe record untuk pemain*/
typedef struct{
    char nama[10];
    int score;
    kartu2 kartu_tgn[26];
    int status;
    int jum_kartu;
}player;


void judul();
/* Deskripsi          : prosedur untuk menampilkan judul */
/* IS                 : judul belum tampil*/
/* FS                 : judul tampil di layar */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
int menu();
/* Deskripsi          : fungsi untuk menangkap inputan menu*/
/* Input              : - */
/* Output             : mengisi variabel global menu_pil*/
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void menu_lanjut();
/* Deskripsi          : prosedur untuk menampilkan menu lanjut */
/* IS                 : menu lanjut belum tampil*/
/* FS                 : menu lanjuttampil di layar */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void menu_new_game();
/* Deskripsi          : prosedur untuk menampilkan menu pemain awal permainan */
/* IS                 : user belum memilih melanjutkan permainan atau mereset ulang permainan*/
/* FS                 : user sudah memilih melanjutkan permainan atau mereset ulang permainan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void gotoxy(int x, int y);
/* Deskripsi          : prosedur untuk memindahkan kursor */
/* IS                 : kursor belum pindah*/
/* FS                 : kursor sudah berada pada posisi x dan y */
/* Modul yg memanggil : main, judul, menu_new_game, menu_lanjut, printKartu, printKocok, printKartuSetan, printKartuSama, printKartuTidakSama*/
/* Modul yg dipanggil : - */
void pembuatanKartu();
/* Deskripsi          : prosedur untuk membuat kartu diawal permainan */
/* IS                 : kartu belum dibuat*/
/* FS                 : kartu sudah terbentuk*/
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void kocokKartu();
/* Deskripsi          : prosedur untuk membuat kartu yang acak*/
/* IS                 : kartu dengan urutan acak masih belum terbentuk*/
/* FS                 : kartu dengan urutan acak sudah terbentuk */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void printKartu(int p);
/* Deskripsi          : prosedur untuk menampilkan kartu pemain. Dimana kartu pemain(user) diperlihatkan, sedangkan yang lain ditutup*/
/* IS                 : kartu belum ditampilkan */
/* FS                 : kartu sudah ditampilkan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void printKocok();
/* Deskripsi          : prosedur untuk menampilkan kartu seolah-olah sedang dikocok*/
/* IS                 : tampilan belum ditampilkan */
/* FS                 : tampilan sudah ditampilkan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void printKartuSetan();
/* Deskripsi          : prosedur untuk menampilkan kartu setan yang seolah-olah telah disimpan*/
/* IS                 : kartu belum ditampilkan */
/* FS                 : kartu sudah ditampilkan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
void printKartuSama(int j, int p, int p2, int k, int n);
/* Deskripsi          : prosedur untuk menampilkan kartu pemain yang berpasangan.
                        Dimana kartu pemain akan diperlihatkan isinya*/
/* IS                 : kartu berpasangan belum ditampilkan */
/* FS                 : kartu berpasangan sudah ditampilkan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */


void printKartuTidakSama(int j,int p,int n);
/* Deskripsi          : prosedur untuk menampilkan kartu pemain yang tidak berpasangan.
                        Dimana kartu pemain(user) diperlihatkan, sedangkan yang lain ditutup*/
/* IS                 : kartu belum ditampilkan */
/* FS                 : kartu sudah ditampilkan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */

int jumlah_kartu(kartu1 x[52]);
/* Deskripsi          : fungsi untuk menghitung sisa kartu pada cangkulan */
/* Input              : kartu cangkulan */
/* Output             : jumlah kartu cangkulan */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */


int hasil_cek_kartu(int p,int p2, int k, int n);
/* Deskripsi          : fungsi untuk mencocokkan kartu pemain dengan pemain lainya */
/* Input              : pemian, pemain gilir, kartu pemain 1, kartu pemain 2 */
/* Output             : hasil cek (0/1) */
/* Modul yg memanggil : cek_kartu ,cek_kartu_pem_pem */
/* Modul yg dipanggil : - */

int hasil_cek_kartu2(int p, int k, int n);
/* Deskripsi          : fungsi untuk mencocokkan kartu pemain dengan kartu cangkulan */
/* Input              : pemian, pemain gilir, kartu pemain, kartu cangkulan */
/* Output             : hasil cek (0/1)*/
/* Modul yg memanggil : cek_kartu_pem_cang */
/* Modul yg dipanggil : - */

void cek_kartu(int p);
/* Deskripsi          : procedure yang akan digunkan untuk memproses hasil pengecekkan kartu pemain sendiri */
/* IS                 : kartu masih ada di pemain(statusnya 1)*/
/* FS                 : jika return value dari "hasil_cek_kartu" adalah 1 maka kartu yang berpasangan akan dibuang
                        jika return value dari "hasil_cek_kartu" adalah 0 maka kartu akan tetap */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */

void cek_kartu_pem_cang(int p,int no_cang);
/* Deskripsi          : procedure yang akan digunkan untuk memproses hasil pengecekkan kartu pemain dengan kartu cangkulan */
/* IS                 : kartu masih ada di pemain atau di cangkulan(statusnya 1)*/
/* FS                 : jika return value dari "hasil_cek_kartu2" adalah 1 maka kartu yang berpasangan akan dibuang
                        jika return value dari "hasil_cek_kartu2" adalah 0 maka kartu akan dimasukkan ke pemain gilir */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */

void cek_kartu_pem_pem(int p,int pem_cang,int no_kartu_pem);
/* Deskripsi          : procedure yang akan digunkan untuk memproses hasil pengecekkan kartu pemain dengan kartu pemain lawan */
/* IS                 : kartu masih ada di pemain(statusnya 1)*/
/* FS                 : jika return value dari "hasil_cek_kartu" adalah 1 maka kartu yang berpasangan akan dibuang
                        jika return value dari "hasil_cek_kartu" adalah 0 maka kartu akan dimasukkan ke pemain gilir */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */

void jumlah_kartu_pemain();  
/* Deskripsi          : procedure yang akan menghitung sisa kartu pemain */
/* IS                 : variable global jumlah kartu pemain belum terisi*/
/* FS                 : variable global jumlah kartu pemain  sudah terisi */
/* Modul yg memanggil : main */
/* Modul yg dipanggil : - */
 
Program 2 Cangkul.cpp
/*File        : sesetanan.cpp
Deskripsi     : permainan sesetanan ini adalah permainan kartu yang mana ada 1 kartu sebagai setan yang tidak
                  diketahui oleh seluruh pemain. apabila 3 dari 4 pemain sudah tidak memiliki kartu maka dipastikan
                  1 pemain yang tersisa memiliki 1 kartu, kartu ini adalah pasangan kartu setan. dan pemain yang teersisa ini dinyatakan kalah.
IS            : kartu setan tidak diketahui oleh seluruh pemain
FS            : kartu setan diketahui oleh seluruh pemain dan diketahui urutan pemenang
Author        : Trisna Ari Roshinta    (121511031)
Tanggal       : 28 September 2012
Rev           : 6 Jan 2013
*/

#include
#include
#include
#include
#include
#include
#include
#include
#include
#include "modul.h"

using namespace std;

/*tipedata global yang dipakai lebih dari 1 module*/
player pemain[4];
kartu asli[52],kartu_setan;
kartu1 cangkulan[52];
int bol,jumkar_awal,jum_kar_pem,no_kartu_pem,pem_cang,tmp_ind;
int jdl=1;
FILE *fs;
FILE *fa;


/*MODULE MAIN UTAMA*/
main(){
system("cls");
int i,j,p,c,k,rnd,temp1,temp4,rank,pil;
char temp2[5],temp3[5],kata;
tmp_ind=0;
strcpy(pemain[1].nama,"KOMP1");
strcpy(pemain[2].nama,"KOMP2");
strcpy(pemain[3].nama,"KOMP3");
system("color F9");
if(jdl==1){
  judul();
}
pil=menu();

   /*Baca file pemain skor*/
   if((fs=fopen("score.dat","rb"))==NULL){
       printf("File gagal dibuka");
    }
    else{
       i=0;
       while(fscanf(fs,"%s %d",pemain[i].nama,&pemain[i].score)==2){
              i++;
       }
    }
    fclose(fs);
   
if(pil==1){
    if((fa=fopen("aturan_main.txt","rt"))==NULL){
       printf("File gagal dibuka");
    }
    else{
       system("cls");
       gotoxy(32,3); cout<<"ATURAN PERMAINAN";        
       gotoxy(26,4); cout<<"o--------------------------o";    
      printf("\n\n");
       while(fscanf(fa,"%c",&kata)!=EOF){
           printf("%c",kata);
       }
    }
    fclose(fa);
    menu_lanjut();
}
if(pil==2){
      system("cls");
      gotoxy(32,3); cout<<"SKOR TOTAL PEMAIN";
      for(i=0;i<4 br="br" i="i" nbsp="nbsp">               gotoxy(26,6); cout<<"o--------------------------o";
               gotoxy(33,8+(2*i)); cout<               gotoxy(39,8+(2*i)); cout<<":";
               gotoxy(41,8+(2*i)); cout<               gotoxy(26,16); cout<<"o--------------------------o"; 
      }    
    menu_lanjut();
}

if(pil==3){

menu_new_game();
 
/*mendefaultkan rank atau status pemain menjadi 0*/
for(i=0;i<4 br="br" i="i">    pemain[i].status=0;
}

/*Membuat kartu*/
pembuatanKartu();

/*Mengocok kartu*/
printKocok();
kocokKartu();

/*Mengambil salah satu "kartu cangkulan" untuk dijadikan "kartu setan", yaitu "kartu cangkulan" yang memiliki nomor random paling besar*/
strcpy(kartu_setan.jenis,cangkulan[51].jenis);
strcpy(kartu_setan.jenis,cangkulan[51].angka);
kartu_setan.warna=cangkulan[51].warna;
cangkulan[51].status=0;

/*Menampilakan kartu setan*/
system("cls");
gotoxy(27,3); cout<<"KARTU SETAN TELAH DISIMPAN";
gotoxy(25,4); cout<<"o-----------------------------o";
printKartuSetan();

/*Meminta pemain untuk memasukkan jumlah kartu yang akan dibagikepada pemain. Maksimal 7 kartu*/
do{
   system("cls");
   gotoxy(24,3); cout<<"JUMLAH KARTU PERTAMA YANG AKAN DIBAGI";
   gotoxy(22,4); cout<<"o----------------------------------------o";
   gotoxy(29,8); cout<<"Masukkan jumlah kartu (2-7): ";
   scanf("%d",&jumkar_awal);
}while(jumkar_awal>7);

/*Membagikan kartu kepada pemain sebanyak inputan jumlah kartu yang dibagi, dan "kartu cangkulan" yang dibagikan kepemain,statusnya diganti menjadi 0*/
for(i=0;i    cangkulan[i].status=0;
    cangkulan[i+(jumkar_awal*1)].status=0;
    cangkulan[i+(jumkar_awal*2)].status=0;
    cangkulan[i+(jumkar_awal*3)].status=0;
    pemain[0].kartu_tgn[i].status=1;
    pemain[1].kartu_tgn[i].status=1;
    pemain[2].kartu_tgn[i].status=1;
    pemain[3].kartu_tgn[i].status=1;
    strcpy(pemain[0].kartu_tgn[i].jenis,cangkulan[i].jenis);
    strcpy(pemain[0].kartu_tgn[i].angka,cangkulan[i].angka);
    pemain[0].kartu_tgn[i].warna=cangkulan[i].warna;
    strcpy(pemain[1].kartu_tgn[i].jenis,cangkulan[i+(jumkar_awal*1)].jenis);
    strcpy(pemain[1].kartu_tgn[i].angka,cangkulan[i+(jumkar_awal*1)].angka);
    pemain[1].kartu_tgn[i].warna=cangkulan[i+(jumkar_awal*1)].warna;
    strcpy(pemain[2].kartu_tgn[i].jenis,cangkulan[i+(jumkar_awal*2)].jenis);
    strcpy(pemain[2].kartu_tgn[i].angka,cangkulan[i+(jumkar_awal*2)].angka);
    pemain[2].kartu_tgn[i].warna=cangkulan[i+(jumkar_awal*2)].warna;
    strcpy(pemain[3].kartu_tgn[i].jenis,cangkulan[i+(jumkar_awal*3)].jenis);
    strcpy(pemain[3].kartu_tgn[i].angka,cangkulan[i+(jumkar_awal*3)].angka);
    pemain[3].kartu_tgn[i].warna=cangkulan[i+(jumkar_awal*3)].warna;
    }

/*Menampilkan kartu pemain setelah kartu cangkulan dibagikan kepada pemain*/
system("cls");
   gotoxy(26,3); cout<<"KARTU PEMAIN SETELAH DIBAGIKAN\n";
   gotoxy(24,4); cout<<"o---------------------------------o";
for(i=0;i<4 br="br" i="i">    printKartu(i);
}
system("pause");

/*Cek kartu yang sama pada tiap" pemain dengan menggunakan procedure "cek_kartu" yang memanggil function "hasil_cek_kartu" dan akan membuangnya bila sama*/
system("cls");
gotoxy(20,6); cout<<"o------------------------------------------o";
gotoxy(23,8); cout<<"SAATNYA PENGECEKAN KARTU TIAP PEMAIN";
gotoxy(20,10); cout<<"o------------------------------------------o";
     for(i=0;i<5 br="br" i="i" nbsp="nbsp">       gotoxy(39,12); cout<<(5-i);
       Sleep(1000);  
     }
for(p=0;p<4 br="br" p="p">   system("cls");
   gotoxy(26,3); cout<<"CEK KESAMAAN KARTU TIAP PEMAIN";
   gotoxy(21,4); cout<<"o----------------------------------------o\n\n";
   printKartu(p);
   cek_kartu(p);   
}

/*Menampilkan sisa kartu setelah pengecekkan */
system("cls");
gotoxy(34,1); cout<<"SISA KARTU PEMAIN";
gotoxy(31,2); cout<<"o----------------------o\n\n";
for(p=0;p<4 br="br" p="p">   printKartu(p);
}
system("pause");

/*Pemain mulai mengambil kartu ke "kartu cangkulan", bila kartu yang diambil oleh pemain sama dengan "kartu pemain" maka pemain berkesempatan untuk mengambil "kartu cangkulan" lagi*/
system("cls");
gotoxy(20,6); cout<<"o------------------------------------------o";
gotoxy(23,8); cout<<"SAATNYA PENGAMBILAN KARTU KE CANGKULAN";
gotoxy(20,10); cout<<"o------------------------------------------o";
     for(i=0;i<5 br="br" i="i" nbsp="nbsp">       gotoxy(39,12); cout<<(5-i);
       Sleep(1000);  
     }

p=0;  //pemain pertama
for(i=(jumkar_awal*4);i<51 50="50" 51="51" br="br" diikutkan="diikutkan" hanya="hanya" i="i" index="index" karena="karena" kartu="kartu" nbsp="nbsp" sampai="sampai" setan="setan" tidak="tidak">    system("cls");
    gotoxy(20,2); cout<<"PENGECEKAN KARTU PEMAIN DENGAN KARTU CANGKULAN";
    gotoxy(17,3); cout<<"o--------------------------------------------------o\n\n";
    if(bol==0){
       gotoxy(35,4); cout<<"GANTI PEMAIN";
       Sleep(500);
    }
    else{gotoxy(35,4); cout<<"PEMAIN TETAP";
       Sleep(500);
    }   
    printf("\n");
    printKartu(p);
    cek_kartu_pem_cang(p,i);
      if(bol==0){
         p=p+1;
      }
        if(p==4){
        p=0;
      }
}

/*Menampilkan sisa kartu pemain setelah pengecekkan*/
system("cls");
gotoxy(28,1); cout<<"SISA KARTU PEMAIN SETELAH MENCANGKUL";
gotoxy(24,3); cout<<"o----------------------------------------o\n\n";
for(i=0;i<4 br="br" i="i">   printKartu(i);
}
system("pause");


/*Memulai permainan mengambil kartu ke pemain lawan, bila "kartu pemain" ada yang sama dengan kartu lawan, maka pemain berkesempatan untuk mengambil kartu lagi ke pemain lawan*/
system("cls");
gotoxy(20,6); cout<<"o------------------------------------------o";
gotoxy(22,8); cout<<"SAATNYA PENGAMBILAN KARTU KE PEMAIN LAIN";
gotoxy(20,10); cout<<"o------------------------------------------o";
     for(i=0;i<5 br="br" i="i" nbsp="nbsp">       gotoxy(39,12); cout<<(5-i);
       Sleep(1000);  
     }
    
system("cls");
gotoxy(26,2); cout<<"PENGAMBILAN KARTU DARI PEMAIN LAIN";
gotoxy(22,3); cout<<"o------------------------------------------o\n\n";
tmp_ind=1;
rank=1;
bol=0;
do{
   p=p%4;
   jumlah_kartu_pemain(); //memanggil procedure untuk mengetahui jumlah kartu masing-masing pemain
   pem_cang=p;
   
        /*mencari pemain selanjutnya yang kartunya masih ada*/
        if(pemain[(p+1)%4].jum_kartu==0){
            if(pemain[(p+2)%4].jum_kartu==0){
                if(pemain[(p+3)%4].jum_kartu==0){
                    printf("pemain %d kalah",p+1);
                }
                else{
                pem_cang=(p+3)%4;
                }
            }
            else{
            pem_cang=(p+2)%4;
            }
        }
        else{
            pem_cang=(p+1)%4;
        }
        system("cls");
        gotoxy(25,2); cout<<"PENGAMBILAN KARTU DARI PEMAIN LAIN";
        gotoxy(21,3); cout<<"o----------------------------------------o\n";
        gotoxy(32,4); cout<        printKartu(p);
        printKartu(pem_cang);
        /*inputan untuk memilih kartu lawan yang ditampilkan*/
        if(p==0){
            do{
                printf("\n\n\t\t\tAmbil kartu ke ? ");
                scanf("%d",&no_kartu_pem);
                no_kartu_pem=no_kartu_pem-1;  /*karena array mulai dari 0, tampilan mulai dari 1*/
            }while(pemain[pem_cang].kartu_tgn[no_kartu_pem].status==0);
        }else{
            no_kartu_pem=-1;
            do{
                no_kartu_pem++;
            }while(pemain[pem_cang].kartu_tgn[no_kartu_pem].status==0);
        }
   
        /*procedure pengecekkan kartu dengan memanggil function "hasil_cek_kartu" dan pembuangan kartu jika ternyata sama*/
        cek_kartu_pem_pem(p,pem_cang,no_kartu_pem);
   
        /*Mengecek kemenangan*/
   
        /*hitung jumlah kartu pemain lagi untuk melihat kemenangan*/
        jumlah_kartu_pemain();
   
        /*Ada 2 kemungkinan habis, yaitu "kartu pemain" dan "kartu pemain cangkulan "*/
        /*jika yang habis dulu adalah "kartu pemain" maka giliran pemain akan dilanjutkan oleh pemain berikutnya*/
        if(pemain[p].jum_kartu==0){
            pemain[p].status=rank;
            rank++;
            if(bol!=0){
                p=p+1;
            }
        }
   
        /*jika yang habis dulu adalah "kartu pemain dicangkul" maka pengambilan kartu pemain diteruskan ke pemain cangkulan selanjutnya*/
        if(pemain[pem_cang].jum_kartu==0){
            pemain[pem_cang].status=rank;
            rank++;
            pem_cang=pem_cang+1;
        }
   
        /*Variabel global bol ini didapat dari procedure "cek_kartu_pem_pem", 0 bila kartu tidak ada yang sama dan 1 bila sebaliknya */
        if(bol==0){
            p=p+1;
        }
        if(p>=4){
            p=0;
        }
        if(pem_cang>=4){
            pem_cang=0;
        }
   
        /*Mengecek pemain yang sudah menang terlebih dahulu*/
        if(pemain[p].status!=0){
            p=p+1;
        }
        if(pemain[pem_cang].status!=0){
            pem_cang=pem_cang+1;
        }
   
    if(bol==0){
        system("cls");
        gotoxy(31,8); cout<<"o-----------------------o\n\n";
        gotoxy(34,10); cout<<"PEMAIN SELANJUTNYA";
        gotoxy(31,12); cout<<"o-----------------------o\n\n";
    }
   
    Sleep(1000);
}while(jum_kar_pem!=1);

/*Menampilkan pemain mana yang tersisa kartunnya*/

system("cls");
gotoxy(21,3); cout<<"SISA KARTU PEMAIN";
gotoxy(18,4); cout<<"o--------------------o\n\n";
for(i=0;i<4 br="br" i="i">    if(pemain[i].jum_kartu!=0){
     for(int n=0;n<26 br="br" n="n">       if(pemain[i].kartu_tgn[n].status==1){
             gotoxy(25,6);  cout<<" _ _ _ _  ";
             gotoxy(25,7);  cout<<"|       | ";
             gotoxy(25,8);  cout<<"|";
                            cout<                            cout<<"      | ";
             gotoxy(25,9);  cout<<"|   ";
                            cout<                            if(strcmp(pemain[i].kartu_tgn[n].angka,"10")==0){
                             cout<<"  | ";}
                            else{
                             cout<<"   | ";}    
             gotoxy(25,10); cout<<"|      ";
                            cout<                            cout<<"| ";
             gotoxy(25,11); cout<<"|_ _ _ _|";
             gotoxy(25,13); cout<<"  "; cout<        }
      }
        pemain[i].status=4;
    }
}
Sleep(1000);
/*Menampilkan kartu setanya*/
gotoxy(42,3); cout<<"KARTU SETAN DIBUKA";
gotoxy(39,4); cout<<"o---------------------o\n\n";
     gotoxy(45,6);  cout<<" _ _ _ _  ";
     gotoxy(45,7);  cout<<"|       | ";
     gotoxy(45,8);  cout<<"|";
                    cout<                    cout<<"      | ";
     gotoxy(45,9);  cout<<"|   ";
                    cout<                    if(strcmp(cangkulan[51].angka,"10")==0){
                     cout<<"  | ";}
                    else{
                     cout<<"   | ";}    
     gotoxy(45,10); cout<<"|      ";
                    cout<                    cout<<"| ";
     gotoxy(45,11); cout<<"|_ _ _ _|";
     gotoxy(30,15); cout<<" ";

system("pause");
/*Menampilkan skor masing-masing pemain*/
system("cls");
      gotoxy(35,3); cout<<"SKOR PEMAIN";
      for(i=0;i<4 br="br" i="i" nbsp="nbsp">               gotoxy(26,6); cout<<"o--------------------------o";
               //gotoxy(28,8+(2*i)); cout<               //gotoxy(30,8+(2*i)); cout<<":";
               gotoxy(33,8+(2*i)); cout<               gotoxy(39,8+(2*i)); cout<<":";
               gotoxy(41,8+(2*i)); cout<<(4-pemain[i].status)*25;
               gotoxy(26,16); cout<<"o--------------------------o\n\n"; 
      }

   for(i=0;i<4 br="br" i="i">     pemain[i].score=pemain[i].score+((4-pemain[i].status)*25);
   }

if((fs=fopen("score.dat","wb"))==NULL){
    printf("File gagal dibuka");
}
else{
    for(i=0;i<4 br="br" i="i">    fprintf(fs,"%s %d\n",pemain[i].nama,pemain[i].score);
    }
}
fclose(fs);
}
menu_lanjut();

}
/*Akhir module MAIN*/



/*MODULE*/
void judul(){
jdl=0;

     //deklarasi string x
      char x[]="S E S E   A N A N";
      char y[]="N A N A   E S E S";
      //deklarasi variabel bertipe integer
      int i,n;
      //menghitung panjang string x, karena panjang string y sama.
      n=strlen(x);
    
      //perulangan sebanyak panjang string
     
      for(i=0; i          system("color F5");
          Sleep(100);
                  //mencetak string x per karakter
         gotoxy(32+i,10); cout<         gotoxy(32+i,2+i); cout<         Sleep(100);
         system("color FD");
         gotoxy(48-i,2+i); cout<         gotoxy(48-i,10); cout<         Sleep(100);
      }
  Sleep(1000);
  gotoxy(40,10); cout<<"t";
  Sleep(400);
  gotoxy(40,10); cout<<"T";
  Sleep(2000);
  system("cls");
  system("color F5");
     gotoxy(35,8); cout<<"Create by :";
     gotoxy(28,10); cout<<" Pristiana Faisal   [121511023]";
     gotoxy(28,12); cout<<" Putri Amalia       [121511024]";
     gotoxy(28,14); cout<<" Trisna Ari Roshinta [121511031]";
     Sleep(2000);
  system("color F9");
  system("cls"); 
}

int menu(){
int pil;
     gotoxy(32,5); cout<<"S E S E T A N A N";
     gotoxy(26,8); cout<<"o--------------------------o";
     gotoxy(31,10); cout<<"1. ATURAN PERMAINAN";
     gotoxy(31,12); cout<<"2. SKOR PEMAIN";
     gotoxy(31,14); cout<<"3. MULAI PERMAINAN";
     gotoxy(26,16); cout<<"o--------------------------o";
     gotoxy(30,18); cout<<"Masukkan Pilihan Menu ";
     scanf("%d",&pil);    
     return pil;
    
}

void menu_lanjut(){
int pil_ljt;
     printf("\n\n\t\t\t\t   1. Menu");
     printf("\n\t\t\t\t   2. Keluar");
     printf("\n\n\t\t\t\tMasukkan Pilihan ");
     scanf("%d",&pil_ljt);
     if(pil_ljt==1){
       main();
     }
     else{
       exit(1);
     }
    
}
void menu_new_game(){
int i,pil_ng;
     system("cls");
     gotoxy(30,3);  cout<<"PILIHAN AWAL PERMAINAN";
     gotoxy(26,6);  cout<<"o----------------------------o";
     gotoxy(30,8);  cout<<"1. LANJUTKAN SKOR";
     gotoxy(30,10); cout<<"2. RESET SKOR DAN PEMAIN";
     gotoxy(26,12); cout<<"o----------------------------o";
     gotoxy(30,14); cout<<"Masukkan Pilihan Menu ";
     scanf("%d",&pil_ng);
     if(pil_ng==2){
             
       if((fs=fopen("score.dat","rb"))==NULL){
        printf("File gagal dibuka");
       }
       else{
        i=0;
        while(fscanf(fs,"%s %d",pemain[i].nama,&pemain[i].score)==2){
         i++;
        }
      }
      fclose(fs);
     
      printf("\n\n\t\t\t   Masukkan nama pemain : ");
       scanf("%s",pemain[0].nama);
      
      if((fs=fopen("score.dat","wb"))==NULL){
       printf("File gagal dibuka");
      }
      else{
       for(i=0;i<4 br="br" i="i">         pemain[i].score=0;
         fprintf(fs,"%s %d\n",pemain[i].nama,pemain[i].score);
       }
      }
      fclose(fs);

     system("cls");
     gotoxy(32,3); cout<<"SKOR AWAL PEMAIN";
      for(i=0;i<4 br="br" i="i" nbsp="nbsp">               gotoxy(26,6); cout<<"o--------------------------o";
               gotoxy(33,8+(2*i)); cout<               gotoxy(39,8+(2*i)); cout<<":";
               gotoxy(41,8+(2*i)); cout<               gotoxy(26,16); cout<<"o--------------------------o";
               gotoxy(22,18); cout<<" "; 
      }
      system("pause");   
     }   
    
}


//Defines gotoxy() for ANSI C compilers.
void gotoxy(int x, int y){
COORD coord;
coord.X = x;
coord.Y = y;
SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE), coord);
}

void pembuatanKartu(){
int i;
  /*membuat warna "kartu asli" dengan huruf A dan B merah, C dan D hitam*/
for(i=0;i<52 br="br" i="i">    if(i>38){
        strcpy (asli[i].jenis, "D");
        asli[i].warna=2;
    }
    else if(i>25){
        strcpy (asli[i].jenis, "C");
        asli[i].warna=2;
    }
    else if(i>12){
        strcpy (asli[i].jenis, "B");
        asli[i].warna=1;
    }
    else{
        strcpy (asli[i].jenis, "A");
        asli[i].warna=1;
    }
}

/*mengisi angka "kartu asli" dari 1-K*/
for(i=0;i<4 br="br" i="i">    strcpy (asli[0+(i*13)].angka,"1");
    strcpy (asli[1+(i*13)].angka,"2");
    strcpy (asli[2+(i*13)].angka,"3");
    strcpy (asli[3+(i*13)].angka,"4");
    strcpy (asli[4+(i*13)].angka,"5");
    strcpy (asli[5+(i*13)].angka,"6");
    strcpy (asli[6+(i*13)].angka,"7");
    strcpy (asli[7+(i*13)].angka,"8");
    strcpy (asli[8+(i*13)].angka,"9");
    strcpy (asli[9+(i*13)].angka,"10");
    strcpy (asli[10+(i*13)].angka,"J");
    strcpy (asli[11+(i*13)].angka,"Q");
    strcpy (asli[12+(i*13)].angka,"K");
}    
}

void kocokKartu(){
int i,rnd,j,temp1,temp4;
char temp2[5],temp3[5];
rnd=51;
srand((unsigned)time(NULL));
/*Membuat "kartu cangkulan", memberi nomor acak pada setiap "kartu cangkulan" dan acak mendefaultkan status=1 artinya masih tersimpan dalam wadah cangkulan*/
for(i=0;i<52 br="br" i="i">strcpy (cangkulan[i].jenis,asli[i].jenis);
strcpy (cangkulan[i].angka,asli[i].angka);
cangkulan[i].warna=asli[i].warna;

cangkulan[i].acak=rand()%rnd;
cangkulan[i].status=1;
}
printf("\n");

/*Mengurutkan "kartu cangkulan" berdasarkan  angka yang dirandom pada "kartu cangkulan" agar seolah-olah dikocok*/
for(i=0;i<51 br="br" i="i">    for(j=i+1;j<52 br="br" j="j">        if(cangkulan[i].acak > cangkulan[j].acak){
            temp1=cangkulan[i].acak;
            strcpy (temp2,cangkulan[i].jenis);
            strcpy (temp3,cangkulan[i].angka);
            cangkulan[i].acak=cangkulan[j].acak;
            strcpy (cangkulan[i].jenis,cangkulan[j].jenis);
            strcpy (cangkulan[i].angka,cangkulan[j].angka);
            cangkulan[j].acak=temp1;
            strcpy (cangkulan[j].jenis,temp2);
            strcpy (cangkulan[j].angka,temp3);
            temp4=cangkulan[i].warna;
            cangkulan[i].warna=cangkulan[j].warna;
            cangkulan[j].warna=temp4;
        }
    }
}    
}


void printKocok(){
int i=0;
     system("cls");
     gotoxy(31,3); cout<<"PROSES KOCOK KARTU";
     gotoxy(29,4); cout<<"o---------------------o";
     gotoxy(35,7);  cout<<" _ _ _ _  ";
     gotoxy(35,8);  cout<<"|       | ";
     gotoxy(35,9);  cout<<"| ?     | ";
     gotoxy(35,10);  cout<<"|       | ";    
     gotoxy(35,11); cout<<"|     ? | ";
     gotoxy(35,12); cout<<"|_ _ _ _|";
     for(i=0;i<5 br="br" i="i" nbsp="nbsp">       gotoxy(39,10); cout<<(5-i);
       Sleep(1000);  
     }
     gotoxy(29,14); cout<<"KARTU SELESAI DIKOCOK";
     Sleep(1000);
}

void printKartuSetan(){
     gotoxy(35,6);  cout<<" _ _ _ _  ";
     gotoxy(35,7);  cout<<"|       | ";
     gotoxy(35,8);  cout<<"| X     | ";
     gotoxy(35,9);  cout<<"|       | ";    
     gotoxy(35,10); cout<<"|     X | ";
     gotoxy(35,11); cout<<"|_ _ _ _|";
     Sleep(2000); 
}



/*Module jenis procedure untuk menjumlahkan total kartu yang berstatus 1*/
void jumlah_kartu_pemain(){
int i,k;
jum_kar_pem=0;
    for(i=0;i<4 br="br" i="i">    pemain[i].jum_kartu=0;
        for(k=0;k<26 br="br" k="k">            if(pemain[i].kartu_tgn[k].status==1){
                pemain[i].jum_kartu++;
                jum_kar_pem++;
            }
        }
    }
}

/*Module jenis function untuk menjumlahkan total "kartu cangkulan"*/
int jumlah_kartu(kartu1 x[52]){
int i,sum=0;
    for(i=0;i<52 br="br" i="i">        if(x[i].status==1){
            sum=sum+1;
        }
    }
return sum;
}

/*Module jenis procedure untuk menampilkan kartu yang ada pada pemain*/
void printKartu(int p){
  int i;
  printf("\n\n\t\t\t\t |    %s   |",pemain[p].nama);
  printf("\n\t\t\t\t  ------------\n\n");
  printf("\n");
  printf("    ");
    for(i=0;i<9 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
        printf("_ _ _   ");
        }
    }
    printf("\n   ");
    for(i=0;i<9 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
          if(p==0){
          if (strcmp(pemain[p].kartu_tgn[i].angka,"10")==0){
             printf("|%s   | ",pemain[p].kartu_tgn[i].angka);}
          else{
              printf("|%s    | ",pemain[p].kartu_tgn[i].angka);}         
          }else{
          printf("| X   | ");
          }
        }
    }
    printf("\n   ");
    for(i=0;i<9 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
         if(p==0){
           printf("|  %s  | ",pemain[p].kartu_tgn[i].jenis);
         }else{
           printf("|     | ",pemain[p].kartu_tgn[i].jenis);
         }       
        }       
     }
    printf("\n   ");
    for(i=0;i<9 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
         if(p==0){
            if (strcmp(pemain[p].kartu_tgn[i].angka,"10")==0){
               printf("|   %s| ",pemain[p].kartu_tgn[i].angka);
            }
            else{
               printf("|    %s| ",pemain[p].kartu_tgn[i].angka);
            }
          }else{
            printf("|   X | ");
          }
       }
  }
     printf("\n   ");
    for(i=0;i<9 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
            printf("|_ _ _| ");
         }
    }
    printf("\n   ");
    if(tmp_ind==1){
       for(i=0;i<9 br="br" i="i">         if(pemain[p].kartu_tgn[i].status==1){
          if (i>=9){
            printf("   %d   ",i+1);}
         else{
            printf("   %d    ",i+1);}
            }
        }
     }
    printf("\n    ");
    for(i=9;i<17 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
          printf("_ _ _   ");
         }
    }
   printf("\n   ");
   for(i=9;i<17 br="br" i="i">    if(pemain[p].kartu_tgn[i].status==1){
         if(p==0){
           if (strcmp(pemain[p].kartu_tgn[i].angka,"10")==0){
            printf("|%s   | ",pemain[p].kartu_tgn[i].angka);
           }
           else{
            printf("|%s    | ",pemain[p].kartu_tgn[i].angka);
           }
         }else{
                printf("| X   | ",pemain[p].kartu_tgn[i].angka);
         }
      }
    }
    printf("\n   ");
    for(i=9;i<17 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
          if(p==0){
           printf("|  %s  | ",pemain[p].kartu_tgn[i].jenis);
          }
          else{
             printf("|     | ");  
          }
        }
    }
    printf("\n   ");
    for(i=9;i<17 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
          if(p==0){
           if (strcmp(pemain[p].kartu_tgn[i].angka,"10")==0){
            printf("|   %s| ",pemain[p].kartu_tgn[i].angka);}
          else{
            printf("|    %s| ",pemain[p].kartu_tgn[i].angka);}
         }else{
            printf("|   X | ");
         }
         }
    }
    printf("\n   ");
    for(i=9;i<17 br="br" i="i">        if(pemain[p].kartu_tgn[i].status==1){
          printf("|_ _ _| ");
        }
    }
    printf("\n   ");
    if(tmp_ind==1){
       for(i=9;i<17 br="br" i="i">         if(pemain[p].kartu_tgn[i].status==1){
          if (i>=9){
            printf("   %d   ",i+1);}
         else{
            printf("   %d    ",i+1);}
            }
        }
     }
Sleep(400);

}

/*Menampilkan 1 kartu yang setelah dicek tidak ada yang sama*/
void printKartuTidakSama(int j,int p,int n){
     printf("\n    ");
     printf("\t\t\t\t   ");
     printf(" _ _ _   ");
     printf("\n   ");
     printf("\t\t\t\t   ");
     if(j!=5){
         if(p==0||j==0){
         if (strcmp(pemain[p].kartu_tgn[n].angka,"10")==0){
            printf("|%s   | ",pemain[p].kartu_tgn[n].angka);}
         else{
            printf("|%s    | ",pemain[p].kartu_tgn[n].angka);
             }
         }else{
         printf("| X   | ");
         }
                  
     }
     else if(j==5){
          if(p==0){
            if (strcmp(cangkulan[n].angka,"10")==0){
              printf("|%s   | ",cangkulan[n].angka);}
            else{
              printf("|%s    | ",cangkulan[n].angka);
              }
           }else{
              printf("| X   | ");
              
           }
     }
       
     printf("\n   ");
     printf("\t\t\t\t   ");
     if(j!=5){
       if(p==0||j==0){
        printf("|  %s  | ",pemain[p].kartu_tgn[n].jenis);
       }
       else{
         printf("|     | ");
       }
     }
     else if(j==5){
        if(p==0){
                 printf("|  %s  | ",cangkulan[n].jenis);
                 }
        else{
             printf("|     | ");
        }
         
     }
     printf("\n   ");
     printf("\t\t\t\t   ");
     if(j!=5){
        if(p==0||j==0){
         if (strcmp(pemain[p].kartu_tgn[n].angka,"10")==0){
            printf("|   %s| ",pemain[p].kartu_tgn[n].angka);}
         else{
            printf("|    %s| ",pemain[p].kartu_tgn[n].angka);
         }
         }else{
            printf("|   X | ");
         }
     }
     else if(j==5){
        if(p==0){
          if (strcmp(cangkulan[n].angka,"10")==0||j==0){
            printf("|   %s| ",cangkulan[n].angka);}
          else{
            printf("|    %s| ",cangkulan[n].angka);
          }
        }else{
           printf("|   X | ",cangkulan[n].angka);
        }
     }
     printf("\n   ");
     printf("\t\t\t\t   ");
      printf("|_ _ _| ");
}
    
/*Menampilkan 2 kartu yang setelah dicek adalah sama*/
void printKartuSama(int j, int p, int p2, int k, int n){
     printf("\n    ");
     printf("\t\t\t\t");
     printf(" _ _ _   ");
     printf("_ _ _   ");
     printf("\n   ");
     printf("\t\t\t\t");
     if (strcmp(pemain[p].kartu_tgn[k].angka,"10")==0){
        printf("|%s   | ",pemain[p].kartu_tgn[k].angka);}
     else{
        printf("|%s    | ",pemain[p].kartu_tgn[k].angka);
     }
     if(j==0){
         if (strcmp(pemain[p2].kartu_tgn[n].angka,"10")==0){
            printf("|%s   | ",pemain[p2].kartu_tgn[n].angka);}
         else{
            printf("|%s    | ",pemain[p2].kartu_tgn[n].angka);
         }
     }
     else if(j==1){
          if (strcmp(cangkulan[n].angka,"10")==0){
            printf("|%s   | ",cangkulan[n].angka);}
         else{
            printf("|%s    | ",cangkulan[n].angka);
         }
     }       
     printf("\n   ");
     printf("\t\t\t\t");
     printf("|  %s  | ",pemain[p].kartu_tgn[k].jenis);
     if(j==0){
       printf("|  %s  | ",pemain[p2].kartu_tgn[n].jenis);
     }
     else if(j==1){
        printf("|  %s  | ",cangkulan[n].jenis);
         
     }
     printf("\n   ");
     printf("\t\t\t\t");
     if (strcmp(pemain[p].kartu_tgn[k].angka,"10")==0){
        printf("|   %s| ",pemain[p].kartu_tgn[k].angka);}
     else{
        printf("|    %s| ",pemain[p].kartu_tgn[k].angka);
     }
     if(j==0){
         if (strcmp(pemain[p2].kartu_tgn[n].angka,"10")==0){
            printf("|   %s| ",pemain[p2].kartu_tgn[n].angka);}
         else{
            printf("|    %s| ",pemain[p2].kartu_tgn[n].angka);
         }
     }
     else if(j==1){
          if (strcmp(cangkulan[n].angka,"10")==0){
            printf("|   %s| ",cangkulan[n].angka);}
         else{
            printf("|    %s| ",cangkulan[n].angka);
         }
     }
     printf("\n   ");
     printf("\t\t\t\t");
      printf("|_ _ _| ");
      printf("|_ _ _| ");
    
}

/*Module jenis function untuk mengecek kesamaan kartu yang akan dibandingkan, mengembalikan nilai 1 jika kartu yang dibandingkan sama, dan 0 untuk sebaliknya*/
int hasil_cek_kartu(int p, int p2, int k, int n){
int hasil_cek;
hasil_cek=0;
if(pemain[p].kartu_tgn[k].status==1 && pemain[p2].kartu_tgn[n].status==1){
            if(pemain[p].kartu_tgn[k].warna==pemain[p2].kartu_tgn[n].warna){
                if(strcmp(pemain[p].kartu_tgn[k].angka,pemain[p2].kartu_tgn[n].angka)==0){                                            
                    hasil_cek=1;
                }
            }
    }
    return hasil_cek;
}

/*Module jenis procedure yang akan digunkan untuk mengecek "kartu pemain" sendiri dan membuang "kartu pemain" jika return value dari "hasil_cek_kartu" adalah 1 */
void cek_kartu(int p){
int k,n,hasil_cek,non;
non=0;
    for(k=0;k<26-1 br="br" k="k">        for(n=k+1;n<26 br="br" n="n">            hasil_cek=hasil_cek_kartu(p,p,k,n);
                if(hasil_cek==1){
                non=1;
                    printKartuSama(0,p,p,k,n);
                    printf("\n\n\t\t\t\t Kartu Dibuang\n\n");
                    pemain[p].kartu_tgn[k].status=0;
                    pemain[p].kartu_tgn[n].status=0;
                }
   
        }
    }
 if(non==0){
  printf("\n\t\t\t  Kartu tidak ada yang sama\n\n");
 }
 system("pause");   
}


/*Module jenis procedure yang akan digunkan untuk mengecek "kartu pemain" dengan "kartu pemain dicangkul",
Jika return value dari "hasil_cek_kartu" adalah 1, maka kartu pemain" serta "kartu pemain dicangkul" akan dibuang (status 0)
Jika return value dari "hasil_cek_kartu" adalah 0, maka "kartu pemain dicangkul" akan dimasukkan ke "kartu pemian"*/
void cek_kartu_pem_pem(int p,int pem_cang,int no_kartu_pem){
bol=0;
int k,hasil_cek,non,posisi=0;
k=0;
non=0;
    do{
        hasil_cek=hasil_cek_kartu(p,pem_cang,k,no_kartu_pem);
            if(hasil_cek==1){
                bol=1;
                non=1;
                printf("\n\n\t\t\t  Kartu Pemain\t&  Kartu Lawan\n");           
                printKartuSama(0,p,pem_cang,k,no_kartu_pem);
                printf("\n\n\t\t\t\t Kartu Dibuang\n\n");
                pemain[p].kartu_tgn[k].status=0;
                pemain[pem_cang].kartu_tgn[no_kartu_pem].status=0;
            }
        k++;
    }while(k<26 amp="amp" hasil_cek="=0);<br">   
 if(non==0){
  printf("\n\n\t\t\t\t Kartu Lawan\n");

      printKartuTidakSama(p,pem_cang,no_kartu_pem); 

  printf("\n\t\t\t  Kartu tidak ada yang sama\n\n");
 }
    if(hasil_cek==0){
    /*cari posisi kosong untuk direplace*/
        posisi=0;
        do{
            posisi=posisi+1;
        }while(pemain[p].kartu_tgn[posisi].status==1);
       
        strcpy(pemain[p].kartu_tgn[posisi].jenis,pemain[pem_cang].kartu_tgn[no_kartu_pem].jenis);
        strcpy(pemain[p].kartu_tgn[posisi].angka,pemain[pem_cang].kartu_tgn[no_kartu_pem].angka);
        pemain[p].kartu_tgn[posisi].status=1;
        pemain[pem_cang].kartu_tgn[no_kartu_pem].status=0;
        pemain[p].kartu_tgn[posisi].warna=pemain[pem_cang].kartu_tgn[no_kartu_pem].warna;
    }
 system("pause");
}

/*Module jenis function untuk mengecek kesamaan kartu yang akan dibandingkan, mengembalikan nilai 1 jika kartu yang dibandingkan sama, dan 0 untuk sebaliknya*/
int hasil_cek_kartu2(int p, int k, int n){
int hasil_cek;
hasil_cek=0;
     if(pemain[p].kartu_tgn[k].status==1){
            if(pemain[p].kartu_tgn[k].warna==cangkulan[n].warna){
                if(strcmp(pemain[p].kartu_tgn[k].angka,cangkulan[n].angka)==0){
                    hasil_cek=1;
                }
            }
     }
return hasil_cek;
}

/*Module jenis procedure yang akan digunkan untuk mengecek "kartu pemain" dengan "kartu cangkulan",
Jika return value dari "hasil_cek_kartu" adalah 1, maka kartu pemain" serta "kartu cangkulan" akan dibuang (status 0)
Jika return value dari "hasil_cek_kartu" adalah 0, maka "kartu cangkulan" akan dimasukkan ke "kartu pemian"*/
void cek_kartu_pem_cang(int p,int no_cang){
bol=0;
int k,hasil_cek,posisi=0,non;
non=0;
    for(k=0;k<26 br="br" k="k">        hasil_cek=hasil_cek_kartu2(p,k,no_cang);       
            if(hasil_cek==1){               
                bol=1;
                non=1;                   
                printf("\n\n\t\t\t  Kartu Pemain\t&  Kartu Cangkulan\n");           
                printKartuSama(1,p,p,k,no_cang);
                printf("\n\n\t\t\t\t Kartu Dibuang\n\n");           
                pemain[p].kartu_tgn[k].status=0;
                cangkulan[no_cang].status=0;               
            }
    }
if(non==0){
  printf("\n\n\t\t\t\tKartu Cangkulan\n");
  printKartuTidakSama(5,p,no_cang);
  printf("\n\n\t\t\t   Kartu tidak ada yang sama\n\n");
}
    /*cari posisi kosong untuk direplace*/
    if(bol==0){
        posisi=0;
        do{
            posisi=posisi+1;
        }while(pemain[p].kartu_tgn[posisi].status==1);

        strcpy(pemain[p].kartu_tgn[posisi].jenis,cangkulan[no_cang].jenis);
        strcpy(pemain[p].kartu_tgn[posisi].angka,cangkulan[no_cang].angka);
        pemain[p].kartu_tgn[posisi].status=1;
        cangkulan[no_cang].status=0;
        pemain[p].kartu_tgn[posisi].warna=cangkulan[no_cang].warna;
    }

system("pause");
}