// Move Closer — Phyllis Nelson
// 84 bpm, 4/4, key A 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 89 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(84/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@2 B@2 C@2 D@2 E@4 F@2 G@4 H I@8 J K@4 L M@2 N K@4 L M@2 N F@2 G@4 H I@8 J O@2 K@4 L M@2 N K@4 L M@2 N P@2 Q R P@2 Q
  R S@3
>`.pickRestart({
  A: "[[a3,c#4,f#4]@6 [a3,c#4,f#4] [a3,c#4,e4]@4 [a3,c#4,f#4]@3 [c#4,f#4,a4]@2, [d2,a2]@5 ~ [d2,a2]@5 [d2,a2]@5]/2", // F#m A F#m D5
  B: "[[b3,d4,f#4]@5 [b3,d4,f#4] [b3,e4] [a3,d4]@4 ~@4 a2, [g2,d3]@8 ~@3 [a3,e4]@3 a4@2, ~@13 a2@2 ~]/2", // Bm E5 D5 G5 A5
  C: "[[a3,c#4,f#4]@6 [a3,c#4,f#4] [a3,c#4,e4]@4 ~@4 a2, [a2,d3]@8 ~@3 [a3,c#4,f#4]@3 [c#4,f#4,a4]@2, ~@13 a2@2 ~]/2", // F#m A D5 F#m
  D: "[[b3,d4,f#4]@5 [b3,d4,f#4] [b3,e4] [a3,d4]@4 [a3,e4]@3 a4@2]/2", // Bm E5 D5 A5
  E: "a4 b4 a4 b4 a4 b4 a4 b4 a4 b4 a4 b4 a4 b4 a4 b4, d2@3 d2 d2@4",
  F: "[~@2 [a3,c#4,f#4]@2 ~@2 [a3,c#4,f#4] [a3,c#4,e4]@4 [a3,c#4,f#4]@3 [c#4,f#4,a4]@2]/2", // F#m A F#m
  G: "[[b3,d4,f#4]@4 ~ [b3,d4]!2 [b3,d4]@2 [a3,c#4,e4]@3 ~ a3 a4 [a3,c#4,f#4]@7 [a3,c#4,f#4] [a3,c#4,e4]@4 [a3,c#4,f#4]@3 [c#4,f#4,a4]@2]/4", // Bm A F#m A F#m
  H: "[b3,d4,f#4]@4 ~ [b3,d4]!3", // Bm
  I: "[~ [a3,c#4,e4]@3 c#4 e4 a4 [a3,c#4,f#4]@5 ~ a3 d4 [a3,c#4,e4]@2 [a3,c#4,f#4]@3 ~ a3 [a3,c#4,e4] [g3,b3,d4]@3 [b3,d4,g4]@4 [g3,b3,d4] [g3,b3,d4]@2 [a3,c#4,e4]@3 [a3,c#4,e4] a3 a4 [a3,c#4,e4]@7 [a3,c#4,f#4] [a3,c#4,e4]@4 [a3,c#4,f#4]@3 [a3,c#4,e4] [g3,b3,d4]@3 [g3,b3,d4]@4 ~ [g3,b3,d4]]/8", // A F#m A F#m A G A F#m …
  J: "~ [a3,c#4,e4]@7", // A
  K: "[a2@3 a2 a2@3 a2 ~@3 a2 ~@2 [a3,c#4,f#4] a2 ~@3 a2 ~@2 [a3,c#4,f#4] a2 a2@3 a2 a2@3 a2, [a3,c#4,f#4]@7 [a3,c#4,e4]@2 a3@5 ~ [a3,c#4,e4]@3 [a3,c#4,f#4]@4 ~ [a3,c#4,e4]@4 [a3,c#4,f#4]@5, ~@8 a2@3 ~ a2@3 ~ a2@3 ~ a2@3 ~@9]/4", // F#m A F#m A F#m
  L: "~@3 g2 [g3,b3,d4]@2 ~ g2, g2@3 ~ g2@3 ~, ~ [g3,b3,d4] ~ [g3,b3,d4]", // G
  M: "[[a3,c#4,e4]@2 a3 a2 ~ e3 a3 a2 ~@2 [b3,d4,f#4] [g2,b3,d4,f#4] [b3,d4,f#4]@2 [b3,d4,f#4] [g2,b3,d4,f#4], a2@3 [b3,e4]@2 ~@2 g3@3 ~@6, ~@4 a2@3 ~ g2@3 ~ g2@3 ~]/2", // A Bm Gmaj7 Bm Gmaj7 E5
  N: "[b3,d4,f#4]@2 ~ g2 [d3,d4,d5]@2 [e3,e4,e5]@2, g2@3 ~@5, ~ [d4,f#4,b4] ~@2", // Bm D E Bm
  O: "[a2,c#4,e4,a4]@3 [a2,c#4,e4,a4] [a2,c#4,e4,a4]@3 [a2,c#4,e4,a4]", // A
  P: "[[a3,c#4,f#4]@6 [a3,c#4,f#4] [a3,c#4,e4]@4 [a3,c#4,f#4]@3 [c#4,f#4,a4]@2]/2", // F#m A F#m
  Q: "[b3,d4,f#4]@2 [g3,b3,d4]@4 [g3,b3,d4]!2", R: "[g3,b3,d4] [a3,c#4,e4]@5 [c#4,e4,a4]@2",
  S: "[~@7 a4@26 ~@15, d2@11 ~@5, ~@2 a2@31 ~@15, ~@2 [f#3,c#4,e4,f#4]@9 ~@5]/3", // F#7
})).s("gm_piano").gain(0.4).pan(0.7)

// bass · electric bass finger
const bass = note(`<
  A@2 B C A@2 D@2 E@6 B C E@2 B C E@2 B C E@2 B F@5 G F G@2 F@4 G F G@2 E@2 B C E@2 B C E@2 B C E@2 B F@7 G F G@2 F@4 G
  F G@2 E@2 B C E@2 B C H ~@2
