// Real Sugar — Roxette
// 126 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 99 bars on a 16-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 · fretless bass
const bass = note(`<
  ~@23 A B C D E B C D E C F ~@9 A B C D E B C D E B C D E B C D E C G ~@14 A B C D E B C D E B C D E B C D E C H ~@4
>`.pickRestart({
  A: "~@12 c#2@3 ~", B: "g#1 ~ g#1 ~ g#1 ~ g#1 ~ g#1 ~ g#1 ~ g#1 ~ g#1 ~", C: "e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~ e1 ~",
  D: "c#2 ~ c#2 ~ c#2 ~ c#2 ~ c#2 ~ c#2 ~ c#2 ~ c#2 ~", E: "f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~",
  F: "c#2 ~ c#2 ~ c#2 ~ c#2 ~ f#2@2 ~@6", G: "c#3 ~ c#3 ~ c#3 ~ c#3 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~",
  H: "c#2 ~ c#2 ~ c#2 ~ f#2 ~@9",
})).s("gm_fretless_bass").gain(0.69)

// chords · synth strings 1
const synth_strings_1 = note("<~@24 A@8 B@2 ~@10 A@16 B@2 ~@15 A@16 C@2 ~@4>".pickRestart({
  A: "[d#4 ~@2 a#3, b3 c#4, ~ e4@2 ~]/4", B: "[[b3,e4]@7 [g#3,c#4]@5 [c#4,f#4] ~@3]/2",
  C: "[[b3,e4]@7 [g#3,c#4]@4 ~@5]/2", // E5 C#5
})).s("gm_synth_strings_1").gain(0.46).pan(0.4)

// chords · bandoneon
const bandoneon = note(`<
  ~@15 A B C D E@2 ~@3 F ~ F ~ F ~ F ~@4 G H I J K@2 L ~@2 F ~ F ~ F ~ F ~ M N F ~ M N F ~@4 O P Q R O P Q ~ S L S L ~@2
  F ~ F ~ F ~ F ~ M N F ~ M N F ~@7
>`.pickRestart({
  A: "~@10 b3 ~ c#4 ~ b3 ~", B: "c#4 ~ d#4 ~@7 b3 ~ [b3,d#4] ~ [b3,e4] ~",
  C: "[b3,d#4] ~ [a3,c#4] ~ [a3,c#4] ~ [a3,c#4]@3 ~ [f#3,b3] ~ a3@2 [f#3,b3] ~, ~@12 c#4 ~@3", // B A B5
  D: "[a3,c#4] ~ [b3,d#4] ~ b3@2 ~@4 b4 ~ d#5 ~ e5 ~", E: "[d#5 ~ c#5 ~ c#5 ~ c#5@3 ~ b4 ~ b4 ~ b4@4 ~@14]/2",
  F: "~@4 [b4,d#5]@3 ~ [a#4,c#5] ~ [g#4,b4]@2 ~@4", G: "~@10 b3 ~ b3 ~ b3 ~", H: "b3 ~ f#3@2 ~@6 b3 ~ b3 ~ b3 ~",
  I: "b3 ~ a3 ~ a3 ~ a3@2 ~@8", J: "c#4 ~ d#4 ~ b3@2 ~@4 [b3,d#4] ~ [b3,d#4] ~ [b3,d#4] ~",
  K: "[[b3,d#4] ~ [a3,c#4] ~ [a3,c#4] ~ [a3,c#4]@3 ~ [g#3,b3] ~ [g#3,b3] ~ [f#3,b3]@4 ~@2 [b3,e4] ~ [b3,f#4] ~ [b3,e4] ~ [b3,d#4] ~ [b3,e4] ~ [b3,d#4] ~]/2", // B A G#m B5 E5 B5 E5 B …
  L: "[b3,e4] ~ [b3,d#4] ~ [b3,e4] ~ [b3,d#4] ~ [b3,e4] ~ [b3,d#4] ~ [b3,e4] ~@3", // E5 B E5 B E5 B E5
  M: "~@4 [b4,d#5]@3 ~ [a#4,c#5] ~ [g#4,b4]@2 a#3@4, ~@2 b3 ~", N: "g#3", O: "d4@7 ~ e4@7 ~", P: "e4@13 ~ e4@2",
  Q: "~@2 d4 ~ a3@3 ~ [c4,f4]@6 ~@2", R: "[d4,f#4]@15 ~",
  S: "~@4 [b3,e4] ~ [b3,f#4] ~ [b3,e4] ~ [b3,d#4] ~ [b3,e4] ~ [b3,d#4] ~", // E5 B5 E5 B E5 B
})).s("gm_bandoneon").gain(0.41).pan(0.4)

