メロン | Include(chord2.h);Tempo = 144; Int L= 16; Function RS2(Array AR){Result = AR( Random( SizeOf(AR) ) );} Function X1(){ Result = RS2({C},{Db},{D},{Eb},{E},{F},{Gb},{G},{Ab},{A},{Bb},{B});} Function X2(){ Result = RS2({ },{7 },{m },{m7 },{mM7 },{m6 },{M7 },{dim },{aug },{m7b5 },{sus4 },{7sus4 },{6 });} Function X(){Result = X1 + X2; }Str Q; TR=2q99@5 l1[(L) Q=X; Q; Print(Q);] TR=10 [(L) [n36n38]r-1[8n42,8]] | 編集 |