// Stay for a While — Amy Grant
// 130 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 102 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(130/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 · fretless bass · "FRETLESS"
const bass = note(`<
  A B C D E F G H I J E K L M N O A P Q R C S T U V J W X Y Z A AA AB AC N O A H I AD E AE L H AF AD AG AH G P AI AJ A M
  AI AK AL AM AN AO V AD W AP AQ Z A AA AB AR AS AT AL AU T AV N AD AW AX AY H G AZ BA BB AL BC T U V J AW BD BE B A AA
  BF BG BH BI
>`.pickRestart({
  A: "c3 ~ c3@4 c3 ~ c3 ~ c3@3 ~ c3 ~", B: "g3 ~ g3@4 g3 ~ g3 ~ g3 ~ g3@2 d3 ~", C: "a2 ~ a2@4 e2@2 a2 ~ a2@4 a2 ~",
  D: "e3 ~ e3@4 b2 ~ g3@2 a3@2 a#3@2 b3 ~", E: "f3 ~ f3@4 c3@2 f3 ~ f3@4 c3@2",
  F: "f3 ~ f3@3 ~ f3 ~ f3 ~ f3 ~ f3 ~ f3 ~", G: "c3 ~ c3@4 c2@2 c3 ~ c3@4 g2@2, ~@14 c2 ~",
  H: "g3 ~ g3@3 ~ g3 ~ b2@2 c3@2 d3@2 g3 ~", I: "a2 ~ a2@4 e2@2 a2 ~ a2@4 e2 ~",
  J: "e3 ~ e3@4 b2@2 e3@2 e3 ~ e3 ~ e3 ~", K: "f3 ~ f3@3 ~ f3@4 c3@2 f3 ~ f3 ~", L: "c3 ~ c3@4 g2@2 c3 ~ c3@4 g2 ~",
  M: "d3 ~ d3@3 ~ d3 ~ f#2@2 g2@2 a2@2 d3 ~", N: "f3 ~ f3@4 f2@2 f3 ~ f3@4 c3@2, ~@14 f2 ~",
  O: "c3 ~ c3@4 g2 ~ e3@2 f3@2 f#3@2 g3 ~", P: "d3 ~ d3@4 d3 ~ d3 ~ d3 ~ d3@2 a2 ~", Q: "f3 ~ f3@4 c3@2 f3 ~ f3@4 c3 ~",
  R: "c3 ~ c3@4 c3 ~ g3 ~ g3 ~ g3@2 d3 ~", S: "a2@4 d3@4 d3@2 d3 ~ d3 ~ d3 ~", T: "g3 ~ g3@4 d3@2 g3 ~ g3@4 d3 ~",
  U: "e3 ~ e3@4 e3 ~ c3 ~ c3 ~ c3@2 g2 ~", V: "f3 ~ f3@4 f3 ~ f3 ~ f3@3 ~ f3 ~", W: "a2 ~ a2@4 e2@2 a2 ~ a2@4 e2@2",
  X: "a2 ~ a2@3 ~ a2@4 e2@2 a2 ~ a2 ~", Y: "a2 ~ a2@4 a2 ~ d3 ~ d3@4 a3 ~", Z: "g3 ~ g3@4 d3 ~ b3@2 c4@2 c#4@2 d4 ~",
  AA: "f3 ~ f3@3 ~ f3 ~ a2@2 a#2@2 c3@2 f3 ~", AB: "e3 ~ e3@4 b2@2 e3 ~ e3@4 e3 ~",
  AC: "a2 ~ a2@4 a2 ~ a2 ~ a2 ~ a2@2 e2 ~", AD: "e3 ~ e3@3 ~ e3 ~ g2@2 a2@2 b2@2 e3 ~",
  AE: "f3 ~ f3@3 ~ f3@2 a2@2 a#2@2 b2@2 c3@2, ~@10 a2 ~@5", AF: "a2 ~ a2@4 a2 ~ a2 ~ a2@3 ~ a2 ~",
  AG: "f3 ~ f3@4 c3@2 f3 f2 f3@4 c3@2", AH: "f3 ~ f3@4 c3@2 f3 ~ f3 ~ f3@2 f3 ~", AI: "f3 ~ f3@4 c3@2 f3 ~ f3@4 f3 ~",
  AJ: "c3 ~ c3@4 g2@2 c3@2 d3 ~ c3 ~ c3 ~", AK: "c3 ~ c3@4 f3 c3 g3@2 d3 ~ a#2 ~ g3 ~",
  AL: "a2 ~ a2@4 a1@2 a2 ~ a2@4 e2@2, ~@14 a1 ~", AM: "a2 ~ a2@4 a2!2 d3 ~ d3 ~ d3@2 a2 ~",
  AN: "g3 ~ g3@4 g3 ~ g3 ~ g3@3 ~ g3 ~", AO: "e3 ~ e3@4 e3!2 c3@2 d3 ~ e3 ~ c3 ~",
  AP: "a2 ~ a2@4 e2@2 c3@2 d3@2 d#3@2 e3@2", AQ: "a2 ~ a2@5 a1 d3 ~ d3@4 d3!2",
  AR: "a2 ~ a2@4 e2@2 a2@2 e3 ~ a2 ~ a2 ~", AS: "f3 ~ f3@4 c3 ~ g3 ~ g3@4 d3 ~",
  AT: "a2 ~ a2@4 a2 ~ d3 ~ d3 ~ d3@2 a2 ~", AU: "a2 ~ a2@4 e3 ~ d3@2 d3 ~ d3 ~ d3 ~",
  AV: "e3 ~ e3@4 b2 ~ c3@2 c3 ~ c3 ~ c3 ~", AW: "a2 ~ a2@4 e2@2 a2 a1 a2@4 e2@2",
  AX: "a2 ~ a2@4 e2@2 a2 ~ a2 ~ a2@2 a2 ~", AY: "a2 ~ a2@4 e3 ~ d3 ~ d3@4 a3 ~",
  AZ: "f3 ~ f3@4 c3@2 f3@2 f3 ~ f3 ~ f3 ~", BA: "e3 ~ e3@4 b2@2 e3 ~ e3@4 d3 ~",
  BB: "a2 ~ a2@4 e2 ~ c3@2 d3@2 d#3@2 e3 ~", BC: "a2 ~ a2@4 a2 ~ d3@2 f#3 ~ d3 ~ d3 ~",
  BD: "a2 ~ a2@4 e2@2 a2 ~ a2 ~ a2@2 e2 ~", BE: "a2 ~ a2@4 c3 ~ d3 ~ d3@5 d2",
  BF: "e3 ~ e3@4 e2@2 e3 ~ e3@4 b2@2, ~@14 e2 ~", BG: "a2 ~ a2@3 ~ a2 ~ c2@2 d2@2 e2@2 a2 ~",
  BH: "a2 ~ a2@2 g2 ~ g2@2 f2 ~ f2 ~ e2 ~ e2 ~", BI: "a2 ~ e2 ~ f2@2 a2@6 ~@4",
})).s("gm_fretless_bass").gain(0.34)

