// Sweet Harmony — Beloved
// 102 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 126 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. 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 · lead 8 bass lead · "BASS&LEAD"
const bass = note(`<
  ~@4 A B C D A B C D E F C G E F C G E F C G E F C G A B C D A B C D A B C D A B C D E F C G E F C G E F C G E F C G A
  B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D A B C D
  A B C D H ~
>`.pickRestart({
  A: "e2 e3 e2 e3 e2 e3 e2 f#3", B: "b1 b2 b1 b2 b1 b2 b1 f#3", C: "a1 a2 a1 a2 a1 a2 a1 a2",
  D: "a1 a2 a1 a2 a1 a2 b1 b2", E: "e2 e3 e2 e3 e2 e3 e2 e3", F: "b1 b2 b1 b2 b1 b2 b1 b2",
  G: "g1 g2 g1 g2 g1 g2 a1 a2", H: "e2@3 d2 e2@4",
})).s("gm_lead_8_bass_lead").gain(0.2)

// other · marimba
const marimba = note(`<
  ~@4 A B C D A B C D ~@16 A B C E A B C E A B C E A@2 C E ~@16 A B C E A B C F A B C F A B C F A B C F A B C F A B C F
  A B C F A B C F A B C F A B C F A B C F A B C F A B C F A B C F A B C F G ~
>`.pickRestart({
  A: "b4 ~ b4!2 ~ b4 f#5 ~ f#5 ~ f#5 e5 ~ e5 d5 ~", B: "[b4,d5] ~ b4!2 ~ b4 f#5 ~ f#5 ~ f#5 e5 ~ e5 d5 ~",
  C: "c#5 ~ c#5!2 ~ c#5!2 ~ c#5 ~ c#5 d5 ~ d5 e5 ~", D: "c#5 ~ c#5!2 ~ c#5 e5 ~ e5 ~ e5 d5 e5 c#5!2 ~",
  E: "c#5 ~ c#5!2 ~ c#5 e5 ~ e5 ~ e5 d5 e5 ~ c#5 ~", F: "[c#5,e5] ~ c#5!2 ~ c#5 e5 ~ e5 ~ e5 d5 e5 ~ c#5 ~",
  G: "b4 ~@2 b4 ~@12",
})).s("gm_marimba").gain(0.31).pan(0)

// other · vibraphone
const vibraphone = note(`<
  ~@12 A B C D@2 E F G@2 B H I@2 B J K L M N O P M N Q R M N S T M U ~ A B C D@2 E F G@2 B H I@2 B J K L M N O P M N Q P
  M N S T M N V ~@7 W X Y U W Z X U AA AB M N AC AD AE AF AG AH AI N AJ AK AE AL V AM AN AO AM AN Y AP AM AN Y AP AM AQ
  Y AP ~@3
>`.pickRestart({
  A: "~@10 e4 ~ f#4 ~ d4 ~", B: "b3 ~ b3@6 ~@2 b3 ~ d4 ~ b3 ~", C: "a3 ~ a3@6 ~@2 a3 ~ b3 ~ a3 ~",
  D: "[g3 ~ g3@6 ~@2 g3 ~ a3 ~ e4@4 ~@8 e4 ~ f#4 ~ d4 ~]/2", E: "b3 ~ b3@5 ~@3 b3 ~ d4 ~ b3 ~",
  F: "a3 ~ a3@4 ~@4 a3@2 b3 ~ a3 ~", G: "[g3 ~ g3@5 ~@3 f#4 ~ d4 ~ e4@4 ~@8 e4 ~ f#4 ~ d4 ~]/2",
  H: "a3 ~ a3@6 ~@2 a3@2 b3 ~ a3 ~", I: "[g3 ~ g3@5 ~@3 g3 ~ a3 ~ e4@6 ~@6 e4 ~ f#4 ~ d4 ~]/2",
  J: "a3 ~ a3@4 ~@4 a3 ~ b3 ~ a3 ~", K: "g3 ~ g3@2 ~@6 f#4 ~ e4 ~ d4 ~", L: "e4@2 d4@3 ~@7 f#4@4",
  M: "b3@4 ~@8 f#4@3 ~", N: "e4@4 ~@10 e4 ~", O: "c#5 ~ a4@3 ~ f#4@2 e4@2 f#4 ~ e4 ~ d4 ~", P: "e4 ~ d4@2 ~@8 f#4@3 ~",
  Q: "c#5 ~ a4 ~@3 f#4 ~ e4@2 f#4 ~ e4 ~ d4 ~", R: "e4 ~ d4@3 ~@7 f#4@3 ~",
  S: "c#5 ~ a4@2 ~@2 f#4 ~ e4@2 f#4 ~ e4 ~ d4 ~", T: "e4 ~ d4@5 ~@5 f#4@3 ~", U: "e4 ~@3",
  V: "c#5 ~ a4@2 ~@2 f#4 ~ e4@4 ~@4", W: "~@12 f#4@3 ~", X: "e4@3 ~@9 f#4@3 ~", Y: "e4@3 ~@9 f#4@2 ~@2",
  Z: "e4@4 ~@8 f#4@3 ~", AA: "~@5 f#4 e4 d4", AB: "e4@2 d4@3 ~@7 f#4@3 ~",
  AC: "c#5 ~ a4@2 ~@2 f#4@2 e4@2 f#4 ~ e4 ~ d4 ~", AD: "e4 ~ d4 ~@9 f#4@3 ~", AE: "b3@3 ~@9 f#4@2 ~@2",
  AF: "e4@3 ~@11 e4@2", AG: "c#5 ~ a4@2 ~@2 f#4@2 e4 ~ f#4 ~ e4 ~ d4 ~", AH: "e4 ~ d4@2 ~@8 f#4@2 ~@2",
  AI: "b3@3 ~@9 f#4@3 ~", AJ: "c#5 ~ a4 ~@3 f#4@2 e4@2 f#4 ~ e4 ~ d4 ~", AK: "e4 ~ d4 ~@9 f#4@2 ~@2",
  AL: "e4@2 ~@12 e4 ~", AM: "~@6 f#4 ~", AN: "e4 ~@5 f#4 ~", AO: "e4 ~@7", AP: "e4@3 ~@13", AQ: "e4@2 ~@10 f#4@3 ~",
})).s("gm_vibraphone").gain(0.29)

