// Private Dancer — Tina Turner
// 116 bpm, 4/4, key G major. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: Full arrangement: all 82 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(116/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · electric bass finger · "tk2"
const bass = note(`<
  ~ A B C B D E F G H I J G K L M G N L O P Q R S T U V W X Y D L Z G AA L AB G AC AD AE G AF L AG AH AI AJ AK AL AM AN
  AO AP AQ AR AK AS AT AU AV AW AX AY ~@5 AZ BA BB BC BD BE BF BG BH BI BJ BK ~
>`.pickRestart({
  A: "e2@7 ~ b1@7 ~", B: "a1@5 ~ d2@4 b1@2 d2@2 d#2@2", C: "e2@7 ~ b1@5 ~ b1@2", D: "e2@4 ~@2 e2 ~ e2@4 ~@2 e2@2",
  E: "b1@5 ~ c2@9 ~", F: "e2@4 ~@2 e2@2 b1@5 ~ b1@2", G: "a1 b1 c2 c#2 d2 b1 d2 d#2", H: "e2@3 ~@3 e2 ~ e2@5 ~ e2@2",
  I: "b1@5 ~ c2@7 ~ b1 ~", J: "e1@5 ~ e1@2 b1@5 ~ b1@2", K: "e2@4 ~@2 e2@2 e1@3 ~ e1@3 ~", L: "b1@5 ~ c2@7 ~ b1@2",
  M: "e2@5 ~ e2@2 b1@4 ~@2 b1@2", N: "e2@5 ~ b1@2 e1@5 ~ e1@2", O: "e2@5 ~ e2@2 b1@5 ~ b1@2",
  P: "a1@2 b1@2 c2@2 d2@4 b1@2 d2@2 f#2 ~", Q: "g2@4 ~@2 g1 ~ g1@4 ~@2 d2@2", R: "g1@4 ~@2 g1 ~ g1@5 ~ d2@2",
  S: "g2@5 ~ f#2@2 e2@5 ~ e2@2", T: "d2@3 ~@3 d2@3 ~ d2@2 a1@2 b1@2", U: "d2@3 ~@3 d2 ~ d2@3 ~ d2@2 e2@2",
  V: "f2@4 ~@2 f2@2 f1@3 ~ f1@3 ~", W: "f#1@3 ~@3 f#1 ~ f#1@4 ~@2 f#1@2", X: "c#2@5 c#2@2 ~ c2@3 ~@2 c2@2 ~",
  Y: "e2@5 b1 d2 d#2", Z: "e1@2 ~@2 e1@2 g1@2 b1@3 ~ b1@3 ~", AA: "e2@3 ~ e2@3 b1 e1 ~ e1@2 e2@2 e1@2",
  AB: "e1@3 ~ e1@3 ~ b1@3 ~ b1@2 a#1@2", AC: "e2@3 ~ e2@3 b1 e2@2 b1@2 e1@2 e1@2", AD: "b1@5 ~ c2@3 ~ c2 ~ c2@2 d2 ~",
  AE: "e1@3 ~ e1@3 ~ b1@2 ~@2 b1@3 ~", AF: "e2@2 ~@2 e2@3 b1 e2 b1 e1@2 e1@2 g1@2",
  AG: "e2@2 ~@2 e2@2 ~ e2 b1@2 b1@3 ~ b1@2", AH: "a1 b1 c2 d2@2 b1 d2!2", AI: "g1@4 ~@2 g1 ~ g1@3 ~ d2@2 ~@2",
  AJ: "g2@3 ~@2 g2 ~@2 g2@2 ~ g2 e2@2 d2@2", AK: "g1@3 ~@3 g1@2 e2@4 ~@2 e2@2",
  AL: "d2@2 ~@2 d2@3 a1 d2 ~ d2@2 a1@2 b1@2", AM: "d2@3 ~@3 d2@2 d2@5 ~ d2@2", AN: "f2@3 ~@5 f1@3 ~ f1@3 ~",
  AO: "f#1@4 ~@2 f#1@2 b1@3 ~ b1@3 ~", AP: "e2@3 ~ e2@2 ~ e2 d2@2 c2@2 b1@2 a1@2", AQ: "g1@5 ~ g1 ~ g1@5 ~ d2@2",
  AR: "g2@3 ~@3 g2@2 g2@2 g2@2 e2@2 d2@2", AS: "d2@3 ~ d2@3 a1 d2@2 d2@2 b1@2 a1@2", AT: "d2@3 ~@3 d2@2 d2@4 ~@2 d2@2",
  AU: "f2@4 ~@2 f2 ~ f2@4 ~@2 f2@2", AV: "f#2@5 ~ f#2@2 f#2@4 ~@2 f#2@2", AW: "c#2@5 ~ c#2@2 c2@4 ~@2 c2@2",
  AX: "e2@4 ~ e1 g1 g#1", AY: "a1 ~@3", AZ: "c#2@5 ~ c#2@2 ~@2 c2@4 ~@2", BA: "b1@2 b1@2 b1 ~ b1@2 ~@4 b1@3 ~",
  BB: "g1@4 ~@2 g1@2 g1@3 ~ d2@2 e2@2", BC: "g1@3 ~@3 g1@2 g2 ~ g2@2 e2@2 d2@2", BD: "g1@3 ~@3 g1@2 e2@3 ~ e1@2 e2@2",
  BE: "d2@2 ~ d2 ~ d2 b1 a1", BF: "d2@4 ~@2 d2 ~ d2@3 ~ d2@2 e2@2", BG: "f2@2 ~ f2 f1@2 ~ f1",
  BH: "f#1@5 ~ f#1@3 ~@3 f#1@3 ~", BI: "c#2@4 ~@2 c#2@2 c2@5 c2@2 ~", BJ: "e2@6 ~ b1@4 g1@2 ~ a1@2", BK: "b1@2 ~ e1@13",
})).s("gm_electric_bass_finger").gain(0.4)

