/*
* 【ゆかりV4(凛)】BRAVE FORCE【オリジナル曲】
*
* 暗い世界の中 手が触れていた 迷いも無く包み込まれた その想い
* 君がくれた勇気 胸に秘め今 鎖ちぎり光求めて飛び立つ明日へと
*
*
* ただ過ぎていく日々に諦めを感じていた 作り笑い浮かべていた心無くしていた
* 君の横顔、瞳 ただそれだけが僕を結びつけて 生きる力失わずにいたよ
*
* 傷ついても強くなれるのなら笑顔を守れるよう目をそらさず
*
* 涙零れていても手を前に向け 立ち向かうよ僕は永遠超えて今
* 君がくれた希望心刻んで貫くこの世界飛び出し君のもとに
* 暗い世界の中 手が触れていた 迷いも無く包み込まれたその想い
* 君がくれた勇気胸に秘め今 鎖ちぎり光求めて飛び立つ未来へと
*
*
* 振り返る思い出に 側にいてくれた人 優しさだけじゃなくて厳しさも受け止めれた
* 日常の中できっと刻まれたこの胸に 忘れないよ背を押してくれた暖かな手
*
* 吹き荒れる嵐も怖くないよ 心の中皆がいてくれる
*
* 涙零れていても手を前に向け 立ち向かうよ僕は永遠超えて今
* 君がくれた希望心刻んで貫くこの世界飛び出し君のもとに
* 暗い世界の中 手が触れていた 迷いも無く包み込まれたその想い
* 君がくれた勇気胸に秘め今 鎖ちぎり光求めて飛び立つ未来へと
*/
Function Main() {
//:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
//◆◆楽曲情報・ファイル設定◆◆
Track(00)
Copyright={"音・七ノ葉"};
TrackName={"BRAVE FORCE"};
TimeBase = 96;
Tempo = 147;
SetTimeSignature(4, 4);
//:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
//:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
/* ■ミキサー■ */
/* ボーカル */ Track(01) Channel(01) Voice(SawtoothLead) EP(110) V(110) P(063) M(030) REV(040) CHO(110) q(098) o(6) l( 8) v(100)
/* オーバードライブギター */ Track(02) Channel(02) Voice(OverdrivenGuitar) EP(100) V(080) P(123) M(080) REV(100) CHO(060) q(100) o(4) l( 8) v(100)
/* オーバードライブギター(DELAY) */ Track(03) Channel(03) Voice(OverdrivenGuitar) EP(070) V(060) P(043) M(110) REV(110) CHO(110) q(100) o(4) l( 8) v(100)
/* ディストーションギター */ Track(04) Channel(04) Voice(DistortionGuitar) EP(100) V(080) P(013) M(080) REV(100) CHO(060) q(100) o(4) l( 8) v(080)
/* ディストーションギター(DELAY) */ Track(05) Channel(05) Voice(DistortionGuitar) EP(070) V(060) P(073) M(110) REV(110) CHO(110) q(100) o(4) l( 8) v(080)
/* エレクトリックピアノ */ Track(06) Channel(06) Voice(ElectricPiano2) EP(110) V(090) P(113) M(000) REV(100) CHO(060) q(100) o(6) l( 8) v(080)
/* エレクトリックピアノ(DELAY) */ Track(07) Channel(07) Voice(ElectricPiano2) EP(100) V(080) P(033) M(000) REV(100) CHO(060) q(100) o(6) l( 8) v(080)
/* エレクトリックピアノ */ Track(14) Channel(14) Voice(ElectricGrandPiano) EP(110) V(090) P(063) M(000) REV(100) CHO(060) q(100) o(6) l( 8) v(080)
/* ベースリード */ Track(08) Channel(08) Voice(BassLead) EP(090) V(090) P(043) M(000) REV(000) CHO(000) q(100) o(3) l( 8) v(110)
/* ピックベース */ Track(09) Channel(09) Voice(PickBass) EP(080) V(110) P(063) M(000) REV(000) CHO(000) q(100) o(3) l( 8) v(110)
/* ソートゥースリード */ Track(11) Channel(11) Voice(SawtoothLead) EP(090) V(090) P(063) M(000) REV(000) CHO(000) q(093) o(5) l( 8) v(080)
/* ソートゥースリード */ Track(12) Channel(12) Voice(SawtoothLead) EP(110) V(090) P(063) M(000) REV(000) CHO(000) q(100) o(3) l( 8) v(080)
/* ドラム */ Track(10) Channel(10) Voice(DanceSet) EP(120) V(120) P(063) M(060) REV(060) CHO(060) q(098) o(5) l( 8) v(110) CreateRithmBox(StandardSet, !32);
/* リバースシンバル */ Track(13) Channel(13) Voice(ReverseCymbal) EP(127) V(127) P(063) M(010) REV(030) CHO(110) q(120) o(5) l( 8) v(110)
//:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
/* 前奏 */
#PATTERN_00_01 = {
//----------|------|---|--------|Em-----------------------Bm-----------------------C------------------------G------------------------Am7----------------------G------------------------Am7----------------------D7-----------------------|--------
/* Vo */ TR(01) #?1 r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1 */ TR(02) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2(D) */ TR(05) #?1 #MCR9902 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Pi1 */ TR(06) #?1 #MCR9905 #MCR0028(Em) #MCR0028(Bm) #MCR0028(C) #MCR0029(G) #MCR0028(Am7) #MCR0028(G) #MCR0028(Am7) #MCR0030(D7)
/* Pi1(D) */ TR(07) #?1 #MCR9902 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Pi2 */ TR(14) #?1 #MCR0031(Em) #MCR0031(Bm) #MCR0031(C) #MCR0031(G) #MCR0031(Am7) #MCR0031(G) #MCR0031(Am7) #MCR0031(D7)
/* Ba2 */ TR(08) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Ba1 */ TR(09) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* SL1 */ TR(11) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* SL2 */ TR(12) #?1 #MCR9903 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Dr */ TR(10) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* RS */ TR(13) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
//----------|------|---|--------|C#m7---------------------G#m7---------------------A------------------------E------------------------A------------------------B------------------------E------------------------F#m7---------------------|--------
/* Vo */ TR(01) r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1 */ TR(02) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2(D) */ TR(05) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Pi1 */ TR(06) #MCR9906 #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0018(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0019(Fpm7)
/* Pi1(D) */ TR(07) #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0018(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0019(Fpm7)
/* Pi2 */ TR(14) #MCR0031(Cpm7) #MCR0031(Gpm7) #MCR0031(A) #MCR0031(E) #MCR0031(A) #MCR0031(B) #MCR0031(E) #MCR0019(Fpm7)
/* Ba2 */ TR(08) #MCR9907 #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0021(Fpm7) #MCR9908
/* Ba1 */ TR(09) #MCR9907 #MCR0004(Cpm7) #MCR0004(Gpm7) #MCR0004(A) #MCR0004(E) #MCR0004(A) #MCR0004(B) #MCR0004(E) #MCR0023(Fpm7) #MCR9909
/* SL1 */ TR(11) #MCR9912 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0018(Fpm7) #MCR9908
/* SL2 */ TR(12) #MCR9907 #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0021(Fpm7) #MCR9910
/* Dr */ TR(10) #MCR1002 #MCR1002 #MCR1002 #MCR1002 #MCR1003 #MCR1003 #MCR1004 #MCR1005
/* RS */ TR(13) r1 r1 r1 r1 r1 r1 r1 c1
}
#PATTERN_00_02 = {
//----------|------|---|--------|C#m7---------------------C#m7---------------------
/* Gt1 */ TR(02) #?1 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #?1 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #?1 #MCR0000 #MCR0000
/* Gt2(D) */ TR(05) #?1 #MCR9902 #MCR0000 #MCR0000
/* Pi1 */ TR(06) #?1 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* Pi1(D) */ TR(07) #?1 #MCR9902 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* Pi2 */ TR(14) #?1 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* Ba2 */ TR(08) #?1 #MCR0002(Cpm7) #MCR0002(Cpm7)
/* Ba1 */ TR(09) #?1 #MCR0004(Cpm7) #MCR0004(Cpm7)
/* SL1 */ TR(11) #?1 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* SL2 */ TR(12) #?1 #MCR9903 #MCR0002(Cpm7) #MCR0002(Cpm7)
/* Dr */ TR(10) #?1 #MCR1001 #MCR1001
}
#PATTERN_00_03 = {
//----------|------|---|--------|C#m7---------------------C#m7---------------------
/* Vo */ TR(01) #?1 >e8.c+16c+2. ^2 <
}
/* 間奏 */
#PATTERN_00_04 = {
//----------|------|---|---------Em-----------------------Bm-----------------------C------------------------G------------------------Am7----------------------G------------------------Am7----------------------D7-----------------------
/* Vo */ TR(01) #?1 r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1 */ TR(02) #?1 r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1(D) */ TR(03) #?1 r1 r1 r1 r1 r1 r1 r1 r1
/* Gt2 */ TR(04) #?1 #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt2(D) */ TR(05) #?1 #MCR9902 #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Pi */ TR(06) #?1 #MCR0001(Em) #MCR0001(Bm) #MCR0001(C) #MCR0018(G) #MCR0001(Am7) #MCR0001(G) #MCR0001(Am7) #MCR0019(D7)
/* Pi(D) */ TR(07) #?1 #MCR9902 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Ba2 */ TR(08) #?1 #MCR0002(Em) #MCR0002(Bm) #MCR0002(C) #MCR0002(G) #MCR0002(Am7) #MCR0002(G) #MCR0002(Am7) #MCR0002(D7)
/* Ba1 */ TR(09) #?1 #MCR0004(Em) #MCR0004(Bm) #MCR0004(C) #MCR0004(G) #MCR0004(Am7) #MCR0004(G) #MCR0004(Am7) #MCR0004(D7)
/* SL1 */ TR(11) #?1 #MCR0001(Em) #MCR0001(Bm) #MCR0001(C) #MCR0001(G) #MCR0001(Am7) #MCR0001(G) #MCR0001(Am7) #MCR0001(D7)
/* SL2 */ TR(12) #?1 #MCR9903 #MCR0002(Em) #MCR0002(Bm) #MCR0002(C) #MCR0002(G) #MCR0002(Am7) #MCR0002(G) #MCR0002(Am7) #MCR0002(D7)
/* Dr */ TR(10) #?1 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001
//----------|------|---|---------C#m7---------------------G#m7---------------------A------------------------E------------------------A------------------------B------------------------E------------------------F#m7---------------------
/* Vo */ TR(01) r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1 */ TR(02) r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1(D) */ TR(03) r1 r1 r1 r1 r1 r1 r1 r1
/* Gt2 */ TR(04) #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm7)
/* Gt2(D) */ TR(05) #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm7)
/* Pi */ TR(06) #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0018(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0027(Fpm7)
/* Pi(D) */ TR(07) #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0018(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0027(Fpm7)
/* Ba2 */ TR(08) #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm7)
/* Ba1 */ TR(09) #MCR0004(Cpm7) #MCR0004(Gpm7) #MCR0004(A) #MCR0004(E) #MCR0004(A) #MCR0004(B) #MCR0004(E) #MCR0004(Fpm7)
/* SL1 */ TR(11) #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0001(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0033(Fpm7)
/* SL2 */ TR(12) #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm7)
/* Dr */ TR(10) #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001
}
#PATTERN_00_07 = {
/* Gt1 */ TR(02) #?1 EP(110) V(110) > b8.g8.b4.g8b8 | b8b8>c8<b4f+8b8>d8< | >c4.d8e8.d8.c8< | b1 | a8.b8.>c8<g8.a8.b8 | g8.a8.b8g8.f8.d8 | e2a8.b8.>c8< | >d1< |
b8.g+8.b4.g+8b8 | b8b8>c8<b4f+8b8>d+8< | >c+4.d+8e8.d8.c8< | b1 | a8.b8.>c+8<g+8.a8.b8 | g+8.a8.b8g+8.f+8.d+8 | e2a8.b8.>c+8< | >e1< | < EP(100) V(080)
/* Gt2 */ TR(03) #?1 EP(110) V(100) > r32 b8.g8.b4.g8b8 | b8b8>c8<b4f+8b8>d8< | >c4.d8e8.d8.c8< | b1 | a8.b8.>c8<g8.a8.b8 | g8.a8.b8g8.f8.d8 | e2a8.b8.>c8< | >d1< |
b8.g+8.b4.g+8b8 | b8b8>c8<b4f+8b8>d+8< | >c+4.d+8e8.d8.c8< | b1 | a8.b8.>c+8<g+8.a8.b8 | g+8.a8.b8g+8.f+8.d+8 | e2a8.b8.>c+8< | >e1< | < EP(100) V(080)
}
/* 終奏 */
#PATTERN_00_05 = {
//----------|------|---|---------C#m7---------------------G#m7---------------------A------------------------E------------------------A------------------------B------------------------E------------------------F#m7---------------------
/* Vo */ TR(01) #?1 r1 r1 r1 r1 r1 r1 r1 r1
/* Gt1 */ TR(02) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #?1 #MCR9913 #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm7)
/* Gt2(D) */ TR(05) #?1 #MCR9913 #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm7)
/* Pi1 */ TR(06) #?1 #MCR9913 #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0018(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0027(Fpm7)
/* Pi1(D) */ TR(07) #?1 #MCR9913 #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0018(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0027(Fpm7)
/* Pi2 */ TR(14) #?1 #MCR0031(Cpm7) #MCR0031(Gpm7) #MCR0031(A) #MCR0031(E) #MCR0031(A) #MCR0031(B) #MCR0031(E) #MCR0031(Fpm7)
/* Ba2 */ TR(08) #?1 #MCR9913 #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm7)
/* Ba1 */ TR(09) #?1 #MCR9913 #MCR0004(Cpm7) #MCR0004(Gpm7) #MCR0004(A) #MCR0004(E) #MCR0004(A) #MCR0004(B) #MCR0004(E) #MCR0004(Fpm7)
/* SL1 */ TR(11) #?1 #MCR9913 #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0001(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0027(Fpm7)
/* SL2 */ TR(12) #?1 #MCR9913 #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm7)
/* Dr */ TR(10) #?1 #MCR1002 #MCR1002 #MCR1002 #MCR1002 #MCR1002 #MCR1002 #MCR1002 #MCR1002
}
#PATTERN_00_06 = {
//----------|------|---|--------|C#m7---------------------C#m7---------------------
/* Gt1 */ TR(02) #?1 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #?1 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #?1 #MCR0000 #MCR0000
/* Gt2(D) */ TR(05) #?1 #MCR9902 #MCR0000 #MCR0000
/* Pi1 */ TR(06) #?1 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* Pi1(D) */ TR(07) #?1 #MCR9902 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* Pi2 */ TR(14) #?1 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* Ba2 */ TR(08) #?1 #MCR0002(Cpm7) #MCR0002(Cpm7)
/* Ba1 */ TR(09) #?1 #MCR0004(Cpm7) #MCR0004(Cpm7)
/* SL1 */ TR(11) #?1 #MCR0001(Cpm7) #MCR0020(Cpm7)
/* SL2 */ TR(12) #?1 #MCR9903 #MCR0002(Cpm7) #MCR0002(Cpm7)
/* Dr */ TR(10) #?1 #MCR1001 #MCR1008
}
#PATTERN_01_01 = {
//----------|------|---|---------C#m7---------------------G#m7---------------------A------------------------E------------------------A------------------------B------------------------E------------------------F#m7---------------------
/* Vo */ TR(01) #?1 e8.e8.e16e16f+4.e16e16 d+8.f+8.d+8^2 c+8.c+8.c+16c+16e4.a16a16g+8.g+8.f+8^2 a8.a8.a8.g+8.f+8f+8 f+8.f+8.e8.e8.<b8>c+8 e8.f+8.g+8^4e8f+8 f+8.a8.f+8f+4.r8
/* Gt1 */ TR(02) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #?1 #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm)
/* Gt2(D) */ TR(05) #?1 #MCR9902 #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm)
/* Pi */ TR(06) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Pi(D) */ TR(07) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Ba2 */ TR(08) #?1 #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm)
/* Ba1 */ TR(09) #?1 #MCR0004(Cpm7) #MCR0004(Gpm7) #MCR0004(A) #MCR0004(E) #MCR0004(A) #MCR0004(B) #MCR0004(E) #MCR0004(Fpm)
/* SL1 */ TR(11) #?1 #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0001(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0001(Fpm)
/* SL2 */ TR(12) #?1 #MCR9903 #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm)
/* Dr */ TR(10) #?1 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1008
//----------|------|---|---------C#m7---------------------G#m7---------------------A------------------------E------------------------A------------------------B------------------------E------------------------F#m7---------------------
/* Vo */ TR(01) e8.e8.e16e16f+4.e16e16 d+8.f+8.d+8^2 c+8.c+8.c+16c+16e4.a16a16g+8.g+8.f+8^2 a8.a8.a8.g+8.f+8f+8 f+8.f+8.e8.e8.<b8>c+8 e8.f+8.g+8^4e8f+8 f+8.a8.f+8f+4.r8
/* Gt1 */ TR(02) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm)
/* Gt2(D) */ TR(05) #MCR0012(Cpm7) #MCR0012(Gpm7) #MCR0012(A) #MCR0012(E) #MCR0012(A) #MCR0012(B) #MCR0012(E) #MCR0012(Fpm)
/* Pi */ TR(06) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Pi(D) */ TR(07) #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Ba2 */ TR(08) #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm)
/* Ba1 */ TR(09) #MCR0004(Cpm7) #MCR0004(Gpm7) #MCR0004(A) #MCR0004(E) #MCR0004(A) #MCR0004(B) #MCR0004(E) #MCR0004(Fpm)
/* SL1 */ TR(11) #MCR0001(Cpm7) #MCR0001(Gpm7) #MCR0001(A) #MCR0001(E) #MCR0001(A) #MCR0001(B) #MCR0001(E) #MCR0001(Fpm)
/* SL2 */ TR(12) #MCR0002(Cpm7) #MCR0002(Gpm7) #MCR0002(A) #MCR0002(E) #MCR0002(A) #MCR0002(B) #MCR0002(E) #MCR0002(Fpm)
/* Dr */ TR(10) #MCR1006 #MCR1006 #MCR1006 #MCR1006 #MCR1006 #MCR1006 #MCR1006 #MCR1008
}
#PATTERN_02_01 = {
//----------|------|---|---------F#m7---------------------B------------------------G#m7---------------------C#m7---------------------F#m7---------------------B------------------------G#m7---------------------C#m7---------------------
/* Vo */ TR(01) #?1 e4.f+4.a4 b8.a8.g+8f+8.e8.d+8 e4.f+4.a4 g+4.f+4.e4 f+4g+4a4b4 f+2d+2 f+4g+4a4b4 g+8.f+8.e8d+8.f+8.a8 ^8r8r2.
/* Gt1 */ TR(02) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt1(D) */ TR(03) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2 */ TR(04) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Gt2(D) */ TR(05) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* Pi */ TR(06) #?1 #MCR0031(Fpm7) #MCR0031(B) #MCR0031(Gpm7) #MCR0031(Cpm7) #MCR0031(Fpm7) #MCR0031(B) #MCR0031(Gpm7) #MCR0031(Cpm7)
/* Pi(D) */ TR(07) #?1 #MCR9902 #MCR0031(Fpm7) #MCR0031(B) #MCR0031(Gpm7) #MCR0031(Cpm7) #MCR0031(Fpm7) #MCR0031(B) #MCR0031(Gpm7) #MCR0031(Cpm7)
/* Ba2 */ TR(08) #?1 #MCR0006(Fpm7) #MCR0006(B) #MCR0006(Gpm7) #MCR0006(Cpm7) #MCR0006(Fpm7) #MCR0006(B) #MCR0006(Gpm7) #MCR0006(Cpm7)
/* Ba1 */ TR(09) #?1 #MCR0004(Fpm7) #MCR0004(B) #MCR0004(Gpm7) #MCR0004(Cpm7) #MCR0004(Fpm7) #MCR0004(B) #MCR0004(Gpm7) #MCR0004(Cpm7)
/* SL1 */ TR(11) #?1 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000 #MCR0000
/* SL2 */ TR(12) #?1 #MCR9901 #MCR0008(Fpm7) #MCR0008(B) #MCR0008(Gpm7) #MCR0008(Cpm7) #MCR0008(Fpm7) #MCR0008(B) #MCR0008(Gpm7) #MCR0008(Cpm7)
/* Dr */ TR(10) #?1 #MCR1009 #MCR1009 #MCR1009 #MCR1011 #MCR1009 #MCR1009 #MCR1009 #MCR1011
}
#PATTERN_03_01 = {
//----------|------|---|---------Em-----------------------Bm-----------------------C------------------------G------------------------Am7----------------------G------------------------Am7----------------------D7-----------------------
/* Vo */ TR(01) #?1 >e8.d8.c8^4c8c8 <b8b8>c8<b8^4.a8> c4.d8e8.d8.c8 <b1> <a8.b8.a8g8.a8.b8> <g8.a8.b8g8.f8.d8> <e2a8.b8.>c8 d2c4r4<
/* Gt1 */ TR(02) #?1 #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt1(D) */ TR(03) #?1 #MCR9902 #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt2 */ TR(04) #?1 #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt2(D) */ TR(05) #?1 #MCR9902 #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Pi */ TR(06) #?1 #MCR9901 #MCR0015(Em) #MCR0015(Bm) #MCR0015(C) #MCR0017(G) #MCR0015(Am7) #MCR0015(G) #MCR0015(Am7) #MCR0016(D7)
/* Pi(D) */ TR(07) #?1 #MCR9904 #MCR0015(Em) #MCR0015(Bm) #MCR0015(C) #MCR0017(G) #MCR0015(Am7) #MCR0015(G) #MCR0015(Am7) #MCR0016(D7)
/* Ba2 */ TR(08) #?1 #MCR0002(Em) #MCR0002(Bm) #MCR0002(C) #MCR0002(G) #MCR0002(Am7) #MCR0002(G) #MCR0002(Am7) #MCR0002(D7)
/* Ba1 */ TR(09) #?1 #MCR0004(Em) #MCR0004(Bm) #MCR0004(C) #MCR0004(G) #MCR0004(Am7) #MCR0004(G) #MCR0004(Am7) #MCR0004(D7)
/* SL1 */ TR(11) #?1 #MCR0001(Em) #MCR0001(Bm) #MCR0001(C) #MCR0014(G) #MCR0001(Am7) #MCR0014(G) #MCR0001(Am7) #MCR0014(D7)
/* SL2 */ TR(12) #?1 #MCR9901 #MCR0002(Em) #MCR0002(Bm) #MCR0002(C) #MCR0002(G) #MCR0002(Am7) #MCR0002(G) #MCR0002(Am7) #MCR0002(D7)
/* Dr */ TR(10) #?1 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001
//----------|------|---|---------Em-----------------------Bm-----------------------C------------------------G------------------------Am7----------------------G------------------------Am7----------------------D7-----------------------
/* Vo */ TR(01) >e8.d8.c8^4c8c8 <b8b8>c8<b8^4.a8> c4.d8e8.d8.c8 <b1> <a8.b8.a8g8.a8.b8> <g8.a8.b8g8.f8.d8> <e2a8.b8.>c8 d2f4e4<
/* Gt1 */ TR(02) #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt1(D) */ TR(03) #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt2 */ TR(04) #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Gt2(D) */ TR(05) #MCR0012(Em) #MCR0012(Bm) #MCR0012(C) #MCR0012(G) #MCR0012(Am7) #MCR0012(G) #MCR0012(Am7) #MCR0012(D7)
/* Pi */ TR(06) #MCR0015(Em) #MCR0015(Bm) #MCR0015(C) #MCR0017(G) #MCR0015(Am7) #MCR0015(G) #MCR0015(Am7) #MCR0016(D7)
/* Pi(D) */ TR(07) #MCR0015(Em) #MCR0015(Bm) #MCR0015(C) #MCR0017(G) #MCR0015(Am7) #MCR0015(G) #MCR0015(Am7) #MCR0016(D7)
/* Ba2 */ TR(08) #MCR0002(Em) #MCR0002(Bm) #MCR0002(C) #MCR0002(G) #MCR0002(Am7) #MCR0002(G) #MCR0002(Am7) #MCR0002(D7)
/* Ba1 */ TR(09) #MCR0004(Em) #MCR0004(Bm) #MCR0004(C) #MCR0004(G) #MCR0004(Am7) #MCR0004(G) #MCR0004(Am7) #MCR0004(D7)
/* SL1 */ TR(11) #MCR0001(Em) #MCR0001(Bm) #MCR0001(C) #MCR0014(G) #MCR0001(Am7) #MCR0014(G) #MCR0001(Am7) #MCR0014(D7)
/* SL2 */ TR(12) #MCR0002(Em) #MCR0002(Bm) #MCR0002(C) #MCR0002(G) #MCR0002(Am7) #MCR0002(G) #MCR0002(Am7) #MCR0002(D7)
/* Dr */ TR(10) #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001 #MCR1001
}
#MCR0000 = { r1 }
#MCR0001 = { ['#?1'8. v-10] v+20 ['#?1'8. v-10] v+10 ['#?1'8 v-10] v+30 }
#MCR0002 = { #MCR0003(StrSplit((#?1, {|}))(0)) }
#MCR0003 = { l8 [4 #?1 >#?1<] }
#MCR0004 = { #MCR0005(StrSplit((#?1, {|}))(0)) }
#MCR0005 = { l8 [8 #?1] }
#MCR0006 = { #MCR0007(StrSplit((#?1, {|}))(0)) }
#MCR0007 = { l1 #?1 }
#MCR0008 = { #MCR0009(StrSplit((#?1, {|}))(0), StrSplit((#?1, {|}))(2)) }
#MCR0009 = { l2. #?1 l4 #?2 }
#MCR0010 = { #MCR0011( StrSplit((#?1, {|}))(0), StrSplit((#?1, {|}))(1), StrSplit((#?1, {|}))(2) ) }
#MCR0011 = { [ l8. #?1 #?2 l8 #?3 ] }
#MCR0012 = { #MCR0013( StrSplit((#?1, {|}))(0), StrSplit((#?1, {|}))(2) ) }
#MCR0013 = { q94 '#?1 #?2'8 q24 '#?1 #?2'8 q24 '#?1 #?2'8 q94 '#?1 #?2'8 q24 '#?1 #?2'8 q24 '#?1 #?2'8 q94 '#?1 #?2'8 q94 '#?1 #?2'8 }
#MCR0014 = { > #MCR0001(#?1) < }
#MCR0015 = { l1 t.onNote(0,2,4,6,8) '#?1' t.onNote(0) }
#MCR0016 = { [ l8. [t.onNote(0,2,4,6,8) '#?1' t.onNote(0)] l8 t.onNote(0,2,4,6,8) '#?1' t.onNote(0) ] }
#MCR0017 = { l2. t.onNote(0,2,4,6,8) '#?1' t.onNote(0) l4 t.onNote(0,2,4,6,8) '#?1' t.onNote(0) }
#MCR0018 = { [4 '#?1'8.] '#?1'4 }
#MCR0019 = { [ '#?1'8.] '#?1'8^2 }
#MCR0020 = { [4 '#?1'8.] '#?1'8 r8 }
#MCR0021 = { #MCR0022(StrSplit((#?1, {|}))(0)) }
#MCR0022 = { l8 [3 #?1 >#?1<] r4 }
#MCR0023 = { #MCR0024(StrSplit((#?1, {|}))(0)) }
#MCR0024 = { l8 [6 #?1] r4 }
#MCR0025 = { #MCR0026(StrSplit((#?1, {|}))(0)) }
#MCR0026 = { [4 '#?1 #?2 #?3'8.] '#?1 #?2 #?3'8 '>#?1< #?2 #?3'8 }
#MCR0027 = { l8. ['#?1' v-10] v+30 '#?1'8 v-10 r4. '#?1'16 r16 }
/* */
#MCR0028 = { [ t.onNote(0,1,3,6) '#?1'8. t.onNote(0) v-10] v+20 [ t.onNote(0,1,3,6) '#?1'8. t.onNote(0) v-10] v+10 [ t.onNote(0) '#?1'8 t.onNote(0) v-10] v+30 }
#MCR0029 = { [ t.onNote(0,1,3,6) '#?1'8. t.onNote(0) v-10 t.onNote(0,1,3,6) '#?1'8. t.onNote(0) v+10 ] t.onNote(0,2,5,8) '#?1'4 t.onNote(0)}
#MCR0030 = { t.onNote(0,1,3,6) '#?1'8. t.onNote(0) v-10 t.onNote(0,1,3,6) '#?1'8. t.onNote(0) v+10 v+10 t.onNote(0,2,5,8) '#?1'8^2 t.onNote(0) v-10 }
/* */
#MCR0031 = { #MCR0032( StrSplit((#?1, {|}))(0), StrSplit((#?1, {|}))(1), StrSplit((#?1, {|}))(2) ) }
#MCR0032 = { l8. v-20 #?1 v+10 #?2 v+10 #?3 v-10 > #?1 l8 v+10 #?2 v-10 #?3 v+10 < }
/* */
#MCR0033 = { l8. ['#?1' v-10] v+30 '#?1'8 v-10 r2 }
#MCR1001 = {
WriteRithmWithoutShift(PedalHiHat, {□□□□■□□□□□□□■□□□□□□□■□□□□□□□■□□□}, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000);
WriteRithmWithoutShift(Snare1, {□□□□□□□□■□□□□□□□□□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 080, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 080, 000, 000, 000, 000, 000, 000, 000);
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1002 = {
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1003 = {
WriteRithmWithoutShift(Kick1, {■□□□■□□□■□□□■□□□■□□□■□□□■□□□■□□□}, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000);
RithmTimeShift();
}
#MCR1004 = {
WriteRithmWithoutShift(Kick1, {■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□}, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000, 100, 000);
RithmTimeShift();
}
#MCR1005 = {
WriteRithmWithoutShift(Kick1, {■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■}, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100);
RithmTimeShift();
}
#MCR1005 = {
WriteRithmWithoutShift(Kick1, {■■■■■■■■■■■■■■■■■■■■■■■■■■■■□□□□}, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1006 = {
WriteRithmWithoutShift(PedalHiHat, {■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□}, 060, 000, 065, 000, 070, 000, 075, 000, 085, 000, 090, 000, 095, 000, 100, 000, 105, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000);
WriteRithmWithoutShift(Snare1, {□□□□□□□□■□□□□□□□□□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 080, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 080, 000, 000, 000, 000, 000, 000, 000);
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1007 = {
WriteRithmWithoutShift(PedalHiHat, {□□□□■□□□□□□□■□□□□□□□■□□□□□□□■□□□}, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000);
WriteRithmWithoutShift(Snare1, {■□□□□□□□■□□□□□□□■□□□■□□□■□□□■□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000);
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1008 = {
WriteRithmWithoutShift(PedalHiHat, {■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□}, 060, 000, 065, 000, 070, 000, 075, 000, 085, 000, 090, 000, 095, 000, 100, 000, 105, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000);
WriteRithmWithoutShift(Snare1, {■□□□■□□□■□□□■□□□■□■□■□■□■■■■■■■■}, 080, 000, 000, 000, 080, 000, 000, 000, 080, 000, 000, 000, 080, 000, 000, 000, 080, 000, 000, 000, 080, 000, 000, 000, 080, 080, 080, 080, 080, 080, 080, 080);
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1009 = {
WriteRithmWithoutShift(PedalHiHat, {□□□□■□□□□□□□■□□□□□□□■□□□□□□□■□□□}, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000);
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1010 = {
WriteRithmWithoutShift(PedalHiHat, {■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□■□}, 060, 000, 065, 000, 070, 000, 075, 000, 085, 000, 090, 000, 095, 000, 100, 000, 105, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000, 110, 000);
WriteRithmWithoutShift(Snare1, {□□□□□□□□■□□□□□□□□□■□□□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 080, 000, 000, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 080, 000, 000, 000, 000, 000, 000, 000);
WriteRithmWithoutShift(Kick1, {■□□□□□□□■□□□□□□□■□□□■□□□■□□□□□□□}, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 000, 000, 000, 000);
RithmTimeShift();
}
#MCR1011 = {
WriteRithmWithoutShift(PedalHiHat, {□□□□■□□□□□□□■□□□□□□□■□□□□□□□■□□□}, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000, 000, 000, 000, 000, 090, 000, 000, 000);
WriteRithmWithoutShift(Kick1, {■□□□■□□□■□□□■□□□■□□□■□□□■□□□■□□□}, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000, 100, 000, 000, 000);
RithmTimeShift();
}
#MCR9901 = { o5 }
#MCR9902 = { r32 }
#MCR9903 = { o3 }
#MCR9904 = { o5 r32 }
#MCR9905 = { P(063) }
#MCR9906 = { P(113) }
#MCR9907 = { Fade(8, 20, 100) }
#MCR9908 = { EP(090) }
#MCR9909 = { EP(080) }
#MCR9910 = { EP(110) }
#MCR9911 = { r64 }
#MCR9912 = { SUB{ [4r1] Fade(4, 10, 120) [3r1] r2r8r8r8 Expression.onTime(120, 0, 8) r8 } }
#MCR9913 = { Fade(8, 80, 0) }
Int POS = 0;
#PATTERN_00_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_03_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_00_02({Time(POS)}); #PATTERN_00_03({Time(POS)}); POS += (TimeBase * 4) * 2;
#PATTERN_01_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_02_01({Time(POS)}); POS += (TimeBase * 4) * 8;
#PATTERN_00_06({Time(POS)}); POS += (TimeBase * 4) * 2;
#PATTERN_03_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_03_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_00_04({Time(POS)}); #PATTERN_00_03({Time(POS)}); #PATTERN_00_07({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_01_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_02_01({Time(POS)}); POS += (TimeBase * 4) * 8;
#PATTERN_00_06({Time(POS)}); POS += (TimeBase * 4) * 2;
#PATTERN_03_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_03_01({Time(POS)}); POS += (TimeBase * 4) * 16;
#PATTERN_00_05({Time(POS)}); #PATTERN_00_03({Time(POS)}); POS += (TimeBase * 4) * 8;
}
//--------------------------------------------------------------------------------------------------
// コード定義
//--------------------------------------------------------------------------------------------------
//M ------------
Str C = {c*|e*|g*}; Str Cp = {c*+|f*|g*+}; Str Db = {c*+|f*|g*+}; Str D = {d*|f*+|a*}; Str Dp = {d*+|g*|a*+}; Str Eb = {d*+|g*|a*+}; Str E = {e*|g*+|b*}; Str F = {f*|a*|>c*<}; Str Fp = {f*+|a*+|>c*+<}; Str Gb = {f*+|a*+|>c*+<}; Str G = {g*|b*|>d*<}; Str Gp = {g*+|>c*<|>d*+<}; Str Ab = {g*+|>c*<|>d*+<}; Str A = {a*|>c*+<|>e*<}; Str Ap = {a*+|>d*<|>f*<}; Str Bb = {a*+|>d*<|>f*<}; Str B = {b*|>d*+<|>f*+<};
//m ------------
Str Cm = {c*|d*+|g*}; Str Cpm = {c*+|e*|g*+}; Str Dbm = {c*+|e*|g*+}; Str Dm = {d*|f*|a*}; Str Dpm = {d*+|f*+|a*+}; Str Ebm = {d*+|f*+|a*+}; Str Em = {e*|g*|b*}; Str Fm = {f*|g*+|>c*<}; Str Fpm = {f*+|a*|>c*+<}; Str Gbm = {f*+|a*|>c*+<}; Str Gm = {g*|a*+|>d*<}; Str Gpm = {g*+|b*|>d*+<}; Str Abm = {g*+|b*|>d*+<}; Str Am = {a*|>c*<|>e*<}; Str Apm = {a*+|>c*+<|>f*<}; Str Bbm = {a*+|>c*+<|>f*<}; Str Bm = {b*|>d*<|>f*+<};
//7 ------------
Str C7 = {c*|e*|g*|a*+}; Str Cp7 = {c*+|f*|g*+|b*}; Str Db7 = {c*+|f*|g*+|b*}; Str D7 = {d*|f*+|a*|>c*<}; Str Dp7 = {d*+|g*|a*+|>c*+<}; Str Eb7 = {d*+|g*|a*+|>c*+<}; Str E7 = {e*|g*+|b*|>d*<}; Str F7 = {f*|a*|>c*<|>d*+<}; Str Fp7 = {f*+|a*+|>c*+<|>e*<}; Str Gb7 = {f*+|a*+|>c*+<|>e*<}; Str G7 = {g*|b*|>d*<|>f*<}; Str Gp7 = {g*+|>c*<|>d*+<|>f*+<}; Str Ab7 = {g*+|>c*<|>d*+<|>f*+<}; Str A7 = {a*|>c*+<|>e*<|>g*<}; Str Ap7 = {a*+|>d*<|>f*<|>g*+<}; Str Bb7 = {a*+|>d*<|>f*<|>g*+<}; Str B7 = {b*|>d*+<|>f*+<|>a*<};
//m7 ------------
Str Cm7 = {c*|d*+|g*|a*+}; Str Cpm7 = {c*+|e*|g*+|b*}; Str Dbm7 = {c*+|e*|g*+|b*}; Str Dm7 = {d*|f*|a*|>c*<}; Str Dpm7 = {d*+|f*+|a*+|>c*+<}; Str Ebm7 = {d*+|f*+|a*+|>c*+<}; Str Em7 = {e*|g*|b*|>d*<}; Str Fm7 = {f*|g*+|>c*<|>d*+<}; Str Fpm7 = {f*+|a*|>c*+<|>e*<}; Str Gbm7 = {f*+|a*|>c*+<|>e*<}; Str Gm7 = {g*|a*+|>d*<|>f*<}; Str Gpm7 = {g*+|b*|>d*+<|>f*+<}; Str Abm7 = {g*+|b*|>d*+<|>f*+<}; Str Am7 = {a*|>c*<|>e*<|>g*<}; Str Apm7 = {a*+|>c*+<|>f*<|>g*+<}; Str Bbm7 = {a*+|>c*+<|>f*<|>g*+<}; Str Bm7 = {b*|>d*<|>f*+<|>a*<};
//M7 ------------
Str CM7 = {c*|e*|g*|b*}; Str CpM7 = {c*+|f*|g*+|>c*<}; Str DbM7 = {c*+|f*|g*+|>c*<}; Str DM7 = {d*|f*+|a*|>c*+<}; Str DpM7 = {d*+|g*|a*+|>d*<}; Str EbM7 = {d*+|g*|a*+|>d*<}; Str EM7 = {e*|g*+|b*|>d*+<}; Str FM7 = {f*|a*|>c*<|>e*<}; Str FpM7 = {f*+|a*+|>c*+<|>f*<}; Str GbM7 = {f*+|a*+|>c*+<|>f*<}; Str GM7 = {g*|b*|>d*<|>f*+<}; Str GpM7 = {g*+|>c*<|>d*+<|>g*<}; Str AbM7 = {g*+|>c*<|>d*+<|>g*<}; Str AM7 = {a*|>c*+<|>e*<|>g*+<}; Str ApM7 = {a*+|>d*<|>f*<|>a*<}; Str BbM7 = {a*+|>d*<|>f*<|>a*<}; Str BM7 = {b*|>d*+<|>f*+<|>a*+<};
//mM7 ------------
Str CmM7 = {c*|d*+|g*|b*}; Str CpmM7 = {c*+|e*|g*+|>c*<}; Str DbmM7 = {c*+|e*|g*+|>c*<}; Str DmM7 = {d*|f*|a*|>c*+<}; Str DpmM7 = {d*+|f*+|a*+|>d*<}; Str EbmM7 = {d*+|f*+|a*+|>d*<}; Str EmM7 = {e*|g*|b*|>d*+<}; Str FmM7 = {f*|g*+|>c*<|>e*<}; Str FpmM7 = {f*+|a*|>c*+<|>f*<}; Str GbmM7 = {f*+|a*|>c*+<|>f*<}; Str GmM7 = {g*|a*+|>d*<|>f*+<}; Str GpmM7 = {g*+|b*|>d*+<|>g*<}; Str AbmM7 = {g*+|b*|>d*+<|>g*<}; Str AmM7 = {a*|>c*<|>e*<|>g*+<}; Str ApmM7 = {a*+|>c*+<|>f*<|>a*<}; Str BbmM7 = {a*+|>c*+<|>f*<|>a*<}; Str BmM7 = {b*|>d*<|>f*+<|>a*+<};
//dim ------------
Str Cdim = {c*|d*+|f*+|a*}; Str Cpdim = {c*+|e*|g*|a*+}; Str Dbdim = {c*+|e*|g*|a*+}; Str Ddim = {d*|f*|g*+|b*}; Str Dpdim = {d*+|f*+|a*|>c*<}; Str Ebdim = {d*+|f*+|a*|>c*<}; Str Edim = {e*|g*|a*+|>c*+<}; Str Fdim = {f*|g*+|b*|>d*<}; Str Fpdim = {f*+|a*|>c*<|>d*+<}; Str Gbdim = {f*+|a*|>c*<|>d*+<}; Str Gdim = {g*|a*+|>c*+<|>e*<}; Str Gpdim = {g*+|b*|>d*<|>f*<}; Str Abdim = {g*+|b*|>d*<|>f*<}; Str Adim = {a*|>c*<|>d*+<|>f*+<}; Str Apdim = {a*+|>c*+<|>e*<|>g*<}; Str Bbdim = {a*+|>c*+<|>e*<|>g*<}; Str Bdim = {b*|>d*<|>f*<|>g*+<};
//m7b5 ------------
Str Cm7b5 = {c*|d*+|f*+|a*+}; Str Cpm7b5 = {c*+|e*|g*|b*}; Str Dbm7b5 = {c*+|e*|g*|b*}; Str Dm7b5 = {d*|f*|g*+|>c*<}; Str Dpm7b5 = {d*+|f*+|a*|>c*+<}; Str Ebm7b5 = {d*+|f*+|a*|>c*+<}; Str Em7b5 = {e*|g*|a*+|>d*<}; Str Fm7b5 = {f*|g*+|b*|>d*+<}; Str Fpm7b5 = {f*+|a*|>c*<|>e*<}; Str Gbm7b5 = {f*+|a*|>c*<|>e*<}; Str Gm7b5 = {g*|a*+|>c*+<|>f*<}; Str Gpm7b5 = {g*+|b*|>d*<|>f*+<}; Str Abm7b5 = {g*+|b*|>d*<|>f*+<}; Str Am7b5 = {a*|>c*<|>d*+<|>g*<}; Str Apm7b5 = {a*+|>c*+<|>e*<|>g*+<}; Str Bbm7b5 = {a*+|>c*+<|>e*<|>g*+<}; Str Bm7b5 = {b*|>d*<|>f*<|>a*<};
//aug ------------
Str Caug = {c*|e*|g*+}; Str Cpaug = {c*+|f*|a*}; Str Dbaug = {c*+|f*|a*}; Str Daug = {d*|f*+|a*+}; Str Dpaug = {d*+|g*|b*}; Str Ebaug = {d*+|g*|b*}; Str Eaug = {e*|g*+|>c*<}; Str Faug = {f*|a*|>c*+<}; Str Fpaug = {f*+|a*+|>d*<}; Str Gbaug = {f*+|a*+|>d*<}; Str Gaug = {g*|b*|>d*+<}; Str Gpaug = {g*+|>c*<|>e*<}; Str Abaug = {g*+|>c*<|>e*<}; Str Aaug = {a*|>c*+<|>f*<}; Str Apaug = {a*+|>d*<|>f*+<}; Str Bbaug = {a*+|>d*<|>f*+<}; Str Baug = {b*|>d*+<|>g*<};
//sus4 ------------
Str Csus4 = {c*|f*|g*}; Str Cpsus4 = {c*+|f*+|g*+}; Str Dbsus4 = {c*+|f*+|g*+}; Str Dsus4 = {d*|g*|a*}; Str Dpsus4 = {d*+|g*+|a*+}; Str Ebsus4 = {d*+|g*+|a*+}; Str Esus4 = {e*|a*|b*}; Str Fsus4 = {f*|a*+|>c*<}; Str Fpsus4 = {f*+|b*|>c*+<}; Str Gbsus4 = {f*+|b*|>c*+<}; Str Gsus4 = {g*|>c*<|>d*<}; Str Gpsus4 = {g*+|>c*+<|>d*+<}; Str Absus4 = {g*+|>c*+<|>d*+<}; Str Asus4 = {a*|>d*<|>e*<}; Str Apsus4 = {a*+|>d*+<|>f*<}; Str Bbsus4 = {a*+|>d*+<|>f*<}; Str Bsus4 = {b*|>e*<|>f*+<};
//7sus4 ------------
Str C7sus4 = {c*|f*|g*|a*+}; Str Cp7sus4 = {c*+|f*+|g*+|b*}; Str Db7sus4 = {c*+|f*+|g*+|b*}; Str D7sus4 = {d*|g*|a*|>c*<}; Str Dp7sus4 = {d*+|g*+|a*+|>c*+<}; Str Eb7sus4 = {d*+|g*+|a*+|>c*+<}; Str E7sus4 = {e*|a*|b*|>d*<}; Str F7sus4 = {f*|a*+|>c*<|>d*+<}; Str Fp7sus4 = {f*+|b*|>c*+<|>e*<}; Str Gb7sus4 = {f*+|b*|>c*+<|>e*<}; Str G7sus4 = {g*|>c*<|>d*<|>f*<}; Str Gp7sus4 = {g*+|>c*+<|>d*+<|>f*+<}; Str Ab7sus4 = {g*+|>c*+<|>d*+<|>f*+<}; Str A7sus4 = {a*|>d*<|>e*<|>g*<}; Str Ap7sus4 = {a*+|>d*+<|>f*<|>g*+<}; Str Bb7sus4 = {a*+|>d*+<|>f*<|>g*+<}; Str B7sus4 = {b*|>e*<|>f*+<|>a*<};
//6 ------------
Str C6 = {c*|e*|g*|a*}; Str Cp6 = {c*+|f*|g*+|a*+}; Str Db6 = {c*+|f*|g*+|a*+}; Str D6 = {d*|f*+|a*|b*}; Str Dp6 = {d*+|g*|a*+|>c*<}; Str Eb6 = {d*+|g*|a*+|>c*<}; Str E6 = {e*|g*+|b*|>c*+<}; Str F6 = {f*|a*|>c*<|>d*<}; Str Fp6 = {f*+|a*+|>c*+<|>d*+<}; Str Gb6 = {f*+|a*+|>c*+<|>d*+<}; Str G6 = {g*|b*|>d*<|>e*<}; Str Gp6 = {g*+|>c*<|>d*+<|>f*<}; Str Ab6 = {g*+|>c*<|>d*+<|>f*<}; Str A6 = {a*|>c*+<|>e*<|>f*+<}; Str Ap6 = {a*+|>d*<|>f*<|>g*<}; Str Bb6 = {a*+|>d*<|>f*<|>g*<}; Str B6 = {b*|>d*+<|>f*+<|>g*+<};
//add9 ------------
Str Cadd9 = {c*|d*|e*|g*}; Str Cpadd9 = {c*+|d*+|f*|g*+}; Str Dbadd9 = {c*+|d*+|f*|g*+}; Str Dadd9 = {d*|e*|f*+|a*}; Str Dpadd9 = {d*+|f*|g*|a*+}; Str Ebadd9 = {d*+|f*|g*|a*+}; Str Eadd9 = {e*|f*+|g*+|b*}; Str Fadd9 = {f*|g*|a*|>c*<}; Str Fpadd9 = {f*+|g*+|a*+|>c*+<}; Str Gbadd9 = {f*+|g*+|a*+|>c*+<}; Str Gadd9 = {g*|a*|b*|>d*<}; Str Gpadd9 = {g*+|a*+|>c*<|>d*+<}; Str Abadd9 = {g*+|a*+|>c*<|>d*+<}; Str Aadd9 = {a*|b*|>c*+<|>e*<}; Str Apadd9 = {a*+|>c*<|>d*<|>f*<}; Str Bbadd9 = {a*+|>c*<|>d*<|>f*<}; Str Badd9 = {b*|>c*+<|>d*+<|>f*+<};
//m6 ------------
Str Cm6 = {c*|d*+|g*|a*}; Str Cpm6 = {c*+|e*|g*+|a*+}; Str Dbm6 = {c*+|e*|g*+|a*+}; Str Dm6 = {d*|f*|a*|b*}; Str Dpm6 = {d*+|f*+|a*+|>c*<}; Str Ebm6 = {d*+|f*+|a*+|>c*<}; Str Em6 = {e*|g*|b*|>c*+<}; Str Fm6 = {f*|g*+|>c*<|>d*<}; Str Fpm6 = {f*+|a*|>c*+<|>d*+<}; Str Gbm6 = {f*+|a*|>c*+<|>d*+<}; Str Gm6 = {g*|a*+|>d*<|>e*<}; Str Gpm6 = {g*+|b*|>d*+<|>f*<}; Str Abm6 = {g*+|b*|>d*+<|>f*<}; Str Am6 = {a*|>c*<|>e*<|>f*+<}; Str Apm6 = {a*+|>c*+<|>f*<|>g*<}; Str Bbm6 = {a*+|>c*+<|>f*<|>g*<}; Str Bm6 = {b*|>d*<|>f*+<|>g*+<};
/* -------------------------------------------------------------------------- */
// 基礎関数群(システム関連)
/* -------------------------------------------------------------------------- */
/** Boolean値が存在しない為、定義:Fale=0なのは存在しない場合の初期値=0の為。 */
Int FALSE = 0;
/** Boolean値が存在しない為、定義 */
Int TRUE = 1;
/** TimeSignatureを参照できないため別変数として保持する */
Int SYSTEM_TIME_SIGNATURE_COMMON_TIME = 4;
/** TimeSignatureを参照できないため別変数として保持する */
Int SYSTEM_TIME_SIGNATURE_TIME = 4;
/** スクリプトのメッセージ出力モード：エラー */
Int MODE_ERROR = 3;
/** スクリプトのメッセージ出力モード：ワーニング */
Int MODE_WARNING = 2;
/** スクリプトのメッセージ出力モード：インフォメーション */
Int MODE_INFO = 1;
/** スクリプトのメッセージ出力モード：デバッグ */
Int MODE_DEBUG = 0;
/** スクリプトのモード */
Int ScriptMode = MODE_DEBUG;
/**
* TimeSignatureをScript側が参照できないため
* 関数を通して設定する
* @V_CommonTime V_CommonTime/V_Time
* @V_Time V_CommonTime/V_Time
*/
Function SetTimeSignature(Int V_CommonTime, Int V_Time) {
SYSTEM_TIME_SIGNATURE_COMMON_TIME = V_CommonTime;
SYSTEM_TIME_SIGNATURE_TIME = V_Time;
TimeSignature = SYSTEM_TIME_SIGNATURE_COMMON_TIME, SYSTEM_TIME_SIGNATURE_TIME;
}
/**
* TimeBaseの値を取得する。
* @Signature 拍数(4分音符なら4)
* @ApplyingPointBool 付点有りの場合にTRUE
*/
Function ConvertTimeStep(Int Signature, Int ApplyingPointBool) {
Int Length = ((TimeBase * SYSTEM_TIME_SIGNATURE_COMMON_TIME) / Signature);
If (ApplyingPointBool == TRUE) {
Length = Length + (((TimeBase * SYSTEM_TIME_SIGNATURE_COMMON_TIME) / Signature) / 2);
}
Result = Length;
}
/**
* エラーメッセージを出力する
* @Message 出力を行うメッセージ
*/
Function Error(Str Message) {
If (ScriptMode <= MODE_INFO) {
Print({ERROR:} + Message);
}
}
/**
* ワーニングメッセージを出力する
* @Message 出力を行うメッセージ
*/
Function Warning(Str Message) {
If (ScriptMode <= MODE_INFO) {
Print({WARNING:} + Message);
}
}
/**
* インフォメーションメッセージを出力する
* @Message 出力を行うメッセージ
*/
Function Info(Str Message) {
If (ScriptMode <= MODE_INFO) {
Print({INFO:} + Message);
}
}
/**
* デバッグメッセージを出力する
* @Message 出力を行うメッセージ
*/
Function Debug(Str Message) {
If (ScriptMode <= MODE_INFO) {
Print({DEBUG:} + Message);
}
}
//--------------------------------------------------------------------------------------------------
// ■
//--------------------------------------------------------------------------------------------------
Function PowerChordBacking(Array ArgumentArray) {
Str StrTemp = ArgumentArray(0);
Array ArrayNote = StrSplit((StrTemp, {|}));
Str StrTemp1 = ArrayNote(0);
Str StrTemp2 = ArrayNote(2);
'StrTemp1 StrTemp2'
}
Function ChordBacking(Array ArgumentArray) {
Str StrTemp = ArgumentArray(0);
'StrTemp'
}
Function Arpeggiator(Array ArgumentArray) {
Str StrChordText = ArgumentArray(0);
Int IntLength = ArgumentArray(1);
Array ArrayNote = StrSplit((StrChordText, {|}));
Str StrTemp = {};
Int FlgBreak = off;
Int IntPos = 3;
l(IntLength);
WHILE (FlgBreak == off) {
IF (ArgumentArray(IntPos) != -1) {
IF (ArgumentArray(IntPos) < SizeOf(ArrayNote)) {
StrTemp = ArrayNote(ArgumentArray(IntPos));
StrTemp
} ELSE {
StrTemp = ArrayNote(ArgumentArray(2));
StrTemp
}
} ELSE {
r
}
IntPos++;
IF (IntPos >= SizeOf(ArgumentArray)) {
FlgBreak = on;
}
}
}
/* -------------------------------------------------------------------------- */
// RithmData関数群
/* -------------------------------------------------------------------------- */
/*
* 本来下記のようになれば見やすいのだが、SAKURAが引数の間の改行を誤認識してしまっている。
* [3
* WriteRithm(
* CLOSE_HIHAT, "■■■■■■■■", 120,120,120,120,120,120,120,120,
* SNARE1, "□□■□□□■□", 120,120,120,120,120,120,120,120,
* KICK, "■□□□■■□□", 120,120,120,120,120,120,120,120
* );
* ]
* WriteRithm(
* CLOSE_HIHAT, "■■■■■■■■", 120,120,120,120,120,120,120,120,
* SNARE1, "□□■■□□■■", 120,120,120,120,120,120,120,120,
* KICK, "■□□□■■□□", 120,120,120,120,120,120,120,120
* );
* 上記だと引数は改行後の為、渡されない。
*
* 注意:
* 関数MID の Indexは(1)Origin
*/
/* リズムボックスで使用するトラック */
Int RithmTrackTrack = 10;
/* リズムボックス用タイムシグネィチャー */
Int RithmSignatureTimeBase = 48;
/* リズムボックス用タイムシグネィチャー */
Int RithmSignatureCount = 8;
/**
* リズムボックスを作成する
* @DrumSetNumber ドラムセット番号
* @SignatureTimeBase 1小節を分割するStep数
*/
Function CreateRithmBox(Int DrumSetNumber, Int SignatureTimeBase) {
Int PreTrackNumber = Track;
RithmSignatureTimeBase = SignatureTimeBase;
RithmSignatureCount = (ConvertTimeStep(SYSTEM_TIME_SIGNATURE_COMMON_TIME) * SYSTEM_TIME_SIGNATURE_TIME) / SignatureTimeBase;
Track(10); Channel(10); Voice(DrumSetNumber);
Track(PreTrackNumber);
}
/**
* リズムを書き込む
* @RithmData リズムデータ(ノート番号, 文字列データ, ベロシティ値....)
*/
Function WriteRithm(Array RithmData) {
WriteRithmWithoutShift(RithmData);
RithmTimeShift();
}
/**
* リズムを書き込む。ただしTimeはずらさない
* @RithmData リズムデータ(ノート番号, 文字列データ, ベロシティ値....)
*/
Function WriteRithmWithoutShift(Array RithmData) {
Int PreTrackNumber = Track;
Int StartTime = Time;
Int BlockCount = SizeOf(RithmData) / (1 + 1 + RithmSignatureCount);
Int RithmItemNoteNumber = 0;
Str RithmItem = {};
For (Int I = 0; I < BlockCount; I++) {
Time(StartTime);
For (Int J = 0; J < RithmSignatureCount; J++) {
Time(StartTime + (RithmSignatureTimeBase * J));
RithmItem = MID(RithmData((I * BlockCount) + 1), J + 1, 1);
If (RithmItem == {■}) {
NoteOn(RithmData(I * BlockCount), RithmData((I * BlockCount) + 2 + J));
}
Time(StartTime + (RithmSignatureTimeBase * (J + 1)));
NoteOff(RithmData(I * BlockCount), 0);
}
}
Time(StartTime);
Track(PreTrackNumber);
}
/**
* 1小節分時間をずらす
*/
Function RithmTimeShift() {
Int PreTrackNumber = Track;
Track(10);
Time(Time + (TimeBase * SYSTEM_TIME_SIGNATURE_TIME));
Track(PreTrackNumber);
}
/**
*【名称】TransGate
*【説明】音をオン／オフ（あるいは音量を変化させる）効果を持つ。
* 「ステップゲート」や単に「ゲートエフェクト」などと呼ばれる場合もある。
*【引数】[0] TIME SHIFT(0:NO/1:YES) 指定後に時間をシフトするかどうかの指定
* [1] LENGTH １ステップの時間の長さ(STEP値)
* [2] COUNT ステップ数
* [3] Expression 音量
* [4] TEXT ステップのオンオフを示す文字列 ■＝オン／□＝オフ
*/
Function TransGateA1(Array AaData) {
Int LnTempTime = Time;
Int LnShift = AaData(0);
Int LnStep = AaData(1);
Int LnCnt = AaData(2);
Int LnEp = AaData(3);
Str LsItem = {};
EP(LnEp);
For (Int I = 0; I < LnCnt; I++) {
LsItem = MID(AaData(4), I + 1, 1);
If (LsItem == {■}) {
EP(LnEp);
}
If (LsItem == {□}) {
EP(0);
}
Time(Time + LnStep);
}
EP(LnEp);
If (LnShift == 0) {
Time(LnTempTime);
}
}
/**
*【名称】TransGate
*【説明】音をオン／オフ（あるいは音量を変化させる）効果を持つ。
* 「ステップゲート」や単に「ゲートエフェクト」などと呼ばれる場合もある。
*【引数】[0] TIME SHIFT(0:NO/1:YES) 指定後に時間をシフトするかどうかの指定
* [1] LENGTH １ステップの時間の長さ(STEP値)
* [2] COUNT ステップ数
* [3] Expression 音量
* [4] TEXT ステップのオンオフを示す文字列 ■＝オン／□＝オフ
* [5...] Expression 音量(ステップ数分)
* [6...] PanPod パン(ステップ数分)
*/
Function TransGateA2(Array AaData) {
Int LnTempTime = Time;
Int LnShift = AaData(0);
Int LnStep = AaData(1);
Int LnCnt = AaData(2);
Int LnEp = AaData(3);
Str LsItem = {};
EP(LnEp);
For (Int I = 0; I < LnCnt; I++) {
LsItem = MID(AaData(4), I + 1, 1);
If (LsItem == {■}) {
EP(AaData(5 + I));
P(AaData(5 + LnCnt + I));
}
If (LsItem == {□}) {
EP(0);
}
Time(Time + LnStep);
}
EP(LnEp);
If (LnShift == 0) {
Time(LnTempTime);
}
}
//--------------------------------------------------------------------------------------------------
// 文字列操作関数
//--------------------------------------------------------------------------------------------------
Function StrSplit(Array ArgumentArray) {
Str StrValue = ArgumentArray(0);
Str StrKey = ArgumentArray(1);
Int StrValueLength = StrLength((StrValue));
Int StrKeyLength = StrLength((StrKey));
Array ArrayTemp = ();
Int FlgBreak = off;
Int IntFindPos = 0;
WHILE (FlgBreak == off) {
IntFindPos = StrIndexOf((StrValue, StrKey));
IF (IntFindPos == 0) {
ArrayTemp = (ArrayTemp, StrValue);
FlgBreak == on;
} ELSE {
ArrayTemp = (ArrayTemp, MID(StrValue, 1, IntFindPos - 1));
StrValue = MID(StrValue, IntFindPos + 1, StrValueLength);
StrValueLength = StrLength((StrValue));
}
}
Result = ArrayTemp;
}
Function StrIndexOf(Array ArgumentArray) {
Str StrValue = ArgumentArray(0);
Str StrKey = ArgumentArray(1);
Int IntPos = ArgumentArray(2);
Int FlgBreak = off;
Int FlgFind = off;
Int IntFindPos = IntPos;
Int IntValueLength = StrLength((StrValue));
Int IntKeyLength = StrLength((StrKey));
WHILE (FlgBreak == off) {
IF (MID(StrValue, IntFindPos, IntKeyLength) == StrKey) {
FlgFind = on;
FlgBreak = on;
}
IF (FlgFind == off) {
IntFindPos++;
IF (IntFindPos > IntValueLength) {
FlgBreak = on;
}
}
}
IF (FlgFind == off) {
IntFindPos = 0;
}
Result = IntFindPos;
}
Function StrLength(Array ArgumentArray) {
Int IntLen = 0;
Int FlgBreak = off;
Str StrTemp = "";
Str StrValue = ArgumentArray(0);
WHILE (FlgBreak == off) {
IntLen++;
StrTemp = StrCharAt((StrValue, IntLen));
IF (StrTemp == "") {
IntLen--;
FlgBreak = on;
}
}
Result = IntLen;
}
Function StrCharAt(Array ArgumentArray) {
Str StrValue = ArgumentArray(0);
Int IntPos = ArgumentArray(1);
Result = MID(StrValue, IntPos, 1);
}
//--------------------------------------------------------------------------------------------------
// 文字列操作関数
//--------------------------------------------------------------------------------------------------
Function Fade(Mes,Min,Max){
Str I = {!1};
If(Mes>1){
Mes--;[(Mes) I=I+{^1} ]
}
Str CMD = { Expression.onTime(Min,Max,LEN); }
CMD.s({LEN},I);
CMD;
}
//--------------------------------------------------------------------------------------------------
Main();