#!/usr/local/bin/perl

#####################################################################
# 初期設定
#####################################################################

require './pref.pl';



# ヘッダー外部ファイル
$Css = <<'_END_OF_HTML_';
<link href="/css/common.css" rel="stylesheet" type="text/css" media="all" />
<link href="/css/contents.css" rel="stylesheet" type="text/css" media="all" />
<link href="/css/thickbox.css" rel="stylesheet" type="text/css" media="screen" />
<script type="../text/javascript" src="/js/jquery.js"></script>
<script type="../text/javascript" src="/js/thickbox.js"></script>
<script type="../text/javascript" src="/js/yuga.js" charset="shift_jis"></script>
<script language="JavaScript">
<!--
function winOpen(winName,url,W,H){
  //サブウインドウオープン
  var WinD11=window.open(url,winName,'scrollbars=0,width='+W+',height='+H+'');
  WinD11.focus();
  WinD11.document.close()
}

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</script>
_END_OF_HTML_

#　html出力ヘッダー
$heaer = <<'_END_OF_HTML_';

<div id="wrap">

<div id="header" class="clearfix">
<div id="header_logo"><a href="../index.html"><img src="/images/header.jpg" alt="株式会社グローバル・リンク・マネジメント　Global Link Management" width="500" height="70" border="0" /></a></div>
<div id="header_link">
	<a href="../privacy.html"><img src="/images/menu_privacy.gif" alt="プライバシーポリシー" width="148" height="30" class="btn" /></a>
	<a href="../sitemap.html"><img src="/images/menu_sitemap.gif" alt="サイトマップ" width="97" height="30" class="btn" /></a>
	<a href="../inquiry.html"><img src="/images/menu_inquiy.gif" alt="お問い合わせ" width="91" height="30" class="btn" /></a>
</div>
</div>
<!-- end_header -->

<div id="navi">
<div id="navi_title"><img src="/images/subtitle_consultation.gif" alt="CONSULTATION" width="260" height="40" /></div>
<div id="navi_btn">
<ul>
	<li><a href="../index.html"><img src="/images/menu_home.gif" alt="ホーム" width="78" height="21" class="btn" /></a></li>
	<li><a href="../company_greeting.html"><img src="/images/menu_company.gif" alt="会社案内" width="104" height="21" class="btn" /></a></li>
	<li><a href="../service.html"><img src="/images/menu_service.gif" alt="事業案内" width="98" height="21" class="btn" /></a></li>
	<li><a href="../management.html"><img src="/images/menu_management.gif" alt="経営マネージメント" width="133" height="21" class="btn" /></a></li>
	<li><a href="../support.html"><img src="/images/menu_support.gif" alt="サポート" width="101" height="21" class="btn" /></a></li>
	<li><a href="../recruit.html"><img src="/images/menu_recruit.gif" alt="採用情報" width="96" height="21" class="btn" /></a></li>
</ul>
</div>
<div id="subnavi">
</div>
</div>
<!-- end_navi -->

<div class="section">

<div id="page_title">
	<img src="/images/pagetitle_consultation.jpg" alt="無料相談会" width="910" height="120" />
</div>
<!-- end_page_title -->

<div id="topicspass">
	<a href="../index.html">HOME</a>　＞　無料相談会
</div>
<!-- end_topicspass -->

<div class="article clearfix">

<div class="consultation_box">
	<img src="/images/consultation_main.jpg" alt="無料相談会受付中！【要予約】　毎週水曜日　00：00〜00：00　毎週土曜日　00：00〜00：00　場所　東京都渋谷区道玄坂1丁目19番2号　SPLINE 6F" width="780" height="192" border="0" usemap="#Map" />
	<map name="Map">
		<area shape="rect" coords="435,141,491,168" href="http://map.yahoo.co.jp/pl?type=scroll&lat=35.657010327418&lon=139.69627610688&z=18&mode=map&pointer=on&datum=wgs&fa=ks&home=on&hlat=35.657010327418&hlon=139.69627610688&layout=&ei=utf-8&p=%E6%9D%B1%E4%BA%AC%E9%83%BD%E6%B8%8B%E8%B0%B7%E5%8C%BA%E9%81%93%E7%8E%84%E5%9D%821-19-2" target="_blank" />
	</map>
</div>

<h3>お仕事が終わってから・土曜日に<br />
マンション経営について、どんなことでもご相談できます。</h3>

<h4>マンション経営を始めたい</h4>
<h4>毎月安定した家賃収入を確保したい</h4>
<h4>マンション経営のリスク・メリット</h4>
<h4>資産の組み換え</h4>
<h4>自分に合ったプランを知りたい</h4>

<h3>相談会日程</h3>

<div id="calendar_box">
<div class="calendar">

_END_OF_HTML_

$footer = <<'_END_OF_HTML_';

</div>

</div>

<p class="mgb20">お申し込みの方は、ご希望の日にちをクリックして下さい。</p>

