// Honesty — Billy Joel
// 67 bpm, 4/4, key A# major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 64 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(67/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 · "A.PIANO 2"
const piano = note(`<
  A@2 B C D E F@3 G H I J K H L M@2 B C D E N@3 G O@2 J K H P@3 Q R S T U V W X Y Z AA AB AC AD AE@2 AF AG O@2 J K H P@3
  AH@2 AI@2
>`.pickRestart({
  A: "[~@2 bb4@2 ~@2 f5@2 ~@3 gb5 ~@3 d5, [bb3,f4]@6 ~ f4, ~ [ab3,e4]@2 ~, ~ bb4 [gb3,bb4,db5,f5] [f3,a4,eb5], ~@10 gb4@2 ~ g4@3]/2", // Bb5 Dbm Gbmaj7 F7
  B: "[f4,bb4,d5]@2 bb4@2 [bb4,eb5]@2 bb4!2, bb3, ~ [f4,d5]@3, ~ [eb3,g4], ~@3 [eb5,g5]", // Bb Eb5 Dm Eb
  C: "[a4,c5,f5]@2 ~@4 [f4,c5,f5]!2, f3, ~ a4@3, ~ [c5,f5] d3@2, ~@3 eb3@5", // F F5
  D: "[g4,bb4,eb5] bb4 [f4,bb4,d5]!2, eb3, ~ [g4,eb5]@3, ~ g3", // Eb Bb Cm
  E: "[g4,c5,e5]@2 ~@4 f5 [g4,c5,eb5,f5], [a2,a3], ~ e5@3, ~ [g4,c5] eb5 [f2,f3,a4,d5], ~ [c2,c3,bb4,g5]", // C Cm A C5 Dm C7
  F: "[[f4,bb4,d5,f5]!2 [g4,c5] c5 ~@2 a4 ~ [g4,bb4,eb5]!2 [b4,db5,e5,g5]!2, [bb2,bb3]@8 c2@16 [d5,f5]@4 f4 a4 d5 f5 [eb2,eb3]@8 ~@8, ~@2 d5@3 [db3,db4,db5,e5,g5]@5 ~@2, ~ [c3,f5] [c3,c4,c5,a5]@3 [a2,a3], ~@3 [g4,e5] [a4,f5] g4 [d3,d4]@4 ~@2]/3", // Bb C5 Eb Dbm7b5 Bb Dm Eb Dbdim …
  G: "[g4,c5,d5,g5]@2 [g4,c5,d5,g5]@2 [c5,d5]@2 [g4,c5,d5,g5] [a4,c5,d5,a5], [d2,d3]@8 [d2,d3,gb4,gb5]@7 ~", // Gsus4 Csus2 Gsus4 D7 D
  H: "[g4,bb4,d5,g5]!2 [a4,c5,eb5,g5]!2, [eb2,eb3] [f2,f3]", // Gm Am7b5 Eb F
  I: "[a4,d5,gb5,a5]@4 d5@4 [g2,g3,g4,bb4,d5,g5]@4 [f3,a4,c5,g5] ~ [a4,c5,g5]@2, [gb2,gb3]@3 f2, ~@4 [a4,gb5,a5]@8 ~ d5@3", // D Gm F Am7 Gb D
  J: "[g4,bb4,eb5,g5]!2 [f2,f3,a4,c5,f5] [f2,g4,bb4,eb5], [eb2,eb3] ~", // Eb F Eb
  K: "[f4,bb4]@4 ~@3 d5 ~@2 [c5,d5]@2 [c5,d5]@2 [a4,c5,d5,a5]@2, [bb2,d5] [d2,d3], ~@2 f4@2 ~ [gb4,gb5]@3, ~@5 bb4@3 ~@4 [g4,g5]@4, ~@3 c5 ~@4", // Bb5 Csus2 D7 Bb D Gb G
  L: "[a4,d5,gb5,a5]@2 d5@2 [d5,g5]@2 ~ [a4,c5,g5], [gb2,gb3]@12 [a4,c5,g5] d5@3, ~ [gb5,a5]@3, ~ a4@2 [f2,f3], ~ [g2,g3,g4,bb4]", // D G5 Am7 Gb Am7 Gbm F Gm
  M: "[[g4,bb4,eb5,g5]@2 [g4,bb4,eb5,g5]@2 f2@2 [f2,g4,bb4,eb5] ~@2 d5@5 ~ [f2,g4,c5], [eb2,eb3]@4 [f3,a4,c5,f5]@3 [bb2,f4]@9, ~@7 [bb4,eb5]@7 [f3,bb4,eb5]@2, ~@14 g4 ~, ~@29 d5@3]/2", // Eb Fsus2 Eb F Bb5 Eb5 Ebsus2
  N: "[[f4,bb4,d5,f5]!2 [g4,c5] c5 ~@2 a4 ~ [g4,bb4,eb5]!2 [g4,b4,e5]!2, [bb2,bb3]@8 c2@16 [d5,f5]@4 f4 a4 d5 f5 [eb2,eb3]@8 ~@8, ~@2 d5@3 [db3,db4,db5,e5,g5]@5 ~@2, ~ [c3,f5] [c3,c4,c5,a5]@3 [a2,a3,db5], ~@3 [g4,e5] [a4,f5] g4 [d3,d4]@4 ~@2]/3", // Bb C5 Eb Em Bb Dm Eb Dbdim …
  O: "[[g4,bb4,d5,g5]@4 [g4,bb4,d5,g5]@4 [a4,eb5,g5]@4 ~@4 [a4,d5,gb5,a5]@4 d5@4 [g2,g3,g4,bb4,d5,g5]@4 [f3,a4,c5,g5] ~ [a4,c5,g5]@2, [eb2,eb3]@2 [f2,f3]@2 [gb2,gb3]@3 f2, ~@8 c5@6 c5@14 ~ d5@3, ~@3 [a4,eb5,g5] ~ [a4,gb5,a5]@2 ~]/2", // Gm Am7b5 D Gm F Am7 Eb F …
  P: "[[a4,d5,gb5,a5]@2 d5@2 [d5,g5]@2 ~ g5 [g4,bb4,eb5,g5]@2 [g4,bb4,eb5,g5]@2 f2@2 [f2,g4,bb4,eb5] bb4@2 bb4 ~@5 bb4, [gb2,gb3]@12 [a4,c5,g5] d5 [a4,c5]@2 [eb2,eb3]@8 ~@12 bb4@4 [ab3,ab4,db5]@2 bb4@2 f5@4, ~@2 [gb5,a5]@10 ~@5 d5@7, ~@2 a4@2 [g4,bb4]@2 [f2,f3]@6 ~@3 [bb2,g4,eb5]@9, ~@4 [g2,g3]@8 [f3,a4,c5,f5]@3 ~@2 f4@2 f4@5]/3", // D G5 Eb Gb Am7 Am Eb Db5 …
  Q: "~@3 gb5 ~@3 d5, [gb2,gb3,db5,f5] [f2,f3,a4,eb5], bb4!2 ~ f4, ~ gb4@3 ~ g4@3", // Gbmaj7 F7
  R: "~@15 d5, [g2,g3,d5], [g4,bb4]@13 g4@3, ~@3 eb4, ~@7 bb4", // G5 Gm
  S: "~@7 a4, [g2,g3,gb4,c5], [a4,d5]@13 d5@3, ~@5 a5@3, ~@11 gb5@5", T: "[f2,f3,f4,ab4,c5,d5]",
  U: "[e4,g4,c5,d5]@6 ~@4 e4 e4@2 g4 d5@2, [e2,e3]@7 ~", // C E
  V: "[eb4,g4,c5]@3 ~ [eb4,g4,c5]@4 [f4,a4,d5]@3 ~ [eb4,g4,c5]@4, [eb2,eb3] [f2,f3]", // Cm Dm Cm Eb F
  W: "[g4,bb4,eb5]@2 ~ [bb2,bb3] [f4,bb4,d5]@2 [f4,bb4,d5]@2, [bb2,bb3]@3 ~ [bb2,bb3]@4, ~ [g4,bb4,eb5] ~@2", // Eb Bb Eb
  X: "[g4,bb4,d5,f5]!2 [g4,c5,e5]!2, [c2,c3]!2", // Gm7 C
  Y: "f4 ~@2 [d2,d3], [f2,f3], [a4,d5] [gb2,gb3,gb4,a4,d5], ~ f4@3, ~@3 eb5@5", // D F D5 D
  Z: "[eb2,eb3,eb4,g4,bb4]@12 [g4,bb4,eb5] d5 [f2,g4,bb4,c5]@2, ~@6 f3 ~", // Eb Fsus4
  AA: "[f4,bb4,d5]!2 [g4,bb4,eb5]!2, bb2 [eb2,eb3]", // Bb Eb
  AB: "[a4,c5,f5]@2 [a4,c5,f5]@2 [a4,f5]@2 ~ f4, [f2,f3], ~ [eb2,eb3]@3, ~ [d2,d3,c5], ~@3 [a4,d5,f5]", // F Dm F Eb D7 Dm
  AC: "[g4,bb4,eb5]!2 [f4,bb4,d5]!2, [eb2,eb3] [g2,g3]", // Eb Bb Eb G
  AD: "[g4,c5,e5]@2 g4 ~ bb4 ~ f5 [g4,c5,eb5,f5], [a2,a3]@3 [f2,f3,a4,d5], ~ e5@3, ~ c5 [c2,c3,g5]@2, ~@3 g4 eb5 bb4@3", // C Cm A Dm C5
  AE: "[[f4,bb4,d5]@4 [f4,bb4,d5]@4 [g4,c5]@4 c5@4 ~@4 [db2,db3,g4,db5,e5]@4 f4@4 ~@3 f5, bb2@2 d5@4 ~ f4, ~ [c2,c3,f5] [c2,c3,a4,c5,f5] [d2,d3], ~@12 [g4,e5]@8 ~@4 [a4,d5]@5 a4@3, ~@15 d5]/2", // Bb C5 Dbdim F5 F D C D5
  AF: "[g4,bb4,eb5]@2 [g4,bb4,eb5]@2 [e5,g5]@2 ~ c5, [eb2,eb3] [a2,db5], ~@3 [b4,e5,g5]", // Eb Em Eb A Em
  AG: "d3 ~@6 [d2,d3], [g4,c5,d5,g5] [g4,g5]@3, ~ d3@2 d3@2 d3@2 ~, ~ [c5,d5] [gb4,c5,d5,gb5]!2", // D Gsus4 G Csus2 D7
  AH: "[~@3 gb5 ~@3 d5 gb4 ~@2 eb5 [f2,f4,a4]@2 ~ eb4, [gb2,gb3,db5,f5]@4 [f2,f3,a4]@4 d5 gb4 d5@2 ~@4, bb4!2 eb5@2 [eb2,eb3,bb4]@2 ~ [f2,f4,a4,c5], ~ gb4@3 ~ g4@7 ~@4, ~@3 f4@3 [f3,d5]@2]/2", // F Gbmaj7 F Eb5 F Dm
  AI: "[d4@2 ~@6 [f5,bb5,d6]@21 ~@3, bb2@29 ~@3, bb4@6 bb4@23 ~@3, f4@4 f4@25 ~@3, ~@2 d4@27 ~@3]/2", // Bb
})).s("gm_piano").gain(0.31)

