// Stop Draggin' My Heart Around — Stevie Nicks
// 113 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 111 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(113/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.

// chords · percussive organ · "CHA  1*merged"
const percussive_organ = note(`<
  A@2 B@2 C D E F G H I J K D E F G H I J L M N M N O P@2 Q D E F G H I J K D E F G H I J K D E F N M N M N O P@2 R S T
  U V W V X Y@2 B@2 C D E F G H I J K D E F G H I J L M N M N O P@2 C D E F G H I J K D E F G H I J Z ~@2
>`.pickRestart({
  A: "[[a4,c#5,e5]@15 ~]/2", B: "[[c5,e5,g5]@6 ~ [b4,d5,g5]@5 ~ [c5,e5,g5]@17 ~@2, a5 ~@31]/2",
  C: "[g4,b4,e5]@4 [g4,b4,e5]@2 ~@2 [g4,b4,d5] ~ [g4,b4,e5]@4 ~@2, ~@4 a4 ~@3", // Em G Em
  D: "[g4,b4]@4 ~ c#5 b4 a4, d5@5 ~@3, ~ e4, ~@2 a4 ~", E: "~@4 [g4,b4,e5]@2 ~@2 a4@2 [g4,b4,e5]@5 ~, ~@8 g4 ~@7",
  F: "[g4,b4,d5]@7 ~ [a4,c#5,e5]@8", G: "~@2 [g4,b4,e5] ~ [g4,a4] [b4,e5]@3, ~@8 d5 ~@7",
  H: "[b4,d5]@4 ~ c#5 b4 a4, g4@7 ~ e4@8, ~@2 a4 ~", I: "~@4 [g4,b4,e5]@2 ~@2 [g4,a4,d5]@2 [g4,b4,e5]@5 ~",
  J: "~@4 [d5,g5,b5]@2 ~@6 c#6@2 [b5,c6] ~, ~@3 [e5,a5]", K: "c5 ~@3 [g4,b4,e5]@2 ~@2 [g4,b4] ~ [g4,b4,e5]@6",
  L: "[e5,g5]@15 ~, c5 ~@15", M: "[d5,f#5,a5]@15 ~", N: "[c5,e5,g5]@15 ~", O: "[d5,f#5,a5]@7 ~",
  P: "[[e5,g5,c6]@5 ~ [d5,g5,b5]@5 ~ [e5,g5,c6]@19 ~]/2", Q: "~@4 [g4,b4,e5]@2 ~@2 [g4,b4] ~ [g4,b4,e5]@6",
  R: "[g4,b4,e5]@7 ~ [f#4,a4,d5]@7 ~", // Em D
  S: "[e4,g4,c5]@7 ~ [d4,g4,b4]@4 [g3,a3,b3,d4,e4] [f4,g4,a4,b4,c5] [d5,e5,f5,g5,a5,b5] c6", T: "[f#5,a5,d6]@15 ~",
  U: "[e5,g5,c6]@5 b5@7 b5@3 ~, c#6 ~@4 [d5,g5]@10 ~", V: "[f#5,a5,d6]", W: "[e5,g5,c6]@5 ~ [d5,g5,b5]@10",
  X: "[e5,g5,c6]@5 ~ [d5,g5,b5]@9 ~", Y: "[[c#5,e5]@31 ~]/2", Z: "[g5,b5,e6]@3 ~@13, [c5,e5] ~@15",
})).s("gm_percussive_organ").gain(0.4).pan(0.7)

// chords · percussive organ · "CHA  1*merged" · soft notes
const percussive_organ_soft = note(`<
  ~@6 A ~ B ~@2 C D ~ A ~ B ~@2 C E ~@7 A ~ A ~ B ~@2 C D ~ A ~ B ~@2 C D ~ A ~@10 F G ~@5 H@2 ~@4 A ~ B ~@2 C D ~ A ~ B
  ~@2 C E ~@9 A ~ B ~@2 C D ~ A ~ B ~@2 C E ~@2
>`.pickRestart({
  A: "~@8 d5 ~@7", B: "~@5 g4@3", C: "~@15 [f5,g5]", D: "[d5,e5] ~@7 d5 ~@7", E: "d5 ~@15", F: "~@12 c4 ~@3",
  G: "d#6 ~@15", H: "[a5@31 ~]/2",
})).s("gm_percussive_organ").gain(0.2).pan(0.7)

// chords · church organ · "CHA  1*merged"
const church_organ = note("<A B C@2 ~@60 A B C@2 ~@43>".pickRestart({
  A: "d5 ~ d5@2 c#5 ~ c#5 ~ b4 ~ b4 ~ a4 ~ a4 ~", B: "d5 ~ d5 ~ c#5 ~ c#5 ~ b4 ~ b4 ~ a4 ~ a4 ~",
  C: "[[e5,g5,c6]@5 ~ [d5,g5,b5]@5 ~@2 [e5,g5,c6]@13 ~@2 [a3,d4] f4 [c5,d5,e5,f5,g5] [a5,b5]]/2", // C G C D5 C Asus2
})).s("gm_church_organ").gain(0.14).pan(0.2)

