HORLOGE ANALOGIQUE [ET NUMERIQUE] EN IMAGE

<?php
//----------
//VARIABLES
//----------
	// Pour la description de toutes les possibilite avec le GET, ce refere
	// plus pas : "TRAITEMENT DES GET"
$GET_Active = true;
/*
** Toutes les variables suivante ne sont que des valeurs par default, vous pourrez les modifier grace au varible GET si $GET_Active = true
** sinon mettre and "$GET_Active = false" et ses valeurs sont des valeurs fixe
** 
** ATTENTION, toujours respecter la caste des possibilites !
*/
	// is_int() / en Pixel
$Largeur_Image = 100;
	// is_int() / en pixel / inutile si il s'agit d'un carre
#$Hauteur_Image = 100;
	// is_string() / format "255,255,255" ou "#FFF" ou "#FFFFFF"
$Couleur_Fond = "#000";
$Cercle_Horloge_Active = true; // modifiable avec CHA [ `T ` /  `F `]
	$Couleur_Cercle_Horloge = "#FFF";
	// is_int() / en pixel
$Longueur_Aiguille_H = 32; // modifiable avec LAH
	// is_int() / en pixel
$Longueur_Aiguille_M = 45; // modifiable avec LAM
	// is_string() / format "255,255,255" ou "#FFF" ou "#FFFFFF"
$Couleur_Aiguille_H = "#555";
	// is_string() / format "255,255,255" ou "#FFF" ou "#FFFFFF"
$Couleur_Aiguille_M = "#333";
$Taille_Aiguille_H = 2; // modifiable avec TAH
$Taille_Aiguille_M = 2; // modifiable avec TAM

	// permet d'afficher l'heure de façon analogique ( `true` or `false`)
$Afficher_Heure_Numerique = true;
//
// Inutile si $Afficher_Heure_Numerique = false
//
		// Format de l'heure analogique au format type Date
		//(voir http://bcst.webmaster.free.fr/doc.php.nexen/function.date.html)
	$Format_HN = "H:i";
		// Taille de la police de l'heure analogique
	//$Taille_HN = 123; // THN
		// is_string() / format "255,255,255" ou "#FFF" ou "#FFFFFF"
	$Couleur_HN = "#FFF";
		// Position de l'HA sur X en %
	$Position_HN_x = 50; // PHNX
		// Positionnement de le cadre de position de l'HN sur X / Possibilite :
		// "gauche", "droite", "centre"
	$Positionnement_HN_x = "centre";
		// Position de l'HA sur Y en %
	$Position_HN_y = 50; // PHNY
		// Positionnement de le cadre de position de l'HN sur Y / Possibilite :
		// "haut", "bas", "milieu"
	$Positionnement_HN_y = "milieu";
		// police personnel, vous pouvez en trouvez par exemple sur
		// "http://www.devtrolls.com/gdf_fonts/fonts.html"
		// si le liens est mort fait comme rechercher "php imageloadfont" vous
		// trouverez des liens en cherchant un peut.
		// is_string()
	$font_police_file = "bmreceipt.gdf";
		// sinon police php
		// is_int() / [0-5]
	$font_police = 5;
/*
** FinInutile
*/

//----------
//TRAITEMENT DES GET
//----------
if ((isset($_GET["W"]) or isset($_GET["H"])) and $GET_Active)
 {
	if (isset($_GET["W"]) and !isset($_GET["H"]))
	  {
		$Largeur_Image = $_GET["W"];
		$Hauteur_Image = $_GET["W"];
	  }
	elseif (isset($_GET["H"]) and !isset($_GET["W"]))
	  {
		$Largeur_Image = $_GET["H"];
		$Hauteur_Image = $_GET["H"];
	  }
	else
	  {
		$Largeur_Image = $_GET["W"];
		$Hauteur_Image = $_GET["H"];
	  }
 }
//
// retourne 'vrais' si le GET de $GET = T
// ou retourne 'false' si $GET = F
// sinon retourne la valeur de $default
//
function GET_true_false($GET, $default, $GET_Active)
  {
	if (isset($_GET[$GET]) and ($_GET[$GET] == "T" or $_GET[$GET] == "F") and
		$GET_Active)
	  {
		if ($_GET[$GET] == "T")
		  return true;
		else
		  return false;
	  }
	return $default;
 }
$Cercle_Horloge_Active = GET_true_false("CHA", $Cercle_Horloge_Active, $GET_Active);
$Afficher_Heure_Numerique = GET_true_false("AHN", $Afficher_Heure_Numerique, $GET_Active);
if (isset($_GET['LAH']) and $GET_Active)
  $Longueur_Aiguille_H = $_GET['LAH'];
if (isset($_GET['LAM']) and $GET_Active)
  $Longueur_Aiguille_M = $_GET['LAM'];
