// 100% Pure Love — Crystal Waters
// 121 bpm, 4/4, key G minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 96 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(121/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once · [...]/2 spreads a riff over 2 bars.
// A part's distinct bars are riffs (A, B, C...) played in order: edit a riff to change every repeat.

// bass · synth bass 2 · "SYN BASS 2"
const bass = note("<~@16 A@8 B@8 A@7 C B@8 A@8 B@8 ~@6 B@23 D E ~>".pickRestart({
  A: "g1@3 ~ bb1@3 ~ c2@3 ~ d2@3 ~", B: "g1 ~ g1 ~ bb1 ~ bb1 ~ c2@2 ~ d2@3 ~@2", C: "g1@3 ~@13",
  D: "g1 ~ g1 ~ bb1 ~ bb1 ~ c2@2 ~ d2@2 ~ bb1@2", E: "g1@3 ~@11 g1@2",
})).s("gm_synth_bass_2").gain(0.54)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note("<A@88 B@7 ~>".pickRestart({
  A: "[~@7 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]]/8", // Gm
  B: "[~@7 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [g3,bb3,d4]@2 ~@6 [bb3,d4,g4]]/7", // Gm
})).s("gm_string_ensemble_1").gain(0.25)

// chords · synth strings 2 · "SYN STR 2"
const synth_strings_2 = note("<~@16 A B C D A E C F ~@16 A B C D A E C F ~@48>".pickRestart({
  A: "[g3,bb3,d4] ~ [a3,c4,e4] ~", B: "[bb3,d4,f4]@5 ~@3 [a3,c4,e4]@4 ~@4", C: "[bb3,d4,f4]@4 ~@4 [a3,c4,e4]@5 ~@3",
  D: "[d4,a4,c5]@9 ~@7", E: "[g3,bb3,d4]@5 ~@3 [a3,c4,e4]@4 ~@4", F: "[g3,bb3,d4]@9 ~@7",
})).s("gm_synth_strings_2").gain(0.3)

// other · tinkle bell · "TINKLEBELL"
const tinkle_bell = note("<A@7 B A@15 C A@14 ~ C A@54 ~@2>".pickRestart({
  A: "a3 ~ a3 ~ a3 ~ a3 ~", B: "e4!2 ~ e4!3 ~ e4!2 ~@7", C: "e4!2 ~ e4!3 ~ e4!3 ~ e4!2 ~@3",
})).s("gm_tinkle_bell").gain(0.55)

// other · kalimba
const kalimba = note("<~@4 A@4 ~@16 B@8 ~@16 B@16 ~@6 B@24 ~@2>".pickRestart({
  A: "a4 ~@2 a4 ~@4", B: "a4@2 ~@4 a4@2 ~@3 d4 ~@2 d4 ~",
})).s("gm_kalimba").gain(0.22).pan(0.8)

// chords · rock organ · "ORGAN 3"
const rock_organ = note(`<
  ~@24 A@3 B A@3 C ~@16 A@3 B A@3 C A@3 B A@3 D E ~@5 A@3 F A@3 G A@3 F A@3 G A@3 F A@3 G H ~
>`.pickRestart({
  A: "[g4,bb4,d5]@2 ~@2 [g4,bb4,d5]@3 [a4,c5,e5] ~@2 [a4,c5,e5]@2 ~@2 [a4,c5,e5] ~", // Gm Am
  B: "[g4,bb4,d5]@2 ~@2 [g4,bb4,d5]@3 [a4,c5,e5] ~@2 [a4,c5,e5]@3 ~ [a4,c5,e5]@2", // Gm Am
  C: "[g4,bb4,d5]@2 ~@2 [g4,bb4,d5]@3 ~ [g4,bb4] [b4,c5,e5] [b4,c5,d5,f5,g5,a5] [e5,f5,g5,a5,b5,c6,d6,e6] [b5,c6,d6,e6,f6,g6,a6] [d6,f6,g6,a6,b6] c7 ~, ~@4 d5 ~@3", // Gm Cmaj7 Bm7b5 Em7 Bm7b5 G7
  D: "[g4,bb4,d5]@2 ~@2 [g4,bb4,d5]@2 ~ [g4,bb4] ~@2 [g4,bb4,d5]@3 ~ [g4,bb4] ~, ~@7 d5@2 ~@5 d5@2", // Gm
  E: "[g4,d5] ~@7, bb4 ~@15", F: "[g4,bb4,d5]@2 ~@2 [g4,bb4,d5]@3 [g4,bb4,d5] ~@2 [g4,bb4,d5]@3 ~ [g4,bb4,d5]@2",
  G: "[bb4,d5,f5]@3 [g4,c5,e5]@2 [bb4,d5,f5]@3 [g4,bb4,c5,e5]@3 [d5,f5]@2 [g4,bb4,c5,e5]@3", // Bb C Bb C7 Dm C7
  H: "[g4,bb4,d5] ~@6 [bb4,d5,g5]", // Gm
})).s("gm_rock_organ").gain(0.33).pan(0.6)

