// 數組LunarDaysOfMonth存入農曆2001年到2050年每年中的月天數資訊
// 農曆每月只能是29或30天，一年用12(或13)個二進位位表示，從高到低，對應位為1表示30天，否則29天 
var LunarDaysOfMonth = new Array
(
   0xd4a8, 0xd4a0, 0xda50, 0x5aa8, 0x56a0, 0xaad8, 0x25d0, 0x92d0, 0xc958, 0xa950, // 2001-2010 
   0xb4a0, 0xb550, 0xb550, 0x55a8, 0x4ba0, 0xa5b0, 0x52b8, 0x52b0, 0xa930, 0x74a8, // 2011-2020 
   0x6aa0, 0xad50, 0x4da8, 0x4b60, 0x9570, 0xa4e0, 0xd260, 0xe930, 0xd530, 0x5aa0, // 2021-2030 
   0x6b50, 0x96d0, 0x4ae8, 0x4ad0, 0xa4d0, 0xd258, 0xd250, 0xd520, 0xdaa0, 0xb5a0, // 2031-2040 
   0x56d0, 0x4ad8, 0x49b0, 0xa4b8, 0xa4b0, 0xaa50, 0xb528, 0x6d20, 0xada0, 0x55b0  // 2041-2050 
);

// 數組LunarLeapYear存放農曆2001年到2050年閏月的月份，如沒有則為0，從高到低，每字節存兩年 
var LunarLeapYear = new Array
(
   0x40, 0x02, 0x07, 0x00, 0x50, // 2001-2010 
   0x04, 0x09, 0x00, 0x60, 0x04, // 2011-2020 
   0x00, 0x20, 0x60, 0x05, 0x00, // 2021-2030 
   0x30, 0xb0, 0x06, 0x00, 0x50, // 2031-2040 
   0x02, 0x07, 0x00, 0x50, 0x03  // 2041-2050 
);


// 返回農曆iLunarYear年的閏月月份，如沒有則返回0 
function GetLeapMonth(iLunarYear)
{ 
   var Leap = LunarLeapYear[(iLunarYear - 2001) >> 1];
   return (((iLunarYear - 2001) & 1) == 0) ? (Leap >> 4) : (Leap & 0x0f);
} 

// 返回農曆iLunarYer年iLunarMonth月的天數，結果是一個長整數
// 如果iLunarMonth不是閏月， 高字為0，低字為該月的天數
// 如果iLunarMonth是閏月， 高字為後一個月的天數，低字為前一個月的天數
function LunarMonthDays(iLunarYear, iLunarMonth)
{ 
   var High;
   var Low;
   var Bit;

   High = 0;
   Low = 29;
   Bit = 16 - iLunarMonth;
   if ((iLunarMonth > GetLeapMonth(iLunarYear)) && (GetLeapMonth(iLunarYear) > 0))  Bit--;
   if ((LunarDaysOfMonth[iLunarYear - 2001] & (1 << Bit)) > 0)  Low++;
   if (iLunarMonth == GetLeapMonth(iLunarYear))
   {
       High = ((LunarDaysOfMonth[iLunarYear - 2001] & (1 << (Bit-1))) > 0) ?  30 : 29;
   }

   return Low + (High << 16);
} 

// 返回農曆iLunarYear年的總天數
function LunarYearDays(iLunarYear)
{ 
   var Days;
   var tmp;

   Days = 0;
   for (var i=1; i <= 12; i++)
   {
       tmp = LunarMonthDays(iLunarYear, i);
       Days = Days + ((tmp >> 16) & 0xffff); //取高位 
       Days = Days + (tmp & 0xffff); //取低位 
   }

   return Days;
} 

// 將農曆iLunarYear年格式化成天干地支記年法表示的字符串 
function formatLunarYear(iLunarYear)
{ 
   var szText1 = new String("甲乙丙丁戊己庚辛壬癸");
   var szText2 = new String("子丑寅卯辰巳午未申酉戌亥");
   var szText3 = new String("鼠牛虎兔龍蛇馬羊猴雞狗豬");
   var strYear;
 
   strYear = szText1.substr((iLunarYear - 4) % 10, 1);
   strYear = strYear + szText2.substr((iLunarYear - 4) % 12, 1) + "("+ szText3.substr((iLunarYear - 4) % 12, 1)+")";

   return strYear + "年";
}

// 將農曆iLunarMonth月格式化成農曆表示的字符串
function formatLunarMonth(iLunarMonth)
{ 
   var szText = new String("正二三四五六七八九十");
   var strMonth;

   if (iLunarMonth <= 10)
   {
       strMonth = szText.substr(iLunarMonth - 1, 1);
   }
   else if (iLunarMonth == 11) strMonth = "十一";
   else strMonth = "十二";

   return strMonth + "月";
} 

// 將農曆iLunarDay日格式化成農曆表示的字符串
function formatLunarDay(iLunarDay)
{ 
   var szText1 = new String("初十廿三");
   var szText2 = new String("一二三四五六七八九十");
   var strDay;
   if ((iLunarDay != 20) && (iLunarDay != 30))
   {
       strDay = szText1.substr((iLunarDay - 1) / 10, 1) + szText2.substr((iLunarDay - 1) % 10, 1);
   }
   else if (iLunarDay != 20)
   {
       strDay = szText1.substr(iLunarDay / 10, 1) + "十";
   }
   else
   {
       strDay = "二十";
   }
 
   return strDay;
} 

