// Weak in the Presence of Beauty — Alison Moyet
// 102 bpm, 4/4, key C 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 94 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(102/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.

// bass · synth bass 2
const bass = note(`<
  ~ A B C D E F G A H A@2 I J K L M N O@2 I P A Q C R S F G A T A@2 I J K L M N O@2 I P A Q C R S F U A V F W A X F Y Z
  AA O@2 I AB@2 A B C D S F G A H A B C D E F G A AC A B C D S F G A H AD ~
>`.pickRestart({
  A: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~", B: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ e2@2 g2 ~",
  C: "a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~", D: "a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ g2 ~",
  E: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ d2@2", F: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~",
  G: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 a2", H: "c2 ~ c2 ~ c2 ~ c2 ~ c2@2 c3 ~ a2 ~ e2@2",
  I: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~", J: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ a1@2",
  K: "c2 ~ c2 ~ c2 ~ c2 ~ c2@2 g2 ~ c2 ~ c2 ~", L: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ e2 ~ c2 ~",
  M: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ e2@2", N: "~@2 e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ d2 ~",
  O: "e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~ e2 ~", P: "g2 ~ g2 ~ g2 ~@9 a1@2",
  Q: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ e2 ~ g2 ~", R: "a2 ~ a2 ~ a2 ~ a2 ~ a2 ~ a2@2 g2 ~ g2@2",
  S: "f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2 ~ f2@2 d2@2", T: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c3@2 a2 ~ e2 ~",
  U: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 a2 c2 ~", V: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c3 ~ b2 ~ a2 ~",
  W: "g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2 ~ g2!2 a2 ~", X: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c2!2 d2 ~ d2 ~",
  Y: "g2 ~ e2 ~ f2@2 f#2@2 g2 ~ g2 ~ g2@2 a2@2", Z: "c2 ~ c2 ~ c2 ~ c2 ~ c2@2 c3 ~ g2 ~ g2 ~",
  AA: "~@2 c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ d2@2 d#2 ~", AB: "[g2 ~ g2 ~ g2@2 ~@8 g2@4 g2 ~ g2 ~@5 a2!2 c3 ~ g2 ~]/2",
  AC: "c2 ~ c2 ~ c2 ~ c2 ~ c2 ~ c3 ~ a2 ~ e2@2", AD: "c2@15 ~",
})).s("gm_synth_bass_2").gain(0.45)

// chords · epiano1
const epiano1 = note("<~ A@8 B ~@11 C A@8 B ~@11 C D@6 E F@2 ~@11 G@2 A@8 B A@8 B A@8 B H ~>".pickRestart({
  A: "[[c4,e4,g4]@3 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,d4,g4]@4 [b3,d4,g4]@4 [b3,d4,g4]@4 d4@2 c4 b3 c4@5 d4@3 e4]/8", // C Csus2 G
  B: "~@2 d4 e4", C: "[g4,b4,d5]!2 [f4,a4,c5]@2 ~@4",
  D: "[[c4,e4,g4]@3 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,d4,g4]@4 [b3,d4,g4]@5]/6", // C Csus2 G
  E: "[b3,d4,g4]", F: "[[c4,e4,g4]@7 [c4,e4,g4]@4 [c4,e4,g4]@5]/2",
  G: "[[b3,d4,g4]!3 ~@4 [b3,d4,g4]@2 [b3,d4,g4]!2 ~@5]/2", H: "[e4,g4,c5]@15 ~",
})).s("gm_epiano1").gain(0.4).pan(0.3)

// chords · pad poly
const pad_poly = note(`<
  ~ A@8 B C@2 D E C@2 D F G@2 H I A@8 B C@2 D E C@2 D F G@2 H I J@6 F K@2 L@6 C@2 M@2 N O@2 A@8 B A@8 B A@8 B P ~
>`.pickRestart({
  A: "[[c4,e4,g4]@3 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,d4,g4]@4 [b3,d4,g4]@4 [b3,d4,g4]@4 [b3,d4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]]/8", // C Csus2 G C
  B: "~@3 [c4,e4,g4]@3 [c4,e4,g4]@2", C: "[c4,e4,g4]/2", D: "[a3,c4,e4]", E: "[g3,b3,d4]", F: "[b3,d4,g4]",
  G: "[g4,b4,e5]/2", H: "[f4,a4,c5]", I: "[g4,b4,d5]!2 [f4,a4,c5] ~@5",
  J: "[[c4,e4,g4]@3 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,e4,g4]@4 [c4,d4,g4]@4 [b3,d4,g4]@5]/6", // C Csus2 G
  K: "[[c4,e4,g4]@7 [c4,e4,g4]@4 [c4,e4,g4]@5]/2", L: "[[b3,d4] [c4,e4] [b3,d4], g4]/6", M: "[b3,e4,g4]/2",
  N: "[a3,c4,f4]", O: "[[b3,d4,g4]!3 ~@4 [b3,d4,g4]@2 [b3,d4,g4]!2 ~@5]/2", P: "[e4,g4,c5]@15 ~",
})).s("gm_pad_poly").gain(0.35)

