// The Wonder of You — Elvis Presley
// 100 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: ch 2 "bass" named as a bass, played on electric bass finger (its epiano1 patch is not one); ch 4 "orch brass" named as a brass, played on brass section (its harmonica patch is not one)
// note: duplicate parts dropped: ch 5 "section" glockenspiel (copy of ch 4 "orch brass" brass section)
// note: Full arrangement: all 55 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(100/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 · "piano"
const epiano2 = note(`<
  A B C D E F G@3 F G@3 H I@2 J K L M@3 G@3 F G@3 H I@2 J K L N@3 G@3 F G@3 H I@2 J K L O P Q@2
>`.pickRestart({
  A: "~@3 d3!3 e3!3 f#3!3, ~ d2 e2 f#2", B: "[d4,g4,b4]!12, g2@5 ~ g2@3 f#2@3",
  C: "[e4,g4,b4]!5 [e2,e4,g4,b4] [e4,g4,b4]!6, e2@5 ~ g2@2 ~ b2@2 ~", // Em
  D: "[e4,a4,c5]!5 [e2,e4,a4,c5] [e4,a4,c5]!6, a2@5 ~ a2@3 a2@3", E: "[f#4,a4,d5]!12, d2@5 ~ e2@2 ~ f#2@2 ~",
  F: "g3@5 ~ [g4,b4]@2 [g4,b4]@2 ~ g4, [g4,b4] ~, ~@5 d4@3 ~@2 d4@2", // G
  G: "[e3@5 ~ [g4,b4]@2 ~@4 a3@5 ~ [a4,c5]@2 [a4,c5]@2 ~@2 [f#4,a4]@5 ~ [f#4,a4]@2 [f#4,a4]@2 ~ g4, [g4,b4]@6 ~@2 [g4,b4]@3 g4@3 ~@9 d4@2 ~@4 d4@5 d4@2, ~@5 b3@3 ~@2 e4@3 ~@4 e4@4 ~ a3@2 ~@12, ~@2 [a4,c5] ~@3]/3", // G Am F#m G Am
  H: "[d4,g4]@5 ~ [d4,g4] ~@3 a3 a#3, g3@4 ~ g3@4 ~@3, ~@8 [d4,g4]@3 ~", // G5
  I: "[[b3,d4,f4]@5 ~ [d4,f4] ~ [d4,f4]@2 ~ b3 ~@5 c4 [d4,f#4]@5 ~, ~@5 g3@3 ~@2 g3@3 ~@3 g3@3 ~@5, ~@12 [c4,e4]@5 ~@7]/2", // Bdim Dm D C
  J: "~@3 b3@2 ~ g#3@3 b3 g#3 e3, [a3,e4]@5 ~ e4@5 ~", // A5
  K: "[a3,c4]@5 ~ c4@2 [e3,a3,c4]@2 [e3,a3]@2, a2@4 ~ e3@2 ~@5, ~@6 a3 ~@5", L: "[d3,f#3,a3]@11 ~",
  M: "[~@24 g3@5 ~ [g4,b4]@2 [g4,b4]@2 ~ g4, g2@3 ~@2 d3@2 f#3@2 d4@2 ~@3 g3@2 g3@2 d3@2 ~@3 f#3@2 ~@11, ~ d3@2 b3@2 ~@3 b3@2 b3@2 c3@2 ~@3 e3@2 f#3@2 d4@2 ~ [g4,b4]@6 ~@6, ~@2 g3@2 g3@2 b2@3 ~@2 f#3@2 e3@2 c4@2 ~@3 a3@2 a3@2 ~@5 d4@3 ~@2 d4@2]/3", // G
  N: "[~@24 g3@5 ~ [g4,b4]@2 [g4,b4]@2 ~ g4, g2@3 ~@2 d3@2 b2@2 g3@2 ~@2 e3@2 c4@2 ~@2 f#3@2 d4@2 ~ [g4,b4]@6 ~@6, ~ d3@2 b3@2 ~@3 e3@2 e3@2 c3@4 ~ c3@4 ~@2 f#3@2 ~@11, ~@2 g3@2 g3@2 e2@5 b2@2 ~ g3@2 e3@2 d3@2 a3@2 a3@2 ~@5 d4@3 ~@2 d4@2]/3", // G
  O: "[g3,b3]@5 ~ [g3,b3]@3 [g3,b3]@3, d3@4 ~ d3@5 ~@2", // G
  P: "c3@4 ~ c3 [g3,a#3]@3 [d#3,g3,a#3]@2 ~, [e3,c4]@5 ~ d#3@2 ~@4, ~@2 g2 ~@3", Q: "[~ [g2,g3,b3]@29 ~@18]/2",
})).s("gm_epiano2").gain(0.29)

