// The Tracks of My Tears — Johnny Rivers
// 98 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 92 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(98/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 · epiano2 · "PIANO"
const epiano2 = note(`<
  ~@2 A B A C D E F G D E F G H I J K L K M N O P D E F G D E F G H I J K L K M N Q R S P@3 T U V W H I J K L K X Y H I
  J K L K M Y H I J K L K M Y H I J K L K X Y H I J K L K X Z@3
>`.pickRestart({
  A: "a2@2 e3@2 a2@2 [d3,a3,f#4]@9 ~, [c#4,a4]@3 ~@5", B: "d3 c#3 b2 [e3,b3]@5, [a3,f#4]@3 g#4@4 ~",
  C: "d3@2 c#3@2 b2@2 [a2,a3,c#4,e4]@9 ~, [a3,f#4]@3 ~@5", D: "[e3,a3,c#4]@6 [f#3,b3,d4]@9 ~",
  E: "[f#3,b3]@6 [g#3,b3,e4]@9 ~, d4 ~@3", F: "[e3,a3,c#4]@3 [f#3,b3,d4]@4 ~",
  G: "[a3,d4,f#4]@2 e4@2 [f#3,b3] ~ [e3,a3,c#4]@7 ~@3, ~@2 c#4 ~ d4@2 ~@10", H: "[a3,c#4,e4]@3 [b3,d4,f#4]@5",
  I: "[a3,d4,f#4]@6 [b3,e4,g#4]@8 c#4 ~", J: "[a3,c#4,e4]@6 [b3,d4,f#4]@9 ~", K: "[a3,d4,f#4]@3 [b3,e4,g#4]@5",
  L: "[a3,c#4,e4]@5 ~ [b3,d4,f#4]@9 ~", M: "[a3,c#4,e4]@5 ~ [a3,d4,f#4]@9 ~",
  N: "f#4@2 e4@2 [b3,d4]@2 [a3,c#4,e4]@9 ~, d4 ~ c#4 ~@13", O: "[a3,d4,f#4]@4 ~@2 [a3,c#4,e4]@9 ~",
  P: "[a3,d4,f#4]@5 ~ [a3,c#4,e4]@9 ~", Q: "[a3,c#4,e4] ~@7", R: "[a3,d4,f#4]@6 [a3,c#4,e4]@9 ~",
  S: "[a3,d4,f#4]@3 [a3,c#4,e4]@5", T: "[a3,d4,f#4]@5 ~ [a3,c#4,e4]@7 ~@3", U: "[c#4,f#4,a4]",
  V: "[c#4,f#4,a4]@7 ~ [c#4,f#4,a4]@4 [c#4,f#4,a4]@3 ~", W: "[b3,e4,g#4]@13 ~@3", X: "[a3,c#4,e4]@5 ~ [a3,d4,f#4]@10",
  Y: "[d4,d#4] ~ e4@2 [b3,d4]@2 [a3,c#4,e4]@9 ~, f#4@2 c#4 ~@13", Z: "[[d4,f#4] [c#4,e4] [b3,d4] [a3,c#4,e4]@18 ~@3]/3",
})).s("gm_epiano2").gain(0.23)

// chords · string ensemble 2 · "STRINGS"
const string_ensemble_2 = note(`<
  ~@14 A@4 B@3 ~ C@2 D@4 E@2 F@2 G@2 H I J K L M ~ N@2 O@2 P@2 Q@2 R G@2 H I J K L M A@4 B@3 ~ G@2 H I J K L M G@2 H I J
  K L M G@2 H I J K L S@2 ~
>`.pickRestart({
  A: "[[a4,a5]@31 ~]/4", B: "[[a4,a5]@47 ~]/3", C: "[[e5,e6]@7 ~]/2", D: "[[a5,a6]@31 ~]/4",
  E: "[c#5@3 d5@5 f#5@3 e5@4 ~, [a5,a6]@15 ~]/2", F: "[c#5 d5 c#5@4 [a4,d5,f#5]@15 ~ [a4,c#5,e5]@8 ~@2, a5@3 ~@13]/2",
  G: "[e4@6 f#4@10 f#4@6 [g#4,b4,b5]@9 ~, [a4,a5]@21 ~@11]/2", H: "e4@6 f#4@9 ~, [a4,a5]",
  I: "[f#4,a4,a5]@6 [e4,g#4,g#5]@9 ~", J: "e4@5 ~ f#4@10, [a4,a5]", K: "[f#4,a4,a5]@6 [g#4,b4,b5]@9 ~",
  L: "[e4,a4,a5]@5 ~ [d4,f#4,f#5]@9 ~", M: "[c#4,e4,e5]@3 [c#4,a4,e5]@4 ~",
  N: "[f#4@6 e4@10 f#4@6 e4@9 ~, [a4,a5]@31 ~]/2", O: "[f#4@3 e4@5 f#4@3 e4@4 ~, [a4,a5]@15 ~]/2",
  P: "[f#4@4 ~@2 e4@10 f#4@4 ~@2 e4@9 ~, [a4,a5]@31 ~]/2", Q: "[[f#4,a4,a5]@15 ~]/2", R: "[g#4,e5,e6]@3 ~",
  S: "[[f#4,f#5]@3 [e4,e5]@12 ~, [a4,a5]@31 ~]/2", // F# E A
})).s("gm_string_ensemble_2").gain(0.21)

