// Mandolin Rain — Bruce Hornsby
// 76.8 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: Full arrangement: all 90 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(76.8/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 · electric bass finger
const bass = note(`<
  ~ A B C D A B C D E F G H I F G H J K L M J K N D I F G H I F G H J K L M J K N D O P O Q R A S T D A S T U@2 F G H I
  F G H J K L M J K N D V B W D X S T D Y D Y D Z AA Z AA Z AB AC ~
>`.pickRestart({
  A: "a2@3 g2@3 g2@2", B: "e2@3 d2@3 g2@2", C: "a2@3 g2@3 b2@2", D: "c2@3 g2@3 d2@2", E: "g3@2 g3 a3 b3@2 b3@2",
  F: "d3@2 a3 b3", G: "c3 d3", H: "c3@3 g3@3 d3@2", I: "g3@2 g3 a3 b3@4", J: "a2@6 g2@6 g2@3 b2",
  K: "e2@4 e2 g2 d2@6 g2@4", L: "a2@5 b2 g2@6 e2@4", M: "c2@6 g2@6 d2@2 e2 g2", N: "a2@5 b2 g2@6 f#2@4", O: "f3@3 e3@5",
  P: "b2@3 e3@2 c3 d3@2", Q: "b2@3 e2@2 c2@2 d2", R: "d2@3 c2 d2@2 g2@2", S: "e2@5 g2 d2@6 g2@4",
  T: "a2@6 g2@6 d2 e2 g2@2", U: "[c2@3 g2@3 d2@4 g3 a3 b3@4]/2", V: "a2@6 g2@6 b2@3 g2", W: "a2@3 g2@3 g2 b2",
  X: "a2@3 g2@5", Y: "a2@3 g2@3 d2@2", Z: "c2@3 c2@5", AA: "c2@6 c2@6 d2@2 b2 d3", AB: "c2@3 c2@3 d2 a2", AC: "g2",
})).s("gm_electric_bass_finger").gain(0.33)

