// Samen zijn — Willeke Alberti
// 77 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 54 bars on a 24-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(77/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 · piano
const piano = note(`<
  A B C D E F G@2 H I J K H@2 L M N O P Q R S T U V@2 W X Y Z AA AB AC AD AE AF AG AH W X Y Z AA AB AC AD AE AF AI@2 AJ
  AK@3
>`.pickRestart({
  A: "~@6 d6@5 ~ [c5,d#5,g5]@6 [c5,d#5,g5]@6, [c4,g4,e5,g5]@11 ~ [d#4,c6]@12", // Cm C Cm
  B: "~@6 [a5,c6]@5 ~ [d5,f5]@6 [b4,d5,f5]@5 ~, [d4,a4,c5,f5]@11 ~ [g3,f4,b5]@11 ~", // Am Dm Bdim Dm7 G7
  C: "~@2 [g5,g6]@2 [f3,c4,f5,f6]@2 ~ [d5,d6], [c4,g4,e5,e6]@2 ~ [g3,d4]", // G F5 D C G5
  D: "~@6 c4@3 [c4,e5]@3 d5@3 ~@6 d5@2 ~, c3 ~, e5@9 ~@9 [f4,f5]@5 ~, ~@3 g4@9 d4@7 ~@5, ~@6 c5@6 ~@3 g4@7 ~@2", // C F
  E: "[g4,c5,e5] g4 [c5,e5] g4 c5 g4 ~ g4, c4@7 ~, ~@2 e5 [b4,d5]", // C Bm
  F: "[c5,e5] g4 [c5,e5] g4 c5 g4 ~ g4, c4, ~@2 e5 [b4,d5]", G: "[c5,e5] g4 [c5,e5] g4 c5 g4 d5 g4, c4, ~@2 e5 b4",
  H: "[a4,c5] f4 [a4,c5] f4 [a4,c5] f4 [a4,c5] f4, f3", I: "[a4,c5] f4 [a4,c5] f4 [a4,c5] f4 c5 f4, f3, ~@3 a4",
  J: "[c5,e5] g4 [c5,e5] g4 ~ g4 d5 g4, c4@7 ~, ~@2 [c5,e5] b4", // C
  K: "[c5,e5] g4 [c5,e5] g4 ~ g4 ~ g4, c4@3 [g3,b4,d5], ~@2 [c5,e5] ~", // C G C
  L: "[g4,c5] e4 [g4,c5] e4 [g4,c5] e4 [g4,b4] d4, c3@7 ~", M: "[g4,c5] e4 [g4,c5] e4 [g4,c5] e4 [g4,b4] e4, c3",
  N: "[a4,c5] e4 [a4,c5] e4 [a4,c5] e4 [a4,c5] e4, a3@7 ~", O: "[a4,c5] e4 [a4,c5] e4 [a4,c5] e4 [a4,c5] e4, a3",
  P: "[a4,e5] f4 [a4,e5] f4 [a4,d5] f4 [a4,d5] f4, d3", Q: "[a4,c#5] f4 [a4,c#5] f4 [a4,d5] f4 [a4,d5] f4, d3",
  R: "[b4,d5] g4 [b4,d5] g4 [b4,d5] g4 [b4,d5] g4, b3", S: "[b4,d5] g4 [b4,d5] g4 [b4,d5] g4 [b4,d5] g4, g3 f3",
  T: "g4 e4 g4 e4 g4 e4 g4 e4, e3 a3, d5 c5 b4 c5", U: "[f4,a4,c5] d4 [f4,a4,c5] d4 [f4,a4,c5] d4 [f4,a4,c5] d4, d3 g3",
  V: "[[c5,e5] g4 [c5,e5] g4 [b4,d5] g4 [b4,d5] g4 [c5,e5] g4 [c5,e5] g4 [c5,e5] g4 [c5,e5] g4, c3@47 ~]/2", // C Bm C
  W: "~@7 c4, c3, [d4,e4,g4] d4@3, ~ c4@2 c4@2 c4@2 ~, ~ [e4,g4]!3", X: "~@7 c4, c3, [e4,g4]!4, ~ c4@2 c4@2 c4@2 ~",
  Y: "d4@3 c4@3 ~@9 c4@3 c4 ~@2 c4@3, c3@19 ~@5, [e4,g4]!3 ~, ~@3 c4@2 ~ [e3,e4,g4]@2", // Em
  Z: "c4@2 ~@7 c4@3 c4@3 c4@3 c4@2 ~ c4@3, f3@3 [e3,e4,g4], [f4,a4]!3 ~, ~ c4@2 ~@5", // Em F
  AA: "d4@2 ~@13 d4@3 d4@3 d4@3, d3, [f4,a4]!4, ~ d4@2 d4@2 ~@3", // F
  AB: "d4@2 ~ d4@3 d4@3 d4@3 d4@3 d4@3 d4@3 d4@3, d3, [f4,a4]!4", // F
  AC: "d4@2 ~ d4@3 d4@3 d4@3 d4@3 ~@6 d4@3, c4, [f4,a4]!4, ~@5 d4@2 ~", // F
  AD: "b3@3 ~@6 g4@3 b3@3 b3@3 b3 ~@2 b3@3, g2@3 ~, g4@3 ~@5, ~ b3@3 [g3,d4,g4]@2 [f3,d4,g4]@2, ~ d4 ~@2", // G5 G7
  AE: "b3@2 ~@7 b3@3 b3@3 b3@3 b3@3 b3@3, e3, [e4,g4]!4, ~ b3@2 ~@5", // Em
  AF: "c4@2 ~ c4@3 c4@3 c4@3 c4@3 c4@3 [a3,c4]@3 [a3,c4]@3, a2, [e4,a4]!4", // Am A5
  AG: "c4@2 ~ c4@3 c4@3 c4@3 c4@2 ~ c4@3 [g3,c4]@3 [g3,c4]@3, d3 g2, [f4,a4]!4", // C5 F
  AH: "c4 ~@2 c4@3 ~@3 [c3,c4]@3 b3@2 ~ b3@3 ~@3 g2@2 ~, [c3,e4,g4]@6 [g3,d4,e4,g4]@6 g3@11 ~, ~@12 g4@6 [b3,d4,g4]@5 ~", // C Em7 G
  AI: "[c4@2 ~ c4@3 c4@3 c4@3 c4@2 ~ c4@3 [g3,c4]@3 c4@3 ~@6 d6@5 ~ [c5,d#5,g5]@6 [c5,d#5,g5]@6, d3@12 g2@23 ~@13, [f4,a4]@6 [f4,a4]@6 [f4,a4]@6 [f4,a4]@17 ~ [d#4,c6]@12, ~@21 g3@14 ~@13, ~@24 [c4,g4,e5,g5]@11 ~@13]/2", // C5 Cm F Cm C
  AJ: "~@6 [a5,c6]@6 [d5,f5]@6 ~ [b4,d5,f5]@5, [d4,a4,c5,f5] [g3,f4,b5]", // Am Dm Bdim Dm7 G7
  AK: "[~@9 [g5,g6]@7 [f5,f6]@7 ~@4 [d5,d6]@3 ~ c4@11 ~@4 c6@23 ~@3, ~@2 [c4,g4,e5,e6]@14 [f3,c4]@6 ~ [g3,d4]@7 ~ e6@14 g5@24 ~@3, ~@31 e5@12 g4@26 ~@3, ~@14 c4@9 ~, ~@44 [c5,e5]@25 ~@3]/3", // G F D C F5 G5 C
})).s("gm_piano").gain(0.48)

