// animal spirits — Jack Stratton Theo Katzmanarr. Landon Hildebrand
// 100 bpm, 4/4, key Db major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 2/4 at bar 59, 4/4 at bar 60) are rendered on a constant 4/4 grid of one bar per cycle
// note: Transcription provider: pdmx. https://musescore.com/score/5596224; license: https://creativecommons.org/publicdomain/zero/1.0/
// note: Full arrangement: all 60 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(100/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 · piano · "Upright Piano"
const piano = note(`<
  ~@2 A B C D A B C E F G H I A B C D A B C E F G H J F G H I A B C D A B C E F G H J F G H K L M N O P Q R S T Q R S U
  V
>`.pickRestart({
  A: "[db2,db4,f4,ab4]@2 ~ [db4,f4,ab4]!3 ~ [db4,f4,ab4] ~ [db4,f4,ab4] ~ [db4,f4,ab4] ~ [db4,f4,ab4]!2 ~", // Db
  B: "[c2,bb3,eb4,gb4]@2 ~ [bb3,eb4,gb4] [a3,c4,eb4]!2 ~ [a3,c4,eb4] ~ [a3,c4,eb4] ~ [a3,c4,eb4] ~ [a3,c4,eb4]!2 ~, ~ f1 ~@2", // Cm7b5 Ebm Adim
  C: "[ab3,c4,f4]@2 ~ [ab3,c4,f4] [gb3,bb3,db4,f4]!2 ~ [gb3,bb3,db4,f4] ~ [gb3,bb3,db4,f4] ~ [gb3,bb3,db4,f4] ~ [gb3,bb3,db4,f4]!2 ~, bb1@3 ~ eb2@4 ~@8", // Fm Gbmaj7
  D: "bb3 ab3 bb3 [f2,f3,ab3] ~ [gb2,gb3,bb3,db4] ~ [ab2,gb3,bb3,db4]@4 ~@5, [gb3,db4] ~@3, eb2 ~@7", // Fm Gb Gb5
  E: "bb3 ab3 bb3 [f2,f3,ab3] ~ [gb2,gb3,bb3,db4] ~ [ab2,gb3,bb3,db4]@4 ~@2 [ab2,ab3] [bb2,bb3] [db3,db4], [gb3,db4] ~@3, eb2 ~@7", // Fm Gb Ab Bb Db Gb5
  F: "~@2 [db2,f3,ab3,db4]@2 [eb2,gb3,bb3,db4]@2 [f2,f3,ab3,db4]@2 [gb2,gb3,bb3,db4]@2 ~ [gb2,gb3,bb3,db4] ~ [ab2,ab3] [bb2,bb3] [db3,db4]", // Db Ebm7 Db Gb Ab Bb Db
  G: "~@2 [db2,f3,ab3,db4]@2 [eb2,gb3,bb3,db4]@2 [f2,f3,ab3,db4]@2 [gb2,gb3,bb3,db4]@2 ~ [ab2,ab3] ~ [bb2,bb3] ~ [db3,db4]", // Db Ebm7 Db Gb Ab Bb Db
  H: "[bb2,bb3] [ab2,ab3] [db2,f3,ab3,db4]@2 [eb2,gb3,bb3,db4]@2 [f2,f3,ab3,db4]@2 [gb2,gb3,bb3,db4]@2 ~ [gb2,gb3,bb3,db4] ~@3 [gb2,bb3,eb4,gb4]", // Bb Ab Db Ebm7 Db Gb Ebm
  I: "~ [ab2,ab3,db4,f4] ~ [bb2,gb3,c4,e4] ~ [c3,gb3,bb3,eb4] ~ [db3,f3,ab3,db4]@2 ~@7", // Db C7 Cm7b5 Db
  J: "~ [ab2,ab3,db4,f4] ~ [bb2,gb3,c4,e4] ~ [c3,gb3,bb3,eb4] ~ [db3,f3,ab3,db4]@2 ~@4 [ab2,ab3] [bb2,bb3] [db3,db4]", // Db C7 Cm7b5 Db Ab Bb Db
  K: "~ [ab2,ab3,db4,f4] ~ [bb2,gb3,c4,e4] ~ [c3,gb3,bb3,eb4] ~ [db3,f3,ab3,db4]@2 ~@3 c3@4", // Db C7 Cm7b5 Db
  L: "[bb2,ab3,d4,gb4] ~ [bb2,ab3,d4,gb4] ~ [bb2,ab3,d4,gb4] ~ [bb2,ab3,d4,gb4] ~ [bb2,ab3,d4,gb4] ~@7", // Bbaug
  M: "[gb2,gb3,bb3,db4] [f2,f3,ab3,db4] [gb2,gb3,bb3,db4] [g2,eb3,gb3,bb3,db4]", // Gb Db Gb Eb7
  N: "[eb3,ab3,c4]@4 ~@2 [gb3,bb3,db4] ~ [gb3,bb3,db4] [eb3,ab3,c4] ~@2 ab2 gb2 f2 gb2, ab2@11 [eb3,ab3,c4]@2 ~@3", // Ab Gb Ab
  O: "[eb2,gb3,bb3,db4] [f2,f3,ab3,db4] [gb2,gb3,bb3,db4] [bb2,f3,bb3,db4]", // Ebm7 Db Gb Bbm
  P: "[ab2,gb3,bb3,db4,f4]!2 ~ [ab2,gb3,bb3,db4,f4] ~ [ab2,gb3,bb3,db4,f4] ~ [ab2,gb3,bb3,db4,f4]!2 ~@4 ab4 bb4 db5", // Gbmaj7
  Q: "~@2 [db3,f4,ab4,db5]@2 [eb3,gb4,bb4,db5]@2 [f3,f4,ab4,db5]@2 [gb3,gb4,bb4,db5]@2 ~ [gb3,gb4,bb4,db5] ~ [ab3,ab4] [bb3,bb4] [db4,db5]", // Db Ebm7 Db Gb Ab Bb Db
  R: "~@2 [db3,f4,ab4,db5]@2 [eb3,gb4,bb4,db5]@2 [f3,f4,ab4,db5]@2 [gb3,gb4,bb4,db5]@2 ~ [ab3,ab4] ~ [bb3,bb4] ~ [db4,db5]", // Db Ebm7 Db Gb Ab Bb Db
  S: "[bb3,bb4] [ab3,ab4] [db3,f4,ab4,db5]@2 [eb3,gb4,bb4,db5]@2 [f3,f4,ab4,db5]@2 [gb3,gb4,bb4,db5]@2 ~ [gb3,gb4,bb4,db5] ~@3 [gb3,bb4,eb5,gb5]", // Bb Ab Db Ebm7 Db Gb Ebm
  T: "~ [ab3,ab4,db5,f5] ~ [bb3,gb4,c5,e5] ~ [c4,gb4,bb4,eb5] ~ [db4,f4,ab4,db5]@2 ~ db5 ~ db5 [ab3,ab4] [bb3,bb4] [db4,db5]", // Db C7 Cm7b5 Db Ab Bb Db
  U: "~ [ab3,ab4,db5,f5] ~ [bb3,gb4,c5,e5] ~ [c4,gb4,bb4,eb5] ~ [gb3,bb4,eb5,gb5] ~ [ab3,ab4,db5,f5] ~ [bb3,gb4,c5,e5] ~ [c4,gb4,bb4,eb5] ~ [gb3,bb4,eb5,gb5]", // Db C7 Cm7b5 Ebm Db C7 Cm7b5 Ebm
  V: "~ [ab3,ab4,db5,f5] ~ [bb3,gb4,c5,e5] ~ [c4,gb4,bb4,eb5] ~ [db4,f4,ab4,db5] ~@8", // Db C7 Cm7b5 Db
})).s("gm_piano").gain(0.28)