// chords · acoustic guitar steel · "AC GUITAR"
const acoustic_guitar_steel = note(`<
  ~@5 A@2 B C D@2 B C E F G F G F G H I J K@2 B C D@2 B C E F G F G F G L M N J@6 O@2 P F G F G F G L I F G F G F G F Q
  F G F G F G F Q F G F G F G H R F G F G F G L S@2 ~
>`.pickRestart({
  A: "[~@22 [d4,f#4]@9 ~, ~@7 b3@4 ~@5, ~@16 a4@15 ~]/2", B: "[d4,f#4,a4]@5 ~ [e4,g#4,b4]@9 ~",
  C: "[c#4,e4]@3 [d4,f#4]@5, a4", // C#m D
  D: "[~@2 f#4@2 ~@2 [c#4,e4]@7 ~@9 [d4,f#4]@9 ~, d4@4 a4@9 ~ b3@8 ~@10, ~@16 a4@15 ~]/2", // C#m D
  E: "[d4,f#4,a4]@5 ~ c#4@6 d4@4, ~@3 [e4,a4]@5", F: "~@4 [c#4,e4,a4] ~@7 [d4,f#4,a4] ~@3",
  G: "~@4 [d4,f#4,a4] ~@7 [e4,g#4,b4] ~@3", H: "~ e4 a4 [d4,f#4,a4]@5, c#4@5 ~@11",
  I: "d4 e4 d4 [c#4,e4]@5, a4, f#4@3 ~@5", J: "~@2 f#3@2 [a3,d4] ~ [c#4,e4]@10",
  K: "[~@2 f#3@2 [a3,d4] ~ [c#4,e4]@7 ~@9 [d4,f#4]@9 ~, ~@7 c#4@4 ~@5, ~@16 a4@15 ~]/2", // D5 C#m D
  L: "~@2 a4 [d4,f#4,a4]@5, c#4@3 ~@5, ~ e4@2 ~@5", M: "d4@2 e4@2 d4 ~ [c#4,e4]@10, a4, f#4@3 ~@5",
  N: "[c#4,e4,a4] ~@15", O: "[[a4,c#5]@16 ~@8 f#4@7 ~, f#4@23 ~@9, ~@16 c#5@15 ~, ~@20 a4@11 ~]/2",
  P: "[e4,g#4,b4]@7 ~ [e4,g#4,b4]@2 [e4,g#4,b4] ~ [e4,g#4,b4]@2 [e4,g#4,b4]@2", Q: "~@4 [d4,f#4,a4] ~@7 [d4,e4,a4] ~@3",
  R: "d4@2 e4@2 d4 ~ c#4@4 c#4 ~ [e4,a4]@4, [f#4,a4]@5 ~ [e4,a4]@5 d4@5", // A5 F#m A5
  S: "[d4@2 e4@2 d4 ~ [c#4,e4,a4]@26, [f#4,a4]@3 ~@13]/2", // A F#m
})).s("gm_acoustic_guitar_steel").gain(0.22)