// chords · trombone · "Horns"
const trombone = note(`<
  A B C D E@4 F G H@2 I@2 J@2 K F L M N@2 O P Q R S@3 T U V W X Y Z AA AB S@3 T U V W X Y Z AA A AC AD@3
>`.pickRestart({
  A: "[c4,e4,g4] [c4,d#4,g4]", B: "[a3,c4,d4,f4] [g3,f4], ~@6 [b3,d4]@5 ~",
  C: "[c3,g3,c4,e4]@6 [e3,c4,e4,g4]@6 [d3,a3,c4]@6 g3@2 ~ [g3,d4]@3, ~@4 f4@3 ~, ~@3 [g2,b3]", // C D7 G5 G
  D: "[g3,c4,e4] [g3,b3,d4]", E: "e4@3 d4", F: "c4", G: "c4@3 a3",
  H: "[[g3,c4,e4]@27 ~ [g3,b3,d4] ~ [g3,b3,d4]@4 [e3,g3,c4] ~ [e3,g3,c4]@11 ~]/2", I: "c4/2",
  J: "[[g3,c4,e4]@14 [g3,b3,d4] [g3,b3,d4]@2 [e3,g3,c4] [e3,g3,c4]@6]/2", K: "c4!2 b3 d4", L: "[e4,g4] [d4,f4]",
  M: "[c#4,e4] [d4,f4]", N: "[~@2 g3@2 d4@6 g3@2 d4@3 g4]/2", O: "g4", P: "f4!2", Q: "c4@2 [g3,e4]@2 [f3,d4]@3 [e3,c4]",
  R: "[e3,c4]", S: "e3 c3 g3@2", T: "f3 c3 a3@2", U: "g3 f3", V: "f3@7 d3", W: "f3@3 a3", X: "g3", Y: "e3", Z: "a3",
  AA: "a3!2", AB: "g3 g4", AC: "[a3,c4,d4,f4] [g3,b3,f4], ~@6 d4@5 ~",
  AD: "[~@2 [c3,c4,e4]@7 [e3,c4,e4,g4]@7 [d3,a3,c4]@7 g3@3 ~ [g3,d4]@4 [c3,g3,c4,e4]@37 ~@4, ~@2 g3@6 ~@8 f4@11 ~@45, ~@23 [g2,b3]@8 ~@41]/3", // C D7 G5 C G
})).s("gm_trombone").gain(0.56)

