// How Soon Is Now — The Smiths
// 95 bpm, 4/4, key F# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: ch 13 "main guitar" named as a guitar, played on electric guitar clean (its synth bass 1 patch is not one); ch 14 "main guitar" named as a guitar, played on electric guitar clean (its synth bass 1 patch is not one)
// note: duplicate parts dropped: ch 8 "klank runs 2" orchestral harp (copy of ch 7 "klank runs" xylophone)
// note: Full arrangement: all 163 bars on a 48-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): harmonics, main guitar.
setcpm(95/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 finger · "bass"
const bass = note(`<
  ~@4 A B C D A B C D A B C D A E F G H I J G H B C D K B C D A B C D A B C D A E F L H E F L H B C D K B C D A B C D A
  B C D A E F L H E F L H B C D K B C D A B C D A B C D A E F L H E F L H B C M N O P Q R O P Q R O P Q R S T U V S T U
  ~@4 R O P Q R O P Q R O P Q R S T U V S T U V O P Q R O P Q R O P Q R O P Q R P ~
>`.pickRestart({
  A: "a1@3 a1@2 ~ a1@2 a1@2 b1@4 b1@2", B: "e1 f#1 ~ f#1 ~@2 f#1@3 ~ f#1@3 f#1@2 ~",
  C: "e1 f#1@2 f#1@2 ~ f#1@3 f#1@4 ~ f#1@2", D: "[d1,e1] f#1@2 f#1@2 ~ f#1@3 f#1@3 ~@2 f#1@2",
  E: "b1@2 ~ b1@2 ~ b1@4 d2 ~ d2@4", F: "a1@2 ~ a1 ~@2 a1@4 e2 ~ e2@3 ~", G: "c#2 ~@2 c#2 ~@2 c#2@2 ~@2 e1 ~ e1@2 ~@2",
  H: "f#1@13 ~@3", I: "b1@2 ~ b1@2 ~ b1@4 d2@2 d2@4", J: "a1@2 ~ a1 ~@2 a1@4 e2@2 e2@3 ~",
  K: "a1@3 a1@2 ~ a1@2 b1@2 ~ b1@2 ~ b1@2", L: "c#2@2 ~ c#2@2 ~ c#2@2 e1@2 ~ e1@2 ~ e1@2",
  M: "[d1,e1]@3 f#1@6 f#1@6 ~@3 f#1@9 f#1@9 ~@7 f#1@5", N: "~ a1@9 a1@6 ~@3 a1@6 b1@6 ~@3 b1@6 ~@3 b1@5",
  O: "~ e1@3 f#1@3 ~@3 f#1@3 ~@6 f#1@9 ~@3 f#1@9 f#1@6 ~@2", P: "~ e1@3 f#1@6 f#1@6 ~@3 f#1@9 f#1@12 ~@3 f#1@5",
  Q: "~ [d1,e1]@3 f#1@6 f#1@6 ~@3 f#1@9 f#1@9 ~@6 f#1@5", R: "~ a1@9 a1@6 ~@3 a1@6 a1@6 b1@12 b1@5",
  S: "~ b1@6 ~@3 b1@6 ~@3 b1@12 d2@3 ~@3 d2@11", T: "~ a1@6 ~@3 a1@3 ~@6 a1@12 e2@3 ~@3 e2@9 ~@2",
  U: "~ c#2@6 ~@3 c#2@6 ~@3 c#2@6 e1@6 ~@3 e1@6 ~@3 e1@5", V: "~ f#1@39 ~@8",
})).s("gm_electric_bass_finger").gain(0.43)

// bass · slap bass 2 · "bass 2"
const bass_2 = note(`<
  ~@5 A B C D A B C D A B C D E F G H E I G H ~@4 A B C D A J C D A J C D E F G H E F G H ~@4 A J C D A B C D A J C D E
  F G H E F G H ~@5 J C D A B C D ~ B C D E F G H E F G H ~@5 K L M ~ K L M ~ K L M N O P Q N O P ~@5 R K L M R K L M ~
  K L M N O P Q N O P Q ~@5 K L M R K L M ~ K L M S ~
>`.pickRestart({
  A: "e1@2 f#1@2 ~@2 f#1@4 f#2@3 ~ d#2 e2", B: "e1 f#1 ~ f#1@2 d#2 ~ d#2", C: "e1 f#1 ~ f#1@3 ~@2",
  D: "a1@3 a1@3 a1@4 b1@5 ~", E: "b1@2 ~ b1@2 ~ b1@4 d2@2 d2@4", F: "a1@2 ~ a1@2 ~ a1@4 e2 ~ e2@3 ~",
  G: "c#2 ~@2 c#2 ~@2 c#2@2 ~@2 e1 ~ e1@2 ~@2", H: "f#1@13 ~@3", I: "a1@2 ~ a1@2 ~ a1@4 e2@2 e2@3 ~",
  J: "e1 f#1 ~ f#1@2 d#2 ~ a2", K: "~ e1@6 f#1@6 ~@6 f#1@12 d#2@6 ~@6 d#2@5", L: "~ e1@6 f#1@6 ~@6 f#1@18 ~@11",
  M: "~ a1@9 a1@9 a1@12 b1@15 ~@2", N: "~ b1@6 ~@3 b1@6 ~@3 b1@12 d2@6 d2@11",
  O: "~ a1@6 ~@3 a1@6 ~@3 a1@12 e2@3 ~@3 e2@9 ~@2", P: "~ c#2@3 ~@6 c#2@3 ~@6 c#2@6 ~@6 e1@3 ~@3 e1@6 ~@5",
  Q: "~ f#1@39 ~@8", R: "~ e1@6 f#1@6 ~@6 f#1@12 f#2@9 ~@3 d#2@3 e2@2", S: "~ e1@6 f#1@6 ~@6 f#1@12 ~@17",
})).s("gm_slap_bass_2").gain(0.12)

// other · koto
const koto = note(`<
  ~@17 A B C D A B C E ~@16 A B C D A B C E ~@16 A B C D A B C E ~@16 A B C D A B C E ~@16 F G H I F G H ~@17 F G H I F
  G H J ~@18
>`.pickRestart({
  A: "c#4@2 ~ c#4@2 ~ c#4@4 a3 ~ a3@3 ~", B: "a3@2 ~ a3@2 ~ a3@4 g#3 ~ g#3@3 ~",
  C: "c#4 ~@2 c#4 ~@2 c#4@2 ~@2 e4 ~ e4@2 ~@2", D: "f#4@13 ~@3", E: "f#4@7 ~",
  F: "~ c#4@6 ~@3 c#4@6 ~@3 c#4@12 a3@3 ~@3 a3@9 ~@2", G: "~ a3@6 ~@3 a3@6 ~@3 a3@12 g#3@3 ~@3 g#3@9 ~@2",
  H: "~ c#4@3 ~@6 c#4@3 ~@6 c#4@6 ~@6 e4@3 ~@3 e4@6 ~@5", I: "~ f#4@39 ~@8", J: "~ f#4@42 ~@5",
})).s("gm_koto").gain(0.19)

// other · xylophone · "klank runs"
const xylophone = note("<~@76 A B@2 ~@5 A B@2 ~@17 C D@2 ~@25 C D@2 ~@13 C D@2 ~@3 C E C D@2 ~@4>".pickRestart({
  A: "~@43 c#5 ~ c#5!2 ~", B: "[c#5 ~ a4 ~ g#4 ~ f#4 c#5 ~ c#5 a4 ~ g#4 ~ f#4 e5@15 ~@2]/2", C: "~@43 c#5 ~ c#5 ~ c#5",
  D: "[~ c#5@3 ~@3 a4@3 ~@3 g#4@3 ~@3 f#4@3 c#5@3 ~@3 c#5@3 a4@3 ~@3 g#4@3 ~@3 f#4@3 e5@45 ~@5]/2",
  E: "~ c#5@3 ~@3 a4@3 ~@3 g#4@3 ~@3 f#4@3 ~@26",
})).s("gm_xylophone").gain(0.4)

// other · guitar harmonics · "harmonics"
const guitar_harmonics = note("<~@24 A@3 B ~@20 A@3 B ~@44 A ~ A B ~@44 C@3 ~@16>".pickRestart({
  A: "~@7 d#5", B: "~ a#4 ~@6", C: "~@19 a#5@3 ~@3 a#4@6 ~@17",
})).s("gm_guitar_harmonics").gain(0.13)

// chords · electric guitar clean · "main guitar"
const electric_guitar_clean = note(`<
  ~ A B A C A@2 B C A B A C A B A C D E F A D E F A@2 B A C A@2 B C A@2 B C A@2 B C D E F A D E F A@2 B A C A@2 B C A@2
  B C A@2 B C D E F A D E F A B A B C A@3 C A@2 B C A@3 C D E F A D E F A@2 B G H I@2 J H I@2 J H I@2 J H K L M I K L M
  I@2 J I H I@2 J H I@2 J H I@2 J H K L M I K L M I@2 J I H I@2 J H I@2 J H I J@2 H J ~
>`.pickRestart({
  A: "[f#2,c#3,f#3]!16", B: "[e2,c#3,f#3]!2 [f#2,c#3,f#3]!14", C: "[a2,e3,a3]!10 [b2,f#3,b3]!6",
  D: "[b2,f#3,b3]!10 [d3,a3,d4]!6", E: "[a2,e3,a3]!10 [e2,b2,e3]!6", F: "[c#3,g#3,c#4]!10 [e2,b2,e3]!6",
  G: "[f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 ~ [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@2", // F#5
  H: "~ [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@2", // A5 B5
  I: "~ [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@2", // F#5
  J: "~ [e2,c#3,f#3]@3 [e2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@3 [f#2,c#3,f#3]@2", // F#7 F#5
  K: "~ [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [b2,f#3,b3]@3 [d3,a3,d4]@3 [d3,a3,d4]@3 [d3,a3,d4]@3 [d3,a3,d4]@3 [d3,a3,d4]@3 [d3,a3,d4]@2", // B5 D5
  L: "~ [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [a2,e3,a3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@2", // A5 E5
  M: "~ [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [c#3,g#3,c#4]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@3 [e2,b2,e3]@2", // C#5 E5
})).s("gm_electric_guitar_clean").gain(0.07)

// drums · kick
const kick = s("bd").struct(`<
  ~@4 A@32 B A@3 B A@35 B A@7 B A@14 C D@4 E D@3 E D@3 E D@7 F ~@2 D E D E@3 D@3 E D@3 E D@15 E D@7 E D ~
>`.pickRestart({
  A: "x ~@2 x ~@2 x ~@3 x ~@5", B: "x!2", C: "x ~@8 x ~@8 x ~@12 x ~@16", D: "~ x ~@8 x ~@8 x ~@11 x ~@16",
  E: "~ x ~@23 x ~@22", F: "~ x ~@46",
})).gain(0.56)

// drums · snare
const snare = s("sd").struct(`<
  ~@4 A@15 B A@3 B A@19 B A@23 B A@3 B A@23 B A@3 C D@15 E D@3 E ~@3 D@5 E D@10 E D@22 ~
>`.pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@7 x!4", C: "~@12 x ~@24 x ~@10", D: "~@13 x ~@23 x ~@10",
  E: "~@13 x ~@23 x ~@2 x ~@2 x ~@2 x ~",
})).gain(0.64)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@4
  [x!16]!95
  [x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@3 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~]
  [~ x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~]!20
  ~@3
  [~ x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~@2 x ~]!39
  ~
