// Together Again — Janet Jackson
// 124 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 132 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(124/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.

// other · pad new age · "NewAge"
const pad_new_age = note("<~@45 A@4 B@2 A@2 ~ C@3 D E D F G H@2 ~ D E D I ~@18 A@4 B@2 ~@39>".pickRestart({
  A: "[~@2 d4 ~ d4 ~ d4 ~ d4@2 ~ c4@2 ~ e4@16 ~@2]/2", B: "[~@2 d4 ~ d4 ~ d4 ~ d4@2 ~ c4@2 ~ e4@17 ~]/2",
  C: "[~@6 c4@2 e4@2 f4@2 e4@2 g4@19 ~@15]/3", D: "~@4 e4@5 ~ e4@4 ~@2", E: "e4@3 c4@5", F: "e4@3 c4@3 ~@2", G: "c4",
  H: "[~@6 c4@2 e4@2 f4@2 e4 ~ g4@16 ~@2, b3 ~@3]/2", I: "e4@3 c4@4 ~",
})).s("gm_pad_new_age").gain(0.31)

// chords · orchestral harp · "Harp"
const orchestral_harp = note(`<
  ~@7 A ~ B ~@22 C@3 ~@10 D@3 ~ D@3 ~@22 C@3 ~@9 E@2 ~ F G@2 ~ H I@2 ~@3 J K L@2 ~@29
>`.pickRestart({
  A: "e5 ~@4 a3@2 ~@9, ~ c5@2 e4@2 ~@11, ~ a4 c4 ~@5", B: "a5 ~ c5 ~@2 c4 a3@3 ~@7, ~ e5@2 a4@2 ~@11, ~@2 e4 ~@5",
  C: "[~@15 g2@32 ~, ~ d6 g4 g3@8 ~, ~@5 [g5,b5]@4 c4@4 d3@32 ~@3, ~@3 d5@2 d4@2 b2@16 ~, ~@7 b4@4 b3@32 ~@5]/3", // G
  D: "[~ g3@4 ~, d6 b4@8 ~@3, ~ b5@4 g4@32 ~@11, ~ g5@2 d4@16 ~@5, ~@3 d5@4 b3@32 ~@9]/3",
  E: "[~@15 b5 d6 ~@15, ~@8 [g2,b2]@4 d4@5 ~@15, ~@9 d3@4 [g4,a4,b4]@4 ~@15, ~@5 g3@2 d5 ~@8, ~@11 b3@4 g5@2 ~@15]/2", // G
  F: "~@11 g2@2 ~@3, d6@4 g4 c4 d4 b3 g3 d3 b2@3 ~@3, ~ [g5,b5]@12 ~@3, ~@2 d5@11 ~@3, ~@3 b4@10 ~@3", // G
  G: "[~@4 d6 ~@3, ~@9 g2@4 [g4,a4,b4] d5 [g5,b5]@3 ~@14, ~@5 [b2,d3]@4 ~@7, ~@11 [g3,b3]@7 ~@14, ~@6 d4@3 ~@7]/2", // G Bm G
  H: "d6 [g5,b5] d5 b4 g4 c4 d4 b3 g3 d3 b2 g2@2 ~@2 d#3", // G
  I: "[g3 [a#3,d#4] ~@15 [a#5,d#6]@3 ~@12, ~@2 g4@2 g4@5 f3@2 f4 [a#4,d5] [f4,g4] [a#4,d5,f5]@6 ~@12, ~@3 d#4@12 a#5 g5@3 ~@13, ~@3 a#4@2 a#4@2 [g5,a#5]@3 [a#3,d4]@10 ~@12, ~@6 d#5@13 ~@13]/2", // D#5 A# Fsus2 A# Gm A#
  J: "~@10 [f3,g#3] [c4,f4] f3 c3 [g#2,g#3,c4] f4, f6@6 g#3 [c3,f3] g#2@3 ~@5, ~ [f5,g#5,c6]@8 c3@2 ~@5, ~@2 c5@2 f4 c4@5 ~@6, ~@3 g#4@7 ~@6", // Fm F5 G# F5 Fm
  K: "~ d3 a#3 ~ d4 [f4,a#4] ~@2 d5 ~@5 d6 f6, a#2@2 d4@2 ~ d5@3 ~ [a#5,d6,f6]@2 [f5,a#5]@2 a#4@2 ~, ~ f3@4 ~@2 a#4@3 a#4@2 [d6,f6]@2 [f5,a#5]@2, ~@3 [a#3,f4]@2 ~ f5@2 f5@3 d5@5", // A#5 A# A#5 Dm A#5
  L: "[f6 ~ g#4 ~@11 g#3!2 d3 f3 d4 ~@2 [d5,f5]@2 ~@2 d6 a#4 d5 ~@2 d6 f6, ~ [g#5,c6]@2 g#4@3 [c4,f4] g#3@2 [c5,f5] f3 c3 g#2 [c3,f4] [f3,c4] c3@2 a#3@2 [a#3,d4]@12 ~, ~@2 c5@6 [c4,f4]@2 [c#3,g#4]@6 a#2@2 ~@6 [d5,f5]@2 d6 f5 a#4@3 ~, ~@2 f5@2 [c6,f6]@13 ~@3 a#4@2 ~ a#4@2 [a#5,f6]@4 [d5,f5,a#5]@3, ~@4 f5 g#5@12 ~ f4@2 [f4,f#4]@11 ~]/2", // Dm G# F5 A# F5 C#5 Dm F5 …
})).s("gm_orchestral_harp").gain(0.21)

