 |
 画友善的图，做善良幸福的人~~
偶头上带的毛毛皮筋是澍送的~~
.........................................................................................
\r\n";
$rl .= " \r\n";
$days = array( "Mon", "Tru", "Wed", "Thu", "Fri", "Sat", "Sun" );
for( $i = 0; $i < count( $days ); $i++ ){
$rl .= " | $days[$i] | \r\n";
}
$rl .= " \r\n";
$rl .= " \r\n";
$rl_timestamp = mktime( 0, 0, 0, $m, 1, $y ); #月的第1天的时间戳
$rl_info = getdate( $rl_timestamp ); #月的第1天的日期信息
if( $rl_info[wday] != 1 ){ #如果月的第1天不是礼拜1
$rl .= " \r\n";
for( $i=1; $i<$rl_info[wday]; $i++ ){ #$i，周的第几天
$rl .= " | \r\n";
}
}else{
$i = 1;
}
for( $ii=1; $ii<32; $ii++ ){ #$ii，月的第几天
if( $i == 1 ){
$rl .= " \r\n";
}
if( checkdate( $m, $ii, $y ) ){ #如果日期合法
$ii_timestamp = mktime( 0, 0, 0, $m, $ii, $y ); #时间戳
$ii_info = getdate( $ii_timestamp ); #日期信息
//星期几的中文名称
$wday_ = $ii_info[wday]; #周中的第几天
$wday_cn = array( "天", "一", "二", "三", "四", "五", "六" );
$wday_cn = "礼拜".$wday_cn[$wday_];
//鼠标摸到日期时显示的信息
$img_alt = $y."年".$m."月".$ii."日 ".$wday_cn;
//看看这天有没有写日记
$ii_diary_file = qdfile( $y, $m, $ii );
if( $fp = @fopen( $ii_diary_file, r ) ){
$ii_nr = fread( $fp, filesize( $ii_diary_file ) );
fclose( $fp );
$style = "ca";
$href = " target=\"content\" href=\"$content_web?".time()."&y=".$y."&m=".$m."&d=".$ii."\"";
}elseif( qd_garden_file( $y, $m, $ii ) ){
$style = "ca";
$href = " target=\"content\" href=\"$content_web?".time()."&y=".$y."&m=".$m."&d=".$ii."\"";
}else{
$style = "a1";
$href = "";
}
if( ereg( "", $ii_nr ) ){ #月经
$style = "mc";
}
unset( $ii_nr );
$rl .= " | $ii | \r\n";
}
if( $i == 7 ){
$rl .= " \r\n";
$i = 0;
}
$i++;
}
while( $i != 1 ){
$rl .= " | \r\n";
if( $i == 8 ){
$rl .= " |
\r\n";
break;
}else{
$i++;
}
}
$rl .= "
\r\n";
echo $rl;
?>
