文章の整形につきましてNo.07286
ノノムン さん 13/12/24 12:42
 
こんにちは ノノムンと申します

音階のデータを整理していまして、
はじめは手で出来ると思い始めたんですが結構複雑で、
出来れば ひでまるマクロで整理したいと思いました。
始めてみますと、結構ややこしく、うまく作ることが出来ませんでした。

文章は WEB原文 から取り出します、
http://ja.wikipedia.org/wiki/%E9%9F%B3%E9%9A%8E


音階名(スケール名)  音階の例  音度記号(スケールディグリー)  スペル、
備考など

アイオニアン・スケール (Ionian)
(メジャースケール、長音階)  C D E F G A B  1 2 3 4 5 6 7  メジャー・
キーの第1音から派生したスケール
Maj7上などで使用可能
ドリアン・スケール (Dorian)  C D Eb F G A Bb  1 2 b3 4 5 6 b7  メ
ジャー・キーの第2音から派生したスケール
mi7上などで使用可能

等となっています。
このうち必要なのはオープンオフィスで処理をするための内容を、次に2行だけ
表示します、

アイオニアン・スケール (Ionian)(分離記号)C D E F G A B(分離記号)1 2
3 4 5 6 7(改行)
ドリアン・スケール (Dorian)(分離記号)C D Eb F G A Bb(分離記号)1 2 b3
4 5 6 b7(改行)

等のように3つに分けて、列記します。
(此を自動的にしたいと思っています)

それらを更に 目的に応じて 分類し(手でやります)
特に民族音楽系の音階を演奏しやすいような、表にする予定です。

メジャー・スケール(チャーチ・モード)
ナチュラル・マイナー・スケール(自然短音階)
ハーモニック・マイナー・スケール(和声短音階)
メロディック・マイナー・スケール(旋律短音階)
ホールトーン・スケール
ディミニッシュト・スケール
クロマティック・スケール
ペンタトニック・スケール(五音音階)
ブルース・スケール
ハンガリーの音階
ジプシーの音階
スペインの音階
アラブの音階
インドの音階

それではよろしくお願いします。
かしこ

(2013/12/13 17:10), 秀丸担当 wrote:

[ ]
RE:07286 文章の整形につきましてNo.07287
山紫水明 さん 13/12/24 20:48
 
 ノノムンさん,

 データの規則性がはっきりわかっているわけではありませんが,とりあえず次
のマクロを実行して,結果を見てください。

//----------------------------------------------------//
replaceallfast "^[  ]*\\n", "", regular;//空白行の削除
replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
         //ひらがなや全角括弧を含む行を削除
replaceallfast "(スケール.*)\\n", "\\1(分離記号)", regular;
replaceallfast "\\n1", "(分離記号)1", regular;
endmacro;
//----------------------------------------------------//

                          山紫水明
                          SANSHISUIMEI

[ ]
RE:07287 文章の整形につきましてNo.07288
ノノムン さん 13/12/24 23:17
 
山紫水明さん こんばんは ノノムンです

ありがとうございます、此で整理が出来るのが判りました、実際にはもっと簡略
した方が読みやすいのも判りました。

マクロは映像ファイル *.mac と同じ拡張子なので、最初登録にとまどいまし
た。(映像マックが開いてしまいました)
まずテキストで書き込んで、拡張子を.macに変更して ひでまるテキスト表示か
ら、マクロ登録をし、呼び出しで suke-ru.macを指定しますと、マクロ操作が
できました。マクロファイルのアイコンは映像ファイルで表示されますが、ひで
まるで開くと、マクロ文となっています。

オープンオフィスの場合 形式を選択して貼り付け 形式指定していないテキス
トを指定します。
コードは unicode
(分離記号)には タブ コンマ セミコロン スペース 等を切り替えて選び
ます。

今回は 「タブ コンマ スペース ・」を分離記号に選んで 変換した結果は
 次のようになりました。

