// Christine Sixteen — Kiss
// 120 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 6 distortion guitar (copy of ch 7 distortion guitar)
// note: Full arrangement: all 89 bars on a 16-step grid, each part at one level. 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 · electric bass pick
const bass = note(`<
  A@4 B C B D@2 C B E F G H I F J@3 B C B D@2 C B E F G H I F J@3 B C B D@2 C B E F G H I F J@3 K L M N K O@2 B C B D@2
  C B E A@4 B C B D@2 C B E F G H I F P@2 Q@2 R
>`.pickRestart({
  A: "e1@2 ~ e1 e1@2 ~ e1", B: "e1@2 ~ e1 e1@2 ~ d2", C: "d2@2 ~ d2 d2@2 ~ e1",
  D: "[~@2 d2@2 ~@2 g1@2 a1@2 a2@2 g2@2 e1@5 ~@3 e1@2 e1@4 ~@2 d2@2]/2", E: "~ d2 ~ g1 a1!2 g1 e1",
  F: "e1!2 b1!2 e2!3 d2", G: "d2!2 a2!2 d3!3 a1", H: "a1!2 e2!2 a2!3 g1", I: "g1!3 d2!4 e1",
  J: "[d2@2 d2@2 a2@2 a2@2 d3@2 d3@2 d3@2 g1@7 ~ d2@7 ~ a1@11 ~ a1@2 a1@2 a1@2]/3", K: "b1@4 ~@2 b1@2 b1@5 ~ b1@2",
  L: "~ b1 b1@2 ~ b1 b1@2", M: "e1@4 ~@2 e1@2 e1@5 ~ e1@2", N: "~ e1 e1@2 ~ e1 e1@2", O: "[~ b1!2 b1@2 b1@8 b1!3]/2",
  P: "[d2@2 d2@2 a2@2 a2@2 d3@2 d3@2 d3@2 g1@7 ~ d2@7 ~@3]/2", Q: "[e2 d2 b1 e1@13]/2", R: "e1 ~@3",
})).s("gm_electric_bass_pick").gain(0.64)

// chords · distortion guitar
const distortion_guitar = note(`<
  A@4 B C D E F C D E G@8 B C D E F C D E G@8 B C D E F C D E G@8 H I J K H L@2 B C D E F C D E A@4 B C D E F C D E M@7
  N@2 O
>`.pickRestart({
  A: "e2@2 ~ e2 e2@2 ~ e2", B: "e2@2 [e3,b3,e4]@2 [e3,c#4,e4]@2 ~@2 [e3,b3,e4]@7 ~",
  C: "~ [d3,a3,d4] [d3,b3,d4] ~ [d3,a3,d4]@3 ~", D: "~ [e3,b3,e4] [e3,c#4,e4] ~ [e3,b3,e4]@3 [d3,a3,d4]",
  E: "~ [d3,a3,d4] ~ [g2,d3,g3] [a2,e3,a3]!2 [g2,d3,g3] [e2,b2,e3]", // D5 G5 A5 G5 E5
  F: "~@2 [e3,b3,e4]@2 [e3,c#4,e4]@2 ~@2 [e3,b3,e4]@7 ~", // E5 C#m E5
  G: "[[e3,b3,e4]@2 [e3,b3,e4]@2 [e3,c#4,e4]@4 [e3,b3,e4]@6 [d3,a3,d4]@4 [d3,a3,d4]@2 [d3,b3,d4]@4 [d3,a3,d4]@6 [a2,e3,a3]@4 [a2,e3,a3]@2 [a2,f#3,a3]@4 [a2,e3,a3]@6 [g2,d3,g3]@8 [d3,a3,d4]@8 [e3,b3,e4]@4 [e3,b3,e4]@2 [e3,c#4,e4]@4 [e3,b3,e4]@6 [d3,a3,d4]@4 [d3,a3,d4]@2 [d3,b3,d4]@4 [d3,a3,d4]@6 [g2,d3,g3]@8 [d3,a3,d4]@6 ~@2 [a2,e3,a3]@12 [a2,a3] ~ [a2,a3] ~ [a2,a3] ~]/8", // E5 C#m E5 D5 G D5 A5 D …
  H: "[b2,f#3,b3]@4 ~@2 [b2,f#3,b3]@2 [b2,f#3,b3]@5 ~ [b2,f#3,b3]@2", // B5
  I: "~ [b2,f#3,b3] [b2,f#3,b3]@2 ~ [b2,f#3,b3] [b2,f#3,b3]@2", // B5
  J: "[e2,b2,e3]@4 ~@2 [e2,b2,e3]@2 [e2,b2,e3]@5 ~ [e2,b2,e3]@2", // E5
  K: "~ [e2,b2,e3] [e2,b2,e3]@2 ~ [e2,b2,e3] [e2,b2,e3]@2", // E5
  L: "[~ [b2,f#3,b3]!2 [b2,f#3,b3]@2 [b2,f#3,b3]@8 [b2,f#3,b3]!3]/2", // B5
  M: "[[e3,b3,e4]!2 [e3,c#4,e4]@2 [e3,b3,e4]@3 [d3,a3,d4]@2 [d3,a3,d4] [d3,b3,d4]@2 [d3,a3,d4]@3 [a2,e3,a3]@2 [a2,e3,a3] [a2,f#3,a3]@2 [a2,e3,a3]@3 [g2,d3,g3]@4 [d3,a3,d4]@4 [e3,b3,e4]@2 [e3,b3,e4] [e3,c#4,e4]@2 [e3,b3,e4]@3 [d3,a3,d4]@2 [d3,a3,d4] [d3,b3,d4]@2 [d3,a3,d4]@3 [g2,d3,g3]@4 [d3,a3,d4]@3 ~@2]/7", // E5 C#m E5 D5 G D5 A5 D …
  N: "[e3 d3 b2 [e2,b2,e3]@13]/2", O: "[e2,b2,e3] ~@3",
})).s("gm_distortion_guitar").gain(0.44)

