// Poor Side of Town — Johnny Rivers
// 104 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: duplicate parts dropped: ch 5 "STEEL GTR" acoustic guitar steel (copy of ch 6 "A.PIANO 1" piano)
// note: Full arrangement: all 97 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(104/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 · acoustic bass · "ACOU BASS"
const bass = note(`<
  ~ A B C D E F G H I J K L M N O P Q R S Q T Q U V I J K L M N O P Q R S Q T Q U V W X Y Z Y AA AB AC AD I J K L M N O
  P Q R S Q T Q U V I J K L M N O P Q R S Q T Q U V AE T AF AG AH AI AJ AK AL AM AN AO AP@3
>`.pickRestart({
  A: "e1@4 ~@2 e2 ~ e2@5 ~ e2@2", B: "e1@5 ~ e1@2 e2@2 e1@2 e2@2 e1 ~", C: "f#1@4 ~@2 f#2 ~ f#2@6 f#1@2",
  D: "f#2@5 ~ f#2 ~ f#2@2 f#1@2 f#2@3 ~", E: "e1@4 ~@2 e2 ~ e2@5 ~ b1 ~", F: "e1@5 ~ e2 ~ e2@2 e1@2 e2@3 ~",
  G: "f#1@4 ~@2 f#2 ~ f#2@5 ~ f#1@2", H: "f#2@6 f#1@2 f#2@2 f#1@2 f#2@3 ~", I: "e2@4 ~@2 e2 ~ e2@6 ~@2",
  J: "e2@5 ~ e2 ~ e2@2 b1@2 e2@2 b1@2", K: "f#2@4 ~@2 f#2 ~ f#2@5 ~ c#2@2", L: "f#2@5 ~ f#2 ~ f#2@2 c#2@2 f#2@3 ~",
  M: "e2@4 ~@2 e2 ~ e2@6 b1@2", N: "e2@3 b1 e2 b1 e2 b1", O: "f#2@4 ~@2 f#2 ~ f#2@6 c#2@2",
  P: "f#2@6 c#2@2 f#2 ~ f#2@3 ~ f#2 ~", Q: "a1@5 ~ a1 ~ a1@5 ~ a1 ~", R: "g#1@4 ~@2 g#1 ~ g#1@7 ~",
  S: "f#1@4 ~@2 f#1 ~ f#1@5 ~ f#1 ~", T: "e2@4 ~@2 e2 ~ e2@5 ~ e2 ~", U: "e1@7 ~", V: "e1@15 ~",
  W: "d2@4 ~@2 d2 ~ d2@4 ~@2 d2 ~", X: "g2@5 ~ g2 ~ g2@2 ~ g2 ~ g2 ~@2", Y: "c2@4 ~@2 c2 ~ c2@5 ~ c2 ~",
  Z: "b1@5 ~ b1 ~ b1 ~@2 b1 ~ b1 ~@2", AA: "b1@5 ~ b1 ~ b1@5 ~ b1 ~", AB: "a1@4 ~@2 a1 ~ a1@5 ~ a1 ~",
  AC: "g1@5 ~ g1 ~ g1@5 ~ g1@2", AD: "b1@3 ~ b1@3 ~ b1@3 ~ b1@3 ~", AE: "e2@5 ~ e2 ~ e2@5 ~ b1@2",
  AF: "f#2@5 ~ f#2 ~ f#2@6 c#2@2", AG: "f#2@2 ~ f#2 ~ f#2 ~@2 f#2@2 ~ f#2@2 f#2 ~@2", AH: "e2@5 ~ e2 ~ e2@5 ~ b1 ~",
  AI: "e1@5 ~ e2 ~ e2@2 b1@2 e2@3 ~", AJ: "f#2@4 ~@2 f#2 ~ f#2@7 ~", AK: "f#2@2 ~ f#2 ~ f#2 ~@2 f#2 ~@2 f#2 ~ f#2 ~@2",
  AL: "e2@4 ~@2 e2 ~ e2@5 ~ b1 ~", AM: "e1@5 ~ b1@2 e2@2 b1@2 e2@2 b1@2", AN: "f#2@4 ~@2 f#2 ~ f#2@5 ~ f#2 ~",
  AO: "f#2@2 ~ f#2 ~ f#2 ~@2 f#2@2 ~ f#2 ~ f#2 ~@2", AP: "[e1@11 ~@5]/3",
})).s("gm_acoustic_bass").gain(0.56)

