// Wichita Lineman — Glen Campbell
// 85 bpm, 4/4, key F major. Source: mcgill + midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 70 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(85/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 · "WITCHITA"
const bass = note(`<
  A B C D E F G H I J K L M H N O P Q R E S T F G H I J K L M H N O P Q R E S T F G H I J K L M H N O P Q R E S T U V W
  X F Y Z AA F AB Z AC@3
>`.pickRestart({
  A: "~@8 bb2 a2 ~ f2 ~ d2 c2 ~", B: "f1@5 ~ f1 ~ f1@6 f2@2", C: "f1@7 ~ bb2 a2 ~ f2 ~ d2 c2 ~",
  D: "f1@5 ~ f1 ~ f1@7 ~", E: "c2@15 ~", F: "bb1@5 ~ bb1 ~ bb1@7 ~", G: "a1@5 ~ a1 ~ a1@7 ~", H: "c2@5 ~ c2 ~ c2@7 ~",
  I: "d2@5 ~ d2 ~ a1@7 ~", J: "g1@5 ~ g1 ~ g1@7 ~", K: "d2@5 ~ d2 ~ d2@4 a1@3 ~", L: "d1@15 ~",
  M: "c2@5 ~ c2 ~ c2@6 g1@2", N: "b1@5 ~ b1 ~ b1@7 ~", O: "bb1@5 ~ bb1 ~ bb1@6 ~@2", P: "d2@5 ~ d2 ~ d2@7 ~",
  Q: "a1@5 ~ a1 ~ a1@8", R: "bb1", S: "bb1@15 ~", T: "c2", U: "bb1@2 bb1@3 ~ bb1@5 ~ bb1@4", V: "c2@3 g1 c2@4",
  W: "bb1@5 ~ bb1@8 bb1@2", X: "c2@5 ~ c2 ~ c2@2 g1@2 c2@3 ~", Y: "c2@5 ~ c2 ~ c2@8", Z: "bb1@5 ~ bb1 ~ bb1@8",
  AA: "c2@6 c2 ~ c2@5 g1 c2@2", AB: "c2@5 ~ c2 ~ c2@2 g1@2 c2@4", AC: "[c2@17 ~@7]/3",
})).s("gm_acoustic_bass").gain(0.33)