// bass · fretless bass · "Bas"
const bass = note(`<
  A B C D E F G H I J G K J L M N O P Q R S T U V G W G@2 X Y Z@3 AA AB AC AD AE G@2 X Y Z@3 AA AB AC AD A B AF@3
>`.pickRestart({
  A: "e2 d#2", B: "d2 g1", C: "c2@3 g1", D: "c2@2 g2 g1", E: "c2@8 ~ c2 ~@2 c2@11 ~", F: "c2@8 ~ c2 ~@2 c2@6 g1@6",
  G: "c2@8 ~ c2@2 ~ c2@8 ~ g1@3", H: "c2@8 ~ c2@2 ~ c2@6 e1@6, ~@18 f1 ~@5", I: "f1@7 ~@2 f1 ~@2 f1@9 c2@3",
  J: "f1@8 ~ f1 ~@2 f1@8 ~ f1@3", K: "c2@8 ~ c2@2 ~ c2@6 g1@5 ~", L: "f1@7 ~@2 f1@2 ~ f1@8 ~ f1@3",
  M: "c2@7 ~@2 c2@2 ~ c2@6 g1@6", N: "c2@8 ~ c2 ~@2 c2@5 ~ b1@6", O: "a1@9 a1 ~@2 a1@9 e1@3",
  P: "a1@8 ~ a1@2 ~ a1@8 ~ a1@3", Q: "d2@8 ~ d2 ~@2 d2@9 a1@3", R: "d2@8 ~ d2 ~@2 d2@6 c2@5 ~",
  S: "b1@8 ~ b1@3 b1@6 a1@6", T: "g1@12 f1@8 ~ f1@3", U: "e1@12 a1@8 ~ a1@3", V: "d2@8 ~ d2@3 g1@7 ~@2 g1@3",
  W: "c2@8 ~ c2@2 ~ c2@8 ~ g1@2 ~", X: "c2@8 ~ c2@2 ~ c2@9 g1@2 ~", Y: "f1@3 c2 f2@2 e2@2",
  Z: "d2@8 ~ d2@2 ~ d2@8 ~ a1@3", AA: "g1@3 d2 g2 d2 g1 d2", AB: "e2@8 ~ e2@2 ~ e2@6 b1@3 e1@3",
  AC: "a1@8 ~ a1@2 ~ a1@5 ~ g1@5 ~", AD: "d2@8 ~ d2@3 g1@3 d2@3 g2@3 g1@3", AE: "c2@8 ~ c2@3 g1@7 g2@2 g1@2 ~",
  AF: "[~@2 c2@21 g1@8 c2@36 ~@5]/3",
})).s("gm_fretless_bass").gain(0.64)

// other · flute · "Fluit"
const flute = note("<A B C D ~@14 E F ~@4 G H ~@23 A B I@3>".pickRestart({
  A: "e5 d#5", B: "d5", C: "c5 g4", D: "g4", E: "e5 d5", F: "c#5 d5", G: "c5@6 e5@5 ~ d5@9 c5@2 ~", H: "c5@11 ~",
  I: "[~@2 c5@14 g4@15 c5@36 ~@5]/3",
})).s("gm_flute").gain(0.48)

