Download source: taylor.sal

load("paint.scm")

variable bass = {31 31 36 31 34 34 29}
variable funk = {0 3 5 7 9 10 12}
variable drums = {0 2 6 10}

send("mp:tuning", 1)

send("mp:instruments", 26, 1)

sprout(list(spray(len: 150, key: pick({67 69 70 72 74 76 77 79}), 
                  rhy: {.5 .25 -.25 -.5}, dur: {.25 .5}, band: funk, 
                  amp: .75, chan: 0),
            stroke(len: 100, key: bass, rhy: {1 -.5 .5 -.5 .5 -.5 .5}, 
                   amp: .5, chan: 1),
            stroke(len: 60, key: {{53 55 58} 53 {52 55 60} 53}, 
                   rhy: {1 -.5 .5 -2}, dur: {1.5 .5}, amp: .4, chan: 1),
            spray(len: 70, key: pick({36 38 42 46}), band: drums,
                  rhy: {1 .5 1.5 .25}, dur: {1 .5 1.5 .25}, amp: .3,
                  chan: 9)))