// chords · orchestral harp
const orchestral_harp = note(`<
  ~@2 A B A B A B A B A B A B A B A B A B A B ~@12 A B A B A B A B ~@29 A B A C ~@24
>`.pickRestart({
  A: "[b3,d#4,f#4] ~ [b3,d#4,f#4] ~ [b3,d#4,f#4] ~ [b3,d#4,f#4] ~ [b3,d#4,f#4] ~ [b3,d#4,f#4] ~ [b3,d#4,f#4] ~ [b3,d#4,f#4] ~", // B
  B: "[a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~", // A
  C: "[a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~ [a3,c#4,e4] ~", // A C#m A
})).s("gm_orchestral_harp").gain(0.39).pan(0.6)

// other · guitar harmonics · D
const guitar_harmonics = note(`<
  ~@12
  [~@2 b2@5 ~ e4@2 d#4@5 ~, ~@2 b3@13 ~]
  ~@29
  [b3 b2]!2
  ~@26
  [~@2 b3@5 ~ [d2,d3]@8, e3@7 ~@9]
  ~@28
>`).s("gm_guitar_harmonics").gain(0.25).pan(0.6)

// chords · lead 8 bass lead
const lead_8_bass_lead = note(`<
  A B A B A B A B A B A B A B A B A B A B A B C@2 ~@14 A D A B C@2 ~@18 E@2 F@2 E@2 F@2 G A B A B C@2 ~@17 H I@2 J ~
>`.pickRestart({
  A: "b1@3 f#1", B: "a1@5 e2@2 d#2", C: "b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~ b1 ~", D: "a1 [e1,e2]",
  E: "[d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~", // D5
  F: "[e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~", // A5
  G: "[e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~ [e3,b3] ~", // E5
  H: "~@6 f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~", I: "f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~",
  J: "f#2 ~ f#2 ~ f#2 ~ f#2 ~ f#2 ~@7",
})).s("gm_lead_8_bass_lead").gain(0.24).pan(0.4)

// other · piano
const piano = note("<~@16 A@2 B ~@16 C@3 D@5 ~@28 E@5 ~@22 F>".pickRestart({
  A: "[~@5 b3@4 a3@4 f#3 a3 f#3]/2", B: "a3 b3@3 ~@4", C: "[~@5 b3@4 f#3@4 b3@4 a3@7]/3",
  D: "[c#4 d#4 b3@7 a3@4 g#3@2 f#3@3 b3@15 ~@7]/5", E: "[~@2 b3@15 ~ b3@15 ~@7]/5", F: "~@14 [e4,a4,f5,g#5] ~",
})).s("gm_piano").gain(0.05)

// chords · distortion guitar
const distortion_guitar = note(`<
  ~@24 A B C D A B C D E@2 ~@10 A B C D A B C D A B C D A B C D F@2 G@2 H@2 G@2 H@2 I ~@6 A B C D A B C D A B C D A B C
  D J@2 ~@4
>`.pickRestart({
  A: "[g#2,d#3,g#3]", B: "[e2,b2,e3]", C: "[c#2,c#3,g#3,c#4]", D: "[f#2,c#3,f#3]",
  E: "[[e2,e3,b3]@3 ~ [e2,e3,b3]@3 ~ [e2,e3,b3] ~ [e2,e3,b3]@3 ~ [c#2,c#3,g#3]@10 [f#2,f#3,c#4,f#4]@2 ~@6]/2", // E5 C#5 F#5
  F: "[[e2,e3,b3]@3 ~ [e2,e3,b3]@3 ~ [e2,e3,b3] ~ [e2,e3,b3]@3 ~ [c#2,c#3,g#3]@10 [f#2,c#3,f#3,c#4]@8]/2", // E5 C#5 F#5
  G: "[~@3 e4@13, ~ a3@7]/2", H: "[~@3 [b3,e4]@13, ~ a3@7]/2", I: "e2@5 ~ b2@2 d3@7 ~, [b3,e4,g#4]@15 ~",
  J: "[[e2,e3,b3]@3 ~ [e2,e3,b3]@3 ~ [e2,e3,b3] ~ [e2,e3,b3]@3 ~ [c#2,c#3,g#3]@8 [f#3,c#4]@4 ~@6]/2", // E5 C#5 F#5
})).s("gm_distortion_guitar").gain(0.57).pan(0.4)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~@24 A@2 B C A@2 B C ~@12 A@2 B C A@2 B C A@2 B C A@2 B C ~@17 A@2 B C A@2 B C A@2 B C A@2 B C ~@6
>`.pickRestart({
  A: "[g#3,b3]@5 ~ [g#3,b3]@5 ~ [g#3,b3]@3 ~", B: "[g#3,c#4]@5 ~ [g#3,c#4]@5 ~ [g#3,c#4]@3 ~",
  C: "[a#3,c#4]@5 ~ [a#3,c#4]@5 ~ [a#3,c#4]@3 ~", // A#m
})).s("gm_acoustic_guitar_steel").gain(0.43).pan(0.4)

// chords · lead 2 sawtooth
const lead_2_sawtooth = note(`<
  A B C D@2 E A B A B A B A B A B A B A B C E ~@2 F G H I F G H I J@2 K L@2 M A N A N ~@2 F G H I F G H I F G H I F G H
  I J@2 ~ O P ~@2 Q R ~@2 C D@2 S ~@2 F G H I F G H I F G H I F G H I T@2 ~@4
