// When the Going Gets Tough — Billy Ocean
// 126 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 127 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(126/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 · synth bass 1 · "Bass"
const bass = note(`<
  ~ A@6 B@2 A@6 C@2 A@2 C@2 A@6 C@2 A@2 C@2 D@2 E@2 A@8 F@2 G@3 A@6 C@2 H@2 C@2 D@2 I@2 A@8 F@2 J@3 K ~ K ~ A@2 C@2 H@2
  C@2 D@2 L@2 D@2 M@2 ~@3 N ~ N ~ N ~ N F@2 O@2 F@2 O@2 F@2 O@2 F@2 O@2 P Q
>`.pickRestart({
  A: "[f1@2 a1 c2@2 f2@3 f1 a1@2 d2@3 f1 a1@2 c2@3 a1 c2@2 d2]/2",
  B: "[f1@2 a1 c2@2 f2@3 f1 a1@2 d2@3 f1 a1@2 c2@3 f1 a1@2 d2]/2",
  C: "[f1@2 a1 c2@2 f2@3 f1 g1@2 bb1@3 f1 g1@2 bb1@3 f1 bb1@2 c2]/2",
  D: "[c2@2 bb1 c2@2 d2@3 c2 d2@2 f2@3 c2 d2@2 f2@3 d2 f2 g2 f2]/2",
  E: "[c2@2 bb1 c2@2 d2@3 c2 d2@2 bb1@4 c2 ~ c2 ~@6]/2",
  F: "[f1@2 g1 c2@2 f2@3 f1 a1@2 d2@3 f1 a1@2 d2@3 a1 d2@2 f2]/2",
  G: "[c2@2 f2 g2@2 c3@3 f1 g1@2 bb1@3 f1 g1@2 bb1@3 f2 g2@2 bb2@3 f2 g2@2 bb2@3 f2 bb2@2 c3]/3",
  H: "[f1@2 a1 c2@2 f2@3 f1 a1@2 d2@3 f1 a1@2 c2@3 a1 ~@2 d2, ~@7 c2]/2",
  I: "[c2@2 bb1 c2@2 d2@3 c2 d2@2 bb1@4 c2@2 c2 ~@6]/2",
  J: "[c2@2 f2 g2@2 c3@3 f1 g1@2 bb1@3 f1 g1@2 bb1@3 f2 g2@2 bb2@3 f2 g2@2 bb2@3 f2 g2@2 c3]/3", K: "c2 g1 c2 ~@9",
  L: "[c2@2 bb1 c2@2 d2@3 c2 d2@2 bb1@3 f1 g1@2 ~@3 d2 f2 g2 f2, ~@17 bb1@4 ~@3]/2",
  M: "[c2@2 bb1 c2@2 d2@3 c2 d2@2 bb1@4 c2@2 c2@2 ~@5]/2", N: "~@14 f2@2 f2@2 f2 ~ f2@2 f2@2",
  O: "[c2@2 f2 g2@2 c3@3 f1 g1@2 bb1@3 f1 g1@2 bb1@3 f2 g2@2 bb2]/2", P: "bb2@2 f2 g2@2 bb2@3 f2 bb2@2 c3",
  Q: "f1 ~@11",
})).s("gm_synth_bass_1").gain(0.5)

// chords · epiano2 · "Elec Pf"
const epiano2 = note(`<
  ~@5 A@8 B@2 C@2 B@2 C@2 A@4 B@2 C@2 B@2 C@2 D@2 E@2 A@8 F@4 ~ A@4 B@2 C@2 B@2 C@2 D@2 E@2 A@2 G@2 A@4 H@4 ~@5 B@2 C@2
  B@2 C@2 D@6 E@2 ~@2 A@6 I@2 H@16 ~ J
>`.pickRestart({
  A: "[[c4,f4,a4]@11 [d4,f4,a4]@6 [c4,e4,g4]@7]/2", B: "[[c4,f4,a4]@11 [d4,f4,a4]@13]/2",
  C: "[[c4,f4,a4]@11 [d4,f4,bb4]@13]/2", D: "[[c4,e4,g4]@5 [d4,f4,a4]@5 ~ [d4,f4,a4]@13]/2",
  E: "[[c4,e4,g4]@5 [d4,f4,a4]@5 ~ [d4,f4,a4]@4 [e4,g4,c5]@2 [e4,g4,c5] ~@6]/2", // C Dm C
  F: "[[c4,f4,a4]@11 [d4,f4,a4]@12 [c4,e4,g4]@12 [bb3,d4,f4]@12 ~]/4", // F Dm C Bb
  G: "[[c4,f4,a4]@11 [d4,f4]@6 [c4,e4,g4]@7, ~@11 a4@5 ~@8]/2", // F Dm C
  H: "[[c4,f4,a4]@11 [d4,f4,a4]@12 [c4,e4,g4]@12 [bb3,d4,f4]@13]/4", // F Dm C Bb
  I: "[[c4,f4,a4]@21 ~ [d4,f4,a4]@12 [c4,e4,g4]@14]/2", J: "[c4,f4,a4] ~@11",
})).s("gm_epiano2").gain(0.31).pan(0.3)