// other · electric guitar muted · "MUTED GTR"
const electric_guitar_muted = note("<~@32 A B@2 C A C A D E@7 F ~@2 G E@12 F H ~@31>".pickRestart({
  A: "~@10 d3!2 ~ d3!3", B: "~@9 d3 ~ d3 ~ d3!3", C: "~@9 d3!3 ~ d3!3", D: "~@5 d3 ~ d3!3 ~ d3!5",
  E: "d3 ~ c3 ~ d3 ~@2 d3!2 ~ c3 ~ d3 ~@2 d3", F: "d3 ~ c3 ~ d3 ~@2 d3!2 ~ c3 ~ d3 ~@3", G: "~@7 d3!2 ~ c3 ~ d3 ~@2 d3",
  H: "d3 ~@15",
})).s("gm_electric_guitar_muted").gain(0.4).pan(0.8)

// chords · xylophone · Bb
const xylophone = note(`<
  ~@4
  [~@6 [bb3,d4] ~ [bb3,d4] ~@2 [bb3,d4] ~@2 [bb3,d4] ~]!3
  [~@6 [bb3,d4] ~ [bb3,d4] ~@7]
  ~@88
>`).s("gm_xylophone").gain(0.2).pan(0.2)

// drums · kick
const kick = s("bd").struct(`<
  ~@4 A B A C ~@8 A B A B A B A D A B A B A B A ~ A B A B A B A ~ A B A B A B A D A B A B A B A ~ A B A B A B A B E ~@5
  A B A B A B A B A B A B A B A B A B A B A B A B A ~
>`.pickRestart({
  A: "x ~ x ~ x ~ x!2", B: "x!4", C: "x!2 ~ x!3 ~ x!2 ~@7", D: "x!3 ~", E: "x",
})).gain(0.74)

// drums · snare
const snare = s("sd").struct("<~@4 A@3 ~@9 A@7 B A@7 ~ A@7 ~ A@7 B A@7 ~ A@8 ~@6 A@25 ~>".pickRestart({
  A: "~@4 x ~@2 x ~@4 x ~@3", B: "~@4 x ~@2 x ~@8",
})).gain(0.59)

// drums · clap
const clap = s("cp").struct("<A@4 B@3 ~ A@8 B@7 C B@7 ~ B@7 ~ B@7 C B@7 ~ B@8 A@6 B@25 ~>".pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@2 x ~@4 x ~@3", C: "~@4 x ~@2 x ~@8",
})).gain(0.52)

// drums · pedal hat
const pedal_hat = s("hh").struct("<~@4 A@3 B ~@8 A@7 C A@7 B A@7 B A@7 C A@7 B A@8 ~@6 A@25 ~>".pickRestart({
  A: "x!4", B: "x", C: "x!3 ~",
})).gain(0.3)

// drums · open hat
const open_hat = s("oh").struct("<~@4 A@3 ~@9 A@7 B A@7 ~ A@7 ~ A@7 B A@7 ~ A@8 ~@6 A@25 ~>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~@2",
})).gain(0.22)

// drums · tambourine
const tambourine = s("tb").struct("<~@4 A@2 B C ~@8 A@7 D A@15 ~ A@7 D A@16 ~@6 A@24 B ~>".pickRestart({
  A: "x ~ x ~ x ~ x ~ x ~ x ~ x ~ x!2", B: "x!8", C: "x", D: "x!6 ~@2",
})).gain(0.37)

// drums · tambourine · soft notes
const tambourine_soft = s("tb").struct("<~@4 A@2 B ~@9 A@7 C A@15 ~ A@7 C A@16 ~@6 A@25 ~>".pickRestart({
  A: "~ x ~ x ~ x ~ x ~ x ~ x ~ x ~@2", B: "~ x ~ x ~ x ~ x ~ x ~ x ~ x ~ x", C: "~ x ~ x ~ x ~ x ~ x ~ x ~@4",
})).gain(0.22)

stack(
  bass, string_ensemble_1, synth_strings_2, tinkle_bell, kalimba, rock_organ, electric_guitar_muted, xylophone, kick,
  snare, clap, pedal_hat, open_hat, tambourine, tambourine_soft
)