// other · string ensemble 1 · "Strings"
const string_ensemble_1 = note(`<
  A B C D ~@7 E F@2 G@2 H I J K ~@2 L M N O P@2 Q R S@2 T U V W X Y P@2 Q R S@2 T U V W X A Z@4
>`.pickRestart({
  A: "g5 d6 c6 g5", B: "f5 c6 b5 f5", C: "e5@2 g5@2 f5@3 d5", D: "e5 g5", E: "~@5 c5 d5 e5", F: "[c5@6 a4 g4]/2",
  G: "g5/2", H: "~ c4 b3 d4", I: "c4", J: "[e4,g4] [d4,f4]", K: "[c#4,e4] [d4,f4]", L: "d5@6 c5@6 b4@6 c5@5 ~",
  M: "c5@12 c5@11 ~", N: "c5@2 e5@2 d5@3 c5", O: "c5@12 b4 ~ d5 e5 f5 g5 a5 b5 c6 d6 e6 f6, ~@13 c5@10 ~",
  P: "[g6@36 b4 c5 d5 e5 f5 g5 a5 b5 c6 d6 e6 f6]/2", Q: "g6@5 e6 c6 b5", R: "a5 c6 f6 g6",
  S: "[a6@36 c5 d5 e5 f5 g5 a5 b5 c6 d6 e6 f6 g6]/2", T: "a6", U: "d6@12 b4 c5 d5 e5 f5 g5 a5 b5 c6 d6 e6 f6",
  V: "g6@2 e6 b5", W: "b5 c6@3", X: "c6@3 e6 d6@3 c6", Y: "c6@12 b4 c5 d5 e5 f5 g5 a5 b5 c6 d6 e6 f6",
  Z: "[f5@6 c6@6 b5@7 f5@7 e5@7 g5@7 f5@11 d5@4 e5@37 ~@4]/4",
})).s("gm_string_ensemble_1").gain(0.56)

// chords · string ensemble 2 · "WStrings"
const string_ensemble_2 = note(`<
  A B C D ~@12 E@2 F@2 G H I@2 J@2 K@2 L M N@2 O G P Q R S K@2 L M N@2 O G P Q R A B T@3
>`.pickRestart({
  A: "[e3,c4,g4] [d#3,c4,g4]", B: "[d3,c4,f4] [g3,b3,f4]",
  C: "[c3,g3,c4,e4]@2 [e3,c4,e4,g4]@2 [d3,a3,c4]@2 [g3,b3] [g3,b3,d4], ~@4 f4@3 ~, ~@3 g2", D: "[c4,e4] [b3,d4], g3",
  E: "[a3,c4,e4]/2", F: "[e4 d4 c#4 d4, a3]/2", G: "[g3,b3,d4]", H: "[g3,b3,d4] [f3,b3,d4]",
  I: "[d4 c4 b3 ~ [d3,a3,f4]@2 [g3,a3,c4,f4]@2, e3 ~, g3 a3 ~@2, ~@3 c4@3 ~@2]/2", // Dm F
  J: "[[c4,e4] [b3,d4] [c4,e4]@2, [c3,g3]]/2", K: "[g3,c4,e4]/2", L: "[g3,c4,e4]", M: "[a3,f4]@3 [g3,e4], c4",
  N: "[f3,a3,d4,f4]", O: "[f3,c4,f4], a3@7 ~", P: "[b3,e4,g4]", Q: "[a3,c4,e4]", R: "[d3,a3,c4,f4] [g3,c4,f4]",
  S: "[g3,c4,e4] [b3,d4,g4]", // C G
  T: "[~@2 [c3,g3,c4,e4]@7 [e3,c4,e4,g4]@7 [d3,a3,c4]@7 [g3,b3]@4 [g3,b3,d4]@4 [c3,g3,c4,e4]@36 ~@5, ~@16 f4@11 ~@45, ~@23 g2@7 ~@42]/3", // C D7 G C
})).s("gm_string_ensemble_2").gain(0.48)

