// Borderline — Madonna
// 120 bpm, 4/4, key A 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 128 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 · synth bass 1 · "tk2"
const bass = note(`<
  ~@9 A B C D A B C D A B C D A B C D A B C D A B E F G@8 H@2 I@2 J@2 K L H@2 I@2 J@2 K M A B C D A B C D A B C D A B C
  D A B C D A B E F G@8 H@2 I@2 J@2 K L H@2 I@2 J@2 K L H@2 I@2 J@2 K L H@2 I@2 J@2 K L ~@7
>`.pickRestart({
  A: "d1@2 ~@5 a1 d2 a1 d1@2 ~@3 b1, ~@7 a1", B: "c2 ~ c2 ~@3 b1@6 ~@2 a1 b1", C: "d1@2 ~@5 a1 d2 a1 d1@2 ~@2 a1 b1",
  D: "c2 ~ c2@2 ~@2 b1@2 ~@2 b1@3 a1@3, ~@10 a1 ~@5", E: "d1@2 ~@5 a1 d2 a1 d1 ~@3 d1@2", F: "~@2 d1 ~ d1@2 ~@10",
  G: "[b1@2 ~@2 b1 ~@2 b1!2 ~ b1@2 ~@2 d#1@5 ~ d#1 ~@2 d#1!2 ~ d#1@2 ~@2 e1@5 ~ e1@2 ~ e1!2 ~ e1@2 ~@2 c#1@5 ~ c#1 ~@2 c#1!2 ~ c#1 ~@3 f#1@5 ~ f#1@2 ~ f#1!2 ~ f#1@2 ~@2 g1@5 ~ g1 ~@2 g1 g1@2 g1 ~@3 a1@8 ~ a1 ~@2 e1 f#1 g1 e1 a1@4 ~@5 a1!2 ~ a1@2 b1@2 c2 ~, ~@105 a1@2 ~@21]/8",
  H: "[c#2@3 ~ c#2 ~@2 c#2!2 ~ c#2@2 b1@2 a#1@5 ~ a#1 ~@2 a#1!2 ~ a#1@2 ~@2 g#1 a#1]/2",
  I: "[b1@3 ~ b1@2 ~ b1 a1 ~ a1 ~@3 g#1@4 b1 g#1 e1@2 ~@2 e1@2 f#1@2 g#1@2 b1@2]/2",
  J: "[e1@2 ~@2 e1@2 ~ e1!2 ~ e1@2 ~@2 f#1@4 ~@2 f#1 ~@2 f#1 f#1@2 g1@2 g#1@2 a1@2]/2",
  K: "~@2 a1 ~ a1@6 e1 f#1 a1 f#1 a1@2", L: "~@2 a1 ~ a1@2 ~@2 a1@2 b1@3 c2@2 ~",
  M: "~@2 a1 ~ a1@2 ~@2 a1@2 b1@3 c#2@2 ~",
})).s("gm_synth_bass_1").gain(0.28)

// chords · piano · "tk3"
const piano = note("<~@33 A@8 B@16 ~@24 A@8 B@32 ~@7>".pickRestart({
  A: "[[b2,f#3,b3,d4,f#4]@12 ~@2 [b3,f#4,b4]@12 [b3,f#4,a4]@4 [g3,b3,d4,g4]@15 ~ [a3,e4,a4]@12 [a3,e4,g4]@4 [f#3,a3,c#4,e4,f#4]@16 ~@12 [b3,f#4]@4 [d4,e4]@10 ~@2 [b3,g4]@2 ~ [a3,d4,f#4]@3 [a3,c#4,e4]@10 [a3,a4]@3 [a3,a4]@2 ~, ~@14 f#3@16 ~@16 c#3@15 ~@17 [g3,d4]@15 ~ a2@34, ~@46 g4 ~@47 b3 ~@11 d4 ~@21]/8", // Bm B5 B7 G A5 A7 F#m7 B5 …
  B: "[[c#4,e4,a4]@11 ~@3 [f#3,c#4,f#4]@11 ~ f#3@2 ~ f#3@2 c#3 [f#3,b3,d4]@8 [a3,c#4,e4,f#4]@2 [e3,a3,e4,f#4] ~@3 [g#3,b3]@12 [g#3,b3,d4]@2 ~ [g#3,b3,d4,e4] ~@2 [g3,b3,d4]@13 ~ [d3,a3,d4]@9 ~ d3 ~ e4@2 f#4 ~ [a3,d4,f#4]@4 [a3,c#4,e4] ~ a3@5 ~ a3@2 ~@2 [b3,d4,f#4]@4 [c#4,e4] ~ [a3,c#4,e4]@9 ~@3, ~@26 f#4@14 ~@24 a3 ~@23 [a3,d4]@4 ~@2 b3 ~@5 [c#4,e4]@10 ~@18, ~@26 [c#4,e4]@6 ~@8 g#3 ~@5 [e3,e4]@15 ~@2 e3@12 ~@33 a2@16 ~@4]/8", // A F#5 Bm F#m7 G#m G#dim E7 G …
})).s("gm_piano").gain(0.3)

