サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ヒーリング・ニューエイジ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 未完成ですが自分の技術的に限界が来ているので投稿です。短い曲です。 曲データ(サクラから貼り付けます。) /* ■☆悠遠時空☆ 作成:ひかり :------------------------------------------------------------------------------: ::: はるか遠く、昔のことを思う。 ::: :------------------------------------------------------------------------------: ☆作成環境☆ OS : Windows XP HomeEdition 音源:Microsoft GS Wavetable Synth(サンプル音源) :Roland VSC (サンプル) 出力:パナソニックのイヤホン ◆MEMO 未完成のまま投稿という形になり、残念ですが、現在の自分の限界です。 なんとなく思ったメロディを徒然なるままに作りました。 完成度的には、中の下ぐらいかと。 アドバイスいただければ幸いです。 */ 曲名{"☆悠遠時空☆"} 作者{"ひかり"} System.MeasureShift = 1; ResetGS;拍子4,4 調#() //変数、関数宣言 Str PD={r32 y64,0 r32 y64,127 r-16} //HOLD Str VU={v+5} //v+ Str VD={v-5} //v- Int PLOS=0 Int MainKey=5 ~{時2}={Time(36:1:0)} Function Q(A){Tempo=A} //Tempo Function TRS(A,B,D,C,E){TR=A;CH=B;IF(C=1){r1};@=(D,E)}//TrackSeter Function PL(Str S,Int KC,Int TP,Int THU,Str EAfter){ r32;y64,0;r32;y64,127;r-16 KC=KC+MainKey If(TP=0){Key(KC);S;Key(KC+7);S;Key(KC+12);Sub{EAfter};Sー;Key(0);r*(THU)} If(TP=1){Key(KC);S;Key(KC+7);S;Key(KC+12);S;Key(KC+7);Sub{EAfter};S;Key(0);r*(THU)} If(TP=2){Sub{Key(KC);S};Sub{Key(KC+7);S};Key(KC+12);Sub{EAfter};Sーーー;Key(0);r*(THU)} If(TP=3){Key(KC);S;Key(KC+7);S;Key(KC+12);S;Key(KC+19);Sub{EAfter};S;Key(0);r*(THU)} If(TP=4){Key(KC);S;Key(KC+7);S;Key(KC+12);Sub{EAfter};Sー;r*(THU);Key(KC-2);S;Key(KC+7);S;Key(KC+10);Sub{EAfter};Sー;Key(0);r*(THU)} If(TP=5){Key(KC);S;Key(KC+7);S;Key(KC+12);S;Key(KC+17);Sub{EAfter};Sー;Key(0);r*(THU)} IF(PLOS=1){Lyric=KC} Key(MainKey)} //トラック設定 // TR|CH| @ |Other TRS(1 ,1 ,1 ,1) TRS(2 ,2 ,1 ,1) TRS(3 ,3 ,41 ,1) TRS(4 ,4 ,73 ,1) TRS(5 ,5 ,56 ,1) TRS(6 ,6 ,65 ,1) TRS(7 ,7 ,49 ,1) TRS(8 ,8 ,11 ,1) TRS(9 ,9 ,1 ,1) TRS(10,10,1 ,1) TRS(11,11,72 ,1) TRS(12,12,61 ,1) TRS(13,13,49 ,1) TRS(14,12,61 ,1) TRS(15,15,123,1,4) TRS(16,16,48 ,1) TRS(17,14,47 ,0) Key(5)Tempo(85) //その壱------------------------------------------------------------------------------ //世界の礎 トラック1 音量(120)音階5 音符8q100 r*1 r-4 PD Q(42) ab Q(85) `c^^`c ^`cba b^^b ^^^^ PD a^^a ^agf g^^g ^^^^ PD f^^f ^fed e^^e ^^^^ PD f^^f ^^^^ a^g+^ a^b^ PD t.N(0,4)「b`c」^^t0`c ^`cba b^^g ^^^^ PD t.N(0,4)「fa」^^t0a ^agf g^^e ^^^^ PD t.N(0,4)「df」^^t0f ^fed e^^c ^^^^ PD t.N(0,4)「fa」^^t0a ^^^^ a^g+^ a^b^ > PD r*1. rgfe f1. redc d1^1^1 "a0a^"g+0g+^ "a0a^"b0b^ [r*1]r-4 } [4 c2 VU c2 VD VD c2 VU VU c2 VD]] [2Sub{<[4"c0"e0c2]>} c2 VU c2 VD VD c2 VU VU c2 VD] //------------------------------------------------------------------------------ トラック16 音量(105)音階3 音符8q100 Time(17:1:0)r-4 EP.T(0,127,!1,127,0,!2) [32 "c0c32][4 c0`c8] Time(25:1:0)r-4 EP.T(0,127,!1,127,0,!2) [32 "c0c32][4 c0`c8] この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)