// chords · vibraphone · "Vibrafoon"
const vibraphone = note(`<
  A B@2 C D@4 E F D G H I G@2 J K L M ~@6 N@2 O P Q R@2 S T U V C N@2 O P Q R@2 S T U V A W X Y@2
>`.pickRestart({
  A: "[c5,e5,g5]@11 ~ [c5,d#5,g5]@11 ~", // C Cm
  B: "[[a4,c5,f5]@11 ~ [g4,b4,f5]@11 [g4,c5,e5]@12 ~ [a4,c5,f5]@5 ~ [g4,b4,f5]@5 ~]/2", // F G7 C F G7
  C: "[c5,e5,g5]@11 ~ [b4,d5,g5]@10 ~@2", D: "[g4,c5,e5]@3 [g4,b4,d5]", E: "[f4,a4,c5]", F: "[f4,a4]",
  G: "e5@3 [b4,d5]", H: "[a4,f5]", I: "[a4,c5]", J: "[a4,c5,e5]", K: "a4", L: "[f4,a4,e5] d5", M: "c#5 [a4,d5]",
  N: "[c5,e5,g5]@11 ~", O: "[c5,e5,g5]@23 ~", P: "[c5,f5,a5]@11 ~", Q: "[d5,f5,a5]@11 ~", R: "[d5,f5,a5]@23 ~",
  S: "[b4,f5,g5]@23 ~", T: "[b4,e5,g5]@23 ~", U: "[c5,e5,a5]@11 ~", V: "[c5,f5,a5]@17 ~ [c5,f5,a5]@5 ~",
  W: "[a4,c5,f5]@11 ~ [g4,b4,f5]@12", X: "~ [g4,c5,e5]@14 ~ [a4,c5,f5]@7 ~", Y: "[[g4,b4,f5]@6 ~ [g4,c5,e5]@34 ~@7]/2",
})).s("gm_vibraphone").gain(0.32)

// chords · vibraphone · "Vibrafoon" · soft notes
const vibraphone_soft = note("<~@9 A ~ B A C B@2 ~ D E F ~@34>".pickRestart({
  A: "c5", B: "[g4,c5]@3 g4", C: "f5", D: "[c5,e5]", E: "~ [f4,a4]", F: "[f4,a4] f4",
})).s("gm_vibraphone").gain(0.16)

// other · oboe · "Hobo"
const oboe = note("<A B C D ~@8 E F G H ~@2 I J ~@2 K L M N ~@8 O P Q R ~@8 O P Q A B S@3>".pickRestart({
  A: "g4 d5 c5 g4", B: "f4 c5 b4 f4", C: "e4@4 ~@2 g4@6 f4@9 d4@3", D: "e4 d4", E: "~ a4 a5 g5", F: "f5",
  G: "e5@2 a4 g4", H: "e4", I: "g5 f5", J: "e5 f5", K: "d5 c5 b4 c5", L: "f4", M: "e4@4 ~@2 g5@6 f5@9 e5@3",
  N: "e5@23 ~", O: "g5@2 c5 b4", P: "b4@3 c5@2 ~ c5@14 ~ c5@3", Q: "a4@4 g4@3 f4", R: "e4@5 ~",
  S: "[~ e4@5 ~@3 g4@7 f4@11 d4@4 e4@38 ~@3]/3",
})).s("gm_oboe").gain(0.56)

// other · timpani · "Pauken"
const timpani = note("<~@25 A B ~@6 C D ~@2 C E ~@6 C D ~@7>".pickRestart({
  A: "c3!24", B: "c3 ~@23", C: "g2!24", D: "[e2,g2] ~@23", E: "[g2,c3] ~@23",
})).s("gm_timpani").gain(0.48)

// drums · kick
const kick = s("bd").struct(`<
  [x ~@2 x!2 ~@3]!3
  [x!2]
  x!22
  [x ~@2 x!2 ~@3]!25
  [~ x ~@4 x ~ x ~@3]
  [~@7 x ~@11 x ~@3 x]
  [~@19 x ~@4]
>`).gain(0.56)

// drums · snare
const snare = s("sd").struct("<~@26 [~ x ~ x]!23 ~@5>").gain(0.64)

// drums · hihat
const hihat = s("hh").struct("<~@26 [x!7 ~]!23 ~@5>").gain(0.48)

// drums · open hat
const open_hat = s("oh").struct("<~@26 [~@7 x]!23 ~@5>").gain(0.48)

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

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

// drums · claves
const claves = s("clave:2").struct("<~@4 [~@3 x]!45 ~@5>").gain(2.74)

stack(
  piano, trombone, bass, flute, string_ensemble_1, string_ensemble_2, vibraphone, vibraphone_soft, oboe, timpani, kick,
  snare, hihat, open_hat, crash, ride, claves
)