// chords · electric bass finger · "FINGERDBAS"
const electric_bass_finger = note(`<
  A B C D E@2 F G H I J K L M N F O M P Q C R S T U V W X Y Z AA N AB W P AC F B AD D U AE A AF AG I AH@2 A AI J AJ AC
  AK AL AM AN AO AP AQ AR AS AT@2 AU G L U AV AW AX AY C AZ AF BA AR V C BB BC BD F AL BE BF@2 BG Z BH BI BJ C BB BK BL
  A BM BN BF BO BP
>`.pickRestart({
  A: "[g3,c4,e4]", B: "~@2 [g3,b3,d4]@6 [g3,b3,d4] ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~",
  C: "[a3,c4,e4]@4 ~@2 e4 a4, ~@4 a3@3 ~, ~@5 c4@2 ~", D: "~@2 [g3,b3,e4]@5 ~ [g3,b3,e4] ~ [g3,b3,e4] ~@5",
  E: "[~@2 a4@2 c5@2 [a3,c4,f4]@3 ~ [a3,c4,f4]@3 ~ [a3,c4,f4]@8 f3@2 [a3,c4,f4]@2 f3@2 [a3,c4,f4] ~@3, f4 ~@7]/2", // F
  F: "~@2 e4@2 g4@2 [g3,c4,e4]@3 ~ [g3,c4,e4]@3 ~ [g3,c4,e4] ~, c4 ~@3", // C
  G: "~@2 [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4]@4 g2@2", // G
  H: "~@2 c4@2 e4@2 [a3,c4,e4]@3 ~ [a3,c4,e4]@3 ~ [a3,c4,e4] ~, a3 ~@3", I: "[g3,b3,e4]",
  J: "~@2 [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4]@5 f3", // F
  K: "[a3,c4,f4] ~ [a3,c4,f4]@3 ~ [a3,c4,f4]@8 ~@2", L: "~@2 [g3,c4,e4]@6 [g3,c4,e4] ~ [g3,c4,e4]@3 ~ [g3,c4,e4] ~",
  M: "~@2 [a3,d4,f#4] ~ [a3,d4,f#4] ~ [a3,d4,f#4] ~ [a3,d4,f#4] ~ [a3,d4,f#4]@4 d3@2", // D
  N: "~@2 [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4]@4 f3@2", // F
  O: "[g3,c4,e4]@4 ~@2 g4 c5, ~@4 c4@3 ~, ~@5 e4@2 ~", // C
  P: "~@2 a4@2 c5@2 [a3,c4,f4]@3 ~ [a3,c4,f4]@3 ~ [a3,c4,f4] ~, f4 ~@3", // F
  Q: "[g3,c4,e4]@8 ~@2 [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~", // C G
  R: "[a3,c4,e4] ~ [a3,c4,e4]@2 ~@2 [a3,d4,f#4] ~ [a3,d4,f#4] ~ [a3,d4,f#4]@5 ~", // Am D
  S: "~@2 b3@2 d4@2 [g3,b3,d4]@3 ~ [g3,b3,d4]@3 ~ [g3,b3,d4] ~, g3 ~@3", // G
  T: "~@2 [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,c4,e4] ~ [g3,c4,e4]@5 ~", // Em C
  U: "[a3,c4,f4]@4 ~@2 c5 f5, ~@4 f4@3 ~, ~@5 a4@2 ~", // F
  V: "~@2 [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4] ~ [g3,b3,e4]@5 e3", // Em
  W: "[a3,c4,e4] ~ [a3,c4,e4]@4 a2@2 [a3,c4,e4] ~ [a3,c4,e4]@4 a2@2", // Am
  X: "[a3,c4,e4] ~ [a3,c4,e4]@3 ~ [a3,c4,e4]@4 a2 ~ [a3,c4,e4] ~@3", Y: "[a3,c4,e4]@8 [a3,d4,f#4]@4 d4 ~ f#4 a4",
  Z: "~@2 [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4] ~ [g3,b3,d4]@5 g2", // G
  AA: "~@2 [g3,c4,e4]@5 ~ [g3,c4,e4] ~ [g3,c4,e4] ~@5", // C
  AB: "~@2 [g#3,b3,e4]@6 [g#3,b3,e4] ~ [g#3,b3,e4]@3 ~ [g#3,b3,e4] ~", // E
  AC: "[g3,c4,e4] ~ [g3,c4,e4]@4 c3@2 [g3,c4,e4] ~ [g3,c4,e4]@4 c3@2", AD: "[c4,e4,g4,a4]",
  AE: "[a3,c4,f4] ~ [a3,c4,f4]@3 ~ [a3,c4,f4]@5 f3 [a3,c4,f4] f3 [a3,c4,f4] ~", AF: "[g3,b3,d4]",
  AG: "[c4,e4,g4,a4] ~ [c4,e4,g4,a4]@4 a2@2 [c4,e4,g4,a4] ~ [c4,e4,g4,a4]@4 a2@2", // Am7
  AH: "[~@2 [a3,c4,f4]@6 [a3,c4,f4] ~ [a3,c4,f4]@3 ~ [a3,c4,f4]@8 f3@2 [a3,c4,f4]@2 f3@2 [a3,c4,f4] ~@3]/2", // F
  AI: "~@2 [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4]@5 d3", // D7
  AJ: "~@2 [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4]@4 c3@2", // C
  AK: "~@2 [c4,d4,f#4,a4]@5 ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4] ~@5", // D7
  AL: "~@2 [a3,c4,f4]@5 ~ [a3,c4,f4] ~ [a3,c4,f4] ~@5", AM: "[g3,c4,e4]@8 [g3,b3,d4] ~ [g3,b3,d4]@5 ~",
  AN: "~@2 c4@2 e4@2 [c4,e4,g4,a4]@3 ~ [c4,e4,g4,a4]@3 ~ [c4,e4,g4,a4] ~, g3 ~@3", // Am7
  AO: "[c4,e4,g4,a4] ~ [c4,e4,g4,a4]@5 ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4]@5 ~", // Am7 D7
  AP: "[g3,b3,d4]@4 ~@2 d4 g4, ~@4 g3@3 ~, ~@5 b3@2 ~", AQ: "[g3,b3,e4]@8 [g3,c4,e4] ~ [g3,c4,e4]@5 ~",
  AR: "[a3,c4,f4]", AS: "~@2 [b3,d4,e4,g4] ~ [b3,d4,e4,g4] ~ [b3,d4,e4,g4] ~ [b3,d4,e4,g4] ~ [b3,d4,e4,g4]@4 e3@2",
  AT: "[[c4,e4,g4,a4]@22 ~@2 g3@2 c4@2 e4@2 a4 ~]/2", // Am7
  AU: "[c4,e4,g4,a4]@8 ~@2 [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4] ~", AV: "[b3,d4,e4,g#4]",
  AW: "[c4,e4,g4,a4]@4 ~@2 e4 a4, ~@4 g3@3 ~, ~@5 c4@2 ~", // Am7
  AX: "~@2 [a3,c4,f4] ~ [a3,c4,f4] ~ [a3,c4,f4] ~ [g3,b3,d4] ~ [g3,b3,d4]@5 ~", // F G
  AY: "~@2 [a3,c4,e4] ~ [a3,c4,e4] ~ [a3,c4,e4] ~ [c4,d4,f#4,a4] ~ [c4,d4,f#4,a4]@5 ~", // Am D7
  AZ: "[a3,c4,e4] ~ [a3,c4,e4]@5 ~ [f#3,a3,d4]@4 d4 ~ f#4 a4", BA: "[g3,b3,e4]@8 [g3,c4,e4]@4 c4 ~ e4 g4",
  BB: "[a3,c4,e4] ~ [a3,c4,e4]@3 ~ [a3,c4,e4]@5 a2 [a3,c4,e4] a2 [a3,c4,e4] ~", // Am
  BC: "[a3,c4,e4]@8 [a3,d4,f#4] ~ [a3,d4,f#4]@5 ~", BD: "[g3,b3,d4] ~ [g3,b3,d4]@4 g2@2 [g3,b3,d4] ~ [g3,b3,d4]@4 g2@2",
  BE: "~@2 [b3,d4,e4,g#4]@6 [b3,d4,e4,g#4] ~ [b3,d4,e4,g#4]@3 ~ [b3,d4,e4,g#4] ~", BF: "[a3,c4,e4]",
  BG: "[a3,c4,e4] ~ [a3,c4,e4]@5 ~ [a3,d4,f#4]@8", BH: "[g3,b3,e4]@8 ~@2 [g3,c4,e4] ~ [g3,c4,e4] ~ [g3,c4,e4] ~",
  BI: "[a3,c4,f4] ~ [a3,c4,f4]@4 f3@2 [a3,c4,f4] ~ [a3,c4,f4]@4 f3@2", // F
  BJ: "~@2 g4@2 b4@2 [g3,b3,e4]@3 ~ [g3,b3,e4]@3 ~ [g3,b3,e4] ~, e4 ~@3", // Em
  BK: "[a3,c4,e4]@4 a3 ~ c4 e4 ~@2 [a3,d4,f#4] ~ [a3,d4,f#4] ~ [a3,d4,f#4] ~", // Am D
  BL: "~@2 [g3,b3,d4]@5 ~ [g3,b3,d4] ~ [g3,b3,d4] ~@5", BM: "~@2 [a3,c4,f4]@6 [a3,c4,f4] ~ [a3,c4,f4]@3 ~ [a3,c4,f4] ~",
  BN: "[g#3,b3,e4]", // E
  BO: "[a3,c4,e4] ~ [a3,c4,e4]@2 [a3,d4,f4] ~ [a3,d4,f4]@2 [a3,c4,e4] ~ [a3,c4,e4]@2 [a3,d4,f4] ~ [a3,d4,f4] ~", // Am Dm Am Dm
  BP: "[a3,c4,e4] ~@5 [a3,c4,e4]@5 ~@5", // Am
})).s("gm_electric_bass_finger").gain(0.33)