アイオニアン・スケール (Ionian)(分離記号)エオリアン・スケール
(Aeolian)(分離記号)エオリアン・スケール(分離記号)アイオニアン・ス
ケール(分離記号)音階名
ハーモニック・マイナー・スケール(分離記号)ハーモニック・マイナー・パー
フェクト5th・ビロウ・スケール(分離記号)メロディック・マイナー・スケー
ル(分離記号)ドリアン♭2・スケール(分離記号)リディアン♯5・スケール(分
離記号)リディアンオーギュメントスケール(分離記号)リディアン♭7・スケー
ル(分離記号)ミクソリディアン♭6・スケール(分離記号)ドゥア・モル・ス
ケール(分離記号)エオリアン♭5・スケール(分離記号)オルタード・ドリア
ン・スケール(分離記号)ロクリアン♭4・スケール(分離記号)スーパー・ロク
リアン・スケール(分離記号)※ オルタード・スケール  C Db Eb Fb Gb Ab
Bb(分離記号)※ C Db D# E F# G# Bb  1 b2 b3 b4 b5 b6 b7
シンメトリカル・スケール(分離記号)(英)Symmetrical Scale
ホールトーン・スケール(分離記号)ホールトーン・スケール(分離記号)ディ
ミニッシュト・スケール(分離記号)コンビネーション・オブ・ディミニッシュ
ト・スケール(分離記号)クロマティック・スケール(分離記号)ペンタトニッ
ク・スケール(分離記号)ブルース・スケール(分離記号)ブルース・スケール
(分離記号)マカーム・ラースト  C D Eq F G A Bq  1 2 q3 4 5 6 7  
マカーム・ナワサル  C D Eb F# G Ab B  1 2 b3 #4 5 b6 7  
マカーム・バヤーティー  C Dq Eb F G Ab Bb  1 q2 b3 4 5 b6 b7  
マカーム・サバー  C Dq Eb Fb G Ab Bb  1 q2 b3 b4 5 b6 b7  
マカーム・スィカ  Eq, F, G, A, Bq, C, D, Eq  
マカーム・フザム  Eq, F, G, Ab, B, C, D, Eq  
マールワー・タート  C Db E F# G A B  1 b2 3 #4 5 6 7  
プールヴィー・タート  C Db E F# G Ab B  1 b2 3 #4 5 b6 7  
トーディー・タート  C Db Eb F# G Ab B  1 b2 b3 #4 5 b6 7

余り字が多いと読みにくく、実際には
2項目だけ表示しますと
スケール名 英スケール
  
アイオニアン  C D E F G A B   
ドリアン  C D Eb F G A Bb  
フリジアン  C Db Eb F G Ab Bb 

ですがアラブスケールだけ ・ の後の分類も要るのが判りました。
此には オープンオフィスには セルという升目があり 余り長いと 隣とぶつ
かるので ・ で分離して 2つに分けると収まるのが判り、次のようになります。

アイオニアン スケール
マカーム スィカ

ほかには よく検討してみますと スケール名 英スケール 日本スケール
の3種類だけを取り出すのが一番処理しやすいと思いました。
文献類には英スケールを使いますが、
普通書くときは 日本スケールが多いのです。

日本スケールは ドレミファソラシ
英スケールは  CDEF GAB
の関係です。

ですから実際に一番便利な表記は 次だと判りました。
アイオニアン スケール  C D E F G A B   ドレミファソラシ
ドリアン スケール  C D Eb F G A Bb  ドレミbファソラシb
フリジアン スケール  C Db Eb F G Ab Bb ドレbミbファソラbシb
中略
トーディー タート   C Db Eb F# G Ab B ドレbミbファ#ソラbシ

日本スケールの シb 等は2文字で1音を示します、
(半角カタカナは問題がありそうでさけています)
シb は シより半音低く ラより半音高いので ラ# と書くこともあります。
しかし此はどちらでもかまいません。
EF BC 間には半音が存在しません。
アラブの q はよくわからないのでそのまま使います、
クロマティックスケールは(半音を含む)12音全部を使うのですが特に意識せ
ずに使っています。

それではよろしくお願いします。
かしこ

この様な付け足しなども出来ますでしょうか?

(2013/12/24 20:48), 山紫水明 wrote:
>  ノノムンさん,
>
>  データの規則性がはっきりわかっているわけではありませんが,とりあえず次
> のマクロを実行して,結果を見てください。
>
> //----------------------------------------------------//
> replaceallfast "^[  ]*\\n", "", regular;//空白行の削除
> replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
>           //ひらがなや全角括弧を含む行を削除
> replaceallfast "(スケール.*)\\n", "\\1(分離記号)", regular;
> replaceallfast "\\n1", "(分離記号)1", regular;
> endmacro;
> //----------------------------------------------------//
>
>                            山紫水明
>                            SANSHISUIMEI
>
>

[ ]
RE:07288 文章の整形につきましてNo.07289
ノノムン さん 13/12/24 23:40
 
山紫水明さん ノノムンです

うちの地方の民族音楽を伝える人が少なくなってきて、
太鼓や三味線、尺八など有るのですが、私には笛しか判りません。
笛は龍笛能管篠笛と篳篥があり、雅楽や宗教的なのはさけまして、
篠笛(フルートピッコロに似ています) 大篳篥(クラリネットに似ています)
 を調べていきますと トルコやエジプト当たりからシルクロードを通り渡来し
たようで、民間楽譜は一本等で音程を表し、それ以外に雅楽、中国、高麗 等の
音名があります、これらは難しいので ドレミにして残していこうとしています。
かしこ


(2013/12/24 23:17), ノノムン wrote:

[ ]
RE:07288 文章の整形につきましてNo.07290
秀まるお2 さん 13/12/25 16:36
 
> マクロファイルのアイコンは映像ファイルで表示されますが、ひで
> まるで開くと、マクロ文となっています。

 「.mac」の拡張子を秀丸エディタに関連づけしてしまえばアイコンも秀丸にな