// chords · percussive organ · "PercOrg"
const percussive_organ = note("<~@7 A B A B ~@4 A B A B ~@4 A B A B ~@30 A B A B ~@4 A B A B ~@63>".pickRestart({
  A: "[a4,c5,e5] ~@3 [a4,c5,e5]@2 ~ [a4,c5,e5] ~@2 [a4,c5,e5]@2 ~@2 [a4,c5,e5] ~", // Am
  B: "[a4,b4,d5] ~@3 [a4,b4,d5]@2 ~ [a4,b4,d5] ~@2 [a4,b4,d5]@2 ~@2 [a4,b4,d5] ~", // Bm7
})).s("gm_percussive_organ").gain(0.27)

// other · string ensemble 1 · "strings1"
const string_ensemble_1 = note(`<
  ~@27 A B A@2 C D E F G H E I G J ~@4 K L K L K L K L M N O P Q R Q R M N O P Q R Q S A B A@2 C D E F G H E I G J ~@4 K
  L K L K L K T ~@16 U V W X U Y W Z ~@13
>`.pickRestart({
  A: "[a4,a5] ~@3 [a4,a5] ~@3 [a4,a5] ~@3 [a4,a5] ~@3", B: "[a4,a5] ~@3 [a4,a5] ~@3 [a4,a5] ~@3 [a4,a5] ~ [a4,a5] ~",
  C: "[g4,g5] ~@3 [g4,g5] ~@3 [g4,g5] ~@3 [g4,g5] ~@3", D: "[g4,g5] ~@3 [g4,g5] ~@3 [g4,g5] ~@3 [a4,a5] ~ [b4,b5] ~",
  E: "[c5,c6] ~@3 [c5,c6] ~@3 [b4,b5] ~@2 [b4,b5] ~@2 [b4,b5] ~", // C B
  F: "[a4,a5] ~@3 [a4,a5] ~@3 [g4,g5] ~@2 [g4,g5] ~@2 [g4,g5] ~", // A G
  G: "[f4,f5] ~@3 [f4,f5] ~@3 [e4,e5]@2 ~ [e4,e5] ~@2 [e4,e5] ~", // F E
  H: "[d4,d5] ~@3 [d4,d5] ~@3 [g4,g5] ~@2 [g4,g5] ~@2 [a4,a5] ~", // D G A
  I: "[a4,a5] ~@3 [a4,a5] ~@3 [g4,g5]@2 ~ [g4,g5] ~@2 [g4,g5] ~", // A G
  J: "[d4,d5] ~@3 [d4,d5] ~@3 [g4,g5] ~@2 [g4,g5] ~@2 [g4,g5] ~", K: "[g3,b3,d4]@15 ~", L: "[g3,c4,e4]@15 ~",
  M: "c4@15 ~", N: "b3", O: "a#3", P: "a3", Q: "d4@6 e4 f4", R: "g3", S: "g4", T: "[a#3,d#4,g4]",
  U: "[d#5,d#6] ~@3 [d#5,d#6] ~@3 [d5,d6] ~@2 [d5,d6] ~@2 [d5,d6] ~", // D# D
  V: "[c5,c6] ~@3 [c5,c6] ~@3 [a#4,a#5] ~@2 [a#4,a#5] ~@2 [a#4,a#5] ~", // C A#
  W: "[g#4,g#5] ~@3 [g#4,g#5] ~@3 [g4,g5]@2 ~ [g4,g5] ~@2 [g4,g5] ~", // G# G
  X: "[f4,f5] ~@3 [f4,f5] ~@3 [a#4,a#5] ~@2 [a#4,a#5] ~@2 [c5,c6] ~", // F A# C
  Y: "[c5,c6] ~@3 [c5,c6] ~@3 [a#4,a#5]@2 ~ [a#4,a#5] ~@2 [a#4,a#5] ~", // C A#
  Z: "[f4,f5] ~@3 [f4,f5] ~@3 [a#4,a#5] ~@2 [a#4,a#5] ~@2 [a#4,a#5] ~", // F A#
})).s("gm_string_ensemble_1").gain(0.23)

