var save;
var save_moji;
var kana = new Array("う","か","き","く","け","こ","さ","し","す","せ","そ","た","ち","つ","て","と","は","ひ","ふ","へ","ほ");
var d_kana = new Array("ヴ","が","ぎ","ぐ","げ","ご","ざ","じ","ず","ぜ","ぞ","だ","ぢ","づ","で","ど","ば","び","ぶ","べ","ぼ");
var kana2 = new Array("は","ひ","ふ","へ","ほ");
var d_kana2 = new Array("ぱ","ぴ","ぷ","ぺ","ぽ");

function del() {
  var wordLen = document.retrieval.bibliography_search_search_keyword.value.length;
  document.retrieval.bibliography_search_search_keyword.value = document.retrieval.bibliography_search_search_keyword.value.substring(0,wordLen-1);
  document.retrieval.bibliography_search_search_keyword.focus();
}

function clr() {
  save = "";
  save_moji = "";
  document.retrieval.bibliography_search_search_keyword.value = "";
  document.retrieval.bibliography_search_search_keyword.focus();
}

function key_in(moji) {
  var i;
  if (moji == "゛" || moji == "゜") {
    if (moji == "゛") {
      for(i=0;i<kana.length;i++){
        if(save_moji == kana[i]){
          document.retrieval.bibliography_search_search_keyword.value = save + d_kana[i];
          save_moji = moji;
          break;
        }
      }
    }else{
      for(i=0;i<kana2.length;i++){
        if(save_moji == kana2[i]){
          document.retrieval.bibliography_search_search_keyword.value = save + d_kana2[i];
          save_moji = moji;
          break;
        }
      }
    }
  }else{
    save = document.retrieval.bibliography_search_search_keyword.value;
    document.retrieval.bibliography_search_search_keyword.value += moji;
    save_moji = moji;
  }
}