. See http://diveintomark.org/archives/2002/07/03
@list($p, $pl) = each($pn); @list($n, $nl) = each($pn); #previous and next links, if applicable
if($p) $p = ''.($pl ? ''.$p.'' : $p).' ';
if($n) $n = ' '.($nl ? ''.$n.'' : $n).'';
$calendar = ''."\n".
''.$p.($month_href ? ''.$title.'' : $title).$n."\n";
if($day_name_length){ #if the day names should be shown ($day_name_length > 0)
#if day_name_length is >3, the full name of the day will be printed
foreach($day_names as $d)
$calendar .= '| '.htmlentities($day_name_length < 4 ? substr($d,0,$day_name_length) : $d).' | ';
$calendar .= "
\n";
}
if($weekday > 0) $calendar .= '| | '; #initial 'empty' days
for($day=1,$days_in_month=gmdate('t',$first_of_month); $day<=$days_in_month; $day++,$weekday++){
if($weekday == 7){
$weekday = 0; #start a new week
$calendar .= "
\n";
}
if(isset($days[$day]) and is_array($days[$day])){
@list($link, $classes, $content) = $days[$day];
if(is_null($content)) $content = $day;
$calendar .= '' : '>').
($link ? ''.$content.'' : $content).'';
}
else $calendar .= "| $day | ";
}
if($weekday != 7) $calendar .= ' | '; #remaining "empty" days
echo $calendar."
\n
\n";