home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 2004 June / VPR0406.ISO / OLS / SAKURA / sakura.lzh / sample / 23.mml < prev    next >
Text File  |  2002-08-11  |  4KB  |  184 lines
  1. //_初期設定
  2. TrackName     = {"G'"}            //曲名
  3. Copyright     = {"aris-α"}       //著作権表示
  4. Tempo         =170                //テンポ設定
  5. 拍子   4,4                        //拍子記号の設定→2,4は2/4拍子を表す
  6. System.MeasureShift(1);           //音源初期化用に発音を１小節遅らせる
  7. ResetGS;ResetXG;ResetGM;r1;       //音源の初期化
  8. System.Include(stdmsg.h);         //リセット命令のため
  9. System.Include(fadeio.h);
  10. System.Include(chord3.h);
  11.  
  12. //------------------------------------------------------------------------------
  13. TR=1 //*****bass*****
  14. @44 o3 q100 v95 REV(100) CHO(20) M(15) P(020)
  15. l1
  16. Fadein(2)
  17. [
  18. g a a+ `c d+1^1 f1^1
  19.  
  20. g a a+ `c 
  21. v105
  22. d+1^1 f1^1
  23. v95
  24. [d+1^1 a+1^1 
  25. d+1^1 :f1^1]
  26. a+ a
  27.  
  28. g f d+ d2 f2 
  29. g f d+ a2 f2 
  30. g f d+ d2 f2 
  31. d+1^1 f f
  32. ]
  33.  
  34. //------------------------------------------------------------------------------
  35. TR=2 //*****bass*****
  36. @43 o3 q100 v90 REV(100) CHO(20) M(15) P(088)
  37. l1
  38. Fadein(2)
  39. [
  40. g a a+ `c d+1^1 f1^1
  41.  
  42. g a a+ `c 
  43. v100
  44. d+1^1 f1^1
  45. v90
  46. [d+1^1 a+1^1 
  47. d+1^1 :f1^1]
  48. a+ a
  49.  
  50. g f d+ d2 f2 
  51. g f d+ a2 f2 
  52. g f d+ d2 f2 
  53. d+1^1 f f
  54. ]
  55. //------------------------------------------------------------------------------
  56. TR=3
  57. @1 q80 v127 l8 REV(120) CHO(030)
  58. Fadein(2)
  59. [
  60. [8 g c d g c d g d
  61. g c d g c d g d]
  62. [8 g c d g c d g d
  63. g c d g c d g d]
  64.  
  65. [3g "a+ d g "a+ d g d
  66. a c f a c f a f
  67.  g c d+ g c d+ g d+ 
  68. f "a c f "a c f c ]
  69.  
  70. [d+ "g "a+ d+ "g "a+ d+ "a+]
  71. [f "a c f "a c f c ]
  72. ]
  73. //------------------------------------------------------------------------------
  74. TR=4
  75. @53　q100 v120 REV(100) CHO(040) P(84)
  76. rrrrrrrr rrrrrrrr rrrrrrrr rrrrrrrr
  77.  l1
  78. d  '"a c+'  '"a+ d' 'c e' 
  79. 'd+ g'1^1 'f a'1^1 
  80.  
  81. d+1^1 f1^1 g1^1 g1f1
  82.  
  83. d+1^1 f1^1 g1^1 f f+
  84.  
  85. g a f2 "a+2 d2 f2
  86. g a f2 g2 a2 `c2
  87. g a f2 "a+2 d2 f2
  88. g1^1 a1 a4 `c4 f 2
  89.  
  90.  d c+ d e g1^1 a1^1
  91. d  '"a c+'  '"a+ d' 'c e' 
  92. 'd+ g'1^1 'f a'1^1 
  93.  
  94. d+1^1 f1^1 g1^1 g1f1
  95.  
  96. d+1^1 f1^1 g1^1 f f+
  97.  
  98. g a f2 "a+2 d2 f2
  99. g a f2 g2 a2 `c2
  100. g a f2 "a+2 d2 f2
  101. g1^1 a1 a4 `c4 f2
  102.  
  103. //------------------------------------------------------------------------------
  104. TR=5
  105. @95　q100 v100 REV(120) CHO(020) M(15) P(44)
  106. rrrrrrrr rrrrrrrr rrrrrrrr rrrrrrrr
  107.  l1
  108.  d  c+ "f "g '"d+"a+'1^1 '"fc'1^1 
  109. '"d+"g'1^1 '"f"a+'1^1 '"d+"g'1^1 '"f"a+'1 '"f"a'1
  110. '"d+"g'1^1 '"f"a+'1^1 '"d+"g'1^1 '"f"a+'1'"f+"a'1
  111. [3"g '"d"f' '"d+"a+' '"f"a']
  112. '"d+"g"a+'1^1 '"f"a c d+'1^1
  113.  
  114.  d  c+ "f "g '"d+"a+'1^1 '"fc'1^1 
  115. d  c+ "f "g '"d+"a+'1^1 '"fc'1^1 
  116. '"d+"g'1^1 '"f"a+'1^1 '"d+"g'1^1 '"f"a+'1 '"f"a'1
  117. '"d+"g'1^1 '"f"a+'1^1 '"d+"g'1^1 '"f"a+'1'"f+"a'1
  118. [3"g '"d"f' '"d+"a+' '"f"a']
  119. '"d+"g"a+'1^1 '"f"a c d+'1^1
  120.  
  121. //------------------------------------------------------------------------------
  122. TR=6
  123. @50 q100 v110 REV(090)
  124. Fadein(3)
  125. [
  126. [#KEY_G;T1(!1)
  127. #KEY_A;T2(!1) 
  128. #KEY_Ap;T1(!1) 
  129. #KEY_C;T1(!1) 
  130. #KEY_Dp;T3(!1^1,-2)
  131. #KEY_F;T1(!1^1,-2)]
  132.  
  133. [#KEY_Dp;T1(!1^1,-2)
  134. #KEY_Ap;T1(!1^1) 
  135. #KEY_Dp;T3(!1^1,-2):
  136. #KEY_F;D1(!1,-2)
  137. #KEY_F;T1(!1,-2)]
  138.  
  139. #KEY_F;SD_D2(!1,-2,,1)
  140. #KEY_A;SD4(!1)
  141.  
  142. [3#KEY_G;T2(!1,1)
  143. #KEY_F;T1(!1,-2) 
  144. #KEY_Dp;T4(!1,-2) 
  145. #KEY_F;T1(!1,-2)]
  146.  
  147. #KEY_Dp;T1(!1^1,-2) 
  148. #KEY_F;T1(!1^1,-2) 
  149. ]
  150.  
  151. //------------------------------------------------------------------------------
  152. TR=7 //*****sub*****
  153. @50 q100 v110 o3 REV(090)
  154. Fadein(3)
  155. l1
  156. [
  157. [r r r r d+1^1 f1^1]
  158.  
  159. d+1^1 r r d+1^1 c f
  160. d+1^1 r r d+1^1 r r
  161.  
  162. [3 g f r f]
  163. d+1^1 f1^1
  164. ]
  165.  
  166.  
  167.  
  168.  
  169.  
  170.  
  171.  
  172. //------------------------------------------------------------------------------
  173. //Drums
  174. //------------------------------------------------------------------------------
  175. TR=10 v72 REV(90)
  176. $c{n49,} //Crash cymbal
  177.  
  178. Rythm{rrrrrrrr rrrrrrrr rrrrrrrr rrrrrrrr
  179.       crrrrrrr 
  180.  
  181.  
  182.  
  183. }
  184.