// other · epiano1 · "E.PIANO 1"
const epiano1 = note(`<
  A@2 B@2 C D B@2 C D B@2 ~@16 C D B@2 C D B@2 C D B@2 C D B@2 E F B@2 E F B@2 E F B@2 E F B@2 C D B@2 C D B@2 C D B@2 C
  D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 C D B@2 G ~
>`.pickRestart({
  A: "[f#5@2 a5@3 f#5@3 a5@3 f#5@3 a5@4 f#5@2 a5@3 f#5@3 a5@3 f#5@3]/2",
  B: "[a5@3 f#5@3 a5@3 f#5@3 a5@3 f#5@3 a5@3 f#5@3 a5@3 f#5@3 a5@2]/2", C: "f#5@2 a5@3 f#5@3 a5!2 ~ f#5@3 a5@2",
  D: "~ a5 ~ f#5 a5@3 f#5@3 a5@3 f#5@3", E: "~@2 a5@3 f#5@3 a5!2 ~ f#5@3 a5@2", F: "~ f#5 ~ f#5 a5@3 f#5@3 a5@3 f#5@3",
  G: "f#5@7 ~@9",
})).s("gm_epiano1").gain(0.12).pan(0)

// other · pad warm · "WARM PAD"
const pad_warm = note("<A B C@2 A B C@2 A B C@2 ~@114>".pickRestart({
  A: "g4", B: "f#4", C: "e4/2",
})).s("gm_pad_warm").gain(0.2)

// other · piano · "A.PIANO 3"
const piano = note(`<
  ~@4 A B C A@2 B C A ~@16 D B E A D B E A D B E A D B E A ~@16 D B E A D B E A D B E A F G H I D B E A D B E A D B E A
  D B E A D B E A D B E A D B E A D B E A D B E A D B E A D B E A D B E A J ~
>`.pickRestart({
  A: "e5 f#5 ~@4 e5 f#5 ~@4 e5 f#5 ~@2", B: "b4 d5 e5 f#5 ~@2 f#5 ~ e5 f#5 ~@2 e5 f#5 ~@2",
  C: "~@4 e5 f#5 ~@4 e5 f#5 ~@4", D: "e5 f#5 b4 ~ b4 d5 e5 f#5 ~@3 e5 ~@2 d5 ~",
  E: "e5 f#5 c#5 ~ e5 f#5 ~@4 e5 f#5 ~@4",
  F: "e5 f#5 [b4,e5] f#5 [b4,e5] [d5,f#5] [b4,e5] [d5,f#5] [b4,e5] [d5,f#5] e5 [e5,f#5] ~ e5 d5 e5", // E5 D E5 D E5 D Esus2
  G: "[b4,d5] d5 [b4,d5,e5] [d5,f#5] [b4,e5] [d5,f#5] [e5,f#5] f#5 [e5,f#5] f#5 [e5,f#5] f#5 e5 f#5 e5 f#5", // Bm E7 D E5 D Esus2
  H: "e5 f#5 [c#5,e5] f#5 [c#5,e5] f#5 [c#5,e5] f#5 e5 f#5 e5 f#5 e5 f#5 ~ f#5", // C#m
  I: "e5 f#5 e5 f#5 e5 f#5 e5 f#5 e5 f#5 e5 ~@3 e5 ~", J: "e5 f#5 b4 ~ b4 ~@11",
})).s("gm_piano").gain(0.25).pan(1)

