// Playboy Mommy — Amos, Tori
// 104 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: ch 14 "Slide Guitar" named as a guitar, played on electric guitar clean (its vibraphone patch is not one)
// note: Full arrangement: all 105 bars on a 24-step grid, each part at one level. Source detail keeps the original performance.
setcpm(104/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 · "Bosie"
const piano = note(`<
  ~@8 A B C D E F G H I J K L M N O P@2 Q R S T U@2 V W Q R X Y Z AA AB AC AD AE AF AG AH AE AI AJ AK AL AM M N O P@2 Q
  R S T U@2 V AN AO AP AQ AR@3 AS AR@3 AS AT AU AV AW AX AY AZ BA BB BC@2 BD@4 BE@3 BF@2 BG@3 BH BI@3 ~@2
>`.pickRestart({
  A: "[a4,e5]@19 ~@5", B: "[f4,c5]@19 ~@5", C: "c5@19 ~@5", D: "~@9 g4@7 ~@2 g3@5 ~", E: "[a3,e4]@5 ~ a3@5 ~",
  F: "[f3,c4]@14 ~ f4@2 ~ [f3,c4]@5 ~", G: "[c3,g3]@14 ~ c4@7 ~@2", H: "~@18 b3@5 ~, [g3,d4]@7 ~@5, ~@3 [b4,d5]@7 ~@2",
  I: "[a3,e4]@14 ~ a3@7 ~@2", J: "[f3,c4]@7 ~@2 c4@2 ~ f4@10 ~@2", K: "[c3,g3]@10 ~@2 c4@5 ~ c3@5 ~", L: "g3@19 ~@5",
  M: "[a2,d4]@4 e2 ~ [g2,b3]@2 ~ [a2,c4]@10 ~@5", N: "f2@2 ~ c2@2 ~ [d2,g3,c4]@2 ~ [a3,c4]@14 ~, d4@5 ~@4 f2@10 ~@5",
  O: "[c4,e4]@7 ~@2 [f4,d5]@2 ~ [e4,c5]@2 ~ [e4,c5]@2 ~ [e4,c5]@2 ~ [e4,c5]@2 ~, c2@9 ~@3 c3@10 ~@2", // C Dm C
  P: "[[e4,c5]@5 ~ [d4,b4]@6 g3@2 ~ g2@2 ~ b2@2 ~@7 e2@2 ~ [g2,b3]@2 ~ [a2,c4]@10 ~@5, g2@10 ~@5 e4@6 a2@5 ~@22, ~@24 c4@5 ~@19]/2", // C G Am
  Q: "~@9 [a3,c4]@5 ~ b3@2 ~ [f2,f3]@5 ~, f2@2 ~, ~@6 c3@17 ~, ~@3 f3@3 ~@2", // Am F
  R: "c3@10 ~@2 c3@2 ~ b2@2 ~ a2@5 ~, [c2,g2]@23 ~, c4@19 ~@5", S: "[g2,b3,d4]@19 ~@5",
  T: "d4@6 g2@2 ~ [c4,a4]@14 ~, a2@5 ~@4 a2@10 ~@5", // F
  U: "[f2@2 ~ c2@2 ~ d2@2 ~ [f2,g4,c5]@10 ~@11 [e4,c5]@2 ~ [f4,d5]@2 d5 [e4,c5]@11 ~, f4@7 ~@14 [e4,c5]@8 ~@19, ~@24 c3@19 ~@5]/2", // Fsus2 C Dm C
  V: "e4@5 ~ e4@6 ~@3 d3@2 ~ g2@5 ~, c5@11 ~, g2@15 e4@7 ~@2, ~@3 b4@8 ~, ~@12 g3@11 ~",
  W: "a2@2 ~ e2@2 ~ [g2,b3]@2 ~ [a2,c4]@10 ~@5, c4@5 ~@19", X: "[g2,d3]@5 ~@7",
  Y: "a2@10 ~@2 a2@2 ~ c3@2 ~ d3@2 ~ e3@2 ~", Z: "[f2,f3]@7 ~@2 f2@2 ~ f3@10 ~@2", AA: "c3@5 ~ c4@5 ~",
  AB: "g2@7 ~@2 g2@5 ~ d3@2 ~ g3@5 ~", AC: "a2@5 ~ a2@5 ~, [e3,a3]@11 ~",
  AD: "~@15 f5@2 ~ [f2,c3,f4,c5]@5 ~, [f2,c3]@17 ~@7", AE: "[c2,g2]@14 ~ c3@7 ~@2", AF: "~@18 b2@5 ~, [g2,d3,a3]@23 ~",
  AG: "[a2,e3]@5 ~ a2@5 ~", AH: "[f2,c3]@14 ~ f3@2 ~ [f2,c3]@5 ~", AI: "~@18 b2@5 ~, [g2,d3]@7 ~@5, ~@3 [b3,d4]@7 ~@2",
  AJ: "[a2,e3]@14 ~ a2@7 ~@2", AK: "[f2,c3]@7 ~@2 c3@2 ~ f3@10 ~@2", AL: "[c2,g2]@10 ~@2 c3@5 ~ c2@5 ~",
  AM: "g2@19 ~@5", AN: "~@9 b3@14 ~, [a2,e3]@19 ~@5, ~@3 [c4,e4]@20 ~", AO: "[f2,c3,a3,d4]@19 ~@5",
  AP: "[c2,g2]@19 ~@5", AQ: "[g2,d3]@19 ~@5",
  AR: "[~@3 e5@2 ~ a5@2 e5@2 a5@2 [a5,c6]@3 ~ [g5,b5]@3 ~@8 [f4,a4]@7 ~@2 [a4,c5]@3 ~ [g4,b4]@3 ~@8 [e4,g4]@7 ~@2 [c4,e4]@3 ~ [d4,f4]@3 ~ [c4,e4]@3 ~, [a2,e3]@19 ~ [e5,g5]@6 ~@18 [f4,a4]@6 ~@22, ~@24 [f2,c3]@19 ~@5 [c2,g2]@19 ~@5]/3", // Am G F Am G Em C Dm …
  AS: "~@3 c4@2 ~ b3@2 g4@2 b3@2 a3@2 ~ [b3,g4]@7 ~@2, [g2,d3]@19 ~@5, g4 ~@2", AT: "~@6 a3@5 ~, [a2,e3]@11 ~",
  AU: "~@3 [f4,a4]@5 ~ [e4,g4]@2 ~ [d4,f4]@2 ~@4 f2@5 ~, c3@23 ~, f2@14 ~ [c4,e4]@7 ~@2", // F Em Dm C
  AV: "~@6 c3@5 ~, [c2,g2]@11 ~", AW: "~@18 g2@5 ~, [b3,d4]@19 ~@5, g2@2 ~, ~@9 g3@14 ~",
  AX: "~@3 [c4,e4]@7 ~@2 [e4,g4]@2 ~ [d4,f4]@5 ~@4, [a2,e3]@11 ~, ~@6 a3@5 ~", // C Em Dm A5
  AY: "d6 ~@11 c4@10 ~@2, [f2,c3]@19 ~@5, [f5,c6]@7 ~@5", AZ: "[a2,e3,c4,e4,a4,c5]@5 ~",
  BA: "~ g4@3 g4@7 ~@13, ~ [f2,c3]@20 ~@3, ~ [c4,f4,c5]@10 ~@13", BB: "~@14 [c4,g4]@7 ~@3, ~ [c3,g3]@10 ~",
  BC: "[~@15 [g4,c5]@2 ~@5 g2@5 ~ [a2,d4]@4 e2 ~ [g2,b3]@2 ~ [a2,c4]@10 ~, [d4,g4]@8 ~ [e4,g4]@5 ~@4 d5@7 ~@23, ~@6 g3@5 ~ d3@7 ~@29]/2", // C5 D5 G Am G5 Em
  BD: "[~@4 f2@2 ~ c2@2 ~ [d2,g3,c4]@2 ~ [a3,c4]@14 ~ [c4,e4]@7 ~@2 [f4,d5]@2 ~ [e4,c5]@2 ~ [e4,c5]@2 ~ [e4,c5]@2 ~ [e4,c5]@2 ~ [e4,c5]@5 ~ [d4,b4]@6 g3@2 ~ g2@2 ~ b2@2 ~@7 e2@2 ~ [g2,b3]@2 ~ [a2,c4]@10 ~, ~@4 d4@5 ~@4 f2@10 ~@5 c2@9 ~@3 c3@10 ~@2 g2@10 ~@5 e4@6 a2@5 ~@18, ~@76 c4@5 ~@15]/4", // Csus2 Am C Dm C G Am
  BE: "[~@13 [a3,c4]@5 ~ b3@2 ~ [f2,f3]@5 ~ c3@10 ~@2 c3@2 ~ b2@2 ~ a2@5 ~ [g2,b3,d4]@19 ~, ~@4 f2@16 ~@8 [c2,g2]@23 ~@21, ~@10 c3@17 ~@45, ~@13 f3@9 ~@6 c4@19 ~@25]/3", // Am F G C5
  BF: "[~@4 d4@6 g2@2 ~ [c4,a4]@14 ~ f2@2 ~ c2@2 ~ d2@2 ~ [f2,g4,c5]@10 ~, ~@4 a2@5 ~@4 a2@10 ~@5 f4@7 ~@13]/2", // F Fsus2
  BG: "[~@10 [e4,c5]@2 ~ [f4,d5]@2 d5 [e4,c5]@11 ~ e4@5 ~ e4@6 ~@3 d3@2 ~ g2@5 ~ a2@2 ~ e2@2 ~ g2@2 ~ a2@10 ~, ~ [e4,c5]@8 ~@19 c5@22 ~@22, ~@4 c3@19 ~@5 g2@15 e4@7 ~@2 [c4,g4]@19 ~, ~@17 b4@8 ~@11, ~@40 g3@11 ~@21]/3", // C Dm C C5
  BH: "~@4 f2@2 ~ c2@2 ~ d2@2 ~ f2@10 ~, ~@4 [c4,a4]@19 ~", BI: "[~@4 c3@26 ~ c3@41, ~@5 [c2,g2]@7]/3",
})).s("gm_piano").gain(0.48)

// bass · fretless bass · "Bass"
const bass = note("<~@12 A B C D A B C D ~@24 A B C D A B C D ~@53>".pickRestart({
  A: "a2@5 ~ a2@5 ~", B: "f2@8 ~ f3@2 ~ f2@8 ~ f2@2 ~", C: "c2@5 ~ g2@5 ~", D: "g2@10 ~@2 c3@5 ~ d3@5 ~",
})).s("gm_fretless_bass").gain(0.37)

// chords · acoustic guitar steel · "Acoustic Guitar"
const acoustic_guitar_steel = note("<~@39 A@2 B C ~@7 D ~@49 E ~@4>".pickRestart({
  A: "[~@8 a4@5 ~@3, ~@22 [e3,a3,e4]@17 ~@9]/2", B: "~ [c4,f4]@15 ~@8, [f3,a3]@2 ~", C: "~ [g3,c4]@15 ~@8, [e4,g4]@2 ~",
  D: "~ [g3,c4]@15 ~@8, [c3,e3]@2 ~", E: "~ [c3,g3,c4]@4 ~",
})).s("gm_acoustic_guitar_steel").gain(0.48)

// chords · guitar harmonics · "Chord Reverb"
const guitar_harmonics = note(`<
  ~@52 A B C D A B C D A B C D A B C D A B C D A B C D ~@10 E F G H E F G H E F G H ~@7
>`.pickRestart({
  A: "[a3,d4,a4]@19 ~@5", B: "[c4,f4,c5]@19 ~@5", C: "[c4,e4,g4]@19 ~@5", D: "[c4,g4,b4]@19 ~@5",
  E: "~@4 [a3,d4,a4]@19 ~", F: "~@4 [c4,f4,c5]@19 ~", G: "~@4 [c4,e4,g4]@19 ~", H: "~@4 [c4,g4,b4]@19 ~",
})).s("gm_guitar_harmonics").gain(0.13)

// other · electric guitar clean · "Slide Guitar"
const electric_guitar_clean = note("<~@69 A B C D E F G D ~@10 H I J K L M@2 N I J K L O ~@5>".pickRestart({
  A: "~@3 a4@7 ~@2 a4@3 ~ c5@4 c5@2 d5@2", B: "e5@20 ~ c5@2 ~", C: "e5@3 ~ e5@3 ~ e5@3 ~ e5@8 ~ d5@2 ~", D: "c5@19 ~@5",
  E: "e5@14 ~ c5@5 ~ d5@2 ~", F: "c5@9 ~@2 b4@2 a4@10 ~, ~@9 c5@10 ~@5", G: "a5@3 ~ g5@3 ~ f5@3 ~ e5@3 ~ d5@3 ~ c5@3 ~",
  H: "~@7 a4@7 ~@2 a4@3 ~ c5@4", I: "c5 d5 e5@10", J: "~ c5@2 ~ e5@3 ~ e5@3 ~ e5@3 ~ e5@8", K: "~ d5@2 ~ c5@19 ~",
  L: "~@4 e5@14 ~ c5@5", M: "[~ d5@2 ~ c5@9 ~@2 b4@2 a4@10 ~ a5@3 ~ g5@3 ~ f5@3 ~ e5@3 ~ d5@3 ~, ~@13 c5@10 ~@25]/2",
  N: "c5@3 ~@4 a4@7 ~@2 a4@3 ~ c5@4", O: "~ d5@2 ~@21",
})).s("gm_electric_guitar_clean").gain(0.48)

// other · electric guitar jazz · "Reverb Guitar"
const electric_guitar_jazz = note(`<
  ~@52 A@2 B C D E B C D E B C D E B C D E B C D E B C ~@10 F G H@4 I@4 J@3 ~@6
>`.pickRestart({
  A: "[~@9 a4@11 ~ a4@5 ~ f4@11 ~ f4@2 ~ f4@2 ~ f4@2 ~]/2", B: "g4@7 ~@2 g4@2 ~ g4@5 ~ g4@5 ~",
  C: "~@3 a4@5 ~ c4@2 ~ c4@5 ~ d4@5 ~", D: "c4@5 ~ a4@11 ~ a4@5 ~", E: "f4@11 ~ f4@2 ~ f4@2 ~ f4@2 ~@4",
  F: "~@13 a4@11", G: "~ a4@5 ~ f4@11 ~ f4@2 ~ f4@2",
  H: "[~ f4@2 ~ g4@7 ~@2 g4@2 ~ g4@5 ~ g4@5 ~@4 a4@5 ~ c4@2 ~ c4@5 ~ d4@5 ~ c4@5 ~ a4@11 ~ a4@5 ~ f4@11 ~ f4@2 ~ f4@2 ~ f4@2]/4",
  I: "[~@4 g4@7 ~@2 g4@2 ~ g4@5 ~ g4@5 ~@4 a4@5 ~ c4@2 ~ c4@5 ~ d4@5 ~ c4@5 ~ a4@11 ~ a4@5 ~ f4@11 ~ f4@2 ~ f4@2 ~ f4@2]/4",
  J: "[~@4 g4@7 ~@2 g4@2 ~ g4@5 ~ g4@5 ~@4 a4@5 ~ c4@2 ~ c4@5 ~ d4@5 ~@21]/3",
})).s("gm_electric_guitar_jazz").gain(0.17)

// other · oboe
const oboe = note("<A@2 B C@3 D E ~@28 F G@2 H ~@65>".pickRestart({
  A: "[e4@43 ~@5]/2", B: "a3@19 ~@5", C: "[~@3 d4@14 ~ b3@8 ~ a3@14 ~ c4@16 ~@2 c4@11 ~]/3", D: "f4@2 ~ e4@14 ~ c4@5 ~",
  E: "d4@19 ~@5", F: "~@3 c4@19 ~@2", G: "[a3@10 ~@2 a4@3 ~ g4@3 ~ f4@6 ~ e4@12 ~ e4@3 ~ f4@3 ~]/2",
  H: "g4@14 ~ a4@2 ~ g4@6",
})).s("gm_oboe").gain(0.48)

// other · french horn
const french_horn = note("<A B C D E F G H ~@28 I J C K ~@65>".pickRestart({
  A: "a3@19 ~@5", B: "f3@19 ~@5", C: "c3@19 ~@5", D: "~@9 g3@5 ~ g2@7 ~@2", E: "a2@7 ~@2 c3 d3 e3",
  F: "f3@7 ~@2 a3@7 ~@2 a3@5 ~", G: "c3@14 ~@4 e3@2 ~ f3@2 ~", H: "g3@19 ~@5", I: "a2@19 ~@5", J: "f2@19 ~@5",
  K: "g2@19 ~@5",
})).s("gm_french_horn").gain(0.48)

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

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

// drums · china
const china = s("cr").struct("<~@20 A ~@31 A ~@15 A ~@3 A ~@3 A ~@5 B C D E F ~@3 F ~@3 F ~@3 F ~ F ~@4>".pickRestart({
  A: "x", B: "x ~@5 x ~@5 x ~@6 x ~@4", C: "~ x ~@5 x ~@5 x ~@6 x ~@3", D: "~@2 x ~@5 x ~@5 x ~@6 x ~@2",
  E: "~@3 x ~@5 x ~@5 x ~@6 x ~", F: "~ x ~@4",
})).gain(0.48)

// drums · ride bell
const ride_bell = s("rd").struct(`<
  ~@12 A@3 B A@3 B C B A B A B A B A B A B A B A B A B A B ~@4 A@3 B A@3 B C A@2 B A@3 B A@3 B A@3 B C A@2 B C A@2 B
  ~@10 D@3 E D@3 E D@3 E D@2 F ~@4
>`.pickRestart({
  A: "~ x!3", B: "~ x!2 ~", C: "x!4", D: "~@5 x ~@2 x ~@2 x", E: "~@5 x ~@2 x ~@3", F: "~ x ~@4",
})).gain(0.48)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@20 [x!4]!16 ~@16 [x!4]!24 ~@10 [~@2 x ~@2 x ~@2 x ~@2 x]!14 [~ x ~@4] ~@4>")
  .gain(2.43)

stack(
  piano, bass, acoustic_guitar_steel, guitar_harmonics, electric_guitar_clean, electric_guitar_jazz, oboe, french_horn,
  kick, snare, china, ride_bell, cabasa
)