// chords · piano · "tk3"
const piano = note(`<
  ~ A B A B C D E B C D E B C D E B C D E F G H I J K L M N O C D E B C D E B C D E B C D E F G H I J K L P Q G H I J K
  L M N R S T S T S T U V W H I J K L M N X Y@2
>`.pickRestart({
  A: "e3@7 ~ b2@7 ~", B: "[a2,g3]@5 ~ d3@4 b2@2 d3@2 d#3@2", C: "e3@3 ~ [b3,d4]@3 ~ e3@7 ~",
  D: "[b2,a3]@5 ~ [c3,g3]@5 ~ b2@3 ~", E: "e3@7 ~ [b2,f#3,a3]@7 ~", F: "[a2,g3]@5 ~ d3@4 b2@2 d3@3 ~",
  G: "g2@5 ~ g2@4 d3@5 ~", H: "g3@7 ~ b3@3 ~ a3@3 ~", I: "[g3,b3]@7 ~ [e3,g3,b3]@7 ~",
  J: "[d3,g3,a3]@7 ~ [d3,f#3,a3]@7 ~", K: "[d3,f#3]@7 ~ d3@3 ~ d3@3 ~", L: "[f3,a3]@7 ~ f3@7 ~",
  M: "[f#3,c4,e4]@7 ~ f#3@7 ~", N: "[c#3,a#3]@7 ~ c3@7 ~", O: "[e3,g3,b3]@5 b2 d3 d#3",
  P: "[f#3,c4,e4]@7 ~ [a3,d#4]@7 ~", Q: "[e3,g3,b3]@3 ~ e3@3 ~ d3@7 ~", R: "[e3,g3,b3]@5 e3 g3 e3",
  S: "[a2,c#3,g3]@7 ~ a2@7 ~", T: "a2@5 ~ a2@5 ~ a2@3 ~", U: "[c#3,a#3]@7 ~@3 [c3,a#3]@5 ~",
  V: "[b2,d#3,a3]@5 ~ [b2,d#3,a3]@5 ~ [b2,d#3,a3]@3 ~", W: "g2@5 ~ g2@5 ~ d3@3 ~", X: "e3@6 ~ b2@4 g2@2 ~ a2@2",
  Y: "[b2@2 ~ e2@18 ~@11]/2",
})).s("gm_piano").gain(0.47)