// chords · piano · "tk3" · soft notes
const piano_soft = note(`<
  ~@37 A@2 B C ~@2 D E ~@3 F ~@2 D E ~@3 F ~@28 A@2 B C ~@2 D E ~@3 F ~@2 D E ~@3 F ~@2 D E ~@3 F ~@2 D E ~@3 F ~@7
>`.pickRestart({
  A: "[~@14 b3@11 ~@7]/2", B: "b3@9 ~@7", C: "~@14 g3 ~", D: "~@7 e3!2 ~@7", E: "~@12 e3 ~@3", F: "~@2 a3 ~@13",
})).s("gm_piano").gain(0.15)

// chords · pad halo · "tk5"
const pad_halo = note(`<
  ~@9 A B C D C E C F A B C D C E C F A B C D C E G@2 ~@24 A B C D C E C F A B C D C E C F A B C D C E G@2 ~@47
>`.pickRestart({
  A: "[d4,f#4,a4]@7 ~", B: "[c4,e4,g4]@4 ~@2 [b3,d4,g4]@9 ~", C: "[d4,f#4,a4]@15 ~",
  D: "[c4,e4,g4]@6 [b3,d4,g4]@4 g4@3 [b3,d4]@2 ~, ~@10 g3@5 ~", E: "[c4,e4,g4]@6 [b3,d4,g4]@9 ~",
  F: "[c4,e4,g4]@6 [b3,d4,g4]@4 [g3,g4]@5 ~", G: "[[d4,f#4,a4]@5 ~@3]/2",
})).s("gm_pad_halo").gain(0.14)

// other · lead 8 bass lead · "tk6"
const lead_8_bass_lead = note("<~@9 A@2 B@2 C@2 D ~@41 A@2 B@2 C@2 D ~@64>".pickRestart({
  A: "[~@2 a4 ~@3 d5 ~@3 a5 ~@3 e5@16 d5 e5]/2", B: "[f#5@31 ~]/2",
  C: "[~@2 a4 ~@3 d5 ~@3 a5 ~@3 e5@8 d5@7 ~ b4 [b4,c5]]/2", D: "a4@5 ~@3",
})).s("gm_lead_8_bass_lead").gain(0.25)

// other · lead 8 bass lead · "tk6" · soft notes
const lead_8_bass_lead_soft = note("<~@15 A@2 ~@46 A@2 ~@63>".pickRestart({
  A: "[~@10 b4 [b4,c5] a4@19 ~]/2", // Cmaj7
})).s("gm_lead_8_bass_lead").gain(0.15)

// chords · synth strings 1 · "tk7"
const synth_strings_1 = note(`<
  ~@17 A ~ B ~ B ~ C ~ A ~ B ~ B ~ C ~@9 D@2 E@2 F@4 D@2 E@2 F@4 ~@8 A ~ B ~ B ~ C ~ A ~ B ~ B ~ C ~@9 D@2 E@2 F@4 D@2
  E@2 F@4 D@2 E@2 F@4 D@2 E@2 G@2 H@8 ~
>`.pickRestart({
  A: "~@2 a4 ~ [a4,a5] ~ [a4,a5] ~ [a4,a5] ~@7", B: "~@2 [a4,a5] ~ [a4,a5] ~ [a4,a5] ~ [a4,d5,a5] ~ [a4,a5] ~@5",
  C: "~@2 a5 ~ [a4,a5] ~ [a4,d5,a5] ~ [a4,a5] ~ [a4,a5] ~@5", D: "[[c#5,e5]@7 [f#4,c#5,f#5]@9, a4@3 ~@5]/2",
  E: "[[f#4,b4,d5]@7 [g#4,b4,e5]@8 ~]/2", // Bm E
  F: "[[e4,g4,b4]@14 [d4,f#4,a4]@14 ~@2 [a4,d5,f#5]@4 e5@2 [a4,c#5,e5]@27 ~, ~@34 c#5 ~@29]/4", // Em D A
  G: "[[e4,g4,b4]@7 [d4,f#4,a4]@7 ~ [a4,d5,f#5]]/2", H: "[~ e5 [c#5,e5]@62, ~@2 c#5 ~ a4@27 ~@97]/8",
})).s("gm_synth_strings_1").gain(0.16)