// chords · piano
const piano = note(`<
  ~ A B C D E F G H I J K L@2 M N O P Q R S T E F G H I U K L@2 M N O P Q R S T E F G H I U K L@2 M N O P Q R S T V W X
  Y Z AA AB AC AB AD AE AF@3
>`.pickRestart({
  A: "[f3,a3,c4,e4]@15 ~", B: "[f3,bb3,d4,f4]@15 ~", C: "[f3,a3,c4,e4]@7 ~", D: "[c3,bb3,d4,f4]",
  E: "~@2 d4@2 ~@2 d4@2 ~@2 d4@2 [f4,a4]@2 d4 ~, bb3@7 ~ bb3@7 ~, ~ [f4,a4] ~@2", // F
  F: "~ c4 ~ c4 ~ c4 [e4,g4] c4, a3@7 ~ a3@8, ~ [e4,g4] ~@2", // Em
  G: "~ bb3 ~ bb3 ~ bb3 [d4,g4] bb3, g3@7 ~ g3@8, ~ [d4,g4] ~@2", // G5
  H: "~ d4 ~ d4 ~ c4 [e4,g4] c4, a3@7 ~ g3@7 ~, ~ [f4,a4] ~@2", // Em F
  I: "~@2 b3@2 ~@2 b3@2 ~@2 b3@2 [d4,g4]@2 b3 ~, g3@7 ~ g3@7 ~, ~ [d4,g4] ~@2", // G5
  J: "~@2 [d4,g4]@2 gb4@2 ~@2 g4@2 ~ b3 ~ b3 g4@2, d3, a3@10 a3@4 a3 ~, ~@6 d4@4 gb4@2 d4@3 ~", // G5
  K: "[d3,a3,d4,gb4]@15 ~", // D
  L: "[~ g3 ~ g3 ~ g3 ~ g3 ~ g3 ~ g3 ~ g3 [c4,e4] g3, c2@7 ~ c2@7 ~ c2@7 ~ c2@7 ~, ~@2 [c4,e4]@3 ~ [c4,e4]@3 ~ [c4,e4]@3 ~@3]/2", // C
  M: "~ g3 ~ g3 ~ g3 [b3,d4] g3, b2@7 ~ b2@7 ~, ~@4 [b3,d4]@5 ~@7", // Bm
  N: "~@2 g3@2 [bb3,d4]@2 g3@2 ~@2 g3@2 [bb3,d4]@2 g3 ~, bb2@7 ~ bb2@7 ~", // Bb
  O: "~ a3 ~ a3 ~ a3 [d4,gb4] a3, d3@7 ~ d3@8, ~@2 [d4,gb4]@3 ~@3", // D
  P: "~@2 a3@2 [d4,e4]@2 a3 ~@5 [d4,e4]@2 a3 ~, a2@9 ~ a2@5 ~, ~@4 a3 ~@3 a3@4 ~@4", Q: "[f3,bb3,d4]@15 ~",
  R: "[g3,c4,e4]@15 ~", S: "[bb3,d4,f4]@15 ~", T: "[c3,f3,bb3,d4,g4]@15 ~",
  U: "~ [d4,g4] gb4 ~ g4 gb4 d4 g4, [d3,a3], ~@3 d4@2 ~@3", // G5 D5
  V: "[f3,bb3,d4]@5 ~ f3@2 ~@4 d4@3 ~, bb2@8 bb2@7 ~, ~@6 [bb3,d4]@4 f3@5 ~, ~@11 bb3@4 ~", // Bb
  W: "[g3,c4,e4]@5 ~@9 e4 ~, c3@9 ~ c3@6, ~@6 [g3,c4,e4]@6 g3@3 ~, ~@13 c4@2 ~", // C
  X: "[f3,bb3,d4]@5 ~ [f3,bb3,d4] ~@5 [f3,bb3,d4]@3 ~, bb2@10 bb2@5 ~, ~@2 [f3,bb3,d4] ~", // Bb
  Y: "[g3,c4,e4]@5 ~ [g3,c4,e4]@5 ~ [g3,d4,e4]@3 ~, c3@15 ~", // C Em7
  Z: "[f3,bb3,d4]@5 ~ [f3,bb3,d4] ~ f3@2 ~@3 d4@2 ~, bb2@8 [bb3,d4]@3 f3@4 ~, ~@5 bb2@3, ~@6 bb3 ~", // Bb
  AA: "[c3,g3,c4,e4]@5 ~ [g3,c4,e4] ~ c4@4 g3@3 ~, ~@6 c3@2 [c3,e4]@7 ~, ~@8 g3@3 ~@5", // C
  AB: "[bb2,f3,bb3,d4]@5 ~ [bb2,f3,bb3,d4] ~ [bb3,d4]@2 ~@2 d4@3 ~, ~@8 bb2@7 ~, ~@8 f3 ~ f3@5 ~, ~@11 bb3@4 ~", // Bb
  AC: "[c4,e4]@4 ~@2 e4 ~ [c3,g3,c4,e4]@3 ~ [c3,g3,c4,e4]@3 ~, c3@7 ~@9, g3@3 ~ g3@3 ~@9, ~@5 c4@2 ~@9", // C
  AD: "[c3,g3,c4,e4]@6 [g3,c4,e4] ~ [g3,c4]@2 ~@2 c4@3 ~, ~@6 c3@2 e4@5 ~@3, ~@10 c3@5 ~, ~@11 g3@4 ~", // C C5
  AE: "[bb2,f3,bb3,d4]@5 ~ [bb2,bb3,d4] ~ [bb3,d4]@2 ~ bb3 ~ bb3 f3 bb3, ~@3 f3 bb2@4, ~@8 f3 ~ f3@2 d4@3 ~", // Bb
  AF: "[[c3,g3,c4,e4]@3 ~]/3", // C
})).s("gm_piano").gain(0.26)

