---

Isidedu kalendoriu , jo kodas:

openside("Jūsų laisvalaikiui");
?>
<?php

/**
* CodeRS - Atviras kodas Lietuvai
* Copyright (C) 2007 CodeRS www.coders.lt info@coders.lt
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
*
* Ši programa yra laisva. Jūs galite ją platinti ir/arba modifikuoti
* remdamiesi Free Software Foundation paskelbtomis GNU Bendrosios
* Viešosios licencijos sąlygomis: 2 licencijos versija, arba (savo
* nuožiūra) bet kuria vėlesne versija.
*
* Ši programa platinama su viltimi, kad ji bus naudinga, bet BE JOKIOS
* GARANTIJOS; be jokios numanomos PERKAMUMO ar TINKAMUMO KONKRETIEMS
* TIKSLAMS garantijos. Žiūrėkite GNU Bendrąją Viešąją licenciją norėdami
* sužinoti smulkmenas.
*
* Jūs turėjote kartu su šia programa gauti ir GNU Bendrosios Viešosios
* licencijos kopija; jei ne - rašykite Free Software Foundation, Inc., 59
* Temple Place - Suite 330, Boston, MA 02111-1307, USA.
**/

//Surašome šventes, jos bus paryškintos kalendoriuje.
//Datas rasykite be nuliu pvz: 3-8 (kovo devinta)
$sventes = array(

//Valstybinės šventės
"1-1" => array("Naujųjų metų diena"),
"2-16" => array("Lietuvos valstybės atkūrimo diena"),
"3-11" => array("Lietuvos nepriklausomybės atkūrimo diena"),
"5-1" => array("Tarptautinė darbo diena"),
"5-4" => array("Motinos diena"),
"6-24" => array("Rasos diena","Jonininės"),
"7-6" => array("Valstybės diena","Lietuvos karaliaus Mindaugo karūnavimo diena"),
"8-15" => array("Žolinės"),

//Lietuvos Respublikos atmintinos dienos
"8-23" => array("Juodojo kaspino diena","Baltijos kelio diena"),
"8-31" => array("Laisvės diena"),
"9-1" => array("Mokslo ir žinių diena"),
"9-8" => array("Šilinė (Švč. Mergelės Marijos gimimo diena)","Vytauto Didžiojo karūnavimo diena"),

//Kitos šventės
"3-18" => array("FDisk gimtadienis")
);

//gaunam dabartinę datą ir laiką
$time_dabar = getdate(time());

//kada prasideda pirma mėnesio diena
$time_pradzia = getdate(mktime(0,0,0, $time_dabar['mon'], 1, $time_dabar['year']));

//Kiek šiame mėnesyje yra dienų
$time_dienu = date("t");

//Verciam menesio pavadinimus
$ieskom = array("December","January","February","March","April","June","July","August","September","October","November");
$keiciam = array("Gruodis","Sausis","Vasaris","Kovas","Balandis","Birželis","Liepa","Rugpjūtis","Rugsėjis","Spalis","Lapkritis");
$time_dabar['month'] = str_replace($ieskom,$keiciam,$time_dabar['month']);

//Verciam savaitės dienas
$ieskom = array("Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday");
$keiciam = array("Pirmadienis","Antradienis","Trečiadienis","Ketvirtadienis","Penktadienis","Šeštadienis","Sekmadienis");
$time_dabar['weekday'] = str_replace($ieskom,$keiciam,$time_dabar['weekday']);

//Formuojame kalendoriaus lentele
$return = '<table width="100%" border="0" cellpadding="2" cellspacing="0" style="border:1px solid black; font-family:Arial">
<tr>
<th colspan="7">'.$time_dabar['year']. " ".$time_dabar['month'].' '.$time_dabar['mday'].'d. '.$time_dabar['hours'].':'.$time_dabar['minutes'].'<br/>'.$time_dabar['weekday'].' - '.$time_dabar['yday'].' Metų diena</th>
</tr>
<tr bgcolor="#CCCCCC">
<th>P</th>
<th>A</th>
<th>T</th>
<th>K</th>
<th>P</th>
<th>Š</th>
<th>S</th>
</tr>
';

for ($i = 0;$i <= 4; $i++) { //Sukam tiek kartu kiek savaiciu menesyje = max 5
$return .= " <tr align='center'>n";

//Sukam ciklą tiek kartų kiek dienų savaitėje = 7
for ($j = 1; $j <= 7; $j++) {

//Skaiciuojam kiek kartu prasisuko visi ciklai
$a++;

//Jei priejom šio mėnesio pirmą dieną pradedam braižyti kalendoriaus dienas
$time_num = ($a >= $time_pradzia['wday']?++$b:false);

$return .= "t<td style='border-top:1px solid #999999;";

//Jei diena yra šiandiena
if ($time_dabar['mday'] == $time_num) { $return .= "font-weight:bold;"; } else { $return .= ""; }

//Jei tai yra savaitgalis
if ($j == 6 || $j == 7) { $return .= " background-color:#E2E2E2;"; }

//Jei diena turi švenčių
$svente = svente($sventes,"".$time_dabar['mon']."-".$time_num."");
if (!empty($svente)) { $return .= " border:2px solid green;' title='".$svente."'>"; } else { $return .= "'>"; }

//Tikrinam ar mėnesio dienos nesibaigė, kitu atveju atspauzdinam tarpą
if ($time_num && $time_num <= $time_dienu) { $return .= $time_num; } else { $return .= "&nbsp;"; }

$return .= "</td>n";
}
$return .= " </tr>n";
}

//Atspauzdinam kalendorių ir užbaigiam lentelę
echo $return."</table>";

function svente($array,$siandien='',$return='') {

//Gauname šiandienos (mėnesis-diena)
if (!$siandien) { $siandien = date('n-j'); }

//Tikriname ar švenčių masyve nurodyta diena egzistuoja
if (array_key_exists($siandien,$array)) {
foreach ($array[$siandien] as $key => $val) {
if (empty($return)) { $return .= $val; } //Jei išvedam šventę pirmą kartą
else { $return .= ", ".$val; } //Išvedame daugiau nei vieną šventę, atskiriame kableliais
}
}
return $return;
}

?>


<?
closeside();
?>

Ir meta toki vaizda:

nt nt nt nt nt nt 1 nt 2 n
n nt 3 nt 4 nt 5 nt 6 nt 7 nt 8 nt 9 n
n nt 10 nt 11 nt 12 nt 13 nt 14 nt 15 nt 16 n
n nt 17 nt 18 nt 19 nt 20 nt 21 nt 22 nt 23 n
n nt 24 nt 25 nt 26 nt 27 nt 28 nt 29 nt 30 n

Kas cia negerai?