// Turn the Beat Around — Vicki Sue Robinson
// 132 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (2/4 at bar 1, 4/4 at bar 1) are rendered on a constant 4/4 grid of one bar per cycle
// note: pitch bends are ignored
// note: Full arrangement: all 113 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(132/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.

// other · lead 5 charang · "CHARANG 2"
const lead_5_charang = note(`<
  ~@11 A@2 B C D@2 E F G@2 ~@7 A@2 B C D@2 E F H A@2 B C D@2 E F G@2 ~@15 A@2 B C D@2 E F I@4 J ~@8 K@2 L M ~ K@2 L M ~
  N K@2 L M O@2 P Q R K@2 L M O@2 P Q S ~
>`.pickRestart({
  A: "[a4@2 a4 g#4 ~ g#4 ~ f#4@7 ~@2]/2", B: "f#4!2 ~ f#4 ~ g#4 ~ a4", C: "~ a4@6 ~",
  D: "[a4@2 a4 g#4 ~ a4 ~ a4@6 ~@3]/2", E: "f#4@3 ~ f#4@2 f#4@2 ~@2 g#4@2 ~@2 a4@2", F: "~ a4@5 ~@2",
  G: "[f#4!2 ~ f#4 ~ g#4@2 a4@3 ~@6]/2", H: "f#4!2 ~ f#4 ~ g#4@2 a4", I: "f#4!2 ~ f#4 ~ g#4@3", J: "c#5 ~@7",
  K: "[a#4@2 a#4 a4 ~ a4 ~ g4@7 ~@2]/2", L: "g4!2 ~ g4 ~ a4 ~ a#4", M: "~ a#4@6 ~", N: "g4 ~ g4@2 ~@2 g4@2 ~@2 a4@6",
  O: "[a#4@2 a#4 a4 ~ a#4 ~ a#4@6 ~@3]/2", P: "g4@3 ~ g4@2 g4@2 ~@2 a4@2 ~@2 a#4@2", Q: "~ a#4@5 ~@2",
  R: "g4!2 ~ g4 ~ a4@2 ~", S: "g4 ~@7",
})).s("gm_lead_5_charang").gain(0.36).pan(0.1)

// other · lead 5 charang · "CHARANG 3"
const lead_5_charang_2 = note(`<
  ~@11 A@2 B C D@2 E F G@2 ~@7 A@2 B C D@2 E F H A@2 B C D@2 E F G@2 ~@15 A@2 B C D@2 E F I@4 J ~@8 K@2 L M ~ K@2 L M ~
  N K@2 L M O@2 P Q R K@2 L M O@2 P Q ~@2
>`.pickRestart({
  A: "[f#4@2 f#4 e4 ~ e4 ~ d4@7 ~@2]/2", B: "d4!2 ~ d4 ~ e4 ~ f#4", C: "~ f#4@6 ~",
  D: "[f#4@2 f#4 e4 ~ f#4 ~ f#4@6 ~@3]/2", E: "d4@3 ~ d4@2 d4@2 ~@2 e4@2 ~@2 f#4@2", F: "~ f#4@5 ~@2",
  G: "[d4!2 ~ d4 ~ e4@2 f#4@3 ~@6]/2", H: "d4!2 ~ d4 ~ e4@2 f#4", I: "d4!2 ~ d4 ~ e4@3", J: "a4 ~@7",
  K: "[g4@2 g4 f4 ~ f4 ~ d#4@7 ~@2]/2", L: "d#4!2 ~ d#4 ~ f4 ~ g4", M: "~ g4@6 ~", N: "d#4 ~ d#4@2 ~@2 d#4@2 ~@2 f4@6",
  O: "[g4@2 g4 f4 ~ g4 ~ g4@6 ~@3]/2", P: "d#4@3 ~ d#4@2 d#4@2 ~@2 f4@2 ~@2 g4@2", Q: "~ g4@5 ~@2",
  R: "d#4!2 ~ d#4 ~ f4@2 ~",
})).s("gm_lead_5_charang").gain(0.4).pan(0.9)

// other · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  ~ A B@2 C@2 D@2 E@2 F G@2 H I J K L I M@2 ~@2 N O P Q R G@2 H I J K L I S G@2 H I J K L I M@2 ~@2 N O P Q R ~@3 N O P
  Q R G@2 H I J T E@2 U V@3 W ~@8 X@2 Y ~@2 X@2 Y ~@2 Z X@2 Y AA AB AC AD AA AE X@2 Y AA AB AC AD AF ~@2
