// Honey — Bobby Goldsboro
// 88 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 95 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(88/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
const bass = note(`<
  A B C D C@2 E@2 F@2 C@4 E@2 F@2 C@3 D F E F@2 C G@2 C F@4 H I J K L M K@2 M L C D F E F@2 C G@2 C F@4 H I J K L M K@2
  M N O A P@2 Q@2 R S O A P@2 Q@2 R S O A P@2 Q@2 R A T@2 ~
>`.pickRestart({
  A: "d2@6 d2 ~ d2@8", B: "g2@6 g2 ~ g2@8", C: "c2@6 c2 ~ c2@8", D: "c2@5 ~ c2 ~ c2@8", E: "d2@6 d2 ~ g2@8",
  F: "d2@5 ~ d2 ~ g2@8", G: "c2@6 c2 ~ c2@7 ~", H: "c2@5 ~ c2 ~ c2@7 ~", I: "c2@6 c2 ~ g2@4 e2@4",
  J: "d2@5 ~ d2 ~ g2@4 g2@4", K: "d2@6 d2 ~ g2@4 g2@4", L: "c2@6 e2 ~ g2@4 g2@4", M: "c2@6 e2 ~ g2@3 ~ g2@4",
  N: "e2@6 e2 ~ a2@4 a1@4", O: "d2@5 ~ d2 ~ d2@7 ~", P: "e2@6 e2 ~ a2@8", Q: "e2@5 ~ e2 ~ a2@8", R: "d2@5 ~ d2 ~ d2@8",
  S: "d2@6 d2 ~ d2@7 ~", T: "[~@2 d2@29 ~]/2",
})).s("gm_acoustic_bass").gain(0.4)

// chords · piano
const piano = note("<~@68 A B C@2 D E F G A B C@2 D E F G A B C@2 D E F H@4>".pickRestart({
  A: "~ a3 d4 f#4 ~ a3 d4 f#4, d3@7 ~", B: "~ a3 d4 f#4 a4 f#4 d4 a3, d3@7 ~", C: "~ g3 b3 e4 ~ a3 [c#4,e4]@2, e3 a2",
  D: "~ g3 b3 [e3,e4] ~ a3 [c#4,e4] a4, e3@5 ~@3 a2@8", E: "~ g3 b3 [e3,e4] ~ a3 [c#4,e4] a4, e3@5 ~@3 a2@4 a2@4",
  F: "~ a3 d4 f#4@2 a3 d4 f#4, d3 ~", G: "~ a3 d4 f#4 a4 f#4 d4 a3, d3@10 d2@5 ~",
  H: "[~@2 a3@2 d4@2 f#4@2 a4@2 f#4@2 d4@2 ~ a3@2 [d2,a3,c#4,e4,f#4]@34 ~@13, d3@5 d2@3 ~@24]/4", // Dmaj7
})).s("gm_piano").gain(0.3)

