// Bakerstreet — Gerry Rafferty
// 122 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 113 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(122/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.

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  ~@12 A@3 B C D E F A@3 B C D E G H I J K L D M N J I J O P Q R S ~@16 A@3 B C D E F A@3 B C D E G H I J T L D M N J I
  J O P Q R S ~@21
>`.pickRestart({
  A: "~@3 [f#3,b3,d#4,f#4] ~@3 [f#3,b3,d#4,f#4]", B: "~@3 [f#3,b3,d#4,f#4] ~@3 [f#3,a3,c#4,e4]",
  C: "~@3 [f#3,a3,c#4,e4] ~@3 [e3,a3,c#4,e4]", D: "~@3 [e3,a3,c#4,e4] ~@3 [e3,g#3,b3,e4]",
  E: "~@6 [e3,g#3,b3,e4]@3 ~@5 [e3,g#3,b3,e4]@2", F: "~@6 [e3,g#3,b3,e4]@2 ~@6 [f#3,b3,d#4,f#4] ~",
  G: "~@6 [e3,g#3,b3,e4]@2 ~@6 [g3,b3,e4,g4] ~", H: "~@6 [g3,b3,e4,g4]@3 ~@5 [f#3,b3,d4,f#4]@2",
  I: "~@3 [f#3,b3,d4,f#4] ~@3 [g3,b3,e4,g4]", J: "~@3 [g3,b3,e4,g4] ~@3 [f#3,b3,d4,f#4]",
  K: "~@3 [b3,d4,f#4] ~@3 [f#3,a3,d4,f4,f#4], ~@5 f#3@3 ~@8", L: "~@3 [f#3,a3,d4,f#4] ~@3 [e3,a3,c#4,e4]",
  M: "~@3 [e3,g#3,b3,e4] ~@3 [e3,g#3,b3,e4]", N: "~@3 [e3,g#3,b3,e4] ~@3 [g3,b3,e4,g4]",
  O: "~@3 [f#3,b3,d4,f#4] ~@3 [f#3,a3,d4,f#4]", P: "~@6 [f#3,a3,d4,f#4]@3 ~@5 [e3,a3,c#4,e4]@2",
  Q: "~@3 [e3,a3,c#4,e4] ~@3 [f#3,b3,d#4,f#4]", R: "~@6 [f#3,b3,d#4,f#4]@3 ~@5 [g3,b3,e4,g4]@2",
  S: "~@6 [g3,b3,e4,g4]@3 ~@7", T: "~@3 [f#3,b3,d4,f#4] ~@3 [f#3,a3,d4,f4,f#4]",
})).s("gm_acoustic_guitar_steel").gain(0.31)

// bass · acoustic bass · "ACOU BASS"
const bass = note(`<
  A B C D E F E F G H I J K@3 L M N O P K@3 L M N O P Q R S T U V W X Y Z Y AA AB AC AD AE E F E F G H I J E F E F G H I
  J K@3 L M N O P K@3 L M N O P AF R S T U V W X Y Z Y AA AB AC AD AE E F E F G H I J E F E F G H I J A B C D AG