// chords · piano
const piano = note(`<
  A@4 B C D ~ B C D ~@9 B C D ~ B C D ~@9 B C D ~ B C D ~@16 B C D ~ B C D ~ A@4 B C D ~ B C D ~@11
>`.pickRestart({
  A: "[e4,g#4,b4]!8", B: "[e4,g#4,b4]!7 [d4,f#4,a4]", C: "[d4,f#4,a4]!7 [e4,g#4,b4]", D: "[e4,g#4,b4]!7 ~",
})).s("gm_piano").gain(0.64)

// chords · distortion guitar
const distortion_guitar_2 = note(`<
  A@4 B C D E F C D E G@8 B C D E F C D E G@8 B C D E F C D E G@8 H I J K H L@2 B C D E F C D E A@4 B C D E F C D E M@7
  N@2 O
>`.pickRestart({
  A: "e2@2 ~ e2 e2@2 ~ e2", B: "~ [b3,e4,g#4] [b3,e4,a4] ~ [b3,e4,g#4]@3 ~, e2 ~@3",
  C: "~ [a3,d4,f#4] [a3,d4,g4] ~ [a3,d4,f#4]@3 ~", D: "~ [b3,e4,g#4] [b3,e4,a4] ~ [b3,e4,g#4]@3 [d3,a3,d4]",
  E: "~ [d3,a3,d4] ~ [g2,d3,g3] [a2,e3,a3]!2 [g2,d3,g3] [e2,b2,e3]", F: "~ [b3,e4,g#4] [b3,e4,a4] ~ [b3,e4,g#4]@3 ~",
  G: "[[b3,e4,g#4]!2 [c#4,e4,a4]@2 [b3,e4,g#4]@3 [a3,d4,f#4]@2 [a3,d4,f#4] [b3,d4,g4]@2 [a3,d4,f#4]@3 [e3,a3,c#4]@2 [e3,a3,c#4] [f#3,a3,d4]@2 [e3,a3,c#4]@3 [g2,d3,g3]@4 [d3,a3,d4]@4 [b3,e4,g#4]@2 [b3,e4,g#4] [c#4,e4,a4]@2 [b3,e4,g#4]@3 [a3,d4,f#4]@2 [a3,d4,f#4] [b3,d4,g4]@2 [a3,d4,f#4]@3 [g2,d3,g3]@4 [d3,a3,d4]@4 [a2,e3,a3]@6 [a2,a3]!3]/8", // E A E D G D A D …
  H: "[b2,f#3,b3]@4 ~@2 [b2,f#3,b3]@2 [b2,f#3,b3]@5 ~ [b2,f#3,b3]@2", // B5
  I: "~ [b2,f#3,b3] [b2,f#3,b3]@2 ~ [b2,f#3,b3] [b2,f#3,b3]@2", // B5
  J: "[e2,b2,e3]@4 ~@2 [e2,b2,e3]@2 [e2,b2,e3]@5 ~ [e2,b2,e3]@2", // E5
  K: "~ [e2,b2,e3] [e2,b2,e3]@2 ~ [e2,b2,e3] [e2,b2,e3]@2", // E5
  L: "[~ [b2,f#3,b3]!2 [b2,f#3,b3]@2 [b2,f#3,b3]@8 [b2,f#3,b3]!3]/2", // B5
  M: "[[b3,e4,g#4]!2 [c#4,e4,a4]@2 [b3,e4,g#4]@3 [a3,d4,f#4]@2 [a3,d4,f#4] [b3,d4,g4]@2 [a3,d4,f#4]@3 [e3,a3,c#4]@2 [e3,a3,c#4] [f#3,a3,d4]@2 [e3,a3,c#4]@3 [g2,d3,g3]@4 [d3,a3,d4]@4 [b3,e4,g#4]@2 [b3,e4,g#4] [c#4,e4,a4]@2 [b3,e4,g#4]@3 [a3,d4,f#4]@2 [a3,d4,f#4] [b3,d4,g4]@2 [a3,d4,f#4]@3 [g2,d3,g3]@4 [d3,a3,d4]@4 ~]/7", // E A E D G D A D …
  N: "[e3 d3 b2 [e2,b2,e3]@13]/2", O: "[e2,b2,e3] ~@3",
})).s("gm_distortion_guitar").gain(0.4)