ると思います。

 やり方は…

 秀丸エディタを起動して、「その他 - 動作環境...」を実行し、そこの「関連
付け」ページを選択し、「拡張子の関連付け」を押して、「標準の設定」を押し
てから「完了」を押せばいいかと思います。

 または、エクスプローラなどから.macファイルの上でマウス右ボタンを押して
「プロパティ」を実行し、そこの

 プログラム   xxxxx             [変更C)...]

 のようになってる部分の「変更」ボタンを押して、そこからさらに「参照」
ボタンを押して、秀丸エディタのプログラムファイル

 C:\Program files\Hidemaru\hidemaru.exe

 を指定してやる作戦もあります。

[ ]
RE:07288 文章の整形につきましてNo.07294
山紫水明 さん 13/12/25 20:57
 
 ノノムンさん,

 よく理解できないところがありますが,

音階については元のデータに 1 2 3 4 5 6 7 があるので,これをドレミファソ
ラシドにする。
ただし,b と # の位置が数字の前にあるので後に置く。
分離記号を全角空白,「・」は半角空白に変換する。

ということでやってみました。

//----------------------------------------------------//
disabledraw;
replaceallfast "^[  ]*\\n", "", regular;//空白行の削除
replaceallfast " \\([A-z]+\\)", "", regular;
           //カッコつきのアルファベットは削除
replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
           //ひらがなや全角括弧を含む行を削除
replaceallfast "(スケール.*)\\n", "\\1 ", regular;
replaceallfast "\\n1", " 1", regular;
replaceallfast "([#b])([1-7])", "\\2\\1", regular;
replaceallfast "1(?=[#b ]) ?", "ド", regular;
replaceallfast "2(?=[#b ]) ?", "レ", regular;
replaceallfast "3(?=[#b ]) ?", "ミ", regular;
replaceallfast "4(?=[#b ]) ?", "ファ", regular;
replaceallfast "5(?=[#b ]) ?", "ソ", regular;
replaceallfast "6(?=[#b ]) ?", "ラ", regular;
replaceallfast "7(?=[#b]*) ?", "シ", regular;
replaceallfast "([#b]) ", "\\1", regular;
replaceallfast "・", " ";
endmacro;
//----------------------------------------------------//

                          山紫水明
                          SANSHISUIMEI

[ ]
RE:07294 文章の整形につきましてNo.07302
ノノムン さん 13/12/26 14:49
 
山紫水明さん こんにちは ノノムンです

音階には 半音を後から付け足さないで、はじめから有る分だけで表現する、ダ
イアトニック音階と(シシリアンヌはドリアン・スケール (Dorian)  C D Eb F
G A Bbなどでエキゾチックなメロディーだったりします)
EF BC のだけは半音が無く それ以外は半音も使う クロマチック音階が
あります。
1オクターブはCからBまで11音階、次のオクターブ音階のCを入れて12音
で分類方法があります。

音度記号(スケールディグリー)からドレミの変換する方法は思いつきませんで
した。
しかし WEB表記の
ドリアン・スケール (Dorian)  C D Eb F G A Bb  1 2 b3 4 5 6 b7
の様に bが7の前にあります、何気なく番号を数え間違えて、7を飛ばしてい
て、 ドレbファソラb7 と入れていました、7を切り捨てて 間違いに気づき 
ドレbファソラb を ファから ミにずらし以降一つずつ ラをラシ に置換し
ますと ドレbミファソラシb となりましたが、
しかし此も間違っていて ドレミbファソラシb
ファの 半音記号が手前になっています。

> 音階については元のデータに 1 2 3 4 5 6 7 があるので,これをドレミファソ
> ラシドにする。
> ただし,b と # の位置が数字の前にあるので後に置く。
> 分離記号を全角空白,「・」は半角空白に変換する。
が良いと思います
「半角スペース や ; 」の方がオープンオフィスでは取り込みやすいです。

そのほかWEB上の記述で・ が コード外 ・(?に変換されるのがあります)

また音名に ・ が2個有るのもあります 此は考えていませんでした。
ハーモニック・マイナー・スケール → ハーモニック マイナー
(スケールと言う言葉は特に要らないので全部空白文字に換えた方がよいかもし
れません)

括弧付きの(ナチュラル・マイナー・スケール、自然短音階)も必要有りません

特に アラブの音階 インドの音階 中国の音階 日本の音階 明治以降の音階
 等は 区別が判らないので 保持しておこうと思います。

次は新しいマクロで変換してみました。 しかし少々思惑から外れています。

手で書き直すので全部ではありませんが
後の方に希望するのを書いてみます。
セパレータに半角空白を書いていますが、; 等でもかまいません。
ファは長いので ハ や フ でもかまいません。