>`).gain(0.48)

// drums · low tom
const low_tom = s("lt").struct("<~@47 [~@14 x!2] ~@115>").gain(0.48)

// drums · mid tom
const mid_tom = s("mt").struct("<~@47 A ~@43 B ~@51 C ~@17 C ~>".pickRestart({
  A: "~@12 x!2 ~@2", B: "~@12 x!4", C: "~@37 x ~@2 x ~@2 x ~@2 x ~",
})).gain(0.48)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@4 A ~@3 A ~@3 A ~@3 A ~@3 A ~@7 A ~@3 A ~@7 A ~@3 A ~@7 A ~@3 A ~@3 A ~@3 A ~@3 A ~@11 A ~@7 A ~@3 A ~@7 A ~@11 A
  ~@3 A ~@6 A ~@12 A ~@3 A ~@7 A ~@7 A ~@6
>`.pickRestart({
  A: "~@31 x ~@16",
})).gain(0.56)

// drums · high tom
const high_tom = s("ht").struct("<~@47 A ~@43 B ~@51 C ~@17 C ~>".pickRestart({
  A: "~@10 x!2 ~@4", B: "~@9 x!3 ~@4", C: "~@28 x ~@2 x ~@2 x ~@13",
})).gain(0.48)

// drums · splash
const splash = s("cr").struct(`<
  ~@4 A@2 ~@11 A ~@6 A ~@11 B ~@4 A ~@6 A ~@16 A ~@6 A ~@3 B ~@7 B ~@4 A ~@6 A ~@7 C ~@3 C ~@3 D@2 ~@10 C D ~ D C D ~@2
  C D ~@2 D@2 ~@5 E D ~@2 D ~@4 C ~@7 C ~@2
>`.pickRestart({
  A: "x", B: "x!2", C: "~ x ~@23 x ~@22", D: "~ x ~@46", E: "~@5 x",
})).gain(0.56)

// drums · shaker
const shaker = s("sh").struct("<~ [x!4]!3 ~@116 [~ x ~@11 x ~@11 x ~@11 x ~@10]!3 ~@40>").gain(0.64)

stack(
  bass, bass_2, koto, xylophone, guitar_harmonics, electric_guitar_clean, kick, snare, hihat, low_tom, mid_tom,
  open_hat, high_tom, splash, shaker
)