// Woman, Woman — Gary Puckett
// 108 bpm, 4/4, key D major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 67 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(108/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 · electric bass pick
const bass = note(`<
  ~ A B C D E F G H I J K L M N O P Q R S L T N U B C D E F G H I J V W X Y@2 Z AA AB AC AD AE AF AG Z AH AB AI AJ AK AL
  AM AN AO AP AQ AJ AK AL AM AR ~@4
>`.pickRestart({
  A: "~ a1!7", B: "d2@3 d2@2 d2@2 d2", C: "f#2@3 c#2 f#2@2 e1 f#1", D: "g1@3 d2 g2@3 d2", E: "f#2@2 c#2!2 a1!2 f#1!2",
  F: "g1@3 g1!2 g1@2 g1", G: "f#1@3 f#1!2 ~ c#2 f#2", H: "e2@8 e2@2 ~ b1@2 e2@2 ~",
  I: "a1@2 a1@2 a1@2 a1@2 a1@2 a1@2 b1@2 d2 b1", J: "d2@6 d2 ~ g2@8", K: "d2!2 f#2 a2 g2 g1 a1 d2",
  L: "d2@3 d2 d2@3 d2", M: "f#1@3 c#2 f#2 c#2 f#1!2", N: "g1@3 g1 g1@3 g1", O: "a1@3 a1 a1@2 c#2@2",
  P: "d2@3 d2 b1@3 b1", Q: "e2@3 e2!2 b1 e2@2", R: "d2@3 d2 d2@3 a1", S: "d2 ~@2 a2@2 a1 d2 a1, ~ d3@3 ~@4",
  T: "f#1@3 c#2 f#2 c#2 a1 f#1", U: "g1@3 g1!5", V: "d2!8", W: "e2@3 b1 e2 e2@2 f#2",
  X: "g2@2 d2@3 ~ a1@2 a#1@2 d2@2 ~@2 g1@2", Y: "[d2@2 d2 a1 d2 a1 d2 b1@2 f#1 b1 f#1 b1 f#1 b1!2]/2",
  Z: "e2@3 e2 e2@3 e2", AA: "g#1@3 d#2 g#2 d#2 g#1!2", AB: "a1@3 a1 a1@3 a1", AC: "b1@3 b1 b1@2 d#2@2",
  AD: "e2@3 e2 c#2@3 c#2", AE: "f#2@3 f#2!2 c#2 f#2@2", AF: "e2@3 e2 e2@3 b1", AG: "e2 ~@2 b2@2 b1 e2 b1, ~ e3@3 ~@4",
  AH: "g#1@3 d#2 g#2 d#2 b1 g#1", AI: "a1@3 a1!5", AJ: "e2@3 e2@2 e2@2 e2", AK: "g#2@3 d#2 g#2@2 f#1 g#1",
  AL: "a1@3 e2 a2@3 e2", AM: "g#2@2 d#2!2 b1!2 g#1!2", AN: "a1@3 a1!2 a1@2 a1", AO: "g#1@3 g#1!2 ~ d#2 g#2",
  AP: "f#2@8 f#2@2 ~ c#2@2 f#2@2 ~", AQ: "b1@2 b1@2 b1@2 b1@2 b1@2 b1@2 c#2@2 e2 c#2", AR: "a1@3 a1!2 a1@2 ~",
})).s("gm_electric_bass_pick").gain(0.6)

// bass · electric bass pick · soft notes
const bass_soft = note(`<
  ~@62
  [~@7 a1]
  [g#1@3 g#1!2 ~ d#2 g#2]
  [f#2@8 f#2@2 ~ c#2@2 f#2@2 ~]
  [b1@2 b1@2 b1@2 b1@2 b1@2 b1@2 c#2@2 e2 c#2]
  ~
>`).s("gm_electric_bass_pick").gain(0.12)

