// Return My Love — Ron
// 75 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 73 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): guitar program 30.
setcpm(75/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(`<
  ~@8 A B C D E F G H I J K L M N O P Q R S T U V W X Y@2 Z AA AB@2 AC I AD AE AF AG AH AI AJ AK AL AM AN AO AP AQ AR AS
  AT AU Y@2 AT AV Y@6 AT AV AW AX@2
>`.pickRestart({
  A: "~@14 a2 c3", B: "d3@15 ~", C: "g2@15 ~", D: "c2", E: "f1@8 c2@3 g1 c1@4", F: "f1@15 ~", G: "f1@10 d2@3 c2@3",
  H: "f1", I: "bb1", J: "d1", K: "g1", L: "e1", M: "a1@13 a1 f1 c1", N: "eb1@4 gb1@3 d1", O: "g1@7 ~ g1@7 a1",
  P: "bb1 c2", Q: "db1@6 ~ db1 eb1@7 eb1", R: "f1@6 ~ f1 ~ f1 f1@3 ~@3", S: "bb1@6 ~ bb1 eb1@5 ~ eb1 f1",
  T: "ab1@4 ab1@2 ~ ab1 ~ ab1 ab1@4 ab1@2", U: "g1@7 db1 c1@4 c2@4", V: "f1@6 ~ f1 ~ f1 f1@2 ~ f1 ab1@2",
  W: "bb1@7 f1 bb1 f1 bb1!2 c2@4", X: "db2@7 ~ e2 c2 e1@6", Y: "f1@4 ~ f2 c2 f1 ~ c1 f1@4 c1 d1",
  Z: "f1@4 ~ f2 c2 f1 ~ c1 f1@4 c2 d2", AA: "f1@4 ~ f2 c2 f1 ~ c1 f1@2 c2@2 g1@2",
  AB: "f1@4 ~ f2 c2 f1 ~ f1 f1@4 c1 d1", AC: "f1@4 ~ f2 c2 f1 ~ f1 f1@2 ~@4", AD: "d1@10 g1 a1 d2@3 f1",
  AE: "g1@13 ~ g1 f1", AF: "e1@11 ~ e1@4", AG: "a1", AH: "eb1@6 eb1 f1 gb1@8", AI: "g1@10 c2 d2 g2@4",
  AJ: "bb1@6 a1 g1 c2@8", AK: "db2@5 ~ db2 ab1 eb2@4 bb1 c2@3", AL: "f2@9 c2 f2 g2 f2 c2 f1@2",
  AM: "bb1@6 ~ bb1 eb2@3 bb1 eb1@3 ~", AN: "ab1@7 ab1 ~ ab1 ab1@4 f1@2", AO: "g1@2 c1 c2", AP: "f1 g1 ab1 f1",
  AQ: "bb1@9 f1 ab1 bb1 c2@4", AR: "db2@3 ab1 e2@2 c2@2", AS: "f1@4 ~ f2 c2 f1@2 ~ d2@3 c2 c1 d1",
  AT: "f1@4 ~ f2 c2 f1 ~ c1 f1@3 f1 c1 d1", AU: "f1@4 ~ f2 c2 f1@2 f2!2 f2@2 f2 d2@2",
  AV: "~ c1!3 ~ c1!3 ~ c1!3 ~ c1!2 d1", AW: "~ f1!3 ~ f1!3 ~ f1 g1 c1 ~ f1!2 ~", AX: "f1/2",
})).s("gm_electric_bass_finger").gain(0.64)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~ A B C D A E F G H I J K L E F G H I J M N O P Q R S T U V W X A E F Y A E F G H I J M N O P Z R S T U V W X A E F AA
  A E F AA A E F AA A E F AA ~@2
>`.pickRestart({
  A: "f2@2 c3 d3 [f3,a3,f4]@2 c3 [g3,a3,f4] ~ [f3,a3,f4]@2 c3 ~ f3 c3 d3, [a3,f4]@4 ~@8 [d3,a3,f4]@3 ~", // F Dm F Dm
  B: "f2@2 c3 d3 [f3,bb3,f4]@2 c3 [g3,bb3,f4]@2 [f3,bb3,f4]@2 c3 ~ f3 c3 d3, [bb3,f4]@4 ~@8 [d3,bb3,f4]@3 ~", // Bb5 Gm7 Bb5 Bb
  C: "f2@2 c3 d3 [f3,c4,e4]@2 c3 [g3,c4,e4]@2 [f3,c4,e4]@2 c3 ~ f3 c3 d3, [c4,e4]@4 ~@8 [d3,c4,e4]@3 ~", // Fmaj7 C Fmaj7 C
  D: "f2@2 c3 d3 [f3,bb3]@2 c3 [g3,bb3]@2 [f3,bb3,f4]@2 c3 d3 f3 c3 d3, [bb3,f4]@4 f4@5 ~@3 [bb3,f4]@4", // Bb5 Gm Bb5
  E: "f2@2 c3 d3 [f3,bb3,f4]@2 c3 [g3,bb3,f4] ~ [f3,bb3,f4]@2 c3 ~ f3 c3 d3, [bb3,f4]@4 ~@8 [d3,bb3,f4]@3 ~", // Bb5 Gm7 Bb5 Bb
  F: "f2@2 c3 d3 [f3,c4,e4]@2 c3 [g3,c4,e4] ~ [f3,c4,e4]@2 c3 ~ f3 c3 d3, [c4,e4] ~@2 [c4,e4], ~@6 d3 ~", // Fmaj7 C Fmaj7 C
  G: "bb2@2 c3 d3 [f3,bb3,f4]@2 c3 [g3,bb3,f4] ~ [f3,bb3,f4]@2 c3 d3 f3 c3 d3, [bb3,f4] ~@2 [bb3,f4]", // Bb5 Gm7 Bb5
  H: "[a3,c4,f4]@4 [a3,c4]@3 ~@2 a3 ~ a3 a3@2 ~ a3, d3@5 d3@2 d3, ~@4 f4@7 ~@5, ~@7 c4@5 [c4,f4]@4", // F Am F5
  I: "[g3,bb3,f4]@4 [g3,bb3,f4]@2 ~ g3 ~ g3 ~@5 g3, g2@3 g2@2 g2@2 g2, ~@7 [bb3,f4]@4 g3@3 ~@2, ~@3 [bb3,f4]", // Gm7 Bb5
  J: "[c3,g3,c4]@2 ~@3 e4 ~@8 c3@2, e4@4 c4@2 ~@3 e4@2 ~ [c4,e4]@4, ~@2 c3@4 c3@3 ~ c3@4 ~@2, ~@3 g3@3 ~ [g3,c4]@4 g3@5", // C5 C C5
  K: "[f3,c4,f4]@3 ~@3 f2 f4 ~@3 f3 bb3 f4 c3@2, f2@5 f4@2 ~ f4@4 ~@4, ~@3 f3@3 ~ [c3,bb3]@3 c3@3 ~@3, ~@4 c4@2 ~@3 c4@2 ~@2 c4@3", // F5 C7
  L: "f2@2 c3 d3 [f3,a3,f4]@2 c3 [g3,a3,f4] ~ [f3,a3,f4]@2 c3 ~ f3 c3 d3, a3@4 ~@8 [d3,a3,f4]@3 ~, f4 ~@15", // F Dm F Dm
  M: "f2@2 ~@5 a3@2 ~@3 c4 ~ f2 a3, [a3,c4,f4]@3 a3@2 f4@6 e4@2 f4@3, ~ f2@4 f2@2 ~, ~@4 c4@3 ~@2 c4@2 a3@4 ~", // F
  N: "[eb3,eb4,g4]@2 ~@5 c4 gb3 ~@3 d5@2 ~ c4, c4 ~ eb3@3 g4@3 [gb4,a4]@8, ~@3 c4@3 eb3@2 ~@2 gb3@4 gb3@2, ~@4 eb4@4 ~@3 c4@3 ~@2", // Eb Gbm
  O: "g2@2 ~@2 [bb3,d4,g4]@2 ~ [bb3,d4,g4]@2 ~@5 g2 g3, [g3,bb3,d4,g4]@3 g3@6 [bb3,d4,g4]@2 g3@3 ~@2, ~@2 g2@3 ~ g2@4 g2@2 [bb3,d4,g4]@4", // Gm
  P: "bb2@2 ~ f3 f3@2 ~ f3 [g3,c4,e4]@2 ~@4 g3@2, [f3,db4,f4]@4 [db4,f4]@4 ~@3 g3@2 c3@3, ~@2 bb2@3 ~ bb2@2 c3 ~ c3@2 [c4,e4]@4", // C Db C
  Q: "[ab3,db4]@3 db3 [db3,ab3,db4]@2 ~ [eb3,bb3,eb4]@2 [bb3,eb4]@2 eb3!2 ~@2 bb3, db3@2 ~@7 eb3 ~@2 [bb3,eb4]@4, ~@7 eb3", // Db5 Eb5
  R: "[f3,c4,f4]@3 ~ [c4,f4]@2 f3 [f3,c4]@2 c4@2 f3 [c4,f4]@2 ~ c4, ~@3 f3@3 ~ f4@4 ~@5, ~@9 f3 ~@2 f3 ~ f3@2", // F5
  S: "[bb2,f3,bb3]@3 [bb2,f3] [bb2,f3]@2 ~ f3 [eb3,eb4]@3 ~@3 eb3 ~, ~@4 bb3 ~ bb2@2 bb3 ~@2 eb3@2 eb4@3, ~@3 bb3", // Bb5 Eb
  T: "[ab3,c4]@2 ~ ab3 [eb3,ab3,c4]@3 [eb3,ab3,c4]@2 [ab3,c4]@2 eb3 eb3@2 eb3@2, eb3 ~ [eb3,ab3]@2 ~@5 eb3 ~@2 [ab3,c4]@4", // Ab Ab5 Ab
  U: "[d3,g3,bb3]@3 [d3,g3] [d3,g3]@2 ~ g3 [g3,c4]@3 ~@3 c3 ~, ~ bb3 ~ g3, ~@6 d3@2 c3@2 ~ c3@2 c4@3", // Gm G5 C5
  V: "[f3,c4]@3 c3 [c3,f3,c4]@3 [c3,f3,c4]@2 [f3,c4]@2 ~@3 [f3,c4]@2, c3 ~@8 c3 ~ c3@2 c3@3, ~@6 [f3,c4] ~", // F5
  W: "[bb2,f3,bb3]@3 [bb2,f3] [bb2,f3,bb3]@2 ~ f3@2 [bb2,f3]@2 bb2 [c3,g3,c4]@4, ~@7 bb3@5 ~@4, ~@7 bb2 ~@8", // Bb5 C5
  X: "[db3,ab3,db4]@3 [db3,ab3,db4] [ab3,db4]@3 [db3,ab3] [c4,e4]@3 ~@3 g3@2, ~@4 db3@2 ~@2 g3@2 ~ g3@2 e4@3, ~@3 c4", // Db5 C
  Y: "f2@2 c3 d3 [f3,bb3,f4]@2 c3 [g3,bb3,f4] ~ [f3,bb3,f4]@2 c3 [bb3,f4]@2 ~@2, [bb3,f4] ~@3", // Bb5 Gm7 Bb5
  Z: "[db3,ab3,db4]@3 db3 [db3,ab3,db4]@2 ~ [eb3,bb3,eb4]@2 [eb3,bb3,eb4]@2 eb3!2 ~@2 bb3, ~@3 [bb3,eb4], ~@7 eb3", // Db5 Eb5
  AA: "f2@2 c3 d3 [f3,bb3,f4]@2 c3 [g3,bb3,f4] ~ [f3,bb3,f4]@2 c3 ~@2 c3@2, [bb3,f4] ~@2 [bb3,f4]", // Bb5 Gm7 Bb5
})).s("gm_acoustic_guitar_steel").gain(0.36).pan(0.7)

// other · distortion guitar
const distortion_guitar = note(`<
  ~@10 A B@2 ~@5 A C@2 D E@4 ~@2 F G H ~@10 A C@2 D E@4 ~@2 F I H ~@4 J ~@3 J ~@3 J ~@3 J ~@2
>`.pickRestart({
  A: "d3", B: "[~ e4@14 f3@7 ~@2 bb3@8]/2", C: "[~ e4@14 f3@17]/2", D: "bb3 [d3,d4]",
  E: "[~@8 [d4,g4]@7 f3@8 c3@8 db3@8 ~ [bb3,eb4]@7 ~@8 bb4@2 ~ a4@6, ~@47 f3@16 ~, ~@54 c4@3 ~@7]/4", F: "~@7 d3 ~@8",
  G: "~@6 f3 eb4@3 [f3,c4,f4]@6", H: "~@10 f3 ab3@5", I: "~@6 f3 ~@3 [f3,c4,f4]@6", J: "~@12 d3 f3 ~ d3",
})).s("gm_distortion_guitar").gain(0.36).pan(0.3)

// chords · rock organ
const rock_organ = note("<A B@5 ~@11 C D E F G H I J K L M N O P@2 Q@4 ~@11 J K L M N O P@2 R@12 S@6>".pickRestart({
  A: "~@15 [c3,d3,e3,f3,g3,a3]", // Dm7
  B: "[[b3,c4,d4,e4,f4,ab5] ~@11 c6@2 bb5@14 d6@2 c6@14 g6@2 ~@11 [db6,d6] c6 bb5 [db6,d6] c6 f5 g5 a5@16, a5@12 bb5 ~@15 db6 ~@15 gb6 ~ f6@34]/5", // E7 Dmaj7
  C: "[a4,c5], f5 ~@15", D: "[g4,bb4], f5 ~@15", E: "[e5,g5], c5 ~@15", F: "[f5,c6], c5 ~@15",
  G: "[c5,eb5,f5,c6] [gb5,a5], ~@8 d5 ~@7", H: "[f5,bb5], d5 ~@15", I: "[bb4,db5,f5] [g4,c5,e5]",
  J: "[ab4,db5,f5] [bb4,eb5,g5]", K: "~@5 c6@11, [c5,f5,a5], ~@5 b5 ~@10", L: "[db5,f5] [bb4,eb5,g5]",
  M: "c6@8 bb5@3 c6@5, [eb5,ab5]", N: "d5@8 c5 ~@7, g5, c6 ~@15", O: "[c5,c6] ~@15, ab5",
  P: "[[ab4,db5,f5]@3 [c5,eb5] [db5,f5]@2 [c5,g5,c6]@2, ~@3 ab5@3 ~@2]/2", // Db Cm Db C5
  Q: "[a5@12 c6@2 bb5@14 d6@2 c6@14 g6@2 ~@7 [db6,d6] [c6,db6] bb5 c6 d6 c6@2 ~@4, ab5 ~@11 bb5 ~@15 db6 ~@15 gb6 ~ f6@14 ~@4]/4", // Dmaj7 Dbmaj7
  R: "[a5@6 c6 bb5@7 d6 c6@7 g6 [bb5,f6]@9, ab5 ~@11 bb5 ~@15 db6 ~@15 gb6 ~@19]/4", // Bb5
  S: "[a5@12 c6@2 bb5@14 d6@2 c6@14 g6@2 bb5 ~@10 [db6,d6] c6 bb5 [db6,d6] c6 f5 g5 [c5,a5]@32, ab5 ~@11 bb5 ~@15 db6 ~@15 gb6 ~ f6@50]/6", // Dmaj7 F
})).s("gm_rock_organ").gain(0.24).pan(0.6)

// chords · lead 1 square
const lead_1_square = note(`<
  ~@31 A B@4 C@2 D@2 E F G H I J K L M N O P Q R S T@4 U V W X Y@2 Z@2 U V W AA AB@2
>`.pickRestart({
  A: "~@4 c5 bb4 a4 g4, ~ e3", B: "[[f4,c5,f5]@15 ~]/4", C: "[c4@4 d4@3 f4, f3]/2",
  D: "[~@3 bb4, [g3,e4] [bb3,f4], ~@3 c5@9 ~@4]/2", E: "d4@5 e4 f4 c4, [c5,f5,a5]", F: "[g4,bb4]@2 a4 bb4, d5, ~ d4",
  G: "[g4,bb4], c4 ~@15", H: "a3@3 g3 ~ [c4,a4] [g3,bb3,g4] [f3,a3,f4], [f4,c5]@5 ~@3, c4 ~@7 f3@4 ~@4",
  I: "[c4,g4,bb4,eb5] [d4,a4,d5]", J: "[a3,c5] [g3,bb4] [a3,c5] [bb3,d5]", K: "[db4,f4,f5] [c4,g4,e5]",
  L: "[ab3,db4,f5]@2 g5 eb5, ~ [g3,eb4]", M: "~ c5 a4 c5, [f3,c4,f4]", N: "[db4,f4,f5]@2 eb5 g4, ~ [bb3,eb4]",
  O: "[c5,c6]", P: "[c4,g4]", Q: "ab4@2 bb4 c5, [c4,f4]", R: "[f4,bb4,db5]@3 [g4,c5,eb5]",
  S: "[ab4,db5,f5]@4 c5 bb4 a4 g4", T: "[a4@3 c5 ~@2 e5 d5 ~@4 [bb4,f5]@4, f4, c4@3 ~, f5@3 ~@5, ~ bb4 c5@2]/4",
  U: "[c4,f4]", V: "[d4,f4]@2 e4 f4", W: "[c4,g4] a4, ~@8 c4 ~@7", X: "bb4, f4 ~@15",
  Y: "[[c4,f4] ~@11 c5@4 ~@8 e5@4 d5@4, f5@3 ~, a4@3 ~ bb4@4]/2", Z: "[~ [bb4,f5], c5]/2", AA: "[f4,bb4]",
  AB: "[[f4,c5]@31 ~, c4 ~@31]/2", // F5
})).s("gm_lead_1_square").gain(0.16).pan(0.4)

// bass · fretless bass · A
const bass_2 = note("<~@38 [~@3 [a1,a2]] [d3@3 ~] ~@33>").s("gm_fretless_bass").gain(0.51)

// drums · kick
const kick = s("bd").struct("<~ A@22 B C D C D E D E D@5 A@10 B C D C D E D E D@8 F D@7 F G ~>".pickRestart({
  A: "x ~@4 x ~@2", B: "x ~@9 x!2 ~@4", C: "x ~@3 x!2 ~@2", D: "x ~@6 x ~@2 x ~@5", E: "x ~@6 x!2 ~ x ~@5",
  F: "x!2 ~@8 x ~@5", G: "x",
})).gain(0.72)

// drums · snare
const snare = s("sd").struct("<~ A@30 B A@3 C A@18 D A@7 E A@7 F ~@2>".pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@4 x ~@2 x ~@3", C: "~ x!3", D: "~@4 x ~@3 x ~ x!3 ~@3", E: "~@2 x ~ x!2 ~@2 x ~@2 x ~@4",
  F: "~@2 x ~ x!2 ~@2 x ~@2 x!2 ~@3",
})).gain(0.72)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~ [~@9 x ~@6]!70 ~@2>").gain(0.4)

// drums · clap
const clap = s("cp").struct("<~ [~ x ~ x]!34 [~ x ~@2] [~ x ~ x]!26 [~ x ~@2] [~ x ~ x]!7 [~ x ~@2] ~@2>").gain(0.72)

// drums · low tom
const low_tom = s("lt").struct("<~@23 A ~@7 B ~@3 C ~@10 A ~@7 A ~@7 B ~@7 B ~@2>".pickRestart({
  A: "~@7 x", B: "~@15 x", C: "~@11 x ~@4",
})).gain(0.72)

// drums · hihat
const hihat = s("hh").struct(`<
  ~ A@3 B A@3 B A@3 B A@3 B A@3 B A@3 C D E D E D F G C D E H A@3 B A@3 B A@3 C D E D E D F G ~@18
>`.pickRestart({
  A: "x ~ x ~ x!3 ~ x!3 ~ x ~ x ~", B: "x ~ x ~ x!3 ~ x!3 ~ x ~@3", C: "~@2 x!14", D: "x!14 ~@2", E: "x!16",
  F: "x!12 ~ x!3", G: "~ x!6 ~@2 x!4 ~@3", H: "x!9 ~@7",
})).gain(0.4)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~ A@3 B A@3 B A@3 B A@3 B A@3 B A@3 ~@12 A@3 B A@3 B A@3 ~@26>".pickRestart({
  A: "~ x ~ x ~@3 x ~@3 x ~ x ~ x", B: "~ x ~ x ~@3 x ~@3 x ~ x ~@2",
})).gain(0.24)

// drums · mid tom
const mid_tom = s("mt").struct("<~@23 A ~@7 B ~@3 C ~@10 A ~@15 B ~@7 B ~@2>".pickRestart({
  A: "~@13 x ~@2", B: "~@7 x", C: "~@9 x!2 ~@5",
})).gain(0.72)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@4 A ~@3 A ~@3 A ~@3 A ~@3 A ~@4 A ~ A ~ A ~ B ~ A ~@5 A ~@3 A ~@4 A ~ A ~ A ~ B C D@3 C D@3 C D@3 C D@3 ~@2
>`.pickRestart({
  A: "~@7 x", B: "~@7 x ~@8", C: "~ x!7", D: "x!8",
})).gain(0.48)