// chords · church organ · "CHA  1*merged" · soft notes · Cmaj7 G Cmaj7 G
const church_organ_soft = note(`<
  ~@3
  [~@12 [b3,c4,e4] [g4,a4,b4] ~ c6]
  [d6 ~@15]
  ~@62
  [~@12 [b3,c4,e4] [g4,a4,b4] ~ c6]
  [d6 ~@15]
  ~@42
>`).s("gm_church_organ").gain(0.07).pan(0.2)

// bass · electric bass finger · "CHA  1*merged"
const bass = note(`<
  A@2 B@2 C D E F G H E I C D E F G H E I J K L M N O P@2 C D E F G H E I C D E F G H E I C D E F Q R S T U V W@2 X Y Z
  AA AB AC Z AD AE@2 B@2 C D E F G H E I C D E F G H E I J K L M N O AF@2 C D E F G H E I C D E F G H E I AG ~@2
>`.pickRestart({
  A: "[a1@15 ~]/2", B: "[c2@5 ~ b1@5 ~ c2@18 ~@2]/2", C: "e2@7 ~ d2@2 e2@4 d2 ~", D: "g1@5 ~ g1@2 a1@4 b1@2 a1 ~",
  E: "e2@5 ~ e2@2 d2@2 e2@3 ~ f#1@2", F: "g1@5 ~ b1@2 a1 ~ a1@2 b1@2 a1 ~", G: "e2@5 ~ b1@2 e2 ~ e2@2 d2@2 b1 ~",
  H: "g1@2 b1 d2 a1@2 b1 a1", I: "g1@4 ~@2 b1@2 a1@4 b1@2 a1 ~, f1 ~@15", J: "c2@5 ~ d2@2 e2@2 g2@2 a2@4",
  K: "d2@5 ~ f#1 ~ f#1@2 a1@2 b1@2 d2 ~", L: "c2@5 ~ d2@2 e2@2 g2@2 a2@3 ~",
  M: "d2@6 d1@2 f#1@2 a1@2 b1@2 d2 ~, c2 ~@15", N: "c2@5 ~ d2@2 e2@2 g2@2 a2@2 b2 ~",
  O: "d2@6 f#1 ~ a1 ~ a1@2 b1@2 d2 ~", P: "[c2@5 ~ b1@5 ~ c2@14 b1@2 g1@2 d1@2]/2",
  Q: "c3@5 ~ c3 ~ a2 ~ a2 ~ g2 ~ g2 ~", R: "d2@4 ~@2 d2@2 f#2 ~ f#2 ~ a2 ~ b2 ~", S: "c3@5 ~ c3 ~ a2 ~ a2@2 g2 ~ g2 ~",
  T: "d3@3 ~ d3@3 d2!2 ~ f#2 ~ a2 ~ b2 ~", U: "c3@5 ~ c3 ~ a2 ~ a2 ~ g2@3 ~", V: "d3@5 ~ d3@2 b2 ~ b2 ~ a1@3 ~",
  W: "[c2@5 ~ b1@5 ~ c2@16 a1@2 g1 ~]/2", X: "e1@4 ~@2 e1 ~ d2@5 ~ d2 ~", Y: "c2@5 ~ c2 ~ b1@6 b1 ~",
  Z: "d3@11 ~ g2@2 a2 ~", AA: "c3@5 ~ a2@4 g2@3 ~ e2 ~", AB: "d3@9 ~ d3@2 g2@2 a2 ~", AC: "c3@5 ~ a2@3 ~ g2@4 e2 ~",
  AD: "c3@4 ~@2 a2@4 g2@4 e2 ~", AE: "a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~ a1 ~",
  AF: "[c2@4 ~@2 b1@5 ~ c2@14 a1@2 g1@2 d1 ~]/2", AG: "e2@3 ~@13",
})).s("gm_electric_bass_finger").gain(0.29)

// other · overdriven guitar · "CHA  1*merged"
const overdriven_guitar = note(`<
  ~@4 A@2 B@2 C@2 D@2 ~@16 E F G@2 H@2 I@2 ~@8 J@2 H@2 ~@20 E F G@2 H@2 K@2 ~@16 L@2 M@2 N ~ H@2 ~@2 D@2 ~@2 D@2 ~@3
>`.pickRestart({
  A: "[e5@23 ~ b4@4 a4@2 g4@2]/2", B: "[a4@2 e4 ~ e4@25 ~@3]/2", C: "[~@2 g4@2 b4 ~ d5@23 ~@3]/2",
  D: "[~@2 g4@2 b4 ~ d5@25 ~]/2", E: "e5", F: "~@6 b4@5 ~ a4@2 g4@2", G: "[a4@3 g4 e4@14 ~@14]/2",
  H: "[~ g4 b4 d5@11 ~@2]/2", I: "[~@2 g4@2 b4 ~ d5@16 d5 b4 a4 g4 e4 [d4,e4] b3@3 ~]/2",
  J: "[~@2 g4@2 b4@2 d5@19 ~@7]/2", K: "[~@2 g4@2 b4 ~ d5@22 ~@4]/2", L: "[e5@11 b4@3 a4 g4]/2",
  M: "[a4@3 g4 e4@19 d4 b3@2 a3 ~ g3 [e3,f3] [d3,e3]@2]/2", N: "e3@3 ~",
})).s("gm_overdriven_guitar").gain(0.5).pan(0.7)

