|
disabledraw; |
|
call w2h "住ま"; |
|
call w2h "棲ま"; |
|
call w2h "合"; |
|
call w2h "会"; |
|
call w2h "併"; |
|
call w2h "逢"; |
|
call w2h "遭"; |
|
call w2h "會"; |
|
call w2h "遇"; |
|
call w2h "贖"; |
|
call w2h "購"; |
|
call w2h "商"; |
|
call w2h "賈"; |
|
call w2h "論"; |
|
call w2h "糾"; |
|
call w2h "味"; |
|
call w2h "能"; |
|
call w2h "あた"; |
|
call w2h "与"; |
|
call w2h "與"; |
|
call w2h "扱"; |
|
call w2h "表"; |
|
call w2h "現"; |
|
call w2h "洗"; |
|
call w2h "抗"; |
|
call w2h "諍"; |
|
call w2h "争"; |
|
call w2h "爭"; |
|
//call w2h "い"; |
|
call w2h "言"; |
|
call w2h "云"; |
|
call w2h "謂"; |
|
call w2h "憩"; |
|
call w2h "憇"; |
|
call w2h "誘"; |
|
call w2h "労"; |
|
call w2h "厭"; |
|
call w2h "祝"; |
|
call w2h "伺"; |
|
call w2h "窺"; |
|
call w2h "覘"; |
|
call w2h "失"; |
|
call w2h "喪"; |
|
call w2h "歌"; |
|
call w2h "唄"; |
|
call w2h "謳"; |
|
call w2h "謡"; |
|
call w2h "唱"; |
|
call w2h "謠"; |
|
call w2h "謌"; |
|
call w2h "詠"; |
|
call w2h "疑"; |
|
call w2h "奪"; |
|
call w2h "うば"; |
|
call w2h "諾"; |
|
call w2h "敬"; |
|
call w2h "占"; |
|
call w2h "卜"; |
|
call w2h "潤"; |
|
call w2h "抑"; |
|
call w2h "押さ"; |
|
call w2h "終"; |
|
call w2h "追"; |
|
call w2h "負"; |
|
call w2h "逐"; |
|
call w2h "覆"; |
|
call w2h "被"; |
|
call w2h "蔽"; |
|
call w2h "蓋"; |
|
call w2h "掩"; |
|
call w2h "奄"; |
|
call w2h "補"; |
|
call w2h "行"; |
|
call w2h "行な"; |
|
call w2h "おそ"; |
|
call w2h "教"; |
|
call w2h "襲"; |
|
call w2h "思"; |
|
call w2h "想"; |
|
call w2h "念"; |
|
call w2h "変"; |
|
call w2h "代"; |
|
call w2h "交"; |
|
call w2h "替"; |
|
call w2h "買"; |
|
call w2h "換"; |
|
call w2h "飼"; |
|
call w2h "變"; |
|
call w2h "支"; |
|
call w2h "関"; |
|
call w2h "係"; |
|
call w2h "かか"; |
|
call w2h "抱"; |
|
call w2h "拘"; |
|
call w2h "關"; |
|
call w2h "匿"; |
|
call w2h "囲"; |
|
call w2h "圍"; |
|
call w2h "叶"; |
|
call w2h "敵"; |
|
call w2h "適"; |
|
call w2h "庇"; |
|
call w2h "構"; |
|
call w2h "かよ"; |
|
call w2h "通"; |
|
call w2h "考"; |
|
call w2h "かんが"; |
|
call w2h "競"; |
|
call w2h "竸"; |
|
call w2h "嫌"; |
|
call w2h "食"; |
|
call w2h "喰"; |
|
call w2h "狂"; |
|
call w2h "加"; |
|
call w2h "請"; |
|
call w2h "乞"; |
|
call w2h "こしら"; |
|
call w2h "こた"; |
|
call w2h "答"; |
|
call w2h "応"; |
|
call w2h "堪"; |
|
call w2h "應"; |
|
call w2h "恋"; |
|
call w2h "戀"; |
|
call w2h "流離"; |
|
call w2h "候"; |
|
call w2h "彷徨"; |
|
call w2h "さ迷"; |
|
call w2h "彷"; |
|
call w2h "攫"; |
|
call w2h "浚"; |
|
call w2h "掠"; |
|
call w2h "復習"; |
|
call w2h "渫"; |
|
call w2h "濬"; |
|
call w2h "慕"; |
|
call w2h "従"; |
|
call w2h "随"; |
|
call w2h "順"; |
|
call w2h "从"; |
|
call w2h "從"; |
|
call w2h "啝"; |
|
call w2h "撓"; |
|
call w2h "しま"; |
|
call w2h "終"; |
|
call w2h "了"; |
|
call w2h "蓄"; |
|
call w2h "貯"; |
|
call w2h "蔵"; |
|
call w2h "藏"; |
|
call w2h "吸"; |
|
call w2h "喫"; |
|
call w2h "救"; |
|
call w2h "掬"; |
|
call w2h "巣喰"; |
|
call w2h "済"; |
|
call w2h "抄"; |
|
call w2h "沿"; |
|
call w2h "添"; |
|
call w2h "副"; |
|
call w2h "似"; |
|
call w2h "損"; |
|
call w2h "害"; |
|
call w2h "備"; |
|
call w2h "具"; |
|
call w2h "揃"; |
|
call w2h "耐"; |
|
call w2h "携"; |
|
call w2h "攜"; |
|
call w2h "戦"; |
|
call w2h "闘"; |
|
call w2h "戰"; |
|
call w2h "鬪"; |
|
call w2h "斗"; |
|
call w2h "賜"; |
|
call w2h "給"; |
|
call w2h "躊躇"; |
|
call w2h "猶豫"; |
|
call w2h "揺蕩"; |
|
call w2h "誓"; |
|
call w2h "ちが"; |
|
call w2h "盟"; |
|
call w2h "違"; |
|
call w2h "使"; |
|
call w2h "つか"; |
|
call w2h "づか"; |
|
call w2h "とな"; |
|
call w2h "遣"; |
|
call w2h "仕"; |
|
call w2h "番"; |
|
call w2h "つかま"; |
|
call w2h "捕ま"; |
|
call w2h "掴ま"; |
|
call w2h "繕"; |
|
call w2h "償"; |
|
call w2h "つた"; |
|
call w2h "伝"; |
|
call w2h "傳"; |
|
call w2h "培"; |
|
call w2h "集"; |
|
call w2h "衒"; |
|
call w2h "問"; |
|
call w2h "訪"; |
|
call w2h "整"; |
|
call w2h "調"; |
|
call w2h "斉"; |
|
call w2h "伴"; |
|
call w2h "囚"; |
|
call w2h "捕"; |
|
call w2h "捉"; |
|
call w2h "綯"; |
|
call w2h "習"; |
|
call w2h "慣"; |
|
call w2h "倣"; |
|
call w2h "肄"; |
|
call w2h "匂"; |
|
call w2h "臭"; |
|
call w2h "賑"; |
|
call w2h "担"; |
|
call w2h "擔"; |
|
call w2h "縫"; |
|
call w2h "拭"; |
|
call w2h "願"; |
|
call w2h "希"; |
|
call w2h "労"; |
|
call w2h "犒"; |
|
call w2h "狙"; |
|
call w2h "宣"; |
|
call w2h "曰"; |
|
call w2h "呪"; |
|
call w2h "詛"; |
|
call w2h "咒"; |
|
call w2h "這"; |
|
call w2h "匍"; |
|
call w2h "払"; |
|
call w2h "拂"; |
|
call w2h "祓"; |
|
call w2h "掃"; |
|
call w2h "禳"; |
|
call w2h "控"; |
|
call w2h "拾"; |
|
call w2h "相応"; |
|
call w2h "相應"; |
|
call w2h "震"; |
|
call w2h "奮"; |
|
call w2h "振"; |
|
call w2h "揮"; |
|
call w2h "篩"; |
|
call w2h "諂"; |
|
call w2h "諛"; |
|
call w2h "舞"; |
|
call w2h "賄"; |
|
call w2h "紛"; |
|
call w2h "擬"; |
|
call w2h "纏"; |
|
call w2h "繚"; |
|
call w2h "惑"; |
|
call w2h "悗"; |
|
call w2h "迷"; |
|
call w2h "紕"; |
|
call w2h "むか"; |
|
call w2h "向"; |
|
call w2h "迎"; |
|
call w2h "対"; |
|
call w2h "對"; |
|
call w2h "舫"; |
|
call w2h "もら"; |
|
call w2h "貰"; |
|
call w2h "養"; |
|
call w2h "豢"; |
|
call w2h "雇"; |
|
call w2h "傭"; |
|
call w2h "結"; |
|
call w2h "酔"; |
|
call w2h "醉"; |
|
call w2h "装"; |
|
call w2h "粧"; |
|
call w2h "裝"; |
|
call w2h "煩"; |
|
call w2h "患"; |
|
call w2h "笑"; |
|
call w2h "嗤"; |
|
|
|
call i2w "用"; |
|
call i2w "率"; |
|
call i2w "ひき"; |
|
call e2w "す"; |
|
call e2w "据"; |
|
call e2w "餓"; |
|
call e2w "飢"; |
|
call e2w "植"; |
|
call e2wz; |
|
call o2w; |
|
call i2w2; |
|
call correct; |
|
endmacro; |
|
|
|
w2h: |
|
disabledraw; |
|
replaceallfast $$1+"わい", $$1+"はひ"; //味はひ |
|
replaceallfast $$1+"わう", $$1+"はふ", regular; //味はふ |
|
replaceallfast $$1+"わえ", $$1+"はへ", regular; //味はへ |
|
replaceallfast $$1+"わくば", $$1+"はくば", regular; //願はくば |
|
replaceallfast $$1+"わし", $$1+"はし", regular; //遣はし |
|
replaceallfast $$1+"わす", $$1+"はす", regular; //遣はす |
|
replaceallfast $$1+"わず", $$1+"はず", regular; //與はず |
|
replaceallfast $$1+"わせ", $$1+"はせ", regular; //震はせ |
|
replaceallfast $$1+"わって", $$1+"はって", regular; //賑はって |
|
replaceallfast $$1+"わな", $$1+"はな", regular; //敵はない |
|
replaceallfast $$1+"わぬ", $$1+"はぬ", regular; //叶はぬ |
|
replaceallfast $$1+"わら", $$1+"はら", regular; //關はら |
|
replaceallfast $$1+"わり", $$1+"はり", regular; //賜はり |
|
replaceallfast $$1+"わる", $$1+"はる", regular; //賜はる |
|
replaceallfast $$1+"われ", $$1+"はれ", regular; //現はれ |
|
replaceallfast $$1+"わろう", $$1+"はらう", regular; //交はらう |
|
replaceallfast $$1+"いが", $$1+"ひが", regular; //行ひが |
|
replaceallfast $$1+"いし", $$1+"ひし", regular; //戀ひし |
|
replaceallfast $$1+"いそう", $$1+"ひさう", regular; //買ひさう |
|
replaceallfast $$1+"いた", $$1+"ひた", regular; //食ひたい |
|
replaceallfast $$1+"ひな", $$1+"ひな", regular; //氣違ひなの |
|
replaceallfast $$1+"いに", $$1+"ひに", regular; //終ひに |
|
replaceallfast $$1+"いは", $$1+"ひは", regular; //違ひは |
|
replaceallfast $$1+"いま", $$1+"ひま", regular; //洗ひます |
|
replaceallfast $$1+"いを", $$1+"ひを", regular; //裝ひを |
|
replaceallfast $$1+"い候", $$1+"ひ候", regular; // |
|
replaceallfast $$1+"い致", $$1+"ひ致", regular; //お願ひ致します |
|
replaceallfast $$1+"うこと", $$1+"ふこと", regular; |
|
replaceallfast $$1+"うと", $$1+"ふと", regular; //行ふと |
|
replaceallfast $$1+"うな", $$1+"ふな", regular; //追ふな |
|
replaceallfast $$1+"う、", $$1+"ふ、", regular; //云ふ、 |
|
replaceallfast $$1+"う。", $$1+"ふ。", regular; // |
|
replaceallfast $$1+"え、", $$1+"へ、", regular; //給へ、 |
|
replaceallfast $$1+"え候", $$1+"へ候", regular; // |
|
replaceallfast $$1+"え直", $$1+"へ直", regular; // |
|
replaceallfast $$1+"えさ", $$1+"へさ", regular; // |
|
replaceallfast $$1+"えし", $$1+"へし", regular; // |
|
replaceallfast $$1+"えず", $$1+"へず", regular; // |
|
replaceallfast $$1+"えた", $$1+"へた", regular; // |
|
replaceallfast $$1+"えだ", $$1+"へだ", regular; // |
|
replaceallfast $$1+"えて", $$1+"へて", regular; // |
|
replaceallfast $$1+"えな", $$1+"へな", regular; // |
|
replaceallfast $$1+"えぬ", $$1+"へぬ", regular; // |
|
replaceallfast $$1+"えば", $$1+"へば", regular; // |
|
replaceallfast $$1+"えよ", $$1+"へよ", regular; //唱へよ |
|
replaceallfast $$1+"えら", $$1+"へら", regular; //支へら |
|
replaceallfast $$1+"える", $$1+"へる", regular; //支へる |
|
replaceallfast $$1+"おう", $$1+"はう", regular; // |
|
replaceallfast "が"+$$1+"わ", "が"+$$1+"は", regular; // |
|
replaceallfast "で"+$$1+"わ", "で"+$$1+"は", regular; // |
|
replaceallfast "と"+$$1+"わ", "と"+$$1+"は", regular; // |
|
replaceallfast "に"+$$1+"わ", "に"+$$1+"は", regular; // |
|
replaceallfast "の"+$$1+"わ", "の"+$$1+"は", regular; // |
|
replaceallfast "は"+$$1+"わ", "は"+$$1+"は", regular; // |
|
replaceallfast "へ"+$$1+"わ", "へ"+$$1+"は", regular; // |
|
replaceallfast "も"+$$1+"わ", "も"+$$1+"は", regular; // |
|
replaceallfast "を"+$$1+"わ", "を"+$$1+"は", regular; // |
|
replaceallfast "が"+$$1+"い", "が"+$$1+"ひ", regular; // |
|
replaceallfast "で"+$$1+"い", "で"+$$1+"ひ", regular; // |
|
replaceallfast "と"+$$1+"い", "と"+$$1+"ひ", regular; // |
|
replaceallfast "に"+$$1+"い", "に"+$$1+"ひ", regular; // |
|
replaceallfast "の"+$$1+"い", "の"+$$1+"ひ", regular; // |
|
replaceallfast "は"+$$1+"い", "は"+$$1+"ひ", regular; // |
|
replaceallfast "へ"+$$1+"い", "へ"+$$1+"ひ", regular; // |
|
replaceallfast "も"+$$1+"い", "も"+$$1+"ひ", regular; // |
|
replaceallfast "を"+$$1+"い", "を"+$$1+"ひ", regular; // |
|
replaceallfast "が"+$$1+"う", "が"+$$1+"ふ", regular; // |
|
replaceallfast "で"+$$1+"う", "で"+$$1+"ふ", regular; // |
|
replaceallfast "と"+$$1+"う", "と"+$$1+"ふ", regular; // |
|
replaceallfast "に"+$$1+"う", "に"+$$1+"ふ", regular; // |
|
replaceallfast "の"+$$1+"う", "の"+$$1+"ふ", regular; // |
|
replaceallfast "は"+$$1+"う", "は"+$$1+"ふ", regular; // |
|
replaceallfast "へ"+$$1+"ふ", "は"+$$1+"ふ", regular; // |
|
replaceallfast "も"+$$1+"う", "も"+$$1+"ふ", regular; // |
|
replaceallfast "を"+$$1+"う", "を"+$$1+"ふ", regular; // |
|
replaceallfast "が"+$$1+"え", "が"+$$1+"へ", regular; // |
|
replaceallfast "で"+$$1+"え", "で"+$$1+"へ", regular; // |
|
replaceallfast "と"+$$1+"え", "と"+$$1+"へ", regular; // |
|
replaceallfast "に"+$$1+"え", "に"+$$1+"へ", regular; // |
|
replaceallfast "の"+$$1+"え", "の"+$$1+"へ", regular; // |
|
replaceallfast "は"+$$1+"え", "は"+$$1+"へ", regular; // |
|
replaceallfast "へ"+$$1+"へ", "へ"+$$1+"へ", regular; // |
|
replaceallfast "も"+$$1+"え", "も"+$$1+"へ", regular; // |
|
replaceallfast "を"+$$1+"え", "を"+$$1+"へ", regular; // |
|
return; |
|
|
|
i2w: |
|
replaceallfast $$1+"い", $$1+"ゐ"; |
|
return; |
|
|
|
e2w: |
|
replaceallfast $$1+"え", $$1+"ゑ"; |
|
return; |
|
|
|
h2y: |
|
replaceallfast $$1+"ひた", $$1+"いた"; |
|
replaceallfast $$1+"ひて", $$1+"いて"; |
|
replaceallfast $$1+"ひる", $$1+"いる"; |
|
replaceallfast $$1+"へた", $$1+"えた"; |
|
replaceallfast $$1+"へて", $$1+"えて"; |
|
replaceallfast $$1+"へる", $$1+"える"; |
|
return; |
|
|
|
e2wz: |
|
replaceallfast "座ら", "坐ら"; |
|
replaceallfast "座り", "坐り"; |
|
replaceallfast "座る", "坐る"; |
|
replaceallfast "座れ", "坐れ"; |
|
replaceallfast "座ろ", "坐ら"; |
|
replaceallfast "座った", "坐った"; |
|
replaceallfast "座って", "坐って"; |
|
return; |
|
|
|
o2w: |
|
replaceallfast "おらず", "をらず"; |
|
replaceallfast "おらぬ", "をらぬ"; |
|
replaceallfast "おられ", "をられ"; |
|
replaceallfast "おりまし", "をりまし"; |
|
replaceallfast "おります", "をります"; |
|
replaceallfast "ており", "てをり"; |
|
replaceallfast "ておる", "てをる"; |
|
replaceallfast "におり", "にをり"; |
|
replaceallfast "におる", "にをる"; |
|
return; |
|
|
|
i2w2: |
|
//*必ず*全ての活用語を變換した後に實行すること |
|
replaceallfast "いない", "ゐない"; |
|
replaceallfast "いまし", "ゐまし"; |
|
replaceallfast "います", "ゐます"; |
|
replaceallfast "いませ", "ゐませ"; |
|
//replaceallfast "いたの", "ゐたの"; |
|
replaceallfast "いなかっ", "ゐなかっ"; |
|
replaceallfast "いられ", "ゐられ"; |
|
replaceallfast "いる。", "ゐる。"; |
|
replaceallfast "いるのか", "ゐるのか"; |
|
replaceallfast "いません", "ゐません"; |
|
replaceallfast "していた", "してゐた"; |
|
replaceallfast "していて", "してゐて"; |
|
replaceallfast "ていれば", "てゐれば"; |
|
replaceallfast "がいた", "がゐた"; |
|
replaceallfast "がいて", "がゐて"; |
|
replaceallfast "がいる", "がゐる"; |
|
replaceallfast "ていた", "てゐた"; |
|
replaceallfast "ていて", "てゐて"; |
|
replaceallfast "ている", "てゐる"; |
|
replaceallfast "でいた", "でゐた"; |
|
replaceallfast "でいて", "でゐて"; |
|
replaceallfast "でいる", "でゐる"; |
|
replaceallfast "にいた", "にゐた"; |
|
replaceallfast "にいて", "にゐて"; |
|
replaceallfast "にいる", "にゐる"; |
|
replaceallfast "のいた", "のゐた"; |
|
replaceallfast "のいて", "のゐて"; |
|
replaceallfast "のいる", "のゐる"; |
|
|
|
return; |
|
|
|
other: |
|
replaceallfast "ああいう", "ああいふ"; |
|
replaceallfast "あおいだ", "あふいだ"; |
|
replaceallfast "あおいで", "あふいで"; |
|
replaceallfast "あおぎ", "あふぎ"; |
|
replaceallfast "あおぐ", "あふぐ"; |
|
replaceallfast "あおげ", "あふげ"; |
|
replaceallfast "いう。", "いふ。"; |
|
replaceallfast "いう、", "いふ、"; |
|
replaceallfast "いえば", "いへば"; |
|
replaceallfast "いうか", "いふか"; |
|
replaceallfast "いうだ", "いふだ"; |
|
replaceallfast "がいう", "がいふ"; |
|
replaceallfast "という", "といふ"; |
|
replaceallfast "にいふ", "にいふ"; |
|
replaceallfast "いわな", "いはな"; |
|
replaceallfast "いわれ", "いはれ"; |
|
replaceallfast "いわゆる", "いはゆる"; |
|
replaceallfast "おこう", "おかう"; |
|
replaceallfast "かえさ", "かへさ"; |
|
replaceallfast "かえし", "かへし"; |
|
replaceallfast "かえす", "かへす"; |
|
replaceallfast "かえた", "かへた"; |
|
replaceallfast "かえて", "かへて"; |
|
replaceallfast "かえり", "かへり"; |
|
replaceallfast "かえる", "かへる"; |
|
replaceallfast "かえった", "かへった"; |
|
replaceallfast "かえって", "かへって"; |
|
replaceallfast "かわり", "かはり"; |
|
replaceallfast "かわる", "かはる"; |
|
replaceallfast "かわれ", "かはれ"; |
|
replaceallfast "かわった", "かはった"; |
|
replaceallfast "かわって", "かはって"; |
|
replaceallfast "けずった", "けづった"; |
|
replaceallfast "けずって", "けづって"; |
|
replaceallfast "けずら", "けづら"; |
|
replaceallfast "けずり", "けづり"; |
|
replaceallfast "けずる", "けづる"; |
|
replaceallfast "けずれ", "けづれ"; |
|
replaceallfast "けずろ", "けづら"; |
|
replaceallfast "でしょう", "でせう"; |
|
replaceallfast "てしまい", "てしまひ"; |
|
replaceallfast "てしまう", "てしまふ"; |
|
replaceallfast "てしまえ", "てしまへ"; |
|
replaceallfast "という", "といふ"; |
|
replaceallfast "どういう", "どういふ"; |
|
replaceallfast "とおら", "とほら"; |
|
replaceallfast "とおり", "とほり"; |
|
replaceallfast "とおる", "とほる"; |
|
replaceallfast "とおれ", "とほれ"; |
|
replaceallfast "くらい", "くらゐ"; |
|
replaceallfast "ましょう", "ませう"; |
|
replaceallfast "まわし", "まはし"; |
|
replaceallfast "まわす", "まはす"; |
|
replaceallfast "まわせ", "まはせ"; |
|
replaceallfast "久しゅう", "久しう"; |
|
replaceallfast "かえって", "かへって"; |
|
replaceallfast "かろう", "からう"; |
|
replaceallfast "だろう", "だらう"; |
|
replaceallfast "のじゃ", "のぢゃ"; |
|
replaceallfast "じゃろう", "ぢゃらう"; |
|
replaceallfast "ようだ", "やうだ"; |
|
replaceallfast "ようで", "やうで"; |
|
replaceallfast "ような", "やうな"; |
|
replaceallfast "ように", "やうに"; |
|
replaceallfast "やろう", "やらう"; |
|
replaceallfast "ひきかえ", "ひきかへ"; |
|
replaceallfast "れたまえ", "れたまへ"; |
|
replaceallfast "なおし", "なほし"; |
|
replaceallfast "なおす", "なほす"; |
|
replaceallfast "なおせ", "なほせ"; |
|
|
|
return; |
|
|
|
correct: |
|
replaceallfast "向ひて", "向いて"; |
|
replaceallfast "ござゐま", "ございま"; |
|
replaceallfast "あいづち", "あひづち"; |
|
replaceallfast "あわせ", "あはせ"; |
|
replaceallfast "おゐた", "おいた"; |
|
replaceallfast "つゐた", "ついた"; |
|
replaceallfast "ちがゐ", "ちがひ"; |
|
replaceallfast "てゐただこう", "ていただかう"; |
|
replaceallfast "てゐただ", "ていただ"; |
|
replaceallfast "あろう", "あらう"; |
|
replaceallfast "吸いこ", "吸ひこ"; |
|
replaceallfast "そうし", "さうし"; |
|
replaceallfast "そうす", "さうす"; |
|
replaceallfast "そうだ", "さうだ"; |
|
replaceallfast "そうで", "さうで"; |
|
replaceallfast "たまえ。", "たまへ。"; |
|
replaceallfast "ちがゐ", "ちがひ"; |
|
|
|
|
|
return; |
