home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
comp02
/
comp02c.mml
< prev
next >
Wrap
Text File
|
1980-01-02
|
1KB
|
55 lines
/*
/* 386|High-EUP Compiler用サンプル曲
/*
/* Compose & Program TaroPYON
/*
/* TABSIZE =4 (ソースを見るときはタブサイズを4にしてください)
/*
#include "comp02.h"
.title BGM #02-C / Ramble Clasher
$TEMPO
.next
$T_MELA /* Melody [A]
$T_MELB /* Melody [B]
$T_CODE /* CODE & Backing
$T_CODE /* CODE & Backing
$T_GUTFM $GUTFM /* Guitar
$T_GUITAR $GUITAR /* Guitar
$T_GUITAR $GUITAR /* Guitar
$T_OCHIT $OCHIT /* Orchestra hit
$T_BASS $BASS /* Active bass
$T_SBASS $SBASS /* Static bass
$DRUMS r4 /* Drums
$DRUMS r4 $T_HH !#+18$CHH(8)!$CHH(8)r2
$DRUMS r4 $T_SNR r2 $SNR(4)
$DRUMS r4 $T_BSD $BSD(8)$BSD(8)r8$BSD(16)$BSD(16) $T_SNR %d%10 $SNR(4) %d%0
/*-------------------------------------------------------------------------
#include "cp02_a.mml"
#include "cp02_b.mml
#define C_1ST
#include "cp02_c.mml"
#undef C_1ST
#define D_1ST
#include "cp02_d.mml"
#undef D_1ST
#include "cp02_b.mml
#include "cp02_c.mml"
#define D_2ND
#include "cp02_d.mml"
#undef D_2ND
#include "cp02_e.mml"
#define C_CONT
#include "cp02_c.mml"
#undef C_CONT
#include "cp02_c.mml"
#define D_3RD
#include "cp02_d.mml"
#define A_2ND
# include "cp02_a.mml"
.end