// chords · synth strings 1 · "tk7" · soft notes
const synth_strings_1_soft = note(`<
  ~@17 A ~ B ~ C ~ D ~ A ~ B ~ C ~ D ~@33 A ~ B ~ C ~ D ~ A ~ B ~ C ~ D ~@48
>`.pickRestart({
  A: "~@2 a5 ~@7 [a4,a5] ~ [a4,a5] ~ a4 ~", B: "~@12 [a4,a5] ~ [a4,a5] ~", C: "~@12 a4 ~ [a4,a5] ~",
  D: "~@2 a4 ~@9 [a4,a5] ~ [a4,a5] ~", // A
})).s("gm_synth_strings_1").gain(0.06)

// other · pad poly · "tk8"
const pad_poly = note("<~@33 A B C D E F ~@42 A B C D E F ~@41>".pickRestart({
  A: "~@2 d4 ~ e4 ~ f#4 ~ b4 ~ f#4 ~ e4 ~ d4 ~", B: "~@2 b3 ~ c#4 ~ d#4 ~ f#4 ~ d#4 ~ c#4 ~ b3 ~",
  C: "~@2 e4 ~ f#4 ~ g4 ~ b4 ~ g4 ~ f#4@2 e4 ~", D: "~@2 a3 ~ b3 ~ c#4 ~ e4 ~ c#4 ~ b3 ~ a3 ~",
  E: "~@2 d4 ~ e4 ~ f#4 ~ a4 ~ f#4 ~ e4 ~ d4 ~", F: "~@2 b3 ~ d4 ~ e4 ~ f#4 ~ e4 ~ d4 ~ d4 ~",
})).s("gm_pad_poly").gain(0.25).pan(0.2)

// chords · epiano1 · "tk9"
const epiano1 = note("<~ A@2 B@2 C@4 ~@3 D ~@3 E F ~@14 G ~@27 D ~@3 E F ~@14 G ~@47>".pickRestart({
  A: "[~@10 a5@2 ~@2 [c#5,f#5]@10 c#5@2 d5@2 e5@3 ~, [c#4,a4,e5]@7 [a#3,f#4]@9, c#5@3 ~@5]/2", // F#5 A D#m
  B: "[d5@6 c#5 b4 ~@4 b4 a4 [g#3,e4,b4]@16 ~@2, [b3,f#4]@4 [a3,f#4,c#5]@3 ~@9]/2", // E B5 F#m
  C: "[[d4,d5]@8 ~@2 [c#4,c#5]@2 [d4,d5]@2 [d4,d5]@10 d4@2 [e4,e5]@2 [f#4,f#5] ~ [a3,f#4,b4,d5,f#5]@4 [e4,e5] ~ [a3,e4,a4,c#5,e5]@26 ~@2, [e3,g4]@13 ~ f#3@12 ~@38, b4@7 ~ [b3,b4]@4 ~@2 a4@14 ~@36, ~@6 d5 ~@9]/4", // D C# D E F# Bm7 E A …
  D: "~@8 d5@7 ~, ~@4 b4 ~@3, ~@8 a4 ~@7", E: "~ d5, ~@8 a4 ~@7", F: "[d4,f#4,a4]@5 ~@3",
  G: "~ [a4,a5] [g4,g5] [f#4,f#5]", // A G F#
})).s("gm_epiano1").gain(0.2)

// chords · epiano1 · "tk9" · soft notes
const epiano1_soft = note("<~@13 A ~@2 B ~@44 A ~@2 B ~@63>".pickRestart({
  A: "[d4,f#4], a4@3 ~@13", B: "~@8 b4@3 ~@5",
})).s("gm_epiano1").gain(0.15)

// other · glockenspiel · "tk11"
const glockenspiel = note("<~ A@2 B@2 C@2 D@2 ~@119>".pickRestart({
  A: "[e6@10 a6@3 ~ f#6@10 c#6@2 d6@2 e6@4]/2", B: "[d6@4 c#6@3 b5@7 ~@2]/2",
  C: "[d6@9 ~@5 d6@9 ~ d6@2 e6@2 f#6 ~ [f#5,f#6]@2]/2", D: "[~@2 [e5,e6] ~ [e5,e6]@23 ~@5]/2",
})).s("gm_glockenspiel").gain(0.25)

