SPICE 便利なマクロ集

Last Update: 2003年9月6日（土） 19:02

このページは、GORRY 氏作の MML MIDI コンパイラ「SPICE」用の自作マクロコマンドを公開しています。

このページで公開しているマクロの定義をまとめたインクルードファイル「memoru.smi」「memoruxg.smi」「memorugs.smi」をダウンロードすることができます。
これらのインクルードファイルは、SPICE をインストールしたディレクトリの下にある「SMI」ディレクトリ内に置いてください。
ダウンロード用ファイルは LHA アーカイブになっています。

memoru_smi.lzh(2KB)

閲覧: memoru.smi memoruxg.smi memorugs.smi

また、これらのマクロを活用した各音源(GM/XG/SC-88Pro(GS))用のスケルトンファイルも用意しました。
音源の初期設定等が記述されているので、このファイルを元にデータ作成を始めると良いでしょう。

memoru_skel.lzh(5KB)

閲覧: gm_skel.smc xg_skel.smc 88p_skel.smc

このページに出てくるマクロは全て、トラックのはじめで${smcinit:}が実行されていることを前提にしています。

書式	`${smcinit:}`
解説	SPICEのMMLを(筆者にとって)一般的な仕様に設定します。具体的には、音長表記は「n分表記」 "<" でオクターブ-1, ">" でオクターブ+1 "[" でベロシティ-3, "]" でベロシティ+3 ゲート長は音長からゲートを引いたものこのページに出てくるマクロは全て、トラックのはじめに`${smcinit:}`が実行されていることを前提にしています。
定義	`#define smcinit:@%1 @<-1 @>+1 @[-3 @]+3 @q1`
用例	`1,2,3,4,5,6,7 ${smcinit:}`

書式	`${mixer:ボリューム,パン,リバーブレベル,コーラスレベル,バリエーション(ディレイ)レベル}`
解説	ミキサー系のパートパラメータをまとめて設定します。最後のパラメータは、XG音源ではバリエーションエフェクトレベル、SC-88等ではディレイエフェクトレベルになります。 SC-55等、3系統目のエフェクトがない音源では意味を持ちません。なお、このコマンドはクロックが 5mc 進みます。
定義	`#define mixer:v?1 r%1 p?2 r%1 ${REVERB-DEPTH:?3} r%1 ${CHORUS-DEPTH:?4} r%1 ${VARIATION-DEPTH:?5} r%1`
用例	`2 ${mixer:100,64,40,0,0} ;一般的な音源の初期状態(たぶん)`

書式	`${prog:音色番号}`
解説	プログラムチェンジをします。 SPICE にもともとある @ コマンドとほぼ同じですが、以下のような違いがあります。音色番号は 1 から始まります。すなわち @ コマンドより 1 つ大きい値を設定します。クロックが 3mc 進みます。これは progxg との互換性の為です。すなわち、progxg との互換性以外にほとんどメリットはありません。`(^^;` 無理して使うことはないでしょう。
定義	`#define prog:@?1 -1 r%3`
用例	`2 ${prog:81} ;プログラム番号81 (SquareLd) ;@80 と同じ。`

書式	`${tacet:小節数}`
解説	指定の小節数休みます。長い間休みが続くときに使います。 r1r1r1r1 のように書くのに比べて、何小節休むのかがわかりやすいというメリットがあります。
定義	`#define tacet:\|:?1 r1 :\|`
用例	`2 ${tacet:8} ;8小節休みます。`

書式	`${rt:}`
解説	ノートオン後、1クロック後にノートオフするように設定します。リズムパートに使います。 MML2MID の RT コマンドと同じようなものです。
定義	`#define rt:@q0 q%1`
用例	`2 @z10 ${RT:}`

書式	`${v-sens:変化量}`
解説	"[" , "]" コマンドによるベロシティの変化量を設定します。設定した量だけ "]" でベロシティが上がり、 "[" で下がります。
定義	`#define v-sens:@[-?1 @]+?1`
用例	`2 ${v-sens:8}`