// bass · electric bass finger · "bass"
const bass = note(`<
  ~ A B C D E F G H E F G H I J K L M N O P E F G H E F G H I J K L M N Q P E F G H E F G H I J K L M N R S T@2
>`.pickRestart({
  A: "g2@4 ~ d2 g2@2 ~ f#2@2 ~", B: "e2@4 ~ b1 e2@2 ~ b1@2 ~", C: "a1@4 ~ e2 a2@2 ~ e2@2 ~",
  D: "d2@2 ~ d2@2 ~ e2@2 ~ f#2@2 ~", E: "g1@8 ~@2 d2 ~ g2@4 ~@2 f#2@4 ~@2", F: "e2@8 ~@2 b1 ~ e2@4 ~@2 e2@4 ~@2",
  G: "a1@8 ~@2 e2 ~ a2@4 ~@2 a2@4 ~@2", H: "d2@8 ~@2 a1 ~ d2@4 ~@2 d2@5 ~", I: "g2@8 ~@2 d2 ~ g2@5 ~ g2@5 ~",
  J: "b1@8 ~@2 b1 ~ d2@5 ~ g1@5 ~", K: "c2@8 ~@2 c2 ~ d2@7 ~ d2@2 d#2 ~", L: "e2@5 ~ f#2@5 ~ g#2@5 ~ e2@5 ~",
  M: "a1@5 ~@5 e2 ~ a2@2 ~@2 a2@2 ~@2 a2@2 ~@2", N: "d2@7 ~", O: "g1@10 g1 ~ b1@10 b1 ~", P: "c2@10 c2 ~ d2@5 ~ d2@5 ~",
  Q: "g1@10 g1 ~ e1@6 ~@4 b1 ~", R: "g1@5 ~@5 d2 ~ g2@3 ~ g2@3 ~ g2@3 ~", S: "c2@8 c2 ~ d2 ~ d#2@5 ~ d#2@6",
  T: "[~ g2@29 ~@18]/2",
})).s("gm_electric_bass_finger").gain(0.64)

// chords · electric guitar jazz · "guitar"
const electric_guitar_jazz = note("<~@37 A B C D E F G H ~@10>".pickRestart({
  A: "~@2 [f#4,a4] [g4,b4] [g4,b4]@2 [g4,b4]@2 [f#4,a4]@2 [e4,g4] [f#4,a4]", B: "[f#4,a4]@2 [g4,b4]@2 [g4,b4]@15 ~@5",
  C: "~@2 [g4,b4] [a4,c5] [a4,c5]@2 [a4,c5]@2 [g4,b4]@2 [f#4,a4] [g4,b4]", D: "[g4,b4] [a4,c5]@10 ~",
  E: "~@2 [a4,c5] [b4,d5] [b4,d5]@2 [b4,d5]@2 [a4,c5]@2 [g4,b4] [a4,c5]", F: "[a4,c5] [b4,d5] [b4,d5]@9 ~",
  G: "~@2 [b4,d5] [c5,e5] [c5,e5]@2 [c5,e5]@2 [b4,d5]@2 [a4,c5] [b4,d5]", H: "[b4,d5] [c5,e5]@11",
})).s("gm_electric_guitar_jazz").gain(0.6)

// drums · kick
const kick = s("bd").struct("<~ A@4 B@7 A B@4 C D B@9 A B@4 C D B@9 A B@4 C E B A F ~>".pickRestart({
  A: "x ~@4 x!2 ~@5", B: "x ~@4 x!2 ~@3 x!2", C: "x ~@4 x!2 ~ x ~ x ~", D: "x", E: "x ~@2 x!2 ~", F: "~ x ~@22",
})).gain(0.56)

// drums · snare
const snare = s("sd").struct("<A B@3 C B@13 D B@15 D B@15 E B@2 ~@2>".pickRestart({
  A: "~@6 x ~ x ~ x ~ x ~ x ~ x ~ x ~ x!2 ~@2", B: "~ x ~ x", C: "~@6 x ~@11 x ~ x!3 ~", D: "~@3 x",
  E: "~@2 x!3 ~@13 x ~@5",
})).gain(0.56)

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

// drums · hihat
const hihat = s("hh").struct("<~@5 A B@6 C A B@3 D ~ E F A B@6 C A B@3 D ~ E F A B@6 C A B@3 D G E H ~@2>".pickRestart({
  A: "~ x!10 ~", B: "x!11 ~", C: "x!10 ~@2", D: "~ x!5 ~ x ~ x ~ x", E: "~ x!4 ~ x!5 ~", F: "x!5 ~ x!5 ~",
  G: "~@7 x ~@4", H: "x!5 ~ x!3 ~@3",
})).gain(0.56)

// drums · mid tom
const mid_tom = s("mt").struct("<~@50 [~@6 x ~ x!2 ~@14] ~ [~@5 x] ~@2>").gain(0.56)

// drums · open hat
const open_hat = s("oh").struct("<~@5 A@7 ~ A@4 B ~ C@2 A@7 ~ A@4 B ~ C@2 A@7 ~ A@4 B D C E F ~>".pickRestart({
  A: "~@11 x", B: "~@3 x!3", C: "~@5 x ~@5 x", D: "~@3 x!2 ~", E: "~@5 x ~@6", F: "~ x ~@2 x!2 ~ x!8 ~@9",
})).gain(0.56)

// drums · open hat · soft notes
const open_hat_soft = s("oh").struct("<~@53 [~@16 x!8] [~ x!3 ~@20]>").gain(0.32)

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

// drums · ride
const ride = s("rd").struct("<~ [~ x!11] [x!12]!2 [x!10 ~@2] ~@50>").gain(0.56)

stack(epiano2, bass, electric_guitar_jazz, kick, snare, low_tom, hihat, mid_tom, open_hat, open_hat_soft, crash, ride)