User:Natasa Siencnik/prototyping/notation

From XPUB & Lens-Based wiki

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
 	üdrei
dreia

         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 
fümmsböwötääzääUu 
         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