// other · piano · "A.PIANO 3" · soft notes · E5 D E5 D Bm Dsus2 Bm Dsus2 …
const piano_soft = note(`<
  ~@72
  [~@10 b4 d5 [b4,e5] [d5,f#5] [b4,e5] [d5,f#5]]
  [e5 f#5 ~ e5 d5 e5 [b4,d5] [d5,e5] [b4,d5] [d5,e5] [b4,d5] [d5,e5] [b4,d5,f#5] d5 [b4,d5,f#5] d5]
  [[b4,f#5] d5 f#5 ~ f#5 ~ f#5 ~ c#5 ~ c#5 ~ c#5 ~ [c#5,e5] ~]
  [c#5 ~ c#5 ~@8 f#5 e5 f#5 ~ f#5]
  ~@50
>`).s("gm_piano").gain(0.1).pan(1)

// other · pad sweep · "SWEEP PAD"
const pad_sweep = note("<~@3 A@3 ~@62 B@56 ~@2>".pickRestart({
  A: "[[b4,f#5]@43 ~@5]/3", B: "b4/8",
})).s("gm_pad_sweep").gain(0.2)

// other · alto sax
const alto_sax = note(`<
  ~@75 A B C D@2 E F G H I J K L M N O P@2 ~ Q ~ R@2 S ~ T U@2 V W X Y Z AA@2 AB AC AD AE AF AG AH AI AJ@3 AK AL AM@2 ~
>`.pickRestart({
  A: "~@10 f#4 a4 b4 f#4 d5@2", B: "b4@13 ~@3", C: "a4!2 ~ a4@5 f#4@2 a4 b4@2 d5@2 e5",
  D: "[c#5@5 ~ e5 f#5 a5@2 c#5 b4 c#5 b4 a4@5 ~ c#5@2 ~@4 c#5 b4 a4 ~ c#5 d5]/2", E: "b4@4 d5 ~@3 e5@4 g5 ~@3",
  F: "~@2 f#5 e5 d5 ~ d5 e5 e5@2 d5 b4@2 ~ c#5 d5", G: "c#5@2 c#5 b4 a4@2 e4 d4 c#4 e4 f#4@2 a4@2 a4@2",
  H: "~@2 a4@2 f#4@2 ~@4 [a4,b4] [g4,g#4] f#4 e4!3", I: "b4 d5 f#5 a5 a5@5 ~ d6@4 e6@2", J: "c#6@2 a5 f#5 ~@4",
  K: "c#5@2 e5@4 f#5 ~ c#5@2 d5 c#5 a4 ~ a4 ~", L: "a4@4 f#4 ~@5 b4@2 d5!2 d5@2", M: "d5!3 ~ d5@2 e5 ~@4 b4 d5!2 d5@2",
  N: "d5!3 ~ d5@2 f#5 d5@3 b4 ~ a4!2 b4 ~", O: "c#5@3 d5@2 d#5@2 e5@2 f#5 ~ a5@2 b5@2 ~",
  P: "[c#6@3 d6@2 d#6 ~ e6@12 ~@13]/2", Q: "~@6 c#5 b4 a4 e4!2 d4 c#4 e4@3", R: "[~@8 f#4@2 ~ f#4@8 ~@7 a4@4 f#4@2]/2",
  S: "f#4 e4@5 ~@2", T: "~@6 f#4 a4@9, ~@7 g4 ~@8", U: "[~@2 a4@5 ~ f#4@2 a4 ~ a4@2 b4 a4@3 ~@14]/2",
  V: "~@13 f#4 b4 d5", W: "b4@4 ~@4 b4@6 a4 g4", X: "f#4@5 ~@11", Y: "~@6 c#5 e5 c#5@2 b4 a4 ~@4", Z: "~@14 b4 d5",
  AA: "[e5@4 d5 ~ e4!3 ~@5 [a4,b4] f#4@4 ~ d5 ~ e4!2 ~@6 e5 [d5,d#5], ~@15 g4 ~@16]/2", // Asus2 D#maj7
  AB: "c#5 ~ f#5 a5 b5@3 a5@2 ~@5 g5 f#5", AC: "e5 ~ c#5 b4 a4@2 f#4 e4@2 e4@2 ~@4 f#4", AD: "g4 ~ g4!3 e4 e4@2 ~@8",
  AE: "~@4 f#4 ~ f#4!3 ~ f#4!3 ~ f#4!2", AF: "f#4 a4 ~ b4@2 f#4 a4@4 b4 ~ c#5@2 c#5 d5", AG: "e5@2 c#5 a4 ~@9 b4 d5 e5",
  AH: "e5@2 ~@4 d5@4 ~@3 b4 d5 e5", AI: "e5@2 ~@4 d5 b4@2 ~@7",
  AJ: "[c#5@6 d5 e5 d5 c#5 b4 c#5 b4@6 a4@8 g4 f#4 g4 f#4 e4@4 ~@4 e4!2 ~@6 e4!2]/3", AK: "~@2 f#4@12 g4 a4",
  AL: "b4@4 c#5 ~@11", AM: "[~@2 b4@6 a4@4 ~@2 g4 e4@6 ~@11, ~@15 f#4 ~@16]/2",
})).s("gm_alto_sax").gain(0.38)

