// Bitter Tears — INXS
// 120 bpm, 4/4, key G 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: Full arrangement: all 112 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(120/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@2 G H I J K H I J K E F@2 G H I J K H I J K A B C D E F@2 G L M N O P Q R S H I J K H I J K E F@2 G H I
  J K H I J K A B C D E F@2 G H I J K H I J K H I J K H I J K H I J K H I J K H I J K H I J K H I J K T@3
>`.pickRestart({
  A: "g1@7 g1", B: "g2@7 d2", C: "g1", D: "g2@6 c2@4 a#1@4 a1 ~", E: "g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1@2 g2@2",
  F: "g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~ g1 ~", G: "g1 ~ g2@2 g1@2 g2@2 g1@2 g2@2 g1@2 g2 ~",
  H: "g1 ~ g1 ~ g1 ~ g1@2 c2 ~ c2 ~ c2 ~ c2@2", I: "a#1 ~ a#1 ~ a#1 ~ a#1@2 c2 ~ c2 ~ c2 ~ d2@2",
  J: "g1 ~ g1 ~ g1 ~ g1@2 c2 ~ c2 ~ c2 ~ c2 ~", K: "a#1 ~ a#1 ~ a#1 ~ a#1 ~ c2 ~ c2 ~ c2 ~ c2 ~",
  L: "d2@4 d2@3 ~ d2@3 ~ d2@4", M: "f2@3 ~ f2@3 ~ f2 ~ f2@3 ~ f2@2", N: "c2@3 ~ c2@3 ~ c2@3 ~ c2@4",
  O: "g1@2 g1@2 g2 g1 g2 g1", P: "d2@3 ~ d2@3 ~ d2@3 ~ d2@3 ~", Q: "f2@3 ~ f2@3 ~ f2@3 ~ f2@2 ~@2",
  R: "g2@3 ~ g2@2 g1@2 g2@2 g1@2 g2@2 g1@2", S: "g2@3 ~ f2@3 ~ e2@2 d2@2 c2@2 ~@2", T: "[g1@11 ~@5]/3",
})).s("gm_acoustic_bass").gain(0.64)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  ~ A B C D A B C D E F G H E F G H A B C D E F G H E F G H A B C D A B C D I J K L M N O@2 E F G H E F G H A B C D E F
  G H E F G H A B C D A B C D E F G H E F G H E F G H E F G H E F G H E F G H E F G H E F G H E F G H P@3
>`.pickRestart({
  A: "[g4,b4,d5]@4 [g4,b4,d5]@5 [g4,b4,d5] [g4,b4,d5]@2 [g4,b4,d5]@2 [g4,b4,d5]@2, [g2,d3,g3]", // G G5
  B: "[g4,c5,e5]@4 ~@2 [g2,d3,g3]@3 ~ [g4,c5,e5]@2 [g4,c5,e5]@2 [g4,c5,e5]@2, [g2,d3,g3]@3 c3@5, ~@4 [g4,c5,e5]@5 [g2,d3,g3]@7", // C G5 C G5 C G5
  C: "[g4,d5,f5]@4 [g4,d5,f5]@5 ~ [g4,d5,f5]@2 ~@2 g3@2, ~@9 g3@5 ~@2, ~@3 [g4,d5,f5]", // G7
  D: "[g4,c5,e5]@4 [g4,c5,e5]@5 [g4,c5,e5] [g4,c5,e5]@2 [g4,c5,e5]@2 [g4,c5,e5] ~, g3@15 ~", // C
  E: "[g3,b3,d4]@2 ~@2 [g2,g3,b3,d4]@2 ~@3 g2 [g3,c4,e4] ~ [g3,c4,e4]@2 g2 ~, g2 ~@15", // G C
  F: "[g3,d4,f4]@3 ~ [g3,d4,f4]@4 ~ [g3,c4,e4] ~@2 [g3,c4,e4] ~ [g3,c4,e4] ~", // G7 C
  G: "[g3,b3,d4]@2 ~@2 [g3,b3,d4]@2 ~@3 g2 [g3,c4,e4] ~ [g3,c4,e4]@2 g2 ~, g2 ~@15", // G C
  H: "[g3,d4,f4]@2 ~@2 [g3,d4,f4]@4 g2 [c4,e4]@2 ~ [g3,c4,e4] ~ [g3,c4,e4] ~, ~@9 g3 ~@6", // G7 C
  I: "[d4,f4,a4]@2 ~ [d4,f4,a4], f3, [d3,a3]@5 [d3,a3]@3, ~@2 [d4,f4,a4] ~", J: "c4@5 [g3,c4]@3, [f2,f3,a3]",
  K: "[c3,g3,c4,e4]@5 [c3,g3,c4,e4]@3", L: "d4@3 [d4,g4]!3 [d4,g4]@2, [g2,g3,b3]",
  M: "[c4,f4,a4]@4 [c4,f4,a4] [c4,f4,a4]@3, [d3,a3]", N: "c4@2 c4 [f3,a3,c4], [f3,a3]@3 ~, ~ g3",
  O: "[g2@6 ~@4 g2@4 g2@2 g2@2 [g2,g4,d5,g5]@2 [g2,g4,d5,g5]@2 [g2,g4,d5,g5]@2 [g2,g4,d5,g5]@2 [g2,g4,d5,g5]@2 [g2,g4,d5,g5]@2 [g2,g4,d5,g5] ~, [g3,b3,d4]@4 [g3,b3,d4]@11 ~, ~@3 g2@2 ~@11]/2", // G5 G
  P: "[[g2,d3,g3,d4,g4]@11 ~@5]/3", // G5
})).s("gm_piano").gain(0.47)

