/* Scrool Message Display by N.Misumi */


/* Calender by N.Misumi */
function myCalendar( myTodayOffset ){
// ****************
// **   下準備   **
// ****************
 myDate  = new Date();                                      // 今日の日付データ取得
 myYear  = myDate.getYear();                                // 下２桁の西暦取得
 myMonth = myDate.getMonth();                               // 月を取得(0月〜11月)
 if (myTodayOffset == -1){                                  // 先月のデータ表示か？
    if (myMonth == 0){                                      //   今月が1月なら12月へ
       myYear = (myYear == 2000) ? 99 : (myYear-1) ;        //   去年
       myMonth = 11;                                        //   先月（去年の12月)
    }else{
       myMonth--;                                           //   先月
    }
 }else if (myTodayOffset == 1){                             // 来月データ表示か？
    if (myMonth == 11){                                     //   今月が12月なら1月へ
       myYear = (myYear == 99) ? 2000 : (myYear+1) ;        //   来年
       myMonth = 0;                                         //   来月(来年の１月)
    }else{
       myMonth++;                                           //   来月
    }
 }
 myDate.setYear(myYear);                                    // 日付情報変更
 myDate.setMonth(myMonth);

 myWeekTbl = new Array("日","月","火","水","木","金","土");  // 曜日テーブル定義
 myMonthTbl= new Array(31,28,31,30,31,30,31,31,30,31,30,31);// 月テーブル定義
 myYear = (myYear<2000) ? (1900+myYear) : (myYear);         // ４桁の西暦に変換
 if (((myYear%4)==0 && (myYear%100)!=0) || (myYear%400)==0) // うるう年だったら...
    myMonthTbl[1] = 29;                                     // 　２月を２９日とする
 myToday = myDate.getDate();                                // 今日の'日'を退避
 myDate.setDate(1);                                         // 日付を'１日'に変えて、
 myWeek = myDate.getDay();                                  // 　'１日'の曜日を取得
 myTable   = new Array(7*6);                                // 表のセル数分定義

 for(i=0; i<7*6; i++) myTable[i]="　";                      // myTableを掃除する
 for(i=0; i<myMonthTbl[myMonth]; i++)myTable[i+myWeek]=i+1; // 日付を埋め込む

// ***********************
// **  カレンダーの表示  **
// ***********************
 document.write("<table border='1' cellspacing='0' ");      // 表の作成開始
 document.write("bordercolor='#808080' ");
 document.write("bordercolordark='#000000' ");
 document.write("bordercolorlight='#C0C0C0'>");

 document.write("<tr><td align='center' colspan='7' bgcolor='#7fffd4'>"); // 見出
 document.write("<strong>",myYear, "年", (myMonth+1), "月</strong>");
 document.write("</td></tr>");

 document.write("<tr>");                                    // 曜日見出しセット
 for(i=0; i<7; i++){                                        // 一行(１週間)ループ
   document.write("<td align='center' ");
   if(i==0)document.write("bgcolor='#fa8072'>");            // 日曜のセルの色
   else    document.write("bgcolor='#ffebcd'>");            // 月〜土のセルの色
   document.write("<strong>",myWeekTbl[i],"</strong>");     // '日'から'土'の表示
   document.write("</td>");
 }
 document.write("</tr>");

 for(i=0; i<6; i++){                                        // 表の「行」のループ
   document.write("<tr>");                                  // 行の開始
   for(j=0; j<7; j++){                                      // 表の「列」のループ
      document.write("<td align='center' ");                // 列(セル)の作成
      myDat = myTable[j+(i*7)];                             // 書きこむ内容の取得
      if (myDat==myToday && myTodayOffset==0)
                         document.write("bgcolor='#00ffff'>"); // 今日のセルの色
      else if(j==0)      document.write("bgcolor='#ffb6c1'>"); // 日曜のセルの色
      else               document.write("bgcolor='#ffffe0'>"); // 平日のセルの色
      document.write("<strong>",myDat,"</strong>");         // 日付セット
      document.write("</td>");                              // 列(セル)の終わり
   }
   document.write("</tr>");                                 // 行の終わり
 }
 document.write("</table>");                                // 表の終わり
}                                                           // function の終わり

/* Adjust Back Graund Color by N.Misumi */
function bc(n){
   document.bgColor=n;
   document.MyForm.rgbnum.value=n;
          return false;
}
function bgF(n){
   document.bgColor=n;
   document.bgcolorForm.rgbnum.value=n;
          return false;
}
function backdisp(col){
   document.bgColor=col;
}
function winc() {
               window.close() 
}

/* Change Icons onMoseover. copyright by N.Misumi */
function check()
{
  if ( navigator.userAgent.indexOf ("Mozilla") == 0 &&
       navigator.userAgent.charAt(8) >= "3" ) {
    return true;
  } else {
    return false;
  }
}

function In(n){
  if(check())
    document.images["m"+n].src = "img/maru.gif";
}

function Out(n){
  if(check())
    document.images["m"+n].src = "img/m"+n+".gif";
}

/* Copyright (C)1996 Web Integration Systems, Inc. DBA Websys, Inc.All Rights Reserved.
This applet can be re-used or modified, if credit is given in the source code.
*/
function scrollit_r2l(seed)
{
    var msg = "　屋久島トンボページのへようこそ！　" +
              "　見たい項目をクリックしてください。" +
              "　質問は掲示板へお願いします。" +
              "　リンクは自由に行ってください。　　　　" +
              "　簡単なＩＴ環境の利用方法を目指し また" +
              "　Jw_cadを中心に作成したCAD関係方々のお" +
              "役にたてればと思い作成したものです。   ";

    var out = " ";
    var c   = 1;

    if (seed > 100) {
        seed--;seed--;
        var cmd="scrollit_r2l(" + seed + ")";
        timerTwo=window.setTimeout(cmd,200);
    } else if (seed <= 100 && seed > 0) {
         for (c=0 ; c < seed ; c++) {
             out+=" ";
         }
         out+=msg;
         seed--;seed--;
         var cmd="scrollit_r2l(" + seed + ")";
         window.status=out;
         timerTwo=window.setTimeout(cmd,200);
    } else if (seed <= 0) {
        if (-seed < msg.length) {
            out+=msg.substring(-seed,msg.length);
            seed--;seed--;
            var cmd="scrollit_r2l(" + seed + ")";
            window.status=out;
            timerTwo=window.setTimeout(cmd,200);
        } else {
            window.status=" ";
            clearTimeout(timerTwo);
            timerTwo=window.setTimeout("scrollit_r2l(100)",200);
        }
    }
}