// bass · electric bass finger · "FINGERDBAS"
const bass = note(`<
  ~ A B C D E F G H I J K L M N K O@2 P C Q R S T U V W K X M Y Z AA@2 AB AC AD AE AF AG AH AI AJ AK AL AM AN AO AP AQ
  AR AS W AT AU AV AW AX AA@2 AB L AY ~
>`.pickRestart({
  A: "~@3 f2", B: "bb1 eb2", C: "f2@3 eb2 d2@4", D: "eb2 g2", E: "a2@2 c2 f2", F: "bb1@4 c2@3 g2", G: "c3@2 db3 ~ d3@4",
  H: "eb2 a2", I: "d2@6 d3 ~ d3@8", J: "eb2 f2", K: "gb2@2 g2 f2", L: "eb2@2 f2 f1", M: "bb1@8 d2 ~ d2@2 e2@2 gb2@2",
  N: "eb2@8 f2@6 a2 f2", O: "[eb2@8 f2@4 f1@2 bb1@14 f1 ~ f1@2]/2", P: "bb1@4 eb2@3 e2", Q: "eb2@6 g1!2 g1@8",
  R: "a1@2 c2 f1", S: "bb1@8 c2@6 g1 c2", T: "c2@2 ~@2 db2@4 d2@6 a1 d2", U: "eb2 a1",
  V: "d2@2 d3@4 d2 ~ d2@2 d3@4 d2!2", W: "eb2@8 f2@6 c2 f2", X: "eb2@3 e2 f2@2 f1@2", Y: "eb2@8 f2@6 c2 f1",
  Z: "gb1 d2 g2 f2", AA: "[eb2@4 f2@2 bb1 bb2@5 ab2@4]/2", AB: "gb2 f2", AC: "g1@7 ~", AD: "g1@3 ~", AE: "f1@7 ~",
  AF: "e1@5 c2 e2 ~", AG: "eb2@6 ~ eb2 f2@8", AH: "bb1@6 bb2 ~ bb2@7 b2", AI: "c3@6 ~ g2 c2@3 bb1 a1@2 g1@2",
  AJ: "f1@8 gb2@4 d2@3 ~", AK: "eb2@6 f2 f1", AL: "bb1@8 eb2@6 bb1 eb2", AM: "f2@4 eb2@4 d2@5 ~ d2@2", AN: "eb2 g1",
  AO: "a1@4 c2 c3 g2@2", AP: "bb1@8 c2@5 a2 d3 a2", AQ: "c2@4 db2@4 d2@5 ~ d2@2", AR: "eb2@8 a1@7 ~",
  AS: "d2@2 d3@4 d2 ~@3 d2 ~ d2 ~ d2@2, ~@7 d3@5 ~@4", AT: "gb2@3 ~ gb2@4 g2@4 f2@4", AU: "eb2@5 ~ eb2 e2 f2@4 f1@4",
  AV: "bb1@4 bb2@4 d2 ~ d2@2 e2@2 gb2@2", AW: "eb2@8 f2@6 eb2 f1", AX: "gb1 gb2 g2 f2", AY: "bb1@3 ~",
})).s("gm_electric_bass_finger").gain(0.28)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note("<~@18 A B C D ~@2 E ~@10 F G H I ~@5 A B C D ~@2 E ~@13>".pickRestart({
  A: "~@2 bb5@2 f5@2 d5 ~@3 g5@2 eb5@2 bb4 ~", B: "~@2 f5@2 c5@2 a4 ~@3 f5@2 c5@2 a4 ~",
  C: "~@2 g5@2 eb5@2 bb4 ~@3 g5@2 d5@2 bb4 ~", D: "~@2 e5@2 c5@2 g4 ~ [bb4,eb5,g5]@3 ~ [a4,c5,f5]@3 ~",
  E: "~@2 g5@2 eb5@2 bb4 ~ [e4,g4,b4,e5] ~ [e4,a4,db5,e5]@2 ~@4", F: "[g5,bb5,d6] ~@3", G: "[gb5,a5,c6,d6]@3 ~@13",
  H: "[f5,ab5,c6,d6] ~@3", I: "[e5,g5,c6,d6] ~@3",
})).s("gm_string_ensemble_1").gain(0.26)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1_2 = note(`<
  ~@10 A@2 B C D E F G ~@8 A@2 B C D E H ~@11 I J K L M N O P Q@2 R S T@3 U ~@4
>`.pickRestart({
  A: "[g5 a5@2 ~]/2", B: "~ c6", C: "d6@4 ~ [d5,gb5] e5 gb5", D: "g6 a6", E: "a6 bb6", F: "bb6 c7", G: "bb6@9 ~@7",
  H: "bb6@2 c7 ~", I: "f4 g4", J: "a4", K: "bb4", L: "c5", M: "d5@4 bb4@3 c5@8 ~", N: "c5 db5 [d5,f5]@2",
  O: "[eb5,g5] [db5,g5]", P: "~@12 gb5 c6 d6 c6", Q: "[[d4,g5]@8 [c4,a5]@7 a5@8 ~ bb5@8, ~@15 d4@17]/2",
  R: "[eb4,bb5] [f4,c6]", S: "[f4,d6]@5 d5 e5 gb5",
  T: "[[g3,bb3,g5]@7 a5@8 ~ a5@7 [d4,bb5]@8 ~ [g3,eb4,bb5]@8 [f3,a3,c4,f5]@4 ~@4, ~@7 [a3,c4]@16 bb3@16 ~@9]/3", // Gm Eb F Am
  U: "~@12 f4@3 ~",
})).s("gm_string_ensemble_1").gain(0.24)

