// I'm Too Sexy — Right Said Fred
// 123 bpm, 4/4, key F major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 97 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(123/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.

// chords · piano
const piano = note(`<
  ~@5 A B C D A B C E A B F D A B F E A B F D A B F E ~@8 A B G E A B G H ~@16 A B C D ~@22 A B F D A B F E I J
>`.pickRestart({
  A: "~@2 [a3,c4]@2 ~ [a3,d4]@2 ~ [a3,c4]@2 ~ [a3,d4]@2 ~ [a3,c4] ~, f3@15 ~", // Am D5 Am D5 Am
  B: "~@2 [a3,c4]@2 ~ [a3,d4]@2 ~ [a3,c4]@2 ~ [a3,d4]@2 ~ [bb3,eb4] ~, f3", // Am D5 Am D5 Eb5
  C: "~@2 [bb3,eb4]@2 ~ [bb3,d4]@2 ~ [bb3,eb4]@2 ~ [bb3,d4]@2 ~ [g3,c4]@2, eb3", // Eb5 Bb Eb5 Bb C5
  D: "~@2 [g3,c4]@2 ~ [g3,d4]@2 ~ [g3,c4]@2 ~ [g3,d4]@2 ~ [a3,c4] ~, c3", // C5 G5 C5 G5 Am
  E: "~@2 [g3,c4]@2 ~ g3@2 ~ [g3,c4]@2 ~ [g3,d4]@2 ~ [a3,c4] ~, c3, ~@5 d4 ~@10", // C5 G5 Am
  F: "~@2 [bb3,eb4]@2 ~ [bb3,d4]@2 ~ [bb3,eb4]@2 ~ [bb3,d4]@2 ~ [g3,c4] ~, eb3", // Eb5 Bb Eb5 Bb C5
  G: "~@2 [bb3,eb4]@2 ~ [bb3,d4]@2 ~ [bb3,eb4]@2 ~ [bb3,d4]@2 ~ c4@2, eb3, ~@14 g3 ~", // Eb5 Bb Eb5 Bb
  H: "~@2 [g3,c4]@2 ~ [g3,d4] ~@2 [g3,c4]@2 ~ [g3,d4]@2 ~ [a3,c4] ~, c3", // C5 G5 C5 G5 Am
  I: "~@2 [a3,c4]@2 ~ [a3,d4]@2 ~ [a3,c4]@2 ~ [a3,d4]@2 ~ [a3,c4]@2, f3@15 ~", J: "f3 ~@7",
})).s("gm_piano").gain(0.36)

// chords · drawbar organ · "Organ 1"
const drawbar_organ = note("<~@29 A@4 B@4 ~@16 A@4 C@4 ~@8 A@4 B@4 ~ A@4 B@4 ~ D@4 B@4 E F>".pickRestart({
  A: "[[f4,a4,d5]@2 c5 ~@3 [f4,a4,d5]@4 c5 ~@3 c5@2 d5@2 c5@2 d5@2 [a4,c5,f5] ~@7 bb4@2 c5@2 bb4 ~@3 [eb4,g4,c5]@4 bb4 ~@3 bb4@2 c5@2 bb4@2 c5@2 bb4 ~@9, ~@14 f4@9 ~@7 [eb4,g4]@4 ~@12 [eb4,g4]@9 ~@9, ~@14 a4@7 ~@43]/4", // Dm F Cm Eb
  B: "[[f4,a4,d5]@2 c5 ~@3 [f4,a4,d5]@4 c5 ~@3 c5@2 d5@2 c5@2 d5@2 [c5,f5] ~@7 bb4@2 c5@2 bb4 ~@3 [eb4,g4,c5]@4 bb4 ~@3 bb4@2 c5@2 bb4@2 c5@2 bb4 ~@9, ~@14 [f4,a4]@9 ~@7 [eb4,g4]@5 ~@11 [eb4,g4]@9 ~@9]/4", // Dm F5 Cm F Eb
  C: "[[f4,a4,d5]@2 c5 ~@3 [f4,a4,d5]@4 c5 ~@3 c5@2 d5@2 c5@2 d5@2 [c5,f5] ~@7 bb4@2 c5@2 bb4 ~@3 [eb4,g4,c5]@4 bb4 ~@3 bb4@2 c5@2 bb4@2 c5@2 bb4 ~@9, ~@14 [f4,a4]@9 ~@7 [eb4,g4]@5 ~@11 [eb4,g4]@8 ~@10]/4", // Dm F5 Cm F Eb
  D: "[[f4,a4,d5]@2 c5 ~@3 [f4,a4,d5]@4 c5 ~@3 c5@2 d5@2 c5@2 d5@2 [a4,c5,f5] ~@7 bb4@2 c5@2 bb4 ~@3 [eb4,g4,c5]@4 bb4 ~@3 bb4@2 c5@2 bb4@2 c5@2 bb4 ~@9, ~@14 f4@9 ~@7 [eb4,g4]@5 ~@11 [eb4,g4]@9 ~@9, ~@14 a4@7 ~@43]/4", // Dm F Cm Eb
  E: "[f4,a4,d5]@2 c5 ~@3 [f4,a4,d5]@4 c5 ~ [f4,a4,d5]@2 c5 ~", F: "[f4,a4,c5] ~@15",
})).s("gm_drawbar_organ").gain(0.22)

