User:Lieven Van Speybroeck/Prototyping/1-Clapping Music

Steve Reich's Clapping Music

pat=xxx_xx_x_xx_

cat <<END
@head {
	\$time_sig 4/4
	\$tempo 120
}
@body {
	@channel 1 {
		\$patch 116
		\$octave 3
		\$length 16
		\$pan 127
END

#repeat this 16 times
	
	for ((i=0; i<13; i++))
	do
	echo $pat | sed 's/x/c /g; s/_/r /g'
	done

cat <<END

	}

	@channel 2 {
		\$patch 116
		\$octave 8
		\$length 16
		\$pan 0

END

#pattern2 with the shift
	
	for ((i=0; i<13; i++))
	do
	echo $pat | sed 's/x/c /g; s/_/r /g'
	pat=${pat:1}${pat:0:1}
	done

cat <<END

	}
}

END

I thought it might be nice to play around with different tones. After all, that's left up to the performers!

<source lang="bash"> pat=xxx_xx_x_xx_

cat <<END @head { \$time_sig 4/4 \$tempo 120 } @body { @channel 1 { \$patch 116 \$octave 3 \$length 12 \$pan 127 END

1. repeat this 16 times

for i in g a+ c+ d+ f+ g+ a b c d e f do echo $pat | sed "s/x/$i /g; s/_/r /g" done

cat <<END

}

@channel 2 { \$patch 116 \$octave 3 \$length 12 \$pan 0

END

1. pattern2 with the shift

for i in a b c d e f g a+ c+ d+ f+ g+ do echo $pat | sed "s/x/$i /g; s/_/r /g" pat=${pat:1}${pat:0:1} done

cat <<END

} }

END

</quote>