アイオニアン スケール エオリアン スケール エオリアン スケール アイオ
ニアン スケール 音階名
ハーモニック マイナー スケール ハーモニック マイナー パーフェクト5th ビ
ロウ スケール メロディック マイナー スケール ドリアン♭2 スケール リ
ディアン♯5 スケール リディアンオーギュメントスケール リディアン♭シ ス
ケール ミクソリディアン♭6 スケール ドゥア モル スケール エオリアン♭5
スケール オルタード ドリアン スケール ロクリアン♭4 スケール スーパー
ロクリアン スケール ※ オルタード スケール  C DbEbFbGbAbBb ※ C DbD#E
F#G#Bb ドレbミbファbソbラbシb
シンメトリカル スケール (英)Symmetrical Scale
ホールトーン スケール ホールトーン スケール ディミニッシュト スケール
 コンビネーション オブ ディミニッシュト スケール クロマティック スケー
ル ペンタトニック スケール ブルース スケール ブルース スケール マ
カーム ラースト  C D Eq F G A Bq  ドレqミファソラシ
マカーム ナワサル  C D EbF#G AbB  ドレミbファ#ソラbシ
マカーム バヤーティー  C Dq EbF G AbBb ドqレミbファソラbシb
マカーム サバー  C Dq EbFbG AbBb ドqレミbファbソラbシb
マカーム スィカ  Eq, F, G, A, Bq, C, D, Eq  
マカーム フザム  Eq, F, G, Ab, B, C, D, Eq  
マールワー タート  C DbE F#G A B  ドレbミファ#ソラシ
プールヴィー タート  C DbE F#G AbB  ドレbミファ#ソラbシ
トーディー タート  C DbEbF#G AbB  ドレbミbファ#ソラbシ
律旋法  C D F G Bb
陰旋法  C DbF G Bb
琉球音階  C E F G B  ドミファソシ
雲井音階  C D EbG A  ドレミbソラ
岩戸音階  C DbF GbBb ドレbファソbシb
スレンドロ
(英)slendro
ペロッグ スケール (英)pelog
ペロッグ スケール  C DbEbG Ab ドレbミbソラb 第3音から始めると琉球音階となる

希望する分
 音名;細分         英式         日本式 此処は必要有りません。

アイオニアン     C  D  E  F  G  A  B   ド レ ミ  ファ  ソ  ラ  シ
ドリアン     C  D  Eb F  G  A  Bb  ド レ  ミb ファ  ソ ラ  シb
フリジアン     C  Db Eb F  G  Ab Bb  ド レb ミb ファ  ソb ラ  シb
リディアン     C  D  E  F# G  A  B   ド レ  ミ  ファ# ソ ラ  シ
ミクファリディアン  C  D  E  F  G  A  Bb  ド レ  ミ  ファ  ソ ラ  シb

中略

マカーム;クルディー C  Db Eb F  G  Ab Bb  ド レb ミb ファ  ソ  ラb シb

中略

呂旋法       C  D  E     G  A    ド レ  ミ        ソ ラ
律旋法       C  D     F  G     Bb  ド レ      ファ  ソb     シb
陽旋法      C    Eb F  G     Bb  ド     ミb ファ  ソb     シb
陰旋法       C  Db   F  G     Bb  ド レb     ファ  ソb     シb
琉球音階     C    E F  G     B   ド     ミ  ファ  ソ      シ


(2013/12/25 20:57), 山紫水明 wrote:
>  ノノムンさん,
>
>  よく理解できないところがありますが,
>
> 音階については元のデータに 1 2 3 4 5 6 7 があるので,これをドレミファソ
> ラシドにする。
> ただし,b と # の位置が数字の前にあるので後に置く。
> 分離記号を全角空白,「・」は半角空白に変換する。
>
> ということでやってみました。
>
> //----------------------------------------------------//
> disabledraw;
> replaceallfast "^[  ]*\\n", "", regular;//空白行の削除
> replaceallfast " \\([A-z]+\\)", "", regular;
>             //カッコつきのアルファベットは削除
> replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
>             //ひらがなや全角括弧を含む行を削除
> replaceallfast "(スケール.*)\\n", "\\1 ", regular;
> replaceallfast "\\n1", " 1", regular;
> replaceallfast "([#b])([1-7])", "\\2\\1", regular;
> replaceallfast "1(?=[#b ]) ?", "ド", regular;
> replaceallfast "2(?=[#b ]) ?", "レ", regular;
> replaceallfast "3(?=[#b ]) ?", "ミ", regular;
> replaceallfast "4(?=[#b ]) ?", "ファ", regular;
> replaceallfast "5(?=[#b ]) ?", "ソ", regular;
> replaceallfast "6(?=[#b ]) ?", "ラ", regular;
> replaceallfast "7(?=[#b]*) ?", "シ", regular;
> replaceallfast "([#b]) ", "\\1", regular;
> replaceallfast "・", " ";
> endmacro;
> //----------------------------------------------------//
>
>                            山紫水明
>                            SANSHISUIMEI
>
>