// chords · synth brass 1 · "tk13"
const synth_brass_1 = note(`<
  ~@39 A B ~@4 C D E@2 ~@4 C D E@2 ~@30 A B ~@4 C D E@2 ~@4 C D E@2 ~@4 C D E@2 ~@4 C D E@2 ~@7
>`.pickRestart({
  A: "~@2 [g3,b3,d4,g4,b4,d5] ~@2 [g3,b3,d4,g4,b4,d5] ~ [b3,d4,g4,b4,d5] [g3,b3,d4,g4,b4,d5] ~@7", // G
  B: "~@2 [a3,c#4,e4,a4,c#5,e5]!2 ~ [a3,c#4,e4,a4,c#5,e5] ~ [a3,c#4,e4,a4,c#5,e5]!2 ~@7", // A
  C: "~@2 [g4,b4,d5] ~@2 [g4,b4,d5] ~ [g4,b4,d5]!2 ~@7", // G
  D: "~@2 [f#4,a4,d5]!2 ~ [f#4,a4,d5] ~ [f#4,a4,d5]!2 ~@5 [a4,d5,f#5]@2", // D
  E: "[~@2 [a4,c#5,e5] ~ [a4,c#5,e5]@9 ~ [a4,d5,f#5]@4 [a4,c#5,e5] ~ [a4,c#5,e5]@9 ~@3]/2", // A D A
})).s("gm_synth_brass_1").gain(0.3)

// other · lead 8 bass lead · "tk15"
const lead_8_bass_lead_2 = note("<~@9 A ~@5 B@2 ~@40 A ~@5 B@2 ~@63>".pickRestart({
  A: "~@2 a4 ~@13", B: "[~@4 b4 [b4,c5] a4@16 ~@10]/2",
})).s("gm_lead_8_bass_lead").gain(0.18)

// drums · kick
const kick = s("bd").struct(`<
  ~@8 A B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C
  B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C B C ~@7
>`.pickRestart({
  A: "~ x!6 ~", B: "x ~@6 x!2 ~ x ~@3 x ~", C: "~@7 x!2 ~@7",
})).gain(0.35)

// drums · snare
const snare = s("sd").struct("<~@8 A B@7 C B@15 C B@15 C B@7 C B@7 C B@31 C B@7 C B@7 C B@7 D ~@7>".pickRestart({
  A: "~@2 x ~ x ~ x ~ x ~ x ~ x!3 ~", B: "~ x ~ x", C: "~@4 x ~@6 x!2 ~ x ~", D: "~@4 x ~@6 x!2 ~@3",
})).gain(0.35)

// drums · hihat
const hihat = s("hh").struct(`<
  A ~@8 B C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B C B C B C B C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C
  B@3 C B C B C B C B C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@3 C B@2 ~@7
>`.pickRestart({
  A: "x!4", B: "x!5 ~@3 x!5 ~@3", C: "x!5 ~@3 x!5 ~@2 x",
})).gain(0.3)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct(`<
  ~@9 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 ~ C ~ C ~ C ~ 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 C ~ C ~ C ~ C ~ 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 ~@7
>`.pickRestart({
  A: "~@7 x ~@7 x", B: "~@7 x ~@8", C: "~@15 x",
})).gain(0.15)

// drums · mid tom
const mid_tom = s("mt").struct("<~@8 [~ x!5 ~@2] ~@119>").gain(0.15)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@12 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A B@8 ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A B@8 ~@3 A ~@3 A
  ~@3 A ~@3 A ~@3 A ~@3 A ~@3 A ~@11
>`.pickRestart({
  A: "~@15 x", B: "~@7 x ~@8",
})).gain(0.3)

// drums · crash
const crash = s("cr").struct("<~@9 x ~@23 x ~@94>").gain(0.35)

// drums · tambourine
const tambourine = s("tb").struct("<~@9 [~ x ~ x]!112 ~@7>").gain(0.45)

// drums · agogo bells
const agogo_bells = s("agogo:2").struct(`<
  ~@10 A ~ A ~ A ~ A ~@25 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@25 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~
  A ~ A ~ A ~ A ~@9
>`.pickRestart({
  A: "~@7 x",
})).gain(1.9)

// drums · agogo bells
const agogo_bells_2 = s("agogo:4").struct(`<
  ~@9
  [~@8 x!2 ~ x ~@4]!8
  ~@24
  [~@8 x!2 ~ x ~@4]!24
  ~@24
  [~@8 x!2 ~ x ~@4]!32
  ~@7
>`).gain(1.9)

stack(
  bass, piano, piano_soft, pad_halo, lead_8_bass_lead, lead_8_bass_lead_soft, synth_strings_1, synth_strings_1_soft,
  pad_poly, epiano1, epiano1_soft, glockenspiel, synth_brass_1, lead_8_bass_lead_2, kick, snare, hihat, hihat_soft,
  mid_tom, open_hat, crash, tambourine, agogo_bells, agogo_bells_2
)