// chords · electric guitar clean · "CHA  1*merged"
const electric_guitar_clean = note(`<
  A@2 B@2 C ~@15 D E F E G H I@2 C ~@19 D E F E G H I@2 ~@2 J K J K L M N@2 B@2 C ~@15 D E F E G H I@2 ~@19
>`.pickRestart({
  A: "[[a3,c#4,e4,a4]@29 ~@3]/2", B: "[[c4,e4,g4,c5]@5 ~ [b3,d4,g4,b4]@5 ~ [c4,e4,g4,c5]@18 ~@2, ~@6 d#4 ~@25]/2",
  C: "[e4,g4,b4,e5]@15 ~", D: "[g3,c4,e4]@7 ~", E: "[a3,d4,f#4]@7 ~", F: "[g3,c4,e4]@15 ~", G: "[c4,e4,g4]@7 ~",
  H: "[d4,f#4,a4]@13 ~@3", I: "[[e4,g4,c5]@5 ~ [d4,g4,b4]@4 ~@2 [e4,g4,c5]@17 ~@3]/2", J: "f#4 a4 d5 f#4 a4 d5 f#4 a4",
  K: "g4 a4 d5 g4 a4 d5 g4 a4", L: "f#4@2 a4@2 ~ f#4@2 a4@2 d5@2 f#4@2 ~ d5@2, ~@2 d5 ~@5",
  M: "g4@2 a4@2 d5@2 g4@2 a4@2 d5@2 ~ a4 ~@2, ~@6 g4 ~",
  N: "[[a4,c#5,e5]@18 [c#5,e5]@3 ~ d5@3 c#5@4 b4 ~@2, ~@18 a4@11 ~@3]/2", // A C#m
})).s("gm_electric_guitar_clean").gain(0.45)

// other · overdriven guitar · "CHA  1*merged"
const overdriven_guitar_2 = note("<~@57 A B@4 C@2 D@2 E@2 ~@15 F G H I J K L M@2 ~@19>".pickRestart({
  A: "~@14 [d2,d3,d4] [d3,d4]", B: "[[d2,d3,d4]@29 ~ [d2,d3,d4]!2]/2", C: "[[d2,d3,d4]@29 ~ [a2,a3]!2, e4 ~@31]/2",
  D: "[[a2,a3]@15 ~]/2", E: "[[c3,c4]@5 ~ [b2,b3]@5 ~ [c3,c4]@18 ~@2]/2", F: "~@14 [c3,c4] c4", G: "[c3,c4]@15 ~",
  H: "[d3,d4]@13 ~ [c3,c4] c4", I: "[c3,c4]@15 ~, [b2,d4] ~@15", J: "[d3,d4]@13 ~ [c3,c4]!2", K: "[c3,c4]@14 [d3,d4]!2",
  L: "[d3,d4]@15 ~", M: "[[c3,c4]@5 ~ [b2,b3]@5 ~@16 e5@5, ~@6 [c3,c4]@9 ~]/2",
})).s("gm_overdriven_guitar").gain(0.45)

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

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

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

// drums · crash
const crash = s("cr").struct(`<
  A ~ B ~ A ~@7 A ~@7 A ~@5 B ~ A ~@19 A ~@5 B ~ C@2 A B A B A B A D B ~ A ~@7 A ~@7 A ~@5 B ~ A ~@15 A ~@2
>`.pickRestart({
  A: "x", B: "x ~@2 x ~@2 x ~", C: "x!2", D: "~@3 x",
})).gain(0.8)

// drums · ride
const ride = s("rd").struct("<~@2 A B ~@16 B@6 A B ~@20 B@6 A B C D@9 A B ~@16 B@6 A B D@16 ~@3>".pickRestart({
  A: "~@13 x ~@2", B: "x!4", C: "x ~ x!6", D: "x!8",
})).gain(0.72)

// drums · tambourine
const tambourine = s("tb").struct(`<
  ~@20 A@6 ~@2 A@26 ~@14 A B A B A B A B A B A B A B A C A@6 ~@2 D E D E D E D E D E D E D E F@2 ~@3
>`.pickRestart({
  A: "x!8", B: "x!5 ~ x ~ x!5 ~ x ~", C: "~ x!2 ~@2 x!2 ~", D: "x ~@3 x ~@3 x!5 ~ x ~", E: "x ~@3 x ~@2 x!6 ~ x ~",
  F: "~ x ~ x",
})).gain(0.56)

stack(
  percussive_organ, percussive_organ_soft, church_organ, church_organ_soft, bass, overdriven_guitar,
  electric_guitar_clean, overdriven_guitar_2, kick, snare, low_tom, crash, ride, tambourine
)