// chords · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note(`<
  ~ A B C D A B C D E ~ E ~ E ~ E ~ A B C D E ~ E ~ E ~ E ~ A B C D A B C D F G H I J K L ~ E ~ E ~ E ~ E ~ A B C D E ~
  E ~ E ~ E ~ A B C D A B C D E ~ E ~ E ~ E ~ E ~ E ~ E ~ E ~ E ~ E ~ E ~ E ~ M N O P Q@3 R@3 S@2 T@3
>`.pickRestart({
  A: "[g2,g3,b3,d4]", B: "[g2,g3,c4,e4]", C: "[g2,g3,d4,f4]", D: "[g2,g3,c4,e4]@7 ~",
  E: "[g2,d3]@2 ~@2 [g2,d3]@4 [a#2,f3]@2 [c3,g3] ~@5", F: "~@7 f3, [d3,a3,d4]", G: "[f2,c3,f3]", H: "[c3,g3,c4]",
  I: "[g2,d3,g3]@5 [g2,d3,g3]@3", J: "[d3,a3,d4]", K: "[f2,c3,f3]@15 ~", L: "[g2,d3,g3]@11 ~@5",
  M: "~@7 f3, f3@7 ~, ~@3 f4", N: "f5@2 f5@5 f5", O: "f5!4", P: "f5@4 f5@4 f5@4 f5@3 ~",
  Q: "[[g3,d4,g4]@2 [g3,d4,g4]@2 [g3,d4,g4]@2 g4!2 [d4,g4]!5 ~@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]!3, ~@3 g3@4 g3@5, ~@6 d4@2 ~@5 [d4,g4]@2 ~@9]/3", // G5
  R: "[[g3,d4,g4]@2 g3@2 ~@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]@4 [d4,g4]@2 ~@4 [d4,g4] [d4,g4]@2 [d4,g4] [d4,g4]@2 [d4,g4] [d4,g4]@2 [d4,g4] [d4,g4]@2 [d4,g4] [d4,g4]@2 ~ g4@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]@2, ~@2 [d4,g4]@4 ~@10 [d4,g4]@4 ~@15 d4@2 ~@11, ~@2 g3@7 g3@15]/3", // G5
  S: "[[g3,d4,g4]@2 [g3,d4,g4]@2 [g3,d4,g4]@2 [g3,d4,g4]@4 [g3,d4,g4]@4 [d4,g4]@4 [d4,g4]@4 [d4,g4]@2 [d4,g4]@2 [d4,g4]@2 [d4,g4]@2 [d4,g4] ~, ~@14 g3@17 ~]/2", // G5
  T: "[[g2,d3,g3]@17 ~@7]/3", // G5
})).s("gm_overdriven_guitar").gain(0.62)

// other · synth brass 1 · "SYNBRASS 1"
const synth_brass_1 = note(`<
  ~ A@8 ~@8 A@4 B ~ C ~ B ~ C ~ A@8 ~@16 A@4 B ~ C ~ B ~ C ~ A@8 B ~ C ~ B ~ C ~ B ~ C ~ B ~ C ~ B ~ C ~ B ~ C ~ B ~ C ~
  B ~ C ~ B ~ C ~@4
