「沙羅曼蛇」一面BGM作り直し

PANが出来る様になつたなら作り直さないと駄目でせう、といふか前のはデータ的にも鳴る音的にも無かつたことにしたい。尚、パワーなんとかいふ曲名を頑なに書かないのは仕様です。

沙羅曼蛇 stage1

$e_bass=t155 l12 o3 @1 q12 v5 @E1,0,24,48,12 ;
$snaredrum=t155 l48 o3 @4 q16 v8 @E1,0,16,4,8 ;
$bassdrum=t155 l48 o1 @4 q16 v14 @E1,0,5,1,0 ;
$tom=t155 l48 o5 @2 v15 @E1,0,16,4,1 ;
$melody1=t155 @1 o6 l12 q16 v4 @E1,1,64,32,12 @P96 ; 
$melody2=t155 @1 o7 l12 q16 v1 @E1,4,127,48,12 @D8 @P127 ; 
$melody3=t155 @1 o6 l12 q16 v4 @E1,1,64,32,12 @P32 ; 
$melody4=t155 @3 o7 l12 q16 v1 @E1,1,64,48,12 @D8 @P0 ; 

$sd=@n106c&@n24c&@n7c&@n0c ;
$bd=@n127c&@n126c&@n124c&@n122c ;
$ht=e&e-&d&d- ;
$mt=@P96 >b&b-&a&a-< @P64 ;
$lt=@P32 >e&e-&d&d-< @P64 ;

$e_bass
b-<b->b-<b-4> b-<b->b-<b-4> b-<b->b-<b-4> f4<fc>f
b-<b->b-<b-4> b-<b->b-<b-4> b-<fb-&b-4 cg<c&c4>>
/:4 dad<c>d<d> :/
/:16
/:2 /:4 dad<c>d<d> :/ /:4 cecb-c<c> :/ :/
/:4 b-<f>a-<f>f<f> :/ /:4 a<e>g<e>e<e> :/
/:4 b-<f>a-<f>f<f> :/ /:2 a<e>g<e>e<e> :/ /:2 dad<c>d<d> :/
:/
;

$snaredrum
/:2 r12 $sd $sd r12 $sd r12 r2 r12 $sd $sd r12 $sd l96 $sd $sd l48 v4 $sd r12 $sd r12 $sd r12 / v8 :/ v8
/:4 r4 $sd / r6 :/ r6
/:16
/:2 /:4 r4 $sd / r6 :/ r6 /:6 r12 / $sd :/ $sd r12 $sd $sd $sd $sd $sd v4 $sd r12 $sd r12 $sd r12 / v8 :/ v8
/:16 r4 $sd / r6 :/ r6
:/
;

$bassdrum
/:2 $bd r6 $bd r6 $bd r12 $bd r12 $bd r12 $bd r6 $bd r6 / r2 :/ r2
/:4 $bd r12 $bd r6 / $bd :/ $bd
/:16 
/:2 /:4 $bd r12 $bd r6 / $bd :/ $bd $bd r6 r4 $bd r6 r4 $bd r6 r4 r12 $bd r12 $bd r12 / $bd :/ $bd
/:16 $bd r12 $bd r6 / $bd :/ $bd
:/
;

$tom
/:2 r1 r2 $ht r12 $mt r12 $lt r12  :/ r1 r1 
/:16
/:2 r1 r1 r1 r2 $ht r12 $mt r12 $lt r12 :/
r1 r1 r1 r1 r1 r1 r1 r1
:/
;

$melody1
b-4 rfb- a-6e-6g6 f2 cde-a-b-<c> b-4 rfb- a-6e-6g6 f2 g2 a1& a1
/:16  q15
@P96 o6 /:2 defgfefededc >a2<d2 q16 rb-6b-4 rb-6b-4 rb-6b-6<cd-6d-d-c>b- :/
@P32 d4e4f4ga-g f4efed6cd4 >ab<cdc>b a2< ab<cdc>b a2<
d4e4f4ga-g f4efed6cd4 >ab<cdc>b a2< d1
:/
;

$melody2
b-4 rfb- a-6e-6g6 f2 cde-a-b-<c> b-4 rfb- a-6e-6g6 f2 g2 a1& a1
/:16 q15
@P127 o6 /:2 defgfefededc >a2<d2 q16 rb-6b-4 rb-6b-4 rb-6b-6<cd-6d-d-c>b-  :/
@P0 d4e4f4ga-g f4efed6cd4 >ab<cdc>b a2< ab<cdc>b a2<
d4e4f4ga-g f4efed6cd4 >ab<cdc>b a2< d1
:/
;

$melody3
d4 >rb-b- <c6>a-6<c6> b-4 rfb- a-4 <ce-a- d4 >rb-b- <c6>a-6<c6> b-4fb-<d c4>g<ce f#1 f1
/:16
@P32 @E1,1,64,32,12 q16 o6 r1 defgfefededc  q16 > re-6e-4 re-6e-4 re-6e-6fg-6g-g-fe- 
o5 r1 defgfefededc q16 re-6e-4 re-6e-4 re-6e-6fg-6g-g-fe- 
@P96 @E1,1,127,1,1 q13 o3 f4g4a-4 b-<c>b- a-4ga-g fref4 e4&e6r12 ef#gagf# e4&e6r12 <ef#gagf#
f4g4a-4 b-<c>b- a-4ga-g fref4 e2.c4 f1
:/
;

$melody4
d4 >rb-b- <c6>a-6<c6> b-4 rfb- a-4 <ce-a- d4 >rb-b- <c6>a-6<c6> b-4fb-<d c4>g<ce f#1 f1
/:16
@3 @E1,1,64,48,12 @P0 q16 o6 r1 defgfefededc  q16 > re-6e-4 re-6e-4 re-6e-6fg-6g-g-fe- 
o5 r1 defgfefededc q16 re-6e-4 re-6e-4 re-6e-6fg-6g-g-fe- 
@1 @E1,1,127,1,1 @P127 q13 o4 f4g4a-4 b-<c>b- a-4ga-g fref4 e4&e6r12 ef#gagf# e4&e6r12 <ef#gagf#
f4g4a-4 b-<c>b- a-4ga-g fref4 e2.c4 f1
:/
;