
    do
cps (86/60/2)
d9 $ midicmd "midiClock*48" # s "midi"


    let melody = slow 6 $ "0 2 [4 8 .] [3 4 3] 8 4 9"


    d3
$ note
((scaleP scalePattern
  $ (rotR 4)
  $ (+ slow 8 "x" <~> ((0.25 ~>) generateMelodicSeed))
  -- $ slow 4 \n
  $ generateMelodicSeed
))#s "[pe-gtr:8,midi]" #gain 1.2 #orbit 2 #midichan 3


    do
d9 $ midicmd "stop" # s "midi"
hush

index > /home/xinniw/Documents/garden/mesostic.md

# Mesostic

A mesostic is a technique for creating poetry from an existing text. First a word or phrase is chosen. Then you find the first occurrence of the first letter of that word or phrase in the text. You select a certain number of characters on either side of the occurrence in the text and include those characters as the first line in the poem. Then you find the next occurrence of the next letter in the word or phrase. When you are down, the word or phrase is then spelled down the middle of the poem. This is where the name comes from. Mesostic roughly means "middle stick". The chosen word or phrase is the stick down the middle.

index > /home/xinniw/Documents/garden/mesostic.md