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

MML - サクラ曲掲示板6

曲掲示板6にエディタ機能が追加されました!気軽に曲を作成してみましょう!
MML先頭 2000 文字だけ表示していますダウンロード全文を見る
  1.  
  2. // on the floor
  3.  
  4. INT EST=130PlayFrom.SysEx=1PlayFrom.CtrlChg=1PlayFrom.RPN_NRPN=1TrackName={MML}Copyright={Pitchbend Master Records}System.MeasureShift=3Tempo=1000Include(delay.h)ResetGS;
  5. FUNCTION WIN(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(0)CH=X2;@(X3,XA,XB)TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)}
  6. FUNCTION DL(ti){Time(ti:1:0)}FUNCTION PAN(ER1,ER2){If(ER2==0){P.T(0,127,ER1)}If(ER2==1){P.T(127,0,ER1)}}FUNCTION GSRY(_D){INT _TCH=Channel;INT _CH;If(_TCH==10){_CH=$00;}Else{If(_TCH<10){_CH=_TCH;}Else{_CH=_TCH-1}}_CH=$10+_CH;SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(_CH),$15,(_D)},$F7;}
  7. FUNCTION HAM(STR SA){Sub{Key=12SA;Key=0}SA}FUNCTION HAM2(STR SA){Sub{Key=-12SA;Key=0}SA}FUNCTION HAM3(STR SA){Sub{Key=-12SA;Key=0}Sub{Key=12SA;Key=0}SA}FUNCTION REC(FF=127){EP.T(FF,0,!1^1^1^1^1^1)}FUNCTION REC2(FF=100){V.T(FF,0,!1^1^1^1^1^1)}FUNCTION IP(DW=1){DL(-2)GSRY(DW)r8}INT K=0DL=0Tempo=EST;
  8. //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)
  9. WIN(01,01,004,08,0,K,064,4,2,100,09,0)WIN(07,07,039,01,0,K,096,1,2,100,10,0)WIN(13,13,119,00,0,K,084,5,0,127,10,0)
  10. WIN(02,02,082,01,0,K,064,2,2,100,09,0)WIN(08,08,079,00,0,K,044,3,2,127,09,0)WIN(14,14,082,01,0,K,044,2,2,127,10,0)
  11. WIN(03,03,082,01,0,K,000,2,2,100,10,0)WIN(09,09,080,00,0,K,084,3,2,127,09,0)WIN(15,15,127,00,0,K,000,2,2,120,10,0)
  12. WIN(04,04,082,01,0,K,127,2,2,100,10,0)WIN(10,10,025,00,0,0,064,3,1,127,10,0)WIN(16,16,127,00,0,K,127,2,1,120,10,0)
  13. WIN(05,05,039,00,0,K,064,2,2,100,10,0)WIN(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--//
  14. WIN(06,06,039,01,0,K,032,1,2,100,10,0)WIN(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP;
  15. INT HAZ=1INT BK0=17INT BGN=33INT BK1=49INT BN1=81INT NK1=97INT BK2=113INT BN2=145INT NK2=161INT NK3=177INT END=193
  16. /*1*/STR MNH={@81,1EP.T(40,100,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)q.T(90,90,!1^1^1^1^1^1^1^1,100,300,!1^1^1^1^1^1^1^1)MidiDelay({[16rr'f#c#"a'rr'f#c#"a'rr'f#c#"a'rr'f#c#"a'rrr
作者からのコメント
<<<<<<<<<< Progressive House >>>>>>>>>> Available Now!!!!!!!! Please Maximize the Volume of the Speaker or Headphone!!!!!!!
作曲者
Pitchbend Master Records
ライセンス
🌐パブリックドメイン商用利用 ○改変 ○改変も転載も自由
転載
許可しない
推奨音源
msgs
ピコサクラ対応
未対応
ピコサクラバージョン
0.2.3
投稿日時
2010-09-04 22:23
更新日時
2010-09-04 22:23
お気に入り
さくらもどきDj Hino騎士王321GOMAゴロニャ~ゴ
ダウンロード数
525
→この曲(id:217)に問題がある場合こちらへ

感謝のコメント

this is Progressive House!
Electric sound is so cool.
Great job!
音助2010/09/07
so nice !
rhythm track of base and hi-hat is cool duet.

you're amazing, cause express high-quality sound by MSGS.
Akira.K2010/09/07
this is sounds great!!
Dj Hino2010/09/07
coooooooool!
Thanks for every!!!

>this is Progressive House!
Yes! I luv Progrsv Sound!!
Progrsv House has a groove that for dancin'

>rhythm track of base and hi-hat is cool duet
Balance of rhythm is needin' pitchbend adjustment.
thanx

>this is sounds great!!
MSGS has a possibility
MSGS is eternity
MSGS is not dead!

>coooooooool!
Thanks!! You're Hotttt :D
この曲に「ありがとう」を伝えませんか?
ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。