// A Face in the Crowd — Tom Petty and The Heartbreakers
// 117.6 bpm, 4/4, key F minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: track names are the Roland MT-32 patch names at their program numbers ("Guitar 2" on 60, "StrSect3" on 50, "AcBass 1" on 64, "ElecGtr1" on 61, "Chorale" on 34), so with no bank select the whole file is read through the MT-32 patch table: ch 6 "Guitar 2" Guitar 2 -> acoustic guitar steel; ch 3 "AcBass 1" Acou Bass 1 -> acoustic bass; ch 4 "ElecGtr1" Elec Gtr 1 -> electric guitar clean; ch 7 "Chorale" Chorale -> choir aahs
// note: Full arrangement: all 100 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(117.6/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 · acoustic guitar steel · "Guitar 2"
const acoustic_guitar_steel = note("<~@3 A@2 ~@24 B C ~@23 D@2 E F G H I F ~@38>".pickRestart({
  A: "[~@5 bb3 c4 f4@7 ~@2]/2", B: "~@8 c4@6 bb3 ab3", C: "~ ab3@15, bb3 ~@7",
  D: "[~@4 bb3@2 c4@2 f3@3 ~ ab3 ~ bb3@4 c4@4 f3@4 ab3@2 bb3@2 c4@2]/2", E: "~@4 bb3@2 c4@2 bb3@3 ~ eb4@2 c4@2",
  F: "~@2 bb3@3 ~ ab3@4 bb3@2 ab3@2 bb3@2", G: "~@4 bb3@2 c4@2 f3@4 ab3 ~ bb3@2", H: "~ c4@2 f3@2 ab3 bb3 c4",
  I: "~@4 bb3@2 ~ bb3@3 ~@2 eb4 ~ c4@2, ~@3 c4 ~@4",
})).s("gm_acoustic_guitar_steel").gain(0.26)

// chords · synth strings 1 · "StrSect3"
const synth_strings_1 = note(`<
  A@2 B C@8 ~ D@2 E@2 F@2 G@2 H@2 I@2 J@2 K@2 L@8 M@4 H@2 N@2 H@2 N@2 J@2 K@2 A@2 O@2 P@2 O@2 Q@2 R@8 H@2 N@2 S@4 J@2
  K@2 T@16 U@2
>`.pickRestart({
  A: "[[f4,ab4,c5]@31 ~]/2", B: "[f4,ab4,db5]",
  C: "[~@16 [ab4,c5]@31 ~ db5@31 ~ c5@31 ~ db5@16, ~@15 f4@113, ~@47 ab4@81]/8", D: "[c5@31 ~]/2", E: "[db5@31 ~]/2",
  F: "[g4,bb4,eb5]/2", G: "[[f4,ab4,db5]@15 ~]/2", H: "[[g4,bb4,eb5]@31 ~]/2", I: "[f4,ab4,db5]/2",
  J: "[[eb4,g4,c5]@31 ~]/2", K: "[[db4,f4,bb4]@31 ~]/2", L: "[c5@31 ~ db5@31 ~ c5@31 ~ db5@31 ~, [f4,ab4]]/8",
  M: "[c5@30 ~ db5@31 ~@2]/4", N: "[[f4,ab4,db5]@31 ~]/2", O: "[[db4,f4,ab4]@31 ~]/2", P: "[[eb4,g4,bb4]@31 ~]/2",
  Q: "[eb4,g4,bb4]/2", R: "[c5@31 ~ db5@31 c5@31 ~@2 db5@31 ~, [f4,ab4]@127 ~]/8",
  S: "[[g4,bb4,eb5]@31 ~ [ab4,db5]@31 ~, ~@31 f4@31 ~@2]/4", T: "[[ab4,c5]@31 ~ [ab4,db5]@31 ~, f4@63 ~]/4",
  U: "[f4,ab4,c5]/2", // Fm
})).s("gm_synth_strings_1").gain(0.06)