// other · alto sax · "Sax Solo"
const alto_sax = note("<~@82 A@3 B C D E F@2 G@2 ~@34>".pickRestart({
  A: "[~@6 c6@24 ~@3 f4!2 ~@2 a4@2 ~ c5 ~ c5@2 a4 ~ d5@4 ~@19 f4!2 ~]/3",
  B: "a4@3 ~ c5@2 a4 ~@3 c5@6 a4 ~ c5@2 d5 ~@2 g4, ~@11 ab4", C: "~ f4@7 ~ eb4 d4 ~ c4@5 ~@3 d5@2 c5 ~",
  D: "~ f5@17 ~@2 ab4@4", E: "f4@5 a4@5 ~@11 f4!2 ~",
  F: "[a4@8 ~ bb4@7 ~@2 b4@9 ~ c5@8 d5@4 ~@3 g5@2 a5 ~@2, ~@21 f5 ~@2]/2", G: "[c6@7 ~@5]/2",
})).s("gm_alto_sax").gain(0.64).pan(0.4)

// chords · brass section · "Brass"
const brass_section = note(`<
  ~@9 A@2 B@2 ~@8 A@2 B@2 ~@8 C@2 D@2 ~@13 E@2 F@2 ~@8 C@2 D@2 ~@25 C@6 D@2 ~@28
>`.pickRestart({
  A: "[[c4,f4,a4] ~@9 [c4,f4,a4]@2 ~@6 [d4,f4,a4]@16 [c4,e4,g4]@13 ~]/2", // F Dm C
  B: "[[c4,f4,a4] ~@4 [c4,f4,a4] ~@3 [c4,e4,g4]@2 [a3,d4,f4]@6 [g3,c4,e4]@7]/2", C: "[[c4,e4,g4]@10 [d4,f4,a4]@37 ~]/2",
  D: "[[c4,e4,g4]@5 [d4,f4,a4]@10 [e4,g4,c5] ~ [e4,c5] ~@6, ~@34 g4 ~@13]/2", // C Dm C
  E: "[[f4,a4,c5]@2 ~@8 [f4,a4,c5]@2 ~@6 [a4,d5,f5]@16 [g4,c5,e5]@11 ~@3]/2", // F Dm C
  F: "[[f4,a4,c5]@2 ~@8 [f4,a4,c5]@2 ~@6 [c5,e5,g5]@4 [a4,d5,f5]@12 [g4,c5,e5]@13 ~]/2", // F C Dm C
})).s("gm_brass_section").gain(0.35).pan(0.2)