// chords · acoustic guitar steel · "GUITAR"
const acoustic_guitar_steel = note(`<
  A B C D E F G H I J K L M N O P Q R S@2 T U F G H I J V W M N O P Q R S@2 T X Y Z AA AB AC AD AE M N O P Q R S@2 T U
  AF AG AH AI AJ AK AL AM AN AO AP AQ ~@2
>`.pickRestart({
  A: "~@8 bb2 a2 ~ f2 ~ d2 c2 ~", B: "f2@5 ~ f2 ~ f2@6 f3@2", C: "f2@7 ~ bb3 a3 ~ f3 ~ d3 c3 ~",
  D: "f2@5 ~ f2 ~ f2@7 ~", E: "c3@15 ~", F: "~@2 d4@2 ~@2 d4@2 ~@2 d4@2 [f4,a4]@2 d4 ~, bb3@7 ~ bb3@7 ~, ~ [f4,a4] ~@2",
  G: "~ c4 ~ c4 ~ c4 [e4,g4] c4, a3@7 ~ a3@8, ~ [e4,g4] ~@2", // Em
  H: "~ bb3 ~ bb3 ~ bb3 [d4,g4] bb3, g3@7 ~ g3@8, ~ [d4,g4] ~@2", // G5
  I: "~ d4 ~ d4 ~ c4 [e4,g4] c4, a3@7 ~ g3@7 ~, ~ [f4,a4] ~@2", // Em F
  J: "~@2 b3@2 ~@2 b3@2 ~@2 b3@2 [d4,g4]@2 b3 ~, g3@7 ~ g3@7 ~, ~ [d4,g4] ~@2", // G5
  K: "~ [d4,g4] gb4 ~ g4 gb4 d4 g4, [d3,a3], ~@3 d4@2 ~@3", L: "[d3,a3,d4,gb4]@15 ~",
  M: "~@3 c4 ~@2 c3@2 ~@7 b3, c3@6 ~@3 c3@4 c3@3, ~ g3 e4@6, ~@4 c4@7 c4@5, ~@2 g3@2 g3!4",
  N: "[c3,g3,c4,e4]@3 ~ [g3,c4,e4]@2 ~@4 c4@2 [c3,g3,c4,e4]@4, ~@3 c3@5 c3@4 ~@4, ~@3 e4@3 ~@2, ~@6 [g3,c4]@3 g3@3 ~@4", // C C5
  O: "[g2,g3] ~@6 f3, d4!2, b3@3 b3@3 b3@2, ~ g3 g3@6, ~@3 g2@7 g2@6", // G
  P: "f3@2 ~@10 d4@3 ~, d4@3 d4@3 ~@2, [bb2,bb3]@3 bb3@4 bb3@4 bb3@4 ~, ~@2 f3@6 f3@2 f3@5 ~, ~@4 bb2@5 bb2@6 ~", // Bb
  Q: "~@7 a3, d3, [d4,gb4]@3 d4@3 d4@4 gb4@6, ~ a3@5 d4@2, ~ gb4 g4@2", // D
  R: "~@3 b3 [b3,d4]@4 ~@6 e3 ~, [a2,a3,db4]@8 a2@7 ~, ~@2 e3@6 [a3,db4]@3 a3@2 a3@2 ~, ~@5 e3@2 ~, ~@12 db4@3 ~", // Bm A
  S: "[[bb2,f3,bb3,d4]@15 ~ [c4,e4]@11 ~@5, ~@15 [c3,e3,g3]@11 ~@6]/2", T: "[bb2,bb3,d4,f4]@5 ~@3",
  U: "[c3,g3,bb3,d4,f4,bb4]@3 ~", // Gm7
  V: "~@2 [d4,g4]@2 gb4@2 ~@2 g4@2 ~ b2 ~ b2 [a2,g4]@2, a3@15 ~, d3@3 [d3,d4], ~@3 d4@2 [a2,gb4] ~@2", // G5 A7 D
  W: "[d2,d3,a3,d4,gb4]@15 ~", X: "~@2 c2@2 f2@2 g2 ~ bb2 ~ bb2 a2 ~ a2 g2@2, [c3,g3,bb3,d4,f4,bb4]@3 ~",
  Y: "a2@2 c3@11 ~@3", Z: "~@4 f2@2 g2 ~ bb2@2 ~ a2@3 f2@2", AA: "c2@12 ~@3 c2",
  AB: "f2@2 c3@2 c3@2 c2 c3 ~ c3@2 c2 c3@2 c3@2", AC: "c3@2 d3@5 ~ b2@2 a2@2 g2@2 a2@2",
  AD: "~@2 g4@2 ~@11 gb4, a3@3 a3@5, ~@2 gb4@2 g4 d4 gb4 g4, ~@7 d4@2 gb4@2 g4@2 d4@3", AE: "[a3,d4,gb4]@3 ~",
  AF: "[bb2,f3,bb3,d4]@2 ~@2 [bb3,d4]@2 ~@2 bb3 [f3,bb3,d4] ~@2 [f3,bb3,d4]@2 [f3,bb3,d4]@2, ~@2 [f3,bb3,d4]@2 f3@5 ~ [f3,bb3,d4]@2 ~@4, ~@3 bb2@3 [bb3,d4]@3 ~@7, ~@7 bb2@4 bb2@5", // Bb
  AG: "[c3,g3,c4,e4] ~ [g3,c4,e4] ~@4 g3, ~ [g3,c4,e4] ~ e4@5, ~@3 c3@3 [g3,c4]@2 g3@2 g3@3 c4@3, ~@7 c3@4 c3@5, ~@9 c4@3 d4@4", // C C5
  AH: "f3 ~@3 [f3,bb3,d4]@2 ~@8 [bb3,d4]@2, [bb2,bb3,d4]@3 bb2@5 bb2@3 bb3@3 ~@2, ~ f3 ~ d4@4 ~, ~@3 [f3,bb3]@2 f3@3, ~@3 bb2", // Bb Bb5
  AI: "g3 ~ g3 ~@4 g3, [c3,c4,e4]@3 c3@3 g3@2 g3@5 c4@3, ~ g3 e4@6, ~@4 c4@5 c4@3 d4@4, ~@7 c3@4 c3@5", // C
  AJ: "f3 ~@3 [f3,bb3,d4]@2 [f3,bb3,d4]@2 ~ [bb3,d4] ~@2 [f3,bb3,d4]@2 [f3,bb3,d4]@2, [bb2,bb3,d4]@3 bb2@5 bb2@2 [bb3,d4]@2 ~@4, ~@2 f3@2 ~@5 f3@2 bb2@5", // Bb
  AK: "[c3,g3,c4,e4]@2 ~@2 [g3,c4,e4]@2 ~@2 e4 ~ c3@2 ~@2 [g3,c4,e4]@2, ~@2 [g3,c4,e4]@2 ~@2 [g3,c4,e4]@3 [g3,c4,e4]@3 [g3,c4,e4]@2 ~@2, ~@3 c3@4 c3@3 ~@3 c3@3", // C
  AL: "[bb2,f3,bb3,d4] ~@3 [f3,bb3,d4] ~ [f3,bb3,d4]!2, ~ [f3,bb3,d4] [f3,bb3,d4]@2 ~ [f3,bb3,d4] ~@2, ~@3 bb2@2 ~ bb2@5 bb2@5", // Bb
  AM: "[c3,g3,c4,e4]@2 ~@2 [g3,c4,e4] ~@3 [g3,c4,e4] ~ c3@2 ~@2 [g3,c4,e4] ~, ~@2 [g3,c4,e4]@2 ~@2 [g3,c4,e4]@2 ~ [g3,c4,e4]@2 ~ [g3,c4,e4]@2 ~@2, ~@3 c3@4 c3@3 ~@3 c3@2 ~", // C
  AN: "f3 ~@3 bb3 ~ d4@2, d4@3 bb2@5, [bb2,bb3]@3 bb2@2 f3@5 f3@6, ~@2 f3@2 bb3@3 d4@4 bb3@5", // Bb
  AO: "c3 ~ g3 ~@4 c4, e4@8 c3@3 g3@5, c4 ~ c4@4 c4@3 e4@3 c3@4, ~@3 c3@4 g3@3 c4@3 e4@3",
  AP: "f3 ~@3 [f3,bb3,d4]@2 ~ bb2@2 ~@2 [f3,bb3,d4] ~@2 [f3,bb3,d4]@2, [bb2,bb3,d4]@3 bb2@4 ~@3 bb2@3 bb2@3, ~@2 f3@2 ~@2 [f3,bb3,d4]@3 [f3,bb3,d4]@2 ~ [f3,bb3,d4]@2 ~@2", // Bb
  AQ: "[c3,g3,c4,e4]@15 ~", // C
})).s("gm_acoustic_guitar_steel").gain(0.37)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note(`<
  ~ A B C D ~@5 E@2 F@2 G@2 H@2 I@4 J K L M N O@2 F@2 G@2 H@2 I@4 P Q@2 R S T@2 F@2 G@2 H@2 U@2 V@2 W X Y Z@2 X AA AB AC
  X AA AD@2 AE
>`.pickRestart({
  A: "a5 c6@5 d6@2, [c4,e4,g4]", B: "[bb3,d4,f4,g6], d6 ~@15", C: "a5 c6@4 d6 a5 c6, [c4,e4,g4]",
  D: "[bb3,d4,f4,d5,g5]", E: "[a3@10 ~ b3 d4 b3 a3@17 ~, [d3,gb4]@31 ~, ~@5 a3@2 ~@9]/2",
  F: "[~@8 d4@2 ~@6 e6@15 g4, [c4,g4,d5]@31 ~, ~ d6 ~@2, ~@10 e4@21 ~]/2", G: "[~ d6 [bb4,g6]@2, [d4,g4]@31 ~, b4 ~]/2",
  H: "[~@4 g5 gb5 d5@2 e4@8, [d4,a4], gb4 ~]/2", // D5
  I: "[[bb2,bb3,d4] [c3,c4,e4,e6] [d3,d4,f4,f6] [c3,c4,g4,g6], d6@63 ~]/4", J: "a4@11 ~ g4@4, [bb3,d4]",
  K: "bb4 a4 g4 f4, c5, f4@3 ~@5", L: "[d4,f4,bb4]", M: "[f4,a4] [e4,g4]", N: "[d4,b4]", O: "[d4,gb4,a4]/2",
  P: "[f4,a4]", Q: "[~ f5 g5 f5 [d4,c6]@4, g4, e4 ~]/2", R: "[a4,f5] [e5,c6]", S: "[d5,b5]", T: "[~ gb4, [d4,a4]]/2",
  U: "[~@28 e7 f7 e7 c7, d7]/2", V: "[[bb3,d4,f4]@15 ~ [bb3,d4,g4]@16, d7]/2", W: "~@2 d6 g6, [bb3,f4,d5]",
  X: "[c4,g4,e5,e6]", Y: "f6@3 a6, [bb3,f4,d5], c4 ~@15", Z: "[[c4,g4,e5]@15 c4 ~@12 f6@4, e6@7 ~, ~ [bb3,f4,d5]]/2",
  AA: "d6@3 a6, [bb3,f4,d5], c4 ~@15", AB: "[c4,g4,e5,e6]@15 c4", AC: "[bb3,f4,d5,f6]", AD: "[c4,g4,e5,e6]/2",
  AE: "[c4,g4,e5] ~@15", // C
})).s("gm_string_ensemble_1").gain(0.24)

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