>`.pickRestart({
  A: "[d2@3 d2 d2@3 d2@4 d2@5]/2", B: "g2@3 g2 g2@4", C: "a2@3 a2 a2@4", D: "[g2@3 g2 g2@2 g2 a2@4 a2 a2@4]/2",
  E: "d2@3 d2 d2@4", F: "a2@3 a2 a2@3 a2", G: "g2@3 g2 g2@3 g2", H: "d2",
})).s("gm_electric_bass_finger").gain(0.4).pan(0.3)

// chords · acoustic guitar nylon
const acoustic_guitar_nylon = note(`<
  A@2 B@2 A@2 B@2 C@6 D E C@2 D E C@2 F E C@2 F E@5 F E G@2 E@4 F E G@2 C@2 D E C@2 D E C@2 F E C@2 F E@7 F E G@2 E@4 F
  E G@2 A@2 H@2 A@2 H@2 ~@3
>`.pickRestart({
  A: "[[a3,c#4,f#4]!7 [a3,c#4,e4]@2 [a3,c#4,e4]!2 [a3,c#4,f#4]@2 [a3,c#4,f#4]!3]/2", // F#m A F#m
  B: "[[b3,d4,f#4]!7 [b3,d4,f#4]@2 [b3,d4,f#4]!2 [a3,c#4,e4]@2 [a3,c#4,e4]!3]/2", C: "[a3,c#4,f#4]!8",
  D: "[b3,d4,f#4]!8", E: "[a3,c#4,e4]!8", F: "[b3,d4,g4]!8", G: "[a3,d4,f#4]!8",
  H: "[[a3,d4,f#4]!7 [a3,d4,f#4]@2 [a3,c#4,e4]!2 [a3,c#4,e4]@2 [a3,c#4,e4]!3]/2", // D A
})).s("gm_acoustic_guitar_nylon").gain(0.25)

// other · string ensemble 1
const string_ensemble_1 = note(`<
  A@2 B@2 A@2 B@2 C@4 ~@4 D@2 E@2 ~@3 F@2 G H@2 ~@2 E@2 ~ I J@2 K@2 ~@2 L M N@2 ~@4 D@2 E@2 ~@8 E@2 O@4 P M J@2 O@4 P M
  J@2 ~@11