// chords · electric guitar clean · "Guitar"
const electric_guitar_clean = note(`<
  ~@3 A ~@5 B@2 C@2 D@2 E@2 D@2 E@2 F@2 C@2 G@2 H@2 I@2 J@2 K L M@2 N O N P N O N P Q@3 R@2 S@2 T@2 G@2 H@2 I@2 J@2 K L
  M@2 N O N P N O N P Q@3 R@2 U V W X Y@2 Z@2 AA@2 AB@2 K L AC@2 AD AE AF@2 ~@2 AG AH@6 AI Q@3 AJ Q@3 AJ Q@3 AJ Q@3 AJ
  AK ~
>`.pickRestart({
  A: "[c4,f4,a4] ~ [c4,f4,a4] ~ [c4,f4,a4] ~ [c4,f4,a4] ~@5", // F
  B: "[[c4,f4,a4] ~@4 [c4,f4,a4] ~@3 [d4,f4,a4]@8 [c4,e4,g4]@6 ~]/2", // F Dm C
  C: "[[c4,f4,a4]@2 ~@8 [c4,f4,a4]@2 ~@6 [c4,e4,g4]@4 [a3,d4,f4]@7 ~ [a3,d4,f4]@4 [g3,c4,e4]@14]/2", // F C Dm C
  D: "[[c4,f4,a4]@21 ~ [d4,f4,a4]@26]/2", E: "[[c4,f4,a4]@11 [d4,f4,bb4]@13]/2",
  F: "[[c4,f4,a4] ~@4 [c4,f4,a4] ~@3 [d4,f4,a4]@8 [c4,e4,g4]@5 ~@2]/2", G: "~@5 f3 g3 a3 f4 ~@3",
  H: "[~@10 f3@2 g3@2 a3@2 f4@2 ~@4 [d4,f4,bb4]@5 ~ [d4,f4,bb4] ~ [d4,f4,bb4]@3 ~ [d4,f4,bb4] ~@5 bb3 ~ bb3@4 c4@2]/2", // Bb
  I: "[f3@10 a3@2 g3@2 a3@2 f4@2 ~@4 [d4,f4,a4]@5 ~ [d4,f4,a4] ~ [d4,f4,a4]@3 ~ [d4,f4,a4] ~@5 [d4,f4,a4] ~ [d4,f4,a4]@3 ~ [d4,f4,a4]@2]/2", // Dm
  J: "[[c4,f4,a4]@5 ~ [c4,f4,a4]@6 ~@6 [c4,f4,a4]@4 [d4,f4,bb4]@14 ~@4 [c4,c5] ~ [c4,c5]@3 ~ [c4,c5]@2]/2", // F Bb C
  K: "[c4,e4,g4]@10 [d4,f4,a4]@8 [c4,c5]@3 ~ [c4,c5]@2", L: "~@6 [c4,c5]@3 ~ [c4,c5]@2 ~@6 [c4,c5]@3 ~ [c4,c5]@2",
  M: "[[c4,e4,g4]@10 [d4,f4,a4]@11 ~ [d4,f4,a4]@8 [e4,g4,c5]@3 ~ [e4,g4,c5]@2 ~@10 c4@2]/2", // C Dm C
  N: "~@2 c4@2 a3@2 c4@3 ~ c4@2 ~@2 c4@2 a3@2 c4@4 d4@2", O: "~@2 d4@2 c4@2 d4@4 c4@2 ~@2 c4@2 a3@2 c4@3 ~ c4@2",
  P: "~@6 d4@4 c4@2 ~@2 [c4,c5] ~ [c4,c5] ~ [c4,c5]@3 ~ [c4,c5]@2", // C
  Q: "[[c4,f4,a4]@21 ~ [d4,f4,a4]@24 [c4,e4,g4]@20 ~@6]/3", // F Dm C
  R: "[~@4 bb2@2 db3@2 d3@2 bb3@8 ~@4 [eb4,f4,bb4]@7 ~ [eb4,f4,bb4]@3 ~ [d4,f4,bb4]@14]/2", // Ebsus2 Bb
  S: "[[c4,f4,a4] ~@4 [c4,f4,a4] ~@3 [d4,f4,a4]@9 [c4,e4,g4]@5 ~]/2", // F Dm C
  T: "[[c4,f4,a4]@2 ~@8 [c4,f4,a4]@2 ~@6 [c4,e4,g4]@4 [a3,d4,f4]@7 ~ [a3,d4,f4]@4 [g3,c4,e4]@12 ~@2]/2", // F C Dm C
  U: "c4@2 g3@2 c4@2 ~@2 [f4,g4,c5] ~ [f4,g4,c5] ~ [f4,g4,c5]@3 ~ [f4,g4,c5] ~@3 [f4,g4,c5] ~ [f4,g4,c5] ~", // Fsus2
  V: "[f4,g4,c5]@3 ~ [f4,g4,c5]@2 ~@2 [f4,g4,c5] ~ [f4,g4,c5] ~ [f4,g4,c5]@3 ~ [f4,g4,c5]@2 ~@6", // Fsus2
  W: "c4@2 g3@2 c4 ~@3 [f4,g4,c5] ~ [f4,g4,c5] ~ [f4,g4,c5]@3 ~ [f4,g4,c5]@2 ~@2 [f4,g4,c5] ~ [f4,g4,c5] ~", // Fsus2
  X: "[f4,g4,c5]@3 ~ [f4,g4,c5]@2 ~@2 [f4,g4,c5] ~ [f4,g4,c5] ~ [f4,g4,c5]@2 ~@2 [f4,g4,c5]@2 ~@6", // Fsus2
  Y: "[[c4,f4,a4]@3 ~ [c4,f4,a4] ~ [c4,f4,a4]@2 ~@4 [c4,f4,a4]@3 ~ [c4,f4,a4]@2 ~@4 [d4,f4,a4]@4 ~@2 [d4,f4,a4] ~ [d4,f4,a4]@2 ~@4 [d4,f4,a4]@2 ~@4 [d4,f4,a4]@2 ~@4]/2", // F Dm
  Z: "[[c4,f4,a4]@2 ~@2 [c4,f4,a4] ~ [c4,f4,a4]@2 ~@4 [c4,f4,a4]@3 ~ [c4,f4,a4]@2 ~@4 [d4,f4,bb4]@4 ~@2 [d4,f4,bb4] ~ [d4,f4,bb4]@3 ~ [d4,f4,bb4]@4 ~@2 [d4,f4,bb4] ~ [d4,f4,bb4] ~ [d4,f4,bb4] ~ [d4,f4,bb4]@2]/2", // F Bb
  AA: "[[c4,f4,a4]@3 ~ [c4,f4,a4] ~ [c4,f4,a4]@2 ~@4 [c4,f4,a4]@2 ~@2 [c4,f4,a4]@2 ~@4 [d4,f4,a4]@4 ~@2 [d4,f4,a4] ~ [d4,f4,a4]@2 ~@4 [d4,f4,a4]@2 ~@4 [d4,f4,a4]@2 ~@4]/2", // F Dm
  AB: "[[c4,f4,a4]@2 ~@2 [c4,f4,a4] ~ [c4,f4,a4]@2 ~@4 [c4,f4,a4]@2 ~@2 [c4,f4,a4]@2 ~@4 [d4,f4,bb4]@4 ~@2 [d4,f4,bb4] ~ [d4,f4,bb4]@2 ~@2 [d4,f4,bb4]@4 ~@2 [d4,f4,bb4] ~ [d4,f4,bb4] ~ [d4,f4,bb4] ~ [d4,f4,bb4]@2]/2", // F Bb
  AC: "[[c4,e4,g4]@10 [d4,f4,a4]@7 ~ [f4,a4,d5]@3 ~ [f4,bb4,d5]@18 ~@2 [f4,bb4,d5] ~ [f4,bb4,d5] ~ [f4,bb4,d5]@2]/2", // C Dm Bb
  AD: "[e4,g4,c5]@10 [f4,a4,d5]@11 ~ [f4,a4,d5]@2", AE: "[f4,a4,d5]@16 ~@2 [f4,a4,d5] ~ [f4,a4,d5] ~ [f4,a4,d5]@2",
  AF: "[[e4,g4,c5]@3 ~ [e4,g4,c5] ~ [e4,g4,c5]@4 [f4,a4,d5]@12 [d4,f4,bb4]@8 [e4,g4,c5]@3 ~ [e4,g4,c5]@2 ~@12]/2", // C Dm Bb C
  AG: "f3 ~ f3 ~ f3 ~ f3@3 ~ f3 ~@3 f3 ~ f3 ~ f3 ~ f3 ~ f3@2",
  AH: "f3 ~ f3 ~ f3 ~ f3@3 ~ f3@2 ~@2 f3 ~ f3 ~ f3 ~ f3 ~ f3@2",
  AI: "f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3@2", AJ: "~@2 bb2 db3 d3 bb3@4 ~@3",
  AK: "[eb4,f4,bb4]@5 ~ [eb4,f4,bb4]@3 ~ [d4,f4,bb4]@14", // Ebsus2 Bb
})).s("gm_electric_guitar_clean").gain(0.33).pan(0.7)