// chords · string ensemble 1 · "STRINGS" · soft notes
const string_ensemble_1_soft = note("<~@11 A@2 ~@14 A@2 ~@30 B@2 C D ~>".pickRestart({
  A: "[~ bb5@2 ~]/2", B: "[~@8 bb3@7 [gb3,bb3,f4]@5 ~@4 [f3,a3,eb4]@5 ~@3, ~@2 db4 ~@5]/2",
  C: "[f3,d4] ~ [f3,d4] [eb3,c4]", D: "[f3,bb3,d4]@7 ~",
})).s("gm_string_ensemble_1").gain(0.08)

// drums · kick
const kick = s("bd").struct(`<
  ~@2 A@14 B C A D E D A F D@2 A@3 G A@2 H ~@2 I@4 A J K I ~ A D A L A F M N A M@5 H ~@5
>`.pickRestart({
  A: "x!2", B: "x ~@3 x ~@2 x", C: "~@7 x", D: "x ~@7 x ~@6 x", E: "x ~@2 x!2 ~@2 x", F: "x ~@3 x ~@3 x ~@4 x!2 ~",
  G: "x ~@6 x!2 ~ x ~@3 x ~", H: "x ~@3 x ~ x!2", I: "x", J: "x ~@7 x ~ x ~@2 x!2 ~", K: "x ~@6 x!2 ~ x ~@2 x!2 ~",
  L: "x ~@6 x!2 ~ x ~@4 x", M: "x ~@7 x ~@4 x!2 ~", N: "x ~ x ~@5 x!3 ~ x ~ x ~",
})).gain(0.41)

