// s Nachts na tweeen — De Havenzangers
// 118 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 9 trumpet (copy of ch 4 lead 8 bass lead)
// note: Full arrangement: all 93 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(118/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, A@4 for four bars: edit a riff to change every repeat.

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~ A B A B@2 C D E B C F G H I J K L@2 M@2 A@2 B@2 L@2 M@2 A@2 B@3 C D E B C F G H I J K L@2 M@2 A@2 B@2 L@2 M@2 A@2
  B@3 C D E B C F G H I J K L@2 M@2 A@2 B@2 L@2 M@2 A@2 B@2 A@2 B N
>`.pickRestart({
  A: "~@2 [b3,d4,g4] ~@3 [b3,d4,g4] ~@3 [b3,d4,g4] ~@3 [b3,d4,g4] ~", // G
  B: "~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] ~", // C
  C: "~@2 [c4,f4,a4] ~@3 [c4,f4,a4] ~@3 [c4,f4,a4] ~@3 [c4,f4,a4] ~", // F
  D: "~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [a3,c#4,e4] ~@3 [a3,c#4,e4] ~", // C A
  E: "~@2 [a3,d4,f4] ~@3 [a3,d4,f4] ~@3 [g3,b3,d4] ~@3 [g3,b3,d4] ~", // Dm G
  F: "~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [b3,d4,g4] ~@3 [b3,d4,g4] ~", // C G
  G: "~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~ [c4,e4,g4] ~@7", // C
  H: "~@2 [e4,g#4,b4] ~@3 [e4,g#4,b4] ~@3 [e4,g#4,b4] ~@3 [e4,g#4,b4] ~", // E
  I: "~@2 [e4,a4,c5] ~@3 [e4,a4,c5] ~@3 [e4,a4,c5] ~@3 [e4,a4,c5] ~", // Am
  J: "~@2 [d4,f#4,a4] ~@3 [d4,f#4,a4] ~@3 [d4,f#4,a4] ~@3 [d4,f#4,a4] ~", // D
  K: "[d4,g4,b4] ~@2 [d4,g4,b4]!2 ~ [d4,g4,b4] ~ [d4,g4,b4] ~@7", // G
  L: "[~@2 [c4,f4,a4] ~@3 [c4,f4,a4] ~@3 [c4,f4,a4] ~@3 [c4,f4,a4]@8 [c4,f4,a4] ~@3 [c4,f4,a4] ~@3 [c4,f4,a4] ~]/2", // F
  M: "[~@2 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4]@8 [c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] ~]/2", // C
  N: "[c4,e4,g4] ~@3 [c4,e4,g4] ~@3 [c4,e4,g4] ~@7", // C
})).s("gm_electric_guitar_clean").gain(0.38).pan(0.7)

// bass · electric bass finger
const bass = note(`<
  ~ A B C D E F G H E F I J K L M N F O E@2 P@2 Q R F O E@2 P@2 E S E F G H E F I J K L M N F O E@2 P@2 Q R F O E@2 P@2
  E S E F G H E F I J K L M N F O E@2 P@2 Q R F O E@2 P@2 E T U V E W
