home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
comp09
/
cp09_e.mml
< prev
next >
Wrap
Text File
|
1980-01-02
|
3KB
|
150 lines
/*
/* 【E】 《間奏》
/*
#ifdef cp09_e
# include "comp09.h"
$TEMPO
$TEMPO
$T_MELA $MELA [#8
$T_MELC $MELC [#8
%d%0 $T_BACB $BACB >
$BACB_DT $T_BACB $BACB >
. next
#endif
/*---------------------------------------------------------------------------
/*===========================================================================
r1 /* Em (e,g,b) D(d,a,f+)
r1
#define $A $cho(e,32,8,x,0,-400)&$slide(u,[#1e,32,56,,x,-500,-3000)
$A
$A
#define A ({[#4%c-8e[#2%cd<[#2%c+8b>}4)8
$A
$A
$T_CODA $CODA ]#4 l8g2.&gf+ ]#4f+1
$T_CODA $CODA ]#4 l8e2.&ed ]#4d1
$T_ELEP $ELEP l8 ]#4e4e4e4e!#+3d& ]#4d4d4d4d4
$T_ELEP $ELEP l8 ]#4<b4b4b4b!#+3b& ]#4a4a4a4a4
$T_BASPCM $BASPCM ]#8l8eeeeeee!#+4d& dddddddd
r1
r1
$DRUMS $DD_A1 $DD_A1
$DRUMS $DB_A1 $DB_A1
$DRUMS $DC_01 $DC_02
/*---------------------------------------------------------------------------
r1
r1
#define $A $slide(u,[#1e,32,64,,x,-3100,-7200)
$A
$A
#define A ({[#4%c-8e[#2%cd<[#2%c+8b>}4)8
$A
$A
]#4e2.&ef+ f+1
]#4c2.&cd d1
]#2c4c4c4c!#+3d& d4d4d4d4
]#2a4a4a4a!#+3b& a4a4a4a4
l8ccccccc!#+4d& dddddddd
r1
r1
$DD_A1 $DD_A1
$DB_A1 $DB_A1
$DC_01 $DC_03
/*---------------------------------------------------------------------------
/*===========================================================================
r1 /* Em (e,g,b) D(d,a,f+)
r1
r1
r1
%d%0 $T_BACC $BACC l8b2.&ba& a1
$BACC_DT $T_BACC $BACC l8g2.&gf+& f+1
#define A l8<b4.>e&e4gb& b1
$T_CODA $CODA l8u-30 ]#25 $A
$T_CODA $CODA l8u+30 ]#25 $A
$T_ELEP $ELEP l8 ]#4e4e4e4e!#+3d& d4d4d4d4
$T_ELEP $ELEP l8 ]#4<b4b4b4b!#+3b& a4a4a4a4
$T_BASPCM $BASPCM ]#8l8eeeeeee!#+8d& dddddddd
r1
r1
$DRUMS $DD_A1 $DD_A1
$DRUMS $DB_A1 $DB_A1
$DRUMS $DC_04 $DC_05
/*---------------------------------------------------------------------------
r1
r1
r1
r1
g2.&ga& a1
e2.&ef+& f+1
#define A b>c<ba&agba& a1
#define A g4.a&a4gf+& f+1
$A
$A
c4c4c4c!#+3d& d4d4d4d4
a4a4a4a!#+3b& a4a4a4a4
l8ccccccc!#+8d& dddddddd
r1
r1
$DD_A1 $DD_A1
$DB_A1 $DB_A1
$DC_06 $DC_07
/*---------------------------------------------------------------------------
/*===========================================================================
r1 /* Em (e,g,b) D(d,a,f+)
r1
r1
r1
l8b2.&ba& a1
l8g2.&gf+& f+1
#define A l8e4.g&g4&gg f+ed4&d2
$A
$A
e4e4e4e!#+3d& d4d4d4d4
b4b4b4b!#+3b& a4a4a4a4
l8eeeeeee!#+8d& dddddddd
r1
r1
$DD_A1 $DD_A1
$DB_A1 $DB_A1
$DC_04 $DC_05
/*---------------------------------------------------------------------------
r1
r1
r1
r1
l8g2.&ga& a1
l8e2.&ef+& f+1
#define A l8c4.e&e4&ga& agf+4&f+2
$A
$A
c4c4c4c!#+3d& d4d4d4d4
a4a4a4a!#+3b& a4a4a4a4
l8ccccccc!#+8d& dddddddd
r1
r1
$DD_A1 $DD_A1
$DB_A1 $DB_A1
$DC_06 $DC_07
/*---------------------------------------------------------------------------
r1
r1
r1
r1
l8a2.&ab& b1
l8f+2.&f+g& g1
#define A l8d2&dcde& e1
$A
$A
d4d4d4d!#+3d& e4e4e4e4
a4a4a4a!#+3b& g4g4g4g4
l8ddddddd!#+8e& eeeeeege
r1
r1
$DD_A1 $DD_A1
$DB_A1 $DB_A1
$DC_04 $DC_05
/*---------------------------------------------------------------------------
#ifdef cp09_e
. end
#endif