// other · synth drum
const synth_drum = note("<~@4 A ~@7 A ~@15 A ~@7 A ~@15 A ~@7 A ~@16 A ~@8 A ~@7 A@2 ~>".pickRestart({
  A: "c4!2 ~ c4 d4!2 ~ d4 f4!2 ~ f4 a4!2 c5!2",
})).s("gm_synth_drum").gain(0.25)

// bass · electric bass finger · "Fingered Bs."
const bass = note(`<
  ~@4 A B@2 C D B@2 C D B@2 C D B@2 C D B@2 C E B@2 C E B@2 F E B@2 F G H@2 I J H@2 I J B@2 C K B@2 I ~ B@2 F E B@2 F G
  H@2 I J L M L N B@2 O P B@2 Q R ~ B@2 C E B@2 C R ~ B@3 S B@2 I S B T
>`.pickRestart({
  A: "~@5 d2 eb2 e2", B: "f1@3 g1 a1 c2 a1 g1", C: "eb2 ~ bb1 ~ eb2 ~ bb1 ~", D: "c2@3 ~@6 c2 d2@2 eb2@2 e2@2",
  E: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ a1@2 g1@2", F: "eb2@3 f1 g1 bb1 g1 f1",
  G: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ eb2@2 e2@2", H: "f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~ f1 ~",
  I: "eb2 ~ eb2 ~ eb2 ~ eb2 ~ eb2 ~ eb2 ~ eb2 ~ eb2 ~", J: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~",
  K: "c2@4 ~@4 f1@2 g1@2 a1@2 c2 ~", L: "gb1@3 ~@13", M: "gb1@3 ~ gb1 ~@11", N: "gb1@3 gb2 ~ gb2 ~ gb2 a1 ~ a1@2 f1@4",
  O: "eb2@2 ~@2 eb2@2 ~@2 eb2 ~@3 eb2@2 ~@2", P: "c2@2 ~@2 eb2 ~@3 c2@2 ~@2 c2@2 c2@2",
  Q: "eb2@2 ~@2 eb2 ~@3 eb2 ~@3 eb2 ~@3", R: "c2 ~ c2 ~ bb1 ~ bb1 ~ a1 ~ a1 ~ g1 ~ g2 ~",
  S: "c2@2 c2@2 d2@2 d2@2 eb2@2 eb2@2 e2@2 e2 ~", T: "f1 ~@7",
})).s("gm_electric_bass_finger").gain(0.44)

