function FechaLarga()
{
$nameDia = Dia(date("w"));
$mMes = Mes(date("m"));
$mDia = date("j");
$mAnio = date("Y");
$FechaLarga = "{$nameDia} {$mDia} de {$mMes} de {$mAnio}";
return "{$FechaLarga}";
}
function GGraph($data, $nazev = "", $sirka, $vyska, $typ, $stitkyX = "", $stitkyY = "")
{
//(funkce převzata z http://programy.wz.cz/clanky/27-php-grafy-pomoci-google-chart-api/)
if (!function_exists("Dia")) {
function Dia($text)
{
$trans = array("á" => "a", "ä" => "a", "č" => "c", "ď" => "d", "é" => "e", "ě" => "e", "ë" => "e", "í" => "i", "ï" => "i", "ň" => "n", "ó" => "o", "ö" => "o", "ř" => "r", "š" => "s", "ť" => "t", "ú" => "u", "ů" => "u", "ü" => "u", "ý" => "y", "ÿ" => "y", "ž" => "z", "Á" => "A", "Ä" => "A", "Č" => "C", "Ď" => "D", "É" => "E", "Ě" => "E", "Ë" => "E", "Í" => "I", "Ï" => "I", "Ň" => "N", "Ó" => "O", "Ö" => "O", "Ř" => "R", "Š" => "S", "Ť" => "T", "Ú" => "U", "Ů" => "U", "Ü" => "U", "Ý" => "Y", "Ÿ" => "Y", "Ž" => "Z");
$preklad = strtr($text, $trans);
//odstranění diakritiky
return $preklad;
}
}
//připravení názvu - pokud nebude zadaný, v adrese se parametr neobjeví
if (trim($nazev) != "") {
$nazev2 = "&chtt=" . Dia($nazev);
}
//změna typu grafu na jejich google chart ekvivalenty (možno vynechat, ale české názvy jsou praktičtější)
$typ = str_replace(array("3dkolacovy", "kolacovy", "sloupcovyh", "sloupcovyv", "carovy", "carovy2", "vennuv", "bodovy", "radar"), array("p3", "p", "bhg", "bvg", "lc", "ls", "v", "s", "r"), strtolower($typ));
if ($typ != "lc" || $stitkyY == "" && $stitkyX != "") {
// štítky pro koláčové grafy
//odstranění diakritiky a převedení pole na řetězec
} elseif ($stitkyY != "" && $stitkyX != "") {
// štítky pro ostatní grafy
}
if ($typ == "p3" || $typ == "p") {
// úprava pro koláčové grafy
//odstranění diakritiky a převedení pole na řetězec
if ($stitkyX != "") {
$stitky2 = "&chl=" . Dia(implode("|", $stitkyX));
}
//sečtení prvků pole
for ($i = 0; $i < count($data); $i++) {
$soucet += $data[$i];
}
//převedení dat na procenta - základ je součet
for ($i = 0; $i < count($data); $i++) {
$data[$i] = $data[$i] / $soucet * 100;
$data[$i] = round($data[$i], 1);
}
} else {
// úprava pro ostatní grafy
//odstranění diakritiky a převedení pole se štítky pro osu X a Y na řetězec
if ($stitkyX != "" && $stitkyY != "") {
$stitky2 = "&chxt=x,y&chxl=0:|" . Dia(implode("|", $stitkyX));
$stitky2 .= "|1:|" . Dia(implode("|", $stitkyY));
}
//převedení dat na procenta - základ je maximum
$maxd = max($data);
for ($i = 0; $i < count($data); $i++) {
$data[$i] = $data[$i] / $maxd * 100;
$data[$i] = round($data[$i], 1);
}
}
//výpis dat v tzv. Text encoding
$data2 = "t:" . implode(",", $data);
//vypsání jednotlivých částí grafu
$g = "<img src=\"http://chart.apis.google.com/chart?";
$g .= "cht={$typ}";
$g .= "&chd={$data2}";
$g .= $stitky2;
$g .= "&chs=" . $sirka . "x" . $vyska;
$g .= "&chf=bg,s,EFEFEF";
$g .= "{$nazev2}\"";
$g .= " alt=\"{$nazev}\"";
$g .= " width=\"{$sirka}\"";
$g .= " height=\"{$vyska}\" />";
return $g;
}
function Semana()
{
return date("W", mktime(0, 0, 0, Mes(), Dia(), Anio()));
}