//*************************************************
//*各ワークテーブル定義                           *
//*************************************************
//13ヶ月ラジオテーブル
kbcRadioTbl = new Array(13);
//*************************************************
// イベントテーブル                               *
//*************************************************
//[0]年,[1]月,[2]日,[3]メッセージ
//各年度（4月〜3月)のイベントの予定（日付が未定は"00"）
kbcEventTbl = new Array(
);
//*************************************************
//リンクテーブル                                  *
//*************************************************
kbcLinkTbl = new Array(
//[0]タイトル,[1]コメント,[2]アドレス
//[3]分類（1:KBC関連、2:放送関連、3:部員と愉快な仲間たち、4:その他)
//[4]相互リンク(0:なし 1:あり)
//************************************************
"香川大学",
"我らが大学",
"http://www.kagawa-u.ac.jp/",
1,
0,
//************************************************
"FM香川",
"月１回WEEK END SHUTTLEに出演中",
"http://www.fmkagawa.co.jp/",
1,
0,
//************************************************
//"警報発令中",
//"亀ちゃん",
//"http://yaplog.jp/tsubaki69/",
//3,
//1,
//************************************************
"全国大学放送コンテスト",
"Ｎコンのページ",
"http://www.nhk.or.jp/kyoto/dnc/",
1,
0,
//************************************************
"エトワール☆放送局",
"山口県立大学放送サークル",
"http://seirei.ath.cx/aono/",
2,
1,
//************************************************
"愛媛大学放送研究会",
"EUBC 愛媛大学放送研究会",
"http://web-box.jp/eubc/",
2,
1,
//************************************************
"かわやなぎさわこのお星サマになりました。",
"インターネットラジオ",
"http://yanastar.com/",
3,
1,
//************************************************
"KBC-prototype-",
"プロらじ",
"http://hp.xxxxxxx.jp/kbcprototype/",
3,
1,
//************************************************
"月間Broadなう",
"インターネットラジオ",
"http://broadnow.jimdo.com/",
3,
1,
//************************************************
"うまげなラジオ",
"インターネットラジオ",
"http://blog.livedoor.jp/qasz1-umagena/",
3,
1,
//************************************************
"広島修道大学放送研究会",
"広島修道大学放送研究会",
"http://shudobroadcastingsystem.web.fc2.com/",
2,
1,
//************************************************
"横浜市立大学放送研究部",
"横浜市立大学Y.B.C.放送研究部",
"http://www.geocities.jp/ybc_yokohama/",
2,
1
);

//*************************************************
//*グローバル変数                                 *
//*************************************************
  kbcNow   = new Date();               // 現在の日付取得
  kbcYear  = kbcNow.getYear();         // '年'取得
  if(kbcYear < 2000){  //[Y2K問題のため+1900]
    kbcYear = kbcYear + 1900
  }
  kbcMonth = kbcNow.getMonth()+1;      // '月'取得
  kbcDay   = kbcNow.getDate();         // '日'取得


