// This Diamond Ring — Lewis
// 130 bpm, 4/4, key A# minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 81 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. 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 · acoustic bass · "ACOU BASS"
const bass = note(`<
  A B C D E F G F H F I J K L K M N@2 O P Q R S T E F G F H F I J K L K M N@2 O P Q R S T E F G F H F I J K L K M N@2 O
  P K L K M N@2 O P K L K M N@2 O P U V W@3
>`.pickRestart({
  A: "c3@2 ~@2 c3@2 bb2@2 c3@2 bb2 ~ g2@2 bb2 ~", B: "c3 ~@5 bb2@2 c3@2 ~@6",
  C: "c3@2 ~@2 c3@2 bb2 ~ c3@2 bb2 ~ g2@2 bb2 ~", D: "c3@2 ~@4 bb2 ~ c3@2 ~@6", E: "c2@4 ~@2 c2 ~ c2@5 ~ g1@2",
  F: "c2@4 ~@2 c2 ~ c2@6 ~@2", G: "c2@4 ~@2 c2 ~ c2@6 g1@2", H: "c2@5 ~ c2 ~ c2@5 ~ g1@2",
  I: "c2@4 ~@2 c2 ~ c2@4 ~@2 c2 ~", J: "db2@4 ~@2 db2 ~ db2@5 ~@3", K: "gb2@4 ~@2 gb2 ~ f2@4 ~@2 f2 ~",
  L: "eb2@4 ~@2 eb2 ~ db2@4 eb2 ~ f2 ~", M: "eb2@2 ~ eb2 db2@2 eb2 ~", N: "eb2 ~ eb2@2 ~@2 bb2@8 ~@2",
  O: "ab2@4 ~@2 ab2@2 eb2@4 ab2@2 eb2 ~", P: "db2@4 ~@2 db2 ~ db2@5 ~ db2 ~", Q: "gb2@4 ~@2 gb2@2 db2@4 ~@2 db2 ~",
  R: "gb2@4 ~@2 gb2 ~ db2@3 ~ gb2@3 ~", S: "g2@4 ~@2 g2 ~ d2@5 ~ d2@2", T: "g2@3 ~ d2@4 b1@3 ~ g1@2 ~@2",
  U: "gb2@4 ~@2 gb2 ~ db2@4 ~@2 db2 ~", V: "gb2@2 ~ f2@2 ~ eb2 ~ db2 ~@2 bb1@2 ab1@2 ~", W: "[gb1@11 ~@5]/3",
})).s("gm_acoustic_bass").gain(0.64)

// chords · epiano2 · "E.PIANO 2"
const epiano2 = note(`<
  ~@4 A B C D E F G H I J I K L M N O P Q R S A B C D E F G H I J I K L M N O P Q R S A B C D E F G H I J I K L M N O I
  J I K L M N O I J I K L M N O T ~ U@3
>`.pickRestart({
  A: "[c4,eb4,g4,c5,eb5]", B: "[eb4,g4,bb4]", C: "[f4,a4,c5,f5]", D: "[c4,eb4,g4,c5]@7 ~", E: "[c4,eb4,g4,c5]",
  F: "[eb4,g4,bb4]@15 ~", G: "[f4,a4,c5]", H: "[f4,ab4,db5]@3 ~", I: "~@4 [bb4,db5,gb5] ~@7 [ab4,db5,f5] ~@3",
  J: "~@4 [eb5,gb5,bb5] ~@7 [ab4,db5,f5] ~@3", K: "~@4 [eb5,gb5,bb5] ~@7 [db5,f5,ab5] ~@3",
  L: "[eb4,gb4,bb4,eb5] ~ [eb4,gb4,bb4,eb5] ~@3 [f4,bb4,db5]@6 ~@4", // Ebm Bbm
  M: "[eb4,gb4,bb4] ~ [eb4,gb4,bb4] ~@3 [bb3,db4,f4]@10", // Ebm Bbm
  N: "[ab3,b3,eb4,b4,eb5]@4 [gb4,b4,eb5] ~@7 [gb4,b4,eb5] ~@3, gb4 ~@7", O: "~@4 [db4,f4,ab4] ~@7 [db5,f5,ab5] ~@3",
  P: "~@4 [gb4,bb4,db5] ~@7 [gb4,bb4,db5] ~@3", Q: "[gb5,bb5] ~ [gb5,db6] ~@3 bb5@9 ~, ~@3 gb5@3 ~@2",
  R: "[g5,b5] ~ [g5,d6] ~@3 [g5,b5]@10", S: "~@4 [g5,b5]@4 a5@3 ~ b5@2 ~@2, ~@8 c6 ~@3 d6 ~@3",
  T: "[gb4,bb4,db5]@3 ~@3 [gb4,b4,eb5] ~ [gb4,bb4,db5]@8, [gb3,bb3,db4]", U: "[[gb2,gb3,bb3,db4]@11 ~@5]/3",
})).s("gm_epiano2").gain(0.55)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  A B C D E F G H E I J K L M L M N O P Q R S T U E F G H E I J K L M L M N O P Q R S T U ~ V W X ~ V Y Z L M L M N O P
  Q L M L M N O P Q L M L M N O P Q AA AB AC@3