// other · acoustic guitar nylon
const acoustic_guitar_nylon = note(`<
  A B C D E F G H I H J K E F G H I H J K L M N@2 O@2 P L@3 O@2 Q O R L Q@2 M L Q N S T L M N@2 O@2 P L@3 O@2 Q O R L
  Q@2 M L Q N S U V@2 W@4 X V@3 W@4 X V@3 W@4 X V ~@3
>`.pickRestart({
  A: "~@2 a4 d4 ~@2 a4 d4", B: "~@2 b4 d4 ~@2 b4 d4", C: "~@2 c5 e4 ~@2 c5 e4",
  D: "~@4 c5@2 e4@2 ~@2 [c4,e4] ~ e4 f4 e4@2, ~@12 c4@3 ~", // C
  E: "c3@2 [g3,c4,c5] ~ e4@2 c4@2 [c3,c5]@2 [g3,c4]@2 e4@2 [c4,c5]@2", // C5 C C5 C
  F: "c3@2 [g3,c4,c5] ~ e4@2 c4@2 [c3,c5]@2 [g3,c4]@2 e4@2 c4@2", G: "d3 [a3,d4,a4] f4 [g3,d4] [d3,b4] [g3,d4] f4 d4",
  H: "d3@2 [a3,d4,a4] ~ f4@2 d4@2 d3@2 [g3,d4,b4] ~ f4@2 d4@2", // D5 G
  I: "d3@2 [g3,d4,a4] ~ f4@2 d4@2 d3@2 [g3,d4,b4] ~ f4@2 d4@2", // Gsus2 G
  J: "c3@2 [g3,c4,g4] ~ e4@2 c4@2 c3@2 [g3,c4,c5] ~ e4@2 c4@2", // C5
  K: "c3@2 [g3,c4,g4] ~ e4@2 c4@2 c3@2 [c4,e4] ~@2 f4 [c4,e4]@2, ~@6 [c4,e4] ~", L: "~@2 e4@2 g4@2 ~@4 e4@2 c5@3 ~",
  M: "~@2 e4@2 g4@3 ~@3 e4@2 c5@3 ~", N: "~@2 d4@2 f4@3 ~@3 d4@2 b4@4", O: "~ d4 f4 ~@2 d4 b4@2",
  P: "~@2 e4@2 g4@3 ~@3 e4@2 c5@4", Q: "~@2 d4@2 f4@3 ~@3 d4@2 b4@3 ~", R: "~ e4 g4 ~@2 e4 c5@2",
  S: "~@2 e4@2 g4@3 ~@3 e4@2 c5@2 ~@2", T: "~@2 e4@2 g4@2 e4@2 ~@2 e4@2 c5@3 ~",
  U: "~@2 e4@2 a4@2 e4@2 ~@2 e4@2 c#5@3 ~", V: "~@2 a4@2 d5@4 ~@2 f#4@2 a4@3 ~", W: "~ g4 b4@2 ~ a4 c#5@2",
  X: "~ a4 d5@2 ~ f#4 a4@2",
})).s("gm_acoustic_guitar_nylon").gain(0.14).pan(0.3)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  A B C@4 D@2 E F C@4 G D H@2 C@2 I J K@4 I J I J K@4 L@2 K@2 L@2 K@2 L@2 I J K@4 I J I J K@4 L@2 K@2 L@2 K@2 L M N O
  P@4 N O N O P@4 N O N O P@4 N Q ~@3
>`.pickRestart({
  A: "~@2 [d4,f4,a4]@2 [d4,f4,a4] ~ [d4,f4,a4] ~@3 [d4,f4,a4] ~ [d4,f4,a4] ~ [d4,f4,a4] ~", // Dm
  B: "~@2 [d4,g4,b4]@2 [d4,g4,b4] ~ [d4,g4,b4] ~@3 [d4,g4,b4]@2 [d4,g4,b4] ~ [d4,g4,b4] ~", // G
  C: "~@2 [c4,e4,g4] ~ [c4,e4,g4] ~ [c4,e4,g4] ~@3 [c4,e4,g4] ~ [c4,e4,g4] ~ [c4,e4,g4] ~", // C
  D: "~@2 [c4,f4,a4] ~ [c4,f4,a4] ~ [c4,f4,a4] ~@3 [d4,f4,g4] ~ [d4,f4,g4] ~ [d4,f4,g4] ~", // F G7
  E: "~@2 [d4,f4,a4] ~ [d4,f4,a4] ~ [d4,f4,a4] ~@3 [c4,f4,g4] ~ [c4,f4,g4] ~ [c4,f4,g4] ~", // Dm Csus4
  F: "~@2 [d4,g4,a4] ~ [d4,g4,a4] ~ [d4,g4,a4] ~@3 [c4,f4,g4] ~ [c4,f4,g4] ~ [c4,f4,g4] ~", // Dsus4 Csus4
  G: "~@2 [d4,f4,a4] ~ [d4,f4,a4] ~ [d4,f4,a4] ~@3 [d4,g4,b4] ~ [d4,g4,b4] ~ [d4,g4,b4] ~", // Dm G
  H: "~@2 [d4,f4,g4] ~ [d4,f4,g4] ~ [d4,f4,g4] ~@3 [d4,f4,g4] ~ [d4,f4,g4] ~ [d4,f4,g4] ~", // G7
  I: "~@2 [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4] ~@3 [a3,c4,e4] ~ [a3,c4,e4] ~ [a3,c4,e4] ~", // C Am
  J: "~@2 [b3,c4,e4] ~ [b3,c4,e4] ~ [b3,c4,e4] ~@3 [a3,c4,e4] ~ [a3,c4,e4] ~ [a3,c4,e4] ~", // Cmaj7 Am
  K: "~@2 [a3,d4,f4] ~ [a3,d4,f4] ~ [a3,d4,f4] ~@3 [b3,d4,f4] ~ [b3,d4,f4] ~ [b3,d4,f4] ~", // Dm Bdim
  L: "~@2 [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4] ~@3 [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4] ~", // C
  M: "~@2 [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4] ~@3 [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~", // Em A
  N: "~@2 [a3,d4,f#4] ~ [a3,d4,f#4] ~ [a3,d4,f#4] ~@3 [b3,d4,f#4] ~ [b3,d4,f#4] ~ [b3,d4,f#4] ~", // D Bm
  O: "~@2 [c#4,f#4] ~ [c#4,f#4] ~ [c#4,f#4] ~@3 [b3,d4,f#4] ~ [b3,d4,f#4] ~ [b3,d4,f#4] ~", // F#5 Bm
  P: "~@2 [b3,e4,g4] ~ [b3,e4,g4] ~ [b3,e4,g4] ~@3 [c#4,e4,g4] ~ [c#4,e4,g4] ~ [c#4,e4,g4] ~", // Em C#dim
  Q: "~@2 [c#4,f#4] ~ [c#4,f#4] ~ [c#4,f#4] ~@3 d4 [b3,f#4] [b3,d4,f#4] ~@2 [b3,d4,f#4]", // F#5 B5 Bm
})).s("gm_electric_guitar_clean").gain(0.13).pan(0.7)

// other · string ensemble 1
const string_ensemble_1 = note(`<
  ~@22 A B ~@2 C D E@4 F@2 G H A I G J A I ~@9 K C L M B N O P H Q I G H R I S T U@2 T V W@2 X Y U@2 T V W@2 X Z U@2 T V
  W@2 X AA AB@3
