「旧漢字から新漢字に変換」を編集中

旧漢字と新漢字を相互変換します。ボリュームが大きいため「旧漢字から新漢字に変換」のみ掲載。添付ファイルには全て含まれています。

== ダウンロード ==
[[ファイル:旧漢字から新漢字に変換.zip]]

== ソースコード ==
<syntaxhighlight lang="javascript" copy>
// -----------------------------------------------------------------------------
// 標準変換
//
// Copyright (c) Kuro. All Rights Reserved.
// e-mail: kuro@haijin-boys.com
// www:    https://www.haijin-boys.com/
// -----------------------------------------------------------------------------
// 旧漢字から新漢字に変換（A）
// 出典 1 : http://www.toyama-cmt.ac.jp/~kanagawa/language/kyuuji.html
// 出典 2 : http://hgonzaemon.g1.xrea.com/kyuukannji.html
// 出典 3 : https://www.asahi-net.or.jp/~ax2s-kmtn/ref/old_chara.html
//
// Ver 1.0 2009-07-23 Furu.
// -----------------------------------------------------------------------------

var sel = document.selection;
if (sel.Text == "") {
	sel.SelectAll();
}
var map = [];
//p["旧"] = "新"; // 出典
map["堯"] = "尭"; // 1
map["亞"] = "亜"; // 2
map["惡"] = "悪"; // 2
map["壓"] = "圧"; // 2
map["圍"] = "囲"; // 2
map["爲"] = "為"; // 2
map["醫"] = "医"; // 2
map["壹"] = "壱"; // 2
map["逸"] = "逸"; // 2
map["稻"] = "稲"; // 2
map["飮"] = "飲"; // 2
map["隱"] = "隠"; // 2
map["羽"] = "羽"; // 2
map["營"] = "営"; // 2
map["榮"] = "栄"; // 2
map["衞"] = "衛"; // 2
map["益"] = "益"; // 2
map["驛"] = "駅"; // 2
map["悅"] = "悦"; // 2
map["圓"] = "円"; // 2
map["艷"] = "艶"; // 2
map["鹽"] = "塩"; // 2
map["奧"] = "奥"; // 2
map["應"] = "応"; // 2
map["橫"] = "横"; // 2
map["歐"] = "欧"; // 2
map["毆"] = "殴"; // 2
map["穩"] = "穏"; // 2
map["假"] = "仮"; // 2
map["價"] = "価"; // 2
map["畫"] = "画"; // 2
map["會"] = "会"; // 2
map["壞"] = "壊"; // 2
map["懷"] = "懐"; // 2
map["繪"] = "絵"; // 2
map["擴"] = "拡"; // 2
map["殼"] = "殻"; // 2
map["覺"] = "覚"; // 2
map["學"] = "学"; // 2
map["嶽"] = "岳"; // 2
map["樂"] = "楽"; // 2
map["勸"] = "勧"; // 2
map["卷"] = "巻"; // 2
map["寬"] = "寛"; // 2
map["歡"] = "歓"; // 2
map["罐"] = "缶"; // 2
map["觀"] = "観"; // 2
map["閒"] = "間"; // 2
map["關"] = "関"; // 2
map["陷"] = "陥"; // 2
map["館"] = "館"; // 2
map["巖"] = "巌"; // 2
map["顏"] = "顔"; // 2
map["歸"] = "帰"; // 2
map["氣"] = "気"; // 2
map["龜"] = "亀"; // 2
map["僞"] = "偽"; // 2
map["戲"] = "戯"; // 2
map["犧"] = "犠"; // 2
map["舊"] = "旧"; // 2
map["據"] = "拠"; // 2
map["擧"] = "挙"; // 2
map["峽"] = "峡"; // 2
map["挾"] = "挟"; // 2
map["敎"] = "教"; // 2
map["狹"] = "狭"; // 2
map["曉"] = "暁"; // 2
map["區"] = "区"; // 2
map["驅"] = "駆"; // 2
map["勳"] = "勲"; // 2
map["薰"] = "薫"; // 2
map["徑"] = "径"; // 2
map["惠"] = "恵"; // 2
map["溪"] = "渓"; // 2
map["經"] = "経"; // 2
map["繼"] = "継"; // 2
map["莖"] = "茎"; // 2
map["螢"] = "蛍"; // 2
map["輕"] = "軽"; // 2
map["鷄"] = "鶏"; // 2
map["藝"] = "芸"; // 2
map["缺"] = "欠"; // 2
map["儉"] = "倹"; // 2
map["劍"] = "剣"; // 2
map["圈"] = "圏"; // 2
map["檢"] = "検"; // 2
map["權"] = "権"; // 2
map["獻"] = "献"; // 2
map["縣"] = "県"; // 2
map["險"] = "険"; // 2
map["顯"] = "顕"; // 2
map["驗"] = "験"; // 2
map["嚴"] = "厳"; // 2
map["效"] = "効"; // 2
map["廣"] = "広"; // 2
map["恆"] = "恒"; // 2
map["鑛"] = "鉱"; // 2
map["號"] = "号"; // 2
map["國"] = "国"; // 2
map["黑"] = "黒"; // 2
map["濟"] = "済"; // 2
map["碎"] = "砕"; // 2
map["齋"] = "斎"; // 2
map["劑"] = "剤"; // 2
map["櫻"] = "桜"; // 2
map["册"] = "冊"; // 2
map["雜"] = "雑"; // 2
map["參"] = "参"; // 2
map["慘"] = "惨"; // 2
map["棧"] = "桟"; // 2
map["蠶"] = "蚕"; // 2
map["贊"] = "賛"; // 2
map["殘"] = "残"; // 2
map["絲"] = "糸"; // 2
map["飼"] = "飼"; // 2
map["齒"] = "歯"; // 2
map["兒"] = "児"; // 2
map["辭"] = "辞"; // 2
map["濕"] = "湿"; // 2
map["實"] = "実"; // 2
map["舍"] = "舎"; // 2
map["寫"] = "写"; // 2
map["釋"] = "釈"; // 2
map["壽"] = "寿"; // 2
map["收"] = "収"; // 2
map["從"] = "従"; // 2
map["澁"] = "渋"; // 2
map["獸"] = "獣"; // 2
map["縱"] = "縦"; // 2
map["肅"] = "粛"; // 2
map["處"] = "処"; // 2
map["緖"] = "緒"; // 2
map["諸"] = "諸"; // 2
map["敍"] = "叙"; // 2
map["奬"] = "奨"; // 2
map["將"] = "将"; // 2
map["燒"] = "焼"; // 2
map["祥"] = "祥"; // 2
map["稱"] = "称"; // 2
map["證"] = "証"; // 2
map["乘"] = "乗"; // 2
map["剩"] = "剰"; // 2
map["壤"] = "壌"; // 2
map["孃"] = "嬢"; // 2
map["條"] = "条"; // 2
map["淨"] = "浄"; // 2
map["疊"] = "畳"; // 2
map["穰"] = "穣"; // 2
map["讓"] = "譲"; // 2
map["釀"] = "醸"; // 2
map["囑"] = "嘱"; // 2
map["觸"] = "触"; // 2
map["寢"] = "寝"; // 2
map["愼"] = "慎"; // 2
map["晉"] = "晋"; // 2
map["眞"] = "真"; // 2
map["神"] = "神"; // 2
map["盡"] = "尽"; // 2
map["圖"] = "図"; // 2
map["粹"] = "粋"; // 2
map["醉"] = "酔"; // 2
map["隨"] = "随"; // 2
map["髓"] = "髄"; // 2
map["數"] = "数"; // 2
map["樞"] = "枢"; // 2
map["瀨"] = "瀬"; // 2
map["晴"] = "晴"; // 2
map["淸"] = "清"; // 2
map["精"] = "精"; // 2
map["聲"] = "声"; // 2
map["靑"] = "青"; // 2
map["靜"] = "静"; // 2
map["齊"] = "斉"; // 2
map["攝"] = "摂"; // 2
map["竊"] = "窃"; // 2
map["專"] = "専"; // 2
map["戰"] = "戦"; // 2
map["淺"] = "浅"; // 2
map["潛"] = "潜"; // 2
map["纖"] = "繊"; // 2
map["踐"] = "践"; // 2
map["錢"] = "銭"; // 2
map["禪"] = "禅"; // 2
map["雙"] = "双"; // 2
map["壯"] = "壮"; // 2
map["搜"] = "捜"; // 2
map["插"] = "挿"; // 2
map["爭"] = "争"; // 2
map["總"] = "総"; // 2
map["聰"] = "聡"; // 2
map["莊"] = "荘"; // 2
map["裝"] = "装"; // 2
map["騷"] = "騒"; // 2
map["增"] = "増"; // 2
map["臟"] = "臓"; // 2
map["藏"] = "蔵"; // 2
map["屬"] = "属"; // 2
map["續"] = "続"; // 2
map["墮"] = "堕"; // 2
map["體"] = "体"; // 2
map["對"] = "対"; // 2
map["帶"] = "帯"; // 2
map["滯"] = "滞"; // 2
map["臺"] = "台"; // 2
map["瀧"] = "滝"; // 2
map["擇"] = "択"; // 2
map["澤"] = "沢"; // 2
map["單"] = "単"; // 2
map["擔"] = "担"; // 2
map["膽"] = "胆"; // 2
map["團"] = "団"; // 2
map["彈"] = "弾"; // 2
map["斷"] = "断"; // 2
map["癡"] = "痴"; // 2
map["遲"] = "遅"; // 2
map["晝"] = "昼"; // 2
map["蟲"] = "虫"; // 2
map["鑄"] = "鋳"; // 2
map["猪"] = "猪"; // 2
map["廳"] = "庁"; // 2
map["聽"] = "聴"; // 2
map["鎭"] = "鎮"; // 2
map["塚"] = "塚"; // 2
map["遞"] = "逓"; // 2
map["鐵"] = "鉄"; // 2
map["轉"] = "転"; // 2
map["點"] = "点"; // 2
map["傳"] = "伝"; // 2
map["都"] = "都"; // 2
map["黨"] = "党"; // 2
map["盜"] = "盗"; // 2
map["燈"] = "灯"; // 2
map["當"] = "当"; // 2
map["鬪"] = "闘"; // 2
map["德"] = "徳"; // 2
map["獨"] = "独"; // 2
map["讀"] = "読"; // 2
map["屆"] = "届"; // 2
map["繩"] = "縄"; // 2
map["貳"] = "弐"; // 2
map["惱"] = "悩"; // 2
map["腦"] = "脳"; // 2
map["廢"] = "廃"; // 2
map["拜"] = "拝"; // 2
map["賣"] = "売"; // 2
map["麥"] = "麦"; // 2
map["發"] = "発"; // 2
map["髮"] = "髪"; // 2
map["拔"] = "抜"; // 2
map["飯"] = "飯"; // 2
map["蠻"] = "蛮"; // 2
map["祕"] = "秘"; // 2
map["濱"] = "浜"; // 2
map["甁"] = "瓶"; // 2
map["福"] = "福"; // 2
map["拂"] = "払"; // 2
map["佛"] = "仏"; // 2
map["竝"] = "並"; // 2
map["變"] = "変"; // 2
map["邊"] = "辺"; // 2
map["辨"] = "弁"; // 2
map["辯"] = "弁"; // 2
map["瓣"] = "弁"; // 2
map["舖"] = "舗"; // 2
map["穗"] = "穂"; // 2
map["寶"] = "宝"; // 2
map["豐"] = "豊"; // 2
map["沒"] = "没"; // 2
map["槇"] = "槙"; // 2
map["萬"] = "万"; // 2
map["滿"] = "満"; // 2
map["默"] = "黙"; // 2
map["彌"] = "弥"; // 2
map["藥"] = "薬"; // 2
map["譯"] = "訳"; // 2
map["靖"] = "靖"; // 2
map["藪"] = "薮"; // 2
map["豫"] = "予"; // 2
map["餘"] = "余"; // 2
map["與"] = "与"; // 2
map["譽"] = "誉"; // 2
map["搖"] = "揺"; // 2
map["樣"] = "様"; // 2
map["謠"] = "謡"; // 2
map["遙"] = "遥"; // 2
map["來"] = "来"; // 2
map["賴"] = "頼"; // 2
map["亂"] = "乱"; // 2
map["覽"] = "覧"; // 2
map["隆"] = "隆"; // 2
map["龍"] = "竜"; // 2
map["兩"] = "両"; // 2
map["獵"] = "猟"; // 2
map["綠"] = "緑"; // 2
map["壘"] = "塁"; // 2
map["勵"] = "励"; // 2
map["禮"] = "礼"; // 2
map["隸"] = "隷"; // 2
map["靈"] = "霊"; // 2
map["齡"] = "齢"; // 2
map["戀"] = "恋"; // 2
map["爐"] = "炉"; // 2
map["勞"] = "労"; // 2
map["朗"] = "朗"; // 2
map["樓"] = "楼"; // 2
map["郞"] = "郎"; // 2
map["祿"] = "禄"; // 2
map["灣"] = "湾"; // 2
map["瑤"] = "瑶"; // 2
map["鄕"] = "郷"; // 3
map["敕"] = "勅"; // 3
map["霸"] = "覇"; // 3
map["襃"] = "褒"; // 3
map["飜"] = "翻"; // 3
map["亙"] = "亘"; // 3
var s1 = sel.Text;
var s2 = "";
for (var i = 0; i < s1.length; i++) {
	if (i + 1 < s1.length) {
		var c = map[s1.substring(i, i + 2)];
		if (c) {
			s2 += c;
			i++;
			continue;
		}
	}
	var c = map[s1.substring(i, i + 1)];
	if (c) {
		s2 += c;
		continue;
	}
	s2 += s1.substring(i, i + 1);
}
sel.Text = s2;
</syntaxhighlight>