// other · piano
const piano = note("<~ [~ a2!7] ~@65>").s("gm_piano").gain(0.11).pan(0)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@2 A B C D E F G H I J K L M N O M P Q K L M R A B C D E F G H I S T U V@2 W X Y Z AA Y AB AC W X Y AD AE AF AG AH AI
  AJ AK AL AE AF AG AH AI AJ AK AL ~
>`.pickRestart({
  A: "[a3,d4,f#4]@3 [a3,d4,f#4] [a3,d4,f#4]@4", B: "[c#4,f#4,a4] ~ [c#4,f#4,a4]!2 ~ [c#4,f#4,a4] ~ [c#4,f#4,a4]",
  C: "[b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~", // G
  D: "[a3,c#4,f#4]@2 ~@2 [a3,c#4,f#4]@2 ~@2 [a3,c#4,f#4]@2 [a3,c#4,f#4]@3 ~ [a3,c#4,f#4]@2", // F#m
  E: "~@2 [b3,d4,g4] ~ [b3,d4,g4] ~ [b3,d4,g4] ~", F: "[c#4,f#4,a4] ~ [c#4,f#4,a4] ~ [c#4,f#4,a4] ~ [c#4,f#4,a4] ~",
  G: "[b3,e4,g4]@2 ~@2 [b3,e4,g4]@2 ~@2 [b3,e4,g4]@2 ~ [b3,e4,g4]@2 [b3,e4,g4]@2 ~", H: "a4 ~@7",
  I: "[a3,d4,f#4]@2 [a3,d4,f#4] [a3,d4] [b3,d4,g4]@2 [b3,d4,g4]!2", J: "[a3,d4,f#4]@2 [a3,d4,f#4] [a3,d4] [b3,d4,g4]!4",
  K: "[a3,d4,f#4]@3 [a3,d4,f#4] [a3,d4,f#4]@3 [a3,d4,f#4]", // D
  L: "[a3,c#4,f#4]@3 [a3,c#4,f#4] [a3,c#4,f#4]@3 [a3,c#4,f#4]", M: "[b3,d4,g4]@3 [b3,d4,g4] [b3,d4,g4]@3 [b3,d4,g4]",
  N: "[c#4,e4,a4]@6 [c#4,e4,a4]@2 [c#4,e4] [d4,f#4] [c#4,e4]@2 [a3,e4]@2 [c#4,e4,a4]@2, ~@4 a4@3 ~", // A C#m D C#m A5 A
  O: "[a3,d4,f#4]@3 [a3,d4,f#4] [b3,d4,f#4]@3 [b3,d4,f#4]", P: "[a3,d4,f#4]@3 [a3,d4,f#4] [b3,d4,g4]@2 [a3,d4,f#4]@2",
  Q: "~ [a3,d4,f#4]@2 d4 [d4,g4] f#4 e4 d4, ~@3 [a3,f#4]@2 ~@3", // D G5 D
  R: "[a#3,d4,f#4]@3 [a#3,d4,f#4] [a#3,d4,f#4]@3 [a#3,d4,f#4]", S: "[a3,d4,f#4]@2 [a3,d4,f#4] [a3,d4] [a3,d4,f#4]!4",
  T: "[g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4] ~", // Em
  U: "[a#3,d4,g4] ~ [a#3,d4,g4] ~ [a#3,d4,g4] ~ [a#3,d4,g4] ~", // Gm
  V: "[[a3,d4,f#4]@2 ~@2 [a3,d4,f#4]@2 ~@2 [a3,d4,f#4]@2 [a3,d4,f#4]@4 [d#4,f#4,b4]@4 [d#4,f#4,b4]@2 [d#4,f#4,b4]@2 [d#4,f#4,b4]!2 [d#4,f#4,b4]@2 [d#4,f#4,b4]!4 [d#4,f#4,b4]@2]/2", // D B
  W: "[b3,e4,g#4]@3 [b3,e4,g#4] [b3,e4,g#4]@3 [b3,e4,g#4]", // E
  X: "[b3,d#4,g#4]@3 [b3,d#4,g#4] [b3,d#4,g#4]@3 [b3,d#4,g#4]", // G#m
  Y: "[c#4,e4,a4]@3 [c#4,e4,a4] [c#4,e4,a4]@3 [c#4,e4,a4]", // A
  Z: "[d#4,f#4,b4]@6 [d#4,f#4,b4]@2 [d#4,f#4] [e4,g#4] [d#4,f#4]@2 [b3,f#4]@2 [d#4,f#4,b4]@2, ~@4 b4@3 ~", // B D#m E D#m B5 B
  AA: "[b3,e4,g#4]@3 [b3,e4,g#4] [c#4,e4,g#4]@3 [c#4,e4,g#4]", // E C#m
  AB: "[b3,e4,g#4]@3 [b3,e4,g#4] [c#4,e4,a4]@2 [b3,e4,g#4]@2", // E A E
  AC: "~ [b3,e4,g#4]@2 e4 [e4,a4] g#4 f#4 e4, ~@3 [b3,g#4]@2 ~@3", // E A5 E
  AD: "[c4,e4,g#4]@3 [c4,e4,g#4] [c4,e4,g#4]@3 [c4,e4,g#4]", AE: "[b3,e4,g#4]@3 [b3,e4,g#4] [b3,e4,g#4]@4",
  AF: "[d#4,g#4,b4] ~ [d#4,g#4,b4]!2 ~ [d#4,g#4,b4] ~ [d#4,g#4,b4]", // G#m
  AG: "[c#4,e4,a4] ~ [c#4,e4,a4] ~ [c#4,e4,a4] ~ [c#4,e4,a4] ~", // A
  AH: "[b3,d#4,g#4]@2 ~@2 [b3,d#4,g#4]@2 ~@2 [b3,d#4,g#4]@2 [b3,d#4,g#4]@3 ~ [b3,d#4,g#4]@2", // G#m
  AI: "~@2 [c#4,e4,a4] ~ [c#4,e4,a4] ~ [c#4,e4,a4] ~", // A
  AJ: "[d#4,g#4,b4] ~ [d#4,g#4,b4] ~ [d#4,g#4,b4] ~ [d#4,g#4,b4] ~", // G#m
  AK: "[c#4,f#4,a4]@2 ~@2 [c#4,f#4,a4]@2 ~@2 [c#4,f#4,a4]@2 ~ [c#4,f#4,a4]@2 [c#4,f#4,a4]@2 ~", AL: "b4 ~@7",
})).s("gm_electric_guitar_clean").gain(0.09).pan(1)

// other · string ensemble 1
const string_ensemble_1 = note(`<
  ~ A B C D E F C G H I J ~@11 A B C D E F C G H K ~ L M N@2 O@2 C P Q R S@2 ~@3 T U V W X C V Y Z W V W X C V Y Z ~