// drums · rim
const rim = s("rim").struct("<~@2 [~@3 x]!15 ~@47>").gain(0.41)

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

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@2 A@8 ~@28 B ~@4 B ~@4 B@2 ~@14>".pickRestart({
  A: "~@3 x", B: "~@11 x ~@4",
})).gain(0.15)

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

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

// drums · mid tom
const mid_tom = s("mt").struct("<~@25 A ~@17 B ~@4 B ~@2 C ~@12>".pickRestart({
  A: "~@12 x!2 ~@2", B: "~@13 x!2 ~", C: "~@14 x!2",
})).gain(0.31)

// drums · open hat
const open_hat = s("oh").struct("<~@25 [~@2 x!3 ~@3] ~@13 [~@2 x!6] [x!8]!2 ~@5 [~@5 x ~@2] ~@16>").gain(0.41)

// drums · high tom
const high_tom = s("ht").struct("<~@25 [~@8 x!2 ~@6] ~@38>").gain(0.41)

// drums · crash
const crash = s("cr").struct("<~@26 A B@2 C B@2 D ~@2 E@5 ~@4 E ~@4 F E ~ G B@5 D ~@5>".pickRestart({
  A: "x ~@2 x", B: "~ x ~ x", C: "~@3 x", D: "~@2 x ~@4 x", E: "x", F: "x!3 ~", G: "x!2 ~ x",
})).gain(0.46)

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

stack(
  piano, bass, string_ensemble_1, string_ensemble_1_2, string_ensemble_1_soft, kick, rim, snare, snare_soft, low_tom,
  hihat, mid_tom, open_hat, high_tom, crash, ride
)