サクラトップ 掲示板トップ ログイン

geed! - サクラ曲掲示板6

曲掲示板6にエディタ機能が追加されました!気軽に曲を作成してみましょう!
Nacky

geed!

MML先頭 2000 文字だけ表示しています全文を見る
  1. /*--------------------------------------------------------------------------------------------------------------------------------------
  2.  
  3. 制作:2014年10月
  4.  
  5. ネット上をさまよっていたところ、
  6. 「まずは使う音を3種類に絞ってメロディを書こう」
  7. みたいな感じの、おそらく作曲講座かなにかのWebページのタイトル"のみ"を目にし、
  8. (なるほど!こういうことかな?)
  9. と試しに30分くらいでこの曲を作成しました。
  10.  
  11. …ところが後から該当のWebページを読んでみると、その意図としては
  12. 「1オクターブには12種類も音があって初心者はどこから手をつければいいかわからないと思います。
  13. まずは使う音を何でもいいので3種類選んで、適当でいいので組み合わせてみましょう。それが作曲の第一歩!」
  14. ということだったらしく、
  15. (あ、これ思ってたのとちょっと違うな)
  16. ってなりました。
  17.  
  18. そんな曲です。
  19. メロディのことしか考えてないので伴奏のテキトーさには目をつぶってください。
  20.  
  21. --------------------------------------------------------------------------------------------------------------------------------------*/
  22. TrackName={"geed!"};
  23. Copyright={"Nacky"};
  24. MetaText={""};
  25. System.MeasureShift(1);ResetGM;
  26. Tempo(140);
  27. TimeSignature(4,4);
  28. KeyFlag=(000,000,000,000,000,001,000);//G Major
  29. TrackSync;
  30. TimeBase(096);
  31.  
  32. //_Track Initial Setting
  33. Function TrackSet(Array Set=1,1,127,100,0,0,0,64,0,127,64,0,5,100,80,2){
  34. If(Set(00)==___){Channel(001);r*%1;}Else{Channel(Set(00));r*%1;};
  35. If(Set(01)==___){Voice(001);r*%1;}Else{Voice(Set(01));r*%1;};
  36. If(Set(02)==___){Expression(127);r*%1;}Else{Expression(Set(02));r*%1;};
  37. If(Set(03)==___){MainVolume(100);r*%1;}Else{MainVolume(Set(03));r*%1;};
  38. If(Set(04)==___){Reverb(000);r*%1;}Else{Reverb(Set(04));r*%1;};
  39. If(Set(05)==___){Chorus(000);r*%1;}Else{Chorus(Set(05));r*%1;};
  40. If(Set(06)==___){Modulation(000);r*%1;}Else{Modulation(Set(06));r*%1;};
  41. If(Set(07)==___){Panpot(064);r*%1;}Else{Panpot(Set(07));r*%1;};
  42. If(Set(08)==___){y71(000);r*%1;}Else{y71(Set(08));r*%1;};
  43. If(Set(09)==___){y74(127);r*%1;}Else{y74(Set(09));r*%1;};
  44. If(Set(10)==___){y73(064);r*%1;}Else{y73(Set(10));r*%1;};
  45. If(Set(11)==___){VAR(000);r*%1;}Else{VAR(Set(11));r*%1;};
  46. If(Set(12)==___){o(005);r*%1;}Else{o(Set(12));r*%1;};
  47. If(Set(13)==___){v(100);r*%1;}Else{v(Set(13));r*%1;};
  48. If(Set(14)==___){q(080);r*%1;}Else{q(Set(14));r*%1;};
  49. If(Set(15)==___){BR(002);r*%1;}Else{BR(Set(15));r*%1;};
  50. };
  51.  
  52. //_グラデーション
  53. Function EG(Arra
作者からのコメント
在庫処分。ネタ曲です。
作曲者
自作
ライセンス
🌐パブリックドメイン商用利用 ○改変 ○改変も転載も自由
転載
許可
推奨音源
特にこだわりなし
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.1
動画
なし
投稿日時
2020-09-26 10:48
更新日時
2020-09-26 10:51
お気に入り
かもめひとりそのらモスケかまきりざーどレイン望木村H゛
ダウンロード数
310
タグ
タグはありません。
→この曲(id:2145)に問題がある場合こちらへ

感謝のコメント

かもめ2020/09/30
耳に馴染むベースの動きとギターのリズム感が好みな感じです。
全体的にまとまりというか一体感があって聴きやすかったです。
Nacky2020/09/30
>>かもめさま
アレンジを褒めてもらえるとは思ってませんでした、ありがとうございます。ボーカルをレミソの3音のみにすることでかえって一体感が出た説ありますね(ない)
聞かせていただきました。
キャッチーなイントロと全体的に爽やかな曲調が良いですね
「まずは使う音を3種類に絞ってメロディを書こう」
これだけでこの曲が作れるのはすごいです
ごちそうさまでした
Nacky2020/10/01
>>ひとりそのらさま
ありがとうございます。当時爽やかサウンドハマってたんですよねぇ。
制約をかけて書くと普段自分では出ないようなメロが書けたりしたので、実は作曲のテクニックとして普通にアリなのかもしれません。
モスケ2020/10/08
ポップで楽しい曲ですね。
メロディ、リズムにノリに思わず乗ってしまいます。
良い曲だと思います。
Nacky2020/10/08
>>モスケさま
ありがとうございます。
ノリが良い曲を書くのは少し苦手なんですが、そう仰っていただけて何よりです。
レイン望2020/10/13
「楽器の数を3種類に絞る」って意味かと思いきや、まさかの「音階を3種類に絞る」って話だったんですね

それはさておき、主旋律・伴奏・ベースの組み合わせだけでも十分曲に出来るということを改めて痛感。
自分も一度この機に初心に立ち返ってみようかと思いました
木村2020/10/15
なんかイントロの和音が気持ちいいですねー
Nacky2020/10/16
>>レイン望さま
お聴きいただきありがとうございます。ジャンルを指定しつつ楽器の数を絞って書くのも面白そうですね。3〜4トラックくらいでユーロビート書くとか(?)

>>木村さま
イントロに関しては何の制約もないので手癖100%、趣味全開です。ありがとうございます。
H゛2024/02/07
ポップロックなメロディにギターが良く合ってて素敵です
オルガンの間奏もメロディへの助走とアウトロに綺麗にマッチしてて、勢い付けてノッていける感じでした^^b
サビのメロディカッコ良くて、思わず口ずさみたくなります♬
良曲ご馳走様です
この曲に「ありがとう」を伝えませんか?
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。