// other · marimba
const marimba = note(`<
  A B C D E F A G H I E ~ J K L M N O P Q R@2 S T U V Q W@2 X Y Z AA AB AC ~ A B C D E F A G H I E ~ J K L M N O P Q R@2
  S T U V Q W@2 X Y Z AD AE AF AG R@2 S T U V Q W@2 X Y Z AH AI R@2 S T U V Q W@2 X Y Z AH AI ~@2
>`.pickRestart({
  A: "g3!4", B: "g3 d4 e4 ~", C: "c4@2 c4!3 d4 e4@2", D: "g4 ~ b3 c4", E: "c4!2 ~ a3 g3@4 ~@8", F: "~ e4!2 c4",
  G: "g3@4 e4@4 d4 e4 ~ d4 c4@4", H: "c4@2 c4@2 c4 d4 e4@2", I: "g4 a4 ~@2 b3@2 c4@2", J: "~ e4@3", K: "d4 c4!2 e4",
  L: "c4@4 c4@2 c4@2 c4@2 d4@2 e4!2 ~ f4", M: "e4 ~@3", N: "e4@2 g4 a4 g4@2 g4@2", O: "e4!2 ~ d4 c4@4 c4@4 ~@4",
  P: "~@2 c4 d4", Q: "c4 ~", R: "[c5@6 b4 a4]/2", S: "b4 a4 ~ b4 ~@8 g4@2 a4@2", T: "b4!2 c5 g4", U: "a4@4 ~@2 g4 f4",
  V: "e4@2 f4@2 e4 d4!3", W: "[c5@6 d5 a4]/2", X: "b4!2 ~ a4 g4@4 ~@4 g4@2 a4@2", Y: "b4!2 b4@2 c5@2 g4@2",
  Z: "a4@2 ~@4 g4 f4", AA: "e4@2 f4@2 e4@2 d4!2", AB: "c4@4 ~@2 e4 d4", AC: "c4@2 e4@2 d4 c4 c4@2", AD: "e4 f4 e4 b4",
  AE: "c5@4 c5@2 c5!2", AF: "~@2 c5@2 c5 b4 c5@2", AG: "c5 ~@3", AH: "e4@2 f4@2 e4@2 b4!2", AI: "a4@3 ~",
})).s("gm_marimba").gain(0.16)

// drums · kick
const kick = s("bd").struct(`<
  A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A
  B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A B A C B D
>`.pickRestart({
  A: "x ~@2 x!2 ~@2 x", B: "x ~@2 x!3 ~ x", C: "x!2 ~ x ~ x ~ x", D: "~ x ~ x ~@2 x ~",
})).gain(0.47)

// drums · snare
const snare = s("sd").struct("<[~ x ~ x]!99 [~ x!3] [~ x ~ x] [x ~ x!2 ~@4]>").gain(0.53)

// drums · low tom
const low_tom = s("lt").struct("<~@22 A ~ A ~@17 A ~@13 A ~@11 A ~@5 A ~@27>".pickRestart({
  A: "~@5 x ~@2",
})).gain(0.4)

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

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

// drums · crash
const crash = s("cr").struct("<x ~@99 x [~@3 x ~@4]>").gain(0.47)

stack(bass, electric_bass_finger, marimba, kick, snare, low_tom, hihat, open_hat, crash)