>`.pickRestart({
  A: "b1", B: "g1@15 ~", C: "a1", D: "~@2 a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~", E: "e2@3 ~ e2@4 ~@2 e2 ~ e2 ~ e2 ~",
  F: "e2@3 ~ e2@4 ~@2 a2 ~ a2 ~ a2 ~", G: "d2@3 ~ d2@4 ~@2 d2 ~ d2 ~ d2 ~", H: "b1@3 ~ b1@4 ~@2 b1 ~ b1 ~ b1 ~",
  I: "a1@3 ~ a1@4 ~@2 a1 ~ a1 ~ a1 ~", J: "a1@5 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~", K: "b1@5 ~ b1 ~@3 b1 ~@3 b1 ~",
  L: "b1@5 ~ b1@2 ~@2 b1 ~@3 b1 ~", M: "f#2@5 ~ f#2 ~@3 f#2@2 ~@2 e2@2", N: "a1@5 ~ a1 ~@3 a1@2 ~@2 b1 ~",
  O: "e2@5 ~ e2@2 ~@2 e2@2 c#2@2 b1 ~", P: "e2@5 ~ e2 ~@3 e2@2 c#2@2 ~@2", Q: "e2@6 c#3@2 ~@2 d3 ~@3 a1 ~",
  R: "b1@6 a2@2 ~@2 b2@2 ~@2 b2 ~", S: "e2@3 c#3 ~ d3 ~ a1", T: "b1@6 a2@2 ~@2 b2@2 ~@2 d2 ~",
  U: "d2@5 ~ d2@2 ~@2 d2@2 ~@2 d2 ~", V: "a1@5 ~ a1@2 ~@2 a1@2 ~@2 a1@2", W: "e2@2 ~ e2 ~ e2 c#2 b1",
  X: "e2@5 ~ e2@2 ~@2 e2@2 c#2@2 b1@2", Y: "e2@6 c#3 ~@3 d3 ~@3 a1 ~", Z: "b1@6 a2 ~@3 b2 ~@3 b2 ~",
  AA: "b1@6 a2 ~@3 b2 ~@3 d2 ~", AB: "d2@5 ~ d2 ~@3 d2 ~@3 d2@2", AC: "c#2@5 ~ c#2 ~@3 c#2@2 ~@2 c#2 ~",
  AD: "b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~", AE: "a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~",
  AF: "e2@6 c#3@2 ~@2 d3 ~@3 a1@2", AG: "e2@3 ~",
})).s("gm_acoustic_bass").gain(0.46)

// chords · piano · "A.PIANO 2"
const piano = note(`<
  ~@4 A B A B C D E@2 F G H I J K L@2 M G H I J K L@2 ~@16 A B A B C D E@2 A B A B C D E@2 F G H I J K L@2 M G H I J K
  L@2 ~@16 A B A B C D E@2 A B A B C D E@2 ~@5
>`.pickRestart({
  A: "[e2,e3,b3,e4,g#4]@3 ~ [e2,e3,b3,e4,g#4]@5 ~ [e2,e3,b3,e4,g#4]@3 ~ [e2,e3,b3,e4,g#4] ~", // E
  B: "[e2,e3,b3,e4,g#4]@3 ~ [e2,e3,b3,e4,g#4]@8 ~@4", // E
  C: "[d2,d3,a3,d4,f#4]@3 ~ [d2,d3,a3,d4,f#4]@5 ~ [d2,d3,a3,d4,f#4]@3 ~ [d2,d3,a3,d4,f#4] ~", // D
  D: "[b1,b2,b3,f#4]@3 ~ [b1,b2,b3,f#4]@8 ~@4", E: "[[a1,a2,a3,c#4,e4]@31 ~]/2",
  F: "[b3,d#4]@4 ~@2 d#4@2 ~@2 d#4 ~ [c#4,e4]@4, [b4,f#5,b5]@7 ~, f#4@3 ~, ~@6 b3 ~@3 b3@5 ~", // B C#m B5
  G: "[d#4,f#4]@5 ~ [d#4,f#4]@3 ~ [d#4,f#4]@3 ~ [c#4,e4] ~, b3@7 ~", // D#m C#m
  H: "[b3,d#4]@4 ~@2 [b3,d#4]@3 ~@2 d#4@2 ~ [c#4,e4]@2, f#4@3 ~, ~@5 b3@2 ~", // B C#m
  I: "[d#4,f#4]@3 ~ f#4@2 [c#4,e4]@4 [b3,d#4]@3 ~ [b3,d#4] ~, ~@4 d#4 ~@11", J: "[a3,c#4,e4]@15 ~", K: "[a3,c#4,e4]",
  L: "[[g#3,b3]@10 [a3,c#4]@4 [g#3,b3] ~ [g#3,b3]@16, e4]/2", // G#m A G#m
  M: "[b3,d#4]@5 ~ d#4@2 ~@2 d#4 ~ [c#4,e4]@4, f#4@3 ~, ~@6 b3 ~@3 b3@5 ~", // B C#m
})).s("gm_piano").gain(0.31)

// other · drawbar organ · "ORGAN 1"
const drawbar_organ = note("<~@13 A ~@5 B ~@7 C ~@33 A ~@5 B ~@7 C ~@37>".pickRestart({
  A: "~@10 b5 [f#5,b5] f#5 [f#5,b5] b4 [b4,f#5]", B: "~@10 [f#5,b5] b5 [f#5,b5] f#5 b4 [b4,f#5]",
  C: "~@10 e6 [b5,e6] b5 [b5,e6] e5 ~", // E5
})).s("gm_drawbar_organ").gain(0.31)

// chords · lead 8 bass lead · "BASS&LEAD"
const lead_8_bass_lead = note(`<
  ~@4 A@2 B@2 C D E@2 ~@23 F@5 ~@4 A@2 B@2 C D E@2 A@2 B@2 C D E@2 ~@23 F@5 ~@4 A@2 B@2 C D E@2 A@2 B@2 C D E@2 ~@5