// chords · epiano2
const epiano2 = note(`<
  ~@11 A B C D ~@4 A B C D ~@4 E@2 F ~ G ~@13 H I H I H I J I A B C D ~@4 A B C D ~@4 E@2 F ~ K L ~@12 H I H I H I J M@4
  N O P O Q@4 N O P O P ~@21
>`.pickRestart({
  A: "~@4 [g3,c4]@11 ~, c3@7 ~, ~@2 e3@13 ~", B: "~ [g3,b3]@3, b2@15 ~, ~ d3@7", C: "~ [f3,a#3]@3, a#2, ~ d3@7",
  D: "~@4 [e3,a3]@11 ~, a2@15 ~, ~@2 c#3@13 ~", E: "[[d4,f#4,a4]@23 ~@9]/2", F: "[d4,f#4,a4]", G: "[c4,e4,g4]",
  H: "[g3,b3,d4]@11 ~ [g3,b3,d4]@3 ~", I: "[g3,c4,e4]@15 ~", J: "[g3,b3,d4]@15 ~", K: "[c4,e4] ~@15, g4",
  L: "[c4,e4,g4] ~@15", // C
  M: "[[a#3,d#4,g4]@15 ~@2 a#4@14 ~@2 a#4@14 ~ [f4,a#4]@16, ~@15 d#4@15 ~ d4@16 c#4@17, ~@16 g4@15 ~ f4@15 ~@17]/4", // D# A#5
  N: "~ g#4@15, [c4,e4]", O: "~@4 [g#3,c4,f4]@2 ~ [g#3,c4,f4] ~@2 [g#3,c4,f4]@2 ~@2 [g#3,f4] ~, ~@7 c4",
  P: "~@4 [a#3,d4,f4]@2 ~ [a#3,d4,f4] ~@2 [a#3,d4,f4]@2 ~@2 [a#3,d4,f4] ~", // A#
  Q: "[~@4 [a#3,d4,f4]@2 ~ [a#3,d4,f4] ~@2 [a#3,d4,f4]@3 ~ [a#3,d4,f4] ~@2 a#4@7 ~@9 a#4@14 ~ [f4,a#4]@16, ~@15 d#4@8 ~@8 d4@16 c#4@17, ~@16 g4@8 ~@8 f4@15 ~@17]/4", // A# A#5
})).s("gm_epiano2").gain(0.19)