>`.pickRestart({
  A: "g2@2 ~@2 d2@2 ~@2 g2@2 ~@2 d2@3 ~", B: "c2@2 ~@2 g1@2 ~@2 c2@3 ~ g1@2 c2@2", C: "g2 ~ d2 ~ g2 ~ d2 ~",
  D: "c2@3 ~ g1@2 ~@2 a1@3 ~ b1@2 ~@2", E: "c2 ~ g1 ~ c2 ~ g1 ~", F: "f2 ~ c2 ~ f2 ~ c2 ~",
  G: "c2@2 ~@2 g1@3 ~ a1@3 ~ c2@4", H: "d2@3 ~ a1@3 ~ g1@3 ~ a1@2 b1@2", I: "c2@3 ~ g1@3 ~ d2@2 ~@2 g1@2 ~@2",
  J: "c2@2 ~@2 g1@3 ~ c2 ~ c2 ~ d2@2 d#2@2", K: "e2@2 ~@2 b1@2 ~@2 e2@3 ~ b1@3 ~",
  L: "a1@3 ~ e2@3 ~ a1@2 ~@2 c2@2 e2@2", M: "d2@3 ~ a1@3 ~ d2@2 ~@2 e2@2 f#2 ~", N: "g2@2 ~@2 d2@3 ~ g2@2 ~@2 g1@2 ~@2",
  O: "f2 ~ c2 ~ f2 ~ e2 d2", P: "d2 ~ g1 ~ d2 ~ g1 ~", Q: "c2@2 ~@2 g1@2 ~@2 c2@3 ~ g1@3 ~",
  R: "c2@3 ~ c2@3 ~ d2@3 ~ e2@3 ~", S: "c2@2 ~@2 g1@3 ~ a1@3 ~ b1@3 ~", T: "c2@2 ~@2 g1@3 ~ c2@2 c2@2 b1@2 a1@2",
  U: "g1@2 ~@2 d2@3 ~ g1@3 ~ b1@2 d2@2", V: "g1@3 ~ d2@3 ~ g1@3 ~ b1@2 ~@2", W: "c2 ~ g1 ~ c2 ~@3",
})).s("gm_electric_bass_finger").gain(0.35)

// chords · accordion
const accordion = note(`<
  A B C D E F G H I F G J K L M N O P Q R S T U V W X Q R Y T@2 Z AA F G H I F G J K L M N O P Q R S T U V W P Q R Y T@2
  AB AA F G H I F G J K L M N O P Q R S AC U V W X Q R Y T@2 AD AE AC AF AG ~
