// Suicide Solution — Ozzy Osbourne
// 108 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 52 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(108/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord.
// 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(`<
  A B C D E F G H I D J K L M N O P Q R S T U V W X Y X Z X Y X AA AB AC AD AE T AF AG AH C AI AJ K X Y X Z X Y X AA
>`.pickRestart({
  A: "[a3,e4,a4] ~ a3!2 [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2", B: "[g4,c5]@3 ~ [c4,g4] ~ [e4,a4]@3 ~ g3@4 ~@2",
  C: "[a3,e4,a4]@3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2", D: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ c5 ~ c5!3 ~",
  E: "[e4,a4] ~ a3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2", // A5 C5 G5 A5
  F: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ [e4,a4] ~ d4 d#4 d4 c4", // C5 G5 A5
  G: "[a3,e4] ~ a3 ~ [g4,c5]@3 ~ [d4,a4] ~ [e4,a4] ~ a3 d4 e4 d4", // A5 C5 D5 A5
  H: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ d4 ~ d#4 ~ d4 d#4 d4 c4", I: "a4@3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2",
  J: "[a3,e4,a4] ~ [a3,e4,a4] ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2", // A5 C5 G5 A5
  K: "[e4,b4] ~ [d4,a4] ~ [c4,g4] ~ [g3,d4,g4,d5]@9 ~", L: "a3 ~ g3 ~ [g4,c5] ~ a3 ~ [g4,c5] ~ [a4,d5]@4 ~@2",
  M: "[d4,g4]@3 ~ g3 ~ [a3,e4,a4]@3 ~ a4@4 ~@2", N: "[a3,e4,a4] ~ a3!2 [g4,c5] ~ a3 ~ [g4,c5] ~ [a4,d5]@3 ~ a3!2",
  O: "[d4,g4] ~ e3 ~ g3 ~ [a3,e4,a4]@3 ~ d5@4 ~@2", P: "[a3,e4,a4] ~ a3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2",
  Q: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ b4 d5 e5 f#5 g5 f#5 g5 a5", R: "a3 ~ a3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ a3!2",
  S: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ [c5,g5,c6] ~ [a4,f#5,b5] ~ [c5,g5,c6] ~ [a4,f#5,b5] ~", // C5 G5 A5 C5 B7 C5 B7
  T: "[a3,e4,a4] ~ a3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ [e4,a4] ~ a3 ~", // A5 C5 G5 A5
  U: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ b4 c5 b4 a4 g4 e4 d4 c4", // C5 G5 A5
  V: "[a3,e4,a4] ~ a3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ [a3,e4,a4] ~ [a3,e4,a4] ~", // A5 C5 G5 A5
  W: "[e4,b4] ~ [d4,a4] ~ [c4,g4] ~ [g3,d4,g4,d5]@4 ~@2 b4@3 ~", // E5 D5 C5 G5
  X: "a3 ~ b3 ~ [f#4,b4] ~ a3 ~ b3 ~ [g#4,c#5] ~ b3 ~ c#4 ~", Y: "[a4,d5] ~ d4 ~ [a4,d5] ~ [g#4,c#5]@5 ~@3 c#5 g#4",
  Z: "[a4,d5] ~ d4 ~ [a4,d5] ~ [g#4,c#5]@5 ~@3 [g#4,c#5] a3", AA: "[a4,d5] ~ c#4 ~ d4 ~ e3 ~ e3 ~ e3 ~ e3@3 ~",
  AB: "[a3,e4,a4] ~ a3 ~ [g4,c5] ~ a3 ~ [g4,c5] ~ [a4,d5]@4 ~@2", AC: "[d4,g4]@3 ~ g3 ~ [a3,e4,a4] ~@3 g5 ~ g5!3 ~",
  AD: "[a3,e4,a4] ~ [a3,e4,a4] ~ [g4,c5] ~ a3 ~ [g4,c5] ~ [a4,d5]@4 ~@2", // A5 C5 D5
  AE: "[d4,g4]@3 ~ g3 ~ [a3,e4,a4]@3 ~ e5@4 ~@2", AF: "[g4,c5]@5 ~ a3 ~ c5 d5 e5 f#5 g5 a5 c6 ~",
  AG: "[e4,a4] ~ a3 ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ [e4,a4] ~ a3 ~", // A5 C5 G5 A5
  AH: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ d4 ~ d#4 ~ d4 ~ c4 ~", AI: "[g4,c5]@3 ~ [d4,g4] ~ [e4,a4]@3 ~ g3 ~ a3 ~ g3 ~",
  AJ: "[a3,e4,a4] ~ [a3,e4,a4] ~ [g4,c5]@3 ~ [d4,g4] ~ [e4,a4] ~ [a3,e4] ~ [c4,g4] ~", // A5 C5 G5 A5 C5
})).s("gm_piano").gain(0.41).pan(0.7)

// bass · electric bass finger
const bass = note(`<
  ~ A B C D E D E D E F G D H D E D E D E D E F G I J I J I J I K D H D E D E D E D E F L I J I J I J I K