>`.pickRestart({
  A: "~@2 e5 d5", B: "c5 b4", C: "g4 a4", D: "b4 a4", E: "[g5@14 a5 b5]/4", F: "g5/2", G: "~ g4 a4 b4",
  H: "c5 d5 e5 c5", I: "[a4,c5] [g4,b4]", J: "c5 d5 e5@2", K: "~ d4 e4 f4", L: "b4 c5", M: "d5", N: "a4 b4", O: "c5 d5",
  P: "e5@3 ~ g4@4 a4@4 b4@4", Q: "d5@7 ~ e5@4 d5@4", R: "d5@3 ~ e5@2 d5@2", S: "c5 e5 g5 b5", T: "d6 c#6", U: "d6/2",
  V: "b5@4 a5 b5 c#6 d6", W: "e6/2", X: "d6@3 ~ d6@4 e6@4 f#6@4", Y: "a5@14 a5 [b5,c#6]", Z: "a5@8 ~@4 g5 a5 b5 c#6",
  AA: "a5@12 a5 ~ g5 f#5", AB: "[e5 ~ d5@34 ~@12]/3",
})).s("gm_string_ensemble_1").gain(0.35)

// chords · string ensemble 2
const string_ensemble_2 = note(`<
  A B C@2 ~@15 D E@2 F@4 E@4 F@4 G@2 F@2 G@2 F@2 G@2 ~@6 H I E@2 F@4 G@2 F@2 G@2 F@2 J@2 K@2 L@2 M@2 N@2 K@2 L@2 M@2 N@2
  K@2 L@2 M@2 O@5
