// Say You Love Me — Fleetwood Mac
// 128 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 131 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
// note: Guitar parts that double another keep only their own notes (fills, solos): filguit-5.
setcpm(128/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 · acoustic bass · "Bass-2"
const bass = note(`<
  ~@4 A B C B C B@3 D E F B G B@3 D E F B H I@2 J@2 I@2 K@2 G B@3 D E F B G B@3 D E F B H I@2 J@2 I@2 K@2 B L M L M L M
  N B L M L M L M N@2 B@3 D E F B G B@3 D E F B H I@2 J@2 I@2 K@2 G I@2 J@2 I@2 K@4 O@2 ~ N@16 P ~
>`.pickRestart({
  A: "~@8 f#2@3 ~ e2@3 ~", B: "a1@5 ~ a1@2 a1@5 ~ a1@2", C: "a1@5 ~ a1@2 f#2@4 e2@4",
  D: "a1@5 ~ a1@2 c#2@2 c#2@2 d2@2 d#2@2", E: "e2@5 ~ e2@2 e2@5 ~ e2@2", F: "e2@5 ~ e2@2 e2@2 f#2@2 e2@2 c#2@2",
  G: "a1@5 ~ a1@2 f#2@3 ~ e2@3 ~", H: "a1@5 ~ a1@2 b1@2 c#2@2 e2@2 f2@2",
  I: "[f#2@3 ~ e2@3 ~ d2@2 e2@2 f#2@2 a2@4 a2@2 b2@2 c#3@2 b2@2 a2@2 f#2@2 e2@2]/2",
  J: "[f#2@5 ~ f#2@2 e2@2 c#2@2 b1@2 a1@4 a1@2 b1@2 a1@2 b1@2 c#2@2 e2@2 f2@2]/2",
  K: "[f#2@5 ~ f#2@2 e2@2 c#2@2 b1@2 a1@7 ~ a1@2 a1@5 ~ a1@2]/2", L: "b1@5 ~ b1@2 b1@5 ~ g#1@2",
  M: "e1@5 ~ e1@2 e1@5 ~ e1@2", N: "a1@5 ~ a1@2 b1@5 ~ b1@2", O: "[f#2@5 ~ f#2@2 e2@2 c#2@2 b1@2 [d1,d2]@16 ~@2]/2",
  P: "a1",
})).s("gm_acoustic_bass").gain(0.4)

// chords · piano · "Piano-3"
const piano = note(`<
  ~ A@3 B A C A C A@3 B D@2 A B A@3 B D@2 A B E@2 F@2 E@2 F@2 B A@3 B D@2 A B A@3 B D@2 A B E@2 F@2 E@2 F@2 A G H G H G
  H I J G H G H G H K@2 A@3 B D@2 A B A@3 B D@2 A B E@2 F@2 E@2 F@2 B E@2 F@2 E@2 F@4 L@2 M I N@15 O ~
>`.pickRestart({
  A: "[a2,e3,a3,c#4]@2 ~ [a2,e3]@2 [a2,e3] f#3 [a2,e3], ~@6 [a3,c#4]@9 ~", B: "[a2,e3,a3,c#4]@4 ~@2 [a2,e3,a3,c#4]@9 ~",
  C: "[a2,e3,a3,c#4]@2 ~ [a2,e3,a3,c#4] [f#3,a3,c#4]@2 [g#3,b3,e4]@2", D: "[e2,e3,g#3,b3]@4 ~@2 [e2,e3,g#3,b3]@9 ~",
  E: "[[a3,c#4,f#4]@4 [g#3,b3,e4]@4 [f#3,a3,d4]@4 ~@2 [a2,e3,a3,c#4]@6 ~@2 [a2,e3,a3,c#4]@9 ~]/2", // F#m E D A
  F: "[[a3,c#4,f#4]@4 [g#3,b3,e4]@3 [a2,e3,a3,c#4]@4 [a2,e3,a3,c#4]@4 ~]/2", // F#m E A
  G: "[f#3,b3,d4]@2 ~ f#3@2 f#3 g#3 f#3, ~@6 [b3,d4]@9 ~", // Bm
  H: "[e2,b2,e3,g#3]@2 ~ [e2,b2]@2 [e2,b2] [f#2,c#3] [e2,b2], ~@6 [e3,g#3]@9 ~", // E E5 F#5 E5 E
  I: "[a2,e3,a3,c#4]@2 ~ [a2,e3,a3,c#4] [g2,d3] [b3,d4] f#3 [g2,d3,a3,d4]", // A G5 Bm Gsus2
  J: "[a2,e3,c#4]@2 ~ [a2,e3]@2 [a2,e3] f#3 [a2,e3], a3 ~@5 [a3,c#4]@9 ~", // A A5 A
  K: "[a2,e3,a3,c#4]@2 ~ [a2,e3,a3,c#4] [g2,d3] [a3,d4] f#3 [g2,d3,b3,d4]", // A G5 D5 G
  L: "[[a3,c#4,f#4]@4 [g#3,b3,e4]@3 ~@2 e4 d4 a3 e4 d4 a3 e4, ~@7 [d2,g2,d3,f#3,a3]@4 ~@5, ~@7 d4@3 ~@6]/2", // F#m E D
  M: "d4 a3 e4 d4 a3 e4 d4 a3", N: "[a2,e3,c#4]@2 ~ [a2,e3,a3,c#4] [g2,d3] [b3,d4] f#3 [g2,d3,a3,d4], a3 ~@15",
  O: "[e3,c#4], a3 ~@15", // C#m
})).s("gm_piano").gain(0.41).pan(0.3)

// chords · acoustic guitar steel · "guit-4"
const acoustic_guitar_steel = note(`<
  ~@5 A B A B C@2 D C E@2 C D C@2 D C E@2 C D F@2 G@2 F@2 H@2 I J I@2 K L@2 M I@2 K J@2 L N I J F@2 G@2 F@2 G@2 K O P O
  P O P K@2 O P O P O P K@2 J@2 I J N@2 J I J@2 I J N@2 J I F@2 G@2 F@2 H@2 I F@2 G@2 F@2 H@2 G@2 Q@2 R K@16 S ~
>`.pickRestart({
  A: "~@2 [a2,a3,c#4,e4] ~@3 [a2,a3,c#4,e4] ~", B: "~@4 [a2,a3,c#4,e4]@2 ~@6 [g#2,g#3,b3,e4]@3 ~",
  C: "~@4 [a2,a3,c#4,e4]@3 ~@5 [a2,a3,c#4,e4]@3 ~", D: "~@4 [a2,a3,c#4,e4]@3 ~@5 [a2,a3,c#4,e4]@2 ~@2",
  E: "~@4 [g#2,g#3,b3,e4]@3 ~@5 [g#2,g#3,b3,e4]@3 ~", // E
  F: "[[a3,c#4,f#4]@4 [g#3,b3,e4]@4 [f#3,a3,d4]@4 ~@2 [e3,a3,c#4]@6 ~@2 [e3,a3,c#4]@9 ~]/2", // F#m E D A
  G: "[[a3,c#4,f#4]@4 [g#3,b3,e4]@3 [e3,a3,c#4]@4 [e3,a3,c#4]@4 ~]/2", // F#m E A
  H: "[[a3,c#4,f#4]@8 [g#3,b3,e4]@6 [a3,c#4]@6 [a3,c#4,e4]@2 ~@6 [a3,c#4,e4]@3 ~, ~@7 e3@4 ~@5]/2", // F#m E A
  I: "~@4 [a3,c#4,e4]@3 ~@5 [a3,c#4,e4]@2 ~@2", J: "~@4 [a3,c#4,e4]@3 ~@5 [a3,c#4,e4]@3 ~",
  K: "~@2 [a3,c#4,e4] ~@3 [a3,c#4,e4] ~", L: "~@4 [g#3,b3,e4]@3 ~@5 [g#3,b3,e4]@2 ~@2",
  M: "~@4 [a3,c#4,e4]@2 ~@6 [a3,c#4,e4]@3 ~", N: "~@4 [g#3,b3,e4]@3 ~@5 [g#3,b3,e4]@3 ~",
  O: "~@2 [b3,d4,f#4] ~@3 [b3,d4,f#4] ~", P: "~@2 [e3,g#3,b3] ~@3 [e3,g#3,b3] ~",
  Q: "[[a3,c#4,f#4]@4 [g#3,b3,e4]@3 ~@2 e4 d4 a3 e4 d4 a3 e4, ~@7 [e3,a3,c#4]@4 ~@5]/2", R: "d4 a3 e4 d4 a3 e4 d4 a3",
  S: "[a3,c#4,e4,a4]", // A
})).s("gm_acoustic_guitar_steel").gain(0.22).pan(0.3)

// other · electric guitar clean · "sologuit-"
const electric_guitar_clean = note("<~@67 A B C D E F G@3 ~@53 H ~>".pickRestart({
  A: "~@4 f#4@2 a4@3 ~ f#4@2 a4 ~ f#4 ~", B: "e4@2 f#4@6 ~@3 c#4@3 e4@2", C: "f#4@5 ~@5 f#4@3 a4@2 ~",
  D: "c#5@3 ~ [b4,c#5]@2 ~ c#5@3 b4@3 c#5@2 ~, b4 ~@6 b4 ~@8", E: "b4@7 ~@3 b4@2 c#5@2 b4@2",
  F: "c#5@3 ~ [b4,c#5]@2 ~ c#5@3 b4@2 a4@2 f#4@2, c5 ~@6 b4 ~@8", G: "[a4@4 ~@2 a4@4 ~@2 a4@8 a4 ~@5 a4@8 ~@14]/3",
  H: "[e4,a4,c#5]", // A
})).s("gm_electric_guitar_clean").gain(0.72)

// other · electric guitar clean · "filgit2-8"
const electric_guitar_clean_2 = note("<~@59 A B A B A C D E F G F G F H D E ~@38 I J@15 ~@2>".pickRestart({
  A: "b4 d5@2 b4 d5@2 b4@2", B: "e5@2 g#5@3 ~ e5@2 a5@4 g#5@4", C: "e5 g#5@2 e5 a5@2 g#5@2",
  D: "[a4,a5]@5 ~ [a4,a5]@5 ~ [a4,a5]@4", E: "~@4 [a4,a5]@5 ~ [a4,a5]@5 ~",
  F: "[b3,b4] [d4,d5]@2 [b3,b4] [d4,d5]@2 [b3,b4]@2", G: "[e4,e5]@2 [g#4,g#5]@3 ~ [e4,e5]@2 [a4,a5]@4 [g#4,g#5]@4",
  H: "[e4,e5] [g#4,g#5]@2 [e4,e5] [a4,a5]@2 [g#4,g#5]@2", I: "a4@5 ~ [a4,a5]@5 ~ [a4,a5]@4",
  J: "a4 ~@5 [a4,a5]@5 ~ [a4,a5]@4", // A
})).s("gm_electric_guitar_clean").gain(0.23).pan(0.8)

// drums · rim
const rim = s("rim").struct("<[x!4] ~@130>").gain(0.31)

// drums · kick
const kick = s("bd").struct("<~@5 [x ~@2 x!2 ~@2 x]!106 ~ [~@2 x!6] [x ~ x!3 ~@2 x] [x ~@2 x!2 ~@2 x]!15 x!2>")
  .gain(0.46)

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

// drums · low tom
const low_tom = s("lt").struct("<~@8 [~@6 x!2] ~@65 [~@6 x!2] ~@54 [~@15 x] x>").gain(0.36)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@8 [~ x] ~@65 [~ x] ~@54 [~@15 x] ~>").gain(0.41)

// drums · open hat
const open_hat = s("oh").struct("<~@33 [~@7 x] ~@24 [~@7 x] ~@54 [x!2]!16 x ~>").gain(0.41)

// drums · high tom
const high_tom = s("ht").struct("<~@4 [x ~@12 x ~@2] ~@126>").gain(0.46)

// drums · crash
const crash = s("cr").struct("<~@5 A ~ A ~@57 A@2 ~@6 A@2 ~@36 A ~ B A@16 ~>".pickRestart({
  A: "x", B: "x!2 ~@2",
})).gain(0.31)

// drums · tambourine
const tambourine = s("tb").struct("<~@75 [~ x ~ x]!36 ~@2 [x ~@2 x!2 ~@3]!16 x ~>").gain(0.41)

stack(
  bass, piano, acoustic_guitar_steel, electric_guitar_clean, electric_guitar_clean_2, rim, kick, snare, low_tom, hihat,
  mid_tom, open_hat, high_tom, crash, tambourine
)