//*************************************************
//*誕生日検索＆表示                               *
//*引数=flg(0:全て,xx:あとxx日 まで表示         　*
//*戻り値  (0:正常,1:未表示)                      *
//*************************************************
function Birth(flg){

  kbcHit   = 0;
  kbcFlg   = 0;
  kbcLastCnt  = kbcMemberTbl.length / 20;  // テーブルの数を取得/計算
  kbcWorkTbl  = new Array(kbcLastCnt * 3); // Workテーブル作成
  kbcBirthTbl = new Array(kbcLastCnt * 3); // 誕生日テーブル作成

  for(i=0; i<kbcLastCnt; i++){       // テーブルの数だけループ
    //メンバーテーブルより、月、日、姓を取得
    kbcWorkTbl[i*3+0] = kbcMemberTbl[i*20+6]
    kbcWorkTbl[i*3+1] = kbcMemberTbl[i*20+7]
    kbcWorkTbl[i*3+2] = kbcMemberTbl[i*20+1]
  }

  kbcLastCnt = kbcWorkTbl.length / 3;  // テーブルの数を取得/計算
  //誕生日順にソート
  for(i=0; i<kbcLastCnt - 1; i++){       // テーブルの数だけループ
    for(j=i+1; j<kbcLastCnt; j++){       // テーブルの数だけループ
      if (kbcWorkTbl[i*3] > kbcWorkTbl[j*3]){  //月が大きければ並び替え
          workmm  = kbcWorkTbl[j*3];
          workdd  = kbcWorkTbl[j*3+1];
          worksei = kbcWorkTbl[j*3+2];
          kbcWorkTbl[j*3]   = kbcWorkTbl[i*3];
          kbcWorkTbl[j*3+1] = kbcWorkTbl[i*3+1];
          kbcWorkTbl[j*3+2] = kbcWorkTbl[i*3+2];
          kbcWorkTbl[i*3]   = workmm;
          kbcWorkTbl[i*3+1] = workdd;
          kbcWorkTbl[i*3+2] = worksei;
      }
      if(kbcWorkTbl[i*3] == kbcWorkTbl[j*3] && kbcWorkTbl[i*3+1] > kbcWorkTbl[j*3+1]){ //月が同じで日が大きければ並び替え
          workmm  = kbcWorkTbl[j*3];
          workdd  = kbcWorkTbl[j*3+1];
          worksei = kbcWorkTbl[j*3+2];
          kbcWorkTbl[j*3]   = kbcWorkTbl[i*3];
          kbcWorkTbl[j*3+1] = kbcWorkTbl[i*3+1];
          kbcWorkTbl[j*3+2] = kbcWorkTbl[i*3+2];
          kbcWorkTbl[i*3]   = workmm;
          kbcWorkTbl[i*3+1] = workdd;
          kbcWorkTbl[i*3+2] = worksei;
      }
    }
  }

  kbcBirthTbl = kbcWorkTbl  //誕生日テーブル作成

  kbcLastCnt = kbcBirthTbl.length / 3;  // テーブルの数を取得/計算
  for(i=0; i<kbcLastCnt; i++){       // テーブルの数だけループ

    if (kbcBirthTbl[i*3] >= kbcMonth){     //月が同じかそれ以上なら
      if (kbcBirthTbl[i*3] == kbcMonth && kbcBirthTbl[i*3+1] < kbcDay){  //月が同じで誕生日が超えているなら何もしない。 
      }else{
        kbcRunDate = new Date( kbcYear , kbcBirthTbl[i*3] -1 , kbcBirthTbl[i*3+1] );
        kbcMsec = kbcRunDate.getTime() - kbcNow.getTime();
        kbcDayCount = Math.floor(kbcMsec / (1000*60*60*24)); 
        kbcDayCount ++; // 指定日も１日と数える場合は１を足します(kbcDayCount+1)
        kbcHit = i;
        kbcFlg = 1;
        break;
      }
    }
  }
  if (kbcFlg == 0){  //該当メンバーがいないときは、先頭のメンバー
        kbcRunDate = new Date( kbcYear+1 , kbcBirthTbl[0] -1 , kbcBirthTbl[0+1] );
        kbcMsec = kbcRunDate.getTime() - kbcNow.getTime();
        kbcDayCount = Math.floor(kbcMsec / (1000*60*60*24)); 
        kbcDayCount ++; // 指定日も１日と数える場合は１を足します(kbcDayCount+1)   
  }

  if(flg >= kbcDayCount || flg == 0){
    document.write("<center>");
    switch(kbcDayCount){
      case 0  : document.write("今日が");break;
      case 1  : document.write("明日が");break;
      case 2  : document.write("明後日が");break;
      case 7  : document.write("来週が");break;
      case 14 : document.write("再来週が");break;
      default : document.write(kbcDayCount + "日後が");break;
    }

    document.write("<b><a href=./member.html#");
    document.write(kbcBirthTbl[kbcHit*3+2]);
    document.write(">");
    document.write(kbcBirthTbl[kbcHit*3+2]);
    document.write("</a></b>");
    document.write("さんの誕生日ですな☆");
    document.write("</center>");
    return 0;  
  }else{
    return 1; //表示してない場合の戻り値
  }

}