// bass · acoustic bass · "AcBass 1"
const bass = note(`<
  A B C D E F G@2 H B I@2 J B I@2 K L M N O P Q R S@2 Q T U V W X E B G W E Y G@2 K@2 Q@2 K@2 Q@2 Z@2 M@2 U AA C W O AB
  Q T O@2 H B G D E AC W I K AD Q N L@2 AE N AF@2 M N AG@2 AH AI F AC W AJ E B G AJ AK B W AJ J AL
>`.pickRestart({
  A: "f2@4 ~@2 f2 ~ f2@6 ~@2", B: "f2@5 ~ f2 ~ f2@5 ~ eb2 ~", C: "db2@4 ~@2 db2 ~ db2@6 ~@2",
  D: "db2@5 ~ db2 ~ db2@5 ~ eb2 ~", E: "f2@5 ~ f2 ~ f2@7 ~", F: "f2@5 ~ f2 ~ f2@5 ~ f2 ~", G: "db2@5 ~ db2 ~ db2@7 ~",
  H: "f2@5 ~ f2 ~ f2@6 ~@2", I: "db2@5 ~ db2 ~ db2@5 ~ db2 ~", J: "f2@4 ~@2 f2 ~ f2@5 ~ f2 ~",
  K: "eb2@5 ~ eb2 ~ eb2@7 ~", L: "eb2@5 ~ eb2 ~ eb2@5 ~ eb2 ~", M: "bb1@5 ~ bb1 ~ bb1@6 ~@2",
  N: "bb1@5 ~ bb1 ~ bb1@5 ~ bb1 ~", O: "eb2@5 ~ eb2 ~ eb2@6 ~@2", P: "eb2@5 ~ eb2 ~ eb2@4 ~@2 eb2 ~",
  Q: "bb1@5 ~ bb1 ~ bb1@7 ~", R: "bb1@5 ~ bb1 ~ bb1@5 ~@3", S: "c2@5 ~ c2 ~ c2@6 ~@2", T: "bb1@4 ~@2 bb1 ~ bb1@6 ~@2",
  U: "f1@5 ~ f1 ~ f1@7 ~", V: "f1@5 ~ f1 ~ f1@5 ~@3", W: "db2@5 ~ db2 ~ db2@6 ~@2", X: "db2@4 ~@2 db2 ~ db2@7 ~",
  Y: "f2@5 ~ f2 ~ f2@6 eb2 ~", Z: "c2@5 ~ c2 ~ c2@7 ~", AA: "f1@5 ~ f1 ~ f1@6 ~@2", AB: "eb2@4 ~@2 eb2 ~ eb2@7 ~",
  AC: "f2@4 ~@2 f2 ~ f2@5 ~ eb2 ~", AD: "eb2@4 ~@2 eb2 ~ eb2@5 ~ eb2 ~", AE: "bb1@4 ~@2 bb1 ~ bb1@5 ~ bb1 ~",
  AF: "c2@5 ~ c2 ~ c2@5 ~ c2 ~", AG: "f1@5 ~ f1 ~ f1@5 ~ f1 ~", AH: "db2@5 ~ db2 ~ db2@4 ~@2 db2 ~",
  AI: "db2@4 ~@2 db2 ~ db2@5 ~ db2 ~", AJ: "db2@4 ~@2 db2 ~ db2@5 ~ eb2 ~", AK: "f2@4 ~@2 f2 ~ f2@7 ~",
  AL: "f2@4 ~@2 f2 ~ f2@5 ~@3",
})).s("gm_acoustic_bass").gain(0.26)

// other · electric guitar clean · "ElecGtr1"
const electric_guitar_clean = note(`<
  A@2 B C D C D E ~@8 D F D E D G D H I ~@15 J K L M L N O P Q ~ L R L R ~@8 S T D E D C D E L R L R L U V M W ~ L K D E
  D E D E B E D C D E B E B E D E
>`.pickRestart({
  A: "[~@4 g3@5 ~ ab3@5 eb4@15 ~@2]/2", B: "~@4 g3@5 ~ ab3@4 ~@2", C: "eb4@15 ~", D: "~@4 g3@5 ~ ab3@5 ~", E: "eb4@7 ~",
  F: "eb4@3 ~", G: "eb4@13 ~@3", H: "eb4 ~", I: "db5 eb5@15", J: "~@4 g4@6 ab4@5 ~", K: "eb5@13 ~@3",
  L: "~@4 g4@5 ~ ab4@5 ~", M: "eb5@5 ~@3", N: "eb5@11 ~@5", O: "~@3 g4@5 ~@2 ab4@5 ~", P: "eb5 ~",
  Q: "eb5@13 ~@3, db5 ~@15", R: "eb5@7 ~", S: "~@4 g3@5 ~ ab3@6", T: "~ eb4@14 ~", U: "eb5@15 ~",
  V: "~@4 g4@5 ~ ab4@4 ~@2", W: "eb5, db5 ~@15",
})).s("gm_electric_guitar_clean").gain(0.2)

// drums · kick
const kick = s("bd").struct("x!2").gain(0.21)

// drums · snare
const snare = s("sd").struct("~ x ~ x").gain(0.27)

// drums · claves
const claves = s("clave:2").struct("<~@16 [~@2 x ~@3 x!2]!12 ~@12 [~@2 x ~@3 x!2]!12 ~@18 [~@2 x ~@3 x!2]!30>")
  .gain(1.31)

stack(acoustic_guitar_steel, synth_strings_1, bass, electric_guitar_clean, kick, snare, claves)