Kód: Vybrať všetko

<?php


function MesiacNaSlovoVSlovenskomDatume($datum)
{
	$mesiace = array("", "Január", "Február", "Marec", "Apríl", "Máj", "Jún", "Júl", "August", "September", "Október", "November", "December");
	$datum2 = explode(". ", $datum);
	return $datum2[0].". ".$mesiace[$datum2[1]]." ".$datum2[2];
}

$nejaky_datum = "24. 4. 2007";
$vystupny_datum = MesiacNaSlovoVSlovenskomDatume($nejaky_datum);

echo "Vstup: $nejaky_datum<br>\r\n";
echo "Výstup: $vystupny_datum<br>\r\n";


?>

Kód: Vybrať všetko

$mesiace[$datum2[1]-1]

Kód: Vybrať všetko

<?php
$vzorec = strip_tags($vzorec);
$vzorec = strtolower($vzorec);
$vzorec = str_replace(" ","",$vzorec);
$dlzka = strlen($vzorec);
$prve = substr($vzorec,0,1);
$druhe = substr($vzorec,1,1);
$posledne = substr($vzorec,($dlzka - 1),"1");
$predposledne = substr($vzorec,($dlzka - 2),"1");
$predpredposledne = substr($vzorec,($dlzka - 3),"1");

