// U Got the Look — Prince
// 120 bpm, 4/4, key B major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 119 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(120/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 · "SYN BASS 2"
const bass = note(`<
  ~@2 A B C B D E C B F G H I H B C B D E C B F G H I H B C B D E C B F G H I H B C B D E C B F G H I H B C B D E C B F
  G H I ~@3 J K L M N O B C B D E C B F G H I H B C B D E C B F G H I H B C B D E C B F G H I P B C B D E C B F G H I ~
>`.pickRestart({
  A: "b1 ~ b1 ~ b1 ~@5 b1@2 ~@2 b1 ~", B: "b1@2 ~ b1@2 ~@11", C: "b1 ~ b1@2 ~@6 b1 ~@3 b1 ~",
  D: "e2 ~ e2@2 ~@6 e2@2 ~@2 e2 ~", E: "e2@2 ~ e2@2 ~@11", F: "f#1 ~ f#1@2 ~@6 f#1@2 ~@2 f#1 ~", G: "f#1@3 f#1 ~@12",
  H: "b1 ~ b1@2 ~@6 b1@2 ~@2 b1 ~", I: "b1@3 b1 ~@12", J: "b1 ~ b1@2 ~@6 b1@2 ~@2 b1@2", K: "g1 c2", L: "b1@8 a#1@7 ~",
  M: "a1!2 ~@2 g#1@4", N: "g1 ~ f#2 ~ d2 ~@11", O: "b1 ~@7 f#2 e2 ~ d#2 c#2@2 ~ b1", P: "~@2 b1@2 ~@6 b1@2 ~@2 b1 ~",
})).s("gm_synth_bass_2").gain(0.45)

// chords · distortion guitar · "DISTORTION"
const distortion_guitar = note(`<
  ~@2 A B A B C D E B F G H B I ~@3 J K L M N ~ O@2 P@2 Q@2 R@2 S@2 T ~ U V W X Y ~ Z ~@7 P@2 Q@2 R@2 S@2 T ~ U ~ AA ~@2
  AB AC AD AE@2 ~@4 AF AG AH ~ AI ~ O@2 P@2 Q@2 R@2 S@2 T ~ U ~@5 AF AG AH ~ AI ~ O@2 ~@4 AF AG AH ~ AI ~ O@2 ~
>`.pickRestart({
  A: "[b2,f#3,b3]@2 ~@3 [a2,f#3] [b2,e3] [a2,f#3]", B: "[b2,f#3,b3]@4 [b2,f#3] ~@11",
  C: "[e3,b3,e4,g#4]@2 ~@3 [e3,a3,d4,f#4]@2 [e3,b3,e4,g#4]", D: "[e3,b3,e4,g#4]@4 [e3,b3] ~@11",
  E: "[b2,f#3,b3]@2 ~@3 [b2,e3,a3]@2 [b2,f#3,b3]", // B5 Esus4 B5
  F: "[f#2,c#3,f#3,a#3]@4 [f#2,c#3] ~@5 [f#2,c#3,f#3]@2 ~@2 [f#2,b2,e3]@2", G: "[g#2,d#3,g#3]@4 [g#2,d#3] ~@11",
  H: "[b2,f#3,b3]@4 [b2,f#3] ~@5 [b2,e3,b3]@4 [b2,f#3] ~", I: "~@4 [b2,f#3]@3 ~@9",
  J: "a3 f3 c#3 ~ [e3,b3,e4]@2 ~@4 [e3,a3,d4]@2 [e3,b3,e4]@2 [e3,a3,d4]@2", K: "[e3,b3,e4]@4 [e3,b3,e4,g#4] ~@11",
  L: "[b2,f#3]@4 [b2,f#3] ~@3 [f#3,b3]@7 ~", M: "~@8 a3!2 ~@6", N: "~@6 [f#3,c#4] ~", O: "[~@12 [a3,e4,a4]@17 ~@3]/2",
  P: "[~@14 [b2,f#3]@7 ~@11]/2", Q: "[~@14 [b2,f#3]@17 ~]/2", R: "[[e3,b3]@2 ~@3 [e3,b3]@6 ~@5]/2",
  S: "[~@5 [a2,e3]@7 ~@4]/2", T: "~@3 [c#3,f#3]", U: "~@2 [d#4,g#4] [e4,a4]@4 ~",
  V: "~@10 [f#3,b3,d#4]@2 [g#3,b3,e4]@2 [f#3,b3,d#4] ~", W: "[b2,f#3,b3]@2 [b2,f#3,b3] ~@13",
  X: "~@10 [b3,d#4,f#4]@2 [b3,e4,g#4]@3 ~", Y: "[d#4,f#4,b4] ~@7", Z: "[e2,b2,e3]@5 [e2,f#2]!3 f#2@3 a#2@2 ~@3",
  AA: "~@4 b2@3 ~@9", AB: "~ [b1,b2] ~@3 [b1,b2] ~ [b1,b2]", AC: "[g1,g2] [c2,c3]", AD: "[b1,b2] [a#1,a#2]",
  AE: "[[a1,a2]!2 ~@2 [a1,a2]@8 ~@4]/2", AF: "~@2 [e3,b3,e4] ~@3 [e3,b3,e4] [d3,a3,d4]", AG: "[e3,b3,e4]@3 ~@13",
  AH: "~@8 [f#3,b3]@7 ~", AI: "~@5 [f#3,c#4] ~@2",
})).s("gm_distortion_guitar").gain(0.19).pan(0.7)