// chords · marimba
const marimba = note(`<
  ~@27 A B C@2 D@2 E@2 F G H@3 I ~@28 A B C@2 J K E@2 F G H@3 I ~@17 L M N ~@8 O@2 P Q R@3 S ~@13
>`.pickRestart({
  A: "[d4,f#4,a4]@3 ~", B: "[c#4,e4,a4]@3 ~", C: "[[d4,f#4,a4]@12 ~@4 [e4,a4]@13 ~@3, ~@15 c#4@14 ~@3]/2",
  D: "[[c4,e4,g4]@13 ~@3 g4@12 ~@4, ~@15 [b3,d4]@13 ~@4]/2", // C Bm
  E: "[[e4,g4,c5]@6 ~@2 [d4,g4,b4]@6 ~@2 [e4,a4]@5 ~@3 [d4,g4]@6 ~@2, ~@15 c4@6 ~@2 b3@6 ~@3]/2", // C G A5 G5
  F: "[a3,c4,f4]@3 ~ [c4,e4]@3 ~, ~@7 g3@6 ~@3", G: "[f3,a3,d4]@5 ~@3 [d4,g4]@5 ~@3, ~@7 b3@5 ~@4",
  H: "[[e4,g4,c5]@5 ~@3 [g4,b4]@5 ~@3 a4@5 ~@3 [b3,d4,g4]@5 ~@3 [c4,f4]@5 ~@3 e4@4 ~@4, ~@7 d4@5 ~@3 [c4,e4]@5 ~@11 a3@5 ~@3 [g3,c4]@5 ~@4]/3", // C G F5 C C5
  I: "[f3,a3,d4]@2 ~@2 [b3,d4,g4]@3 ~", J: "[e4,g4]@13 ~@2 [b3,d4], c4 ~@15", K: "[b3,d4,g4]@3 ~",
  L: "a#4 ~ a#4 ~ a#4!2 ~ a#4 ~@8", M: "~@15 a#5", N: "f6 a#5 d6 f5 a#5 d5 f5 a#4 d5 f4 a#4 d4 f4 a#3 d4 a#3",
  O: "[[a#4,d#5]@6 ~@2 [f4,a#4,d5]@6 ~@2 [g4,c5]@5 ~@3 [f4,a#4]@6 ~@2, e4 ~@14 d#4@6 ~@2 d4@6 ~@3]/2", // D#5 A# C5 A#5
  P: "[c4,d#4,g#4]@3 ~ [d#4,g4]@3 ~, ~@7 a#3@6 ~@3", Q: "[g#3,c4,f4]@5 ~@3 [f4,a#4]@5 ~@3, ~@7 d4@5 ~@4",
  R: "[[g4,a#4,d#5]@5 ~@3 [a#4,d5]@5 ~@3 c5@5 ~@3 [d4,f4,a#4]@5 ~@3 [d#4,g#4]@5 ~@3 g4@4 ~@4, ~@7 f4@5 ~@3 [d#4,g4]@5 ~@11 c4@5 ~@3 [a#3,d#4]@5 ~@4]/3", // D# A# G#5 D# D#5
  S: "[g#3,c4,f4]@2 ~@2 [d4,f4,a#4]@3 ~", // Fm A#
})).s("gm_marimba").gain(0.14)

