//Javascriptの配列をシャフルするプログラム
Array.prototype.ramsort = function() {
  var   k = this.length;  //配列の長さを指定
  while(k){               //配列の長さ繰り返す
        var m   = Math.floor( Math.random() * k);
        var kb  = this[--k];
        this[k] = this[m];
        this[m] = kb ;
  }
    return this;
}

function amazonlink(){

//動的に表示するHTMLの要素（0：グループ,1：画像ファイル名,2：書名,3：リンク先,4：表示文字列)
var koremiss_book=[["A","shoseki01.jpg","ナイチンゲールの沈黙（上）　文庫版","http://tkj.jp/book/book_70635801.html","ナイチンゲールの沈黙（上）<br />文庫版"],
                   ["A","shoseki02.jpg","着ぐるみデパート・ジャック","http://tkj.jp/book/book_01647801.html","着ぐるみデパート・ジャック"],
                   ["A","shoseki03.jpg","東京デッドクルージング","http://tkj.jp/book/book_01641101.html","東京デッドクルージング"],
                   ["A","shoseki04.jpg","ビッグタイム　文庫版","http://tkj.jp/book/book_70635001.html","ビッグタイム　文庫版"],
                   ["A","shoseki05.jpg"," ソリューション・ゲーム ","http://tkj.jp/book/book_01637001.html"," ソリューション・ゲーム "],
                   ["A","shoseki06.jpg","月が１００回沈めば　文庫版","http://tkj.jp/book/book_70632901.html","月が１００回沈めば<br />文庫版"],
                   ["A","shoseki07.jpg","殺人ピエロの孤島同窓会　文庫版","http://tkj.jp/book/book_70634601.html","殺人ピエロの孤島同窓会<br />文庫版"],
                   ["A","shoseki08.jpg","林檎と蛇のゲーム","http://tkj.jp/book/book_01620301.html","林檎と蛇のゲーム"],
                   ["A","shoseki09.jpg","コスプレ幽霊　紅蓮女　文庫版","http://tkj.jp/book/book_70616601.html","コスプレ幽霊　紅蓮女<br />文庫版"],
                   ["A","shoseki10.jpg","禁断のパンダ","http://tkj.jp/book/book_01619401.html","禁断のパンダ"],
                   ["B","shoseki11.jpg","チーム・バチスタの栄光（上）　文庫版","http://tkj.jp/book/book_70616101.html","チーム・バチスタの栄光（上）<br />文庫版"],
                   ["B","shoseki12.jpg","ＸＸ（エクスクロス）ゼロ　呪催眠カーズ","http://tkj.jp/book/book_70606701.html","ＸＸ（エクスクロス）ゼロ<br />呪催眠カーズ"],
                   ["B","shoseki13.jpg"," メディア・スターは最後に笑う ","http://tkj.jp/book/book_01602401.html"," メディア・スターは最後に笑う "],
                   ["B","shoseki14.jpg","ラム＆コーク　文庫版","http://tkj.jp/book/book_70601401.html","ラム＆コーク　文庫版"],
                   ["B","shoseki15.jpg","いかさま師　文庫版","http://tkj.jp/book/book_70593401.html","いかさま師　文庫版"],
                   ["B","shoseki16.jpg","果てしなき渇き　文庫版","http://tkj.jp/book/book_70583901.html","果てしなき渇き　文庫版"],
                   ["B","shoseki17.jpg","ダブルアップ　文庫版","http://tkj.jp/book/book_70583701.html","ダブルアップ　文庫版"],
                   ["B","shoseki18.jpg","当確への布石","http://tkj.jp/book/book_01583501.html","当確への布石"],
                   ["B","shoseki19.jpg","ジェネラル・ルージュの凱旋","http://tkj.jp/general/","ジェネラル・ルージュの凱旋"],
                   ["B","shoseki20.jpg","コーリング　闇からの声","http://tkj.jp/book/book_01571001.html","コーリング　闇からの声"],
                   ["C","shoseki21.gif","シャトゥーン","http://tkj.jp/book/book_01563901.html","シャトゥーン"],
                   ["C","shoseki22.jpg","サウスポー・キラー　文庫版","http://tkj.jp/book/book_70567101.html","サウスポー・キラー<br />文庫版"],
                   ["C","shoseki23.jpg","ブレイクスルー・トライアル","http://tkj.jp/book/book_01567301.html","ブレイクスルー・トライアル"],
                   ["C","shoseki24.jpg","黒と白の殺意","http://tkj.jp/book/book_01556201.html","黒と白の殺意"],
                   ["C","shoseki25.jpg","地獄のババぬき　文庫版","http://tkj.jp/book/book_70553101.html","地獄のババぬき　文庫版"],
                   ["C","shoseki26.jpg","ヒステリック・サバイバー","http://tkj.jp/book/book_01552301.html","ヒステリック・サバイバー"],
                   ["C","shoseki27.gif","ナイチンゲールの沈黙","http://tkj.jp/nightingale/","ナイチンゲールの沈黙"],
                   ["C","shoseki28.jpg","ビッグタイム","http://tkj.jp/book/book_01537401.html","ビッグタイム"],
                   ["C","shoseki29.jpg","ワイルド・サイドを歩け　文庫版","http://tkj.jp/book/book_70532401.html","ワイルド・サイドを歩け<br />文庫版"],
                   ["C","shoseki30.jpg","月が１００回沈めば","http://tkj.jp/book/book_01532201.html","月が１００回沈めば"],
                   ["D","shoseki31.jpg","コスプレ幽霊　紅蓮女","http://tkj.jp/book/book_01527501.html","コスプレ幽霊　紅蓮女"],
                   ["D","shoseki32.jpg","殺人ピエロの孤島同窓会","http://tkj.jp/book/book_01513401.html","殺人ピエロの孤島同窓会"],
                   ["D","shoseki33.jpg","チーム・バチスタの栄光","http://tkj.jp/batista/","チーム・バチスタの栄光"],
                   ["D","shoseki34.jpg","君の名残を（下）　文庫版","http://tkj.jp/book/book_70507701.html","君の名残を（下）　文庫版"],
                   ["D","shoseki35.jpg","君の名残を（上）　文庫版","http://tkj.jp/book/book_70507501.html","君の名残を（上）　文庫版"],
                   ["D","shoseki36.gif","さようなら、ギャングランド","http://tkj.jp/book/book_01479501.html","さようなら、ギャングランド"],
                   ["D","shoseki37.gif","いかさま師","http://tkj.jp/book/book_01472201.html","いかさま師"],
                   ["D","shoseki38.gif","ダブルアップ","http://tkj.jp/book/book_01463701.html","ダブルアップ"],
                   ["D","shoseki39.gif","ビッグボーナス 文庫版","http://tkj.jp/book/book_70448601.html","ビッグボーナス 文庫版"],
                   ["D","shoseki40.gif","サウスポー・キラー","http://tkj.jp/book/book_01445801.html","サウスポー・キラー"],
                   ["E","shoseki41.gif","果てしなき渇き","http://tkj.jp/book/book_01446001.html","果てしなき渇き"],
                   ["E","shoseki42.gif","パーフェクト・プラン　文庫版","http://tkj.jp/book/book_70445201.html","パーフェクト・プラン<br />文庫版"],
                   ["E","shoseki43.gif","ラム＆コーク","http://tkj.jp/book/book_01429801.html","ラム＆コーク"],
                   ["E","shoseki44.gif","君の名残を","http://tkj.jp/book/book_01413301.html","君の名残を"],
                   ["E","shoseki45.gif","沈むさかな 文庫版","http://tkj.jp/book/book_70415001.html","沈むさかな 文庫版"],
                   ["E","shoseki46.jpg","そのケータイはＸＸ（エクスクロス）で 文庫版","http://tkj.jp/book/book_70409601.html","そのケータイはＸＸ(エクスクロス)で<br />文庫版"],
                   ["E","shoseki47.gif","逃亡作法 文庫版","http://tkj.jp/book/book_70398601.html","逃亡作法 文庫版"],
                   ["E","shoseki48.jpg","四日間の奇蹟 文庫版","http://tkj.jp/book/book_70384301.html","四日間の奇蹟 文庫版"],
                   ["E","shoseki49.jpg","呪眼連鎖","http://tkj.jp/book/book_01668301.html","呪眼連鎖"],
                   ["E","shoseki50.jpg","黒と白の殺意 文庫版","http://tkj.jp/book/book_70651801.html","黒と白の殺意 文庫版"],
                   ["F","shoseki51.jpg","イノセント・ゲリラの祝祭","http://tkj.jp/book/book_01667601.html","イノセント・ゲリラの祝祭"],
                   ["F","shoseki52.jpg","蜜蜂のデザート","http://tkj.jp/book/book_01671401.html","蜜蜂のデザート"],
                   ["F","shoseki53.jpg","臨床真理","http://tkj.jp/book/book_01677901.html","臨床真理"],
                   ["F","shoseki54.jpg","屋上ミサイル","http://tkj.jp/book/book_01677701.html","屋上ミサイル"],
                   ["F","shoseki55.jpg","毒殺魔の教室","http://tkj.jp/book/book_01679001.html","毒殺魔の教室"],
                   ["F","shoseki56.jpg","ジェネラル・ルージュの凱旋（上）　文庫版","http://tkj.jp/book/book_70676701.html","ジェネラル・ルージュの凱旋（上）<br />文庫版"],
                   ["F","shoseki57.jpg","ジェネラル・ルージュの凱旋（下）　文庫版","http://tkj.jp/book/book_70676901.html","ジェネラル・ルージュの凱旋（下）<br />文庫版"],
                   ["F","shoseki58.jpg","ジェネラル・ルージュの伝説","http://tkj.jp/book/book_01691201.html","ジェネラル・ルージュの伝説"]];

//ランダムに並び替えて保存する先の入れ物（配列を指定）
var bookdb = new Array();

//動的に表示するHTMLの初期化
var jsHTML="";

//表示するグループを配列化する
var gno = new Array();    //オブジェクトの記事

//移動表示グループ一覧（5つ）２倍にして満遍なく出現しやすくしておく
gno[0]  = "A" ;
gno[1]  = "B" ;
gno[2]  = "C" ;
gno[3]  = "D" ;
gno[4]  = "E" ;
gno[5]  = "F" ;
gno[6]  = "A" ;
gno[7]  = "B" ;
gno[8]  = "C" ;
gno[9]  = "D" ;
gno[10]  = "E" ;
gno[11]  = "F" ;

//グループをランダム表示するためのランダム関数を生成
rg = Math.floor( Math.random() * gno.length);



//----------------------------------------------------------------------------
// 動的に生成するHTMLを作成
/*
  0：グループ,
  1：画像ファイル名
  2：書名
  3：リンク先
  4：表示文字列
*/
//----------------------------------------------------------------------------

    //シャフルするファンクションramsortを利用して、文庫情報をランダムに並び替え
    //koremiss_book.ramsort();
    
    //動的生成のタグを開始
    jsHTML +='<ul class="booklist">';
    for(i in koremiss_book){
      if(gno[rg] == koremiss_book[i][0]){
       jsHTML  +='<li><a href="' + koremiss_book[i][3] + '"><img src="./img_book/' + koremiss_book[i][0] +'/'+ koremiss_book[i][1] +'" width="60" height="84" alt="' + koremiss_book[i][2] + '" /></a><br /><span><a href="' + koremiss_book[i][3] + '">' + koremiss_book[i][4] + '</a></span></li>';
      }
    }
    //動的生成のタグを閉じる
    jsHTML +='</ul>';
    
    //"book"のDIVタグのHTMLソースを生成した「jsHTML」に変更する
    document.getElementById("book").innerHTML = jsHTML;

//alert("ok");テスト用
}