// chords · piano · "tk4" · G D C Am G D C Am
const piano_2 = note(`<
  ~
  [~ [b3,d4,g4]!3 [d4,f#4,a4]!2 ~ d4]
  [[c4,e4]@3 ~ b4@2 [c4,e4,a4]@9 ~]
  [~ [b3,d4,g4]!3 [d4,f#4,a4]!2 ~ d4]
  [[c4,e4]@3 ~ b4@2 [c4,e4,a4]@9 ~]
  ~@77
>`).s("gm_piano").gain(0.72)

// chords · electric guitar muted · "tk5"
const electric_guitar_muted = note(`<
  ~@5 A B C D E F G H I J K H L M K N O P Q R S T U V W A B C D E F G H I J K H L M K N O P Q R S T U X O P Q R S T U V
  W Y@2 Z Y@3 AA AB O P Q R S T U V AC@2 ~
>`.pickRestart({
  A: "~@4 [e3,b3] ~@5 [e3,b3]@2 ~@4", B: "[d3,a3] ~@2 [c3,g3]@4 ~", C: "~@2 [e3,b3] ~@2 [d3,a3] ~@2",
  D: "[c3,g3]@3 ~@3 [c3,g3]@5 ~ [c3,a3]@3 ~", E: "~@2 [e3,b3] ~@2 [e3,b3] ~@2", F: "[d3,a3]@3 ~@3 [c3,g3]@9 ~",
  G: "~@4 [e3,b3]@2 ~@4 [d3,a3]@3 ~@3", H: "[c3,g3]@3 ~@3 [d3,a3]@6 ~@4", I: "~@4 a3 b3 g4@8 ~@2",
  J: "[a3,f#4]@3 [a3,f#4] ~@2 [g3,e4]@7 ~@3", K: "~@2 e3@2 b3@3 ~@3 d3@2 a3@3 ~", L: "~@2 a3 b3 g4@10 ~@2",
  M: "[a3,f#4]@3 ~@3 [g3,e4]@8 ~@2", N: "[c3,g3]@5 ~ [d3,a3]@5 ~ d4@2 ~@2",
  O: "[g2,d3,g3] ~@3 [g2,d3,g3] ~ g2 ~@3 [g2,d3,g3]@2 ~@2 g2 ~", // G5
  P: "[g2,d3,g3]@2 ~@2 [g2,d3,g3] ~ g2 ~@3 [g2,d3,g3] ~@3 g2 ~", // G5
  Q: "[g2,d3,g3] ~@3 [g2,d3,g3] ~ g2 ~@3 [g2,d3,g3] ~ g2 ~ [d3,a3] ~", // G5 D5
  R: "~@3 d3 [a3,d4]@2 a3 [b3,d4]@2 [b3,d4] a3@2 [f#3,a3] e3 d3@2", S: "~@4 [d3,a3] ~@5 [d3,a3]@2 ~@2 d3 ~",
  T: "[f3,c4]@2 ~@2 [f3,c4] ~@5 [f3,c4]@2 ~@4", U: "[e3,a3]@2 ~@2 [e3,a3] ~@11", V: "~@2 [c#3,g3] ~ [c3,g3]@2 ~@2",
  W: "[e3,b3]@15 ~", X: "~@2 g3@2 d4@4 ~@2 a3@2 d4@3 ~",
  Y: "[g3,c#4,f#4,a4] ~@2 [g3,c#4,f#4,a4] ~@2 [g3,c#4,f#4,a4] ~@3 [g3,c#4,f#4,a4] ~@2 [g3,c#4,f#4,a4] ~@2", // F#m
  Z: "[g3,c#4,f#4,a4] ~@2 [g3,c#4,f#4,a4] ~@2 [g3,c#4,f#4,a4] ~@3 [g3,c#4,f#4,a4] ~@2 [g3,c#4,a4] ~@2", // F#m A7
  AA: "[a#3,c#4,g4] ~ [a#3,c#4,g4] ~ [a#3,c#4,g4] ~ [a#3,c#4,g4]@2 ~@2 [a#3,c4,g4]@4 ~@2", // Gdim C7
  AB: "[a3,d#4,f#4] ~ [a3,d#4,f#4] ~ [a3,d#4,f#4] ~ [a3,d#4,f#4] ~@9", AC: "[e3,b3]/2",
})).s("gm_electric_guitar_muted").gain(0.44)