// bass · electric guitar clean · "GtrClean"
const bass = note("<~@33 A B C D A B C D ~@34 A B C D A B C D ~@28 E F G H E F G H ~@13>".pickRestart({
  A: "c2@2 c3 ~ c2@2 c3 ~ b1@2 b2 b1 ~ b1 b2 ~", B: "a1@2 a2 ~ a1@2 a2 ~ g1@2 g2 g1 ~ g1 g2 ~",
  C: "f1@2 f2 ~ f1@2 f2 ~ e1@2 e2 e1 ~ e1 e2@2", D: "d1@2 d2@2 d1@2 d2 ~ g1@2 g2 g1 ~ g1 g2 ~",
  E: "d#2@2 d#3 ~ d#2@2 d#3 ~ d2@2 d3 d2 ~ d2 d3 ~", F: "c2@2 c3 ~ c2@2 c3 ~ a#1@2 a#2 a#1 ~ a#1 a#2 ~",
  G: "g#1@2 g#2 ~ g#1@2 g#2 ~ g1@2 g2 g1 ~ g1 g2@2", H: "f1@2 f2@2 f1@2 f2 ~ a#1@2 a#2 a#1 ~ a#1 a#2 ~",
})).s("gm_electric_guitar_clean").gain(0.46)

// bass · electric bass finger · "FingrBass"
const bass_2 = note(`<
  ~@2 A B C D E F G H I B C D E F G H I B C D E F G H I J K L K M N O P Q R O P Q S T U T U T U T U T U T U B C D E F G
  H I B C D E F G H I J K L K M N O P Q R O P Q S T U T U T U T U T U T V W ~@3 X Y Z AA AB AC AD AE X Y Z AA AF AG AH
  AI AF AG AH AJ T U T U T U T U T U T U ~
>`.pickRestart({
  A: "c3@2 ~@2 c3@2 ~@2 c3@2 ~@2 c3 ~@3", B: "c2@2 ~@2 c2@2 ~@2 c2@2 ~ c2@2 ~ g1@2",
  C: "b1@2 ~@2 b1@2 ~@2 b1@2 ~ b1@2 ~ f1@2", D: "a#1@2 ~@2 a#1@2 ~@2 a#1@2 ~ a#1@3 e1 ~",
  E: "a1@2 ~@2 a1@2 ~ a1!2 ~ g1 ~ f1 ~ e1 ~", F: "d1@2 ~@2 d1@2 ~ d1@2 ~ e1@3 ~ f1@2",
  G: "g1@2 ~@2 g1@2 ~@2 g1@2 ~ g1@3 a1@2", H: "d1@2 ~@2 d1@2 ~@2 d1 ~@2 e1@3 f1 ~",
  I: "g1@2 ~@2 g1@2 ~ g1@2 ~ g1 ~ g1 ~ a1 ~", J: "e1 ~@3 e1@2 ~ e1@2 ~ e1@2 f#1 ~ g1 ~",
  K: "a1@2 ~@2 a1@2 ~ a1@2 ~ a1 ~ a1@2 b1@2", L: "e1@2 ~@2 e1@2 ~ e1@2 ~ e1@2 f#1 ~ g1 ~",
  M: "d1@2 ~@2 d1@2 ~ d1@2 ~ d1@2 e1 ~ f#1@2", N: "g1@2 ~@2 g1@2 ~ g1@2 ~ g1@2 a1 ~ b1 ~",
  O: "c2@2 ~@2 c2@2 ~@2 b1@2 ~ b1@2 ~ b1@2", P: "a1@2 ~@2 a1@2 ~@2 g1@2 ~ g1@2 ~ g1@2",
  Q: "f1@2 ~@2 f1@2 ~@2 e1@2 ~ e1@2 ~ e1@2", R: "d1@2 ~@2 d1@2 ~@2 g1@2 ~ a1@2 ~ b1 ~",
  S: "d1@2 ~@2 d1@2 ~@2 g1@2 ~ g1@2 ~ g1 ~", T: "a1@2 ~@2 a1@2 ~@2 e1@2 ~ e1@2 ~ f1 ~",
  U: "g1@2 ~@2 g1@2 ~@2 d1@2 ~ e1@2 ~ f1 ~", V: "a#1@2 ~@2 a#1@2 ~@2 d2@2 ~ d2@3 d2@2", W: "d#2@3 ~",
  X: "f1@2 ~@2 f1@2 ~ f1@2 ~ g1@3 ~ g#1@2", Y: "a#1@2 ~@2 a#1@2 ~@2 a#1@2 ~ a#1@3 c2@2",
  Z: "f1@2 ~@2 f1@2 ~@2 f1 ~@2 g1@3 g#1 ~", AA: "a#1@2 ~@2 a#1@2 ~ a#1@2 ~ a#1 ~ a#1 ~ c2 ~",
  AB: "d#2@2 ~@2 d#2@2 ~@2 d#2@2 ~ d#2@2 ~ a#1@2", AC: "d2@2 ~@2 d2@2 ~@2 d2@2 ~ d2@2 ~ g#1@2",
  AD: "c#2@2 ~@2 c#2@2 ~@2 c#2@2 ~ c#2@3 g1 ~", AE: "c2@2 ~@2 c2@2 ~ c2!2 ~ a#1 ~ g#1 ~ g1 ~",
  AF: "d#2@2 ~@2 d#2@2 ~@2 d2@2 ~ d2@2 ~ d2@2", AG: "c2@2 ~@2 c2@2 ~@2 a#1@2 ~ a#1@2 ~ a#1@2",
  AH: "g#1@2 ~@2 g#1@2 ~@2 g1@2 ~ g1@2 ~ g1@2", AI: "f1@2 ~@2 f1@2 ~@2 a#1@2 ~ c2@2 ~ d2 ~",
  AJ: "f1@2 ~@2 f1@2 ~@2 a#1@2 ~ a#1@2 ~ a#1 ~",
})).s("gm_electric_bass_finger").gain(0.64)

