「サクラ」質問掲示板

サクラの質問を行う掲示板です。

(#509) huangbaiさま、ありがとうございました - 三宅元貴 (2021-07-19 17:34) /中 解決
huangbaiさま、長々とありがとうございました。
TrackKeyを4半音下げましたら、解決しました。
改変し、組み込んでいるため、「著作権記述なしでいいと思います」との事でしたが、
GSScaleTuningから配列の変更までhuangbaiさまにご教授頂きましたので、
念のためhuangbaiさまのお名前を書いておきます。
(私は、MITライセンスを理解出来ていないかも知れません…)

以下、他の方のために上手く行った例を書き残しておきます。

Include(gs.h);
//------------------------------------------------------------------------------
TrackName={"Evfer"};             //タイトル
Copyright={"作曲:三宅元貴"};             //著作権表示
MetaText      = {"2005年9月20日作曲、トルコ古典音楽のウスールUsul:Evfer"}       //説明・コメントなど
TimeSignature=9,8;           //拍子記号の設定
ResetGM; r2 ResetGS; r2      //音源初期化命令

//GSScaleTuningを使って音律を設定する
//(GS音源が必要)
//12平均律の12の音、
//ド、ド♯、レ、レ♯、ミ、ファ、ファ♯、ソ、ソ♯、ラ、ラ♯、シ
//=
//C,Cp,D,Dp,E,F,Fp,G,Gp,A,Ap,B
//の事。
//各音に+-するセントcent値
//+64セント、-64セントまで
//(+64セントでGSScaleTuningの値が127を超える場合エラーになる?

//今回は
//C+0,Cp+36,D+4,Dp+40,E-37,F-2,Fb-34,G+2,Gp+38,A+6,Ap-4,B-35

//huangbaiさまによる移調プログラムを組み込んでいます。
//
//Copyright (c) 2021 huangbai
//Released under the MIT license
//https://opensource.org/licenses/mit-license.php

Array Arr = (0,36,4,40,-37,-2,-34,2,38,6,-4,-35)// 変則チューニング

Array Brr= ()
Int k= -4 // ここでキー選択//-4
Int j= 0

k= -k

If(k<0){
  k= 12+ k%12
}

While(j<12){

  Brr= (Brr,64+ Arr((k+j)%12))
  j++;
} //

Print(Brr)

//64に対して加減算
GSScaleTuning( Brr(0),Brr(1),Brr(2),Brr(3),Brr(4),Brr(5),Brr(6),Brr(7),Brr(8),Brr(9),Brr(10),Brr(11));

//------

Time=(!1)//ここで、1小節送る

TrackSync;                   //全てのトラックを同期する

System.MeasureShift = 1;     //(弄らないこと)

Tempo(106);                  //テンポの設定
//-------------------------------------------------

トラック1
音色(Dulcimer)
ゲート99
音量110
TrackKey(-4)
音量曖昧さ20 

ソソソソ8ソソソソソ8ソ
ソラ♭ソファ8ミファソファミ8レ♭
ミファミレ♭8ド↓シ♭↑ドミレ♭8ド

↓シ♭↑ドレ♭ミ8ファソファミファ8ラ♭
ソファミシ♭8ラ♭ソファミレ♭8ド
↓シ♭↑ドミレ♭8ドドドドド8ド

↓シ♭↑ドレ♭ミ8ファソファミファ8ラ♭
ソファミシ♭8ラ♭ソファミレ♭8ド
↓シ♭↑ドミレ♭8ドドドドド8ド

トラック2
音色(Violin)
ゲート99
音量52
TrackKey(12-4)
音量曖昧さ0 

ビブラート

音量52
ソソソソ8ソソソソシ♭16ラ♭16ソ
ソラ♭ソ連符{ファソファ}8ミファソファ連符{ミファミ}8レ♭
ミファミ連符{レ♭ミレ♭}8ド↓シ♭↑ドミ連符{レ♭ミレ♭}8ド

↓シ♭↑ドレ♭ミ8ファソファミファ16ソ16ラ♭
ソファ連符{ミファソ}シ♭8ラ♭ソファミ連符{レ♭ミレ♭}8ド
↓シ♭↑ドミ連符{レ♭ミレ♭}8ドドドドド8ド16↓シ♭16ラ16↑ド16

↓シ♭↑ド連符{レ♭ドレ♭}連符{ミレ♭ミ}8ファソファ連符{ミレ♭ミ}ファ16ソ16ラ♭
ソファ連符{ミファソ}連符{シ♭↑ド↓シ♭}8ラ♭ソファ連符{ミファミ}連符{レ♭ミレ♭}8ド
↓シ♭↑ドミ連符{レ♭ミレ♭}8ドドドドド8ド16レ♭16ミ16ファ16

連符とPitchBendを併用すると上手く演奏.. / 三宅元貴 (2021-06-08 10:15) (#494)/ 低 未処理
  環境について補足 / 三宅元貴 (2021-06-14 19:59) (#495)/ 中 未処理
  Re: 連符とPitchBendを併用すると / huangbai (2021-06-15 00:17) (#496)/ 低 未処理
  Re: 連符とPitchBendを併用すると - 続き - / huangbai (2021-06-15 00:25) (#497)/ 低 未処理
    お返事ありがとうございます。検証中です / 三宅元貴 (2021-06-15 22:39) (#498)/ 低 未処理
      GSScaleTuning? / 三宅元貴 (2021-06-17 22:17) (#499)/ 中 未処理
        Re: GSScaleTuning? / huangbai (2021-06-18 20:30) (#500)/ 中 未処理
          ありがとうございます。検証中です。 / 三宅元貴 (2021-06-20 17:09) (#501)/ 中 未処理
            GSScaleTuningで太鼓の音がずれる問題 / 三宅元貴 (2021-06-20 20:37) (#502)/ 中 未処理
              Re: GSScaleTuningで太鼓の音がずれる問題 / huangbai (2021-06-22 06:31) (#503)/ 中 未処理
                GSScaleTuningとTrackKey / 三宅元貴 (2021-06-22 15:56) (#504)/ 中 未処理
                  re: GSScaleTuningとTrackKey / huangbai (2021-07-14 17:27) (#505)/ 中 未処理
                    huangbaiさま、ありがとうございます。 / 三宅元貴 (2021-07-16 09:27) (#506)/ 低 未処理
                    実環境で上手く行きません。何が問題でし.. / 三宅元貴 (2021-07-16 14:51) (#507)/ 中 未処理
                      re: 実環境で上手く行きません。 / huangbai (2021-07-17 16:44) (#508)/ 中 未処理
                        huangbaiさま、ありがとうございました / 三宅元貴 (2021-07-19 17:34) (#509)/ 中 解決

(#509)へ返信する:

名前
タイトル
本文
優先度
状態
確認キー お手数ですが、いたずら防止のために、「桜」の読み方をひらがなで記入してください。
編集キー 編集時に使うキーを入力(省略可能)
添付ファイル 画像ファイル(最大300KB)を添付可能