>`.pickRestart({
  A: "[[e3,b3,e4]@7 ~]/2", B: "[[e3,b3,e4]@15 ~]/2", C: "[d3,a3,d4]", D: "[b2,f#3,b3]@7 ~", E: "[[a2,e3,a3]@31 ~]/2",
  F: "[~@16 b5@6 ~@10 a5@8 ~@8 b5@8 ~@8 a5@9 ~@7, ~@15 [e6,g6,b6]@7 ~@8 a6@9 ~@23 a6@10 ~@8, ~@31 [d6,f#6]@9 ~@7 [e6,g6,b6]@9 ~@7 [d6,f#6]@10 ~@7]/5", // Em D Em D
})).s("gm_lead_8_bass_lead").gain(0.36)

// other · oboe
const oboe = note("<~ A B C ~@105 A B C ~>".pickRestart({
  A: "~@14 e5 d5", B: "e5@3 d5 b4@3 d5", C: "b4@7 ~",
})).s("gm_oboe").gain(0.31)

// chords · piano · "A.PIANO 2"
const piano_2 = note("<~@15 A@2 B C@2 D@6 E@6 ~@28 F@5 B C@2 G@6 E@6 ~@33>".pickRestart({
  A: "[~@16 [c#4,f#4]@15 ~, ~@15 a3@15 ~@2]/2", B: "[a3,c#4,e4]@15 ~",
  C: "[[g#3,b3]@10 [a3,c#4]@4 [g#3,b3]@17 ~, e4@31 ~]/2", // G#m A G#m
  D: "[[b3,d#4,f#4]@59 ~@5 f#4@15 ~ [a3,e4]@15 ~, ~@21 a3@5 ~@6, ~@32 c#4@15 ~]/6", // B A5
  E: "[[g#3,b3]@10 [a3,c#4]@4 [g#3,b3]@15 ~@3 g5@8 ~@7 [a5,d6]@8 ~@9 b5@8 ~@8 a5@8 ~@8, e4@29 ~@2 [b5,e6,g6]@9 ~@6 [f#6,a6]@9 ~@7 b6@9 ~@7 a6@10 ~@8, ~@63 [e6,g6]@9 ~@7 [d6,f#6]@9 ~@8]/6", // G#m A G#m D5 Em F#m Em D
  F: "[[b3,d#4,f#4]@28 ~@4 [d#4,f#4]@30 ~@2 [c#4,f#4]@15 ~, ~@31 b3@30 ~@2 a3@15 ~@2]/5", // B D#m F#5
  G: "[[b3,d#4,f#4]@28 ~@4 [d#4,f#4]@27 ~@5 f#4@15 ~ [a3,e4]@15 ~, ~@31 b3@28 ~@4 a3@15 ~@18, ~@32 c#4@15 ~]/6", // B D#m A5
})).s("gm_piano").gain(0.26)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  A@2 B@2 C@4 D@2 E@2 ~@16 F@4 G@2 H@2 I@4 J@2 K@2 C@4 D@2 E@2 C@4 D@2 E@2 ~@16 L@2 M@2 N@2 O@2 P@2 Q@2 R@2 S T C@4 D@2
  E@2 C@4 D@2 E@2 U@2 B@2 ~
>`.pickRestart({
  A: "[[c#4,e4] [c4,f4], a4]/2", B: "[[d4,g4,b4]@29 ~@3]/2", C: "[[b3,e4,g#4]@31 ~]/4", D: "[[a3,d4]@8 b3@7 ~, f#4]/2",
  E: "[[a3,e4]@31 ~]/2", F: "[g4@15 ~ f#4@16 g4@16 f#4@14 ~@2, b3@31 ~]/4", G: "[f#4@8 c#4@7 ~, a4@31 ~]/2",
  H: "[[b3,g#4]@15 ~]/2", I: "[g4@15 ~ f#4@15 ~ g4@16 f#4@14 ~@2, b3@31 ~]/4", J: "[f#4@15 ~ c#4@14 ~@2, a4@31 ~]/2",
  K: "[d#4@15 ~ g4@15 ~, b4@31 ~]/2", L: "[~@2 g5@2 f#5@3 ~, ~@2 b5@5 ~]/2",
  M: "[~@8 g5@7 ~ f#5@13 ~@3, ~@8 b5@21 ~@3]/2", N: "[f#5@16 c#5@15 ~, a5]/2",
  O: "[[b4,g#5]@10 ~@2 d5 [g#4,e5]@3, ~@24 f#4 ~@7]/2", P: "[~@4 g5@4 f#5@7 ~, ~@8 b5@23 ~]/2",
  Q: "[~@4 g5@4 f#5@7 ~, ~@4 b5@11 ~]/2", R: "[f#5@16 c#5@15 ~, a5@31 ~]/2", S: "[b4,d#5]", T: "g5@15 ~",
  U: "[[c#4,e4]@16 [c4,f4]@15 ~, a4]/2", // C#m F5
})).s("gm_string_ensemble_1").gain(0.26)