// chords · piano
const piano = note(`<
  A B C D E F G H I J K L M N K L O P Q R S P Q T U V K L M N K L O P Q R S P Q T W X Y X Z@2 AA AB@2 AC AD AE AF AG AH
  K L M N K L O P Q R S P Q T AI AJ AK AL AM AN@3 AO AP AQ AR AS AT AU AT AU AT AU AV ~
>`.pickRestart({
  A: "~@12 [d4,g4,b4,d5] [e4,g4,b4,e5] [g4,b4,d5,g5] [e4,g4,b4,e5]", // G Em G Em
  B: "[a4,c5,e5,a5]@2 [g4,c5,e5,g5] [g4,c5,e5,g5]@3 [g4,b4,d5,g5]@3 [g4,b4,d5,g5]@3 [g4,b4,d5,g5] [e4,g4,b4,e5]!2 [d4,g4,b4,d5]", // Am C G Em G
  C: "[e4,g4,b4,e5] [d4,g4,b4,d5]!2 [d4,g4,b4,d5]@2 [e4,g4,b4,e5] [d4,f#4,a4,d5]@3 [d4,f#4,a4,d5]@3 [e4,a4,c5] [d4,a4,b4] [e4,a4,c5] [d4,a4,b4]", // Em G Em D Am Bm7 Am Bm7
  D: "[e4,g4,c5] [d4,g4,b4] [c4,e4,g4] [c4,d4,g4]@3 [b3,d4,g4]@4 [d4,g4] [e4,a4] [d4,g4,b4]!2 [e4,a4] [d4,g4]", // C G C Csus2 G G5 A5 G …
  E: "[e4,a4] [d4,g4]@2 [c4,d4,g4]@3 [b3,d4,g4]@3 [b3,d4,g4]@3 [d4,g4,b4,d5] [e4,g4,b4,e5] [g4,b4,d5,g5]@2", // A5 G5 Csus2 G Em G
  F: "[a4,c5,e5,a5]@3 [g4,c5,e5,g5]@3 [g4,b4,d5,g5]@3 [g4,b4,d5,g5]@3 [d5,g5,b5] [a4,d5,a5] [b4,d5,g5] [f#4,d5,f#5], ~@6 b4 g4", // Am C G D5 G D
  G: "[e4,g4,b4,e5]@3 [d4,g4,b4,d5]@3 [e4,g4,b4,e5] [d4,f#4,a4,d5]@3 [d4,f#4,a4,d5]@2 [e4,b4,e5] [d4,g4,b4,d5]@3", // Em G Em D E5 G
  H: "[e4,a4,c5,e5]@3 [d4,g4,b4,d5]@3 [d4,g4,b4,d5] [e4,g4,c5,e5]@2 [d4,g4,b4,d5]!2 [e4,g4,c5,e5] [g4,b4,d5]!2 [a4,d5] [g4,d5]", // Am G C G C G D5 G5
  I: "a4 g4 [e4,d5] [g4,d5]@3 [d4,g4,b4,d5]@3 [d4,g4,b4,d5]@3 [d4,f#4,a4,d5]@3 ~, d5 ~@7", // E7 G5 G D
  J: "[d4,g4] [e4,a4] [d4,g4] ~", K: "[d4,f#4]@4 ~@3 [e4,a4]@5 [d4,g4]@4", L: "[d4,e4]@4 ~@3 [d4,f#4]@5 ~@4",
  M: "[c4,d4]@4 ~@6 d4 g4 f#4 d4 a3 ~", N: "[d4,g4]@5 [e4,a4]@2 [d4,g4]@5 ~@4", O: "[c4,d4]@2 ~ [b3,d4]@3 [f#4,a4]@2",
  P: "[c5,e5]@3 [b4,e5]@3 ~@2", Q: "[g4,b4]@3 [f#4,a4]@3 [d4,g4]@2", R: "[e4,g4]@3 [b3,d4]@3 [f#4,a4]@2",
  S: "[c4,d4]@3 [d4,g4]@3 [f#4,a4]@2", T: "[e4,g4]@3 [b3,d4]@3 [d4,a4]@2", U: "[b3,d4]@6 [b3,d4]@6 [d4,f#4]@3 ~",
  V: "[d4,g4]@2 [e4,a4] [d4,g4]@3 ~@2", W: "[b3,d4]@3 [b3,d4]@3 [d4,f#4]@2", X: "[a4,c5]@3 [g4,c5] [g4,c5]@2 ~@2",
  Y: "[d4,g4]@3 [e4,g4]@2 [b3,e4] [d4,f#4]@2", // G5 Em E5 D
  Z: "[[d4,g4]@6 [e4,g4]@4 [b3,e4]@4 f#4@2 f#4@6 [c4,e4]@2 [d4,f#4]@4 [g4,b4] ~@3, ~@7 d4@4 ~@5]/2", // G5 Em E5 C D G
  AA: "[c4,e4]@6 ~ [g4,b4,g5]@2 [a4,d5,a5]@2 [b4,g5,b5]@2 [a4,d5,a5] [g4,d5,g5] [f#4,d5,f#5]", // C G D5 Em D5 G5 D
  AB: "[[e4,g4,b4,e5]@3 [d4,a4,d5]@2 [d4,a4,d5] [e4,b4,e5] [d4,f#4,a4,d5]@2 [d4,f#4,a4,d5]!2 [e4,g4,b4,e5]@2 [d4,g4,b4,d5]@2 [e4,a4,c5,e5]@2 [d4,g4,b4,d5]@2 [d4,g4,b4,d5] [d4,g4,b4,d5]@4 [e4,a4,c5,e5]@2 [d4,g4,b4,d5]!2 [d4,g4,b4,d5]@2 [e4,a4,c5,e5]@2]/2", // Em D5 E5 D Em G Am G …
  AC: "[e4,a4,c5,e5] [d4,g4,b4,d5]!2 [d4,g4,b4,d5]@3 [d4,g4,b4,d5] [e4,g4,b4,e5]@2 [g4,b4,d5,g5]@2 [a4,d5,e5,a5]@2 [b4,d5,g5,b5]@3", // Am G Em G Asus4 G
  AD: "[b4,d5,g5,b5]@2 [c5,e5,a5,c6] [b4,d5,g5,b5]@3 [d5,g5,b5,d6]@3 [b4,d5,g5,b5]@2 [a4,c5,e5,a5]@2 [g4,g5]@2 [f#4,f#5]", // G Am G Am G F#
  AE: "[e4,g4,b4,e5]@2 [e4,g4,b4,e5] [d4,g4,a4,d5]@2 d4 [e4,g4,b4,e5] [d4,g4,a4,d5] [d4,g4,b4] d5 [d4,g4,b4] d5 [d4,g4,b4] d5 [d4,a4] g4", // Em Dsus4 Em Dsus4 G D5
  AF: "[c4,e4,a4]@2 [c4,d4,g4] [c4,d4,g4]@2 [c4,d4,g4]!2 [b3,d4,g4]@2 [g4,g5]@2 [d4,d5] [d4,a4] [d4,g4] [d4,e4] [d4,g4]", // Am Csus2 G D D5 G5 Dsus2 G5
  AG: "[c4,e4,g4] d4 c4 [d4,e4,g4]@3 [b3,d4,g4]@3 [b3,d4,g4]@3 [a3,d4,f#4]@4", // C Em7 G D
  AH: "[d4,g4]@2 [d4,g4] [e4,a4] [d4,g4]@2 ~@2", AI: "[b3,d4]@6 [b3,d4]@6 [a3,d4,f#4]@3 ~",
  AJ: "[c5,e5]@3 [b4,d5]@3 ~@2", AK: "[g4,b4]@3 [f#4,a4]@3 [g4,b4]@2", AL: "[g4,c5]@3 b4 b4@2 [b3,d4]@2, ~@3 g4@3 ~@2",
  AM: "d4@3 [g4,b4] ~@2 [d5,f#5]@2, c4 ~@3", // G D
  AN: "[[c5,e5]@6 [d5,g5,b5,d6] [d5,g5,b5,d6]@2 [b4,d5,g5,b5]@2 [g4,b4,d5,g5]@2 [d4,g4,b4,d5] [b4,d5,g5,b5] [b4,d5,g5,b5]@2 [g4,b4,d5,g5]@2 [d4,g4,b4,d5]@3 [a4,d5,f#5,a5] [a4,d5,f#5,a5]@2 [f#4,a4,d5,f#5]@2 [d4,g4,b4,d5]@3 [g4,c5,e5,g5] [g4,c5,e5,g5]@2 [e4,g4,c5,e5]@2 [c4,e4,g4,c5]@3 [g4,b4,d5,g5] [g4,b4,d5,g5]@2 [d4,g4,b4,d5]@2 [b3,d4,g4,b4]@2 [a3,c4,e4,a4]@2 [g3,b3,d4,g4]]/3", // C G D G C G Am G
  AO: "[a3,d4,a4] [g3,c4,e4,g4]@2 [g3,c4,d4,g4]@3 d4 ~ g3@4 [d4,f#4]@4, ~@7 [b3,d4,g4]@5 ~@4", // D5 C Gsus4 D G
  AP: "[e4,g4]@3 d4@3 [d4,f#4]@2", AQ: "[g3,c4,d4]@3 [g3,b3,d4]@3 [d4,f#4]@2", AR: "[e4,g4]@3 [g4,b4]@3 [f#4,a4]@2",
  AS: "[e4,g4]@3 [d4,g4]@3 [d4,f#4]@2", AT: "[c4,d4,g4]!4",
  AU: "[c4,d4,g4]@4 [c4,d4,g4]@4 [e4,a4,e5] [d4,g4,d5]@3 b4@2 a4 g4, ~@3 [b3,e4]", AV: "[c4,d4,g4]",
})).s("gm_piano").gain(0.36)

