<?php

include "puz999.txt";

function num2($let){
	switch($let){
		case "C":	return 1;
		case "V":	return 2;
		case "X":	return 3;
		case "T":	return 4;
		case "8":	return 5;
	}
}

function num3a($let){
	switch($let){
		case "C":	return 1;
		case "V":	return 2;
		case "X":	return 3;
		case "Z":	return 4;
		case "T":	return 5;
		case "8":	return 6;
	}
}

function num3b($let){
	switch($let){
		case "X":	return 1;
		case "V":	return 2;
		case "C":	return 3;
		case "8":	return 4;
		case "T":	return 5;
		case "Z":	return 6;
		case "O":	return 7;
	}
}

function proc2($l1, $l2, $l3){
	$l1 = num2($l1);
	$l2 = num2($l2);
	$l3 = num2($l3);
	$tot = ($l1 + $l2 + $l3) % 5;
	switch($tot){
		case 0:	return "V";
		case 1:	return "X";
		case 2:	return "T";
		case 3:	return "8";
		case 4:	return "C";
	}
}

function proc3a($l1, $l2, $l3, $l4){
	$l1 = num3a($l1);
	$l2 = num3a($l2);
	$l3 = num3a($l3);
	$l4 = num3a($l4);
	$tot = ($l1 + $l2 + $l3 + $l4) % 6;
	switch($tot){
		case 0:	return "8";
		case 1:	return "C";
		case 2:	return "V";
		case 3:	return "X";
		case 4:	return "Z";
		case 5:	return "T";
	}
}

function proc3b($l1, $l2, $l3, $l4){
	$l1 = num3b($l1);
	$l2 = num3b($l2);
	$l3 = num3b($l3);
	$l4 = num3b($l4);
	$tot = ($l1 + $l2 + $l3 + $l4) % 7;
	switch($tot){
		case 0:	return "O";
		case 1: return "X";
		case 2: return "V";
		case 3: return "C";
		case 4: return "8";
		case 5: return "T";
		case 6: return "Z";
	}
}

$len = strlen($target);
if($len == 6){
	foreach($a as $v1=>$k1){
		foreach($a as $v2=>$k2){
			$got = "";
			for($i = 0;$i < strlen($k1);$i++){
				$got .= proc2($key[$i], $k1[$i], $k2[$i]);
				if(substr($got, 0, $i+1) != substr($target, 0, $i+1))
					break;
			}
			if($got == $target)
				die("$key $k1($v1) $k2($v2) = $got\n");
		}
	}
}
elseif($len == 8 || $len == 10){
	foreach($a as $v1=>$k1){
		foreach($a as $v2=>$k2){
			if($v2 <= $v1)
				continue;
			foreach($a as $v3=>$k3){
				if($v3 <= $v2 || $v3 <= $v1)
					continue;
				$got = "";
				for($i = 0;$i < strlen($k1);$i++){
					if($len == 10)
						$got .= proc3b($key[$i], $k1[$i], $k2[$i], $k3[$i]);
					else
						$got .= proc3a($key[$i], $k1[$i], $k2[$i], $k3[$i]);
					if(substr($got, 0, $i+1) != substr($target, 0, $i+1))
						break;
				}
				if($got == $target)
					die("$key $k1($v1) $k2($v2) $k3($v3) = $got\n");
			}
		}
	}
}
echo "Solution for $key to $target not found\n";