// chords · glockenspiel
const glockenspiel = note("<~ A@8 B ~@12 A@8 B ~@12 C@6 D E@2 ~@11 F@2 A@8 B A@8 B A@8 B G ~>".pickRestart({
  A: "[[c5,e5,g5]@3 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,d5,g5]@4 [b4,d5,g5]@4 [b4,d5,g5]@4 [b4,d5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]]/8", // C Csus2 G C
  B: "~@3 [c5,e5,g5]@3 [c5,e5,g5]@2", // C
  C: "[[c5,e5,g5]@3 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,e5,g5]@4 [c5,d5,g5]@4 [b4,d5,g5]@5]/6", // C Csus2 G
  D: "[b4,d5,g5]", E: "[[c5,e5,g5]@7 [c5,e5,g5]@4 [c5,e5,g5]@5]/2", F: "[g5!2 g5@5 g5@2 g5 g5@4 ~@2]/2",
  G: "[e5,g5]@7 ~", // Em
})).s("gm_glockenspiel").gain(0.2)

// other · french horn
const french_horn = note(`<
  ~ A B C B D E F G H I ~@11 C J A J K E L C M ~@12 N M C M O E P C Q ~@13 A B C B D E F G H A B C B D E F G H A B C B D
  E F G H R ~
>`.pickRestart({
  A: "c5@6 d5@5 ~ e5@4", B: "g5@5 ~ d5@6 e5@3 ~", C: "c5@5 ~ d5@6 e5@4", D: "c5@6 e5@5 ~ c5@3 ~", E: "d5@5 ~ g4@10",
  F: "d5", G: "c5@3 d5@3 e5@2", H: "g5@5 ~ d5@6 e5@4", I: "c5@3 ~", J: "g5@5 ~ d5@5 ~ e5@3 ~", K: "c5@5 ~ e5@6 c5@4",
  L: "d5@15 ~", M: "g5@5 ~ d5@5 ~ e5@4", N: "c5@5 ~ d5@5 ~ e5@4", O: "c5@5 ~ e5@5 ~ c5@4", P: "d5@12 c5@3 ~",
  Q: "c5@5 ~ c5@6 ~@4", R: "c5@15 ~",
})).s("gm_french_horn").gain(0.4)

// other · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~ A B C D E F G H I J K L M K@2 N O P@2 Q R A B C D S F G A B J K L M K@2 N O P@2 Q R A B C D S F T A U V@2 W@2 V@2
  W@2 X@2 Q Y@2 A B C D S F G A B A B C D S F G A B A B C D S F G A B ~@2
>`.pickRestart({
  A: "[c4,c5] g4 e4 [c4,d5] g4 e4 [c4,e5] e4", B: "[c4,g5] g4 e4 [c4,d5] g4 e4 [c4,e5] e4",
  C: "[a3,c5] e4 c4 [a3,d5] e4 c4 [a3,e5] c4", D: "[a3,g5] e4 c4 [a3,d5] e4 c4 [a3,e5] c4",
  E: "[a3,c5] f4 c4 [a3,e5] f4 c4 [a3,c5] c4", F: "[c4,d5] g4 d4 [b3,g4] g4 d4 b3 d4",
  G: "[b3,d5] g4 d4 b3 g4 d4 b3 d4", H: "[c4,c5] g4 e4 [c4,d5] g4@2 [d5,e5]@2", I: "g5@3 d5@3 [c4,e5] e4",
  J: "[c4,c5] g4 e4 c4 g4 e4 c4 e4", K: "c4 g4 e4 c4 g4 e4 c4 e4", L: "a3 e4 c4 a3 e4 c4 a3 c4",
  M: "g3 d4 b3 g3 d4 b3 g3 d4", N: "a3 e4 c4 a3 e4 c4 a3 e4", O: "g3 d4 b3 g3 d4 b3 g3 b3",
  P: "g3 e4 b3 g3 e4 b3 g3 b3", Q: "a3 f4 c4 a3 f4 c4 a3 c4", R: "[b3,d4,g4]!2 [a3,c4,f4] ~@5",
  S: "[a3,c5] f4 c4 [a3,e5] f4 c4 [a3,c5] f4", T: "[b3,d5] g4 d4 b3 g4 d4 [b3,c5] d4",
  U: "[c4,c5] g4 e4 [c4,c5] g4 e4 c4 e4", // C
  V: "[~@6 b4@8 [d4,g4,b4]@4 [g4,b4,d5] [g4,b4,d5]@13, b3@7 ~@9, ~ d4@6 ~@9, ~@2 g4@5 ~@9]/2", // G
  W: "[~@4 [e4,g4,c5]@3 [e4,g4,c5]!2 [e4,g4,c5]@2 [e4,g4,c5] [e4,g4,c5]@2 [e4,g4,c5]@4 [e4,g4,c5]!2 [e4,g4,c5]@2 [e4,g4,c5]!2 [e4,g4,c5]@2 [e4,g4,c5]@2 [e4,g4,c5]@2 [e4,g4,c5]@2]/2", // C
  X: "e4 b3 g3 b3 e4 b3 g3 b3", Y: "[[b3,d4,g4]!3 ~@4 [b3,d4,g4]@2 [b3,d4,g4]!2 ~@5]/2",
})).s("gm_acoustic_guitar_steel").gain(0.35)

// chords · string ensemble 1
const string_ensemble_1 = note(`<
  ~@10 A@2 B C A@2 B D E@2 F G ~@9 A@2 B C A@2 B D E@2 F H ~@9 I@6 A@2 J@2 K L@2 ~@27 M ~