>`.pickRestart({
  A: "b1@3 f#1", B: "a1@5 e2@2 d#2", C: "~ e5 d#5 [f#1,b4], b1@3 ~",
  D: "[a4@2 c#5 b4@2 e2@2 d#2 ~@2 e5@2 d#5@2 [f#1,b4]@2, a1@5 f#4@5 ~@6, ~@4 b1@3 ~]/2", // B5
  E: "a4@2 c#5 ~@2 e2@2 d#2, a1@5 ~@3, ~@3 b4@5", F: "g#2", G: "e2", H: "c#2", I: "f#2", J: "[e2@7 c#2@5 f#2 ~@3]/2",
  K: "~ e5 d#5 b4", L: "[a4@2 c#5 b4@2 f#4@5 e5@2 d#5@2 b4@2]/2", M: "a4@2 c#5 b4@5", N: "a1 e2",
  O: "~@6 a3 ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~", // D5
  P: "[e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~@5", // A5
  Q: "~@6 [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~ [d3,a3] ~", // D5
  R: "[e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ e3 ~@5", S: "a4@2 c#5 b4@5, a1@5 ~@3", T: "[e2@7 c#2@4 ~@5]/2",
})).s("gm_lead_2_sawtooth").gain(0.33)

// chords · lead 2 sawtooth · soft notes
const lead_2_sawtooth_soft = note("<~@63 A B C ~ D E C ~@29>".pickRestart({
  A: "~@4 [d3,a3] ~ d3 ~@9", B: "~@12 [e3,a3] ~ [e3,a3] ~", C: "[e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~ [e3,a3] ~@7",
  D: "~@4 [d3,a3] ~@11", E: "~@10 a3 ~ [e3,a3] ~ [e3,a3] ~",
})).s("gm_lead_2_sawtooth").gain(0.16)

// other · pad sweep
const pad_sweep = note("<~@5 A ~@7 B ~@7 A C@2 ~@18 C@2 ~@31 C@2 ~@22>".pickRestart({
  A: "~@6 b5@9 ~", B: "~ b5", C: "b4/2",
})).s("gm_pad_sweep").gain(0.4).pan(0.3)

// other · lead 7 fifths
const lead_7_fifths = note("<~@5 A ~@7 B@2 ~@6 C ~@77>".pickRestart({
  A: "~@2 a5 b4 a5@3 ~", B: "[~@2 a5 b4 a5@6 ~@6]/2", C: "~@4 a5@2 b4@2 a5@7 ~",
})).s("gm_lead_7_fifths").gain(0.33)

// drums · rim
const rim = s("rim").struct("<~@2 [x!8]!12 ~@85>").gain(0.2)

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

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

// drums · snare · soft notes
const snare_soft = s("sd").struct(`<
  ~@15 A ~ A ~ A ~ A ~@2 B ~ B ~ B ~ B ~@8 A ~ A ~@10 B ~ B ~ B ~ B ~@3 C@8 ~@2 A ~ A ~@10 B ~ B ~ B ~ B ~@7
>`.pickRestart({
  A: "~@7 x ~@8", B: "~@6 x!2 ~@8", C: "~ x ~ x",
})).gain(0.33)

// drums · clap
const clap = s("cp").struct("<~@14 A@8 ~@2 A@9 B ~@4 A@4 ~@2 A@26 ~ A@4 ~@2 A@17 B ~@4>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2",
})).gain(0.52)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@2 A@12 ~@13 B@2 ~ B ~@15 B ~@9 B@5 ~@7 C ~@10 B ~ B ~ B@5 ~@11>".pickRestart({
  A: "~ x", B: "~ x ~@6", C: "~@5 x ~@2",
})).gain(0.26)

// drums · low tom
const low_tom = s("lt").struct("<~@37 A ~@13 B ~@24 C ~@7 B ~@14>".pickRestart({
  A: "~@3 x", B: "~@3 x ~@4", C: "~ x",
})).gain(0.66)

// drums · crash
const crash = s("cr").struct(`<
  ~@14 A ~ A@7 ~ A ~@3 A ~@9 A@5 ~ A ~@7 A ~@3 A ~@13 A@6 ~ A ~@7 A ~@3 A ~@9
>`.pickRestart({
  A: "x",
})).gain(0.59)

// drums · ride
const ride = s("rd").struct("<~@14 A@8 ~@16 A@4 ~@29 A@4 ~@2 B C@16 D ~@4>".pickRestart({
  A: "x!8", B: "~ x!3", C: "x!4", D: "x!2 ~@2",
})).gain(0.46)

stack(
  bass, synth_strings_1, bandoneon, orchestral_harp, guitar_harmonics, lead_8_bass_lead, piano, distortion_guitar,
  acoustic_guitar_steel, lead_2_sawtooth, lead_2_sawtooth_soft, pad_sweep, lead_7_fifths, rim, kick, snare, snare_soft,
  clap, hihat, hihat_soft, low_tom, crash, ride
)