// drums · rim
const rim = s("rim").struct(`<
  A B@3 ~ B@6 ~ C@6 ~@4 B@6 ~ C@6 ~@4 B@6 ~ C@4 B C ~@4 C@3 B C@3 D C@2 D ~@3
>`.pickRestart({
  A: "~@13 x!2 ~", B: "~ x ~ x", C: "~@4 x ~@2 x ~@4 x ~@3", D: "~@4 x ~@2 x ~@8",
})).gain(0.38)

// drums · snare
const snare = s("sd").struct("<~@55 A ~@3 B ~@3 C ~@2 D E ~@2>".pickRestart({
  A: "~@4 x ~@3 x ~@2 x ~@3 x", B: "~@8 x!2 ~ x ~ x ~ x", C: "~@12 x!4", D: "~@14 x!2", E: "x",
})).gain(0.38)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@55 A ~@3 B ~@3 C ~@2 D ~@3>".pickRestart({
  A: "~@2 x!2 ~@3 x ~@6 x ~", B: "~@6 x!2 ~@8", C: "~@10 x!2 ~@4", D: "~@12 x!2 ~@2",
})).gain(0.19)

// drums · low tom
const low_tom = s("lt").struct("<~@11 A ~@9 A ~@6 A ~@9 A ~@6 A ~@9 B ~@7 C ~@3 D ~@2>".pickRestart({
  A: "~@7 x", B: "~@10 x ~@4 x", C: "~@13 x!3", D: "x",
})).gain(0.38)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~ A@17 ~@4 A@6 ~ A@6 ~@4 A@6 ~ A@6 ~@4 A@11 ~@3>".pickRestart({
  A: "~ x ~ x ~ x ~ x",
})).gain(0.19)