>`.pickRestart({
  A: "~@12 c#4 [d4,e4] [f#4,g4] [a4,b4]", B: "d5@8 d5@3 e5@3 d5@2, c#5 ~@15", C: "c#5", D: "d5@8 d5@3 e5@3 d5@2",
  E: "c#5@4 e5 d5 c#5 a4", F: "b4", G: "d5@8 d5@3 d5@2 d5@3", H: "f#5@3 e5", I: "d5 b4", J: "a4 b4", K: "d5",
  L: "e5@11 ~ f#5@4", M: "e5@2 ~ d5 a#4 d5 e5@2",
  N: "[d5@4 ~@4 d5 ~ f#5@3 ~@12 b3 c#4 d#4 e4 f#4 g#4 a4, ~@14 b5@13 ~@5]/2",
  O: "[~@22 d#5@2 f#5@2 e5@4 d#5 e5, b4@13 ~@3]/2", P: "~@4 b4@2 d#5@2 g#5@2 f#5@4 d#5 c#5", Q: "b4@3 e5",
  R: "c#5@10 c#5 b4 c#5 b4 a4 e4", S: "[g#4 a4 b4 b4@13]/2", T: "~@12 d#4 [e4,f#4] [g#4,a4] [b4,c#5]",
  U: "e5@8 e5@3 f#5@3 e5@2, d#5 ~@15", V: "d#5", W: "e5@8 e5@3 f#5@3 e5@2", X: "d#5@4 f#5 e5 d#5 b4",
  Y: "e5@8 e5@3 e5@2 e5@3", Z: "g#5@3 f#5",
})).s("gm_string_ensemble_1").gain(0.24).pan(0)

// other · string ensemble 1
const string_ensemble_1_2 = note(`<
  ~ A B C D E F C G H I J ~@11 A B C D E F C G H K ~ L M N@2 O@2 C P Q R S@2 F T U V W X Y Z C X AA AB Y X Y Z C X AA AB
  ~
