// Mountains — Prince
// 130 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 132 bars on a 24-step grid, each part at one level. Source detail keeps the original performance.
setcpm(130/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.

// chords · piano · "A.PIANO 2"
const piano = note(`<
  ~@4 A B A C D E A B F G H C A B A B D E A I F G H J K L M N O L M P A Q A B D E A R F G H S A B A C D E A B F G H C A
  B A B D E A I F G H J K L M N O L M P A Q A B D E A R F G H S T U@2 V W X Y U Z AA AB AC AD L AE N AD AF AE P A C A C
  AG E A AH F G H S AB S H I AI@4
>`.pickRestart({
  A: "[d3,f#3,a3,d4]@8 ~ [d3,g3,b3,d4]@2 ~", B: "[d3,f#3,a3,d4]@19 ~@5", C: "~ [d3,d4]@18 ~@5, [f#3,a3]@3 ~",
  D: "~ g3@16 ~ [g3,c4,e4,g4]@4 ~@2, [b3,d4,g4]@2 ~", E: "[g3,b3,d4,g4]@3 ~", F: "[e3,a3,c#4]@17 ~ [d#3,g#3,c4]@5 ~",
  G: "[d3,g3,b3]@11 ~", H: "[d3,f#3,a3,d4]@11 ~@2 [a3,c#4]@10 ~, ~@12 e3@11 ~", I: "[d3,f#3,a3,d4]@11 ~",
  J: "[d3,f#3,a3,d4]@17 ~@7", K: "[g3,b3,d4,g4]@8 ~ [g3,b3,d4,g4]@2 ~", L: "[f#3,a3,c#4,f#4]@5 ~",
  M: "[g3,b3]@7 ~, [d4,g4]@19 ~@5", N: "[a3,c#4,f#4]@3 ~ [e3,g3,b3,e4]@3 ~, f#3@11 ~@13",
  O: "~ [g3,b3,d4,g4]@16 ~ [g3,b3,d4,g4]@4 ~@2", P: "[f#3,f#4]@9 ~@3 [e3,g3,b3,e4]@7 ~@5, [a3,c#4]@7 ~@17",
  Q: "~ [d3,f#3,d4]@22 ~, a3@11 ~", R: "~ [f#3,a3,d4]@20 ~@3, ~ d3@18 ~@5", S: "[d3,f#3,a3,d4]@23 ~",
  T: "[d3,f#3,a3,d4]@5 ~@5 [d3,f#3,a3,d4]@12 ~@2", U: "[d3,f#3,a3,d4] ~@4 [d3,f#3,a3,d4]@6 ~",
  V: "[f#3,d4]@2 ~@9 [d3,f#3,a3,d4]@11 ~@2, [d3,a3] ~@23", // D D5
  W: "~ [g3,b3,d4] ~@9 [g3,d4]@12 ~, ~ g4@2 ~@7 [b3,g4]@12 ~@2", // G G5 Em
  X: "[g3,b3,d4,g4]@2 ~@8 [b3,d4,g4]@9 ~@5, ~@10 g3@11 ~@3", Y: "[d3,f#3,a3] ~@10 a3@8 ~@5, d4@2 ~@8 [d3,f#3,d4]@9 ~@5",
  Z: "[e3,a3,c#4]@2 ~@8 [e3,a3,c#4]@7 ~ [d#3,g#3,c4]@5 ~", AA: "[d3,g3,b3] ~@4 [d3,g3,b3]@6 ~",
  AB: "[d3,f#3,a3,d4]@10 ~@2 [e3,a3,c#4]@11 ~", AC: "[d3,f#3,a3,d4]@11 ~ [d3,f#3,a3,c4]@7 ~@5",
  AD: "[g3,b3,d4,g4]@17 ~ [g3,b3,d4,g4]@3 ~@3", AE: "[g3,b3,d4,g4]@19 ~@5", AF: "[f#3,a3,c#4,f#4]@19 ~@5",
  AG: "~ [g3,d4]@16 ~ [g3,c4,e4,g4]@4 ~@2, [b3,g4]@2 ~", AH: "~ d4@19 ~@4, [d3,f#3,a3]@5 ~",
  AI: "[[d3,f#3,a3,d4] ~@9 [d3,f#3,a3,d4]@75 ~@11]/4", // D
})).s("gm_piano").gain(0.4)

// chords · electric guitar muted · "MUTED GTR"
const electric_guitar_muted = note(`<
  ~ A B C@5 D@2 C@2 E F G H C@4 D@2 C@2 E F G I J K L M N O P Q C@4 D@2 C@2 E F G H C@4 D@2 C@2 E F G H C@4 D@2 C@2 E F
  G I J K L M N O P Q C@4 D@2 C@2 E F G H C@4 D@2 C@2 E F G I J K L M N O P Q C@4 D@2 C@2 E F G H G H G H R@3 ~
>`.pickRestart({
  A: "~@11 d3", B: "[f#3,a3,d4]@4 d3@2 [g3,b3,d4]@4 d3@2 [f#3,a3,d4]@4 d3@2 [g3,b3,d4]@4 d3 ~",
  C: "[f#3,a3,d4]@4 d3 ~ [g3,b3,d4]@4 d3 ~ [f#3,a3,d4]@4 d3 ~ [g3,b3,d4]@4 d3 ~", // D G D G
  D: "[b3,d4]@2 g3 [c4,e4]@2 g3 [b3,d4]@2 g3 [c4,e4]@2 g3", // Bm C Bm C
  E: "[c#4,e4]@2 a3 [d4,f#4]@2 a3 [c#4,e4]@2 a3 [d4,f#4]@2 a3", // C#m D C#m D
  F: "[b3,d4]@4 g3@2 [c4,e4]@4 g3@2 [b3,d4]@4 g3@2 [c4,e4]@4 g3 ~", // Bm C Bm C
  G: "[f#3,a3]@4 d3 ~ [d3,f#3,a3]@5 ~ [c#3,e3,g3]@5 ~ [c#3,e3,g3]@5 ~", // F#m D C#dim
  H: "[f#3,a3]@4 d3@2 [g3,b3]@4 d3@2 [f#3,a3]@4 d3@2 [g3,b3]@4 d3 ~, d3 ~@11", // F#m G F#m G
  I: "[f#3,a3]@4 d3@2 [g3,b3]@4 d3@2 [f#3,c4]@4 d3@2 [f#3,c4]@4 d3 ~, d3 ~@11", // F#m G F#dim
  J: "[g3,b3,d4]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@4 b3 [g3,d4]@2 [g3,b3,d4]@3 [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~", // G G5 G
  K: "[f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~ [f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~ [f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~ [f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~", // F#m
  L: "[g3,b3,d4]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@2 ~@2 [g3,b3,d4] ~", // G
  M: "[f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~ [f#3,c#4]@5 ~ [e3,g3,b3]@2 ~@2 [e3,g3,b3] ~ [g3,b3]@5 ~, ~@2 a3 ~@3 e3 ~", // F#m F#5 Em G
  N: "[g3,b3,d4]@2 ~@2 [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~", // G
  O: "[f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~ [f#3,a3,c#4]@3 ~ [f#3,a3,c#4] ~@2 [f#3,a3,c#4]@2 ~ [f#3,a3,c#4] ~ [f#3,a3,c#4]@2 ~@2 [f#3,a3,c#4] ~", // F#m
  P: "[g3,b3,d4]@3 ~ [g3,b3] ~ [g3,b3]@3 ~ [g3,b3] ~ [g3,b3]@3 ~ [g3,b3,d4] ~ [g3,b3,d4]@2 ~@2 [g3,b3,d4] ~, ~@4 d4@4 ~@2 d4@5 ~@9", // G
  Q: "[f#3,a3,c#4]@2 ~@2 [f#3,a3,c#4] ~ [f#3,a3,c#4]@5 ~ [e3,g3,b3]@2 ~@2 [e3,g3,b3] ~ [e3,g3,b3]@5 ~", // F#m Em
  R: "[[d3,f#3,a3,d4] ~@10 d4@39 ~@22, ~@9 d3@40 ~@23, ~@5 [f#3,a3]@20 ~@11]/3", // D F#m
})).s("gm_electric_guitar_muted").gain(0.48)

// bass · acoustic bass · "ACOU BASS"
const bass = note(`<
  A B A B@5 C D E B F G H B@5 C D E B F G H I J K J L J K J L B@4 C D E B F G H B@5 C D E B F G H B@5 C D E B F G H I J
  K J L J K J L B@4 C D E B F G H B@5 C D E B F G H I J K J L J K J L B@4 C D E B F G H B H B H B M@4
>`.pickRestart({
  A: "d2@3 ~ d2@2 f#2@4 d2 ~ a2@4 d2@2 g2@4 f#2@2", B: "d2@3 ~ d2@2 f#2@4 d2@2 a2@4 d2 ~ g2@4 f#2@2",
  C: "g2@5 ~ e2@5 ~ d2@5 ~ e2@3 ~ d2 ~", D: "g2@3 ~ g2@2 e2@6 d2@5 ~ e2@6",
  E: "d2@3 ~ d2@2 f#2@4 d2 ~ a2@4 d2 ~ g2@3 ~ f#2@2", F: "a1@6 e2@6 a2@5 ~ g#2@6", G: "g2@5 ~ e2@6 d2@6 b1@6",
  H: "d2 f#2 a1 c#2", I: "d2@4 ~@2 d2@5 ~ e2@5 ~ f#2@5 ~", J: "g2@5 ~ g2@6 d2@6 g2@6", K: "f#2@5 ~ f#2@6 c#2@6 f#2@6",
  L: "f#2@5 ~ f#2@6 e2@5 ~ e2@4 ~@2", M: "[d2@2 ~@2 d2@2 a1@4 d1@65 ~@21]/4",
})).s("gm_acoustic_bass").gain(0.48)

// drums · kick
const kick = s("bd").struct(`<
  A@4 B C B C B C B C@5 B C B C B C B C@13 B C B C B C B C@5 B C B C B C B C@5 B C B C B C B C@13 B C B C B C B C@5 B C
  B C B C B C@13 B C B C B C B C@8 B D ~@3
>`.pickRestart({
  A: "x ~@10 x", B: "x!2", C: "x ~@5 x ~@4 x", D: "x ~@4 x ~@6",
})).gain(0.56)

// drums · snare
const snare = s("sd").struct(`<
  ~@2 A B A@3 C A C A C A@3 D A@3 C A C A C A@3 E A@3 C A@3 D A@3 C A C A C A@3 E A@3 C A C A C A@3 D A@3 C A C A C A@3
  E A@3 C A@3 D A@3 C A C A C A@3 E A@3 C A C A C A@3 E A@3 C A@3 D A@3 C A C A C A@3 E A@3 E F ~@3
>`.pickRestart({
  A: "~ x ~ x", B: "~@3 x ~@3 x!5", C: "~@3 x ~@4 x!2 ~ x", D: "~@3 x!9", E: "~@3 x!3 ~@6", F: "~ x ~@4",
})).gain(0.5)

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

// drums · hihat
const hihat = s("hh").struct("<[~ x ~ x]!35 [x!4] [~ x ~ x]!43 [x!4] [~ x ~ x]!31 [x!4] [~ x ~ x]!16 ~@4>").gain(0.56)

// drums · low tom
const low_tom = s("lt").struct("<~@27 A ~@19 A ~@23 A ~@19 A ~@11 A ~@19 A ~@3 A B ~@3>".pickRestart({
  A: "~@11 x", B: "~@7 x ~@16",
})).gain(0.5)

// drums · mid tom
const mid_tom = s("mt").struct("<~@27 A ~@19 A ~@23 A ~@19 A ~@11 A ~@19 A ~@3 A B ~@3>".pickRestart({
  A: "~@9 x!2 ~", B: "~ x ~@2",
})).gain(0.5)

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

// drums · high tom
const high_tom = s("ht").struct("<~@27 A ~@19 A ~@23 A ~@19 A ~@11 A ~@19 A ~@3 A B ~@3>".pickRestart({
  A: "~@6 x!3 ~@3", B: "~@5 x ~@18",
})).gain(0.5)

// drums · ride
const ride = s("rd").struct("<~@4 A@30 B ~ A@42 B ~ A@30 B ~ A@16 ~@4>".pickRestart({
  A: "x ~ x!2 ~ x!2 ~ x!2 ~ x", B: "x ~ x!2 ~ x!2 ~ x!2 ~@2",
})).gain(0.5)

// drums · tambourine
const tambourine = s("tb").struct("<[~ x ~ x]!128 ~@4>").gain(0.56)

stack(piano, electric_guitar_muted, bass, kick, snare, clap, hihat, low_tom, mid_tom, crash, high_tom, ride, tambourine)