User:Inge Hoonte/shhmg

cat << END @head {

   \$time_sig 4/4
   \$tempo 120

} @body {

   @channel 1 {
       \$patch 89
       \$octave 3
       \$length 12

1. patch is instrument

END for ((i=1; i<=166; i+=1))

1. 12x13

do echo c c c r c c r c r c c r done

cat << END } @channel 2 { \$patch 89 \$octave 10 \$length 12 END pat="c c c r c c r c r c c r " for ((i=1; i<=13; i+=1)) do for ((h=1; h<=12; h+=1)) do echo $pat done

1. shift pattern
2. take off first one and put at end
3. c c r c c r c r c c r c

pat=${pat:2}${pat::2}

done

cat << END

   }

} END