// other · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note(`<
  ~@12 A B ~@7 C ~ D ~ E F ~ G ~@3 G ~@4 H ~@8 I@2 ~ J ~@2 G ~@3 G ~@4 H ~@3 K L M N O@2 ~@6 C ~ D ~ E F ~ G ~@3 G ~@4 H
  P@4 Q R S T U V W@2 X Y Z@2 AA AB AC C ~ D ~ E AD
>`.pickRestart({
  A: "~@4 [e4,a4]@5 ~@7", B: "~ [e5,b5] ~@2", C: "~@10 e4@3 ~@3", D: "~@3 [b3,f#4]", E: "~@4 a5@9 ~@3",
  F: "[e5,a5]@7 ~@9", G: "[e5,a5]@5 ~@11", H: "~@4 [f#4,b4] ~ [f#4,b4] ~ [e5,a5]@7 ~", I: "[~@12 c#6@17 ~@3]/2",
  J: "d6 [f5,b5] d5 [d5,f5] b4 [b4,d5] f4 [d4,b4] d5 [f4,b4] ~@6", K: "~ b2 ~@3 b2 ~ b2", L: "g2 c3", M: "b2 a#2",
  N: "a2@2 a2 ~@5 g#2@8", O: "[~@6 f6@3 ~@7, [g2,g3]@9 ~@7, ~@5 b5@4 ~@7, ~@11 d6@7 ~@14]/2", P: "b5@4 e5 g5 e5 g5",
  Q: "c#6@8 c#6@3 ~ c#6@3 ~", R: "c#6@3 ~ c#6@3 ~ c#6@7 ~", S: "~@4 d6@11 ~", T: "d6@4 c#6@9 ~@3", U: "~ d6@3",
  V: "e6 d6 e6 d6 e6 d6 e6 d6",
  W: "[d6 [a5,b5] f#5 [a5,b5] f#5 [e5,a5] f#5 [e5,f5] f#5 [d5,e5] d5 [b4,e5] [b4,d5] [e4,f4] [f4,f#4] b3@4 ~ e3@2 c3 g#2 [d1,d2]@4 b3@2 g3 ~, ~@15 d4 ~@16]/2", // Asus2 A5 Fmaj7 Dsus2 E5 Bm Fmaj7 F#maj7 …
  X: "d6@7 b5 a5@7 f#5", Y: "f#5@3 e5@4 d5 b4@7 ~", Z: "[c#5@6 g#4@2 d#4@18 b3 g3 ~@4]/2", AA: "b3@3 d4@2 e4@10 ~",
  AB: "a4@3 d4@3 e4@2 e4@8", AC: "f#4 d#4", AD: "[e5,a5] ~@15",
})).s("gm_overdriven_guitar").gain(0.35)

// other · overdriven guitar · "OVERDRIVE" · soft notes
const overdriven_guitar_soft = note(`<
  ~@13 A ~@6 B C ~@3 D ~@23 E ~@19 F@2 ~@5 B C ~@3 D ~@23 G ~@7 C ~@3 D ~
>`.pickRestart({
  A: "~ a4 ~@2", B: "~@3 f#5", C: "~@10 a4@3 ~@3", D: "~@4 e5@9 ~@3", E: "~@10 d4 f3 ~@4",
  F: "[~@9 d5@9 ~@14, ~@4 g4@5 ~@7]/2", G: "~@15 d#3",
})).s("gm_overdriven_guitar").gain(0.2)

// chords · pad warm · "WARM PAD"
const pad_warm = note(`<
  A@6 B@2 A@2 C D A@6 B@2 A@2 C@2 A@6 B@2 A@2 C@2 A@6 B@2 A@2 C@2 A@6 B@2 A@2 C@2 A@2 ~@9 A@3 B@2 A@2 C@2 A@6 B@2 A@2
  C@2 A@6 B@2 A@2 C@2 A@6 B@2 A@2 C@2 A@2 ~