書式	`${pu:音程差,delay,speed,rate,MML}`
解説	音程間をなめらかに繋ぎます。このマクロは音程を上げることしかできません。下げる場合は「pd」を使って下さい。音程差は半音単位で数値を指定します。ベンドレンジの設定値を超えて指定することは出来ません。 delay,speed,rateの各パラメータは、PC-9801の音源ドライバである「FMP」と共通になっています。詳しくは欄外をご覧下さい。
定義	`#define pu:@?A,??p @?B,?1 @?C,??C @?A,76 @?A,??C @?B,?4 @?D,??D @?A,?D @?B,?3 @s127,0,%??C,?D,?C,@e sb127,256,%?2 ?5 sb0`
用例	`2 ${BENDER-RANGE:12} ;ベンドレンジ12(1オクターブ) 2 ${pu:2,4,1,2,c4} ;cからdへ(2半音) 2 ${pu:4,24,1,4,f4&m32f4m0} ;fからaへ(4半音)上げたうえにビブラート`

書式	`${pd:音程差,delay,speed,rate,MML}`
解説	音程間をなめらかに繋ぎます。このマクロは音程を下げることしかできません。上げる場合は「pu」を使って下さい。音程差は半音単位で数値を指定します。ベンドレンジの設定値を超えて指定することは出来ません。 delay,speed,rateの各パラメータは、PC-9801の音源ドライバである「FMP」と共通になっています。詳しくは欄外をご覧下さい。
定義	`#define pd:@?A,??p @?B,?1 @?C,??C @?A,76 @?A,??C @?B,?4 @?D,??D @?A,?D @?B,?3 @s127,0,%??C,?D,-?C,@e sb127,256,%?2 ?5 sb0`
用例	`2 ${BENDER-RANGE:12} ;ベンドレンジ12(1オクターブ) 2 ${pd:2,4,1,2,e4} ;eからdへ(2半音) 2 ${pu:4,24,1,4,c4&m32c4m0} ;cからg+へ(4半音)下げたうえにビブラート`

Ｄｅｌａｙ	音が鳴り始めてからピッチベンドを開始するまでのカウントを指定します。値が大きいほど遅くなります。
Ｓｐｅｅｄ	ピッチベンドの速さを指定します。値が大きいほど遅くなります。
Ｒａｔｅ	ピッチベンドの１回の変化量を指定します。値が大きいほど、大きくなります。
以下に内部動作的変化の説明を示します。
Ｄｅｌａｙ	ｋｅｙｏｎからピッチベンドの処理を始めるまでのカウント数。音のカウントより大きい場合にはピッチベンドはかかりません。
Ｓｐｅｅｄ	次の変化を起こすまでのカウント数。この値が０になったときに音程の上げ、下げを行います。
Ｒａｔｅ	１回の変化で音程に加える（引く）値。ここで指定された値を現在の周波数に足して（引いて）ゆき、ターゲットの周波数と一致するまで動作を繰り返します。

書式	`${gd:音程差,delay,length,MML}`
解説	音程を半音刻みで下げていきます。(グリスダウン) 下げることしかできません。音程差は半音単位で数値を指定します。ベンドレンジの設定値を超えて指定することは出来ません。 delay は、キーオン後グリスダウンが始まるまでの時間をクロック数で指定します。その後、 length だけ時間をかけてグリスダウン行います。length もクロック数で指定します。
定義	`#define gd:@?A,??p @?B,?1 @?C,??C @s127,0,%?3,?B,-?C,@e sb127,256,%?2 ?4 sb0`
用例	`2 ${BENDER-RANGE:12} ;ベンドレンジ12(1オクターブ) 2 ${pd:9,12,36,e4} ;aからcへ(9半音)`

