";
$efont="";
$pdone=0;
$ndone=0;
$pcc=0;
$ncc=0;
$c="";
$cyear=0;
// begin code
$timezonediff=3; // timezone difference (use 0 if host is in same timezone)
$tz=($timezonediff*60*60);
$prefix="$dir$prefix";
$year=date("Y",time() + $tz);
$month=date("n",time() + $tz);
$day=date("j",time() + $tz);
$tday=comic($year,$month,$day);
$c=(@$_GET["c"]);
if ($c==NULL) {$c="$year-$month-$day";}
$a=split("-",$c);
$cyear=$a[0];
if ($cyear<1990) {$cyear=1990;}
if ($cyear>$year) {$cyear=$year;}
$cmonth=$a[1];
$cday=$a[2];
function mday($xm) {
$md=0;$cyear=0;
if ($xm==1 || $xm==3 || $xm==5 || $xm==7 || $xm==8 || $xm==10 || $xm==12) {$md=31;}
if ($xm==2 || $xm==4 || $xm==6 || $xm==9 || $xm==11) {$md=30;} //fuck leap year override
return $md;
}
function comic($fy,$fm,$fd) {
if ($fm==1) {$fm="01";}
if ($fm==2) {$fm="02";}
if ($fm==3) {$fm="03";}
if ($fm==4) {$fm="04";}
if ($fm==5) {$fm="05";}
if ($fm==6) {$fm="06";}
if ($fm==7) {$fm="07";}
if ($fm==8) {$fm="08";}
if ($fm==9) {$fm="09";}
if ($fd==1) {$fd="01";}
if ($fd==2) {$fd="02";}
if ($fd==3) {$fd="03";}
if ($fd==4) {$fd="04";}
if ($fd==5) {$fd="05";}
if ($fd==6) {$fd="06";}
if ($fd==7) {$fd="07";}
if ($fd==8) {$fd="08";}
if ($fd==9) {$fd="09";}
return "$fy$fm$fd";
}
$pday=$cday;
$pmonth=$cmonth;
$pyear=$cyear;
$nday=$cday;
$nmonth=$cmonth;
$nyear=$cyear;
$pdone=0;
$ndone=0;
while ($pdone<1 && $pcc!=$first) {
$pday--;
if ($pday==0) { $pmonth--; $pday=mday($pmonth); }
if ($pmonth==0) { $pmonth=12; $pyear--; $pday=mday($pmonth); }
$pcc=comic($pyear,$pmonth,$pday);
$pccc="$prefix$pcc$format";
if (file_exists($pccc) || $pcc<=$first) {$pdone=1;}
if ($format2!=NULL && $pdone<1) { $pccc="$prefix$pcc$format2";
if (file_exists($pccc) || $pcc<=$first) {$pdone=1;} }
}
while ($ndone<1 && $ncc<$tday) {
$nday++;
$nmday=mday($nmonth);
if ($nday>$nmday) { $nmonth++; $nday=1; }
if ($nmonth==13) { $nmonth=1; $nyear++; $nday=1; }
$ncc=comic($nyear,$nmonth,$nday);
$nccc="$prefix$ncc$format";
if (file_exists($nccc) || $ncc>$tday) {$ndone=1;}
if ($format2!=NULL && $ndone<1) { $nccc="$prefix$ncc$format2";
if (file_exists($nccc) || $ncc>$tday) {$ndone=1;} }
}
$cc=comic($cyear,$cmonth,$cday);
$comic="$prefix$cc$format";
$comic2="$prefix$cc$format2";
print "$title - $cc";
print "$cc - ";
if ($cc>$first) {print "first ";}
if ($cc>$first) {print "previous ";}
if ($cc<$tday) {print "next ";}
if ($cc<$tday) {print "today";}
print "
";
if (file_exists($comic)) {
print "
";
} else if (file_exists($comic2)) {
print "
";
} else {
print "
$font no comic for today, showing previous";
}
print "
$cc - ";
if ($cc>$first) {print "first ";}
if ($cc>$first) {print "previous ";}
if ($cc<$tday) {print "next ";}
if ($cc<$tday) {print "today";}
print "$efont";
?>