home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
comp04
/
cp04_c.mml
< prev
next >
Wrap
Text File
|
1980-01-02
|
3KB
|
156 lines
/*
/* 【C】パート
/*
#ifdef cp04_c
# include "comp04.h"
$TEMPO
. next
#endif
/*
/*======================================================================
$MEL_LFO $MEL_LFO
#define A l8 ]#4 b-2g2 >c4.<b-&b-4]#4a[#4
$T_MELA $MELA $A
$T_MELB $MELB $A
%d%0 $T_BACA $BACA [#4 l8 g1& g2.f4
%d%32 $T_BACA $BACA [#4 l8 d1& d2.f4
#define A l8gggggggg gggggggg
$T_BASFM $BASFM $A
$T_BASFM $BASFM >[#9 $A
$T_BASS $BASS $A
$T_BASS $BASS >[#9 $A
#ifdef CLS_CONT
# undef CLS_CONT
# define A $CLS(8) r8
#else
# define A $T_BRS $BRS(8)$BRS(8)
#endif
$DRUMS $A l8 r4$T_BRS ($BRS)2r4 $DD_03
$DRUMS $DA_04 $DA_04
$DRUMS $DB_02 $DB_02
$DRUMS $DC_03 $DC_03
/*----------------------------------------------------------------------
$MEL_LFO $MEL_LFO
#define A l8 f1& f1
$A
$A
g64&a-64&a32&a16&a4f&f2& ffefgab->c<
g64&a-64&a32&a16&a4f&f2& %d16 fefgab->c16< %d%32
#define $A ffffffff ffffffff
$A
$A
$A
$A
$DD_03 $DD_03
$DA_04 $DA_04
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
$MEL_LFO $MEL_LFO
#define A b-2g2 b-4.>c&c4<b-
$A
$A
#define A >c2.<g4 b-4.g4.>c4
$A
$A
#define $A gggggggg gggggggg
$A
$A
$A
$A
$DD_03 $DD_03
$DA_04 $DA_04
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
$MEL_LFO $MEL_LFO
#define A a1& a1
$A
$A
#define A c32&d-32&d16&d4c&c2& c2.<b-4
$A
$A
#define $A b-b-b-b-b-b-b-b- b-b-b-b-b-b-b-b-
$A
$A
$A
$A
$DD_03 $DD_03
$DA_04 $DA_04
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
/=======================================================================
$MEL_LFO $MEL_LFO
#define A >d32&e-32&e16&e&e c&c2& c1
$A
$A
#define A {ab->c< b->cd}1 {cde def}1 /* コノ辺ノ ナゲヤリナ展開はチョット… */
$A
$A
#define $A aaaaaaaa aaaaaaaa
$A
$A
$A
$A
$DD_03 $DD_03
$DA_04 $DA_04
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
$MEL_LFO $MEL_LFO
#define A e-32&e32&f16&f4d&d2& d1
$A
$A
#define A g2d4<b-g& gb->c{dd}<g4 /* ナンカ変ダケド…。マッイイカ */
$A
$A
#define $A gggggggg gggggggg
$A
$A
$A
$A
$DD_03 $DD_03
$DA_04 $DA_04
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
$MEL_LFO $MEL_LFO
#define A d32&e-32&e16&e&e c&c2& c2&c4.c
$A
$A
#define A a1 ]#5agab->c<b-ag&
$A
$A
#define $A aaaaaaaa aaaaaaaa
$A
$A
$A
$A
$DD_03 $DD_03
$DA_04 $DA_04
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
$MEL_LFO $MEL_LFO
#define A d1& d1
$A
$A
#define A g1& gggrg4r4
$A
$A
#define $A gggggggg ggggggg]#3g&
$A
$A
$A
$A
#define CLS_CONT
$DD_03 $DD_04
$DA_04 l8$T_HH ($CHH)2rr $CHH $OHH & $OHH r
$DB_02 l8$T_TT $TT1 $TT1 $T_SNR $SNR4 $SNR8$SNR8 r4
$DC_03 l8$T_BSD $BSD $BSD r4r4 [#16{r$BSD$BSD}8]#16 $BSD
/*----------------------------------------------------------------------
#ifdef cp04_c
. end
#endif