// Easy to Be Hard — Three Dog Night
// 82 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: Full arrangement: all 71 bars on a 32-step grid, each part at one level. Source detail keeps the original performance.
setcpm(82/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 · epiano2 · "E Piano"
const epiano2 = note(`<
  ~@2 A B A B A B A B C D E F A B A B C D E F G H I J K@2 L M N A B A B C D E F G H I J K@2 L M N A B A B O@2 P Q R S T
  U V W X Y Z AA AB AC@2 AD@2
>`.pickRestart({
  A: "~@7 b3, c3@7 ~, ~ g3@6 ~, ~@4 b3@9 ~@3, ~@3 [e4,g4]@5", B: "~@3 [c#4,e4]@4 a3, a2@7 ~, ~ e3@6 ~, ~@4 g3@9 ~@3",
  C: "[a3,c#4,f#4]@7 a3 [a3,c#4,f#4] ~ [a3,c#4,f#4]@3 ~ [a3,c#4,f#4] ~", // F#m
  D: "[b3,d4,g4]@7 b3 [a3,c#4,g4] ~ [a3,c#4,g4]@3 ~ [a3,c#4,g4] ~", // G A7
  E: "[a3,d4,f#4]@10 ~@2 [a3,d4,f#4]@2 ~@2 [a3,c#4,f#4]@10 ~@2 [d4,f#4] ~ [c#4,f#4] ~, ~@14 a3!2", // D F#m D F#5
  F: "[a3,c4,f#4]@15 ~", G: "~ [d4,g4,b4] ~ [d4,f4,a4]", H: "~@4 [d4,g4,b4]@4 ~@2 [d4,f4,a4]@2 ~ [d4,f4,a4]@3",
  I: "~@4 [d4,g4,b4]@3 ~@5 [d4,f4,a4]@4", J: "~@4 [d4,g4,b4]@3 ~@3 [d4,f4,a4]@2 ~ [d4,f4,a4]@2 ~",
  K: "[b4,e5,g5]@7 ~ [a4,c#5,e5,g5]@7 ~", L: "[b4,e5,g5]@7 ~ [a4,c#5,e5,g5]@6 ~@2", M: "[a4,c#5,f#5]@15 ~",
  N: "[b4,d5,g5]@15 ~", // G
  O: "[[a3,c#4,f#4]@3 ~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4] ~@2 [a3,c#4,f#4] ~@5 [a3,c#4,f#4]@3 ~@2 [a3,c#4,f#4]@3 ~ [b3,d4,g4]@3 ~@6 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4] ~@2 [b3,d4,g4] ~@5 [b3,d4,g4]@3]/2", // F#m G
  P: "~@2 [b3,d4,g4]@3 ~ [a3,c#4,f#4]@3 ~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4] ~@2 [a3,c#4,f#4] ~@5", // G F#m
  Q: "[a3,c#4,f#4]@3 ~@2 [a3,c#4,f#4]@3 ~ [b3,d4,g4]@3 ~@6 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4] ~ [b3,d4,g4] ~@3", // F#m G
  R: "~@3 [b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~ [a3,c#4,f#4]@3 ~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4]", // G F#m
  S: "~@5 [a3,c#4,f#4]@3 ~@2 [a3,c#4,f#4]@3 ~ [b3,d4,g4]@3 ~@6 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4]", // F#m G
  T: "~ [b3,d4,g4] ~@6 [b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~@2 [a3,c#4,f#4]@3 ~@5 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@4", // G F#m
  U: "~@2 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4]@3 ~ [a3,c#4,f#4]@3 ~@2 [b3,d4,g4]@3 ~@5 [b3,d4,g4] ~ [b3,d4,g4] ~@2", // F#m G
  V: "~@4 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~@2 [a3,c#4,f#4]@3 ~@5 [a3,c#4,f#4] ~ [a3,c#4,f#4]", // G F#m
  W: "~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4]@3 ~@2 [a3,c#4,f#4]@3 ~ [b3,d4,g4]@3 ~@5 [b3,d4,g4]", // F#m G
  X: "~ [b3,d4,g4] ~@6 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~ [a3,c#4,f#4]@3 ~@5", // G F#m
  Y: "~ [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@6 [a3,c#4,f#4]@3 ~ [a3,c#4,f#4]@3 ~ [b3,d4,g4]@3 ~@3", // F#m G
  Z: "~@2 [b3,d4,g4] ~@2 [b3,d4,g4] ~@5 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~@2 [a3,c#4,f#4]@3 ~", // G F#m
  AA: "~@4 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@6 [a3,c#4,f#4]@3 ~ [a3,c#4,f#4]@3 ~ [b3,d4,g4]@3", // F#m G
  AB: "~@5 [b3,d4,g4] ~ [b3,d4,g4] ~@6 [b3,d4,g4] ~ [b3,d4,g4] ~@5 [b3,d4,g4]@3 ~ [b3,d4,g4]@3 ~ [a3,c#4,f#4]@2", // G F#m
  AC: "[~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@6 [a3,c#4,f#4] ~ [a3,c#4,f#4] ~@5 [a3,c#4,f#4]@3 ~ [a3,c#4,f#4]@3 ~ [b3,d4,g4]@2 ~@7 [b3,d4,g4] ~ [b3,d4,g4] ~@6 [b3,d4,g4]@2 [b3,d4,g4]@2 ~@5 [b3,d4,g4]@3 ~@3]/2", // F#m G
  AD: "[[b3,d4,g4]@3 ~@2 [d4,f#4,b4]@44 ~@15]/2", // G Bm
})).s("gm_epiano2").gain(0.36)

// bass · fretless bass · "Bass"
const bass = note(`<
  ~@2 A B A C A C A D E F G H A C A D E F G I J@3 K L M N O@2 A C A D E F G I J@3 K L@2 N P@2 A C A D Q@2 R S@2 T@3 U V
  W@2 X Y Z AA@2 AB@2
>`.pickRestart({
  A: "c2@6 c3@7 ~ a2 ~", B: "a2@7 ~ d3@3 ~ d3@4", C: "a2@14 ~@2 d3@7 ~ d3@8",
  D: "a2@9 ~ e2 ~ a2@2 e2@2 a1@4 ~@2 b1@4 ~@2 c#2@4", E: "d2@14 a1@2 d2 ~@3 d2@6 ~@2 d2@2 d#2@2",
  F: "e2@6 ~@2 e2@5 ~ b1@2 e2@2 b1@2 a1@4 b1@4 c#2@4", G: "d2@11 ~ d2 ~@3 d2@11 ~ d3@2 c#3@2",
  H: "c3@4 c3@3 a2 d3 c3 a2 ~ d3 c3 a2 g2", I: "c3@4 c3@3 a2 d3 c3 a2 ~ d3 c3 a2 f2",
  J: "g2@2 ~@2 g2@7 ~ f2@2 e2@2 d2@2 ~@2 d2@7 ~ e2@2 f2@2", K: "g2@2 ~@2 g2@7 ~ f2@2 e2@2 d2@2 ~@2 d2@7 ~ d2@2 ~@2",
  L: "e2@2 ~@2 e2@4 ~@2 e2@2 a2@2 e2@2 a1@2 ~@2 a1@7 ~ b1@2 c#2@2",
  M: "e2@2 ~@2 e2@4 ~@2 e2@2 a2@2 e2@2 a1@2 ~@2 a1@7 ~ b1@2 c2@2",
  N: "e2@2 ~@2 e2@4 ~@2 e2@2 a2@2 e2@2 a1@6 b1@4 ~@2 c#2@3 ~",
  O: "[d2@28 ~@2 c3@5 ~ c3@3 ~@5 a2@2 ~@6 g2@2 ~@4 e2@2 d2@2 ~@2]/2",
  P: "[d2@28 ~@2 c3@4 ~@2 c3@3 ~@5 a2@2 ~@6 g2@2 ~@4 e2@2 d2@2 ~@2]/2",
  Q: "[d2@4 ~@3 a1@2 d2 ~ d2 ~@3 a1@2 d2@3 ~@4 a1@2 d2@3 ~@3 d#2@2 ~ e2@3 ~@4 b1@2 e2 ~ e2 ~@3 b1@2 e2@2 ~ e2@2 a1@4 b1@3, ~@31 d2@2 ~@31]/2",
  R: "~@2 c#2@4 d2@4 ~@3 a1@2 d2 ~ d2 ~@3 a1@2 d2@3 ~@4 a1@2",
  S: "[d2@3 ~@3 d#2@2 ~ e2@3 ~@3 b1@2 ~ e2 ~ e2 ~@3 b1@2 e2@2 e2@2 ~ a1@4 b1@4 c#2@4 d2@4 ~@3 a1@2 d2 ~ d2 ~@4 a1@2 d2@3, ~@5 d2@2 ~@57]/2",
  T: "[~@3 a1@2 d2@3 ~@3 d#2@2 ~ e2@3 ~@3 b1@2 ~ e2 ~ e2 ~@3 b1@2 e2@2 e2@2 ~ a1@4 b1@4 c#2@4 ~ d2@4 ~@2 a1@2 d2 ~ d2 ~@3 a1@2 ~ d2@3 ~@3 a1@2 d2@3 ~ d2@2 d#2@2 ~ e2@3 ~@3 b1@2 e2 ~ e2 ~@2, ~@5 d2 ~@42]/3",
  U: "~@2 b1@2 e2@2 e2@2 a1@4 b1@4 c#2@4 ~ d2@4 ~@2 a1@2 d2 ~ d2",
  V: "~@4 a1@2 d2@3 ~@3 a1@2 d2@3 ~@3 d#2@2 ~ e2@3 ~@3 b1@2 e2, ~@19 d2@2 ~@11",
  W: "[~ e2 ~@3 b1@2 ~ e2@2 e2@2 a1@4 b1@4 c#2@4 d2@4 ~@3 a1@2 d2 ~ d2 ~@3 a1@2 d2@3 ~@4 a1@2 d2@3 ~@2 d#2@2 ~ e2@3 ~@3, ~@27 d2 ~@4]/2",
  X: "b1@2 e2 ~@2 e2 ~@3 b1@2 e2@2 e2@2 a1@4 b1@4 c#2@4 ~ d2@3 ~",
  Y: "~@2 a1@2 d2 ~ d2 ~@3 a1@2 d2@3 ~@4 a1@2 d2@3 ~@2 d#2@2 ~ e2@3, ~@25 d2@2 ~@5",
  Z: "~@3 b1@2 e2 ~ e2 ~@3 b1@2 ~ e2@2 e2@2 a1@4 b1@4 c#2@4 d2@2",
  AA: "[~@4 a1@2 d2 ~ d2 ~@4 a1@2 d2@3 ~@3 a1@2 d2@3 ~ d2@2 d#2@2 e2@3 ~@4 b1@2 e2 ~ e2 ~@3 b1@2 ~ e2@2 e2@2 a1@5 b1@5 ~]/2",
  AB: "[c#2@5 b1@43 ~@16]/2",
})).s("gm_fretless_bass").gain(0.36)

// chords · rock organ · "Organ"
const rock_organ = note(`<
  ~@2 A B A B A B A B C D E F A B A B C D E F G H I J K@3 L M A B A B C D E F G H I J K@3 L M A B A B N O P Q@2 R@3 S@2
  T@7 U@2
>`.pickRestart({
  A: "[b4,e5,g5]@15 ~", B: "[a4,c#5,e5,g5]@15 ~", C: "[a4,c#5,f#5]@19 ~ [a4,c#5,f#5]@4 ~@2 [a4,c#5,f#5]@4 ~@2",
  D: "[b4,d5,g5]@14 ~@2 [a4,c#5,g5]@2 ~@2 [a4,c#5,g5]@5 ~@3 [a4,c#5,g5]@3 ~", // G A7
  E: "[a4,d5,f#5]@11 ~ [a4,d5,f#5]@2 ~@2 [a4,c#5,f#5]@11 ~ [a4,d5,f#5]@2 [a4,c#5,f#5]@2", F: "[a4,c5,f#5]@15 ~",
  G: "[d5,g5,b5] ~@3 [d5,g5,b5]@7 ~ [d5,g5,b5] ~@3 [d5,f5,a5] ~@3 [d5,f5,a5]@7 ~ [d5,f5,a5] ~@3", // G Dm
  H: "[d5,g5,b5] ~@3 [d5,g5,b5]@7 ~ [d5,g5,b5]@2 ~@2 [d5,f5,a5] ~@3 [d5,f5,a5]@4 ~@2 [d5,f5,a5]@4 ~@2", // G Dm
  I: "[d5,g5,b5] ~@3 [d5,g5,b5]@7 ~ [d5,g5,b5]@2 ~@2 [d5,f5,a5] ~@3 [d5,f5,a5]@6 ~@2 [d5,f5,a5]@3 ~", // G Dm
  J: "[d5,g5,b5] ~@3 [d5,g5,b5]@6 ~@2 [d5,g5,b5]@2 ~@2 [d5,f5,a5] ~@2 c7 [c6,d6,e6,f6,g6,a6,b6] [c5,d5,e5,f5,g5,a5,b5] [c3,d3,e4,f4,g4,a4,b4] [e3,f3,g3] [a3,b3,c4,d4] [e4,f4,g4,a4] [b4,c5,d5] [e5,f5,g5] [a5,b5] [c6,d6] [e6,f6] ~", // G Dm Cmaj7 Em D7 Fmaj7 Bm Em …
  K: "[b5,e6,g6]@15 ~ [a5,c#6,e6,g6]@15 ~", L: "[a5,c#6,f#6]@15 ~", M: "[b5,e6,g6]@15 ~",
  N: "[a4,c#5,f#5]@21 ~ [a4,c#5,f#5]@5 ~ [a4,c#5,f#5]@4", O: "~@3 [b4,d5,g5]@15 ~@2 [a4,c#5,g5]@2 ~@3 [a4,c#5,g5]@6 ~",
  P: "~@2 [a4,c#5,g5]@4 [a4,c#5,f#5]@21 ~ [a4,c#5,f#5]@4", // A7 F#m
  Q: "[~@2 [a4,c#5,f#5]@5 ~@2 [b4,d5,g5]@15 ~@2 [a4,c#5,g5]@2 ~@3 [a4,c#5,g5]@6 ~@2 [a4,c#5,g5]@4 [a4,c#5,f#5]@21]/2", // F#m G A7 F#m
  R: "[~ [a4,c#5,f#5]@5 ~@2 [a4,c#5,f#5]@5 ~ [b4,d5,g5]@15 ~@2 [a4,c#5,g5]@2 ~@3 [a4,c#5,g5]@6 ~@2 [a4,c#5,g5]@4 ~ [a4,c#5,f#5]@21 [a4,c#5,f#5]@5 ~ [a4,c#5,f#5]@5 ~@2 [b4,d5,g5]@13]/3", // F#m G A7 F#m G
  S: "[~@4 [a4,c#5,g5]@2 ~@2 [a4,c#5,g5]@6 ~@2 [a4,c#5,g5]@4 ~ [a4,c#5,f#5]@21 [a4,c#5,f#5]@5 ~ [a4,c#5,f#5]@5 ~@2 [b4,d5,g5]@9]/2", // A7 F#m G
  T: "[~@8 [a4,c#5,g5]@2 ~@2 [a4,c#5,g5]@6 ~@2 [a4,c#5,g5]@4 [a4,c#5,f#5]@20 ~ [a4,c#5,f#5]@5 ~@2 [a4,c#5,f#5]@5 ~ [b4,d5,g5]@15 ~@2 [a4,c#5,g5]@2 ~@2 [a4,c#5,g5]@6 ~@2 [a4,c#5,g5]@4 ~ [a4,c#5,f#5]@20 [a4,c#5,f#5]@4 ~@3 [a4,c#5,f#5]@4 ~@2 [b4,d5,g5]@15 ~@2 [a4,c#5,g5]@2 ~@2 [a4,c#5,g5]@6 ~@2 [a4,c#5,g5]@3 ~ [a4,c#5,f#5]@20 ~ [a4,c#5,f#5]@4 ~@2 [a4,c#5,f#5]@4 ~@2 [b4,d5,g5]@15 ~@3 [a4,c#5,g5]@2 ~@2 [a4,c#5,g5]@7 ~@4]/7", // A7 F#m G A7 F#m G A7 F#m …
  U: "[[a4,c#5,g5]@4 ~ [f#4,b4,d5]@44 ~@15]/2", // A7 Bm
})).s("gm_rock_organ").gain(0.2)

// drums · kick
const kick = s("bd").struct("<~@2 A@20 B@7 C A@9 B@7 C A@5 D E F G H I J K L M N O P Q R S T U V>".pickRestart({
  A: "x ~@2 x ~ x ~ x", B: "x!2 ~ x ~ x ~ x", C: "x ~@6 x", D: "x ~@12 x ~@8 x ~@8 x", E: "~@3 x ~@12 x ~@8 x ~@6",
  F: "~@2 x ~@3 x ~@12 x ~@8 x ~@3", G: "~@5 x ~@3 x ~@12 x ~@8 x", H: "~@7 x ~@3 x ~@12 x ~@7",
  I: "~ x ~@8 x ~@3 x ~@12 x ~@4", J: "~@4 x ~@7 x ~@4 x ~@11 x ~@2", K: "~@6 x ~@7 x ~@4 x ~@11 x",
  L: "~@8 x ~@7 x ~@4 x ~@10", M: "~ x ~@8 x ~@8 x ~@3 x ~@8", N: "~@3 x ~@8 x ~@7 x ~@3 x ~@7",
  O: "~@5 x ~@7 x ~@8 x ~@3 x ~@5", P: "~@7 x ~@7 x ~@7 x ~@4 x ~@3", Q: "~@8 x ~@7 x ~@8 x ~@3 x ~@2",
  R: "~@9 x ~@8 x ~@7 x ~@3 x ~", S: "~@11 x ~@7 x ~@7 x ~@3 x", T: "~@12 x ~@8 x ~@10", U: "x ~@4 x ~@26",
  V: "~@17 x ~@14",
})).gain(0.46)

// drums · snare
const snare = s("sd").struct("<~ A B@27 C B@16 C B@5 D E F G H I J K E L A M N O P Q R ~ S>".pickRestart({
  A: "~ x", B: "~ x ~ x", C: "~@2 x!2", D: "~@9 x ~@16 x ~@5", E: "~@12 x ~@16 x ~@2", F: "~@15 x ~@16",
  G: "x ~@8 x ~@6", H: "~@3 x ~@16 x ~@11", I: "~@5 x ~@17 x ~@8", J: "~@8 x ~@16 x ~@6", K: "~@10 x ~@16 x ~@4",
  L: "~@14 x ~@16 x", M: "~ x ~@16 x ~@13", N: "~@2 x ~@16 x ~@12", O: "~@4 x ~@16 x ~@10", P: "~@5 x ~@16 x ~@9",
  Q: "~@6 x ~@16 x ~@8", R: "~@4 x ~@8 x ~@2", S: "~@14 x!2 ~@16",
})).gain(0.46)

// drums · hihat
const hihat = s("hh").struct("<A B@51 C D E F G H I J K L M N O K P Q R S ~>".pickRestart({
  A: "x!2", B: "x!4", C: "x ~@8 x ~@7 x ~@8 x ~@5", D: "~@3 x ~@8 x ~@7 x ~@8 x ~@2", E: "~@6 x ~@8 x ~@7 x ~@8",
  F: "x ~@8 x ~@8 x ~@7 x ~@5", G: "~@3 x ~@7 x ~@8 x ~@8 x ~@2", H: "~@5 x ~@8 x ~@8 x ~@7 x",
  I: "~@8 x ~@8 x ~@7 x ~@6", J: "~@2 x ~@7 x ~@8 x ~@7 x ~@4", K: "~@4 x ~@7 x ~@8 x ~@7 x ~@2",
  L: "~@6 x ~@7 x ~@8 x ~@7 x", M: "~ x!3", N: "~ x ~@7 x ~@8 x ~@7 x ~@5", O: "~@2 x ~@8 x ~@7 x ~@8 x ~@3",
  P: "~@5 x ~@8 x ~@7 x ~@7 x ~", Q: "~@6 x ~@8 x ~@7 x ~@7 x", R: "~@8 x ~@8 x ~@8 x ~@5", S: "~@5 x ~@26",
})).gain(0.46)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A@2 ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A@2 ~ A ~ A ~@2 B ~ C ~ D
  ~ E ~ F ~ G ~ H ~@2 I ~
>`.pickRestart({
  A: "~@7 x", B: "~ x ~@14", C: "~@7 x ~@24", D: "~@3 x ~@4", E: "~ x", F: "~@5 x ~@2", G: "~@23 x ~@8",
  H: "~@13 x ~@2", I: "x",
})).gain(0.46)

// drums · high tom
const high_tom = s("ht").struct(`<
  ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A@2 ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A@2 ~ A ~ A ~ B ~@2 C ~ D
  ~ E ~ F ~ G ~ H ~ I ~@2
>`.pickRestart({
  A: "~@11 x!2 ~@3", B: "~@27 x ~ x ~@2", C: "~ x ~ x ~@28", D: "~@3 x!2 ~@11", E: "~@5 x!2 ~@9", F: "~@7 x!2 ~@7",
  G: "~@17 x ~ x ~@12", H: "~@10 x!2 ~@4", I: "~@12 x!2 ~@2",
})).gain(0.46)

// drums · crash
const crash = s("cr").struct("<~@2 A@20 B@4 A@13 B@4 A@10 C D E F G H I J K L M N O P Q ~ R ~>".pickRestart({
  A: "x", B: "~ x ~@2", C: "~@3 x ~@28", D: "~@3 x ~@12", E: "~@9 x ~@22", F: "~@11 x ~@20", G: "~@7 x ~@8",
  H: "~@17 x ~@14", I: "~@19 x ~@12", J: "~@21 x ~@10", K: "~@23 x ~@8", L: "~@3 x", M: "~@13 x ~@2", N: "~@7 x",
  O: "~@29 x ~@2", P: "~@15 x", Q: "~@31 x", R: "~@5 x ~@26",
})).gain(0.46)

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