//*************************************************
//*ラジオのスケジュール検索＆表示                 *
//*引数=flg(0:全て,xx:あとxx日 まで表示         　*
//*戻り値  (0:正常,1:未表示)                      *
//*************************************************
function RSche(flg){

  for (i = 0; i <= 12; i++){ //毎月のラジオ放送予定日をテーブルに取得
    for (j = 8; j <= 14; j++){         //8〜14日までに必ず第２金曜がくる。
      kbcDate   = new Date(kbcYear,i  ,j);
      kbcFriday = kbcDate.getDay();
      if (kbcFriday == 5){
        kbcRadioTbl[i] = j;
        break;
      }
    }
  }

  if(kbcRadioTbl[kbcMonth - 1] >= kbcDay){
    kbcRunDate = new Date( kbcYear , kbcMonth - 1   , kbcRadioTbl[kbcMonth - 1] ); //今月
    kbcRadioDay = kbcMonth;
  }else{
    if(kbcMonth == 12){
      kbcRunDate = new Date( kbcYear + 1 , 0        , kbcRadioTbl[kbcMonth] );   //来年1月
      kbcRadioDay = 1;
    }else{
      kbcRunDate = new Date( kbcYear , kbcMonth     , kbcRadioTbl[kbcMonth] );   //来月
      kbcRadioDay = kbcMonth + 1;
    }
  }

  kbcMsec = kbcRunDate.getTime() - kbcNow.getTime();
  kbcDayCount = Math.floor(kbcMsec / (1000*60*60*24)); 
  kbcDayCount ++; // 指定日も１日と数える場合は１を足します(kbcDayCount+1)

  if(flg >= kbcDayCount || flg == 0){
    document.write("<center>");
    switch(kbcDayCount){
      case 0  : document.write("<font size=+2 color=red>今日</font>が");break;
      case 1  : document.write("<font size=+2 color=red>明日</font>が");break;
      case 2  : document.write("<font size=+1 color=blue>明後日</font>が");break
      case 7  : document.write("<font size=+2 color=blue>来週</font>が");break;
      case 14 : document.write("<font size=+2 color=blue>再来週</font>が");break;
      default : document.write("<font size=+1>" + kbcDayCount + "日</font>後が");break;
    }
    document.write(kbcRadioDay + "月のラジオ放送日です。（FM香川 78.6 - 11:30前後ON AIR）");
    document.write("</center>");
    return 0;  
  }else{
    return 1; //表示してない場合の戻り値
  }

}