// bass · electric bass finger · "Bass"
const bass = note(`<
  ~ A B C D E B C D F G H I J K L M E K L M F G N O P G N O Q K L M E K L M F G N O P G N O R S@3 T U ~@4 V W X Y Z
>`.pickRestart({
  A: "~@3 db3", B: "db2 ~@3", C: "c2 ~ f1@2 ~@4", D: "bb1 ~ eb2@2 ~@4", E: "eb2@2 ~ f2 ~ gb2 ~ ab2@4 ~@5",
  F: "eb2@2 ~ f2 ~ gb2 ~ ab2@4 ~@2 ab2 bb2 db3", G: "~@2 db2@2 eb2@2 f2@2 gb2@2 ~ gb2 ~ ab2 bb2 db3",
  H: "~@2 db2@2 eb2@2 f2@2 gb2@2 ~ ab2 ~ bb2 ~ db3", I: "bb2 ab2 db2@2 eb2@2 f2@2 gb2@2 ~ gb2 ~@3 gb2",
  J: "~ ab2 ~ bb2 ~ eb2 ~ db2@2 ~@7", K: "db2@4 ~@9 ab1 bb1 b1", L: "c2@2 ~@2 f1@4 ~@5 f1 ab1 f1",
  M: "bb1@2 ~@2 eb2@4 ~@7 ab1", N: "~ ab2 db2@2 eb2@2 f2@2 gb2@2 ~ ab2 ~ bb2 ~ db3",
  O: "bb2 ab2 db2@2 eb2@2 f2@2 gb2@2 ~ gb2 ~ db2 eb2 gb2", P: "~ ab2 ~ bb2 ~ c3 ~ db3@2 ~ db3 ~ db3 ab2 bb2 db3",
  Q: "~ ab2 ~ bb2 ~ c3 ~ db3@2 ~@7", R: "~ ab2 ~ bb2 ~ c3 ~ db3@2 ~@2 gb2 c3@4",
  S: "[bb2 ~ bb2 ~ bb2 ~ bb2 ~ bb2 ~@6 eb2@5 f2@3 ab1 gb2@4 g2@3 ab2@7 eb2@2 ab1@3 eb2 ab2 gb2 f2 gb2]/3",
  T: "eb2@4 f2@3 db2 gb2@4 bb2@4", U: "ab2!2 ~ ab2 ~ ab2 ~ eb2 ab2 ~@7",
  V: "~ ab3 bb3 ab3 db4 bb3 ab3 db3 ~ ab3 bb3 ab3 db4 bb3 ab3 db3",
  W: "~ ab3 bb3 ab3 db4 bb3 ab3 db3 ~ gb3 ~ ab3 ~ bb3 ~ db3",
  X: "~ ab3 bb3 ab3 db4 bb3 ab3 db3 ~ ab3 bb3 ab3 db4 bb3 ab3 gb3", Y: "~ ab3 ~ bb3 ~ c4 ~ gb3 ~ ab3 ~ bb3 ~ c4 ~ gb2",
  Z: "~ ab2 ~ bb2 ~ c3 ~ db3 ~@8",
})).s("gm_electric_bass_finger").gain(0.32)

// drums · kick
const kick = s("bd").struct(`<
  [x ~@3 x ~@2 x ~@2 x ~ x ~@3]!45
  [x ~@3 x ~@2 x!2 ~@3 x ~@3]
  ~
  [x ~@3 x ~@2 x!2 ~@3 x ~@2 x]!3
  ~@5
  [x ~@3 x ~@2 x!2 ~@3 x ~@2 x]!4
  [x ~@3 x ~@2 x ~@8]
>`).gain(0.19)

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

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

// drums · open hat
const open_hat = s("oh").struct("<~@47 [~@3 x ~@7 x ~@4]!3 ~@5 [~@3 x ~@7 x ~@4]!4 [~@3 x ~@12]>").gain(0.19)

stack(piano, bass, kick, snare, hihat, open_hat)