書式	`${pow:note,length}`
解説	ギターのパワーコードをシミュレートします。ルート音に加え、5 度上の音と、オクターブ上のルート音を重ねて鳴らします。各音の発音タイミングをずらして、ギターっぽさを出しています。ただし、ダウンストロークしか考慮していません。 note には、ルート音を指定します。 length には、長さを指定します。
定義	`#define pow:?1 %1&i7 ?1 %1&i0 >?1 ?2-%2 <`
用例	`2 o2 ${pow:a,4} ;o2a, o3e, o3a が同時に鳴ります。`

書式	`${pow2:note,length}`
解説	ギターのパワーコードをシミュレートします。ルート音に加え、5 度上の音と、オクターブ下のルート音を重ねて鳴らします。各音の発音タイミングをずらして、ギターっぽさを出しています。ただし、ダウンストロークしか考慮していません。 note には、ルート音を指定します。 length には、長さを指定します。
定義	`#define pow2:<?1 0&>?1 %1&i7 ?1 ?2-%1 i0`
用例	`2 o2 ${pow2:a,4} ;o1a, o2a, o3e が同時に鳴ります。`

書式	`${pow3:note,length}`
解説	ギターのパワーコードをシミュレートします。ルート音に加え、5 度上の音を重ねて鳴らします。各音の発音タイミングをずらして、ギターっぽさを出しています。ただし、ダウンストロークしか考慮していません。 note には、ルート音を指定します。 length には、長さを指定します。
定義	`#define pow3:?1 %2&i7 ?1 ?2-%2 i0`
用例	`2 o2 ${pow3:a,4} ;o2a, o3e が同時に鳴ります。`

書式	`${u5:note,length}`
解説	ギターのパワーコード(?)をシミュレートします。ルート音に加え、オクターブ下げた 5 度上の音 (4 度下) を重ねて鳴らします。各音の発音タイミングをずらして、ギターっぽさを出しています。ただし、ダウンストロークしか考慮していません。 note には、ルート音を指定します。 length には、長さを指定します。
定義	`#define u5:i-5 ?1 %2&i0 ?1 ?2-%2`
用例	`2 o3 ${u5:e,4} ;o2a, o3e が同時に鳴ります。`

書式	`${progxg:プログラム番号,バンク番号}`
解説	XG 音源のメロディ音色を設定します。プログラム番号は 1番から始まるので、マニュアルの音色表通りの指定が可能です。なお、このコマンドはクロックが 3mc 進みます。
定義	`#define progxg:@g0,0r%1@g32,?2 r%1 @?1 -1 r%1`
用例	`2 ${progxg:82,24} ; prog=82,bank=24(HeavySyn)`

書式	`${drumxg:プログラム番号}`
解説	XG 音源のリズム音色を設定します。プログラム番号は 1番から始まるので、マニュアルの音色表通りの指定が可能です。チャンネル 10 に限らず、どのチャンネルでもこのマクロでドラムパートに設定可能です。なお、このコマンドはクロックが 3mc 進みます。
定義	`#define drumxg:@g0,127r%1@g32,0r%1 @?1 -1 r%1`
用例	`2 ${drumxg:17} ;(Rock Kit)`

書式	`${dr-cutoff:ノート番号,カットオフ}`
解説	NRPN でドラムのカットオフ・フリケンシーを設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-cutoff:${NRPN-DRUM-CUTOFF-FREQUENCY:?1,?2,0} r%1`
用例

書式	`${dr-cutoff:ノート番号,レゾナンス}`
解説	NRPN でドラムのレゾナンスを設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-reso:${NRPN-DRUM-RESONANCE:?1,?2,0} r%1`
用例

書式	`${dr-attack:ノート番号,アタックレート}`
解説	NRPN でドラムのアタックレートを設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-attack:${NRPN-DRUM-EG-ATTACK-RATE:?1,?2,0} r%1`
用例

書式	`${dr-decay:ノート番号,ディケイレート}`
解説	NRPN でドラムのディケイレートを設定します。ディケイ 1 レート、ディケイ 2 レートが同じ値に設定されます。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-decay:${NRPN-DRUM-EG-DECAY-RATE:?1,?2,0} r%1`
用例