// other · whistle
const whistle = note(`<
  ~@43
  [e5 g5 a5 e5 g5 a5 e5 g5 a5 e5 g5 ~@5]
  ~@41
  [e5 g5 a5 e5 g5 a5 e5 g5 a5 e5 g5 ~@5]
  ~@35
  [e5 g5 a5 e5 g5 a5 e5 g5 a5 e5 g5 ~@5]
  ~@10
>`).s("gm_whistle").gain(0.1)

// other · whistle · soft notes
const whistle_soft = note("<~@43 [~@11 a5 e5 g5 a5 ~] ~@41 [~@11 a5 e5 g5 a5 ~] ~@35 [~@11 a5 e5 g5 a5 ~] ~@10>")
  .s("gm_whistle").gain(0.05)

// drums · kick
const kick = s("bd").struct(`<
  ~@11 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 ~@8 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",
})).gain(0.8)

// drums · snare
const snare = s("sd").struct("<~@11 [~ x ~ x]!84 ~@8 [~ x ~ x]!28 ~>").gain(0.48)

// drums · clap
const clap = s("cp").struct("<~ [~ x ~ x]!94 ~@4 [~ x ~ x]!32 ~>").gain(0.64)

// drums · hihat
const hihat = s("hh").struct(`<
  [~@15 x]
  [x ~ x ~ x!2 ~ x ~@2 x ~ x!2 ~ x]!10
  [x ~@3 x!2 ~@2 x ~@3 x!2 ~@2]!84
  ~@8
  [x ~@3 x!2 ~@2 x ~@3 x!2 ~@2]!28
  ~
>`).gain(0.64)

// drums · open hat
const open_hat = s("oh").struct("<~@11 [~ x ~ x ~ x ~ x]!84 ~@8 [~ x ~ x ~ x ~ x]!28 ~>").gain(0.56)

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

stack(
  pad_new_age, orchestral_harp, percussive_organ, string_ensemble_1, epiano2, marimba, bass, bass_2, whistle,
  whistle_soft, kick, snare, clap, hihat, open_hat, crash
)