// chords · string ensemble 2 · "SLOWSTRING"
const string_ensemble_2 = note(`<
  A B@2 C@2 B@2 D@2 E@2 F@2 E@2 F@2 G H I@2 J@2 K@2 L@2 M@2 L@2 N@2 O P Q@4 K@2 R S@2 T U V W X Y L@2 Z@2 L@2 N@2 AA AB
  AC@2 AD@2 K@2 E@2 F@2 E@2 F@2 G H I@2 J@2 K@2 B@2 C@2 B@2 D@2 B@2 C@2 AE@2 ~
>`.pickRestart({
  A: "~@3 b4", B: "[b3,d#4,g#4,b5]/2", C: "[c#6@20 f#5@2 a5@2 c#6@3 e6@3 d#6@2, [c#4,e4,a4]@31 ~]/2",
  D: "[c#6@20 f#5@2 a5@2 c#6@3 e6@3 d#6@2, [c#4,e4,a4]]/2", E: "[e3,g#3,b3,d#4]/2", F: "[[f#3,a3,c#4,e4]@31 ~]/2",
  G: "[c#4,e4,a4]", H: "[b3,d#4,g#4]", I: "[[c#4,f#4]@15 e4@15 ~@2, a3@31 ~]/2", J: "[[g#3,b3] [a3,c#4], e4@31 ~]/2",
  K: "[e3@31 ~]/2", L: "[e3,g#3,b3,d#4,b5]/2", M: "[c#6@10 g#5 a5 b5@2 e6 d#6, [f#3,a3,c#4,e4]@31 ~]/2",
  N: "[c#6@6 e6 d#6, [f#3,a3,c#4,e4]@31 ~]/2", O: "[c#4,e4,a4,c#6]", P: "[b3,d#4,g#4,b5]",
  Q: "[a5@12 g#5@3 ~@17 [g#3,b3]@16 [a3,c#4]@16, a3@31 ~@33, [c#4,f#4]@15 e4@15 ~@2 e4@31 ~, ~ e5@3]/4", // G#m A F#5
  R: "[d4,f#4,a4,d6]", S: "[b5@8 g5@3 a5@2 b5@2 ~ [c5,c6]@16, g4@31 ~, [d4,b4]@15 e4@16 ~]/2",
  T: "b5@8 d6@3 e6@2 f#6@2 ~, [d4,f#4,b4]@15 ~", U: "[e4,g4,c5,g6]", V: "f#6@2 e6 d6, [d4,f#4,b4]@15 ~",
  W: "[c4,e4,a4,e6]", X: "[b3,d4,g4,d6]", Y: "[d#4,f#4,b4,d#6]", Z: "[f#3,a3,c#4,e4,c#6]/2", AA: "[c#4,e4,a4,e6]",
  AB: "d#6@6 c#6 b5, [b3,d#4,g#4]", AC: "[[c#4,f#4,c#6]@15 ~ e6@16, a3@31 ~, ~@15 e4@15 ~@2]/2",
  AD: "[[g#3,b3]@2 ~ a5, e4@31 ~, b5@3 ~, ~ [a3,c#4]]/2", AE: "[e4,b4,d#5,g#5,d#6]/2",
})).s("gm_string_ensemble_2").gain(0.21)