// bass · electric bass finger · "BASS"
const bass = note(`<
  ~@6 A B C D C B E F G H G I J K L M N O A B C D C B E F G H G I J K L M P Q R S T S@2 U V W G H G I J K L M G H G I J
  K L M G H G I J K L M G H G I J K L M G H G I J K L X@3
>`.pickRestart({
  A: "a1@6 d2@9 ~", B: "d2@2 c#2@2 b1@2 e2@9 ~", C: "a1@4 ~@2 d2@9 ~", D: "d2 c#2 b1 a1@4 ~", E: "a1@6 d2@7 ~@3",
  F: "d2 c#2 b1 a1@2 e1 f#1 e1", G: "a1@5 ~ b1@2 d2@7 ~", H: "d2@4 ~@2 g#2@2 e2@7 ~", I: "d2@2 ~ e2@4 ~",
  J: "a1@4 ~@2 b1@2 d2@7 ~", K: "d2@2 ~ g#2 e2@3 ~", L: "a1@2 ~ d2@4 ~", M: "d2@2 c#2@2 b1@2 a1@7 ~@3",
  N: "d2@2 ~ a1@3 ~@2", O: "d2@2 ~ a1@4 ~", P: "a1@3 ~@13", Q: "d2@4 ~@2 a1@9 ~", R: "d2@4 ~@2 a1@6 e1 f#1 a1 f#1",
  S: "d2@2 ~ a1@5", T: "d2@4 ~@2 a1@6 e1 f#1 a1@2", U: "f#2@3 ~ f#2@2 ~@2 f#2@3 ~ f#2@2 ~@2",
  V: "f#2@3 ~ f#2@2 ~@2 f#2@2 ~@2 f#2@3 ~", W: "e2@7 ~ e2 f#2 a2 ~ [g2,a2] b2 a2@2", X: "[d2 c#2 b1 a1@19 ~@2]/3",
})).s("gm_electric_bass_finger").gain(0.32)

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

// drums · rim
const rim = s("rim").struct("<~@6 [~ x ~ x]!8 ~@10 [~ x ~ x]!8 ~@60>").gain(0.56)

// drums · snare
const snare = s("sd").struct("<~@13 A B@7 C B D ~@7 A B@7 C E B@8 F B@7 G B@7 H B@7 G B@7 I B@7 J ~@2>".pickRestart({
  A: "~@10 x!2 ~@4", B: "~ x ~ x", C: "~@2 x ~@2 x!3", D: "~@4 x ~@5 x!3 ~@3", E: "x ~ x ~@2 x!2 ~",
  F: "~@4 x ~@3 x!4 ~@4", G: "~@4 x ~@3 x!2 ~ x!2 ~@3", H: "~@4 x ~@3 x!2 ~@2 x ~@3", I: "~ x!2 ~", J: "~ x ~@2",
})).gain(0.48)

// drums · hihat
const hihat = s("hh").struct("<A B ~@3 C D@34 ~ B@8 ~ D@39 E ~@2>".pickRestart({
  A: "x!2", B: "x!4", C: "~@3 x", D: "x!8", E: "x!3 ~@5",
})).gain(0.4)

// drums · low tom
const low_tom = s("lt").struct("<~@23 A ~@16 A ~@8 B ~@7 B ~@7 B ~@7 B ~@7 B ~@10>".pickRestart({
  A: "~@7 x", B: "~@15 x",
})).gain(0.48)

// drums · open hat
const open_hat = s("oh").struct("<~@5 [~@5 x ~@2] ~@17 [~@3 x] ~@68>").gain(0.48)

// drums · mid tom
const mid_tom = s("mt").struct("<~@13 A ~@17 A ~@8 B ~@8 A ~@7 A ~@7 A ~@7 A ~@7 A ~@10>".pickRestart({
  A: "~@7 x", B: "~@13 x ~@2",
})).gain(0.48)

// drums · crash
const crash = s("cr").struct("<~@14 A ~@17 A ~@8 A ~@7 B A ~@7 A ~@7 A ~@7 A ~@7 A ~@6 C ~@2>".pickRestart({
  A: "x", B: "~ x ~@2", C: "x!4 ~@4",
})).gain(0.48)

// drums · high tom
const high_tom = s("ht").struct("<~@13 A ~@17 A ~@17 B ~@7 C ~@7 C ~@7 C ~@7 D ~@10>".pickRestart({
  A: "~@3 x", B: "~@12 x!2 ~@2", C: "~@13 x ~@2", D: "~@10 x ~ x!2 ~@2",
})).gain(0.48)

// drums · ride
const ride = s("rd").struct("<~@22 [x!4] [x!3 ~] ~@17 [x!8]!8 [x!2 ~@6] ~@42>").gain(0.48)

// drums · tambourine
const tambourine = s("tb").struct(`<
  ~@2 A@3 B A@3 B A@2 C B A@3 B A@3 B A@5 B A@3 B A@3 B A@3 B ~ A@8 ~ A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B
  A@3 B A@3 B ~@2
>`.pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "x!2 ~ x",
})).gain(0.48)

stack(
  epiano2, string_ensemble_2, acoustic_guitar_steel, bass, kick, rim, snare, hihat, low_tom, open_hat, mid_tom, crash,
  high_tom, ride, tambourine
)