>`.pickRestart({
  A: "~@3 [g4,e5]", B: "[f4,d5]@2 [g4,e5] [a4,f5] ~ [g4,e5] ~ [f4,d5]",
  C: "[e4,c5]@2 [f4,d5] [g4,e5] ~ [f4,d5] ~ [e4,c5]", D: "[d4,b4]@4 [e4,c5]@2 [f4,d5]@3 ~ [e4,c5]@2 [d4,b4]@3 ~",
  E: "[e4,c5]@2 ~@2 [e4,g4,b4]@4 [f4,a4,c5]@4 [f4,g4,d5]@3 ~", // C Em F G7
  F: "[e4,g4] ~ [e4,g4] ~ [e4,g4] ~ [e4,g4]@2 [d4,f4]@2 [c4,e4]@2 [b3,d4]@2 [a3,c4]@2", // Em Dm C Bm Am
  G: "[a4,c5] ~ [a4,c5] ~ [a4,c5] ~ c5@2 [b4,d5]@2 [a4,c5]@2 [g4,b4]@2 a4@2, ~@6 a4 ~@7 f4 ~", // Am Bm Am G
  H: "g4@2 [e4,g4] ~ [e4,g4] ~ g4@2 [c#4,a4]@2 g4@2 [d4,f4]@2 [e4,g4]@2, e4 ~@5 d4 ~@9", // Em F#m Dm Em
  I: "[d4,f4]@4 [f4,a4]@4 [g4,b4]@5 ~@3, ~@2 d4@5 ~", // Dm F G
  J: "[e4,g4] ~ [e4,g4] ~ g4@2 [c4,e4]@2 f4@2 [b3,g4]@2 [c4,e4]@2 [d4,f4]@2, ~@4 d4 ~@3 b3 ~@7", // Em C Em C Dm
  K: "[c4,e4]@3 ~@7 [c4,e4]@2 [d4,f#4]@2 g4@2, ~@14 d#4 ~", // C D
  L: "[e4,g#4] ~ [e4,g#4] ~ [e4,g#4] ~ e4@2 [c5,e5]@2 [b4,d5]@2 [a4,c5]@2 [g#4,b4]@2, ~@6 g#4 ~@9", // E C Bm Am G#m
  M: "[a4,c5]@4 ~@6 [e4,a4] ~ a4@2 [e4,g4]@2, ~@12 e4 ~@3", // Am A5 Em
  N: "[d4,f#4] ~ [d4,f#4] ~ [d4,f#4] ~ d4@2 [b4,d5]@2 [a4,c5]@2 b4@2 [f#4,a4]@2, ~@6 f#4 ~@5 g4 ~@3", // D Bm Am F#m
  O: "[g4,b4]@2 ~ b4 [a4,c5] ~ [a#4,c#5] ~ [b4,d5]@2 ~@6, ~@3 g4@2 ~@11", // G Am A#m Bm
  P: "[a4,c5]@3 ~ [a4,c5]@4 [g#4,b4]@2 [a4,c5]@2 ~@4", Q: "~ [a4,c5] [g#4,b4] [a4,c5] [b4,d5] [a4,c5] [g4,b4] [f4,a4]",
  R: "[e4,g4]@3 ~ [e4,g4]@4 [d#4,f#4]@2 [e4,g4]@2 ~@4", // Em D#m Em
  S: "~ [e4,g4] [d#4,f#4] [e4,g4] [f4,a4] [e4,g4] [d4,f4] e4, ~@14 c4 ~", // Em D#m Em F Em Dm
  T: "[b3,g4]@3 ~ [b3,g4]@4 [g3,e4]@2 [f3,d4]@4 e4@2, ~@14 g3 ~", // Em C Dm
  U: "[b3,g4]@3 ~ [b3,g4]@4 [g3,e4]@2 [f3,d4]@4 [g3,d#4]@2", V: "[c4,e4]@8 [e4,g4]@7 ~",
  W: "[g4,c5]@7 ~ [c5,e5]@4 [b4,d5]@4", X: "[a4,c5]@3 ~ [a4,c5]@4 [g#4,b4]@2 c5@2 ~@4, ~@10 a4 ~@5",
  Y: "~ [e4,g4] [d#4,f#4] [e4,g4] [f4,a4] [e4,g4] [d4,f4] [c4,e4]", // Em D#m Em F Em Dm C
  Z: "e3@7 ~@3 [g4,d#5]@2 [g4,d#5]@2 [g4,d#5]@2, c4@5 ~@11", AA: "[e4,c5]@7 ~@9",
  AB: "[e3,c4]@7 ~@3 [g4,d#5]@2 [g4,d#5]@2 [g4,d#5]@2", AC: "[b3,g4]@3 ~ [b3,g4]@4 [g3,e4]@2 [f3,d4]@4 [g3,e4]@2",
  AD: "e3@7 ~@9, c4@5 ~@11", AE: "~@6 [g3,e4] a3, ~@14 f4 ~", AF: "[b3,g4]@3 ~ [b3,g4]@4 [c4,a4]@2 [b3,g4]@4 [c4,a4]@2",
  AG: "[e4,c5]@13 ~@3", // C
})).s("gm_accordion").gain(0.46)

// other · brass section
const brass_section = note(`<
  A B C D E ~@3 F ~@3 G ~@3 H I ~ J ~ K L M N O ~ J ~ P Q R ~@4 F ~@3 G ~@3 H I ~ J ~ S L M N O ~ J ~ P Q R ~@4 F ~@3 G
  ~@3 H T ~ J ~ K L M N O ~ J ~ P Q R ~ U@2 ~ V