[ ]
RE:07302 文章の整形につきましてNo.07303
山紫水明 さん 13/12/26 20:43
 
 ノノムンさん,

 いろいろ例外的なものもあり,完璧にご希望どおりにするのは難しいので,
後は手作業でやってみてください。

//----------------------------------------------------//
disabledraw;
replaceallfast "^[  ]*\\n", "", regular;
replaceallfast " \\([A-z]+\\)", "", regular;
replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
replaceallfast "(スケール.*|式|法|タート)\\n", "\\1 ", regular;
replaceallfast "(?<!列)(音階)\\n", "\\1 ", regular;
replaceallfast "・スケール", "", regular;
replaceallfast "\\n1", " 1", regular;
replaceallfast "([#b])([1-7])", "\\2\\1", regular;
replaceallfast "1(?=[#b ]) ?", "ド", regular;
replaceallfast "2(?=[#b ]) ?", "レ", regular;
replaceallfast "3(?=[#b ]) ?", "ミ", regular;
replaceallfast "4(?=[#b ]) ?", "ファ", regular;
replaceallfast "5(?=[#b ]) ?", "ソ", regular;
replaceallfast "6(?=[#b ]) ?", "ラ", regular;
replaceallfast "7(?=[#b]*) ?", "シ", regular;
replaceallfast "([#b]) ", "\\1", regular;
replaceallfast "([レミフソラシ])", " \\1", regular;
replaceallfast "\\n([CE])", " \\1", regular;
replaceallfast "・", ";";
endmacro;
//----------------------------------------------------//

                          山紫水明
                          SANSHISUIMEI

[ ]
RE:07303 文章の整形につきましてNo.07304
ノノムン さん 13/12/27 18:01
 
山紫水明さん こんばんは ノノムンです

お送り頂いた分を少し改変したりしています。

次のようにしまして 最初項目だけ注目しますと、
3行では

アイオニアン (Ionian)
(メジャースケール、長音階)  C D E F G A B  ド レ ミ ファ ソ ラ シ メ
ジャー;キーの第1音から派生したスケール

のうち

       (Ionian)
(メジャースケール、長音階)  
メジャー;キーの第1音から派生したスケール


が不要です 此を消すには方法がありますでしょうか?

//----------------------------------------------------//
disabledraw;
//replaceallfast "^[  ]*\\n", "", regular;
//replaceallfast " \\([A-z]+\\)", "", regular;
//replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
//replaceallfast "(スケール.*|式|法|タート)\\n", "\\1 ", regular;
//replaceallfast "(?<!列)(音階)\\n", "\\1 ", regular;
replaceallfast "・スケール", "", regular;
replaceallfast "\\n1", " 1", regular;
replaceallfast "([#b])([1-7])", "\\2\\1", regular;
replaceallfast "1(?=[#b ]) ?", "ド", regular;
replaceallfast "2(?=[#b ]) ?", "レ", regular;
replaceallfast "3(?=[#b ]) ?", "ミ", regular;
replaceallfast "4(?=[#b ]) ?", "ファ", regular;
replaceallfast "5(?=[#b ]) ?", "ソ", regular;
replaceallfast "6(?=[#b ]) ?", "ラ", regular;
replaceallfast "7(?=[#b]*) ?", "シ", regular;
replaceallfast "([#b]) ", "\\1", regular;
replaceallfast "([レミフソラシ])", " \\1", regular;
replaceallfast "\\n([CE])", " \\1", regular;
replaceallfast "・", ";";
endmacro;
//----------------------------------------------------//

かしこ


(2013/12/26 20:43), 山紫水明 wrote:
>  ノノムンさん,
>
>  いろいろ例外的なものもあり,完璧にご希望どおりにするのは難しいので,
> 後は手作業でやってみてください。
>
> //----------------------------------------------------//
> disabledraw;
> replaceallfast "^[  ]*\\n", "", regular;
> replaceallfast " \\([A-z]+\\)", "", regular;
> replaceallfast "^.*[ぁ-ん()].*\\n", "", regular;
> replaceallfast "(スケール.*|式|法|タート)\\n", "\\1 ", regular;
> replaceallfast "(?<!列)(音階)\\n", "\\1 ", regular;
> replaceallfast "・スケール", "", regular;
> replaceallfast "\\n1", " 1", regular;
> replaceallfast "([#b])([1-7])", "\\2\\1", regular;
> replaceallfast "1(?=[#b ]) ?", "ド", regular;
> replaceallfast "2(?=[#b ]) ?", "レ", regular;
> replaceallfast "3(?=[#b ]) ?", "ミ", regular;
> replaceallfast "4(?=[#b ]) ?", "ファ", regular;
> replaceallfast "5(?=[#b ]) ?", "ソ", regular;
> replaceallfast "6(?=[#b ]) ?", "ラ", regular;
> replaceallfast "7(?=[#b]*) ?", "シ", regular;
> replaceallfast "([#b]) ", "\\1", regular;
> replaceallfast "([レミフソラシ])", " \\1", regular;
> replaceallfast "\\n([CE])", " \\1", regular;
> replaceallfast "・", ";";
> endmacro;
> //----------------------------------------------------//
>
>                            山紫水明
>                            SANSHISUIMEI
>
>