// 將公曆日期轉換為農曆日期，返回農曆表示的字符串
function GetLunarDateString(SolarDate)
{
   var tmp;
   var iLunarYear;
   var iLunarMonth;
   var iLunarDay;
   var Leap = false;
   var MinMilli = 1000 * 60;
   var HrMilli = MinMilli * 60;
   var DyMilli = HrMilli * 24;
 
   // 從2001年1月1日算起，給定的公曆日期已經過去的天數
   // 11323是1970年1月1日到2001年1月1日之間的天數，因為Date是從1970年1月1日作為起點的
   var iSpanDays = Math.round(SolarDate.getTime() / DyMilli) - 11323;

   // 公曆2001年1月24日為農曆2001年正月初一，差23天
   if (iSpanDays < 23)
   {
       iYear = 2000;
       iLunarMonth = 12;
       iLunarDay = iSpanDays + 7;
   }
   else
   {
       // 從農曆2001年正月初一算起 
       iSpanDays = iSpanDays - 23;
       iLunarYear = 2001;
       iLunarMonth = 1;
       iLunarDay = 1;
 
       // 計算農曆年 
       tmp = LunarYearDays(iLunarYear);
       while (iSpanDays >= tmp)
       {
           iSpanDays -= tmp;
           iLunarYear++;
           tmp = LunarYearDays(iLunarYear);
       }

       // 計算農曆月 
       tmp = LunarMonthDays(iLunarYear, iLunarMonth) & 0xffff; //取低字
       while (iSpanDays >= tmp)
       {
           iSpanDays -= tmp;
           if (iLunarMonth == GetLeapMonth(iLunarYear))  // 該年該月閏月
           {
               tmp = LunarMonthDays(iLunarYear, iLunarMonth) >> 16; //取高字
               if (iSpanDays < tmp)
               {
                   Leap = (tmp > 0) ? true : false;  // 閏月的後個月？
                   break;
               }
               iSpanDays = iSpanDays - tmp;
           }
 
           iLunarMonth++;
           tmp = LunarMonthDays(iLunarYear,iLunarMonth) & 0xffff; //取低字
       }
 
       // 計算農曆日 
       iLunarDay += iSpanDays;
   }
   return formatLunarYear(iLunarYear) + " 農曆"+(Leap ? "閏" : "") + formatLunarMonth(iLunarMonth) + formatLunarDay(iLunarDay);
}
function getDateMon(smon)
{
	if(smon == 12) smon=1;
	else
	smon = smon+1;
	return smon;
}
function getDateDay(sday)
{
	if(sday == 1) sday="一";
	else if(sday == 2) sday="二";
	else if(sday == 3) sday="三";
	else if(sday == 4) sday="四";
	else if(sday == 5) sday="五";
	else if(sday == 6) sday="六";
	else if(sday == 0) sday="日";
	 
	return sday;
}
 
 function findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function goIndex()
{
	var theForm = document.site_form;
	var s = theForm.tycool_site.options[theForm.tycool_site.selectedIndex].value;
	var sUrl = "http://gate.tycool.com:82/gate/big5/www.tycool.com/index.php?tycool_site="+s;
	document.location.href = sUrl;
}
// Select Language
function switchlang() {
  if(big5()) {
     //繁體轉換成簡體
     var matchexp = new RegExp ("http://gate.tycool.com:82/gate/big5/([^/]+)([^?]*)([?]?[^?]*)", "i");
     var domain = window.location.href.replace(matchexp, "$1");
     var pathname = window.location.href.replace(matchexp, "$2");
     var search = window.location.href.replace(matchexp, "$3");
    location.href="ht"+"tp://"+domain+pathname+search;
    return false;
  } else {
    //簡體轉換成繁體
    location.href="ht"+"tp://gate.tycool.com:82/gate/big5/"+location.hostname+location.pathname+location.search;
    return false;
  }
}

function big5() {
  var matchexp = new RegExp ("http:\/\/gate\.tycool\.com:82\/gate\/big5\/(.+)", "i");
  if(matchexp.test(window.location.href)){
    return true;
  } else {
    return false;
  }
}

function j2gb(url) {
  if(location.hostname=="gate.tycool.com") {
    location.href="ht"+"tp://"+url; return false;
  } else {
    return false;
  }
}

// Select City
function getCookie(cookieName) {
  var cookieString = document.cookie;
  var start = cookieString.indexOf(cookieName + '=');
  // 加上等號的原因是避免在某些 Cookie 的值裏有
  // 與 cookieName 一樣的字符串。
  if (start == -1) // 找不到
    return null;
  start += cookieName.length + 1;
  var end = cookieString.indexOf(';', start);
  if (end == -1) return unescape(cookieString.substring(start));
  return unescape(cookieString.substring(start, end));
}

// Generic Select List Box
function select_listbox(ctl_name,ctl_value){
  var checked = false;
  if (ctl_name) {
  for(var i=0;i<ctl_name.length;i++){
    if(ctl_name[i].value==ctl_value){
      ctl_name[i].selected = true;
      checked = true;
    }
  }

  if (!checked&&ctl_name.length>0){
    ctl_name[0].checked =true;
  }
  }
}