// The Promise You Made — Cock Robin
// 118 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: ch 5 "clean guitar" named as a guitar, played on electric guitar clean (its electric bass pick patch is not one)
// note: duplicate parts dropped: ch 5 "clean guitar" electric guitar clean (copy of ch 6 "clean guitar 2" distortion guitar)
// note: Full arrangement: all 112 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): guitar licks 2 (dist sounds).
setcpm(118/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.

// other · epiano2 · "male"
const epiano2 = note(`<
  ~@9 A B@2 ~ A C D@2 ~@2 E F ~ G H I@2 J K@2 L M ~ L N O P O Q ~@25 K@2 L M ~ L N O P O Q ~@17 K@2 L M ~ L N R P O ~@11
>`.pickRestart({
  A: "~@15 f4, ~@7 g4", B: "[e4@2 ~ e4@2 ~ e4 ~ e4@6 c4 ~ e4@3 e4@3 f4@2 e4@8, ~@15 d4@2 ~@15]/2",
  C: "e4@2 ~ e4@2 ~ e4 ~ e4@6 c4 d4", D: "[e4 ~@2 e4@3 f4@4 e4@14 ~@8]/2", E: "g4@2 ~ g4 ~@2 g4 ~ g4@2 ~ a4@2 ~ b4 ~",
  F: "a4@6 f4 ~@2 f4 ~@2 f4@4", G: "~@7 d4", H: "g4@3 g4@2 ~ g4 ~ g4@6 a4 b4",
  I: "[c5@6 a4@3 ~ a4@3 ~ a4@4 g4@2 e4@9 ~@3]/2", J: "~@5 a4@2 g4",
  K: "[a4@4 f4@4 b4@5 c5@2 ~ g4@3 e4@3 a4@9 ~, ~@15 b4@2 ~@15]/2", L: "~@2 a4@3 f4@3 b4@5 c5@2 b4",
  M: "g4@5 ~ a4 g4 e4@8", N: "g4@3 e4@3 a4@7 ~ c4@2", O: "e4@2 ~ e4@2 ~ e4 ~ e4@3 g4@3 f4@2", P: "e4@7 c4",
  Q: "e4@15 ~", R: "e4@2 ~ e4@2 ~ e4 ~ e4@2 g4@3 f4@3",
})).s("gm_epiano2").gain(0.57).pan(0.3)

// other · synth brass 1 · "male"
const synth_brass_1 = note("<~@101 A B@2 C@3 ~@5>".pickRestart({
  A: "~@7 c5", B: "[e5@2 ~ e5@2 ~ e5 ~ e5@2 d5@2 c5@2 e5@4 d5 c5@2 ~ e5@8 c5@2]/2",
  C: "[e5@2 ~ e5@2 ~ e5 ~ e5@2 d5@2 c5@2 e5@32 ~@2]/3",
})).s("gm_synth_brass_1").gain(0.57).pan(0.3)

// chords · synth strings 2 · "DX7 strings"
const synth_strings_2 = note(`<
  A@3 B C D E B C D E B C D E B C F@2 G H@2 I@2 J K L M N@2 O@2 M P Q R S T@2 U@2 V@2 U@2 V@2 W X Y X W X Y X Z@7 L M
  N@2 O@2 M P Q R S T@2 U@2 V@2 U@2 V@2 AA@3 AB AA@3 AC AD AE@2 AF@2 AG@2 Q R AH@2 AI AJ AK AL@2 AM@2 AN AO ~
>`.pickRestart({
  A: "[c3 c4 [a2,e3,c4], a3, [f2,f3]@2 ~]/3", B: "[g2,e3,g3,c4]", C: "[f2,f3,a3,c4]", D: "[c2,e3,g3,c4]",
  E: "[a2,e3,a3,c4]", F: "[~@2 e4 f4, [c2,e3,g3,c4]]/2", G: "[b2,b3,d4,g4]", H: "[f4 e4, [a2,a3,c4]]/2",
  I: "[[g2,g3,b3] [g2,b3,g4], d4]/2", J: "[f2,a3,c4,f4]", K: "[a2,a3,c4,e4]", L: "[g2,b3,d4,g4]",
  M: "[c4,f4,a4] [d4,g4,b4]", N: "[[b3,e4,g4] [c4,f4,a4]@2 [d4,g4,b4]]/2", O: "[b4@2 c5 d5, [e4,g4]]/2",
  P: "[b3,e4,g4] [c4,f4,a4]", Q: "g3", R: "g#3", S: "[g3,c4]", T: "[b3@2 c4 d4, [e3,g#3]]/2", U: "[a3 g3, [c4,e4]]/2",
  V: "[~@2 c5 d5 [e4,g4,c5,e5]@4, c4, [f4,a4] ~]/2", W: "[a3,c4,e4]", X: "[g3,c4,e4]", Y: "~ c4, [f3,a3]",
  Z: "[[b2,b3,d4] f4 e4 [g2,g3,b3] [g2,b3] [f2,a3,c4,f4] [a2,a3,c4,e4], g4, ~ [a2,a3,c4]@2 d4@2 ~@2]/7", // Bm G F Am
  AA: "[[d4,g4,b4] [c4,f4,a4] [a4,c5,e5], g5@11 ~@5]/3", AB: "[g4,b4,d5]", AC: "[b4,d5,g5]",
  AD: "[c5,f5,a5] [d5,g5,b5]", AE: "[[b4,e5,g5] [c5,f5,a5]@2 [d5,g5,b5]]/2", AF: "[e5,g5,b5]/2",
  AG: "[[c5,f5,a5] d5 e5 [c5,f5,a5], ~ [g5,b5]@2 ~]/2", AH: "[g3 g#3, c4]/2", AI: "[c4,e4,g4]", AJ: "[c4,e4,g#4]",
  AK: "[e4,g4,c5]", AL: "[e4,g#4,b4]/2", AM: "[a4@15 g4@15 ~@2, [c5,e5]@31 ~]/2", AN: "f5@3 a5, [a4,c5]",
  AO: "[e5,g5,c6]@13 ~@3", // C
})).s("gm_synth_strings_2").gain(0.64)

// bass · electric bass finger · "bass guitar"
const bass = note(`<
  ~@27 A B@2 C@2 A D E@2 F G@2 H I J K H I J K H I J K H I J K L M N O L M N O P Q P R S T U V@2 W X@2 H I J K H I J K L
  M N O L M N O P Q P R S T U E@4 K@2 Y Z AA H I AB AC ~
>`.pickRestart({
  A: "f1 g1", B: "[e1 f1@2 g1]/2", C: "[e1@11 b1 e2@2 e1@2]/2", D: "e1 f1", E: "[c1@15 g1]/2", F: "c1@6 d1 d#1",
  G: "[e1@7 e1]/2", H: "a1@2 ~ a1 a1@3 ~ a1!2 ~ a1 a1@2 e1@2", I: "g1@2 ~ g1 g1@3 ~ g1!2 ~ g1 g1@2 e1@2",
  J: "f1@2 ~ f1 f1@3 ~ f1!2 ~ f1 f1@2 g1 a1", K: "c2@2 ~ c2 c2@3 ~ c2!2 ~ c2 c2@2 g1@2",
  L: "b1@2 ~ b1 b1@2 ~@2 b1!2 ~ b1 b1@2 g1@2", M: "a1@2 ~ a1 a1@2 ~@2 a1!2 ~ a1 a1@2 g1@2",
  N: "a1@2 ~ a1 a1@2 ~@2 a1!2 ~ a1 a1@2 e1@2", O: "g1@2 ~ g1 g1@2 ~@2 g1!2 ~ g1 g1@2 d1@2",
  P: "f1@2 ~ f1 f1@2 d1@2 g1!2 ~ g1 g1@2 d1@2", Q: "e1@2 ~ e1 e1@2 c1@2 f1!2 ~ f1 f1@2 c1@2",
  R: "e1@2 ~ e1!2 ~ e1@2 e1!2 ~ e1!2 ~ e1@2", S: "e1@2 ~ e1 e1@2 b1@2 e2!2 ~ e2 e2@2 e1@2",
  T: "f1@2 ~ f1!2 ~ f1@2 g1!2 ~ g1 g1@2 d1@2", U: "e1@2 ~ e1!2 ~ e1@2 f1!2 ~ f1 f1@2 c1@2",
  V: "c2@2 ~ c2 c2@2 ~@2 c2!2 ~ c2 c2@2 g1@2", W: "c2@2 ~ c2 c2@2 ~@2 c2!2 ~ c2 c3@2 c2@2",
  X: "e1@2 ~ e1 e1@3 ~ e1!2 ~ e1 e1@3 ~", Y: "c2@2 ~ c2 c2@3 ~ c2!2 ~ c2 c2@2 d1@2",
  Z: "e1@2 ~ e1 e1@3 ~ e1!2 ~ e1 e1@2 e1@2", AA: "e1@2 ~ e1 e1@3 ~ e1!2 ~ e1 e1@4",
  AB: "f1@2 ~ f1 f1@3 ~ f1!2 ~ f1 f1@2 f1 ~", AC: "c2",
})).s("gm_electric_bass_finger").gain(0.71)

// chords · distortion guitar · "clean guitar 2"
const distortion_guitar = note(`<
  ~@4 A B@2 ~ A C@2 ~ A D@2 ~ A C@2 ~@22 A E@2 ~ A E@2 ~@6 F@4 G@4 ~@8 H@3 ~@4 A E@2 ~ A I@4 G@4 ~@11 J@2 K@4 ~@2 L ~@2
>`.pickRestart({
  A: "~ [a3,c4]@15, [c3,f3]@15 ~", B: "[~ [g3,c4]@30 ~, [c3,e3]@31 ~]/2", C: "[~ [g3,c4]@28 ~@3, [c3,e3]@15 ~]/2",
  D: "[~ [g3,c4]@28 ~@3, [c3,e3]@29 ~@3]/2", E: "[~ [g3,c4]@26 ~@5, [c3,e3]@15 ~]/2",
  F: "[~@19 b3@4 ~@5 g3@3 ~@4 a3@3 c4@15 ~@11, ~@15 g2@17 ~@32, ~@4 d3@4 [c3,f3]@5 ~@3, ~@16 g3@11 ~@4 f2@17 ~@16, ~@23 d4@9 ~@32]/4", // F5
  G: "[~@19 b3@4 ~@5 g3@3 ~@4 a3@3 c4@16 ~@10, ~@15 g2@17 ~@32, ~@16 d3@16 [c3,f3]@23 ~@9, ~@16 g3@11 ~@4 f2@17 ~@16, ~@23 d4@9 ~@32]/4", // F5
  H: "[~@3 [e4,g4]@15 ~ [c4,e4,g#4]@15 ~ [e4,g4]@13, ~@2 c4@15 ~@17 c4@14]/3", // Em Caug Em
  I: "[~@19 b3@4 ~@5 g3@3 ~@4 a3@3 c4@15 ~@11, c3@30 ~ f2@17 ~@16, ~@15 g2@17 ~@32, ~@4 d3@4 [c3,f3]@5 ~@3, ~@16 g3@7 d4@9 ~@32]/4", // F5
  J: "[~@17 [c4,e4]@14 ~, ~@15 c3@15 ~@2, ~@8 g3@7 ~]/2", // C
  K: "[~ e4@14 ~@2 [g3,e4]@13 ~@2 [e4,g#4]@30 ~@2, [c3,c4]@15 c3@15 ~ [e3,b3]@31 ~@2, g#3@13 ~@3 c4@14 ~@34]/4", // C E C E5
  L: "[f3,a3,c4]", // F
})).s("gm_distortion_guitar").gain(0.21).pan(0.7)

// other · overdriven guitar · "solo guitar"
const overdriven_guitar = note(`<
  ~@39 A B C D A B C E ~@2 F G ~@2 F G ~@2 H I ~@2 J K ~@12 L M N O L M N O ~@2 P Q ~@2 R S ~@4 T@2 ~@5 U V U V W X Y Z
  AA ~
>`.pickRestart({
  A: "a4@2 ~ a4!2 ~ c5@6 g5@4", B: "g4@2 ~ g4!2 ~ c5@6 b4@4", C: "f4@2 ~ f4!2 ~ c5@6 g5@4",
  D: "c5@10 [g4,a4,b4] [c4,d4,e4,f4] [f3,g3,a3,b3] ~@3", E: "c4@2 ~ c4!2 ~ g4@7 ~@3", F: "a3 c4", G: "d4",
  H: "e4!2 ~ e4!2 ~@11", I: "d4!2 ~ d4!2 ~@11", J: "e4@3 e4", K: "f4@15 ~", L: "a4@2 ~ a4@3 c5@10", M: "g5@3 e5 c5@4",
  N: "a4@2 ~ a4@5 ~@2 a4 ~ g5@4", O: "g5@15 ~", P: "e4@9 ~ e4@5 ~", Q: "d4@11 c4 [f3,g3,a3,b3] [b2,c3,d3,e3] ~@2",
  R: "e4@11 ~ e4@4", S: "f4@7 ~", T: "[c5@4 c5@9 ~@3]/2", U: "g4", V: "g#4", W: "b4", X: "a3 ~@2 a3!2 ~ c4@6 g4@4",
  Y: "g3 ~@2 g3 g3@2 c4@5 ~ b3@4", Z: "a3 f3", AA: "g3@13 ~@3",
})).s("gm_overdriven_guitar").gain(0.6).pan(0.6)

// other · overdriven guitar · "guitar echo"
const overdriven_guitar_2 = note(`<
  ~@39 A@4 B@4 ~@2 C@3 ~ C@3 ~ D E ~@2 F@3 ~@11 G@8 ~@2 H@2 I ~ J@2 ~@4 K@2 ~@5 L@5 M@4 ~
>`.pickRestart({
  A: "[~@3 a4@2 ~ a4!2 ~ c5@6 g5@4 g4@2 ~ g4!2 ~ c5@6 b4@4 f4@2 ~ f4!2 ~ c5@6 g5@4 c5@10 [f4,g4,a4,b4] [a3,b3,c4,d4,e4] [f3,g3]]/4", // G7 Am Fsus2
  B: "[~@3 a4@2 ~ a4!2 ~ c5@6 g5@4 g4@2 ~ g4!2 ~ c5@6 b4@4 f4@2 ~ f4!2 ~ c5@6 g5@4 c4@2 ~ c4!2 ~ g4@7]/4",
  C: "[~@3 a3@8 c4@8 d4@16 ~@13]/3", D: "~@3 e4!2 ~ e4!2 ~@8", E: "~@3 d4!2 ~ d4!2 ~@8",
  F: "[~@3 e4@12 e4@4 f4@15 ~@14]/3",
  G: "[~@3 a4@2 ~ a4@3 c5@10 g5@5 e5@2 ~ c5@8 a4@2 ~ a4@5 ~@2 a4 ~ g5@4 g5@15 ~ a4@2 ~ a4@3 c5@10 g5@5 e5@2 ~ c5@8 a4@2 ~ a4@5 ~@2 a4 ~ g5@4 g5@13]/8",
  H: "[~@3 e4@9 ~ e4@5 ~ d4@11 [b3,c4] [e3,f3,g3,a3]]/2", I: "[b2,c3,d3] ~@15", J: "[~@2 e4@11 ~@2 e4@4 f4@13]/2",
  K: "[~@3 c5@8 c5@18 ~@3]/2", L: "[~@3 g4@16 g#4@16 g4@16 g#4@15 b4@14]/5",
  M: "[~@3 a3 ~@2 a3!2 ~ c4@6 g4@4 g3 ~@2 g3 g3@2 c4@5 ~ b3@4 a3@8 f3@8 g3@13]/4",
})).s("gm_overdriven_guitar").gain(0.24).pan(0.4)

// other · electric guitar muted · "guitar licks (mute snd)"
const electric_guitar_muted = note("<~@6 A@12 B C@7 D ~@36 E F E G E@2 F ~@4 H ~@16 E F E G E@2 F ~@14>".pickRestart({
  A: "c4!16", B: "e4!16", C: "g4!16", D: "g4!8 ~@8", E: "a3!8 b3!8", F: "g3!8 a3!8", G: "b3!16", H: "c4 ~@15",
})).s("gm_electric_guitar_muted").gain(0.19).pan(0.3)

// chords · harpsichord · "analogue synth"
const harpsichord = note("<~@49 A B ~@2 A B ~@6 C D ~@49>".pickRestart({
  A: "[a4,c5]!4 [a4,c5]@2 ~@2 [f4,a4]!4 [f4,a4]@2 ~@2", B: "[g4,c5]!4 [g4,c5]@2 ~@10", C: "[e4,a4]!4 ~@4 [a4,c5]!4 ~@4",
  D: "[g4,b4]!4 ~@12", // G
})).s("gm_harpsichord").gain(0.22).pan(0.3)

// other · whistle · "humming"
const whistle = note("<A B C@4 ~@43 D E ~@2 D E ~@6 F G ~@49>".pickRestart({
  A: "a3", B: "c4", C: "[e4@63 ~]/4", D: "a2 c3", E: "d3", F: "e3@3 e3", G: "f3@15 ~",
})).s("gm_whistle").gain(0.8)

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

// drums · rim
const rim = s("rim").struct("<~@98 [~@15 x] ~@13>").gain(0.48)

// drums · snare
const snare = s("sd").struct("<~@38 [~@3 x] [~ x ~ x]!59 ~@3 [~@3 x] [~ x ~ x]!8 ~@2>").gain(0.6)

// drums · hihat
const hihat = s("hh").struct("<~@27 [x!16]!83 ~@2>").gain(0.6)

// drums · low tom
const low_tom = s("lt").struct("<~@62 A ~@27 A ~@3 A@2 ~@10 B ~@5>".pickRestart({
  A: "~@14 x!2", B: "~@3 x ~@2 x ~ x ~@2 x ~@2 x!2",
})).gain(0.6)

// drums · mid tom
const mid_tom = s("mt").struct("<~@74 [~@7 x!4 ~ x!3 ~] ~@7 [~@11 x!4 ~] ~@23 [~@2 x ~@2 x ~@10] ~@5>").gain(0.48)

// drums · crash
const crash = s("cr").struct(`<
  ~@39 A ~@7 A ~@7 A ~@7 A ~@4 A ~@6 A ~@7 A ~@7 A ~@4 A ~@5 A ~@4 A ~ B A ~
>`.pickRestart({
  A: "x", B: "x!2",
})).gain(0.6)

// drums · bongos
const bongos = s("bongo:4").struct("<~@98 [~@9 x ~ x ~ x ~@2] [~@7 x ~ x ~@2 x!2 ~@2] [~@9 x ~ x ~@4] ~@11>").gain(1.26)

// drums · congas
const congas = s("conga:13").struct("<~@2 [~ x ~ x]!108 ~@2>").gain(1.54)

stack(
  epiano2, synth_brass_1, synth_strings_2, bass, distortion_guitar, overdriven_guitar, overdriven_guitar_2,
  electric_guitar_muted, harpsichord, whistle, kick, rim, snare, hihat, low_tom, mid_tom, crash, bongos, congas
)