[ ]
RE:07304 文章の整形につきましてNo.07305
山紫水明 さん 13/12/27 20:23
 
 ノノムンさん,

>お送り頂いた分を少し改変したりしています。
・・・
・・・
>が不要です 此を消すには方法がありますでしょうか?

 先に紹介されたWEBサイトを全部コピーして画面に貼り付けてマクロを実行
してもそのような結果にはなりません。
 マクロを少し改変したということですが,改変しなくても同じ結果になります
か?もしそうであれば,何か設定が影響しているかもしれません。

                          山紫水明
                          SANSHISUIMEI

[ ]
RE:07305 文章の整形につきましてNo.07306
ノノムン さん 13/12/28 12:24
 
山紫水明さん こんにちは ノノムンです

条件など言葉足らずで済みませんでした。
PCはXP-PRO-SP3 です。 
秀丸バージョンは 8.01 です。

コピーしたサイト文章は、必要と思われるところだけにしていました。
灰色枠の中 

は除外して 音階名 と 音階 と 音度記号 と スペル、備考など(これら
一部を外してドラッグする頃は出来ません)

実際にコピーしたのは 次の部分からです。

アイオニアン・スケール (Ionian) 注「次の行は一枠で2行でした」
(メジャースケール、長音階)
C D E F G A B と 1 2 3 4 5 6 7

枠のした 白い部分は

ロクリアン・スケール (Locrian)  C Db Eb F Gb Ab Bb  1 b2 b3 4 b5 b6 b7
メジャー・キーの第7音から派生したスケール
mi7♭5上などで使用可能

灰色枠は 上記までですが 白枠を除外して 途中切るのも面倒なので 

ナチュラル・マイナー・スケール(自然短音階) 注(を含めて)

ナチュラル・マイナー・スケールはメジャー・スケールの3度と6度と7度を半音
下げたスケール。メジャースケールの6度から始めた音階でもあるのでそこから
派生するスケールも並べ替えただけとなる。

もコピーして

最後は

(英)pelog
音階名(スケール名)  音階の例  音度記号(スケールディグリー)  備考など
ペロッグ・スケール  C Db Eb G Ab  1 b2 b3 5 b6  第3音から始めると琉球音
階となる

を終わりにして 秀丸テキストに張り 読み取り専用に指定してそれから拾い出
して 
()で囲まれた部分と スペル、備考など は手で切り取り 整形しました。
#で始まる行は 思い切って削除

ホールトーン・スケール
(全音音階、移調の限られた旋法第1旋法)  C D E F# Ab Bb  1 2 3 #4 b6
b7  全て音程が全音のスケール
等は 1項目を生かして 括弧分を取り スペル、備考など を切り捨て

ホールトーン・スケール C D E F# Ab Bb  1 2 3 #4 b6 b7

の様に変形しました。

此で 1項目は スケール 2項目は 音名 3項目は 音度記号 だけが残り
ました。
此をもう一度読み取り専用にして 別名で開き直し(読み書きできる)

(音度記号 をドレミに直すため)マクロを適用してみました。

その結果なんですが
アイオニアン・スケール  C D E F G A B  1 2 3 4 5 6 7

マカーム・ラースト  C D Eq F G A Bq  1 2 q3 4 5 6 7

に対して 

アイオニアン  C D E F G A B  ド レ ミ ファ ソ ラ シ 注(スケールがTABに
換わったと思われます)

マカーム; ラースト  C D Eq F G A Bq  ド レq ミ ファ ソ ラ シ

と 半角スペース+TAB ;+半角スペース と言う違いが出ていまして、
今はこの理由を調べています。

; は , に換えることが出来ました、 
半角、全角 空白 TAB がまだ判っていません。

かしこ