// chords · string ensemble 1 · "Strings"
const string_ensemble_1 = note(`<
  ~@21 A ~ B@2 A ~ B@2 ~@8 C@2 D@2 E@2 F@2 A ~ G@2 A ~ G@2 ~@8 C@2 H@2 ~@30 I J
>`.pickRestart({
  A: "[c5,f5]@13 ~@3", B: "[~ g6, [eb5,g5]]/2", C: "[a5@23 ~ a5@3 g5@2 f5@3]/2",
  D: "[g5@6 d5@2 f5@16 eb5@3 d5@2 c5@3]/2", E: "[d5@6 a4@2 c5@16 d5@3 c5@2 g5@3]/2", F: "f5/2", G: "[g5 g5, eb5]/2",
  H: "bb5/2", I: "[c6,a6]", J: "[c6,a6] ~@15",
})).s("gm_string_ensemble_1").gain(0.17)

// drums · kick
const kick = s("bd").struct("<~@5 [x!4]!63 [x!3 ~] [x!4]!27 x>").gain(0.47)

// drums · rim
const rim = s("rim").struct("<[x!4] ~@96>").gain(0.26)

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

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

// drums · clap
const clap = s("cp").struct("<~@29 A@8 ~@16 A@8 ~@8 A@8 ~ A@8 ~@11>".pickRestart({
  A: "~@2 x ~@2 x!2 ~",
})).gain(0.42)

// drums · low tom
const low_tom = s("lt").struct("<~@4 A ~@7 A ~@15 A ~@7 A ~@15 A ~@7 A ~@16 A ~@8 A ~@7 A@2 ~>".pickRestart({
  A: "x!2 ~ x!3 ~ x ~@8",
})).gain(0.37)

// drums · hihat
const hihat = s("hh").struct("<~ [x!2]!2 [x!4] ~ [x!4]!63 [x ~ x ~ x!4] [x!4]!27 x>").gain(0.26)

// drums · mid tom
const mid_tom = s("mt").struct("<~@4 A ~@7 A ~@15 A ~@7 A ~@15 A ~@7 A ~@16 A ~@8 A ~@7 A@2 ~>".pickRestart({
  A: "~@8 x!2 ~ x ~@4",
})).gain(0.32)

// drums · open hat
const open_hat = s("oh").struct("<~@5 [~ x ~ x ~ x ~ x]!63 [~ x ~ x ~@4] [~ x ~ x ~ x ~ x]!27 ~>").gain(0.26)

// drums · high tom
const high_tom = s("ht").struct("<~@4 A ~@7 A ~@15 A ~@7 A ~@15 A ~@7 A ~@16 A ~@8 A ~@7 A B ~>".pickRestart({
  A: "~@12 x!4", B: "~@12 x!2 ~ x",
})).gain(0.32)

// drums · crash
const crash = s("cr").struct("<~@5 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@7 A ~@8 A ~@8 A ~@8 A>".pickRestart({
  A: "x",
})).gain(0.26)

// drums · tambourine
const tambourine = s("tb").struct("<~@5 A@23 B A@39 B A@8 B A@8 B A@9 C>".pickRestart({
  A: "x!8", B: "x!4", C: "x",
})).gain(0.26)

// drums · tambourine · soft notes
const tambourine_soft = s("tb").struct("<~@5 A@23 B A@39 B A@8 B A@8 B A@9 ~>".pickRestart({
  A: "~ x ~ x ~ x ~ x ~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~ x",
})).gain(0.16)

// drums · shaker
const shaker = s("sh").struct(`<
  ~@5 A@2 B C B C A@4 B C B C B C A@2 B C B C A@12 B C B C B C A@2 B C B C A@12 B C B C A D A@20 B C B C A@3 E
>`.pickRestart({
  A: "x!16", B: "x!10 ~ x!5", C: "x!2 ~ x!13", D: "x!9 ~@7", E: "x",
})).gain(0.26)

stack(
  piano, drawbar_organ, synth_drum, bass, string_ensemble_1, kick, rim, snare, snare_soft, clap, low_tom, hihat,
  mid_tom, open_hat, high_tom, crash, tambourine, tambourine_soft, shaker
)