// drums · mid tom
const mid_tom = s("mt").struct("<~@11 A ~@9 B ~@6 A ~@9 B ~@6 A ~@9 C ~@3 D ~@3 E ~@2 F ~@3>".pickRestart({
  A: "~@11 x ~@4", B: "~@10 x ~@2 x ~@2", C: "~@4 x ~@2 x", D: "~@7 x", E: "~@10 x!3 ~@3", F: "~@14 x!2",
})).gain(0.38)

// drums · open hat
const open_hat = s("oh").struct("<~@18 A@4 ~@13 A@4 ~@13 A@4 ~@11 A ~@2>".pickRestart({
  A: "x",
})).gain(0.38)

// drums · high tom
const high_tom = s("ht").struct("<~@11 A ~@9 B ~@6 A ~@9 B ~@6 A ~@9 C ~@14>".pickRestart({
  A: "~ x", B: "~@7 x!2 ~@7", C: "~@12 x!2 ~@2",
})).gain(0.38)

// drums · ride
const ride = s("rd").struct("<~@4 A ~@6 A B@6 A@4 ~@6 A B@6 A@4 ~@6 A B@6 A@4 B@11 A ~@2>".pickRestart({
  A: "x", B: "x!4",
})).gain(0.38)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@12 A@6 ~@11 A@6 ~@11 A@4 B A ~@4 A@3 C A@7 ~@3>".pickRestart({
  A: "x!16", B: "x!4 ~@2 x!2 ~ x!7", C: "x!8 ~ x!7",
})).gain(0.95)

stack(
  bass, piano, acoustic_guitar_steel, string_ensemble_1, kick, rim, snare, snare_soft, low_tom, hihat, hihat_soft,
  mid_tom, open_hat, high_tom, ride, cabasa
)