// chords · epiano2 · "E.PIANO 2"
const epiano2 = note(`<
  ~ A@2 B C D@2 E F G@2 H@2 I@2 J K L M N O P O Q@2 G@2 H@2 I@2 J K L M N O P O Q@2 R S@2 T U V W X Y G@2 H@2 I@2 J K L
  M N O P O Q@2 G@2 H@2 I@2 J K L M N O P O Q@2 A@2 B C D@2 E F A@2 B Z AA@3
>`.pickRestart({
  A: "[[d#4,g#4,b4]@6 [f#4,b4]@9 ~ [b3,d#4,g#4]@16, [e3,b3]@15 [e3,g#3]@17]/2", // G#m B5 G#m E5 E
  B: "a4@3 a4@3 ~ b4, [c#3,f#3,a3,c#4,f#4], ~@3 e4@5, ~@3 a4", C: "c#5 d#5 ~ f#5, ~ e5",
  D: "[[d#4,g#4,b4]@3 [f#4,b4]@7 b4@2 ~@2 e4@2, [e3,b3]@5 [e3,b3,g#4]@3, ~@5 e4@2 ~, ~@3 [f#4,b4]]/2", // G#m B5 E5 E B5
  E: "c#4@3 [c#4,f#4]@5, [a3,e4], a2 ~@15", F: "e4@6 [a3,c#4,e4]@9 ~",
  G: "[e2@9 ~@3 d#4@4, d#4@3 ~, b3@11 b3@5, g#3@5 g#3@3, ~@9 e2@7]/2",
  H: "[a3@11 ~@3 c#4@2, f#2, c#4@7 ~, e4@3 e4, ~@11 a3@5]/2",
  I: "[e2@11 ~@3 d#4@2, d#4@7 ~, b3@13 b3@3, g#3@3 g#3, ~@11 e2@5]/2", J: "[f#2,a3,c#4,e4]",
  K: "[c#4,e4] [c#4,e4,a4], [f#2,a3]", L: "[a2,a3,c#4,e4]@15 ~", M: "[g#2,g#3,b3,d#4]@5 ~ g#3@2, ~@5 g#2@3",
  N: "[f#2,f#3,a3,c#4]", O: "[a2,a3,c#4,e4]", P: "[e2,g#3,b3,e4]", Q: "[e2,e3,g#3,b3]@15 ~", R: "[d3,f#3,a3,d5]",
  S: "[b4@8 g4@3 a4@2 b4@2 ~ [c4,c5]@16, g3@31 ~, [d3,b3]@15 e3@16 ~]/2", T: "b4@8 d5@3 e5@2 f#5@2 ~, [d3,f#3,b3]@15 ~",
  U: "[e3,g3,c4,g5]", V: "f#5@2 e5 d5, [d3,f#3,b3]@15 ~", W: "[c3,e3,a3,e5]", X: "[b2,d3,g3,d5]", Y: "[d#3,f#3,b3,d#5]",
  Z: "[f#3,a3,c#4,e4] ~@2 [f#3,a3,c#4,e4] ~ [f#3,a3,c#4,e4] ~@2 [f#3,a3,c#4,e4] ~@2 [f#3,a3,c#4,e4] ~ [f#3,a3,c#4,e4] ~@2", // F#m7
  AA: "[[e2,e3,g#3,b3,d#4]@11 ~@5]/3", // Emaj7
})).s("gm_epiano2").gain(0.53)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  ~ A B C ~ A B C ~@15 D@2 E@2 F@2 G@2 H I J K L M N M D@2 O P@2 Q R S T U V W@2 F@2 G@2 H I J K L M N M D@2 X Y Z@2 X
  AA AB AC J K L M N M D@2 A B C ~ A B C ~ A B C AD AE@3
>`.pickRestart({
  A: "~@4 [d#4,d#5]@2 ~@2 [d#4,d#5]@2 [b3,b4]@3 ~ [b3,b4]@2", B: "[g#3,g#4]@9 ~@3 [g#3,g#4]@2 [e3,e4]@2",
  C: "[f#3,f#4] [f#3,f#4]@6 ~", // F#
  D: "[~@2 e4 ~@7 e4 ~@2 b3 g#3@2, e2@13 ~@3 e2@11 ~@5, ~@6 e4@6 ~@10 e4@5 ~@5, ~@8 b3@2 b3@5 ~@9 b3 c#4@2 ~@5, ~@9 c#4@3 g#3@15 ~@5]/2",
  E: "[e2@9 ~@3 d#4@4, d#4@3 ~, b3@11 b3@5, g#3@2 ~@7 e2@7, ~@5 g#3@3]/2",
  F: "[a3@11 ~@3 c#4@2, f#2, c#4@7 ~, e4@3 e4, ~@11 a3@5]/2",
  G: "[e2@11 ~@3 d#4@2, d#4@7 ~, b3@13 b3@3, g#3@3 g#3, ~@11 e2@5]/2", H: "[f#2,a3,c#4,e4]",
  I: "[c#4,e4] [c#4,e4,a4], [f#2,a3]", J: "[a2,a3,c#4,e4]@15 ~", K: "[g#2,g#3,b3,d#4]@5 ~ g#3@2, ~@5 g#2@3",
  L: "[f#2,f#3,a3,c#4]", M: "[a2,a3,c#4,e4]", N: "[e2,g#3,b3,e4]", O: "[d3,f#3,a3,d5]",
  P: "[b4@8 g4@3 a4@2 b4@2 ~ [c4,c5]@16, g3@31 ~, [d3,b3]@15 e3@16 ~]/2", Q: "b4@8 d5@3 e5@2 f#5@2 ~, [d3,f#3,b3]@15 ~",
  R: "[e3,g3,c4,g5]", S: "f#5@2 e5 d5, [d3,f#3,b3]@15 ~", T: "[c3,e3,a3,e5]", U: "[b2,d3,g3,d5]", V: "[d#3,f#3,b3,d#5]",
  W: "[e2@9 ~@3 d#4@4, d#4@3 ~, b3@11 b3@5, g#3@5 g#3@3, ~@9 e2@7]/2", X: "~@6 [g#4,g#5] ~ [g#4,g#5]@3 ~ [g#4,g#5]@3 ~",
  Y: "[g#4,g#5]@9 ~ [g#4,g#5]@3 ~ [g#4,g#5]@2", Z: "[[f#4,f#5]@5 ~@3]/2", AA: "[g#4,g#5]@11 ~ [g#4,g#5]@4",
  AB: "[f#4,f#5]@3 ~", AC: "[f#2,a3,c#4,e4] ~@7 [c#4,e4,a4] ~@7",
  AD: "[f#3,a3,c#4,e4] ~@2 [f#3,a3,c#4,e4] ~ [f#3,a3,c#4,e4] ~@2 [f#3,a3,c#4,e4] ~@2 [f#3,a3,c#4,e4] ~ [f#3,a3,c#4,e4] ~@2", // F#m7
  AE: "[[e2,e3,g#3,b3,d#4]@11 ~@5]/3", // Emaj7
})).s("gm_piano").gain(0.52)

// drums · kick
const kick = s("bd").struct("<A B@21 C D E B@13 C D E B@22 C D E B@13 C D E B@3 F B@3 F B@3 F D ~@2>".pickRestart({
  A: "~@7 x", B: "x ~@2 x!2 ~@3", C: "x ~@2 x!2 ~@2 x", D: "x", E: "x ~@6 x", F: "x!2",
})).gain(0.58)

// drums · rim
const rim = s("rim").struct("<~@9 A@14 ~@2 A@14 ~@11 A@14 ~@2 A@14 ~@17>".pickRestart({
  A: "~ x ~ x",
})).gain(0.46)

// drums · snare
const snare = s("sd").struct("<~ A@8 ~@32 A B A B A@4 C ~@32 A@3 D A@3 D A@3 D ~@3>".pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@6 x ~ x ~@2", C: "~@4 x!4", D: "~@3 x ~ x ~@2 x ~@2 x ~ x ~@2",
})).gain(0.58)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@42 A ~ A ~@4 B ~@35 C ~@3 C ~@3 C ~@3>".pickRestart({
  A: "~ x", B: "~ x!3 ~@4", C: "x",
})).gain(0.17)

// drums · low tom
const low_tom = s("lt").struct(`<
  A ~@3 B ~@3 A ~@13 C ~ A ~@13 C ~ A ~ D ~ D ~@4 E ~@13 C ~ A ~@13 C ~ A ~@3 D ~@3 D ~@3 D ~@3