// chords · synth strings 2 · "tk6"
const synth_strings_2 = note(`<
  ~ A B C B D E F G D E H I J K L B J K L M N@3 O@2 P Q R S T E C U R K V W J X Y Z J K L W AA AB AC AD AE AF@2 R AG
  AH@2 AD AI Q@2 AJ S AK@6 ~@2 AL AB AC AM AN Q@2 R AO@3
>`.pickRestart({
  A: "[b3,e4,g4]@7 ~ [d4,f#4,a4]@7 ~", B: "[c4,e4,g4]@5 ~ a4@9 ~", C: "[b3,d4,g4]@7 ~ [d4,f#4,a4]@7 ~",
  D: "[b3,e4,g4]@15 ~", E: "[a3,d4,f#4]@5 ~ [g3,b3,e4]@9 ~", F: "[b3,d4,g4]@7 ~ [a3,d4,f#4]@7 ~",
  G: "[g3,c4,e4]@5 ~ [c4,e4,g4]@9 ~", H: "[b3,e4,g4]@7 ~ [a3,d4,f#4]@7 ~", I: "[g3,c4,e4]@7 ~ g4@7 ~",
  J: "[e4,g4,b4]@15 ~", K: "[d4,f#4,a4]@5 ~ [c4,e4,g4]@9 ~", L: "[e4,g4,b4]@7 ~ [d4,f#4,a4]@7 ~",
  M: "[c4,e4,g4]@7 ~ d5@7 ~", N: "[c5@5 ~ b4@41 ~]/3", O: "[[g4,a4,d5]@7 ~ f#4@23 ~]/2", P: "[f4,a4,c5]@15 ~",
  Q: "[e4,a4,c5]@15 ~", R: "[e4,g4]@15 ~", S: "b3@15 ~", T: "[b3,e4,g4]@7 ~ d4@7 ~",
  U: "[c4,e4,g4,b4]@5 ~ [d4,f#4,a4]@9 ~", V: "[d4,g4,b4]@7 ~ [f#4,a4]@7 ~", W: "[c4,e4,g4]@7 ~ a4@7 ~",
  X: "[f#4,a4,d5]@5 ~ [g4,e5]@9 ~", Y: "[g4,b4]@7 ~ [f#4,a4]@7 ~", Z: "[e4,g4]@7 ~ [d4,a4]@3 ~ f#4@3 ~",
  AA: "[d4,c5]@5 ~ b4@9 ~", AB: "d5@15 ~", AC: "a4@7 ~ b4@7 ~", AD: "[d4,a4]@7 ~ f#4@7 ~", AE: "[d4,f#4,a4]@15 ~",
  AF: "[[f4,a4,c5]@7 ~ e4@15 ~ [f#4,b4]@7 ~]/2", AG: "[e4,g4,c5]@5 ~ [d4,b4]@9 ~",
  AH: "[[d4,g4,b4]@23 ~ [e4,d5]@7 ~]/2", AI: "[d4,f#4]@7 ~ d5@7 ~", AJ: "[c#4,e4,g4]@7 ~ a#3@7 ~",
  AK: "[[g4,c#5,f#5,a5]@95 ~]/6", AL: "[d4,g4,c5]@5 ~ b4@9 ~", AM: "[f#4,a4]@15 ~", AN: "d4@15 ~", AO: "[b3@3 ~]/3",
})).s("gm_synth_strings_2").gain(0.47)

