home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 3
/
FREEWARE.BIN
/
towns_os
/
taropyon
/
music
/
comp03
/
comp03.h
next >
Wrap
C/C++ Source or Header
|
1980-01-02
|
4KB
|
134 lines
/*
/* "comp03.h"
/*
.mmltype fb386
.fm fmtone2
.pcm ensam05
.partmax 11
/*
.nulline skip /* 空行は無視 */
#define TEMPO t145 /* テンポ */
/*
/* パート設定
/*
/* (発音数)
.part 0 0 /* Melody[A] (2) メロディは最低2音は
.part 1 1 /* Melody[B] (1) 重ねるベシ!
.part 2 2 /* CODE (1) コードは適当に音を抜
.part 3 3 /* CODE (1) いて,他のパートの発音
.part 4 4 /* BACKING[PCM] (1) 数をかせごう。
.part 5 5 /* BACKING[PCM] (1)
.part 6 6 /* BASS[FM] (1)
.part 7 7 /* BASS[PCM] (1)
.part 8 8 /* Drums Hi-Hat | Symbal (1) リズムパートが3つしか
.part 9 9 /* Drums Snere | Tom.Tom. (2) ないとやりくりが大変…。
.part 10 10 /* Drums Bass | etc. (2)
/*
/* ポリモードを使いこなすにはここンとこをマスタしないといけなンだなぁ
/*
.fmch 0:0 1:0 2:1 3:2 4:3
.pcmch 0:4 1:5
.fmch 5:6
.pcmch 2:7 3:8 4:9 5:9 6:10 7:10
/*
/* ノートアサイン定義
/*
#define TRK 6
#include "fmbass.def"
#define TRK 7
#include "pcmbass.def"
.noteasn 0 bnd 0-127:+38
.noteasn 1 bnd 0-127:-38
/*
/* 音色定義
/*
#define $T_MELA %d%0 @86%c0 /* [FM] メロディ */
#define MELA o4v#92q#122u0
#define $T_MELB %d16 @86%c0
#define MELB o4v#81q#99u0
#define $T_MELC %d%0 @86%c
#define MELC o6v#49q#99u0
#define T_CODE @27 /* [FM] コード&バッキング */
#define CODE o4v#99q#98%cu0
#define T_CODE2 @26
#define CODE2 o3v#68q#96%cu0
#define T_BACK3A @33%d%0
#define BACK3A o4v#80q#99%cu0
#define T_BACK3B @34%d%28 /* %28は16音符(%24)よりちょっと長い */
#define BACK3B o4v#76q#99%cu0
#define T_BASS @57%c /* [FM] ベース */
#define BASS o2v#89q#76u0
#define T_SBASS @4%c+4 /* [PCM] ベース */
#define SBASS o2v#98q#65u0
#define T_EPIANO @3%c-5 /* [PCM] エレピ+ストリングス */
#define EPIANO o3v#48q#96u0
#define T_OCHIT @5%c+3 /* オーケストラヒットは使ってないンだけど… */
#define OCHIT o4v#104q#99u0
/*
/* ドラム定義
/*
/* こういうふうに定義しとけば音色や音源を変えたときに楽だよ。
/* MIDI出力するのも簡単なことだし…。
/*
#define DRUMS @1q8u0
#define DRUMS_B @2q8u0
#define T_BSD o1@v104%c /* バスドラム */
#define BSD f
#define T_SNR o2@v122 /* スネアドラム */
#define SNR {%c '#130g-[#32 %c-1g&g&%c-2g&g&%c-3g&g&%c-4g]#32}
#define SNR16 g
#define T_CLS o6@v68%r9 /* クラッシュシンバル */
#define CLS g
#define CLS4 $T_CLS$slide(%c,$CLS,128,30,&,x,+14,-4)r64
#define T_RID @1o8@v64%r5 /* ライドシンバル */
#define RID c
#define T_TT o4@v114 /* タムタム */
#define TT1 {%r1 '#120b- [#38%l+1b& b& %l+1b& b& %l+1b& b& b ]#38}
#define TT2 {%l5 '#120a- [#38%l+1a& a& %l+1a& a& %l+1a& a& a ]#38}
#define TT3 {%l9 '#120f [#38%l+1g-&g-&%l+1g-&g-&%l+1g-&g-&g-]#38}
#define TT4 {%l13'#120d- [#38%l+1d& d& %l+1d &d& %l+1d& d& d ]#38}
#define TM1 %r1 '#140b-
#define TM2 %l5 '#140a-
#define TM3 %l9 '#140f
#define TM4 %l13'#140d-
#define T_HH o7@v118%r2 /* ハイハット */
#define CHH c
#define OHH c-
#define T_CLP @2o8@v118
#define CLP {%r1'#120c [#46%l1c+&c+&c+&c+&%l+1c+&c+&%l+1c+]#46}
#define CLP_R {%r13'#120c [#46%l1c+&c+&c+&c+&%l+1c+&c+&%l+1c+]#46}
#define CLP_L {%l13'#120c [#46%l1c+&c+&c+&c+&%l+1c+&c+&%l+1c+]#46}
/*
/* ベースパターン
/*
#define BsA_01 l8a4a8.a16>cd$cho(e,64,6,sqr,-1200,0)&e32<a&
#define BsA_02 l8aa{aara}4>cd$cho(e,64,6,sqr,-1200,0)&e32<r
#define BsG_01 l8g4g8.g16b>c$cho(d,64,6,sqr,-1200,0)&d32<g&
#define BsG_02 l8gg{ggrg}4b>c$cho(d,64,6,sqr,-1200,0)&d32<r
/*
/* リズムパターン
/*
#define DA_01 $T_HH l8$CHH$CHH$OHH(4)$CHH$CHH$OHH(4) /* ハイハット
#define DA_02 $T_HH l8$CHH$CHH$OHH(8.)$CHH(16)$CHH$CHH$OHH(4)
#define DA_03 $T_HH l8$CHH$CHH$OHH(8.)$CHH(16)$CHH$CHH$OHH(8)$CHH(16)$CHH(16)
#define DA_11 $T_RID $RID(4)$RID(4)$RID(4)$RID(4)
#define DB_01 $T_SNR l8r4 $SNR rr4$SNR r /* スネアドラム */
#define DB_03 $T_SNR l8r4 $SNR rr4$SNR(8)$SNR(16)$SNR(16)
#define DB_04 $T_SNR l8r4$SNR r$SNR$SNR$T_TT l16[#8$TM2$TM2 r]#12$TM3
#define DC_01 $T_BSD l8$BSD(4)r4$BSD(4) r4 /* バスドラム */
#define DC_02 $T_BSD l8$BSD(4)r4$BSD$BSD r4
#define DC_03 $T_BSD l8$BSD(4)r4$BSD$BSD r$BSD
/* end of "comp02.h" */