//*************************************************
//*メンバー表示                                   *
//*************************************************
function putMember(){
  kbcLastCnt  = kbcMemberTbl.length / 20; // テーブルの数を取得/計算
  kbcWgakunen = 4

  document.write("<b><a href=#1>１年&nbsp</a>");
  document.write("<b><a href=#2>２年&nbsp</a>");
  document.write("<b><a href=#3>３年&nbsp</a>");
  document.write("<b><a href=#4>４年&nbsp</a>");

  for(i=0; i<kbcLastCnt; i++){           // テーブルの数だけループ

    if(kbcMemberTbl[i*20+9] == "男"){    // 男女で色を変える
      kbcColor1 = "lightseagreen";
      kbcColor2 = "skyblue";
      kbcColor3 = "lightblue";
    }else{
      kbcColor1 = "sandybrown";
      kbcColor2 = "thistle";
      kbcColor3 = "lightpink";
    }

    kbcYaku = "&nbsp";                   //部長,副部長,その他の表示
    if(kbcMemberTbl[i*20+11] == 1){
      kbcYaku = "<font color=azure>部長</font>";
    }else{
      if(kbcMemberTbl[i*20+11] == 2){
        kbcYaku = "<font color=seashell>副部長</font>";
      }else{
        if(kbcMemberTbl[i*20+11] == 3){
          kbcYaku = "<font color=red>新入部員!!</font>";
        }else{
          if(kbcMemberTbl[i*20+11] == 4){
            kbcYaku = "<font color=gray>部外者!!</font>";
          }
        }
      }
    }

    if(kbcMemberTbl[i*20+3] == kbcWgakunen){  //TOPに戻るボタン
    }else{
      document.write("<b><a href=#top>△TOP</a>");
      kbcWgakunen = kbcMemberTbl[i*20+3]
      document.write("<a name='")
      document.write(kbcMemberTbl[i*20+3]) //学年
      document.write("'></a>")
    }

    document.write("<a name='")
    document.write(kbcMemberTbl[i*20+1]) //姓
    document.write("'></a>")
    document.write("<p><table bgcolor='" + kbcColor2 + "'><tbody>")
    document.write("<td colspan='3' class='c1' bgcolor='" + kbcColor1 + "'><b>" + kbcYaku + "</b></td>")
    document.write("<td colspan='3' class='c1' bgcolor='" + kbcColor1 + "'><b>&nbsp</b></td>")
    document.write("<tr><td rowspan='13' width='140' class='c1' align='center' valign='middle' height='200' bgcolor='#FFFFFF'><img src='")

    if(kbcMemberTbl[i*20+12] == ""){
      document.write("./image/nowprinting.jpg") //NowPrinting
      document.write("' width='77' height='60' border='0'></td>")
    }else{
      document.write("./image/face/" + kbcMemberTbl[i*20+12]) //画像
      document.write("' border='0'></td>")
    }
    document.write("<td width='80' align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>名前</td>")
    document.write("<td width='210' class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;<b>")
    document.write(kbcMemberTbl[i*20+1] + "&nbsp&nbsp" + kbcMemberTbl[i*20+2])  //名前
    document.write("</b></td>")
    document.write("<td width='70' align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>ふりがな</td>")
    document.write("<td width='240' class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    document.write(kbcMemberTbl[i*20+0])  //ふりがな
    document.write("</td></tr><tr>")
    document.write("<td align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>学年</td>")
    document.write("<td class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    if(kbcMemberTbl[i*20+3] >= 1 & kbcMemberTbl[i*20+3] <= 8){
      document.write(kbcMemberTbl[i*20+3])  //学年
    }else{
      document.write(kbcMemberTbl[i*20+3] + "年度卒業生")  //卒業年度
    }
    document.write("</td>")
    document.write("<td align='right' class='c1' bgcolor='" + kbcColor3 + "'>性別</td>")
    document.write("<td class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    document.write(kbcMemberTbl[i*20+9])  //性別
    document.write("</td></tr><tr>")
    document.write("<td align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>学部</td>")
    document.write("<td class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    document.write(kbcMemberTbl[i*20+4])  //学部
    document.write("</td>")
    document.write("<td align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>学科・課程</td>")
    document.write("<td class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    document.write(kbcMemberTbl[i*20+5])  //学科
    document.write("</td></tr><tr>")
    document.write("<td align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>誕生日</td>")
    document.write("<td class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    document.write(kbcMemberTbl[i*20+6] + "月" + kbcMemberTbl[i*20+7] + "日")  //誕生日
    document.write("</td>")
    document.write("<td align='right' valign='middle' class='c1' bgcolor='" + kbcColor3 + "'>出身地</td>")
    document.write("<td class='c1' valign='middle' align='left' bgcolor='#EDEDED'>&nbsp;")
    document.write(kbcMemberTbl[i*20+8])  //出身地
    document.write("</td></tr><tr>")
    document.write("<td valign='middle' align='right'></td><tr><td colspan='4' class='c1' align='center' valign='middle' height='40' width='640' bgcolor='#FFFFFF'>")
    document.write(kbcMemberTbl[i*20+10])  //フリースペース
    document.write("</td></tr></tbody></table></p>")
  }

}

//*************************************************
//*お知らせメッセージ                             *
//*************************************************
function info(){
  kbcLastCnt  = kbcInfoTbl.length;      // テーブルの数を取得/計算

  for(i=0; i<kbcLastCnt; i++){          // テーブルの数だけループ（逆読み）
    document.write("・")
    document.write(kbcInfoTbl[i])
    document.write("<br>")
    document.write("---------------------------------------------<br>")
  }

}

//*************************************************
//*更新履歴メッセージ                             *
//*************************************************
function History(){

  document.write("<textarea rows='7' cols='50' name='textarea' style='border:1 dashed;border-color:white;")
  document.write("COLOR:orange;")
  document.write("font-size:9pt;")
  document.write("scrollbar-highlight-color:white;")
  document.write("scrollbar-shadow-color:lightblue;")
  document.write("scrollbar-arrow-color:white;")
  document.write("scrollbar-face-color:white;")
  document.write("scrollbar-3dlight-color:blue;")
  document.write("scrollbar-darkshadow-color:white;}")
  document.write("filter:Alpha(opacity=55,enabled=50);' readonly>")

  kbcLastCnt  = kbcHistoryTbl.length;      // テーブルの数を取得/計算
  for(i=kbcLastCnt-1; i>=0; i--){            // テーブルの数だけループ
    document.write(kbcHistoryTbl[i]);
  }

    document.write("</textarea>");

}
//*************************************************
//*ぷち情報　　　　                               *
//*************************************************
function Memo(){

  kbcLastCnt  = kbcEventTbl.length / 4;      // テーブルの数を取得/計算
  chk=0

 document.write("<font size=-1>");

  //前日&当日誕生日表示
  //今週ラジオ放送表示
  if(Birth(1)==1){
    if(RSche(7)==1){
      chk=1
    }
  }

  //当日イベント表示
  for(i=0; i<kbcLastCnt; i++){         // テーブルの数だけループ
    if(kbcMonth==kbcEventTbl[i*4+1] && kbcDay==kbcEventTbl[i*4+2]){
      document.write("今日が");
      document.write(kbcEventTbl[i*4+3]);
      document.write("です〜");
      chk=0
    }
  }


  if(chk==1){  //何も表示されていないときのみメモテーブルより参照
    kbcLastCnt  = kbcMemoTbl.length / 2;    // テーブルの数を取得/計算

    for(i=0; i<kbcLastCnt; i++){         // テーブルの数だけループ
      j = Math.floor(Math.random() * 10000) + 1;
      if(kbcMemoTbl[i*2+1] * 100 >= j){
        document.write(kbcMemoTbl[i*2]);
        return 0;
      }
    }
  }

 document.write("</font>");

}

//*************************************************
//*年間スケジュール                               *
//*************************************************
function YSche(){
  kbcLastCnt  = kbcEventTbl.length / 4;      // テーブルの数を取得/計算

  for(i=0; i<=11; i++){                  // １２ヶ月
    if (i<9){ //mmに4〜3月の数値を入れる
      mm = i + 4;
    }else{
      mm = i - 8;
    }

      document.write("<a name='")
      document.write(mm) 
      document.write("'></a>")

    document.write("<h3 class='itemtitle'>●")
    document.write(mm)
    document.write("月（")
    if(i<9){
      scheYear = kbcYear
      if(kbcMonth <= 3){
        scheYear = scheYear - 1
      }
    }else{
      scheYear = kbcYear + 1
      if(kbcMonth <= 3){
        scheYear = scheYear - 1
      }
    }
    document.write(scheYear)
    document.write("年）</h3>")

    if(mm==kbcMonth){                    //当月着色処理(START)
       document.write("<b><font color='red'>");
    }else{
       document.write("<font color='black'>");
    }

    for(j=0; j<kbcLastCnt; j++){         // テーブルの数だけループ
      if(mm == kbcEventTbl[j*4+1]){
        document.write("&nbsp・");
        kbcRunDate = new Date( kbcEventTbl[j*4+0] ,  kbcEventTbl[j*4+1] ,  kbcEventTbl[j*4+2] );
        document.write(kbcEventTbl[j*4+3]);
        if(kbcEventTbl[j*4+2] != 0){
            document.write("（" + kbcEventTbl[j*4+2] + "日）");
        }
        document.write("<br>");
      }
    }

    //ラジオ日検索
    for (k = 8; k <= 14; k++){         //8〜14日までに必ず第２金曜がくる。
      kbcDate   = new Date(scheYear,mm -1 ,k);
      kbcFriday = kbcDate.getDay();
      if (kbcFriday == 5){
        document.write("&nbsp・FM香川ラジオ放送");
        document.write("（" + k + "日）");
        document.write("<br>");
        break;
      }
    }
    document.write("</font></b>");       //当月着色処理(END)
  }
}

//*************************************************
//*リンク                                         *
//*************************************************
function Link(){
kbcLastCnt  = kbcLinkTbl.length/5     // テーブルの数を取得/計算
 for(i=1; i<=4; i++){                      // 分類の数だけループ
    document.write("<B>");
    switch(i){
      case 1  : document.write("　▽ＫＢＣ関連リンク▽<br>");break;
      case 2  : document.write("　▽放送関連リンク▽<br>");break;
      case 3  : document.write("　▽部員と愉快な仲間たち▽<br>");break;
      default : document.write("　▽その他のリンク▽<br>");break;
    }
    document.write("<hr noshade size=3 color=sandybrown>");
    document.write("</B>");
    document.write("<table border=0>");

    kbcflg=0
    for(j=0; j<kbcLastCnt; j++){
      if(kbcLinkTbl[j*5+3]==i){
        document.write("<tr><td width=30>");
        if(kbcLinkTbl[j*5+4]==1){   //相互リンク表示
        document.write("<font size=-2 color=plum>=相互=</font>");
        }
        document.write("</td><td width=200><a href='" + kbcLinkTbl[j*5+2] + "'target=_blank>" + kbcLinkTbl[j*5+0] + "</a></td>");
        document.write("<td>" + kbcLinkTbl[j*5+1] + "</td></tr>");
        kbcflg=1
      }
    }
    if(kbcflg==0){  //データが無いときは無い旨を表示する
      document.write("<tr><td width=30></td><td>登録されているサイトがありません</td></tr>");

    }
    document.write("</table>");
    document.write("<br><br>");
  }
  document.write("リンク張るのはＴＯＰなら自由。<br>一応ＢＢＳに書き込んでくれると相互リンクします。");
}
//*************************************************
//*写真表示                                       *
//*************************************************
function myChgPic(myPicURL){
   document.images["myBigImage"].src = myPicURL;
}

function Photo(kcode,maisu,nen){
//  kcode 改行コード
//  maisu 写真枚数
//  nen   合宿年月

  Rnd = Math.floor(Math.random()*maisu);  //最初はランダムでいいでしょ。

  document.write("<TABLE><TBODY>");
  document.write("<TR><TD>");

// document.write("<center>Click☆</center><br>");

  for(i=1 ;i<=maisu ;i++){

    document.write("<A href='javascript:void(0)' onmousedown=myChgPic('../image/g-photo" + nen + "/" + i + ".jpg')>");
    document.write("<IMG src='../image/g-photo" + nen + "/" + i + ".jpg' width='60' height='40'></A>");
    kaichk = i % kcode
    if(kaichk==0){
      document.write("<br>")
    }
    if(i==(kcode*2)){
      document.write("</td><TR width='485' height='485'><TD colspan='4' align='center'>");
      document.write("<IMG src='../image/g-photo" + nen + "/" + Rnd + ".jpg' name='myBigImage'>");
      document.write("</TD></TR><td>");
    }
  }


  document.write("</TD></TR></TBODY></TABLE>");

}