<?

$NomFic="000";
if (isset($_POST["Nom"])) { $NomFic = $_POST["Nom"];} else {if (isset($_GET["Nom"])) { $NomFic = $_GET["Nom"];}}


$txtfile = "Cmpt_".$NomFic.".txt";
$laps=30*60; // en seconde
$repstats="data_".$NomFic;
$now=time();
	if(!is_dir("$repstats")) {
		if(!@mkdir("$repstats",0755)) {}
	}

	$handle=opendir("$repstats");
	while ($tmp = readdir($handle)) {
		if($tmp!="." && $tmp!=".." && $tmp!="record.txt") {
			if(filemtime("$repstats/$tmp")+$laps<$now) {
				@unlink("$repstats/$tmp");
			}
		}
	}

	$fichier="$repstats/$REMOTE_ADDR.txt";
	if(!$fp=@fopen("$fichier","r")) {
		if ($fp=@fopen("$fichier","w")) {
			fputs($fp,"");
			fclose($fp);
		}        
		$nb=0;
		if ($handle = fopen($txtfile, 'r')) {
			$nb=intval(trim(fgets($handle, 1000)));
			fclose($handle);
		}
		$nb=$nb+1;
		if ($handle = fopen($txtfile, 'w')) {
			fwrite($handle, "$nb");
			fclose($handle);
		}
	} else {fclose($fp);}


$TypeFic="0";
if (isset($_POST["Type"])) { $TypeFic = $_POST["Type"];} else {if (isset($_GET["Type"])) { $TypeFic = $_GET["Type"];}}
if ($TypeFic=="1") {
	$TypeFic="future";
} else {
	$TypeFic="alien";
}

//Voici les variables à paramétrer :

// chiffre 0
$pic[0] = "$TypeFic/0.png";
// chiffre 1
$pic[1] = "$TypeFic/1.png";
// ... jusqu'à $pic[9]
$pic[2] = "$TypeFic/2.png";
$pic[3] = "$TypeFic/3.png";
$pic[4] = "$TypeFic/4.png";
$pic[5] = "$TypeFic/5.png";
$pic[6] = "$TypeFic/6.png";
$pic[7] = "$TypeFic/7.png";
$pic[8] = "$TypeFic/8.png";
$pic[9] = "$TypeFic/9.png";

// Image de fond (redimensionnée en cas de besoin)
$background = "$TypeFic/bg.png";

// Marge gauche droite haut bas :
$marge = 5;

// Espacement des chiffres
$esp = 2;

// Fond des chiffres transparent (le coin en haut à gauche est tronqué)
$trans = true;

// Nombre de charactères
$char = 5;

$chiffre = 1;
if(file_exists($txtfile)) {
   $inF = fopen($txtfile,"r");
   $chiffre = intval(trim(fgets($inF, 4096)));
   fclose($inF); 
}
if (strlen($chiffre)<$char) {
	for($o=0;strlen($chiffre)<$char;$o++) $chiffre = "0".$chiffre;
}
//------------------------------------------------------------------------
function testit($file) {
	if(file_exists($file)) {
		if(strpos(strtolower($file), ".png")>0) return "2";
		else if (strpos(strtolower($file), ".jpg")) return "1";
		else return "3";
	} else return "0";
}

function imagedeletebackground($pic2,$ro=255,$ve=255,$bl=255) {
	$pc = 60;
	$ro = floor($ro/$pc); $ve = floor($ve/$pc); $bl = floor($bl/$pc);
	$colors_num = imagecolorstotal($pic2);
	for($i=0;$i<$colors_num;$i++) { 
		$color = imagecolorsforindex($pic2, $i);
		$r = floor($color["red"]/$pc); 
		$g = floor($color["green"]/$pc); 
		$b = floor($color["blue"]/$pc);
		if (($r==$ro)&&($g==$ve)&&($b==$bl)) imagecolorset($pic2, $i, 255, 255, 255);
	}
	$w = imagecolorallocate($pic2, 255, 255, 255);
	$trans = imagecolortransparent($pic2, $w);
	return $pic2;
}
//------------------------------------------------------------------------

for ($i=0;$i<10;$i++) {
	if (testit($pic[$i]) == 1) $im[$i] = imagecreatefromjpeg($pic[$i]);
	else if (testit($pic[$i]) == 2) $im[$i] = imagecreatefrompng($pic[$i]);
}

if (testit($background) == 1) $img1 = imagecreatefromjpeg($background);
else if (testit($background) == 2) $img1 = imagecreatefrompng($background);

for ($i=0;$i<strlen($chiffre);$i++) {
	$ch[$i] = substr($chiffre,$i,1);
	$width += imagesx($im[$ch[$i]]);
	if (imagesy($im[$ch[$i]])>$height) { $height = imagesy($im[$ch[$i]]); }
}

$width = $width+$marge*2+$esp*5;
$height = $height+$marge*2;
$bg = imagecreatetruecolor($width, $height);
imagecopyresized($bg,$img1,0,0,0,0,$width,$height,imagesx($img1),imagesy($img1));
$current_x = $marge;
for ($i=0;$i<strlen($chiffre);$i++) {
	if ($trans) {
		$rgb = ImageColorAt($im[$ch[$i]], 0, 0);
		$r = ($rgb >> 16) & 0xFF;
		$g = ($rgb >> 8) & 0xFF;
		$b = $rgb & 0xFF;
		$new_im[$i] = imagedeletebackground($im[$ch[$i]],$r,$g,$b);
	} else $new_im[$i] = $im[$ch[$i]];
	imagecopy($bg,$new_im[$i],$current_x,$marge,0,0,imagesx($im[$ch[$i]]),imagesy($im[$ch[$i]])); 
	$current_x += imagesx($im[$ch[$i]])+$esp;
}

$tailleX=imagesx($bg);
$tailleY=imagesy($bg);
$rapport=2/3;
$newwidth=$tailleX*$rapport;
$newheight=$tailleY*$rapport;
$img1 = imagecreatetruecolor($newwidth+6, $newheight+6);
$couleur = imagecolorallocate($img1, 239, 147, 2);
imagefill($img1, 0, 0, $couleur); 
imagecopyresized($img1,$bg,3,3,0,0,$newwidth,$newheight,$tailleX,$tailleY);

imagejpeg($img1);
imagedestroy($img1);

?>