>`.pickRestart({
  A: "~@10 e2!2 g2 ~ c3 ~", B: "a2@5 ~@11", C: "d3 ~ d3 c3 d3 c3 a2 g2!3 c3 d3!4 c3", D: "a2@3 ~ a2@3 ~ a2@3 ~ a2@3 ~",
  E: "a2@3 ~ a2@3 ~ a2 ~ e2 ~ g2 ~ c3 ~", F: "a2@3 ~ a2@3 ~ a2@3 ~ a2 ~ a2!2",
  G: "e3 ~ d3 ~ c3 ~ g2@3 ~ g2!2 g3!2 g2!2", H: "a2@3 ~ a2@3 ~ a2 ~ e2!2 g2 ~ c3 ~",
  I: "a2 ~ b2 ~ b3@3 ~ g#3!2 b2 ~@3 a3!2", J: "b2 ~ b2 ~ b3@3 ~ g#2 ~ g#2 ~ a2 a2@2 ~",
  K: "b2 ~ b2 ~ b3 ~ e3@3 ~ e3 ~ e3@3 ~", L: "e3 ~ d3 ~ c3 ~ g2@3 ~ g2!2 g3!2 g2 ~",
})).s("gm_electric_bass_finger").gain(0.41).pan(0.4)

// other · piano
const piano_2 = note("<~@4 A B ~@4 C ~@5 A B ~@4 C ~@13 A B ~@4 C ~@9>".pickRestart({
  A: "~@4 e4 ~ a3 ~ d4 ~ a3 ~ a3 ~ c4@2", B: "~@2 c4@3 ~ c4 ~ a3 ~ a3 ~ g3 ~ a3 ~", C: "a2@3 ~ a2@3 ~ a2@3 ~ a2@3 ~",
})).s("gm_piano").gain(0.41).pan(0.6)

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

// drums · snare
const snare = s("sd").struct("<~@3 A B@3 C B@7 C B@3 C B@7 C B@2 C@2 B@3 C B@3 C B@7 C B@2 C@2>".pickRestart({
  A: "~@12 x ~ x!2", B: "~ x ~ x", C: "~@2 x ~@2 x!2 ~",
})).gain(0.41)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@10 [~@4 x!2 ~@2] ~@11 [~@4 x!2 ~@2] ~@19 [~@4 x!2 ~@2] ~@9>").gain(0.41)

// drums · tambourine
const tambourine = s("tb").struct(`<
  ~@4 A B@2 C A B@3 A B@2 D A B@2 C A B@3 ~@8 A B@2 D A B@2 C A B@3 ~@8
>`.pickRestart({
  A: "~ x!3", B: "x!4", C: "x ~ x ~ x ~ x!2", D: "x!3 ~",
})).gain(0.41)

// drums · crash
const crash = s("cr").struct("<~@4 A ~@3 A ~@2 B ~@3 B A ~@3 A ~@2 B ~@8 A ~@2 B A ~@3 A ~@2 B A ~@7>".pickRestart({
  A: "x", B: "~@7 x",
})).gain(0.41)

// drums · ride
const ride = s("rd").struct("<~@24 [~@2 x!6] [x!8]!7 ~@12 [~@2 x!6] [x!8]!7>").gain(0.41)

stack(piano, bass, piano_2, kick, snare, hihat, mid_tom, tambourine, crash, ride)