import { evaluate, evalScope } from '@strudel.cycles/eval';
import { Scheduler, getAudioContext } from '@strudel.cycles/webaudio';
import { loadWebDirt } from '@strudel.cycles/webdirt';
import controls from '@strudel.cycles/core/controls.mjs';

// import desired modules and add them to the eval scope
await evalScope(
  import('@strudel.cycles/core'),
  import('@strudel.cycles/mini'),
  import('@strudel.cycles/osc'),
  import('@strudel.cycles/webdirt'),
  import('@strudel.cycles/webaudio'),
  import('@strudel.cycles/tonal'),
  controls,
  // import other strudel packages here
); // add strudel to eval scope

const audioContext = getAudioContext();
const latency = 0.2;

// load default samples + init webdirt
loadWebDirt({
  audioContext,
  latency,
  sampleMapUrl: 'https://strudel.tidalcycles.org/EmuSP12.json',
  sampleFolder: 'https://strudel.tidalcycles.org/EmuSP12/',
});

// the scheduler will query the pattern within the given interval
const scheduler = new Scheduler({
  audioContext,
  interval: 0.1,
  latency,
  onEvent: (hap) => {
    /*     const delta = hap.whole.begin - audioContext.currentTime;
    console.log('delta', delta); */
    // when using .osc or .webdirt, each hap will have context.onTrigger set
    // if no onTrigger is set, try to play hap.value as frequency with a cheap oscillator
    if (!hap.context.onTrigger) {
      // console.log('e', e.show());
      const oscillator = audioContext.createOscillator();
      const master = audioContext.createGain();
      master.gain.value = 0.1;
      master.connect(audioContext.destination);
      oscillator.type = 'sawtooth';
      oscillator.frequency.value = hap.value;
      oscillator.connect(master);
      oscillator.start(hap.whole.begin);
      oscillator.stop(hap.whole.end);
    }
  },
});

// eval + start on button click
document.getElementById('start').addEventListener('click', async () => {
  const { pattern } = await evaluate(
    // 's("bd sd").osc()', // need to run sclang + osc server (npm run osc in strudel root)
    /* `stack(
      freq("55 [110,165] 110 [220,275]".mul("<1 <3/4 2/3>>").struct("x(3,8)")
           .layer(x=>x.mul("1.006,.995"))), // detune
      freq("440(5,8)".legato(.18).mul("<1 3/4 2 2/3>")).gain(perlin.range(.2,.8))
    ).s("<sawtooth square>/2")
      .cutoff(perlin.range(100,4000).slow(4))
      .jux(rev)
      .out()
      .stack(s("bd(3,8),hh*4,~ sd").webdirt())`, */
    `samples({
        clubkick: 'clubkick/2.wav',
        sd: ['808sd/SD0010.WAV','808sd/SD0050.WAV'],
        hh: 'hh/000_hh3closedhh.wav',
        clak: 'clak/000_clak1.wav',
        jvbass: ['jvbass/000_01.wav','jvbass/001_02.wav','jvbass/003_04.wav','jvbass/004_05.wav','jvbass/005_06.wav']
      }, 'https://raw.githubusercontent.com/tidalcycles/Dirt-Samples/master/');
      stack(
        "<clubkick*2>,[~ <sd!3 sd(3,4,2)>],hh(3,4)".s().n("<0 1 2>").speed(perlin.range(.7,.9)),
        "<a1 b1*2 a1(3,8) e2>"
        .off(1/8,x=>x.add(12).degradeBy(.5))
        .add(perlin.range(0,.5))
        .n().decay(.15).sustain(0).s("sawtooth")
        .superimpose(x=>x.add(.08)).gain(.4)
        .cutoff(sine.slow(7).range(300,5000)),
        "<Am7!3 <Em7 E7b13 Em7 Ebm7b5>>".voicings().superimpose(x=>x.add(.04))
        .add(perlin.range(0,.5))
        .n().s('sawtooth')
        .gain(.16)
        .cutoff(500)
        .attack(1),
        "a4 c5 <e6 a6>".struct("x(5,8)")
        .superimpose(x=>x.add(.04))
        .add(perlin.range(0,.5)).n()
        .decay(.1).sustain(0).s('triangle')
        .degradeBy(perlin.range(0,.5)).echoWith(4,.125,(x,n)=>x.gain(.15*1/(n+1)))
      )
        .out()
        .slow(3/2)`,
  );
  scheduler.setPattern(pattern);
  scheduler.start();
});