// other · flute
const flute = note(`<
  [c#6@7 b5]
  [a5@3 c6@3 a5@2 f5@6 e5 d5]
  [e5@7 ~@9]
  ~@105
  [c#6@7 b5]
  [a5@3 c6@3 a5@2 f5@6 e5 d5]
  [e5@7 ~@9]
  ~@2
>`).s("gm_flute").gain(0.36)

// other · electric guitar jazz · "JAZZ GTR"
const electric_guitar_jazz = note(`<
  ~@12 A@2 B@3 C D@2 E F G H@2 I D@2 J K L M N O@2 ~ J P J M N Q@2 ~@17 R@2 S T@2 C U@2 V W X Y@2 Z AA ~ AB AC AD AE AF
  AG@2 ~ AH AI AJ P N AK@2 ~@22
>`.pickRestart({
  A: "[~@2 d4@2 c#4@2 b3 ~ b3 ~ b3@2 g#3 ~ b3@5 ~ b3 ~ b3@2 ~@8]/2",
  B: "[~@2 d4@2 c#4@2 b3 ~ b3 ~ b3@2 g#3@2 b3@5 ~ b3 ~ b3 ~ b3 ~ b3@2 g#3@2 a3@4 g#3@2 a3!3 ~ f#3@2 ~@4 e3@2]/3",
  C: "a3 ~ a3!2 ~ a3 ~ a3@4 ~ a3@2 g#3@2, ~@3 b3 ~@4", D: "[a3@2 g#3 ~ g#3 ~ g#3@4 a3@4 g#3@5 ~@13]/2",
  E: "~@2 d4@2 c#4 b3 b3@3 ~ b3 ~ b3@2 g#3@2", F: "a3@2 b3@3 ~ b3@3 ~ b3@2 b3@2 ~@2",
  G: "~@2 d4@2 c#4 b3 c#4 b3@2 ~ b3@4 g#3@2", H: "[a3@2 b3@2 ~@2 b3@3 ~ b3@2 g#3@2 a3@4 g#3@2 a3!3 ~ f#3@3 ~@3 e3@2]/2",
  I: "a3 ~ a3!2 ~ a3 b3 a3@4 ~ a3@2 g#3@2", J: "~ e3 d4 c#4 d4 c#4 d4 c#4", K: "d4@3 c#4@2 d4 ~@2",
  L: "~@2 e3 ~ d4@2 c#4@2 d4@2 c#4@2 d4@2 c#4@2", M: "d4@6 c#4@4 d4@3 ~ d4@2", N: "e4@6 d4@4 a3@3 ~@3",
  O: "[e4@6 c#4@6 a3@2 b3@15 ~@3]/2", P: "d4@6 c#4@4 d4@3 ~@3", Q: "[e4@6 c#4@6 a3@2 b3@13 ~@5]/2",
  R: "[~@2 d4@2 c#4@2 b3 ~ b3 ~ b3@2 g#3@2 b3@6 b3 ~ b3 ~ b3 c#4 ~@4 b2 ~]/2",
  S: "d4@2 c#4@2 b3 ~ b3@3 ~ b3 ~ b3@2 g#3@2",
  T: "[a3@2 b3 ~ b3 ~ b3@3 ~ b3@2 g#3@2 a3@4 g#3@2 a3!2 ~ a3 f#3@3 ~@3 e3@2]/2",
  U: "[a3@2 g#3 ~ g#3 ~ g#3@4 a3@4 g#3@4 ~@14]/2", V: "~@2 d4@2 c#4@2 b3 ~ b3@2 g#3@2 b3@3 ~",
  W: "b3@4 a3@2 b3@3 ~ b3 ~ b3@2 b2 ~", X: "~@2 d4@2 c#4 b3 c#4 b3@4 ~ b3@2 g#3@2",
  Y: "[a3@2 b3@3 ~ b3@6 g#3@2 a3@4 g#3@2 a3!2 ~ a3 f#3@4 ~ e3 ~ e3]/2", Z: "a3!2 ~ a3!2 ~ b3 a3@4 ~ a3@2 g#3@2",
  AA: "a3@2 g#3 ~ g#3 ~ g#3@4 a3@4 g#3@2", AB: "~@2 b2 ~ d4 ~ d4@4 c#4@2 d4@2 c#4@2", AC: "d4@3 c#4@2 d4@2 ~",
  AD: "~@2 b2 ~ d4 ~ d4 ~ d4@2 c#4@2 d4@2 c#4 ~", AE: "d4@3 c#4@2 d4@2 a3", AF: "e4@6 d4@4 a3@5 ~",
  AG: "[e4@4 c#4 ~ c#4 b3@5 a3@2 b3@11 ~@7]/2", AH: "~@4 d4 ~ d4 ~ d4 ~ d4 ~ d4@2 c#4@2", AI: "d4@6 c#4@3 ~ d4@4 ~@2",
  AJ: "~@2 b2@2 d4 ~ d4 ~ d4 ~ d4 ~ d4@2 c#4@2", AK: "[e4@3 c#4@3 a3 b3@7 ~@2]/2",
})).s("gm_electric_guitar_jazz").gain(0.36)