>`.pickRestart({
  A: "[c4,e4,g4]/2", B: "[a3,c4,e4]", C: "[g3,b3,d4]", D: "[b3,d4,g4]", E: "[g4,b4,e5]/2", F: "[f4,a4,c5]",
  G: "[g4,b4,d5]!2 [f4,a4,c5] ~@5", H: "[g4,b4,d5]!2 [f4,a4,c5]@2 ~@4", I: "[[b3,d4] [c4,e4] [b3,d4], g4]/6",
  J: "[b3,e4,g4]/2", K: "[a3,c4,f4]", L: "[[d4,g4]!3 ~@4 [d4,g4]@2 [d4,g4]!2 ~@5]/2", M: "[e4,g4,c5]",
})).s("gm_string_ensemble_1").gain(0.35).pan(0.7)

// other · trumpet
const trumpet = note("<~@51 A B C D E F G H I ~@34>".pickRestart({
  A: "~@6 b3 c4 d4 e4 f4 g4 a4 b4 c5 d5", B: "~ d5 ~ d5 ~ d5 ~ e5 d5 e5 ~ d5@3 ~@2",
  C: "~@6 d5 e5 d5 e5 ~ d5@2 d5 e5 ~", D: "f5 e5 ~ e5 ~@10 e5!2", E: "f5 e5 ~@6 e5@3 ~ f5 ~ e5 ~",
  F: "a5@5 ~ g5 ~ e5 ~ d5@6", G: "~ f5@2 d5 f5@2 d5 f5@2 d5 f5@2 d5 f5@2 d5", H: "e5@3 d5@3 c5@3 a4@3 g4@3 ~",
  I: "~@4 a5 g5 f5 e5 d5 c5 b4 a4 ~@4",
})).s("gm_trumpet").gain(0.53)

// drums · kick
const kick = s("bd").struct("<A B@20 C B@20 D B@15 E B@3 F G H B@7 F B@8 F B@8 F B I@2>".pickRestart({
  A: "~@10 x!2 ~@4", B: "x ~@2 x!2 ~@3", C: "x ~@9 x!2 ~@4", D: "x ~@6 x", E: "x ~@4 x!2 ~ x ~@7",
  F: "x ~@5 x ~ x ~@2 x ~@4", G: "x ~@2 x!2 ~@2 x", H: "x ~@9 x!2 ~@2 x ~", I: "x",
})).gain(0.45)

// drums · snare
const snare = s("sd").struct("<A B@6 C B@13 D B@8 C B@11 E B@8 F B@3 G B@2 H I B@3 J H B@27 K ~>".pickRestart({
  A: "~@3 x", B: "~ x ~ x", C: "~@2 x ~@2 x!2 ~", D: "x!3 ~@3 x ~", E: "x ~ x ~ x ~@5 x!3 ~@3", F: "~@2 x ~@2 x!3",
  G: "~@2 x ~@3 x!2", H: "~ x!2 ~@3 x ~", I: "~@4 x ~@7 x!3 ~", J: "x!2 ~ x", K: "x",
})).gain(0.45)

// drums · hihat
const hihat = s("hh").struct("<~ A@20 B A@20 B C A@14 D A@5 B A@27 ~@2>".pickRestart({
  A: "x!8", B: "x!3 ~@3 x!2", C: "~ x!7", D: "x ~ x ~ x ~ x ~ x ~@3 x ~ x!2",
})).gain(0.3)

// drums · low tom
const low_tom = s("lt").struct("<~@17 A ~@20 A ~@3 B ~@16 A ~@3 A ~@9 C ~@8 C ~@8 C D ~>".pickRestart({
  A: "~ x ~@3 x ~@2", B: "~@3 x", C: "~@5 x!2 ~", D: "~@15 x",
})).gain(0.45)

// drums · mid tom
const mid_tom = s("mt").struct("<~@92 [~@15 x] ~>").gain(0.4)

// drums · open hat
const open_hat = s("oh").struct("<~@58 [~@5 x ~@2] ~@4 [~ x] ~@30>").gain(0.45)

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

stack(
  bass, epiano1, pad_poly, glockenspiel, french_horn, acoustic_guitar_steel, string_ensemble_1, trumpet, kick, snare,
  hihat, low_tom, mid_tom, open_hat, crash
)