// chords · distortion guitar
const distortion_guitar_3 = note("<~@43 A B C D@2 B C E@2 ~@2 F G ~@14 H I ~@6 A B C D@2 B J@2 ~@3>".pickRestart({
  A: "~@3 [e3,b3]", B: "[b3,e4]@3 [b3,e4]", C: "[e4,a4]@13 ~ [d4,g4]@2",
  D: "[~ [c#4,f#4] [b3,e4] [a3,d4] [c#4,f#4] [b3,e4] [a3,d4] [g3,b3]@4 [f#3,a3]@3 [e3,b3]@2]/2", // F#5 E5 D5 F#5 E5 D5 G F#m …
  E: "[~ [c#4,f#4] [b3,e4] [e4,a4]@2 [c#4,f#4] [b3,e4] [a4,e5]@2 [a4,e5]!7]/2", // F#5 E5 A5 F#5 E5 A5
  F: "~@2 [e3,e4]@2 [g3,g4]@2 [a3,a4]@2 [b3,b4]@2 [a3,a4] [g3,g4] [a3,a4]@2 [g3,g4]@2", // E G A B A G A G
  G: "[e3,e4]@4 [g3,g4]@4 [e3,e4] [d3,d4] [b2,b3]@2 [d3,d4]@2 [b2,b3] [a2,a3]", // E G E D B D B A
  H: "[e3,e4]@8 [e3,e4] [d3,d4] [b2,b3]@2 [d3,d4]@2 [b2,b3] [d3,d4]", I: "[e3,e4]",
  J: "[[e4,a4]@13 ~ [g3,g4]@8 [a3,a4]@8 ~@2]/2", // A5 G A
})).s("gm_distortion_guitar").gain(0.64).pan(0.6)

// drums · kick
const kick = s("bd").struct(`<
  ~@3 A B@3 C B@3 D E F G H E F I ~ B@3 C B@3 D E F G H E F I ~ B@3 C B@3 D E F G H E F I D B J B J B H ~ B@3 C B@3 D K
  ~@3 B@3 C B@3 D E F G H E F H L ~ K
>`.pickRestart({
  A: "~@7 x", B: "x ~@2 x!2 ~@2 x", C: "~ x ~ x!3 ~ x", D: "~ x ~ x ~@4", E: "~ x ~@3 x ~ x", F: "~@5 x ~ x",
  G: "~@3 x ~@3 x", H: "~ x ~ x ~ x ~@2", I: "~ x ~ x ~ x ~ x", J: "~ x ~@2 x!2 ~ x", K: "x", L: "~@3 x ~@4",
})).gain(0.64)

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

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

// drums · hihat
const hihat = s("hh").struct("<~@3 A B@7 C ~@8 D B@6 C ~@8 D B@6 C ~@15 D B@6 C ~@4 D B@6 C ~@10>".pickRestart({
  A: "~@7 x", B: "x!8", C: "x!4 ~@4", D: "~ x!7",
})).gain(0.64)

// drums · mid tom
const mid_tom = s("mt").struct("<~@14 A ~@15 A ~@15 A ~@23 B ~@10 A ~@4 C ~@2>".pickRestart({
  A: "~@10 x!2 ~@4", B: "~@10 x!6", C: "~ x!2 ~@5",
})).gain(0.64)

// drums · high tom
const high_tom = s("ht").struct("<~@70 [~@10 x!2 ~@4] ~@15 x ~@2>").gain(0.64)

// drums · crash
const crash = s("cr").struct(`<
  ~@12 A ~ B C A B D ~ A ~@7 A ~ B C A B D ~ A ~@7 A ~ B C A B D ~ A B A B E F ~ A ~@7 A ~@3 A ~@7 A ~ B C A B C@2 ~ A
>`.pickRestart({
  A: "x", B: "~@7 x", C: "~@3 x ~@4", D: "~@3 x ~@3 x", E: "x ~@6 x", F: "~@3 x ~ x ~@2",
})).gain(0.64)

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

stack(
  bass, distortion_guitar, piano, distortion_guitar_2, distortion_guitar_3, kick, snare, low_tom, hihat, mid_tom,
  high_tom, crash, ride_bell
)