>`.pickRestart({
  A: "f4@2 d4 f4", B: "f4 g4 a4 g4", C: "g4/2", D: "~ b3 c4 [b3,d4]", E: "[~ a3 b3 a3, [g3,c4,e4]]/2",
  F: "[a3 b3 a3 b3, [d4,f4]@31 ~]/2", G: "[g3,c4,e4]/2", H: "~ g3 a3 b3", I: "c4",
  J: "[[g3,c4]@2 [g3,b3,d5] [g3,a3,c#5], e4]/2", K: "[a4 b4 a4 b4, [f#3,d5]]/2",
  L: "[[g3,b4] [a3,a4] [g3,b4] [a3,a4], e5@31 ~]/2", M: "[[g3,g4] [a3,e4] [g3,g4] [a3,a4], e5]/2",
  N: "[a4 f#4 a4@2, [d3,d5]]/2", O: "[a4@8 f#4@8 a4@17 ~ [a3,c#4,e4]@33 ~@13, [d3,d5]@33 ~@47]/5",
})).s("gm_string_ensemble_2").gain(0.35).pan(0.2)

// other · string ensemble 1
const string_ensemble_1_2 = note("<A@2 B@2 ~@24 C D E@2 F G H@2 ~@47 I ~@11>".pickRestart({
  A: "[[f3,a3] [g3,b3], d4]/2", B: "[c3,g3,c4,e4]/2", C: "~ g3 a3 b3", D: "~@2 d4 ~ c4@4 d4@4 e4@4, c4 ~@3", E: "d4/2",
  F: "~@3 b3", G: "c4 d4 e4 f4", H: "e4/2", I: "d4 e4 f#4 g4 e4 f#4 g4 a4 b4 a4 g4 f#4 g4 a4 b4 c#5",
})).s("gm_string_ensemble_1").gain(0.25).pan(0.9)

// chords · vibraphone
const vibraphone = note("<A@3 B C ~ D E ~@2 F G ~ H@2 I ~@2 F J ~@22 K L ~@51>".pickRestart({
  A: "[[f6,a6,d7]@13 ~@3 [g6,b6]@14 ~@2 [g6,c7]@13 ~@3, ~@15 d6@14 ~@2 e6@14 ~@3]/3", B: "g7@3 ~ e7@3 ~ c7@3 ~ g6@3 ~",
  C: "e6@15 ~", D: "~@12 e7@2 d7 ~", E: "~ c7@6 ~ [d6,g6,b6]@8, [f6,a6]@7 ~@9", F: "~@6 g7 f7",
  G: "~ e7@5 ~@2 [g6,c7]@7 ~, [g6,c7]@6 ~ e6@8 ~", // C5
  H: "[[a6,c7]@12 d7@3 ~ [g6,c7]@6 ~@2 [g6,b6]@7 ~, ~@15 e6@7 ~ d6@7 ~@2]/2", // Am C5 G
  I: "~ c7@5 ~@2 [d6,g6,b6]@8, [e6,g6]@3 ~@5", J: "[g6,c7,e7]@7 ~ [g6,c7]@8, ~@7 e6@8 ~", K: "~@8 [c6,e6,a6]@5 ~@3",
  L: "[e6,g6,b6]@7 ~ [c6,e6,a6]@6 ~@2", // Em Am
})).s("gm_vibraphone").gain(0.4)

// other · tubular bells
const tubular_bells = note("<~@68 A ~ B ~ C ~ D ~ A ~ B ~ C ~ D ~ A ~ B ~ C ~ D ~ E@3>".pickRestart({
  A: "a4@3 ~@5", B: "b4@3 ~@13", C: "b4 ~@7", D: "a4 ~@7", E: "[~ f#4@34 ~@13]/3",
})).s("gm_tubular_bells").gain(0.62)

// other · orchestral harp · A F#m7 C#m7 F#m E7 Dmaj7 F#m7
const orchestral_harp = note(`<
  ~@67
  [~@8 [a2,b2,c#3] [e3,f#3,g#3,a3] [b3,c#4,d4,e4] [f#4,g#4,a4,b4,c#5] [d5,e5,f#5,g#5] [a5,b5,c#6,d6] [e6,f#6,g#6,a6] ~]
  ~@27
>`).s("gm_orchestral_harp").gain(0.15)

// drums · kick
const kick = s("bd").struct("<[x!2]!92 [~ x ~@14] ~ [~@3 x ~@12]>").gain(0.3)

// drums · kick · soft notes
const kick_soft = s("bd").struct("<[~@3 x ~@4]!92 ~@3>").gain(0.15)

// drums · clap
const clap = s("cp").struct("<[~ x ~ x]!91 [~@2 x ~@3 x!2] [~ x ~@6] ~ [~@2 x!2 ~@12]>").gain(0.35)

// drums · mid tom
const mid_tom = s("mt").struct("<~@92 x ~@2>").gain(0.25)

// drums · high tom
const high_tom = s("ht").struct("<~@91 [~@15 x] ~@3>").gain(0.2)

// drums · crash
const crash = s("cr").struct("<~@92 [~ x ~@14] ~@2>").gain(0.2)

stack(
  bass, piano, acoustic_guitar_nylon, electric_guitar_clean, string_ensemble_1, string_ensemble_2, string_ensemble_1_2,
  vibraphone, tubular_bells, orchestral_harp, kick, kick_soft, clap, mid_tom, high_tom, crash
)