>`.pickRestart({
  A: "[[f#3,f#4]@7 [e3,e4]@4 [f#3,f#4]@5]/2", B: "[[f#3,f#4]@6 [e3,e4] [d3,d4]@4 [e3,e4]@5]/2", C: "[a3,a4]/4",
  D: "[[a3,a4]@3 [b3,b4]]/2", E: "[a3,a4]/2", F: "[~@4 [a2,a3]@2 [a3,a4]@3 [f#3,f#4]@7]/2",
  G: "[e3,e4]@4 [f#3,f#4]@3 [e3,e4]", H: "[[d3,d4]@5 [d3,d4]!2 [d3,d4]@2 [e3,e4]@7]/2", I: "~@2 [a2,a3] [e3,e4]@5",
  J: "[d3,d4]/2", K: "[[f#3,f#4]@7 [e3,e4]@9]/2", L: "[d3,d4]", M: "[e3,e4]", N: "[f#3,a3,f#4,a4]/2",
  O: "[[a3,a4]@9 [e3,e4]@22 ~]/4", P: "~ [d3,d4]@3",
})).s("gm_string_ensemble_1").gain(0.25)

// drums · kick
const kick = s("bd").struct("<A B C@2 A B D E C@18 A@18 C@14 A@28 ~@3>".pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "~@3 x ~@4", C: "x ~@2 x!2 ~@3", D: "x ~@2 x ~@2 x!2", E: "~@3 x!2 ~@3",
})).gain(0.45)

// drums · snare
const snare = s("sd").struct(`<
  [~@2 x ~@2 x ~@2]!6
  [~@2 x ~@2 x!3]
  ~
  [~ x ~ x]!3
  [~@2 x ~@3 x!2]
  [~ x ~ x]!67
  [~@2 x!2 ~@2 x ~]!7
  ~@3
>`).gain(0.45)

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

// drums · low tom
const low_tom = s("lt").struct("<A@6 B ~ B@4 ~@19 C ~@7 C ~@25 C ~@4 D ~@3 C ~@14>".pickRestart({
  A: "~@3 x ~@2 x!2", B: "~@3 x ~@4", C: "~@6 x!2", D: "~@10 x ~ x!3 ~",
})).gain(0.45)

// drums · mid tom
const mid_tom = s("mt").struct("<~@35 A ~@7 A ~@25 A ~@8 A ~@10>".pickRestart({
  A: "~@10 x ~ x!3 ~",
})).gain(0.45)

// drums · crash
const crash = s("cr").struct("<A@6 B C ~@20 D ~@7 D ~@25 D ~@8 D ~@6 A@8 E F ~>".pickRestart({
  A: "~@3 x ~@4", B: "~@3 x ~@2 x!2", C: "~ x!3", D: "x", E: "~@3 x!13", F: "x!7 ~@9",
})).gain(0.15)

// drums · crash · soft notes
const crash_soft = s("cr").struct("<~@86 [x!3 ~@13] [~@7 x!9] [x!3 ~@13]>").gain(0.05)

// drums · ride
const ride = s("rd").struct("<~@32 A@4 ~@4 A@4 ~@22 A@4 ~@5 A@4 ~@10>".pickRestart({
  A: "x ~ x!6",
})).gain(0.3)

// drums · congas
const congas = s("conga:18").struct("<[~@5 x ~@2]!28 ~@16 [~@5 x ~@2]!42 ~@3>").gain(0.95)

// drums · congas
const congas_2 = s("conga:33").struct("<[~@6 x!2]!28 ~@16 [~@6 x!2]!42 ~@3>").gain(0.95)

stack(
  piano, bass, acoustic_guitar_nylon, string_ensemble_1, kick, snare, hihat, low_tom, mid_tom, crash, crash_soft, ride,
  congas, congas_2
)