>`.pickRestart({
  A: "f#3@8 e3@7 ~, b2@15 ~", B: "b3@8 a3@7 ~, e3@15 ~", C: "c#4@8 b3@7 ~, f#3@15 ~", D: "d#4@8 c#4@7 ~, g#3@15 ~",
})).s("gm_pad_warm").gain(0.3).pan(0.4)

// chords · pad new age · "FANTASIA"
const pad_new_age = note("<~@38 A B C ~@3 D E ~@16 F G H I G J@2 ~@37 K L M@2 N O P@2 K O Q@2 ~>".pickRestart({
  A: "~@10 [f#4,d#5]@2 [g#4,e5] ~ [g#4,e5] ~", B: "[f#4,d#5]@3 ~@7 [f#4,d#5]@2 [g#4,e5] ~ [g#4,e5] ~",
  C: "[f#4,d#5] ~@7", D: "~@8 b4 ~ b4!2 ~ b4!2 ~", E: "d#5 ~ b4 ~@13", F: "[d#5,b5]@2 f#5@2 [c5,e5,a5]@3 ~",
  G: "f#5 g5 ~ g#5 [b4,d#5]@2 ~@2 [a#4,d#5,e5]@7 ~, [b4,d#5] ~ a5@2 ~@4", // B D# B
  H: "e5@2 f#5 ~ g5 g#5 a5 ~ [g#4,e5,a#5]@7 ~, [a4,c5]@7 ~@9", I: "[b4,d#5,f#5,b5]@2 f#5@2 [c5,e5,a5]@3 ~",
  J: "[[a4,c5,e5]@3 f#5 g5 g#5 ~@2 [c#5,e5,a#5]@16 ~@8, ~@7 a5@2 ~@23]/2", // Am A#dim
  K: "[g#5,d#6]@3 [e5,b5]@3 [c#5,g#5]@2 [a4,e5]@7 ~", L: "[g5,d6]@3 [d5,a5]@2 [g4,d5]@3 [a4,e5]@7 ~",
  M: "[[a#4,d#5]@7 [b4,e5] [g#4,c#5]@22 ~@2]/2", N: "[g#5,d#6]@3 [e5,b5]@2 ~ [c#5,g#5]@2 [a4,e5]@7 ~",
  O: "[g5,d6]@3 [d5,a5]@2 [g4,d5]@2 ~ [a4,e5]@7 ~", P: "[[a#4,d#5]@6 [a#4,d#5] [a#4,b4,d#5,e5] [g#4,c#5]@22 ~@2]/2",
  Q: "[d#5@6 d#5 [d#5,e5] [g#4,c#5]@22 ~@2, a#4 ~@3]/2", // Emaj7 C#5
})).s("gm_pad_new_age").gain(0.3)

// drums · kick
const kick = s("bd").struct("<~@2 [x!2]!116 ~>").gain(0.54)

// drums · snare
const snare = s("sd").struct("<~ [~@3 x] [~ x ~ x]!116 ~>").gain(0.54)

// drums · clap
const clap = s("cp").struct("<~@2 [~ x ~ x]!116 ~>").gain(0.54)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@56 [~ x ~@6 x ~@7] [~ x ~@2 x ~ x ~ x!2 ~@6] ~@61>").gain(0.18)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@3 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@2 A@2 ~ A ~ A ~ A ~ A ~@2 A@2 ~ A ~ A ~ A B ~@3
  A@2 ~@9 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@2 A@2 ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~
>`.pickRestart({
  A: "~@5 x ~@2", B: "~@3 x",
})).gain(0.36)

// drums · crash
const crash = s("cr").struct("<~@34 A ~@23 A ~@6 B C@2 D ~@21 A ~@28>".pickRestart({
  A: "x", B: "~ x ~@3 x ~ x", C: "x!2", D: "x!2 ~@2 x ~@3",
})).gain(0.48)

// drums · cowbell
const cowbell = s("cb").struct(`<
  ~@2 A B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@2 ~@8 A B A@3 B A@3 B
  A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@2 ~
>`.pickRestart({
  A: "x!2 ~@2", B: "x!3 ~@5",
})).gain(0.48)

// drums · cowbell · soft notes
const cowbell_soft = s("cb").struct(`<
  ~@3 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 ~@9 A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~ A ~ B ~
>`.pickRestart({
  A: "~ x ~ x ~@12", B: "~ x!3 ~@12",
})).gain(0.3)

// drums · ht
const ht = s("ht").struct(`<
  ~ A ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~ C ~ D ~ E ~@7 C ~ D ~ E ~@7 C ~ D ~ E ~@17 B ~@3 B ~@3 B ~ C ~ D ~ E ~@9 B
  ~@3 B ~@3 B ~@3 B ~@3 B ~@3 B ~
>`.pickRestart({
  A: "~@2 x!3 ~@2 x!2 ~@7", B: "~@5 x ~@2", C: "~@7 x", D: "x ~@2 x ~ x ~ x ~ x ~ x!2 ~@3", E: "~@4 x!4",
})).gain(0.42)

// drums · ht · soft notes
const ht_soft = s("ht").struct("<~ [~@5 x!2 ~@9] ~@117>").gain(0.24)

// drums · mt
const mt = s("mt").struct("<~@27 A ~@11 A ~@11 A ~@17 B ~@13 A ~@35>".pickRestart({
  A: "~@7 x", B: "x!3 ~@2 x!4 ~@7",
})).gain(0.3)

// drums · mt · soft notes
const mt_soft = s("mt").struct("<~@69 [~@3 x!2 ~@11] ~@49>").gain(0.18)

stack(
  bass, distortion_guitar, overdriven_guitar, overdriven_guitar_soft, pad_warm, pad_new_age, kick, snare, clap, hihat,
  hihat_soft, open_hat, crash, cowbell, cowbell_soft, ht, ht_soft, mt, mt_soft
)