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

char init_doors(char *doors) {
	int i;
	for(i=0; i<3; i++) {
		doors[i] = 0;
	}
	i = rand() %3;
	doors[i] = 1;
	return i;
}

char select_door(void) {
	return rand() %3;
}

char select_another_door(char first_selected_door,
	char opened_door) {
	char another_door = 0;
	while((another_door==opened_door)||(another_door==first_selected_door))
		another_door++;
	return another_door;
}

char open_wrong_door(char selected_door, char right_door) {
	char wrong_door = 0;
	while((wrong_door==right_door)||(wrong_door==selected_door))
		wrong_door++;
	return wrong_door;
}

char play_monty(void) {
	char doors[3];
	char right_door;
	char selected_door;
	char opened_door;
	right_door = init_doors(doors);
	selected_door = select_door();
	opened_door = open_wrong_door(selected_door, right_door);
	selected_door = select_another_door(selected_door, opened_door);
	return (selected_door==right_door);
}

char play_nomonty(void) {
	char doors[3];
	char right_door;
	char selected_door;
	right_door = init_doors(doors);
	selected_door = select_door();
	return (selected_door==right_door);
}

int main(int argc, char **argv) {
	int i, j;
	int monty_stat, nomonty_stat;
	int monty_perc, nomonty_perc;
	char games_monty[101], games_nomonty[101];
	srand(time(NULL));
	monty_stat=nomonty_stat=0;
	games_monty[100] = 0;
	games_nomonty[100] = 0;
	for(j=0;j<50;j++) {
		for(i=0;i<100;i++) {
			games_monty[i]=(play_monty()) ? '*' : ' ';
			games_nomonty[i]=(play_nomonty()) ? '*' : ' ';
			((games_monty[i]=='*') && monty_stat++);
			((games_nomonty[i]=='*') && nomonty_stat++);
		}
		printf("%s|%s\n", games_nomonty, games_monty);
	}
	monty_perc = ((int)monty_stat/50);
	nomonty_perc = ((int)nomonty_stat/50);
	printf("%86d of 5000[%3d%]|%86d of 5000[%3d%]\n",
		nomonty_stat, nomonty_perc, monty_stat, monty_perc);
	return 0;
}