home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
arrg01
/
ag01_c.mml
< prev
next >
Wrap
Text File
|
1980-01-02
|
2KB
|
107 lines
#ifdef ag01_c
# include "arrg01.h"
# define END
#endif
.next
/*===========================================================================
$TEMPO r1 r1 /* C(c,e,g),G(g,e,d) C */
r1 r1
#define A l8>c2$cho(d,128,8,x,-400,0)&d16cde cr<ergr>cr
$T_MELA $MELA $A
$T_MELB $MELB $A
$T_MELC $MELC $A
$T_BACK $BACK ]#8 l8>rccr rddr rccr rccr
$T_BACK $BACK ]#8 l8 rggr rbbr rggr rggr
$T_BACK $BACK ]#8 l8 reer rggr reer reer
r1 r1
r1 r1
$T_BASPCM $BASPCM l16crcc crcc <grgg gr>d<g> crcc crcc crcc crcc
r1 r1
$DRUMS $T_CLS $CLS(4)r4r2 r1
#define A l8$T_HH r4 $OHH$CHH $CHH$CHH$OHH$CHH
$DRUMS $A $DA_A5 /* ライドシンバル */
$DRUMS $DB_A1 $DB_A1
$DRUMS $DC_01 $DC_02
.next
/*---------------------------------------------------------------------------
r1 r1 /* C */
r1 r1
#define A erergfef g2err4
$A
$A
$A
rccr rccr rccr rccr
rggr rggr rggr rggr
reer reer reer reer
r1 r1
r1 r1
crcc crcc crcc crcc crcc crcc crcc crcc
r1 r1
r1 r1
$DA_A5 $DA_A5
$DB_A1 $DB_A1
$DC_03 $DC_04
.next
/*---------------------------------------------------------------------------
r1 r1 /* F C */
r1 r1
#define A >crcrdc<ba g2f4e4
$A
$A
$A
rccr rccr rccr rccr
raar raar rggr rggr
rffr rffr reer reer
r1 r1
r1 r1
frff frff frff frff crcc crcc crcc crcc
r1 r1
r1 r1
$DA_A5 $DA_A5
$DB_A1 $DB_A1
$DC_01 $DC_02
.next
/*---------------------------------------------------------------------------
#ifndef END
r1 r1 /* G7 C */
r1 r1
#define A drdr$cho(e,128,8,x,-300,0)&e16def c4r4r2
$A
$A
$A
rddr rddr rccr rccr
rggr rggr rggr rggr
rffr rffr reer reer
r1 r1
r1 r1
<grgg grgg grgg gr>d<g> crcc crcc crcc crcc
r1 r1
r1 r1
$DA_A5 l8$T_HH $CHH r r4 $T_TT $TT3 rr4
$DB_A1 l8$T_TT r $TT1 r $TT2 $T_SNR ]#8 ($SNR8)4
$DC_03 l8$T_BSD $BSD(4){r$BSD$BSD}8 r $BSD(4) $BSD $BSD
#else
r1 r1
r1 r1
#define A drdr$cho(e,128,8,x,-300,0)&e16def c4r4r2
$A
$A
$A
rddr rddr rccr ]#8c rr4
rggr rggr rggr ]#8g rr4
rffr rffr reer ]#8e rr4
r1 r1
r1 r1
<grgg grgg grgg gr>d<g> crcc crcc ]#4c8 r8r4
r1 r1
r1 r1
$DA_A5 l8$T_HH l8$T_TT r $TT1 r $TT2 $T_TT ]#4 $TT3 rr4
$DB_A1 l8$T_SNR r4 $SNR4 ]#10 $SNR8 r r4
$DC_03 l8$T_BSD $BSD(4)$BSD(4) ]#6$BSD r r4
#endif
.next
/*---------------------------------------------------------------------------
#ifdef ag01_c
. end
#endif