// 1984 — Eurythmics
// 136 bpm, 4/4, key G# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 117 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(136/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 · rock organ · "Leslie Organ"
const rock_organ = note(`<
  A@3 B@2 C@2 D@2 E@2 B@2 C@2 D@2 F@2 ~@18 G H I J@2 G H I G ~ B@2 C@2 D@2 F@2 ~@2 G H K L@2 G H I L@2 G H I L@2 G H M
  N@8 O P Q@2 O R O R O R O R O P S@2 T@2 U@2 V@2 W@2 X@2 U@2 V@2 W@2 X@2
>`.pickRestart({
  A: "[g#3,b3,d#4,g#4]/3", B: "[g#3,d#4,g#4]/2", C: "[g#3,e4,g#4]/2", D: "[a#3,d4,f4]/2", E: "[f#3,c#4,f#4]/2",
  F: "[[f#3,c#4,f#4]@31 ~]/2", G: "[g#4,b4,d#5,g#5]", H: "[b4,e5,g#5]", I: "[c#5,e5,g#5] [c#5,f#5,a#5]",
  J: "[g#4,b4,d#5,g#5]/2", K: "[c#5,e5,g#5] [c#5,f#5,a#5], f#5 ~@15", L: "[[g#4,b4,d#5,g#5]@31 ~]/2",
  M: "[c#5,e5,g#5]@8 [c#5,f#5,a#5]@7 ~", // C#m F#
  N: "[[g#4,b4]@6 [a#4,c#5]@6 [b4,d#5]@8 [b4,d#5]@6 [a#4,c#5]@6 [g#4,b4]@6 c#5@6 [b4,d#5]@8 [b4,d#5]@6 [a#4,c#5]@5 ~ [g#4,b4]@8 [a#4,c#5]@8 [b4,d#5]@8 [a#4,c#5]@8 [g#4,b4]@8 [a#4,c#5]@8 [b4,d#5]@8 [a#4,c#5]@8, g#3]/8", // G#m A#m B A#m G#m B A#m G#m …
  O: "[g#4,b4] [a#4,c#5]", P: "[b4,d#5]@8 [a#4,c#5]@7 ~",
  Q: "[[g#4,b4]@6 [a#4,c#5]@6 [b4,d#5]@8 [b4,d#5]@6 [a#4,c#5]@5 ~]/2", R: "[b4,d#5] [a#4,c#5]",
  S: "[[g#4,b4]@3 [a#4,c#5]@3 [b4,d#5]@4 [b4,d#5]@3 [a#4,c#5]@3, a#4 ~@31]/2", // G#m A#m B A#m
  T: "[[g#4,b4]@6 [a3,a4,c5]@6 [a#3,a#4,c#5]@8 [b3,b4,d5]@6 [c4,c5,d#5]@5 ~]/2", U: "[c#4,g#4,c#5]/2",
  V: "[c#4,a4,c#5]/2", W: "[g4,a#4,d#5]/2", X: "[[b3,f#4,b4]@31 ~]/2",
})).s("gm_rock_organ").gain(0.4)

// bass · electric bass pick · "Bass"
const bass = note(`<
  ~@3 A@2 B@2 C@2 D@2 A@2 B@2 C@2 E@2 F@9 G H F@3 G H F@3 G H F@3 G H F I J@2 K@2 L@2 M@2 F@3 G H F@3 G H F@3 G H F@3 G
  N O@2 P@2 Q R Q R Q S T@2 Q R Q R Q R Q R Q S O@2 U@2 V@2 W@2 X@2 Y@2 Z@2 W@2 X@2 Y@2
>`.pickRestart({
  A: "g#1/2", B: "e1/2", C: "a#1/2", D: "f#1/2", E: "[f#1@31 ~]/2", F: "g#1 b1 c#2 d#2 c#2 b1 g#1 f#1",
  G: "e1 b1 e2 b1 e1 b1 e2 b1", H: "c#2 e2 g#2 e2 a#1 c#2 f#2 c#2", I: "g#1 ~@7", J: "[g#2@31 ~]/2", K: "e2/2",
  L: "a#2/2", M: "[f#2@31 ~]/2", N: "c#2@2 e2@2 g#2@2 e2@2 a#1@2 c#2@2 f#2@2 c#2 ~",
  O: "[g#1@3 a#1@3 b1@4 b1@3 a#1@3]/2", P: "[g#1@6 a#1@6 b1@6 ~@2 b1@6 a#1@5 ~]/2", Q: "g#1@2 g#1!2 a#1@2 a#1!2",
  R: "b1@2 b1!2 a#1@2 a#1!2", S: "b1@4 b1@2 b1@2 a#1@4 a#1@2 a#1 ~", T: "[g#1@6 a#1@6 b1@8 b1@6 a#1@5 ~]/2",
  U: "[g#1@6 a1@6 a#1@8 b1@6 c2@5 ~]/2", V: "c#2/2", W: "a1/2", X: "d#2/2", Y: "[b1@31 ~]/2", Z: "[c#2@31 ~]/2",
})).s("gm_electric_bass_pick").gain(0.72)

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

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

// drums · low tom
const low_tom = s("lt").struct("<~@46 A ~ B ~ C ~ D ~ E ~@47 B ~ C ~ D ~ E ~ B ~ C ~ D ~ E>".pickRestart({
  A: "~@9 x!2 ~@5", B: "~@8 x!3 ~@5", C: "~ x ~@2", D: "~ x", E: "~@7 x ~@8",
})).gain(0.56)

// drums · hihat
const hihat = s("hh").struct("<~@19 [x!8]!12 [x!6 ~@2] [x!8]!14 x ~@8 [x!8]!20 ~@42>").gain(0.56)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@11 A B A B A B A C ~@27 D ~@3 E ~ F ~@48 A B A B A B A C A B A B A B A C
>`.pickRestart({
  A: "~@4 x!4", B: "x!8", C: "x!6 ~@2", D: "~@7 x ~@8", E: "x!2", F: "~@3 x",
})).gain(0.56)

// drums · high tom
const high_tom = s("ht").struct("<~@52 [~ x ~@2] ~@53 [~ x ~@2] ~@7 [~ x ~@2] ~@2>").gain(0.56)

// drums · crash
const crash = s("cr").struct(`<
  ~@3 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@12 A ~@4 A ~@4 A ~@4 A ~ A ~ A ~ A ~ A ~@6 A ~@4 A ~@4 A ~@28 A ~ A ~ A ~ A ~
  A ~ A ~ A ~ A ~
>`.pickRestart({
  A: "x",
})).gain(0.64)

// drums · ride
const ride = s("rd").struct("<~@47 A B C ~ A ~ A ~@21 D E D E A@6 D E A@15 B C ~ A ~ A ~ A B C ~ A ~ A ~>".pickRestart({
  A: "x!8", B: "x!2 ~@6", C: "x!6 ~@2", D: "x ~@2 x ~@2 x ~", E: "~@2 x ~@2 x ~@2",
})).gain(0.48)

stack(rock_organ, bass, kick, snare, low_tom, hihat, mid_tom, high_tom, crash, ride)