>`.pickRestart({
  A: "~@12 [d5,d6] [e5,e6] [f#5,f#6] [g#5,g#6]", // D E F# G#
  B: "[[a5,a6]@2 [g#5,g#6]@2 [f#5,f#6]@2 [g#5,g#6]@2 ~@2 [e5,e6]@2 ~@2 [d5,d6]@10 [d5,d6] [f#5,f#6] [g#5,g#6] ~ [g#5,g#6] [f#5,f#6] [d5,d6] ~]/2", // A G# F# G# E D F# G# …
  C: "[[a5,a6]@2 [g#5,g#6]@2 [f#5,f#6]@2 [g#5,g#6]@2 ~@2 [e5,e6]@2 ~@2 [c#5,c#6]@14 [d5,d6] [e5,e6] [f#5,f#6] [g#5,g#6]]/2", // A G# F# G# E C# D E …
  D: "[[a5,a6]@2 [g#5,g#6]@2 [f#5,f#6]@2 [g#5,g#6]@2 ~@2 [e5,e6]@2 ~@2 [d5,d6]@10 [d5,d6] [c#5,c#6] [d5,d6] [e5,e6] [f#5,f#6] [e5,e6] [f#5,f#6] [g#5,g#6]]/2", // A G# F# G# E D C# D …
  E: "[[a5,a6]@2 [g#5,g#6]@2 [f#5,f#6]@2 [g#5,g#6]@2 ~@2 [e5,e6]@2 ~@2 [c#5,c#6]@14 [a4,a5] [b4,b5] [c5,c6] [c#5,c#6]]/2", // A G# F# G# E C# A B …
  F: "[d5,d6]@2 [d5,d6]@2 ~@2 [d5,d6]@2 ~@2 [e5,e6]@2 [d4,d5] [d#4,d#5] [e4,e5] [f4,f5]", // D E D D# E F
  G: "[[f#4,f#5]@4 [f#4,f#5]@2 [e4,e5]@2 ~@2 [e4,e5]@2 ~@2 [d4,d5]@12 ~@2 [a3,a4] [b3,b4] [c4,c5] [c#4,c#5]]/2", // F# E D A B C C#
  H: "[d4,d5]!2 ~ [d4,d5] ~ [e4,e5] ~@2", I: "~@12 [c#4,c#5] [d4,d5] [e4,e5] [f4,f5]",
  J: "[f#4,f#5]@2 [f#4,f#5] [e4,e5] ~@4", K: "~@12 [a3,a4] [b3,b4] [c4,c5] [c#4,c#5]",
  L: "[d4,d5]@2 [d4,d5]!2 ~ [e4,e5] ~@2", M: "[[f#4,f#5]!2 ~ [f#4,f#5] ~ [g#4,g#5] ~ [a4,a5]@3 ~@6]/2",
  N: "[f#3,f#5] [f3,f5] [f#3,f#5] [g#3,g#5] [a3,a5] [g#3,g#5] [a3,a5] [b3,b5] [c#4,c#6] [c4,c6] [c#4,c#6] [d4,d6] [e4,e6] [d#4,d#6] [e4,e6] [f4,f6]", // F# F F# G# A G# A B …
  O: "[f#4,f#6]", P: "[g#4,g#6]", Q: "[a4,a6]", R: "[b4,b6]@12 [c#4,c#5] [d4,d5] [e4,e5] [f4,f5]",
  S: "[f#4,f#5]@2 [f#4,f#5]@2 ~@2 [f#4,f#5]@2 ~@2 [g#4,g#5]@2 [c#4,c#5] [d4,d5] [e4,e5] [f4,f5]", // F# G# C# D E F
  T: "~@8 [d5,d6] [c#5,c#6] [d5,d6] [e5,e6] [f#5,f#6] [e5,e6] [f#5,f#6] [g#5,g#6]", // D C# D E F# E F# G#
  U: "[d5,d6]!2 ~ [d5,d6] ~ [e5,e6] ~@2", V: "[f#5,f#6]!2 ~ [f#5,f#6] ~ [g#5,g#6] ~@2", W: "[a5,a6] ~@7",
  X: "[[g4,g5]@4 [g4,g5]@2 [f4,f5]@2 ~@2 [f4,f5]@2 ~@2 [d#4,d#5]@12 ~@2 [a#3,a#4] [c4,c5] [c#4,c#5] [d4,d5]]/2", // G F D# A# C C# D
  Y: "[d#4,d#5]!2 ~ [d#4,d#5] ~ [f4,f5] ~@2", Z: "[g5,g6]!2 ~ [g5,g6] ~ [a5,a6] ~@2",
  AA: "~@12 [d4,d5] [d#4,d#5] [f4,f5] [f#4,f#5]", AB: "[g4,g5]@2 [g4,g5] [f4,f5] ~@4",
  AC: "~@12 [a#3,a#4] [c4,c5] [c#4,c#5] [d4,d5]", AD: "[d#4,d#5]@2 [d#4,d#5]!2 ~ [f4,f5] ~@2",
  AE: "[g4,g5]@2 [g4,g5]@2 ~@2 [g4,g5]@2 ~@2 [a4,a5]@2 [d4,d5] [d#4,d#5] [f4,f5] [f#4,f#5]", // G A D D# F F#
  AF: "~@12 [d4,d5] [d#4,d#5] [f4,f5] ~", // D D# F
})).s("gm_string_ensemble_1").gain(0.4).pan(0.6)

// bass · electric bass finger · "BASS"
const bass = note(`<
  ~@2 A@2 B C A@2 B D E A@2 B C A@2 B D E F G F G F G F G A@2 B C A@2 B D E A@2 B C A@2 B D E F G F G F G F G F G F G F
  G F G A@2 B C A@2 B D E@4 H ~ I@6 J K@2 L ~@2 K@2 L ~@2 M K@2 L N K@2 L O M K@2 L N K@2 L O ~@2