「手整形全文
アイオニアン・スケール  C D E F G A B  1 2 3 4 5 6 7
ドリアン・スケール C D Eb F G A Bb  1 2 b3 4 5 6 b7
フリジアン・スケール C Db Eb F G Ab Bb  1 b2 b3 4 5 b6 b7
リディアン・スケール C D E F# G A B  1 2 3 #4 5 6 7
ミクソリディアン・スケール C D E F G A Bb  1 2 3 4 5 6 b7
エオリアン・スケール  C D Eb F G Ab Bb  1 2 b3 4 5 b6 b7
ロクリアン・スケール   C Db Eb F Gb Ab Bb  1 b2 b3 4 b5 b6 b7
エオリアン・スケール C D Eb F G Ab Bb  1 2 b3 4 5 b6 b7
ロクリアン・スケール  C Db Eb F Gb Ab Bb  1 b2 b3 4 b5 b6 b7
アイオニアン・スケール C D E F G A B  1 2 3 4 5 6 7
ドリアン・スケール  C D Eb F G A Bb  1 2 b3 4 5 6 b7
フリジアン・スケール  C Db Eb F G Ab Bb  1 b2 b3 4 5 b6 b7
リディアン・スケール  C D E F# G A B  1 2 3 #4 5 6 7
ミクソリディアン・スケール  C D E F G A Bb  1 2 3 4 5 6 b7
ハーモニック・マイナー・スケール C D Eb F G Ab B  1 2 b3 4 5 b6 7
ロクリアン・6・スケール  C Db Eb F Gb A Bb  1 b2 b3 4 b5 6 b7
アイオニアン♯5・スケール  C D E F G# A B  1 2 3 4 #5 6 7
ドリアン♯4・スケール  C D Eb F# G A Bb  1 2 b3 #4 5 6 b7
ハーモニック・マイナー・パーフェクト5th・ビロウ・スケール C Db E F G
Ab Bb  1 b2 3 4 5 b6 b7  リディアン♯2・スケール  C D# E F# G A B  1 #2 3
#4 5 6 7
スーパー・ロクリアン♭7・スケール  C Db Eb Fb Gb Ab Bbb  1 b2 b3 b4 b5 b6 bb7
スーパー・イオニアン・スケール  C D Eb F G A B  1 2 b3 4 5 6 7
スーパー・ドリアン・スケール  C Db Eb F G A Bb  1 b2 b3 4 5 6 b7
スーパー・フリジアン・スケール  C D E F# G# A B  1 2 3 #4 #5 6 7
スーパー・リディアン・スケール  C D E F# G A Bb  1 2 3 #4 5 6 b7
スーパー・ミクソリディアン・スケール  C D E F G Ab Bb  1 2 3 4 5 b6 b7
スーパー・エオリアン・スケール  C D Eb F Gb Ab Bb  1 2 b3 4 b5 b6 b7
オルタード・スケール  C Db Eb Fb Gb Ab Bb 1 b2 b3 b4 b5 b6 b7
ホールトーン・スケール C D E F# Ab Bb  1 2 3 #4 b6 b7
ディミニッシュト・スケール  C D Eb F Gb G# A B  1 2 b3 4 b5 #5 6 7
ドミナント・ディミニッシュト・スケール  C Db Eb bF bG G A Bb  1 b2 b3 b4
b5 5 6 b7
クロマティック・スケール  C C# D D# E F F# G G# A A# B  1 #1 2 #2 3 4 #4
5 #5 6 #6 7
マイナー・ペンタトニック・スケール  C Eb F G Bb  1 b3 4 5 b7
メジャー・ペンタトニック・スケール  C D E G A  1 2 3 5 6
ブルー・ノート・スケール  C Eb F Gb G Bb  1 b3 4 b5 5 b7
ハンガリー・スケール  C D Eb F# G A B  1 2 b3 #4 5 6 7
ジプシー・スケール  C Db E F G Ab B  1 b2 3 4 5 b6 7
スパニッシュ・スケール  C Db Eb E F G Ab Bb  1 b2 b3 3 4 5 b6 b7
マカーム・ラースト  C D Eq F G A Bq  1 2 q3 4 5 6 7
マカーム・ナハーワンド  C D Eb F G Ab B  1 2 b3 4 5 b6 7
マカーム・ナワサル  C D Eb F# G Ab B  1 2 b3 #4 5 b6 7
マカーム・ナグリーズ  C D Eb F# G A Bb  1 2 b3 #4 5 6 b7
マカーム・ヒジャーズカル  C Db E F G Ab B  1 b2 3 4 5 b6 7
マカーム・バヤーティー  C Dq Eb F G Ab Bb  1 q2 b3 4 5 b6 b7
マカーム・サバー  C Dq Eb Fb G Ab Bb  1 q2 b3 b4 5 b6 b7
マカーム・ヒジャーズィー  C Db E F G Ab Bb  1 b2 3 4 5 b6 b7
マカーム・クルディー  C Db Eb F G Ab Bb  1 b2 b3 4 5 b6 b7
マカーム・スィカ  Eq, F, G, A, Bq, C, D, Eq
マカーム・フザム  Eq, F, G, Ab, B, C, D, Eq
ビラーヴァル・タート  C D E F G A B  1 2 3 4 5 6 7
カマージ・タート  C D E F G A Bb  1 2 3 4 5 6 b7
カーフィー・タート  C D Eb F G A Bb  1 2 b3 4 5 6 b7
アサーワリー・タート  C D Eb F G Ab Bb  1 2 b3 4 5 b6 b7
バイラヴ・タート  C Db E F G Ab B  1 b2 3 4 5 b6 7
バイラヴィ・タート  C Db Eb F G Ab Bb  1 b2 b3 4 5 b6 b7
カリヤーン・タート  C D E F# G A B  1 2 3 #4 5 6 7
マールワー・タート  C Db E F# G A B  1 b2 3 #4 5 6 7
プールヴィー・タート  C Db E F# G Ab B  1 b2 3 #4 5 b6 7
トーディー・タート  C Db Eb F# G Ab B  1 b2 b3 #4 5 b6 7
宮調式  C D E G A  1 2 3 5 6
商調式  C D F G Bb  1 2 4 5 b7
角調式  C Eb F Ab Bb  1 b3 4 b6 b7
徴調式  C D F G A  1 2 4 5 6
羽調式  C Eb F G Bb  1 b3 4 5 b7
呂旋法  C D E G A  1 2 3 5 6
律旋法  C D F G Bb 1 2 4 5 b7
陽旋法  C Eb F G Bb  1 b3 4 5 b7
陰旋法  C Db F G Bb 1 b2 4 5 b7
琉球音階  C E F G B  1 3 4 5 7
ヨナ抜き音階
ヨナ抜き長音階  C D E G A  1 2 3 5 6
ヨナ抜き短音階  C D Eb G Ab  1 2 b3 5 b6
ニロ抜き短音階  C Eb F G Bb  1 b3 4 5 b7
ニロ抜き長音階  C E F G B  1 3 4 5 7
律音階(雅楽音階)  C D F G A  1 2 4 5 6
都節(みやこぶし)音階  C Db F G Ab  1 b2 4 5 b6
雲井音階  C D Eb G A  1 2 b3 5 6
岩戸音階  C Db F Gb Bb  1 b2 4 b5 b7
ペロッグ・スケール  C Db Eb G Ab  1 b2 b3 5 b6