// bass · synth bass 1 · "tk7"
const bass_2 = note("<~@63 A B A C D E F G ~@11>".pickRestart({
  A: "[a1,a2]@5 ~ [a1,a2]@9 ~", B: "[a1,a2]@5 ~ [b1,b2] [c2,c3] [c#2,c#3]@3 ~ [g1,g2]@3 ~",
  C: "[a1,a2]@5 ~ [a1,a2]@3 ~ [b1,b2] [c2,c3] [c#2,c#3] ~ [g1,g2] ~", D: "[a1,a2]@5 ~ [a1,a2]@7 ~ [g1,g2]@2",
  E: "[a1,a2]@5 ~ [b1,b2] [c2,c3] [c#2,c#3]@3 ~ [a1,a2]@3 ~", // A B C C# A
  F: "[c#2,c#3]@2 [a#1,a#2]@2 [c#2,c#3] ~ [a#1,a#2]@4 [c2,c3]@5 ~", G: "[b1,b2] ~ [b1,b2] ~ [f#1,f#2] ~ [b0,b1]@9 ~",
})).s("gm_synth_bass_1").gain(0.35)

// drums · kick
const kick = s("bd").struct(`<
  ~ A ~ A B C@16 D E D E D E D E D C@16 D E D E D E D E D E D E D E D E D C@6 F G D E D E D E D E ~@3
>`.pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "~@5 x ~@2", C: "x!4", D: "x ~@2 x!2 ~@3", E: "x ~@3 x!2 ~@2", F: "x ~@2 x ~@2 x ~",
  G: "x ~@2 x ~ x ~@2",
})).gain(0.4)

// drums · rim
const rim = s("rim").struct("<~ A@3 B A@15 B ~@9 A@15 B ~@36>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2",
})).gain(0.4)

// drums · snare
const snare = s("sd").struct("<~@4 A ~@15 B C@7 D E ~@15 B C@7 D C@7 D E C@3 F C@2 G H C@7 D ~@3>".pickRestart({
  A: "~@3 x", B: "~@11 x!2 ~ x!2", C: "~ x ~ x", D: "~@4 x ~@6 x!2 ~@3", E: "~@4 x ~@6 x ~@4", F: "~@4 x ~@7 x ~ x!2",
  G: "~@2 x ~@2 x ~@2", H: "~@4 x ~@6 x!2 ~ x!2",
})).gain(0.4)

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

// drums · low tom
const low_tom = s("lt").struct("<~@28 A B ~@23 A ~@7 A B ~@6 B ~@8 A ~@3>".pickRestart({
  A: "~@15 x", B: "~@7 x",
})).gain(0.4)

// drums · mid tom
const mid_tom = s("mt").struct("<~@28 A B ~@23 A ~@7 A B ~@6 B ~@8 A ~@3>".pickRestart({
  A: "~@13 x!2 ~", B: "~@3 x",
})).gain(0.4)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@6 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@4 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@3 A ~ A ~ A ~@3 B@6 C B
  ~ A ~ A ~ A ~@5
>`.pickRestart({
  A: "~@7 x", B: "~@3 x ~@3 x", C: "~@3 x ~@4",
})).gain(0.4)

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

// drums · ride
const ride = s("rd").struct("<~ x ~@78 [~@3 x ~@12] ~>").gain(0.4)

// drums · congas
const congas = s("conga:13").struct("<~ [~ x ~@2]!28 ~ [~ x ~@2]!32 ~@9 [~ x ~@2]!8 ~@3>").gain(1.29)

// drums · congas
const congas_2 = s("conga:18").struct(`<
  ~ A@2 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A ~ A@2 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A ~@9 A@2 B A@3 B A
  ~@3
>`.pickRestart({
  A: "~ x ~@3 x ~@2", B: "~@5 x ~@2",
})).gain(1.29)

// drums · congas
const congas_3 = s("conga:33").struct(`<
  ~ A B A@3 B A@3 B A@3 B A@3 B A@3 B A@3 B A@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@2 ~@9 A B A@3 B A@2
  ~@3
>`.pickRestart({
  A: "~@6 x!2", B: "~@3 x",
})).gain(1.29)

// drums · cabasa
const cabasa = s("cabasa:4").struct(`<
  ~@2 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@2 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~
  A ~ A ~@10 A ~ A ~ A ~ A ~@3
>`.pickRestart({
  A: "~@6 x!2",
})).gain(2.04)

stack(
  bass, piano, piano_2, electric_guitar_muted, synth_strings_2, bass_2, kick, rim, snare, hihat, low_tom, mid_tom,
  open_hat, crash, ride, congas, congas_2, congas_3, cabasa
)