// drums · kick
const kick = s("bd").struct("<A@2 B@2 C@8 A@30 ~@2 C@6 ~@2 C@8 A@30 ~@2 C@6 ~@2 C@8 A@2 B@2 D>".pickRestart({
  A: "x ~@2 x ~ x ~ x", B: "x!4", C: "x ~ x ~@2 x ~@2", D: "x",
})).gain(0.36)

// drums · snare
const snare = s("sd").struct("<~@2 A@2 B C@6 D ~@30 E@2 C@6 F E C@7 D ~@30 E@2 C@6 F E C@7 D ~@2 A@2 G>".pickRestart({
  A: "x!16", B: "x!2 ~ x", C: "~ x ~ x", D: "~@2 x ~ x!2 ~@2", E: "x!8", F: "~ x!7", G: "x",
})).gain(0.41)

// drums · low tom
const low_tom = s("lt").struct("<~@11 [~@7 x] ~@47 [~@7 x] ~@47 [~@7 x] ~@5>").gain(0.41)

// drums · hihat
const hihat = s("hh").struct("<A@2 ~@2 B@8 C@31 B@7 ~@2 B@8 C@31 B@7 ~@2 B@8 A@2 ~@3>".pickRestart({
  A: "~ x!3", B: "x!8", C: "x!4",
})).gain(0.36)

