TrackName = {"Monochromic"}; Copyright = {"AMIO"}; /* 単調フレーズを繰り返す系です。 (こういうのってミニマルミュージックって言うのでしょうか?) 伴奏を入れても良かったと思うのですが、あえてピアノのみです。 睡眠導入用のBGMとしても使えそうです。 */ Tempo=96; SoundType=1;ResetGS;System.MeasureShift=1; TimeSignature(3,4); Str M1 = {EP.T(127,96,!1^1^1)[8v.N(87,107,127)c8d8e8]}; Str M2 = {EP.T(127,96,!1^1^1)[8v.N(87,107,127)e-8f8g8]}; Str M3 = {EP.T(127,96,!1^1^1)[8v.N(87,107,127)g8a8b-8]}; Str M4 = {EP.T(127,96,!1^1^1)[8v.N(87,107,127)f8g8a-8]}; Str B1 = {EP.T(127,80,!1^1^1)[8c4^8]}; Str B2 = {EP.T(127,80,!1^1^1)[8e-4^8]}; Str B3 = {EP.T(127,80,!1^1^1)[8g4^8]}; Str B4 = {EP.T(127,80,!1^1^1)[8f4^8]}; Str B5 = {EP.T(127,80,!1^1^1)[8b-4^8]} TR(1) @1 V(127) P(56) REV(20) Time(1:1:0) o6 q72 [M1;M2;M1;M2; M3;M4;M4;M2; M3;M4;M4;M1;] // FadeOut V.T(127,0,!1^1^1^1^1^1) M1;M2; TR(2) @1 V(80) P(80) REV(20) Time(1:1:0) o6 q72 t32 [M1;M2;M1;M2; M3;M4;M4;M2; M3;M4;M4;M1;] // FadeOut V.T(80,0,!1^1^1^1^1^1) M1;M2; TR(8) @1 V(120) P(48) REV(20) Time(1:1:0) o4 q100 t.Random(2) [B1;B2;B1;B2; B3;B4;B5;B2; B3;B4;B5;B1;] // FadeOut V.T(120,0,!1^1^1^1^1^1) B1;B2; TR(9) @1 V(60) P(30) REV(20) Time(1:1:0) o3 q100 t.Random(2) [B1;B2;B1;B2; B3;B4;B5;B2; B3;B4;B5;B1;] // FadeOut V.T(60,0,!1^1^1^1^1^1) B1;B2; TR(10) Time(1:1:0)