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

冒険の始まりだ！ - サクラ曲掲示板6

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

冒険の始まりだ！

spark.K
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1. Copyright = {"spark.K"}
  2. TrackName = {"冒険の始まりだ！"}
  3. MetaText = {"for Microsoft GS Wavetable SW Synth"}
  4.  
  5. #loop = 2; // 繰り返し回数
  6.  
  7. /*
  8. ------------------------------------------------------------
  9. テキスト音楽「サクラ」ヘッダーファイル「sparkmml.h」
  10. 2010/11/07 Ver.
  11. Copyright(C) 2010 spark.K
  12. http://user.freespace.jp/sparkk/
  13. ------------------------------------------------------------
  14. */
  15.  
  16. // ここは編集しない
  17. Int ___ = -1; // デフォルト値を使用する
  18. Int XXX = -2; // このパラメーターをスキップする
  19.  
  20. // デフォルト値（全般）
  21. Int Tbdef = 480; // タイムベース
  22. Int Voldef = 127; // ボリューム
  23. Int Bpmdef = 120; // テンポ
  24.  
  25. // 各パラメーターのデフォルト値
  26. Int Veldef = 100; // ベロシティー
  27. Int Quadef = 096; // クオンタイズ
  28. Int Expdef = 127; // エクスプレッション
  29. Int Pandef = 064; // パンポット
  30. Int Voidef = 001; // プログラムチェンジ
  31. Int Msbdef = 000; // MSB
  32. Int Lsbdef = 000; // LSB
  33. Int Revdef = 000; // リバーブ
  34. Int Chodef = 000; // コーラス
  35.  
  36. // 音源初期化の有無（0：なし、1：GM、2：GS、3：XG）
  37. Int NONE = 0;
  38. Int GM = 1;
  39. Int GS = 2;
  40. Int XG = 3;
  41. Int _initdone = off;
  42. Int _resetmode = NONE;
  43.  
  44. // 文字列関連
  45. Str NULL = CHR($00);
  46.  
  47. // IのXパーセント
  48. Function Per (Int I, Int X) {
  49. Result = (I * X) / 100;
  50. }
  51.  
  52. // 楽器名を書き込む
  53. Function Ins (Str _ins)
  54. {
  55. InstrumentName = _ins;
  56. }
  57.  
  58. // CC111を書き込む
  59. Function LoopPoint (Int Len)
  60. {
  61. If (Len != 0)
  62. {
  63. r%(-Len) y111,0 r%(Len)
  64. } Else {
  65. y111,0
  66. }
  67. }
  68.  
  69. // セットアップその他
  70. Str SetupAdd = {}
  71.  
  72. // セットアップ関数
  73. Function Setup (Tr, Ch, Vel, Qua, Exp, Pan, Voi, Msb, Lsb, Rev, Cho) {
  74. If (_initdone == off) // 初期化していなければ、初期化関数を実行する
  75. {
  76. Init (NONE, 0);
  77. }
  78.  
  79. If (Tr == ___) { Tr = Ch; } If (Tr != XXX) { TR (Tr); CH (Ch); }
  80. Time (0:1:0); l4 o5 t0 SetupAdd; V (Voldef);
  81. If (Vel == ___) { Vel = Veldef; } If (Vel != XXX) { v (Vel); }
  82. If (Qua == ___) { Qua = Quadef; } If (Qua != XXX) { q (Qua); }
  83. If (Exp == ___) { Exp = Expdef; } If (Exp != XXX) { EP (Exp); }
  84. If (Pan == ___) { Pan = Pandef; } If (Pan != XXX) { P (Pan); }
  85. If (Msb == ___) { Msb =
作者からのコメント
自作ゲーム（RPG）のフィールド曲です。MMLの打ち込みについて何かアドバイス等がありましたらお願いします。
作曲者
自作
ライセンス
📧メール連絡で転載を許可MML内のメールアドレスへ連絡してください
転載
許可しない
推奨音源
MSGS、TW-MUSIC2
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
動画
なし
投稿日時
2010-11-07 23:55
更新日時
2010-11-07 23:55
お気に入り
Yoshioka
ダウンロード数
583
タグ
タグはありません。
→この曲(id:312)に問題がある場合こちらへ

感謝のコメント

Yoshioka2010/11/08
聴かせて頂きました～。
何よりまず、ゲーム用のBGMとしての完成度が素晴らしいです。
細かいmmlの技術が分からなかったりしますが(ぁ)、凄く洗練されたソースで驚きました。
音助2010/11/15
ちょっと懐かしい感じの雰囲気ですねｗ
ソースはもはやプログラムって感じで、とても真似できませんけど （＾＾；
Yoshiokaさんのコメントにもありますが、ゲーム用のBGMとして、とても良く出来ていると思います。
♪
この曲に「ありがとう」を伝えませんか？
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。
ログインしてコメントする はじめての方はこちら（無料登録）