if (isset($_GET['TAH']) and $GET_Active)
  $Taille_Aiguille_H = $_GET['TAH'];
if (isset($_GET['TAM']) and $GET_Active)
  $Taille_Aiguille_M = $_GET['TAM'];
if (isset($_GET['THN']) and $GET_Active)
  $Taille_HN = $_GET['THN'];
if (isset ($_GET['PHNX']) and $GET_Active)
  $Position_HN_x = $_GET['PHNX'];
if (isset ($_GET['PHNY']) and $GET_Active)
  $Position_HN_y = $_GET['PHNY'];
if (isset ($_GET['FPF']) and $GET_Active)
  $font_police_file = $_GET['FPF'];
//----------
//TRAITEMENT DES VARIABLES
//----------
if (!isset($Hauteur_Image) and isset($Largeur_Image))
  $Hauteur_Image = $Largeur_Image;
else if (!isset($Largeur_Image) and isset($Hauteur_Image))
  $Largeur_Image = $Hauteur_Image;
else if (!isset($Largeur_Image) and !isset($Hauteur_Image))
  {
	echo "error, no variable `Largeur_Image` or `Hauteur_Image`";
	exit;
  }
$Position_HN_x = ($Position_HN_x / 100) * $Largeur_Image;
$Position_HN_y = ($Position_HN_y / 100) * $Hauteur_Image;
//----------
//TRAITEMENT DES HEURES
//----------
if (isset ($_GET['T']) and $GET_Active)
 $Minutes = date("i", $_GET['T']);
else
 $Minutes = date("i");
if (isset ($_GET['T']) and $GET_Active)
 $Heures = date("h", $_GET['T']);
else
 $Heures = date("h");
//HEURES
$Heure2 = $Heures + ($Minutes / 60);
$Heure2 = 3 - $Heures;
$Heure2 *= pi() / 6 ;
//
	// on prend le cosinus de H2 pour avoir la valeur sur X de l'heure
$Heures_x = cos($Heure2);
	// On la mais a la bonne taille
$Heures_x *= $Longueur_Aiguille_H;
	// On la positionne au bonne endroit
$Heures_x += $Largeur_Image / 2;
//
	// on prend le sinus de H2 pour avoir la valeur sur Y de l'heure
$Heures_y = sin($Heure2);
	// On l'inverse, car dans notre calcule le sens de Y est inverse par
	//rapport au dessin
$Heures_y *= -1;
	// On la met a la bonne taille
$Heures_y *= $Longueur_Aiguille_H;
	// et on la positionne correctement
$Heures_y += $Hauteur_Image / 2;
//
//
//MINUTES de même pour les minutes :
$Minute2 = 15 - $Minutes;
$Minute2 *= pi() / 30;

$Minutes_x = cos($Minute2);
$Minutes_x *= $Longueur_Aiguille_M;
$Minutes_x += $Largeur_Image / 2;

$Minutes_y = sin($Minute2);
$Minutes_y *= -1;
$Minutes_y *= $Longueur_Aiguille_M;
$Minutes_y += $Hauteur_Image / 2;

$Milieu_x = $Largeur_Image / 2;
$Milieu_y = $Hauteur_Image / 2;

//----------
//TRAITEMENT DES COULEURS
//----------
//
// $Regex_RGB = "#([0-2]?[0-9]{1,2}),([0-2]?[0-9]{1,2}),([0-2]?[0-9]{1,2})#";
// $Regex_Hex_6 = "#\#([0-9A-F])([0-9A-F])([0-9A-F])([0-9A-F])([0-9A-F])([0-9A-F])#";
// $Regex_Hex_3 = "#\#([0-9A-F])([0-9A-F])([0-9A-F])#";
//
function TesteCouleur ($Couleur)
 {
	if (preg_match("#^\#([0-9A-F]){3}$#", $Couleur))
	 $Couleur = TransformeHex3($Couleur);
	if (preg_match("#^\#[0-9A-F]{6}$#", $Couleur))
	 $Couleur = TransformeHex6($Couleur);
	elseif (preg_match("#^([0-2]?[0-9]{1,2}),([0-2]?[0-9]{1,2}),([0-2]?[0-9]{1,2})$#", $Couleur))
	 $Couleur = SeparRGB($Couleur);
	else
	 $Couleur = Array ( "#000000", "0", "0", "0" );
	return $Couleur;
 }
function SeparRGB($Couleur)
 {
	preg_match("#([0-2]?[0-9]{1,2}),([0-2]?[0-9]{1,2}),([0-2]?[0-9]{1,2})#", $Couleur, $Couleur);
	return $Couleur;
 }