</div>

<div class="pagetop">
	<a href="#header"><img src="/images/btn_pagetop.gif" alt="このページの上部へ" width="56" height="10" border="0" class="btn" /></a>
</div>

</div>
<!-- end_section -->

<div id="footer"><img src="/images/footer.jpg" alt="Copyright (C) Globall Link Management Inc. All Rights Reserved." width="940" height="30" /></div>
<!-- end_footer -->

</div>
<!-- end_wrap -->

_END_OF_HTML_

#####################################################################
# 初期処理
#####################################################################

# 現在の日時を取得
($second,$minute,$hour,$day,$month,$year)=localtime();
$year += 1900;
$month += 1;
$presetmonth = $month;
$start_day = $day + $delay;


#
# html出力
#
print "Content-type: text/html; charset=shift_jis\n\n";
print <<"EOL";
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ja" lang="ja">
<head>
<meta http-equiv="refresh" content="30">
<meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">

<title>無料相談会($year/$month)｜株式会社グローバル・リンク・マネジメント Global Link Management</title>
$Css
</head>
<body>
$heaer
<form action="ca_b2.cgi" method="post" name="calender">

EOL


&calender;
&calender;
&calender;



print <<"EOL";
</form>
$footer
</BODY>
</HTML>
EOL

exit;

sub calender {
# うるう年の判定（4の倍数ならうるう年、しかし100の倍数ならうるう年でない、また400の倍数ならうるう年）
if( (($year%4 ==0)&&($year%100 != 0))||($year%400 == 0) ){
    $days[1]=29;
}

# 月の初日の曜日（ツェラーの公式）、月の末日を取得
$start = wday($year,$month,1);
$lastday=$days[$month-1];

# 予約開始日の翌月繰越
if ( $start_day > $lastday  ){
 $carry_over_delay = $start_day - $lastday;
}

# カレンダー表示

print "<div class='calendar'>\n";
print "<TABLE boder='0' cellpadding='0' cellspacing='1' >\n";
print "<caption>$year年$month月</caption>";
print "<TR><TD class='sunday'>日</TD><TD>月</TD><TD>火</TD><TD>水</TD><TD>木</TD><TD>金</TD><TD class='saturday'>土</TD></TR>\n";

# 月の初日の前まで、表のセルにスペース（改行）を入れる
if($start!=0){
    print "<TR>";
    for($i=0;$i<$start;$i++){ print "<TD><BR></TD>";    $col++; }
}

# カレンダーのセルを作成
for($i=1;$i<=$lastday;$i++){
$css_day = "";
$flag_posiible = 0;
$flag_close = 0;
$temp_holiday = $month."-".$i;
	foreach(@holiday){
		if($temp_holiday eq $_){$css_day .= "holiday";}
	}
	foreach(@Possible){
		if($col == $_){
			$flag_posiible = 1;
			if($css_day eq ""){ $css_day .= "possible";}
			else { $css_day .= " possible";}
		}
	}
	foreach(@close){
		if($temp_holiday eq $_){$flag_close = 1;}
	}
	if($month == $presetmonth && $i == $day){
		if($css_day eq ""){ $css_day .= "today";}
		else { $css_day .= " today";}
	}
	if ($col == 6){
		if($css_day eq ""){ $css_day .= "saturday";}
		else { $css_day .= " saturday";}
	}

    if($col==0){ 
		print "<TR>";
		if($css_day eq ""){ $css_day .= "sunday";}
		else { $css_day .= " sunday";}
	 }
	if($start_day > $i){
		if($css_day ne ""){print "<TD class='$css_day'>$i</TD>";}
		else{print "<TD>$i</TD>";}
	}
	elsif($flag_posiible == 1 && $flag_close == 0 && $carry_over_delay < $i){
		if($css_day ne ""){print "<TD class='$css_day'><input type=submit name=$month value=$i /></TD>";}
		else{print "<TD><input type=submit name=$month value=$i /></TD>";}
	}
	else{
		if($css_day ne ""){print "<TD class='$css_day'>$i</TD>";}
		else{print "<TD>$i</TD>";}
	}
	$col++;
    if($col>=7){ 
        print "</TR>\n";
        if ($i<$lastday) { $col=0; }
    }
}
for($i=$col;$i<7;$i++){ print "<TD><BR></TD>"; }
print "</TABLE>";
print "</div>\n";

# 来月のカレンダーを作成
if ($presetmonth != $month){$carry_over_delay = 0;}
$col=0;
$month++;
$year = $year;
if ($month == 13) {
    $month = 1;
    $year++;
}
$start_day = 1;
}
# end sub calender


sub wday {
    my ($year,$month,$day)=@_;
    if($month<3){ $month += 12; $year--; }
    return ($year+int($year/4)-int($year/100)+int($year/400)+int((13*$month+8)/5)+$day)% 7;
}