mbti.c

#include <stdio.h>

#define Se 4
#define Fe 3
#define Ne 2
#define Te 1
#define Fi 4
#define Si 3
#define Ti 2
#define Ni 1

#define ENFJ 0
#define ENFP 1
#define ENTJ 2
#define ENTP 3
#define ESFJ 4
#define ESFP 5
#define ESTJ 6
#define ESTP 7
#define INFJ 8
#define INFP 9
#define INTJ 10
#define INTP 11
#define ISFJ 12
#define ISFP 13
#define ISTJ 14
#define ISTP 15

char FUN_EX[16]={(Fe+Se),(Ne+Te),(Te+Se),(Ne+Fe),(Fe+Ne),(Se+Te),(Te+Ne),(Se+Fe),Fe,Ne,Te,Ne,Fe,Se,Te,Se};
char FUN_IN[16]={Ni,Fi,Ni,Ti,Si,Fi,Si,Ti,(Ni+Ti),(Fi+Si),(Ni+Fi),(Ti+Si),(Si+Ti),(Fi+Ni),(Si+Fi),(Ti+Ni)};
char MBTI[16][5]={"ENFJ","ENFP","ENTJ","ENTP","ESFJ","ESFP","ESTJ","ESTP","INFJ","INFP","INTJ","INTP","ISFJ","ISFP","ISTJ","ISTP"};

int main()
{
    char chart[16][16]={0};
    char similar[16],compat[16],sexy[16];
    int loop,loop2;
    for(loop2=9;loop2>5;loop2-=1)
    {
    for(loop=0;loop<16;loop+=1)
    {
        similar[loop]=FUN_EX[loop]*10+FUN_IN[loop];
        sexy[loop]=FUN_EX[loop]+FUN_IN[loop];
        if(sexy[loop]==loop2)
        {
            switch(loop2)
            {
                case 9:
                    printf("%s sex every waking minute\n",MBTI[loop],sexy[loop]);
                    break;
                case 8:
                    printf("%s sex every night\n",MBTI[loop],sexy[loop]);
                    break;
                case 7:
                    printf("%s sex multiple times a week\n",MBTI[loop],sexy[loop]);
                    break;
                case 6:
                    printf("%s sex special occasion\n",MBTI[loop],sexy[loop]);
                    break;
            }
        }
    }
    }
    for(loop=100;loop>0;loop-=1)
    {
        for(loop2=0;loop2<16;loop2+=1)
        {
            if(similar[loop2]==loop)
            {
                if(loop<=100&&loop>=50)
                {
                    compat[loop2]=3;
                }
                if(loop<50&&loop>=33)
                {
                    compat[loop2]=2;
                }
                if(loop<33)
                {
                    compat[loop2]=1;
                }
            }
        }
    }
    for(loop=0;loop<16;loop+=1)
    {
        for(loop2=0;loop2<16;loop2+=1)
        {
            if(compat[loop]==compat[loop2])
            {
                chart[loop][loop2]+=2;
            }
            if(compat[loop]-1==compat[loop2])
            {
                chart[loop][loop2]+=1;
            }
            if(sexy[loop]==9&&sexy[loop2]==9)
            {
                chart[loop][loop2]+=2;
            }
            if(sexy[loop]==9&&sexy[loop2]==8)
            {
                chart[loop][loop2]+=1;
            }
            if(sexy[loop]==7&&sexy[loop2]==7)
            {
                chart[loop][loop2]+=2;
            }
            if(sexy[loop]==7&&sexy[loop2]==6)
            {
                chart[loop][loop2]+=1;
            }
            if(chart[loop][loop2]>0&&loop==ESTP)
            {
                printf("%s compatibility with %s: %d\n",MBTI[loop],MBTI[loop2],chart[loop][loop2]);
            }
        }
    }
    system("pause");
    return 0;
}