// other · acoustic guitar steel · F5 C Cmaj7 C Csus2 Dm F5 C …
const acoustic_guitar_steel = note(`<
  ~@41
  [f5!6 [c5,f5] e5!9]
  [[g4,e5] b4!5 [b4,c5] e5!3 [c5,e5] c5 [c5,d5] d5!3]
  [[d5,f5] f5!5 [c5,f5] e5!9]
  [[g4,e5] b4!5 [b4,c5] e5!3 [c5,e5] c5 [c5,d5] d5!3]
  [d5 ~@5 g4@2 a4@4 ~@4]
  ~@44
>`).s("gm_acoustic_guitar_steel").gain(0.2)

// chords · synth strings 1
const synth_strings_1 = note(`<
  A B C B D B C B E F G H I F G H I B C B D B C B E F G H I F G H I B C B D B C B E ~@5 B C B D B C B E F G H I F G H I
  B C B D B C B E B C B E B C B E J K J K L@6 M ~
>`.pickRestart({
  A: "~@13 [b3,d4,g4]@3", B: "[c4,e4,g4,a4]@3 [b3,d4,g4]@5", C: "[b3,d4,e4,g4]@3 [a3,d4,f#4]@3 [b3,d4,g4]@2",
  D: "[c4,d4,g4]@3 [b3,d4,g4]@5", E: "[c4,d4,g4]@3 [b3,d4,g4]@3 [a3,d4,f#4]@2",
  F: "[d4,g4,b4]@3 [e4,a4,c5] [d4,g4,d5]@4", G: "[d4,f#4,a4]@2 [e4,a4,c5] [d4,g4,b4]", H: "[c4,d4,e4] [d4,f#4,a4]",
  I: "[c4,d4]@3 [d4,g4,b4]@3 [d4,f#4,a4]@2", J: "[c4,e4,g4]@3 [b3,d4,g4]@3 [a3,d4,f#4]@2",
  K: "[g3,b3,d4]@3 [g3,b3,d4]@3 [a3,d4,f#4]@2", L: "[c4,d4,g4]/2", M: "[c4,d4,g4]@3 ~",
})).s("gm_synth_strings_1").gain(0.06)