if($vzorec==NULL) // pri načítaní stránky
{echo "zadaj vzorec nejakého oxidu";}
elseif($vzorec=="") // zistí či bol vôbec zadaný nejaký vzorec
{echo "nebol zadaný žiaden vzorec!";}
elseif($dlzka<"2"||$dlzka>"5") // skontroluje dĺžku vzorca (oxid má vzorec min. 2 a max. 5 znakový)
{echo $vzorec." nie je vzorec oxidu!";}
elseif($posledne!="o"&&$predposledne!="o") // zistí prítomnosť kyslíku na posl. alebo predposlednom mieste
{echo $vzorec." nie je vzorec oxidu!";}
elseif($prve=="o"&&($druhe=="2"||$druhe=="o")) // zistí prítomnosť kyslíku na prvom mieste
{echo "Kyslík nemôže oxidovať sám so sebou!";}
elseif($prve=="1"||$prve=="2"||$prve=="3"||$prve=="4"||$prve=="5"||$prve=="6"||$prve=="7"||$prve=="8"||$prve=="9"||$prve=="0") // zistí prítomnosť číslice na prvom mieste
{echo "Vzorec jednej molekuly oxidu nemôže začínať číslicou!";}
else
{
$prvky = array(
"ag" => "striebr","au" => "zlat","al" => "hlin","as" => "arzen",
"ba" => "bar","be" => "berill","bi" => "bizmut","b" => "bor",
"ca" => "vápen","c" => "uhol","cu" => "med","cr" => "chromič","co" => "kobalt","ce" => "cer","cl" => "chlor","cd" => "kadem",
"fe" => "želez",
"ge" => "german",
"h" => "vod","hg" => "ortuť","hf" => "hafn",
"i" => "jod",
"k" => "drasel",
"la" => "lanthan","li" => "lith",
"mn" => "mangan","mg" => "horeč","mo" => "molibd",
"n" => "dus","na" => "sod","ni" => "nikel","nb" => "niob",
"os" => "osm",
"s" => "sír","sb" => "antimon","si" => "kremič","sn" => "cín",
"ti" => "titan",
"pb" => "olov","p" => "fosfor","pt" => "platin","pd" => "pallad",
"re" => "rhen","rh" => "rhod","ru" => "ruthen",
"sm" => "samar","se" => "selen","sr" => "stron",
"ta" => "tantal","te" => "tellur","th" => "thor","ti" => "titan",
"u" => "uran",
"v" => "vanad",
"w" => "wolfram",
"y" => "ytterb",
"zn" => "zinoč","zr" => "zirkon"
); //58
$co = array("o","2","3","4","5","7",   "0","1","6","8","9");
$cim = array("O","<sub>2</sub>","<sub>3</sub>","<sub>4</sub>","<sub>5</sub>","<sub>7</sub>",   "<sub>0</sub>","<sub>1</sub>","<sub>6</sub>","<sub>8</sub>","<sub>9</sub>");


// zistí či sa jedná o mocenstvo I.
if(($dlzka=="3"||$dlzka=="4")&&$posledne=="o"&&$predposledne=="2"&&$predpredposledne!="2"){
$prvok = substr($vzorec,0,($dlzka-2));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="cu"):$zmena = str_replace("d","ď",$prvky[$prvok]);endif;
if($prvok=="os"):$zmena = $prvky[$prvok]."in";endif;
if($prvok=="ag"):$zmena = str_replace("br","bor",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."ný<br>(mocenstvo I.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo II.
elseif(($dlzka=="2"||$dlzka=="3")&&$posledne=="o"&&$predposledne!="2"){
$prvok = substr($vzorec,0,($dlzka-1));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="cu"):$zmena = str_replace("d","ď",$prvky[$prvok]);endif;
if($prvok=="os"):$zmena = $prvky[$prvok]."i";endif;
if($prvok=="ag"):$zmena = str_replace("br","bor",$prvky[$prvok]);endif;
if($prvok==("mn"||"al"||"ca"||"sb")):$zmena = str_replace("n","",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."natý<br>(mocenstvo II.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo III.
elseif(($dlzka=="4"||$dlzka=="5")&&$posledne=="3"&&$predposledne=="o"&&$predpredposledne=="2"){
$prvok = substr($vzorec,0,($dlzka-3));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="pb"):$zmena = str_replace("ť","t",$prvky[$prvok]);endif;
if($prvok=="c"):$zmena = str_replace("o","",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."itý<br>(mocenstvo III.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo IV.
elseif(($dlzka=="3"||$dlzka=="4")&&$posledne=="2"&&$predposledne=="o"&&$predpredposledne!="2"){
$prvok = substr($vzorec,0,($dlzka-2));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="pb"):$zmena = str_replace("ť","t",$prvky[$prvok]);endif;
if($prvok=="c"):$zmena = str_replace("o","",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."ičitý<br>(mocenstvo IV.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo V.
elseif(($dlzka=="4"||$dlzka=="5")&&$posledne=="5"&&$predposledne=="o"&&$predpredposledne=="2"){
$prvok = substr($vzorec,0,($dlzka-3));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="pb"):$zmena = str_replace("ť","t",$prvky[$prvok]);endif;
if($prvok=="c"):$zmena = str_replace("o","",$prvky[$prvok]);endif;
if($prvok==("n"||"au")){$pripona = "ičný";}else{$pripona = "ečný";} // priradenie správnej prípony
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena.$pripona."<br>(mocenstvo V.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo VI.
elseif(($dlzka=="3"||$dlzka=="4")&&$posledne=="3"&&$predposledne=="o"&&$predpredposledne!="2"){
$prvok = substr($vzorec,0,($dlzka-2));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="cu"):$zmena = str_replace("d","ď",$prvky[$prvok]);endif;
if($prvok=="c"):$zmena = str_replace("o","",$prvky[$prvok]);endif;
if($prvok=="sb"):$zmena = str_replace("i","í",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."ový<br>(mocenstvo VI.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo VII.
elseif(($dlzka=="4"||$dlzka=="5")&&$posledne=="7"&&$predposledne=="o"&&$predpredposledne=="2"){
$prvok = substr($vzorec,0,($dlzka-3));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="pb"):$zmena = str_replace("ť","t",$prvky[$prvok]);endif;
if($prvok=="c"):$zmena = str_replace("o","",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."istý<br>(mocenstvo VII.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// zistí či sa jedná o mocenstvo VIII.
elseif(($dlzka=="3"||$dlzka=="4")&&$posledne=="4"&&$predposledne=="o"){
$prvok = substr($vzorec,0,($dlzka-2));
if(in_array($prvky[$prvok],$prvky)){
/* gramatika štart */
$zmena = $prvky[$prvok];
if($prvok=="pb"):$zmena = str_replace("ť","t",$prvky[$prvok]);endif;
if($prvok=="c"):$zmena = str_replace("o","",$prvky[$prvok]);endif;
/* gramatika stop */
echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> = oxid ".$zmena."ičelý<br>(mocenstvo VIII.)";}
else {echo "Prvok s označením <b>".ucfirst($prvok)."</b> v chémii zatiaľ neexistuje!";}
}

// ostatné
else
{echo "<b>".str_replace($co,$cim,ucfirst($vzorec))."</b> je vzorec neexistujúceho resp. nelogického oxidu!";}



}
?>

Kód: Vybrať všetko

<form action="mail.php" method="POST">
	Prijemca
	<input type="text" name="prijemca">
	<br>
	Predmet
	<input type="text" name="predmet">
	<br>
	Sprava:
	<input type="textarea" rows="4" cols="20" name="sprava">
	<br>
	<br>
	<input type="submit" value="Odoslat">
</form>

Kód: Vybrať všetko

<?php 
$to      = $_POST["prijemca"]; 
$subject = $_POST["predmet"]; 
$message = $_POST["sprava"]; 
$message.="\n\n\nnejaky podpis";
$od = "[email protected]";
if (@mail($to, $subject, $message,  "From:$od")): 
 echo "mail bol poslaný" ; 
else: 
 echo "mail nebol poslaný" ; 
endif; 
?>