>`.pickRestart({
  A: "~@3 e5", B: "d5@3 ~ e5@2 f5@2 ~@2 e5@2 ~@2 d5@2", C: "c5@3 ~ d5@2 e5@3 ~ d5@2 ~@2 c5@2",
  D: "b4@3 ~ c5@2 d5@2 ~@2 c5@2 b4@3 ~", E: "c5@3 ~@13", F: "~@4 d4@3 ~ g4 ~ f4 ~ e4 ~ d4 ~",
  G: "~@2 d#4 e4 ~ g4 e4 ~ c4 ~@7", H: "b4@2 ~ b4 c5 ~ c#5 ~ d5@2 ~@6", I: "c5@3 ~ c5@4 b4@2 c5@2 ~@4, b4 ~@15",
  J: "g4@3 ~ g4@4 f#4@2 g4@2 ~@4", K: "g4@2 ~@2 g4@4 e4 ~ d4@4 e4 ~", L: "g4@3 ~ g4@4 e4 ~ d4@3 ~ d#4@2",
  M: "e4@8 g4@7 ~", N: "c5@7 ~ e5@4 d5@3 ~", O: "c5@2 ~@2 c5@4 b4@2 c5 ~@5", P: "g4@3 ~ g4@4 e4 ~ d4@4 e4 ~",
  Q: "g4 ~ g4@2 e4 d4@2 e4", R: "c4@7 ~@9", S: "~ g4@2 ~ g4@4 e4 ~ d4@4 e4 ~", T: "c5@3 ~ c5@4 b4@2 c5@2 ~@4",
  U: "g4/2", V: "~@2 g4 ~ c5 ~@3",
})).s("gm_brass_section").gain(0.64).pan(0.4)

// other · trombone
const trombone = note(`<
  A B C D E ~@3 F ~@3 G H I J K L ~ M ~ N O P Q L ~ R ~ S O T U ~@3 F ~@3 G H I J K L ~ M ~ N O P Q L ~ R ~ S O T U ~@3
  F ~@3 G H I J K L ~ M ~ N O P Q L ~ R ~ S O T U V@2 W X
>`.pickRestart({
  A: "~@3 e4", B: "d4@4 e4@2 f4@3 ~ e4@2 ~@2 d4@2", C: "c4@2 d4 e4 ~ d4 ~ c4", D: "b3@3 ~ c4@2 d4@2 ~@2 c4@2 b3@4",
  E: "c4@2 ~@2 g3@3 ~ a3@3 ~ b3@2 ~@2", F: "~@4 d3@3 ~ g3 ~ f3 ~ e3 ~ d3 ~", G: "~@2 d#3 e3 ~ g3 e3 ~ c3 ~@7",
  H: "[g#3,b3]", I: "[a3,c4]@13 ~@3", J: "f#3@4 a3@3 ~", K: "g3@2 ~ g3 a3 ~ a#3 ~ b3@2 ~@6",
  L: "a3@3 ~ a3@3 ~ g#3 ~ a3@2 ~@4", M: "e3@3 ~ e3@4 d#3 ~ e3@3 ~@3", N: "[b3,d4]@3 ~ b3@3 ~ g3 ~ f3@4 g3 ~",
  O: "b3@3 ~ b3@3 ~ g3@2 f3@4 g3@2", P: "g3 c4", Q: "e4@3 ~ c4@2 b3@2", R: "e3@3 ~ e3@4 d#3@2 e3@2 ~@4",
  S: "b3@3 ~ b3@4 g3 ~ f3@3 ~ g3 ~", T: "e3@6 ~@5 [c3,c4] [d#3,d#4] ~ [d#3,d#4]@2", U: "[c3,c4]@7 ~@9",
  V: "[g3@31 ~]/2", W: "~@4 [d#3,d#4] ~ [d#3,d#4]@2 [c3,c4]@2 ~@2 [d#3,d#4] ~ [d#3,d#4]@2", X: "[c3,c4] ~ d4 ~ e4 ~@3",
})).s("gm_trombone").gain(0.29).pan(0.6)

// other · lead 3 calliope
const lead_3_calliope = note(`<
  ~@5 A B C D E B F G H I J K L M N O P Q R S L M T U P V W X A B C D E B F G H I J K L M N O P Q R S L M T U P V W X A
  B C D E B F G H I J K L M N O P Q R S L M T U P V W X Y Z AA ~
