User:Natasa Siencnik/prototyping/notation

Ursonate

Homage to Kurt Schwitters

Description

Input example

Output example

Code

ursonate.txt

rakete rinnzekete
rakete rinnzekete
rakete rinnzekete
rakete rinnzekete
rakete rinnzekete
rakete rinnzekete
Beeeee
bö 	üdrei
dreia
fö
         böwö
fümmsbö
         böwörö
fümmsböwö
         böwörötää
fümmsböwötää
         böwörötääzää
fümmsböwötääzää
         böwörötääzääUu
fümmsböwötääzääUu
         böwörötääzääUu pö
fümmsböwötääzääUu pö
         böwörötääzääUu pögö
fümmsböwötääzääUu pögö
         böwörötääzääUu pögiff
fümmsböwötääzääUu pögiff
         kwiiEe

notes.sed

s/[a-b]/c /g
s/[c-d]/c+ /g
s/[e-f]/d /g
s/[g-h]/d+ /g
s/[i-j]/e /g
s/[k-l]/f /g
s/[m-n]/f+ /g
s/[o-p]/g /g
s/[q-r]/g+ /g
s/[s-t]/a /g
s/[u-v]/a+ /g
s/[w-z]/h /g

s/ä/f+ /g
s/ö/g+ /g
s/ü/d+ /g

wrap.sh

cat << END

@head {
    \$time_sig 4/4
    \$tempo 120
}
@body {
    @channel 1 {
        \$patch 1
        \$octave 4
        \$length 16

END

for ((i=0; i<13; i++))
do
ursonate_part.rtf | sed -f notes.sed | bash wrap.sh | midge -o ursonate_part.mid
done


 
cat << END

    }
}

END