// drums · high tom
const high_tom = s("ht").struct("<~@31 [~@13 x ~@2] ~@38 [~@13 x ~@2] ~@2>").gain(0.72)

// drums · crash
const crash = s("cr").struct("<~@24 A ~@5 B A@2 ~@14 A ~@5 B A@2 ~@3 A ~@3 A ~@3 A ~@3 A ~>".pickRestart({
  A: "x", B: "~@3 x",
})).gain(0.64)

// drums · tambourine
const tambourine = s("tb").struct("<~@36 [~@3 x]!11 ~@8 [x ~ x ~ x ~ x ~ x!3 ~ x!4]!16 ~@2>").gain(0.4)

// drums · tambourine · soft notes
const tambourine_soft = s("tb").struct("<~@55 [~ x ~ x ~ x ~ x ~@3 x ~@4]!16 ~@2>").gain(0.24)

// drums · cabasa
const cabasa = s("cabasa:4").struct(`<
  ~
  [x ~ x ~ x!3 ~ x!3 ~ x ~ x ~]!34
  [x ~ x ~ x!3 ~ x!3 ~@5]
  [x ~ x ~ x!3 ~ x!3 ~ x ~ x ~]!35
  ~@2
>`).gain(2.03)

// drums · cabasa · soft notes
const cabasa_soft = s("cabasa:4").struct(`<
  ~
  [~ x ~ x ~@3 x ~@3 x ~ x ~ x]!34
  [~ x ~ x ~@3 x ~@3 x ~@4]
  [~ x ~ x ~@3 x ~@3 x ~ x ~ x]!35
  ~@2
>`).gain(1.22)

stack(
  bass, acoustic_guitar_steel, distortion_guitar, rock_organ, lead_1_square, bass_2, kick, snare, snare_soft, clap,
  low_tom, hihat, hihat_soft, mid_tom, open_hat, high_tom, crash, tambourine, tambourine_soft, cabasa, cabasa_soft
)