die "Kunstuhr" für Schweizer

habe kürzlich irgendwo eine uhr gesehen mit dieser Anzeige.
Stringvariable anlegen. Diese am Ende des Scripts eintragen

<?

$stunden["0"] = "Mitternacht";
$stunden["1"] = "eis";
$stunden["2"] = "zwöi";
$stunden["3"] = "drü";
$stunden["4"] = "vieri";
$stunden["5"] = "füüfi";
$stunden["6"] = "sächsi";
$stunden["7"] = "sibni";
$stunden["8"] = "Achti";
$stunden["9"] = "nüüni";
$stunden["10"] = "zäni";
$stunden["11"] = "eufi";
$stunden["12"] = "zwöufi";
$stunden["13"] = "eis";
$stunden["14"] = "zwöi";
$stunden["15"] = "drü";
$stunden["16"] = "vieri";
$stunden["17"] = "füüfi";
$stunden["18"] = "sächsi";
$stunden["19"] = "sibni";
$stunden["20"] = "achti";
$stunden["21"] = "nüüni";
$stunden["22"] = "zäni";
$stunden["23"] = "eufi";

$minuten["00"] = "genau";
$minuten["01"] = "ei Minutä ab";
$minuten["02"] = "zwöi Minutä ab";
$minuten["03"] = "drü Minutä ab";
$minuten["04"] = "vier Minutä ab";
$minuten["05"] = "füüf Minutä ab";
$minuten["06"] = "sächs Minutä ab";
$minuten["07"] = "sibä Minutä ab";
$minuten["08"] = "acht Minutä ab";
$minuten["09"] = "nüün Minutä ab";
$minuten["10"] = "zää Minutä ab";
$minuten["11"] = "euf Minutä ab";
$minuten["12"] = "zwöuf Minutä ab";
$minuten["13"] = "drizää Minutä ab";
$minuten["14"] = "vierzää Minutä ab";
$minuten["15"] = "füfzää Minutä ab";
$minuten["16"] = "sächzää Minutä ab";
$minuten["17"] = "sibäzää Minutä ab";
$minuten["18"] = "achzää Minutä ab";
$minuten["19"] = "nünzää Minutä ab";
$minuten["20"] = "zwänzg Minutä ab";
$minuten["21"] = "einäzwänzg Minutä ab";
$minuten["22"] = "zwöiäzwänzg Minutä ab";
$minuten["23"] = "drüäzwänzg Minutä ab";
$minuten["24"] = "vieräzwänzg Minutä ab";
$minuten["25"] = "füfäzwänzg Minutä ab";
$minuten["26"] = "sächsäzwänzg Minutä ab";
$minuten["27"] = "sibänäzwänzg Minutä ab";
$minuten["28"] = "achtäzwänzg Minutä ab";
$minuten["29"] = "nünäzwänzg Minutä ab";
$minuten["30"] = "haubi";
$minuten["31"] = "nünäzwänzg Minutä vor";
$minuten["32"] = "achtäzwänz  Minutä vor";
$minuten["33"] = "sibänäzwänzg Minutä vor";
$minuten["34"] = "sächsäzwänzg Minutä vor";
$minuten["35"] = "füfäzwänzg Minutä vor";
$minuten["36"] = "vieräzwänzg Minutä vor";
$minuten["37"] = "drüäzwänzg Minutä vor";
$minuten["38"] = "zwöiäzwänzg Minutä vor";
$minuten["39"] = "einäzwänzg Minutä vor";
$minuten["40"] = "zwänzg Minutä vor";
$minuten["41"] = "nünzää Minutä vor";
$minuten["42"] = "achzää Minutä vor";
$minuten["43"] = "sibäzää Minutä vor";
$minuten["44"] = "sächzää Minutä vor";
$minuten["45"] = "füfzää Minutä vor";
$minuten["46"] = "vierzää Minutä vor";
$minuten["47"] = "drizää Minutä vor";
$minuten["48"] = "zwöuf Minutä vor";
$minuten["49"] = "euf Minutä vor";
$minuten["50"] = "zää Minutä vor";
$minuten["51"] = "nüün Minutä vor";
$minuten["52"] = "acht Minutä vor";
$minuten["53"] = "sibä Minutä vor";
$minuten["54"] = "sächs Minutä vor";
$minuten["55"] = "füüf Minutä vor";
$minuten["56"] = "vier Minutä vor";
$minuten["57"] = "drüü Minutä vor";
$minuten["58"] = "zwöi Minutä vor";
$minuten["59"] = "ei Minutä vor";

$uhr = date("i");
if ($uhr >29)
{$h = date("G")+1;}

if ($uhr <= 29)
{$h = date("G");}

$m = date("i");

$stunde = ($stunden[$h]);
$minute = ($minuten[$h]);

$ausgabe = ("" . $minuten[$m] . " " . $stunden[$h] . " ");

SetValue(33345 /*[Analyse\Tageszeit\Variablen\Bärner Uhr]*/, "äs isch $ausgabe");

?>

Unbenannt.png