// drums · high tom
const high_tom = s("ht").struct("<~@11 A ~@30 B@2 ~@6 C B ~@7 A ~@30 B@2 ~@6 C B ~@7 A ~@5>".pickRestart({
  A: "~@3 x", B: "x!8", C: "~ x!7",
})).gain(0.41)

// drums · crash
const crash = s("cr").struct("<A@3 ~ A ~@39 A ~@5 A ~ A ~@39 A ~@5 A ~ A ~@7 A@3 ~ A>".pickRestart({
  A: "x",
})).gain(0.51)

// drums · tambourine
const tambourine = s("tb").struct("<~@2 A B@7 C D ~@32 B@14 C D ~@32 B@14 C D ~@2 A B E>".pickRestart({
  A: "~ x!7", B: "x!8", C: "x ~ x ~ x ~ x ~ x!8", D: "x!16", E: "x",
})).gain(0.26)

// drums · bongos
const bongos = s("bongo:4").struct("<~@12 [~ x ~ x]!32 ~@16 [~ x ~ x]!32 ~@21>").gain(0.94)

// drums · bongos
const bongos_2 = s("bongo:18").struct(`<
  ~@12 A B@2 C A B A D A B@2 C A B A D A B@2 C A B A E A B@2 C A B F E ~@16 A B@2 C A B A D A B@2 C A B A D A B@2 C A B
  A E A B@2 C A B F E ~@21
>`.pickRestart({
  A: "x ~@2 x ~@4 x!2 ~ x ~@4", B: "x ~@2 x ~@4 x!2 ~ x ~@2 x!2", C: "x ~@2 x ~@3 x!3 ~ x ~@4",
  D: "x ~@2 x ~@2 x!4 ~ x ~@4", E: "x ~@2 x ~@2 x!6 ~@2 x!2", F: "x ~@2 x ~@2 x!4 ~ x ~@2 x!2",
})).gain(0.94)

// drums · congas
const congas = s("conga:18").struct("<~@3 A B@8 ~@32 B@6 C ~ B@8 ~@32 B@6 C ~ B@8 ~@3 A ~>".pickRestart({
  A: "x!8", B: "~@2 x ~@3 x!2", C: "~@6 x!2",
})).gain(1.15)

// drums · congas
const congas_2 = s("conga:33").struct("<~@4 A@8 ~@32 A@6 B C A@8 ~@32 A@6 B C A@8 ~@5>".pickRestart({
  A: "x ~@4 x ~@2", B: "x ~ x ~@2 x ~@2", C: "x!8",
})).gain(1.15)

stack(
  acoustic_guitar_steel, bass, piano, drawbar_organ, lead_8_bass_lead, oboe, piano_2, string_ensemble_1, flute,
// … 2 more lines