; 68 ^OQ "qkanji" ;====異体字変換マクロ==== ;異体字といっても、かなり多めに取っている。同訓異義も少々有り。 ;太郎冠者氏(WJA11569@PCVAN)のITAIJI.DIC(PCVAN ORIENT-SIGのライブラリ-OSL-16)を元に ;高木元氏(SXH74325@PCVAN)のQKAN.SED(PCVAN ORIENT-SIG-FOLUM3-COSMOS#1096 etc.)や ;中原尚道氏「JIS漢字異体字表」月刊言語1991-3を参照し、他に独断で追加。 ;BY岡島昭浩NLF06372@PCVAN (ks&1) ? {#s} ; by hangyo t="亜悪芦鯵圧庵囲為医育一壱稲飲淫隠韻卯欝叡営映曳栄穎衛詠駅円煙艶塩奥往応欧殴鴬沖穏仮価嘩峨会解回壊怪懐絵蟹崖碍蛎鈎拡撹殻覚岳楽竃釜栢粥刈刊勧巻歓潅観諌鑑関陥館巌岩顔喜器棄亀偽戯犠砧却糾旧拠京峡挟況狭尭暁区勲群圭憩携経継茎蛍軽頚鶏芸決倹券圏検権献県険顕験厳虎鼓効広恒晃耕劫号轟嵯済砕斎剤坂作桜冊皐参惨桟蚕讃賛残糸紙歯事爾辞宍湿質実篠舎釈呪寿収讐獣縦粛処薯嘗将廠松焼称証乗剰場壌条浄穣譲醸嘱触唇寝慎晋真刃尽酢図厨垂粋翠酔随数枢澄世畝凄棲声静斉摂窃専戦浅線船賎践銭善禅曾鼠双壮捜挿争窓聡装走騒臓蔵属続卒村多堕柁楕対帯滞滝択沢鐸達竪狸単担胆団弾断恥痴稚遅昼虫鋳瀦猪町聴腸勅珍鎮壷逓纏転点伝砺党梼盗涛灯当豆逃闘働徳独読栃届縄二迩韮妊禰粘悩脳覇廃拝杯梅売蝿麦函発髪罰抜蛮秘桧氷浜富払仏幣並閉箆変穂峰萌褒豊冒貌夲翻槙桝侭万満脈夢無麺黙餅弥薬訳癒湧予余与誉揺様熔窯耀謡踊遥乱覧裏略溜留竜両涼猟瞭糧隣瑠塁涙累励礼隷霊恋炉労朗楼篭禄亙湾仞佇俎倅僭冤冦冪冽匳卮厠厦厮啖喀噪嚔囓坡埒墻壜奘佞嫺崙嵌廸彝彎彿惧悴慙懺戛扞扠拏揀擡旛昜曖曠杠梹椁棕樒檐檗櫑櫟殲浣涸炯熏爍牋犂犲狢猊獏琅瑙瑶瓔甎疇疣痲皰皸盪眥睹稟筐筍箘箏籐籥纃羹膣膾臘艫芻苺萼蒂薀虱螳蟇蠎蠹衄衽襌訛謚譖貔贓跖蹤躙輒輛轢逅遒鑪鑽閙闊齏飄鰲鳧鴟鵝鶇鷆麩粕著陰付蹈仙花官遊集寉知模隘圦沙坐灑修鈔咲蚩炎泄園碗枦錬繍弦鍼宴枉比考抉迴掛嚊翫蝎椛希凛輓梺雰畠籏鯰苹甕荅戒郭奸杆懽偐飢暉丘巨凶脅蛩強襁竸忻襟傑糀矢鏥妝床遶選麁皀怱勦它鮹乢嘆暖註弔塚彫槻霑淀搗棹峠豼彬屏編桙傍舛楙軅梁逾癢慾蜊釐稜泪楝$ 劍劔劒剱釼剣砿礦鑛鉱嵜埼碕崎疊疉疂畳躰體軆体銕鐵鐡鉄菟兔莵兎辨辧瓣辯弁", u="亞惡蘆鰺壓菴圍爲醫毓弌壹稻飮婬隱韵夘鬱睿營暎曵榮頴衞咏驛圓烟艷鹽奧徃應歐毆鶯冲穩假價譁峩會觧囘壞恠懷繪蠏崕礙蠣鉤擴攪殼覺嶽樂竈釡柏鬻苅刋勸卷歡灌觀諫鑒關陷舘巖嵒顏憙噐弃龜僞戲犧碪卻糺舊據亰峽挾况狹堯曉區勳羣珪憇攜經繼莖螢輕頸鷄藝决儉劵圈檢權獻縣險顯驗嚴乕皷效廣恆晄畊刧號軣嵳濟碎齋劑阪做櫻册皋參慘棧蠶讚贊殘絲帋齒亊尓辭肉濕貭實筱舍釋咒壽收讎獸縱肅處藷甞將厰枩燒稱證乘剩塲壤條淨穰讓釀囑觸脣寢愼晉眞刄盡醋圖廚埀粹翆醉隨數樞澂丗畆淒栖聲靜齊攝竊專戰淺綫舩賤踐錢譱禪曽鼡雙壯搜插爭窗聰裝赱騷臟藏屬續卆邨夛墮舵橢對帶滯瀧擇澤鈬逹豎貍單擔膽團彈斷耻癡穉遲晝蟲鑄潴豬甼聽膓敕珎鎭壺遞纒轉點傳礪黨檮盜濤燈當荳迯鬪仂悳獨讀杤屆繩弍邇韭姙祢黏惱腦霸廢拜盃楳賣蠅麥凾發髮罸拔蠻祕檜冰濱冨拂佛幤竝閇篦變穗峯萠襃豐冐皃本飜槇枡儘萬滿脉梦无麪默餠彌藥譯瘉涌豫餘與譽搖樣鎔窰燿謠踴遙亂覽裡畧澑畄龍兩凉獵暸粮鄰璢壘泪縲勵禮隸靈戀爐勞朖樓籠祿亘灣仭竚爼伜僣寃寇羃洌奩巵廁廈廝啗咯譟嚏齧陂埓牆罎弉侫嫻崘篏迪彜弯髴懼忰慚懴戞捍扨拿柬抬旙暘瞹昿槓檳槨椶櫁簷蘗罍檪殱澣凅烱燻鑠箋犁豺貉貎貘瑯碯瑤珱磚畴肬痳靤皹蘯眦覩禀筺笋箟筝籘龠緕羮腟鱠臈舮蒭莓蕚蔕蘊蝨蟷蟆蟒蠧衂袵褝譌諡譛豼賍蹠踪躪輙輌轣遘逎鈩鑚鬧濶韲飃鼇鳬鵄鵞鶫鷏麸糟着蔭附踏僊華宦游輯鶴智摸阨杁砂座洒脩抄笑嗤焔洩薗椀櫨煉綉絃針讌抂譬攷刔廻挂嬶玩蠍樺稀凜挽麓氛畑旗鮎萍答瓮誡廓姦桿驩贋饑輝邱鉅兇脇蛬彊繦競欣衿杰麹笶銹粧牀繞撰粗梍匆剿他蛸嵶歎煖注吊冢雕欟沾澱擣櫂垰貔斌塀篇鉾旁升茂軈梁踰痒欲鯏厘楞涙棟$ 劔劒剱釼剣劍礦鑛鉱砿埼碕崎嵜疉疂畳疊體軆体躰鐵鐡鉄銕兔莵兎菟辧瓣辯弁辨", a="穐厩岡界蓋学雁帰気挙駆径渓稿国雑蕊写従渋叙奨靭髄跡潜繊遡庁島弐淵辺舗宝蓑婿薮来羈歌聨冴迺野惠缺個恊兒嬢凖顋趾畫熈笵鰛罐箝朞畸棋剳尅塞戝鰍杉籖疏蘓餝荘帚槍總樽臺憫嫐沒緜云又齡", b="秋廐堽畍盖學鴈歸氣擧驅徑溪稾國雜蘂冩從澁敍奬靫膸迹潛纖溯廳嶋貳渕邊舖寶簑壻籔來覊謌連冱乃墅慧闕个叶儿娘准鰓址劃熙範鰯鑵嵌稘竒碁札克寨財鰌榲簽疎甦飭庄菷鑓惣尊颱閔娚歿棉曰叉令", c="龝廏崗堺葢斈鳫皈气舉駈逕谿藁圀襍蕋寫从澀敘獎靱髓蹟濳纎泝廰嶌貮渊邉鋪寳簔聟藪徠羇哥聯沍廼埜恵欠箇協児孃準腮阯画煕范鰮缶篏期奇棊箚剋砦賊鮖椙籤踈蘇飾莊箒鎗総墫台愍嬲没綿言亦齢", mi[, mi+, &s :A &f(cd,t) m=r, (m==-1)? >B p=u+m*2, >F :B &f(cd,u) m=r, (m==-1)? >C p=t+m*2, >F :C &f(cd,a) m=r, (m==-1)? >D p=b+m*2, >F :D &f(cd,b) m=r, (m==-1)? >E p=c+m*2, >F :E &f(cd,c) m=r, (m==-1)? >Y p=a+m*2, :F ; &o((p..0)!!) ; こちらでは、ダメ &?("%2s",p) ; こう直す。1994-08-13 (Sat) >Z :Y #08#08 :Z mi],#? #07 (ks&1) ? {#d} .