>`.pickRestart({
  A: "c3 ~ c3 bb2 c3 bb2 g2 bb2", B: "c3@2 ~@4 bb2 ~ c3@2 ~@6", C: "c3 ~@3 c3@2 bb2 ~ c3@2 bb2@2 g2@2 bb2 ~",
  D: "c3 ~@5 bb2 ~ c3 ~@7", E: "[c4,eb4,g4]@15 ~", F: "[eb4,g4,bb4]@15 ~", G: "[c4,f4,a4]", H: "[c4,eb4,g4]@7 ~",
  I: "[eb4,g4,bb4]", J: "[c4,f4,a4]@13 ~@3", K: "[b3,db4,f4,ab4]@11 ~@5", L: "~@4 [gb4,bb4,db5] ~@7 [f4,ab4,db5] ~@3",
  M: "~@4 [eb4,gb4,bb4] ~@7 [db4,f4,ab4] ~@3", N: "~@6 [bb3,db4,f4]@9 ~",
  O: "[eb3,gb3,bb3,eb4] ~ [eb3,gb3,bb3,eb4] ~@3 [bb3,db4,f4]@10", // Ebm Bbm
  P: "[ab2,ab3,b3,eb4]@2 ~@6 [ab3,b3,eb4]@2 [ab3,b3,eb4]@5 ~, ~ [ab3,b3,eb4] [ab3,b3,eb4]@2 ~@4, ~@3 ab2@3 ab2@9 ~", // Abm
  Q: "[db4,f4]@4 [db4,f4]@2 ~@4 [db4,f4]@5 ~, db3@8 db3@7 ~, ~@3 [db4,f4]@2 ~@3", // Db
  R: "[gb3,bb3,db4]@3 [gb3,bb3,db4] [gb3,bb3,db4]@4", // Gb
  S: "[gb3,bb3,db4] ~ [gb3,bb3,db4] ~@3 [gb3,bb3,db4]@6 [gb3,bb3,db4]@4", // Gb
  T: "[g2,g3,b3,d4] ~ [g2,g3,b3,d4]@2 ~@2 g2@4 ~@4 g2@2, ~@3 [g3,b3,d4]@3 [g3,b3,d4]@2, ~@5 g2@2 ~", // G
  U: "[g3,b3,d4] ~@3", V: "~@4 [g2,g3]@3 ~ [bb2,bb3]@3 ~ [c3,c4]@3 ~", W: "[a2,a3]@8 ~@2 [g2,g3]@3 ~ [f2,f3]@2",
  X: "[g2,g3]@11 ~@5", Y: "[a2,a3]@8 ~@2 [g2,g3]@3 [f2,f3]@2 ~", Z: "[ab2,ab3]@11 ~@5",
  AA: "~@4 [gb3,bb3,db4] ~@7 [gb3,bb3,db4] ~@3", AB: "gb3 ~@2 f3 ~@2 eb3 ~ db3 ~@2 bb2 ~ ab2 ~@2", AC: "[gb2@11 ~@5]/3",
})).s("gm_acoustic_guitar_steel").gain(0.48)

// chords · rock organ · "ORGAN 3"
const rock_organ = note(`<
  ~@12 A B C D E F G H I J K@2 L M N O L M N P A B C D E F G H Q@2 R@2 S@2 ~ T U ~@3 A B C D E F G H A B C D E F G H A B
  C D E F G H V W X@3
