sub reset_game {
	($good_guesses, $bad_guesses) = "";
	$tot_found = 0;
	$found_one = 0;
	$occurrences = 0;
	$all_occurrences = 0;
	$guessed_word = 0;
}