home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
comp09
/
cp09_f.mml
< prev
next >
Wrap
Text File
|
1980-01-02
|
4KB
|
162 lines
/*
/* 【F】パート ([B]パートの寂しいパート)
/*
#ifdef cp09_f
# include "comp09.h"
$TEMPO
. next
#endif
/----------------------------------------------------------------------------
/============================================================================
r1 /* Em (e,g,b) D(d,a,f+)
r1
#define $A l8 [#16 egbbbb&b>c< ba&a4&a2
$T_MELA $MELA $A /* Mel
$T_MELB $MELB $A
%d%0 $T_BACC $BACC [#6 l8b1 a1
$BACC_DT $T_BACC $BACC [#6 l8g1 f+1
$T_CODA $CODA l8 ]#4g1 f+1
$T_CODA $CODA l8 ]#4e1 d1
$T_ELEP $ELEP l8 [#9e4e4e4e4 d4d4d4d4
$T_ELEP $ELEP l8 [#9<b4b4b4b4 a4a4a4a4
$T_BASPCM $BASPCM l8ee&eereee dd&ddrddd
r1
$DRUMS $T_SYM [#25$SYM(4)r4r2 r1
$DRUMS $DA_02 $DA_02
$DRUMS $DB_02 $DB_02
$DRUMS $DC_08 $DC_09
/*---------------------------------------------------------------------------
r1 /* D (d,a,f+) C (c,g,e)
r1
#define $A l8 df+aaaa&ab a4g4&g4.g
$A/* Mel
$A
a1 g1
f+1 e1
f+1 e1
d1 c1
d4d4d4d4 c4c4c4c4
a4a4a4a4 g4g4g4g4
l8dd&ddrddd cc&ccrccc
r1
r1
$DA_02 $DA_02
$DB_02 $DB_02
$DC_08 $DC_09
/*---------------------------------------------------------------------------
r1 /* C (c,g,e) D (d,a,f+)
r1
#define $A l8 cegggg&ga g4f+4&f+4.g
$A/* Mel
$A
g1 a1
e1 f+1
e1 f+1
c1 d1
c4c4c4c4 d4d4d4d4
g4g4g4g4 a4a4a4a4
l8cc&ccrccc dd&ddrddd
r1
r1
$DA_02 $DA_02
$DB_02 $DB_02
$DC_08 $DC_09
/*---------------------------------------------------------------------------
r1 /* D (d,a,f+)
r1
#define $A l8 f+2f+gaf+& f+1
$A
$A
a1 >d1<
f+1 b1
l8f+2.f+4 f+1
l8d2.d4 d1
l8f+4f+4f+4f+4 b4b4b4b4
l8d4d4d4d4 f+4f+4f+4f+4
l8dd&ddrddd f+f+&f+f+rf+f+f+
r1
r1
$DA_02 $DA_02
$DB_02 $T_CLP r4 $CLP4 r4$CLP(8)$CLP(8)
$DC_08 $DC_10
/----------------------------------------------------------------------------
/*===========================================================================
r1 /* Em (e,g,b) D(d,a,f+)
r1
#define $A l8 [#12 egbbbb&b>c< ba&a4&a2
$MELA $A
$MELB $A
$BACC [#6 l8b1 a1
$BACC [#6 l8g1 f+1
$CODA l8 ]#4g1 f+1
$CODA l8 ]#4e1 d1
$ELEP l8 [#9 e4e4e4e4 d4d4d4d4
$ELEP l8 [#9 <b4b4b4b4 a4a4a4a4
$BASPCM l8ee&eereee dd&ddrddd
r1
r4.$T_SYM [#14 $SYM(8&)$SYM(4)r4 r1 /* Drums
$DA_02 $DA_02
$DB_02 $DB_02
$DC_08 $DC_09
/*---------------------------------------------------------------------------
r1 /* D (d,a,f+) C (c,g,e)
r1
#define $A l8 df+aaaa&ab a4g4&g4.g
$A/* Mel
$A
a1 g1
f+1 e1
f+1 e1
d1 c1
d4d4d4d4 c4c4c4c4
a4a4a4a4 g4g4g4g4
l8dd&ddrddd cc&ccrccc
r1
r1
$DA_02 $DA_02
$DB_02 $DB_02
$DC_08 $DC_09
/----------------------------------------------------------------------------
r1 /* C (c,g,e) D (d,a,f+)
r1
#define $A l8 cegggg&ga g4f+4&f+4.]#2g
$A/* Mel
$A
g1 a1
e1 f+1
e1 f+1
c1 d1
c4c4c4c4 d4d4d4d4
g4g4g4g4 a4a4a4a4
l8cc&ccrccc dd&ddrddd
r1
r1
$DA_02 $DA_02
$DB_02 $DB_02
$DC_08 $DC_09
/*---------------------------------------------------------------------------
r1 /* D (d,a,f+)
r1
#define $A l8 ]#4f+2]#4f+]#2g]#2a]#2b& b1
$A
$A
#define A l8 [#4<b4.>]#4d&d4]#4f+4 ]#4d4.f+&f+4]#4b4
%d%0 $T_BACA $BACA $A
$BACA_DT $T_BACA $BACA $A
l8f+2.f+4 b1
l8d2.d4 f+1
d4d4d4d4 b4b4b4b4
>f+4f+4f+4f+4 f+4f+4f+4f+4
d!#+4f+&f+drddd ]#1f+!a&a]#1f+r]#1f+]#1f+]#1f+
r1
l8r1 $T_CLS [#8$CLS(4)$T_SYM r4 $SYM(4)]#2$SYM(4)
l8$T_HH $CHH$CHH$OHH$CHH r2 r1
#define A l8$T_TT$TT1 $TT2 r $T_SNR$SNR4 r $T_SNR$SNR8 $T_TT$TT2
#define B l8$T_TT$TT1 $TT2 $T_SNR$SNR8 r $T_TT$TT2 $TT3 r {$TT2$TT3$TT4}8
$A $B
l8$T_BSD $BSD$BSD $BSD(4) rr$BSD $BSD(4)r4 $BSD(4)$BSD $BSD
/----------------------------------------------------------------------------
#ifdef cp09_f
. end
#endif