>`.pickRestart({
  A: "[gb4,bb4,db5] [bb4,db5,f5]", B: "[eb4,gb4,bb4] [db4,f4,ab4]", C: "[gb4,bb4,db5] [bb3,db4,f4]",
  D: "[eb4,gb4,bb4]@8 [db4,f4,ab4]@7 ~", E: "[eb4,gb4,bb4]@3 [bb3,db4,f4]@5", F: "[eb4,gb4,bb4]@5 ~ [bb3,db4,f4]@10",
  G: "[eb4,ab4,b4]", H: "[db4,f4,ab4]", I: "[db4,gb4,bb4]", J: "[gb5,bb5] ~ [gb5,db6] ~@3 [gb5,bb5]@9 ~, [db4,gb4,bb4]",
  K: "[[g5,b5] ~ [g5,d6] ~@3 [g5,b5]@10 ~@4 [g5,b5]@4 a5@3 ~ b5@2 ~@2, [g3,g4,b4,d5]@29 ~@3, ~@24 c6 ~@3 d6 ~@3]/2", // G G5 G
  L: "[g4,c5,eb5]", M: "[eb4,g4,bb4]", N: "[f4,a4,c5]", O: "[eb4,g4,c5]@15 ~", P: "[f4,ab4,db5]@7 ~",
  Q: "[~@16 [gb5,bb5] ~ [gb5,db6] ~@3 [gb5,bb5]@9 ~, [db4,gb4,bb4]@31 ~]/2", // Gb Gb5 Gb
  R: "[[g5,b5] ~ [g5,d6] ~@3 [g5,b5]@10 ~@4 [g5,b5]@4 a5@3 ~ b5@2 ~ [g4,g5], [g3,g4,b4,d5]@29 ~@3, ~@24 c6 ~@3 d6 ~@3]/2", // G G5 G
  S: "[[bb4,c5,bb5,c6] ~@3 [c5,c6]@2 [bb4,bb5]@2 [c5,c6]@2 [bb4,bb5]@2 [g4,g5]@6 ~@14]/2", T: "~@15 [g4,bb4,g5,bb5]",
  U: "[c5,c6] ~@3 [c5,c6]@2 [bb4,bb5]@2 [c5,c6]@2 [bb4,bb5]@2 [g4,g5]@4", // C Bb C Bb G
  V: "[gb4,bb4,db5]@5 ~ [gb4,b4,eb5] ~ [gb4,bb4,db5]@7 ~", // Gb B Gb
  W: "gb4@2 ~ [f4,ab4]@2 [eb4,gb4] ~@2 [db4,f4] ~ [bb3,db4] ~@2 [ab3,b3] ~@2, bb4 ~@15", X: "[[gb3,bb3]@11 ~@5]/3",
})).s("gm_rock_organ").gain(0.43)

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

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

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@16 A ~@19 A ~@19 A ~@7 A ~@7 A ~@4 B ~@3>".pickRestart({
  A: "~@10 x!2 ~@4", B: "x ~@2 x ~@4 x ~@7",
})).gain(0.07)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@11 A ~@5 A ~@13 A ~@5 A ~@13 A ~@3 A ~ A ~ A ~@3 A ~ A ~@5 A ~ A ~@3 B ~@3
>`.pickRestart({
  A: "~@7 x", B: "~@11 x ~ x ~@2",
})).gain(0.74)

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

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@4 A@12 ~@2 A@18 ~@2 A@18 ~@2 A@6 ~@2 A@6 ~@2 A@2 B ~@4>".pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~ x ~ x ~ x ~@2",
})).gain(0.22)

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@11 A ~@5 B ~@13 A ~@5 B ~@13 A ~@3 A ~ B ~ A ~@3 A ~ B ~@5 A ~ B ~@3 C ~@3
>`.pickRestart({
  A: "~@3 x", B: "~@5 x!2 ~", C: "~ x",
})).gain(0.74)

// drums · open hat
const open_hat = s("oh").struct("<~@16 A@2 ~@18 A@2 ~@18 A@2 ~@6 A@2 ~@6 A@2 ~@2 B ~ C ~@2>".pickRestart({
  A: "x ~@2 x ~@4", B: "~@7 x", C: "x",
})).gain(0.74)

// drums · high tom
const high_tom = s("ht").struct(`<
  ~@11 A ~@5 B ~@13 A ~@5 B ~@13 A ~@3 A ~ B ~ A ~@3 A ~ B ~@5 A ~ B ~@3 C ~@3
>`.pickRestart({
  A: "~@10 x!2 ~@4", B: "~@11 x ~@4", C: "~@3 x ~ x ~@10",
})).gain(0.74)

// drums · crash
const crash = s("cr").struct("<~@78 x ~@2>").gain(0.74)

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

stack(
  bass, epiano2, acoustic_guitar_steel, rock_organ, kick, snare, snare_soft, low_tom, hihat, hihat_soft, mid_tom,
  open_hat, high_tom, crash, ride
)