// chords · string ensemble 2 · "SLOWSTRING"
const string_ensemble_2 = note("<A@4 B@8 ~@16 B@16 ~@16 B@64 C ~>".pickRestart({
  A: "[[e4,g4]@15 ~ [d4,f#4]@15 ~@17 a4@16, b5, b4@47 ~@17, ~ [c#4,e4]]/4", // Em D C#m
  B: "[[e4,g4]@15 ~ [d4,f#4]@16 ~@16 a4@16, b4@47 ~@17, ~@32 [c#4,e4]@31 ~]/4", C: "[g4,b4]",
})).s("gm_string_ensemble_2").gain(0.1)

// drums · kick
const kick = s("bd").struct(`<
  A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A
  B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B
  A B A B A B C ~
>`.pickRestart({
  A: "x!4", B: "x ~ x ~ x ~ x!2", C: "x!3 ~",
})).gain(0.5)

// drums · snare
const snare = s("sd").struct("<~@4 [~@4 x ~ x!4 ~ x!2 ~@3]!120 [~@4 x ~ x!4 ~@6] ~>").gain(0.21)

// drums · clap
const clap = s("cp").struct(`<
  [~@10 x!3 ~ x ~]!4
  [~@10 x!2 ~@2 x ~]!8
  ~@16
  [~@10 x!2 ~@2 x ~]!16
  ~@16
  [~@10 x!2 ~@2 x ~]!64
  ~@2
>`).gain(0.29)

// drums · hihat
const hihat = s("hh").struct("<A@4 B@11 C B@3 C B@3 C B@3 C A@16 B@3 C B@3 C B@3 C B@3 C A@64 D ~>".pickRestart({
  A: "~@2 x!2 ~@2 x ~@3 x ~@2 x ~@2", B: "~@3 x ~@2 x ~@3 x ~@2 x ~@2", C: "~@2 x!2 ~@2 x ~@3 x ~@3 x ~",
  D: "~@2 x!2 ~@2 x ~@9",
})).gain(0.29)

// drums · open hat
const open_hat = s("oh").struct("<x!125 ~>").gain(0.21)

// drums · splash
const splash = s("cr").struct(`<
  ~@4 A ~@23 A ~@3 A ~@3 A ~@3 A ~@19 A ~@3 A ~@3 A ~@3 A ~@7 A ~@7 A ~@7 A B A ~ A ~ C ~ A ~ C ~ A ~ C ~ A ~ C ~ A ~ C
  ~ A ~ C ~ A ~
>`.pickRestart({
  A: "x", B: "~@2 x!2", C: "x!3 ~",
})).gain(0.21)

// drums · congas
const congas = s("conga:13").struct("<~@4 [~ x ~@6]!121 ~>").gain(0.91)

// drums · congas
const congas_2 = s("conga:33").struct("<[x ~ x ~@2 x ~ x!2 ~@7]!125 ~>").gain(0.91)

// drums · ht
const ht = s("ht").struct("<~@4 [~@4 x!2 ~ x!2 ~@3 x ~@3]!120 [~@4 x!2 ~ x!2 ~@7] ~>").gain(0.21)

// drums · shaker
const shaker = s("sh").struct("<~@4 [x!2 ~@2 x!3 ~ x!3 ~ x!3 ~]!120 [x!2 ~@2 x!3 ~ x!2 ~@6] ~>").gain(0.14)

// drums · triangle
const triangle = s("triangles:35").struct("<~@4 [~ x ~ x ~ x ~ x]!120 [~ x ~ x ~@4] ~>").gain(1.87)

stack(
  bass, marimba, vibraphone, epiano1, pad_warm, piano, piano_soft, pad_sweep, alto_sax, string_ensemble_2, kick, snare,
  clap, hihat, open_hat, splash, congas, congas_2, ht, shaker, triangle
)