function TransformeHex6 ($Couleur)
{
	preg_match("#\#([0-9A-F]{2})([0-9A-F]{2})([0-9A-F]{2})#", $Couleur, $table);
	for ($i = 1; $i<count($table); $i++){
		$table[$i] = hexdec ($table[$i]);
	}
	return $table;
}
function TransformeHex3 ($Couleur){
	//Transforme le format hex en #19D en #1199DD
	$Couleur = preg_replace("#([0-9A-F])#","$1$1", $Couleur);
	return $Couleur;
}
$Couleur_Fond = TesteCouleur($Couleur_Fond);
$Couleur_Cercle_Horloge = TesteCouleur($Couleur_Cercle_Horloge);
$Couleur_Aiguille_H = TesteCouleur($Couleur_Aiguille_H);
$Couleur_Aiguille_M = TesteCouleur($Couleur_Aiguille_M);
$Couleur_HN = TesteCouleur($Couleur_HN);

//----------
//GENERATION DE L'IMAGE
//----------
function imagelinethick($image, $x1, $y1, $x2, $y2, $color, $thick = 1) 
{
//
// de cette maniere, ca ne marche bien que pour les lignes orthogonales
// imagesetthickness($image, $thick);
// return imageline($image, $x1, $y1, $x2, $y2, $color);
//
	if ($thick == 1)
		return imageline($image, $x1, $y1, $x2, $y2, $color);
	$t = $thick / 2 - 0.5;
	if ($x1 == $x2 || $y1 == $y2)
		return imagefilledrectangle($image, round(min($x1, $x2) - $t), round(min($y1, $y2) - $t), round(max($x1, $x2) + $t), round(max($y1, $y2) + $t), $color);
	$k = ($y2 - $y1) / ($x2 - $x1); //y = kx + q
	$a = $t / sqrt(1 + pow($k, 2));
	$points = array(
		round($x1 - (1+$k)*$a), round($y1 + (1-$k)*$a),
		round($x1 - (1-$k)*$a), round($y1 - (1+$k)*$a),
		round($x2 + (1+$k)*$a), round($y2 - (1-$k)*$a),
		round($x2 + (1-$k)*$a), round($y2 + (1+$k)*$a),
	); 
	imagefilledpolygon($image, $points, 4, $color);
	return imagepolygon($image, $points, 4, $color);
}

$im = imagecreate($Largeur_Image, $Hauteur_Image)
  or die ("Impossible d'initialiser la bibliotheque GD");
$background = imagecolorallocate($im, $Couleur_Fond[1], $Couleur_Fond[2], $Couleur_Fond[3]);
//----------
//TRAITEMENT DE L'HEURE ANALOGIQUE
//----------
if ($Afficher_Heure_Numerique)
  {
	if (isset ($_GET['T']) && $GET_Active)
	  $string = date($Format_HN, $_GET['T']);
	else
	  $string = date($Format_HN);
	$Couleur_HN = imagecolorallocate($im, $Couleur_HN[1], $Couleur_HN[2], $Couleur_HN[3]);
	$font = @imageloadfont($font_police_file);
	if (!$font)
	  $font = $font_police;
	$fontWidth = imagefontwidth($font);
	$fontHeight = imagefontheight($font);
	if ($Positionnement_HN_x == "centre")
	  $Position_HN_x -= (strlen($string) * $fontWidth) / 2;
	elseif ($Positionnement_HN_x == "droite")
	  $Position_HN_x -= strlen($string) * $fontWidth;
	if ($Positionnement_HN_y == "milieu")
	  $Position_HN_y -= $fontHeight / 2;
	elseif ($Positionnement_HN_y == "bas")
	  $Position_HN_y -= $fontHeight;
 }

if ($Cercle_Horloge_Active)
	{
		$Couleur_Cercle_Horloge = imagecolorallocate($im, $Couleur_Cercle_Horloge[1], $Couleur_Cercle_Horloge[2], $Couleur_Cercle_Horloge[3]);
		imageellipse($im, $Milieu_x, $Milieu_y, $Largeur_Image - 1, $Hauteur_Image - 1, $Couleur_Cercle_Horloge);
	}
$Couleur_Aiguille_H = imagecolorallocate($im, $Couleur_Aiguille_H[1], $Couleur_Aiguille_H[2], $Couleur_Aiguille_H[3]);
$Couleur_Aiguille_M = imagecolorallocate($im, $Couleur_Aiguille_M[1], $Couleur_Aiguille_M[2], $Couleur_Aiguille_M[3]);
imagelinethick($im, $Milieu_x, $Milieu_y, $Minutes_x, $Minutes_y, $Couleur_Aiguille_M, $Taille_Aiguille_M);
imagelinethick($im, $Milieu_x, $Milieu_y, $Heures_x, $Heures_y, $Couleur_Aiguille_H, $Taille_Aiguille_H);
if ($Afficher_Heure_Numerique)
	imagestring($im, $font, $Position_HN_x, $Position_HN_y, $string, $Couleur_HN );
header("Content-type: image/gif");
imagegif($im);
imagedestroy($im);
?>