>`.pickRestart({
  A: "~@12 c#5 [d5,e5] [f#5,g5] [a5,b5]", B: "d6@8 d6@3 e6@3 d6@2, c#6 ~@15", C: "c#6", D: "d6@8 d6@3 e6@3 d6@2",
  E: "c#6@4 e6 d6 c#6 a5", F: "b5", G: "d6@8 d6@3 d6@2 d6@3", H: "f#6@3 e6", I: "d6 b5", J: "a5 b5", K: "d6",
  L: "e6@11 ~ f#6@4", M: "e6@2 ~ d6 a#5 d6 e6@2",
  N: "[d6@4 ~@4 d6 ~ f#6@3 ~@12 b4 c#5 d#5 e5 f#5 g#5 a5, ~@14 b6@13 ~@5]/2",
  O: "[~@22 d#6@2 f#6@2 e6@4 d#6 e6, b5@13 ~@3]/2", P: "~@4 b5@2 d#6@2 g#6@2 f#6@4 d#6 c#6", Q: "b5@3 e6",
  R: "c#6@10 c#6 b5 c#6 b5 a5 e5", S: "[g#5 a5 b5 b5@13]/2", T: "[b5,d#6]", U: "[c#6,e6]",
  V: "[c6,e6]@12 d#5 [e5,f#5] [g#5,a5] [b5,c#6]", W: "e6@8 e6@3 f#6@3 e6@2, d#6 ~@15", X: "d#6",
  Y: "e6@8 e6@3 f#6@3 e6@2", Z: "d#6@4 f#6 e6 d#6 b5", AA: "e6@8 e6@3 e6@2 e6@3", AB: "g#6@3 f#6",
})).s("gm_string_ensemble_1").gain(0.24).pan(1)

// chords · trumpet
const trumpet = note(`<
  ~@2 A B C D E F G H I J K ~@6 L M N M O A B C D E F G H P Q R S T@2 ~@7 U V W V X Y Z AA AB N AC AD AE Y Z AA AB N ~@4
