WANDERERS FROM Ys 時の封印 - いさぢちんメモ

イース3の時計塔の曲。

ひさしぶりにPC-98のMUAP98でMMLを書いたついでにMML記法にしてみた。MML自体はベタ打ちなので、オクターブの不等号を置き換えてループを書き換えればそのまま再生できると思ったのに、割と面倒で一から書いても手間はあんまり変わらなかったような気がしないでもなかったり。

MUAP98 FM音源版

~~http://isaji.jp/mp3/ys320fm_20091220.mp3:sound~~

ソースファイル：http://isaji.jp/muap/ys320_20091220.mus

MML記法

$BPM=t148;
$roop=4;

$melo1=l8@3@w85@e1,2,20,76,5 q15;
$PSG=l8@3@e1,0,0,40,1 q15;
$base=l16@3@w20@e1,0,60,0,10  q14;
$Close=l16@4@n32@e1,0,15,1,3 v2@p96;
$noise=l16@4@n105@e1,0,10,20,0 v5 q4;
$Tom=l16@2@e1,0,15,4,1 v15;

$SD=@2@e1,0,25,35,1  o4e64&d64&c64r64;
$BD=@0@e1,0,15,5,1   o4c64&>c64&>c64r64;
$TTH=o4@p40a64&g+64&g64&f+64;
$TTM=o4@p80 f64&e64&d+64&d64;
$TTL=o3@p104 a64&g+64&g64&f+64;

$Amelo=o5l8d4e4f4<c>b-&b-2.ga&a2&a<cfe&e1 d2&dc>gb-&b-1a2.gf&f4efrc&c4 d4<d.r16r4.e16f16g4.f16e16d2f4.e16f16g4.f16g16a1 rad2.&d4.b-agfgf4.e4c+4>a<d2. d16e16f16g16;
$Bmelo=f4.e4.d4g4.f4.ga&a1&a2.d16e16f16g16f4.e4.d4g4.f4.g4f16e16d&d2.&d2.d16e16f16g16f4.e4.d4g4.f4.ga&a1&a2.d16e16f16g16f4.e4.d4g4.f4.g4f16e16d&d2 <cd&d1;
$SSGA=d4.d8&d2a4.g8&g2g4.f8&f2e4.c8&c4c+4 d4.d8&d2a4.g8&g2g4.f8&f2c2.c+4 d1g1f4.e8&e2l8a<ec+>b-agec+ d1g1a1d1;
$SSGB=l16 /:o5/:4b-<dgb->:/ </:4ceg<c>:/ /:8dfa<d>:/ >/:4b-<dgb->:/ </:4ceg<c>:/ /:6dfa<d>:/<dc+>b-agfe /c+:/;

$basa=/:4drdd://:4grgg://:4frff://:2eree:/c8<c8>c+8<c+8> /:4drdd://:4grgg://:4frff://:3crc<c>://:3c+:/<c+> /:4drdd://:4grgg://:frff://:grgg://:araa:/c8<c+8>c+8<c+8>/:4drdd://:4grgg://:4araa://:4drdd:/;
$basb=/:/:>/:4b-rb-<b->:/ < /:4crc<c>:/ d8drc8drr8c8r8d4c8r8d8/d4c4:/c4d4:/;

$BPM$melo1 v5 @p42 /:$roop
$Amelo $Bmelo
:/;

$BPM$melo1 v5 @d8@p86 /:$roop
$Amelo $Bmelo
:/;

$BPM$base v5o3 /:$roop
$basa $basb
:/;
$BPM$PSG v5 /:$roop
o4$SSGA $SSGB c+
:/;

$BPM$PSG v2/:$roop
o5$SSGA r32$SSGBc+32
:/;

$BPM$Close /:$roop
/:4/:15crcc:/cccc:/ /:16/:4cccc:/:/
:/;


$BPM v15 l16 /:$roop
/:15$BDr8.$SDr8.:/ $BDr8.$SDr$SD$SD /:15$BDr8.$SDr8.:/ r4$SD$SD$SD$SD

/: /: /:$BD$BDr$SDr8.$BD$BDr$BDr$SDr8.:/ /:3$BDr$BDr$SDr$BDr:/ / $BDr$BDr$SDr$SD$SD:/ $BDr$BD$BD$SD$SD$SD$SD:/
:/;
$BPM $Tom v13 /:$roop
/:15r1:/ r2 $TTH$TTM$TTM$TTLr4 /:16r1:/
:/;

$BPM $noise /:$roop
/:15r4c4:/ r4crcc /:15r4c4:/ r4cccc
/: /: /:r8.cr8.rr8r8c4:/ /:3r8r8c8r8:/ / r8r8crcc:/ r4cccc:/
:/;