home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
comp04
/
cp04_i.mml
< prev
next >
Wrap
Text File
|
1980-01-02
|
2KB
|
90 lines
#ifdef cp04_i
# include "comp04.h"
$TEMPO2
. next
#define END_FLG
#endif
/*====================================================================
r1 r1
r1 r1
r1 r1
g1 r1
d1 r1
%d%0 $T_BASFM $BASFM $BsG_01 $BsG_02
%d%4 $T_BASFM $BASFM >[#9 $BsG_01 $BsG_02
%d%0 $T_BASS $BASS $BsG_01 $BsG_02
%d%4 $T_BASS $BASS >[#9 $BsG_01 $BsG_02
#ifdef CLS_CONT
# undef CLS_CONT
# define A $CLS(8) r8
#else
# define A $T_BRS $BRS(8) r8
#endif
$DRUMS $A l8 $T_BRS ($BRS)2r4 r1
$DRUMS $DA_01 $DA_02
$DRUMS l8r $T_BRS $BRS $T_SNR $SNR4 r4 $SNR4 $DB_02
$DRUMS $DC_03 $DC_03
/*----------------------------------------------------------------------
r1
r1
r1
r1
r1
$BsF_01 $BsF_02
$BsF_01 $BsF_02
$BsF_01 $BsF_02
$BsF_01 $BsF_02
$DD_01 r1
$DA_01 $DA_02
$DB_02 $DB_02
$DC_01 $DC_02
/*----------------------------------------------------------------------
r1
r1
r1
r1
r1
$BsG_01 $BsG_02
$BsG_01 $BsG_02
$BsG_01 $BsG_02
$BsG_01 $BsG_02
$DD_01 r1
$DA_01 $DA_02
$DB_02 $DB_02
$DC_03 $DC_03
/*----------------------------------------------------------------------
#ifndef END_FLG
r1
r1
r1
r1 r2 %d%0 l8 $T_BACA $BACA ffrg&
r1 r2 %d%0 l8 $T_BACA $BACA ccrd&
$BsF_01 $BsF_03
$BsF_01 $BsF_03
$BsF_01 $BsF_03
$BsF_01 $BsF_03
#define CLS_CONT
$DD_01 $DD_02
$DA_01 l8$T_HH ($CHH)4 $CHH $OHH & $OHH r
$DB_02 l8$T_TT $TT1 $TT1 $T_SNR $SNR4 $SNR8$SNR8 r4
$DC_01 l8$T_BSD $BSD $BSD r4r4 [#16{r$BSD$BSD}8]#16 $BSD
#else
r1
r1
r1
r1 r1
r1 r1
$BsF_01 $BsF_04
$BsF_01 $BsF_04
$BsF_01 $BsF_04
$BsF_01 $BsF_04
$DD_01 l8r4.$T_CLS [#30$CLS]#30r4r4
$DA_01 l8$T_HH ($CHH)4 $CHH $OHH rr
$DB_02 l8$T_TT $TT1 $TT1 $T_SNR $SNR4 $SNR8$SNR8 r4
$DC_01 l8$T_BSD $BSD $BSD r4 $BSD $BSD r4
#endif
/*--------------------------------------------------------------------
#ifdef cp04_i
. end
#endif