User:Birgit bachler/clapping

cat << STOP
@head {
    \$time_sig 4/4
    \$tempo 120
}
@body {
 
    @channel 1 {
        \$patch 34
        \$octave 3
        \$length 8



STOP

notes="c c c r c c r c r c c r "
    for ((j=0; j<13; j++))
    do 
        for ((i=0; i<12; i++))
        do
        echo $notes
        done
    notes=${notes:2}${notes::2}
    done


cat << STOP
}

	@channel 2 {
	    \$patch 34
        \$length 8
        \$octave 3
  
STOP

notes="c c c r c c r c r c c r "
    for ((j=0; j<13; j++))
    do
        for ((i=0; i<12; i++))
        do 
        echo $notes
        done
    done

cat << STOP

} 
}
STOP