>`.pickRestart({
  A: "~@6 [d4,d5] ~@2 [d4,d5] [e4,e5] ~ [f4,f5] ~@3", B: "[g3,g4]@2 ~@2 [g3,g4]@2 ~@2 [a#3,a#4] ~ [c4,c5]@2 ~@4",
  C: "g4@2 ~@2 g4@2 ~@2 [a#4,a#5] ~ [c5,c6]@2 ~@4, g5 ~@3 g5 ~@11", // A# C
})).s("gm_synth_brass_1").gain(0.54)

// chords · drawbar organ · "ORGAN 1"
const drawbar_organ = note(`<
  ~ A B C D A B C D ~@8 A B C D ~@8 A B C D A B C D E F G H I F J@2 ~@8 A B C D ~@8 A B C D A B C D ~@8 K L M N O N M N
  K L M N O N M N P@4 K L M N O N M N ~@3
>`.pickRestart({
  A: "[b4,d5,g5]@15 ~", B: "[c5,e5,g5]", C: "[d5,f5,g5]@15 ~", D: "[c5,e5,g5]@15 ~", E: "[d4,f4,a4,d5,f5,a5]",
  F: "[f3,c4,f4,a4,c5]", G: "[g4,c5,e5]", H: "[g3,d4,g4,b4,d5]", I: "[d4,f4,a4,d5,f5]", J: "[[g3,d4,g4,d5,g5]@31 ~]/2",
  K: "[b4,d5,g5] [c5,e5,g5]", L: "[d5,f5,g5]@8 [c5,e5,g5]@7 ~", M: "[b4,d5,g5]@8 [c5,e5,g5]@7 ~",
  N: "[d5,f5,g5]@7 ~ [c5,e5,g5]@7 ~", O: "[b4,d5,g5]@7 ~ [c5,e5,g5]@7 ~",
  P: "[[f5,f6]@55 ~@5 g6 [b5,c6,d6,e6,f6] [c5,d5,e5,f5,g5,a5] [c4,d4,e4,f4,g4,a4,b4], ~@30 [a6,b6] ~]/4", // F Bdim Dm7 Cmaj7 Asus2
})).s("gm_drawbar_organ").gain(0.4)

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

// drums · snare
const snare = s("sd").struct(`<
  A B@15 C B@11 C B@6 D E B@7 C B@7 C B@7 C B@3 C B@6 D E B@7 C B@7 C B@10 D E B@7 F ~@3
>`.pickRestart({
  A: "~@15 x", B: "~ x ~ x", C: "~@4 x ~@7 x ~ x!2", D: "x!4", E: "x ~@3 x ~@3 x ~@3 x ~ x!2", F: "~@6 x ~@3 x ~@3 x!2",
})).gain(0.6)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<[~@8 x!7 ~] ~@107 [~@4 x!2 ~ x!3 ~ x!3 ~@2] ~@3>").gain(0.07)

// drums · hihat
const hihat = s("hh").struct("<~ [x!4]!108 ~@3>").gain(0.6)

// drums · hihat · soft notes
const hihat_soft = s("hh").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 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 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.13)

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

// drums · crash
const crash = s("cr").struct(`<
  ~ A ~@15 A ~@7 A ~@11 A ~@3 A ~@3 A ~@7 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~ A ~ A ~@3 A ~
  A ~ A ~ A ~ A ~@2
>`.pickRestart({
  A: "x",
})).gain(0.6)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@9 [x!16]!100 ~@3>").gain(0.68)

stack(
  bass, piano, overdriven_guitar, synth_brass_1, drawbar_organ, kick, snare, snare_soft, hihat, hihat_soft, open_hat,
  crash, cabasa
)