Eat to live, and not live to eat. -Benjamin Franklin
〓いろんなものの置き場です。〓
純志のページ 更新日   

見出し語の配列順について考える進捗作成 並び copy copy2 copy3


並べ替え 2023年10月現在
語順
並び・進捗

配列 2023年10月

単語配列

上の配列を順番に並べると下表 [見出し配列]になる

配列順見出し配列配列変換統合要検討
001
002
003
004
005
006
008
010キャギャキャギャ
012キュギュキュギュ
014キョギョキョギョ
016
020クィグィクィグィ
022クェグェクェグェ
018クヮグヮクヮグヮ
024
026
028
030
036シェジェシェジェ
032シャジャシャジャ
034シュジュシュジュ
038ショジョショジョ
040
042
044
046
048
052チェヂェチェヂェ
050チャヂャチャヂャ
051チュヂュチュヂュ
053チョヂョチョヂョ
054
057
061ティディティディ
059テャデャテャデャ
063デュデュ
064デョデョ
065
067トゥドゥトウ ドウトウドウ*ゥをウに(ゥンナジだけ例外)
069
070
071ニャニャ
072ニュニュ
073ニョニョ
074
075
076
077
080
083ヒャビャピャヒャビャピャ
086ヒュビュピュヒュビュピュ
089ヒョビョピョヒョビョピョ
092
095ファファ
096フィフィ
097フェフェ
098フォフォ
099
102
105
106
107ミャミャ
108ミュミュ
109ミョミョ
110
111
112
113
114イャヤ亜イャヤ亜イャ
115ヤ井ヰヤ井ヰ
116
117イュユ亜イュユ亜イュ
118ユ井ヱユ井ヱ
119イェユ丶イェユ丶イェ
120
121イョヨ亜イョヨ亜イョ
122
123
124
125
126
127
128ウヮワ亜ウヮワ亜ウヮ
129ヲィワ亜ヲィワ亜ヲィ
130ウィワ井ウィワ井ウィ
131ヲゥワ井ヲウワ井ヲウヲゥをヲウに
132ヲェワ井ヲェワ井ヲェ
133ウェワ丶ウェワ丶ウェ
134
135
136ゥン丶ゥン丶ゥン

赤線部分をこの位置にするために右の [配列変換] が必要になる 他はそのままで五十音順に並ぶため空白
[見出し配列] と [配列変換] を統合したのが [統合] この項目で「並べ替え:辞書順」を実行すればよい。

項目計算式(3項目分を挙げておく)
[copy] データ型:整数
#cond([しまくとぅば]="",99)
[copy2] データ型:文字列
#文字置換([しまくとぅば], "~" , "亜" )
[copy3](=[統合]) トゥ、ドゥからトウ、ドウへの変換は後のウヮ、ウィ、ウェの影響を受けないように
具体的には順番を後にする
#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S(#S([しまくとぅば],"~",""),"イャ","ヤ亜イャ"),"ヰ","ヤ井ヰ"),"イュ","ユ亜イュ"),"ヱ","ユ井ヱ"),"イェ","ユ丶イェ"),"イョ","ヨ亜イョ"),"ウヮ","ワ亜ウヮ"),"ヲィ","ワ亜ヲィ"),"ウィ","ワ井ウィ"),"ヲゥ","ワ井ヲウ"),"ヲェ","ワ井ヲェ"),"ウェ","ワ丶ウェ"),"トゥ","トウ"),"ドゥ","ドウ"),"ウンナジ","ゥンナジ"),"ゥン","丶ゥン")
※桐の#文字置換の説明に次の記述がある
「該当する文字列が複数ある場合は、該当する部分がすべて置き換わります。
 一致する文字列がないときは、str1 のままになります。」
※並べ替えは 1. [copy]:昇順 2. [copy3]:辞書順 3. [copy2]:辞書順 の順

上の問題点 解決済み

[要検討]の項目に記述したが、ゥ(小さいウ)が前の語に付き、ゥ(小さいウ)の後がンになるとき
例:ミートゥンダ トゥンナジャー チクドゥン ヲゥンチュミー など
トゥ、ドゥ、ヲゥのゥ(小)をウ(大)に変換する → 最後の"ゥン","丶ゥン"の変換対象から外す
ゥンナジだけは例外にする

進捗状況は一括処理で

  1. 桐から一括処理「進捗2」を実行
  2. 「03HP掲載中14500語.TBX」をドキュメントにコピーして開き、下の一括処理を実行

     進捗2.CMX桐 一括処理
    
    変数宣言 文字列{ &goi[136] = { "114==イャ","115==ヰ","116==ユ","117==イュ","118==ヱ","119==イェ","120==ヨ","121==イョ","122==ラ","123==リ","124==ル","125==レ","126==ロ","127==ワ","128==ウヮ","129==ヲィ","130==ウィ","131==ヲゥ","132==ヲェ","133==ウェ","134==ヲ","135==ン","136==ゥン","010==キャ","011==ギャ","012==キュ","013==ギュ","014==キョ","015==ギョ","018==クヮ","019==グヮ","020==クィ","021==グィ","022==クェ","023==グェ","032==シャ","033==ジャ","034==シュ","035==ジュ","036==シェ","037==ジェ","038==ショ","039==ジョ","050==チャ","051==チュ","052==チェ","053==チョ","059==テャ","060==デャ","061==ティ","062==ディ","063==デュ","064==デョ","067==トゥ","068==ドゥ","071==ニャ","072==ニュ","073==ニョ","083==ヒャ","084==ビャ","085==ピャ","086==ヒュ","087==ビュ","088==ピュ","089==ヒョ","090==ビョ","091==ピョ","095==ファ","096==フィ","097==フェ","098==フォ","107==ミャ","108==ミュ","109==ミョ","001==ア","002==イ","003==ウ","004==エ","005==オ","006==カ","007==ガ","008==キ","009==ギ","016==ク","017==グ","024==ケ","025==ゲ","026==コ","027==ゴ","028==サ","029==ザ","030==シ","031==ジ","040==ス","041==ズ","042==セ","043==ゼ","044==ソ","045==ゾ","046==タ","047==ダ","048==チ","049==ヂ","054==ツ","055==ヅ","056==ッ","057==テ","058==デ","065==ト","066==ド","069==ナ","070==ニ","074==ヌ","075==ネ","076==ノ","077==ハ","078==バ","079==パ","080==ヒ","081==ビ","082==ピ","092==フ","093==ブ","094==プ","099==ヘ","100==ベ","101==ペ","102==ホ","103==ボ","104==ポ","105==マ","106==ミ","110==ム","111==メ","112==モ","113==ヤ","114==""" } }
    変数宣言 整数{ &i }
    
    印字開始 "進捗2.txt",SJIS出力 = する, 制御文字展開 = する
    繰り返し &i = 1, 136
    &STR = #対応文字列2( &goi[&i] , "==", 2 )
    絞り込み [copy]_&STR,部分一致検索 = 先頭一致
    印字 #対応文字列2( &goi[&i] , "==", 1 ),",",#対応文字列2( &goi[&i] , "==", 2 ),",",&選択件数
    絞り込み 補集合
    繰り返し終了
    印字 "137",",","空白",",",&選択件数
    印字終了
    
    

「進捗2.txt」が出力される 桐「進捗Temp.TBX」に読み込んで[A]-昇順で並べ替える
CSVで書き出して、CSVファイルをExcelにして保存


PageTop▲

Copyright © 2010 "Junshi Toyoda, Okinawa Japan"