User:Megan Hoogenboom/assignment1

From XPUB & Lens-Based wiki

The clapping song

cat << END
@head {
	\$time_sig 4/4
	\$tempo 120
}

@body {

	@channel 1 {
		\$patch 16
		\$octave 7
		\$length 16
END
        for ((i=0; i<=12; i++))
        do
        echo c c c r c c r c r c c r
        done
cat << END
    }
       
	@channel 2 {
		\$patch 16
		\$octave 5
		\$length 16
END
        pat="c c c r c c r c r c c r "
        for ((i=0; i<=12; i++))
        do 
        echo $pat
        pat=${pat:2}${pat::2}
        done

#mijn ding:
#       lala="cccrccrcrccr"
#        lala2="c c c r c c r c r c c r"
#        for ((i=0; i<=12; i++))
#        do 
#        echo ${lala2:$i} ${lala:$i:1}
#        done

cat << END
	}
}
END

My Song

cat << END
@head {
	\$time_sig 4/4
	\$tempo 120
}

@body {

	@channel 1 {
		\$patch 16
		\$octave 7
		\$length 2
END


        for ((i=0; i<=10; i++))
        do
        echo g
        done
        
cat << END
    }
       
	@channel 2 {
		\$patch 16
		\$octave 5
		\$length 16
END

        ja="a b b c"
        nee="g g f c"
        oke="a b c d e f g"
        oja="g f e d c b a"
        
        for ((i=0; i<=3; i++))
        do
        echo $ja $nee
        done

        for ((i=0; i<=3; i++))
        do
        echo $oke $oja
        done

cat << END
	}
}
END