// Ht
System.RandomSeed=20220101 
Array Melo=("c","d","f","g","a") Array Len=()
Tempo=44
#MML_1="q=100 o5d2 "
#MML_2="q=100 o5d2 "
#MML_3="q=100 o5d2 "
#MML_4="q=100 o5d2 "
[(32)
  Len=()
  Switch(RandomSelect(0,1,1,2,3,4,5)){ 
    Case(0){Len(0)="2"}
    Case(1){Len(0)="4" Len(1)="4"}
    Case(2){Len(0)="4" Len(1)="8" Len(2)="8"}
    Case(3){Len(0)="8" Len(1)="8" Len(2)="8" Len(3)="8"} 
    Case(4){Len(0)="8." Len(1)="16" Len(2)="8" Len(3)="8"}
    Case(5){Len(0)="4 BR(2) p%.T(-8000,0,!8)" Len(1)="8" Len(2)="8"}
  }
  [(SizeOf(Len))
    #MML_1=#MML_1+"o"+RandomSelect(4,5,5)+Melo(Random(SizeOf(Melo)))+Len(Random(SizeOf(Len))) +" "
    #MML_2=#MML_2+"o"+RandomSelect(5,5,6)+Melo(Random(SizeOf(Melo)))+Len(Random(SizeOf(Len))) +" "
    #MML_3=#MML_3+"o"+RandomSelect(5,5,6)+Melo(Random(SizeOf(Melo)))+Len(Random(SizeOf(Len))) +" "
    #MML_4=#MML_4+"o"+RandomSelect(5,6,6)+Melo(Random(SizeOf(Melo)))+Len(Random(SizeOf(Len))) +" "
  ]
]
#MML_1=#MML_1+"o5d2" //Print(#MML_1)
#MML_2=#MML_2+"o5d2" //Print(#MML_2)
#MML_3=#MML_3+"o5d2" //Print(#MML_3)
#MML_4=#MML_4+"o5d2" //Print(#MML_4)

TR(1) P(64-30) V(120) @Shamisen  #MML_1  // Pipa
TR(2) P(64-00) V(120) @Bassoon   #MML_2  // Ban di
TR(3) P(64+30) V(060) @Fiddle    #MML_3  // Erhu
TR(4) P(64+00) V(100) @TaikoDrum #MML_4  // Percussion