// drums · kick
const kick = s("bd").struct("<~ A@8 ~@8 A@8 ~@8 A@11 B ~ A@8 ~@8 A@7 C A@3 C A@14 ~@2>".pickRestart({
  A: "x ~@2 x ~@4", B: "x ~@2 x ~ x ~ x", C: "x",
})).gain(0.4)

// drums · rim
const rim = s("rim").struct("<~ A@7 B ~@8 A@7 B ~@8 A@7 B C@3 ~@2 A@7 B ~@8 A@7 B A@3 B A@3 B C@10 ~@2>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "~@3 x",
})).gain(0.2)

// drums · snare
const snare = s("sd").struct("<~ A@7 B ~@8 A@7 B ~@8 A@7 B C@3 D ~ A@7 B ~@8 A@7 B A@3 B A@3 B C@10 ~@2>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "~@3 x", D: "~@5 x ~ x",
})).gain(0.45)

// drums · low tom
const low_tom = s("lt").struct("<~@16 A ~@15 B ~@12 C ~@15 A ~@28>".pickRestart({
  A: "~@13 x ~ x", B: "~@14 x!2", C: "~@12 x!4",
})).gain(0.35)

// drums · pedal hat
const pedal_hat = s("hh").struct(`<
  ~ A@7 B C@7 D A@7 B C@7 D A@7 B E@4 ~ A@7 B C@7 D A@7 F A@3 G A@3 B C@4 H@6 ~@2
>`.pickRestart({
  A: "x!16", B: "x!12 ~@4", C: "x!4", D: "x!3 ~", E: "x!8", F: "x!5 ~@11", G: "x!7 ~@9", H: "x ~ x!4 ~ x!4 ~ x!4",
})).gain(0.25)

// drums · mid tom
const mid_tom = s("mt").struct("<~@16 A ~@15 A ~@12 B ~@15 A ~@7 C ~@3 D ~@16>".pickRestart({
  A: "~@5 x!2 ~", B: "~@5 x ~ x!2 ~ x!2 ~@4", C: "~@6 x ~@5 x!2 ~ x", D: "~@12 x ~ x!2",
})).gain(0.4)

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

// drums · crash
const crash = s("cr").struct(`<
  ~@8 A B ~@7 B ~@6 A B ~@14 A B ~@2 C B ~@7 A B ~@7 B ~@7 B ~@6 A B ~@9 B ~
>`.pickRestart({
  A: "~@13 x!3", B: "x", C: "~@5 x ~ x",
})).gain(0.3)

// drums · crash · soft notes
const crash_soft = s("cr").struct("<~@8 A ~@15 A ~@15 A ~@12 A ~@23 A ~@12>".pickRestart({
  A: "~@3 x",
})).gain(0.2)

stack(
  bass, piano, acoustic_guitar_steel, synth_strings_1, kick, rim, snare, low_tom, pedal_hat, mid_tom, high_tom, crash,
  crash_soft
)