>`.pickRestart({
  A: "[f#2@2 f#2 ~ f#2@2 e2 ~@3 e2 ~@3 d2@4 d2@2 a1 ~ b1 ~ d2@2 d2@2 a1 ~ b1 ~]/2",
  B: "d2 ~ d2 ~ d2 ~ d2 ~@3 e2 ~@3 f#2@2", C: "~@2 f#2 ~ c#2@2 e2 ~ f#2 ~ f#2 ~ c#2@2 e2 ~",
  D: "~@2 f#2 ~ c#2@2 e2 ~ f#2 ~ c#2 ~ e2 ~ c#2 ~", E: "d2 ~ d2 ~@3 d2 ~@3 e2@4 ~@2",
  F: "f#2@2 ~ f#2 c#2@2 f#2 ~@5 c#2@2 f#2 ~", G: "e2@2 ~ e2 b1@2 e1@2 ~@4 b1@2 e2 ~", H: "f#2 ~@7",
  I: "f#2@2 ~ f#2 c#2@2 e2 ~ f#2@2 f#2@2 c#2@2 e2@2", J: "d2 ~ d2 ~ d2 ~ d3@3 ~ d2 ~ d3 ~ d2 ~",
  K: "[g2@2 g2 ~ g2@2 f2 ~@3 f2 ~@3 d#2@4 d#2@2 a#1 ~ c2 ~ d#2@2 d#2@2 a#1 ~ c2 ~]/2",
  L: "d#2 ~ d#2 ~ d#2 ~ d#2 ~@3 f2 ~@3 g2@2", M: "d#2 ~ d#2 ~@3 d#2 ~@3 f2@4 ~@2",
  N: "~@2 g2 ~ d2@2 f2 ~ g2 ~ g2 ~ d2@2 f2 ~", O: "~@2 g2 ~ d2@2 f2 ~ g2 ~ d2 ~ f2 ~ d2 ~",
})).s("gm_electric_bass_finger").gain(0.44).pan(0.1)

// chords · trombone · "T-BONE"
const trombone = note("<~@2 A@2 B@2 A@2 B@2 C ~@102>".pickRestart({
  A: "[[f#3,a3]@3 ~ [f#3,a3]@2 [e3,g#3] ~@3 [e3,g#3] ~@3 [d3,f#3]@17 ~]/2", // F#m E D
  B: "[[d3,f#3] ~ d3@2 ~@2 [d3,f#3] ~@3 e3@2 ~@2 [f#3,a3]@17 ~, ~@2 f#3 ~@7 g#3 ~@21]/2", // D F#m
  C: "[d3,f#3] ~ [d3,f#3] ~@3 [d3,f#3] ~@3 [e3,g#3]@5 ~", // D E
})).s("gm_trombone").gain(0.46).pan(0.2)

// chords · electric guitar clean · "EL. GUITAR"
const electric_guitar_clean = note("<~@2 A@2 B@2 A@2 B@2 C ~@102>".pickRestart({
  A: "[[f#4,a4,c#5]@4 [f#4,a4,c#5]@2 [e4,g#4,b4]@2 ~@2 [e4,g#4,b4]@2 ~@2 [d4,f#4,a4]@5 ~ [d4,f#4,a4]@3 [d4,f#4,a4]!4 ~@5]/2", // F#m E D
  B: "[[d4,f#4,a4]@2 [d4,f#4,a4]@2 ~@2 [d4,f#4,a4]@2 ~@2 [e4,g#4,b4]@2 ~@2 [f#4,a4,c#5]@5 ~ [c#4,f#4,a4]@3 [c#4,f#4,a4]!4 ~@5]/2", // D E F#m
  C: "[d4,f#4,a4]@2 [d4,f#4,a4]@2 ~@2 [d4,f#4,a4]@2 ~@2 [e4,g#4,b4]@5 ~", // D E
})).s("gm_electric_guitar_clean").gain(0.35).pan(0.7)

// chords · brass section · "BRASS"
const brass_section = note("<~@21 A ~@25 A ~@7 A ~ B ~@24 C D ~@29>".pickRestart({
  A: "~@2 e5@2 ~@2 [b4,e5]@2 [g#4,b4]@3 ~@5, ~@2 g#5 ~@13", B: "~@2 [c#4,c#5]@3 [e4,e5]@2 ~ [f#4,f#5]@3 ~@5",
  C: "[c4,e4,g4]@5 ~ [e4,g4,c5]@4 ~@2 [g4,c5,e5]@4", D: "[a#4,d5,g5] ~@3",
})).s("gm_brass_section").gain(0.4).pan(0.8)

// drums · kick
const kick = s("bd").struct("<[x!4]!28 [x!3 ~ x!3 ~]!4 [x!4]!43 [x ~ x ~ x!3 ~] [x!4]!18 [x!3 ~ x!3 ~]!4 [x!4]!13 ~@2>")
  .gain(0.42)

// drums · snare
const snare = s("sd").struct("<~ [~@2 x ~ x!3 ~@9] [~ x ~ x]!87 [~ x ~@2]!2 [~ x ~ x]!20 ~@2>").gain(0.36)

// drums · low tom
const low_tom = s("lt").struct("<~ [~@13 x!2 ~] ~@111>").gain(0.42)

// drums · hihat
const hihat = s("hh").struct("<[x!16]!111 ~@2>").gain(0.3)

// drums · mid tom
const mid_tom = s("mt").struct("<~ A ~@18 B@8 ~@18 B@16 ~@12 B@9 ~@3 B@2 ~@3 B@2 ~@20>".pickRestart({
  A: "~@5 x!2 ~", B: "~ x!2 ~@2 x!2 ~",
})).gain(0.3)

// drums · high tom
const high_tom = s("ht").struct("<~ A ~@18 B@8 ~@18 B@16 ~@12 B@9 ~@3 B@2 ~@3 B@2 ~@20>".pickRestart({
  A: "~ x", B: "~@3 x ~@7 x ~@4",
})).gain(0.3)

// drums · crash
const crash = s("cr").struct("<~@28 A ~@8 A ~@24 A ~@20 A ~@4 A ~@4 A@2 ~@8 A ~@9>".pickRestart({
  A: "x",
})).gain(0.42)

// drums · bongos
const bongos = s("bongo:18").struct("<[~@2 x ~@3 x ~@2 x ~@2 x ~@3] ~ [x ~ x ~@3 x!2 ~ x!2 ~@5]!109 ~@2>").gain(0.95)

// drums · congas
const congas = s("conga:18").struct("<A ~@73 B@3 C@6 ~@3 C@2 ~@3 C@2 ~@20>".pickRestart({
  A: "x ~@3 x ~@2 x ~@2 x ~@5", B: "~@7 x", C: "x!3 ~ x!3 ~ x!8",
})).gain(1.15)

stack(
  lead_5_charang, lead_5_charang_2, string_ensemble_1, bass, trombone, electric_guitar_clean, brass_section, kick,
  snare, low_tom, hihat, mid_tom, high_tom, crash, bongos, congas
)