// drums · kick
const kick = s("bd").struct(`<
  ~ A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A@2 B A B A B A B A
  B A B A B A B A B A B A B A B A B A B A@2 B A B A B 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 A B A B A
  B A B A B A B A C
>`.pickRestart({
  A: "x!2", B: "x ~@2 x!2 ~", C: "x",
})).gain(0.6)

// drums · snare
const snare = s("sd").struct("<~ A@35 B A@12 ~ A@15 B A@12 ~ A@20 C@2 A@25 ~>".pickRestart({
  A: "~ x ~ x", B: "~@3 x ~ x ~@3 x ~@2", C: "~@8 x!2 ~@2",
})).gain(0.6)

// drums · clap
const clap = s("cp").struct("<~@43 A ~@3 A ~@24 A ~@3 A ~@5 B ~@16 C@2 ~@10 A ~@3 A ~@3 A ~@3 A ~@3>".pickRestart({
  A: "~ x!3 ~@8", B: "~@11 x", C: "x ~ x ~@2 x ~@6",
})).gain(0.54)

// drums · hihat
const hihat = s("hh").struct("<[x!4] [x ~ x!2 ~ x!2 ~ x!2 ~ x]!98 ~@2 [x ~ x!2 ~ x!2 ~ x!2 ~ x]!25 x>").gain(0.3)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~ [~ x ~@2 x ~@2 x ~@2 x ~]!98 ~@2 [~ x ~@2 x ~@2 x ~@2 x ~]!25 ~>").gain(0.18)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@36 A ~@7 B ~@4 B ~@15 A ~@7 A ~@4 A ~ A ~ A ~@11 A ~@5 C ~@7 A ~@16 D ~
>`.pickRestart({
  A: "~@11 x", B: "~@3 x", C: "x ~@10 x", D: "x ~@8 x ~ x",
})).gain(0.6)

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

// drums · crash
const crash = s("cr").struct("<~@41 A ~@3 A ~@24 A ~@3 A ~@4 A ~@29 A ~@3 A ~@3 A ~@3 A ~@4 A>".pickRestart({
  A: "x",
})).gain(0.6)

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

stack(
  bass, epiano2, alto_sax, brass_section, electric_guitar_clean, kick, snare, clap, hihat, hihat_soft, low_tom, mid_tom,
  crash, high_tom
)