>`.pickRestart({
  A: "~@7 x", B: "~@14 x!2", C: "~@3 x", D: "~@11 x ~ x ~@2", E: "~@6 x!2",
})).gain(0.58)

// drums · hihat
const hihat = s("hh").struct("<~ A@22 B@2 A@14 B@2 A@23 B@2 A@14 B@2 A@12 ~@3>".pickRestart({
  A: "x!4", B: "~ x ~ x",
})).gain(0.58)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  ~ A@9 B A B A B A B A B A B A B ~@2 A B A B A B A B A B A B A B ~@2 A B A B A B A B A@2 B A B A B A B A B A B A B ~@2
  A B A B A B A B A B A B A B ~@2 A B A B A B A B A B A B ~@3
>`.pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~@2",
})).gain(0.17)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  A ~@3 B ~@3 C ~@13 D ~ E ~@13 D ~ E ~ F ~ F ~@4 G ~@13 D ~ E ~@13 D ~ E ~@3 F ~@3 F ~@3 F ~@3
>`.pickRestart({
  A: "~@3 x", B: "~@10 x ~ x!2 ~@2", C: "~@10 x ~@2 x ~@2", D: "~@10 x!2 ~@4", E: "~@8 x ~@2 x!3 ~@2", F: "~ x",
  G: "~@5 x ~@2",
})).gain(0.58)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@10 A ~ A ~ A ~ A ~ A ~ A ~ A B@2 ~ A ~ A ~ A ~ A ~ A ~ A ~ A B@2 ~ A ~ A ~ A ~ A ~@2 A ~ A ~ A ~ A ~ A ~ A ~ A B@2 ~
  A ~ A ~ A ~ A ~ A ~ A ~ A B@2 ~ A ~ A ~ A ~ A ~ A ~ A B ~@2
>`.pickRestart({
  A: "~@7 x", B: "x",
})).gain(0.58)

// drums · high tom
const high_tom = s("ht").struct("<[~@5 x ~@2] ~@96>").gain(0.58)

// drums · ride
const ride = s("rd").struct("<~ A@8 ~@8 A@6 B@2 ~@8 A@6 B@2 A@9 ~@8 A@6 B@2 A@14 B@2 A@12 B ~@2>".pickRestart({
  A: "x!4", B: "x",
})).gain(0.58)

stack(
  bass, string_ensemble_2, epiano2, piano, kick, rim, snare, snare_soft, low_tom, hihat, hihat_soft, mid_tom, open_hat,
  high_tom, ride
)