>`.pickRestart({
  A: "e5 ~ e5 ~ e5 ~ e5@2 d5@2 c5@2 ~@2 a4@2", B: "a5 ~ a5 ~ a5 ~ a5 ~ b5@2 a5@2 g5@2 f5 ~",
  C: "e5 ~ e5 ~ e5 ~ d5 ~ c#5@3 ~ d5@2 e5@2", D: "d5@3 ~@13", E: "e5 ~ e5 ~ e5 ~ e5@2 d5@2 c5@2 b4@2 a4@2",
  F: "e5 ~ e5 ~ d5 ~ c5@2 b4 ~ b4@2 c5@2 d5@2", G: "c5@2 ~@8 c5@2 d5@2 d#5 ~",
  H: "e5 ~ e5 ~ e5 ~ e5@2 c6@2 b5@2 a5@2 g#5@2", I: "a5@3 ~@7 e5 ~ e5 ~ e5@2",
  J: "d5 ~ d5 ~ d5 ~ d5@2 b5@2 a5@2 g5 ~ f#5@2", K: "g5@2 ~@2 a5 ~ a#5 ~ b5@2 ~@6, ~@3 g5@2 ~@11",
  L: "a5@3 ~ a5@4 g#5@2 a5@2 ~@4", M: "~ a5 g#5 a5 b5 a5 g5 f5", N: "[e5,g5]@3 ~ e5@4 d#5@2 e5@2 ~@4",
  O: "~@2 [e5,g5]@2 d#5@2 e5@2 f5@2 e5@2 d5@2 c5 ~", P: "b4@3 ~ b4@3 ~ g4@2 f4@3 ~ g4 ~",
  Q: "b4@3 ~ b4@3 ~ g4@2 f4@3 ~ g4@2", R: "c5@8 e5@7 ~", S: "g5@7 ~ c6@3 ~ b5@3 ~", T: "e5@3 ~ e5@4 d#5@2 e5@2 ~@4",
  U: "~ e5 d#5 e5 f5 e5 d5 c5", V: "b4@3 ~ b4@4 g4@2 f4@4 g4 ~", W: "e4@7 ~@9", X: "e5@7 ~@9", Y: "~@2 b4@2 g4 f4@2 g4",
  Z: "b4@3 ~ b4@3 ~ c5@2 b4@4 c5@2", AA: "e5@13 ~@3",
})).s("gm_lead_3_calliope").gain(0.11)

// other · glockenspiel
const glockenspiel = note(`<
  ~@17 A B C D E F G H I B C D E@2 J ~@13 A B C D E F G H I B C D E@2 J ~@13 A B C D E F G H I B C D E@2 J ~ E K L ~
>`.pickRestart({
  A: "c6 ~ c6@2 b5 c6 ~@2", B: "~ c6 b5 c6 d6 c6 b5 a5", C: "g5 ~ g5@2 f#5 g5 ~@2", D: "~ g5 f#5 g5 a5 g5 f5 e5",
  E: "g5@3 ~ g5@4 e5@2 d5@4 e5@2", F: "g5@3 ~ g5@4 e5@2 d5@4 d#5@2", G: "e5 g5", H: "c6@2 e6 d6",
  I: "c6@3 ~ c6@4 b5@2 c6@2 ~@4", J: "c5@5 ~@11", K: "g5@3 ~ g5@4 a5@2 g5@4 a5@2", L: "c6@5 ~@11",
})).s("gm_glockenspiel").gain(0.56)

// drums · kick
const kick = s("bd").struct("<~ [x!4]!91 [x!3 ~]>").gain(0.64)

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

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@4 [~@12 x!3 ~] ~@88>").gain(0.64)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~ A@3 ~ A@7 ~ A@3 ~ A@7 ~ A@7 ~ A@7 ~ A@3 ~ A@7 ~ A@7 ~ A@7 ~ A@3 ~ A@7 ~ A@7 ~ A@3 B
>`.pickRestart({
  A: "~@7 x", B: "~ x!2 ~",
})).gain(0.48)

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

// drums · tambourine
const tambourine = s("tb").struct("<~@17 [x!16]!16 ~@12 [x!16]!16 ~@12 [x!16]!19 [~ x!2 ~]>").gain(0.24)

stack(
  electric_guitar_clean, bass, accordion, brass_section, trombone, lead_3_calliope, glockenspiel, kick, snare, hihat,
  mid_tom, open_hat, crash, tambourine
)