(2013/12/27 20:23), 山紫水明 wrote:
>  ノノムンさん,
>
>> お送り頂いた分を少し改変したりしています。
> ・・・
> ・・・
>> が不要です 此を消すには方法がありますでしょうか?
>
>  先に紹介されたWEBサイトを全部コピーして画面に貼り付けてマクロを実行
> してもそのような結果にはなりません。
>  マクロを少し改変したということですが,改変しなくても同じ結果になります
> か?もしそうであれば,何か設定が影響しているかもしれません。
>
>                            山紫水明
>                            SANSHISUIMEI
>
>

[ ]
RE:07306 文章の整形につきましてNo.07307
山紫水明 さん 13/12/28 20:05
 
 ノノムンさん,

>コピーしたサイト文章は、必要と思われるところだけにしていました。

 私のマクロは,
 サイトの全部を(ctrl+A などで選択)コピーして秀丸の画面に貼り付けて実
行する。
 その後削除や追加,修正などはすべて手作業で行って仕上げる。
 それ以外の使い方は想定しておりませんのでご了解ください。

                          山紫水明

[ ]
RE:07307 文章の整形につきましてNo.07320
ノノムン さん 14/01/09 10:06
 
山紫水明さん こんにちは ノノムンです

自分でも もう少し マクロの上達をしたいと思います。

コマンド類は殆ど理解できるのですが、

"^[  ]*\\n", "", regular;
「;」はデリミタ

等の文法(実効操作法)が良く理解できません。

細かく分けた、文例、解説対比集 等はありませんでしょうか?

マクロヘルプで目次を探したり検索しても、見つけられません。

良い勉強方法が有れば、お教えください。

それではよろしくお願いします。
かしこ







(2013/12/28 20:05), 山紫水明 wrote:
>  ノノムンさん,
>
>> コピーしたサイト文章は、必要と思われるところだけにしていました。
>
>  私のマクロは,
>  サイトの全部を(ctrl+A などで選択)コピーして秀丸の画面に貼り付けて実
> 行する。
>  その後削除や追加,修正などはすべて手作業で行って仕上げる。
>  それ以外の使い方は想定しておりませんのでご了解ください。
>
>                            山紫水明
>
>

[ ]
RE:07320 文章の整形につきましてNo.07325
山紫水明 さん 14/01/09 17:19
 
 ノノムンさん,

>細かく分けた、文例、解説対比集 等はありませんでしょうか?
>マクロヘルプで目次を探したり検索しても、見つけられません。
>良い勉強方法が有れば、お教えください。

 ここで使用しているのは「正規表現」を用いた置換ですので,これを理解する
ためには「正規表現」を理解する必要があります。
「正規表現」については,秀丸エディタヘルプの 検索系コマンドに「正規表
現」の解説があります。

 他にも解説はいろいろあると思いますが,とりあえず
秀丸エディタQ&A集(第7版)
http://homepage2.nifty.com/jr-kun/hidemaru_qa/hmindex0.html
をご覧になったらいかがでしょう。この中の
●第IV部〜テキスト編集を極める!!
に解説があります。

                          山紫水明
                          SANSHISUIMEI

[ ]