>`.pickRestart({
  A: "f#4", B: "a4@6 [a4,c#5] ~@3 [a4,c#5] ~@3 [a4,c#5] ~", C: "[b4,d5]",
  D: "a4@6 [f#4,a4]@2 [f#4,a4]@2 [f#4,a4]@3 ~ [f#4,a4]@2, c#5", E: "b4", F: "[a4,c#5]",
  G: "[g4,d5]@8 d5@2 ~ [b3,b4]@2 [g4,d5]@3, ~@8 g4@5 ~@3", H: "[c#5,f#5]@11 ~ e5@4", I: "d5@4 g5 f#5 e5 d5",
  J: "[d5,f#5]@6 ~@2 [b4,d5]@3 ~ [b4,d5]@3 ~", K: "[d4,a4]", L: "~ a4 d5 e5 g5 f#5 e5 d5", M: "d5", N: "c#5",
  O: "a#4@5 g4 a4@2", P: "d5 b4", Q: "a4@6 a4@2 d5@2 e5@2 f#5 e5 d5@2, d2", R: "[b4,e5]@5 ~ [b4,f#5]@2",
  S: "[a#4,e5]@2 ~ [a#4,d5] a#4 [a4,d5] [a#4,e5]@2", T: "[[a4,d5]@4 ~@4 [a4,d5] ~ [a4,d5,f#5]@3 ~ [d#5,b5]@10 ~@8]/2",
  U: "~ b4 e5 f#5 a5 g#5 f#5 e5", V: "e5", W: "d#5", X: "c5@5 a4 b4@2", Y: "g#4",
  Z: "b4@6 [b4,d#5] ~@3 [b4,d#5] ~@3 [b4,d#5] ~", AA: "[c#5,e5]",
  AB: "b4@6 [g#4,b4]@2 [g#4,b4]@2 [g#4,b4]@3 ~ [g#4,b4]@2, d#5", AC: "[b4,d#5]",
  AD: "[a4,e5]@8 e5@2 ~ [c#4,c#5]@2 [a4,e5]@3, ~@8 a4@5 ~@3", AE: "[d#5,g#5]@11 ~ f#5@4",
})).s("gm_trumpet").gain(0.22).pan(0)

// chords · trumpet · soft notes · B A5 C# A5 G#5
const trumpet_soft = note(`<
  ~@63
  [[b4,d#5]]
  [[a4,e5]@8 e5@2 ~ [c#4,c#5]@2 [a4,e5]@3, ~@8 a4@5 ~@3]
  [[d#5,g#5]@11 ~ f#5@4]
  ~
>`).s("gm_trumpet").gain(0.06).pan(0)

// other · trombone
const trombone = note(`<
  ~@2 A B C B C B D E F G A ~@6 H I J K L A B C B C B D E M N O P Q@2 ~@7 R S T U V W X Y X Y X Z AA W X Y X Y X Z AA ~
>`.pickRestart({
  A: "d3", B: "f#3", C: "g3", D: "e3@8 e3@2 ~ b2@2 e3@2 ~", E: "a2", F: "d3@6 d3 ~ g3@8", G: "d3@2 f#3 a3 g3 d3 b2 d3",
  H: "~ a3 d4 e4 g4 f#4 e4 d4", I: "[d3,d4]@8 [d3,d4]@3 [e3,e4]@2 [d3,d4]@3", J: "[c#3,c#4] [d3,d4] [e3,e4]@4 ~@2",
  K: "[b2,b3]@2 [g2,g3] [b2,b3] [g3,g4] [f#3,f#4] [e3,e4] [d3,d4]", L: "[d3,d4]", M: "d4 b3",
  N: "a3@6 a3@2 d4@2 e4@2 f#4 e4 d4@2", O: "e3@5 ~ f#3@2", P: "g3@4 ~@2 a3@2 a#3@2 d4@2 a#3 a3 g3@2",
  Q: "[d3@4 d3 ~ a2 ~ d3 ~ a2 ~ d3 ~ b2@10 ~@8]/2", R: "~ b3 e4 f#4 a4 g#4 f#4 e4",
  S: "[e3,e4]@8 [e3,e4]@3 [f#3,f#4]@2 [e3,e4]@3", T: "[d#3,d#4] [e3,e4] [f#3,f#4]@4 ~@2",
  U: "[c#3,c#4]@2 [a2,a3] [c#3,c#4] [a3,a4] [g#3,g#4] [f#3,f#4] [e3,e4]", V: "[e3,e4]", W: "e3", X: "g#3", Y: "a3",
  Z: "f#3@8 f#3@2 ~ c#3@2 f#3@2 ~", AA: "b2",
})).s("gm_trombone").gain(0.25).pan(1)

// other · lead 5 charang
const lead_5_charang = note("<~@19 [~ a3 d4 e4 g4 f#4 e4 d4] d5 ~@24 [~ b3 e4 f#4 a4 g#4 f#4 e4] e5 ~@20>")
  .s("gm_lead_5_charang").gain(0.22).pan(1)

// chords · rock organ
const rock_organ = note(`<
  ~@2 A B C B C B D E ~@2 A B C F G D H@2 A B I J A B C B C B D E ~@6 K L M N O B P@2 K L F Q K L M L M L B R K L M L M
  L B R ~
>`.pickRestart({
  A: "[f#5,a5,d6]", B: "[f#5,a5,c#6]", C: "[g5,b5,d6]", D: "[e5,g5,b5]", E: "[e5,a5]", F: "[e5,a5,c#6]",
  G: "[f#5,a5,d6] [d5,f#5,b5]", H: "[d5,f#5,a5]/2", I: "[d5,g5,b5]", J: "[g5,a#5,d6]", K: "[g#5,b5,e6]",
  L: "[g#5,b5,d#6]", M: "[a5,c#6,e6]", N: "[f#5,b5,d#6]", O: "[g#5,b5,e6] [e5,g#5,c#6]", P: "[e5,g#5,b5]/2",
  Q: "[a5,c6,e6]", R: "[f#5,b5]",
})).s("gm_rock_organ").gain(0.07).pan(0)

// drums · kick
const kick = s("bd").struct(`<
  ~ A B ~ C ~ C B D E B F G@11 H B ~ C ~ C B D E B I C@2 J K G@11 H B ~ C ~ C B D E B ~ C ~ L ~@4
>`.pickRestart({
  A: "~ x!7", B: "~@5 x ~ x", C: "~@3 x ~ x ~ x", D: "~@8 x ~@2 x ~ x ~@2", E: "x!4 ~ x!3", F: "~ x ~@3 x ~@2",
  G: "x!2", H: "~@3 x ~@4", I: "~ x!5 ~@2", J: "~@3 x ~@3 x", K: "~ x ~ x ~@4", L: "~@3 x ~ x ~@2",
})).gain(0.7)

// drums · kick · soft notes
const kick_soft = s("bd").struct("<~@62 [~@7 x] [~@5 x ~ x] [~@8 x ~@2 x ~ x ~@2] [x!4 ~ x!3] ~>").gain(0.16)

// drums · snare
const snare = s("sd").struct(`<
  A B C D C E C@2 F G C H I@7 J I@3 K C D C E C@2 F G L M C@2 N O I@7 J I@3 K C D C E C@2 F G C D C E C@2 F G ~
>`.pickRestart({
  A: "~@15 x", B: "x", C: "x!4", D: "x ~@3 x ~@3 x!4 ~@4", E: "x ~ x ~ x ~@2 x!2 ~@7", F: "x ~@2 x ~@4",
  G: "~@8 x ~@3 x!3 ~", H: "x ~@3 x ~ x!3 ~@3 x!3 ~", I: "~ x ~ x", J: "~@4 x ~@6 x!2 ~ x ~",
  K: "x ~@2 x!2 ~@3 x ~ x!5 ~", L: "x ~@3 x ~@3 x ~@3 x ~@2 x", M: "x ~@3 x ~ x ~ x ~ x ~ x!3 ~", N: "x!2 ~ x",
  O: "~@4 x ~@3 x!2 ~ x!2 ~ x ~",
})).gain(0.78)

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

// drums · low tom
const low_tom = s("lt").struct("<~@5 A ~@21 A ~@25 A ~@7 A ~@5>".pickRestart({
  A: "~@12 x!3 ~",
})).gain(0.62)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@3 A ~@2 B@2 C ~@10 D ~@5 A ~@2 B@2 C ~@14 D ~@5 A ~@2 B@2 C ~@2 A ~@2 B ~@4
>`.pickRestart({
  A: "~@3 x ~@4", B: "~@5 x ~@2", C: "~@8 x ~@2 x ~ x ~@2", D: "x!2",
})).gain(0.62)

// drums · open hat · soft notes
// … 43 more lines