書式	`${dr-pitch:ノート番号,ピッチ}`
解説	NRPN でドラムのピッチ・コースを設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-pitch:${NRPN-DRUM-PITCH:?1,?2,0} r%1`
用例

書式	`${dr-rev:ノート番号,リバーブ}`
解説	NRPN でドラムのリバーブ・センド・レベルを設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-rev:${NRPN-DRUM-REVERB:?1,?2,0} r%1`
用例

書式	`${dr-rev:ノート番号,レベル}`
解説	NRPN でドラムの音量レベルを設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-level:${NRPN-DRUM-LEVEL:?1,?2,0} r%1`
用例

書式	`${dr-pan:ノート番号,パン}`
解説	NRPN でドラムの定位を設定します。なお、このコマンドはクロックが 1mc 進みます。
定義	`#define dr-pan:${NRPN-DRUM-PANPOT:?1,?2,0} r%1`
用例

書式	`${vib:vibrato-rate,vibrato-depth,vibrato-delay}`
解説	NRPN で音色のビブラート関係のパラメーターをまとめて設定します。なお、このコマンドはクロックが 3mc 進みます。
定義	`#define vib:${NRPN-VIBRATE-RATE:?1,0} r%1 ${NRPN-VIBRATE-DEPTH:?2,0} \ r%1 ${NRPN-VIBRATE-DELAY:?3,0} r%1`
用例

書式	`${decay:ディケイタイム}`
解説	音色のディケイタイムを設定します。 (クロックは進みません。)
定義	`#define decay:${NRPN-EG-DECAY-TIME:?1,0}`
用例

書式	`${X-DRY-LEVEL:ドライレベル}`
解説	現在の Ch. のドライレベルを設定します。
定義	`#DEFINE X-DRY-LEVEL:${XX:$08,??z+0,$11,?1}`
用例

書式	`${X-CH-DRY-LEVEL:チャンネル,ドライレベル}`
解説	指定した Ch. のドライレベルを設定します。
定義	`#DEFINE X-CH-DRY-LEVEL:${XX:$08,?1,$11,?2}`
用例

書式	`${X-DRUM1-ALTERNATE-GROUP:ノート番号,グループ番号}`
解説	ドラムセットアップ 1 のオルタネートアサイングループを設定します。
定義	`#DEFINE X-DRUM1-ALTERNATE-GROUP:${XX:$30,?1,$03,?2}`
用例

書式	`${X-DRUM1-RX-NOTE-OFF:ノート番号,0\|1}`
解説	ドラムセットアップ 1 の Rcv NOTE OFF を設定します。
定義	`#DEFINE X-DRUM1-RX-NOTE-OFF:${XX:$30,?1,$09,?2}`
用例

書式	`${X-DRUM1-DECAY1-RATE:ノート番号,ディケイ1レート}`
解説	ドラムセットアップ 1 の EG DECAY1 RATE を設定します。
定義	`#DEFINE X-DRUM1-DECAY1-RATE:${XX:$30,?1,$0E,?2}`
用例

書式	`${X-DRUM1-DECAY2-RATE:ノート番号,ディケイ2レート}`
解説	ドラムセットアップ 1 の EG DECAY2 RATE を設定します。
定義	`#DEFINE X-DRUM1-DECAY2-RATE:${XX:$30,?1,$0F,?2}`
用例

書式	`${X-DRUM2-ALTERNATE-GROUP:ノート番号,グループ番号}`
解説	ドラムセットアップ 2 のオルタネートアサイングループを設定します。
定義	`#DEFINE X-DRUM2-ALTERNATE-GROUP:${XX:$31,?1,$03,?2}`
用例

書式	`${X-DRUM2-RX-NOTE-OFF:ノート番号,0\|1}`
解説	ドラムセットアップ 1 の Rcv NOTE OFF を設定します。
定義	`#DEFINE X-DRUM2-RX-NOTE-OFF:${XX:$31,?1,$09,?2}`
用例