from FoxDot import *

from pathlib import Path
# Quarks.install("Dirt-Samples");
Samples.addPath(Path.home() / '.local/share/SuperCollider/downloaded-quarks/Dirt-Samples')
gsynth = GranularSynthDef()

Root.default = 'C'
Scale.default = 'chromatic'
Clock.bpm = 120

# violão
v = P(-3,2,7,11)

b = P[0,0,0,0]
g = P[4,5,4,5].stutter(4)
d = P[6,4,3,4].stutter(4)
a = P[0,0,0,0]

Clock.clear()
Clock.set_time(-1)
~b1 >> dirt(
    v[1] + d,
    oct=(5,[6,5]),
    dur=PDur(5,16) & PSum(7,4),
    rate=(1,.5),
    coarse=25,
    delay=(0,.5),
    sus=1/2,
    amp=.6,
    amplify=linvar([0,1], [32,inf], start=now),
)
~g1 >> gsynth(
    'gtr',
    dur=PDur(5,16)*2,
    pshift=v + P(a,d,g,b),
    lpf=linvar([2000,6000]),
    room=.9, mix=.1,
    pan=((1,-1),(-1,1)),
)

d0 >> play(':', spin=(10,2), rate=(1,.85)).every(
    [4,6], '!', 3, dur=Cycle([.5,.75]), room=.4, mix=.2
)

d1 >> play(
    P['x(...([xx]x))o.'].submap({'x': '<x><v>', 'o': '<o><O>'}),
    sample=(0,1), room=.4,mix=.2, amplify=2, hpf=200, lpf=6000,
)

d3 >> play('|S2|', pshift=5, room=.4, mix=.2, dur=2)

~k1 >> gsynth('psr', dur=PDur(5,16)&PDur(3,8), pshift=g1.pshift, spin=4, delay=(0,.25))

~m1 >> space(
    v[2] + g,
    dur=PDur(5,16)*4 & PSum(6,2),
    oct=(5,[5,6],6),
    root=P^[[2,[[1,-1],-2]],0, .75],
    # delay=(k1.delay, k1.delay),
    pan=(linvar([-1,1]), linvar([1,-1])),
    tremolo=PSine(32),
)

~m2 >> ambi(m1.degree, dur=2, delay=P(0,[0,P/(.3,.75),P^[.25,.5, .5]]))


Group(b1, d3, m2).amplify=0