// Venus and Mars — McCartney
// 81 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (4/4 at bar 1, 7/8 at bar 26, 4/4 at bar 27) are rendered on a constant 4/4 grid of one bar per cycle
// note: pitch bends are ignored
// note: Full arrangement: all 28 bars on a 32-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(81/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 1"
const piano = note("<~@4 A B C D E@2 ~@4 F B G D E@2 H I J K J L@3>".pickRestart({
  A: "d5@8 e5@7 ~ f#5@8 d5@7 ~", B: "c5@4 d5@4 e5@4 d5@17 ~@3", C: "c5@2 b4@2 a4@2 b4@9 ~",
  D: "a4@4 g4@4 f#4@4 g4@17 ~@3", E: "[a4@2 g4@2 f#4@2 g4@4 f#4 g4@3 a4@4 c#5 a4@10 ~@3]/2", F: "d5 e5 f#5 d5",
  G: "c5 b4 a4 b4@3 ~@2", H: "~@8 g5@7 ~@9 a5@6 ~@2, [g4,b5]@7 ~ [a4,c#6]@7 ~, ~@2 d5@5 ~@3 e5@5 ~",
  I: "~@8 f5@7 ~@9 d5@8, [f4,a5]@15 ~ [f#4,f#5]@16, ~@4 c5@11 ~@17, ~ d4@3", // F F#
  J: "~@4 [d4,g5]@4 ~@4 a5@3 ~, [g4,b5]@7 ~ [a4,c#6]@7 ~, ~@2 d5@5 ~@3 e5@5 ~", // G5 G A
  K: "~@8 f5@7 ~@9 f#5@7 ~, [f4,a5]@15 ~ [f#4,a5]@15 ~, ~@4 c5@11 ~@5 d5@11 ~", // F F#m
  L: "[~@8 [c4,f5]@7 ~ [g4,b4,d5]@5 ~ [a4,d5,f#5]@5 ~ [a4,c#5,e5]@15 ~@3 a6@27 ~@23, a5@15 ~@29 c#5@26 ~@26, f4@8 ~@37 e5@24 ~@27, ~@4 c5@11 ~@28 a4@26 ~@27]/3", // F5 G D A
})).s("gm_piano").gain(0.44).pan(0.7)

// bass · acoustic bass · "ACOU BASS"
const bass = note("<~@20 A B A B A C@2 ~>".pickRestart({
  A: "g1 a1", B: "f1 d2", C: "[f1@16 g1@6 d2@6 a1@35 ~]/2",
})).s("gm_acoustic_bass").gain(0.38)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note("<A B A B A C@3 D@3 E@3 A C@3 F@2 G H@2 I@2 J@2 ~>".pickRestart({
  A: "~ d3, d3 ~, ~ a3@4 ~@3", B: "~ a2, d3@5 ~@3",
  C: "[~@8 e2 [e2,b2]!2 ~ e2 [e2,b2]!2 e2 e2!5 [e2,b2]!3, a2@4 a2@4 ~@3 b2@2 ~@2 b2@3 b2@2 ~@4, ~@4 e3@16 e3@15 ~@61]/3", // E5
  D: "[~@5 d3, a2!2 a2!2 d3 ~, ~@4 e3@16 e3@16 e3@16 e3@13 ~@31, ~@2 a3@4 a3@4 a3@4 a3@3 a3@4 ~@3]/3",
  E: "[~@5 d3, a2!2 a2!2 d3 ~, ~@4 e3@16 e3@16 e3@16 e3@15 ~ a3@16 ~@12]/3",
  F: "[~@7 a3, a2!2 a2!2, ~ e3@4 e3@4 e3@4 e3@3, ~ a3@2 a3@2 a3@2 ~]/2",
  G: "~@3 b4 ~@3 c#4, g4@8 g3@11 ~ e3@11 ~, ~@4 d3@23 ~@5, ~@16 a4@8 a3@7 ~",
  H: "[~@7 f#4 ~@3 b4 ~@3 c#4, f3@8 f3@9 ~@3 a2@19 ~ g3@11 ~ e3@11 ~, ~@4 c3@12 d3@8 d3@12 d3@23 ~@5, ~@12 a4@14 ~@6 g4@8 ~@8 a4@8 a4@7 ~]/2",
  I: "[~@7 f#4 ~@3 b4 ~@3 c#4, f3@8 f3@9 ~@3 a2@16 ~@4 g3@11 ~ e3@11 ~, ~@4 c3@12 d3@8 d3@12 d3@23 ~@5, ~@12 a4@14 ~@6 g4@8 ~@8 a4@8 a4@7 ~]/2",
  J: "[~@3 a4 [g2,g3,b3,d4]@2 ~ [a2,e3,a3,c#4,a4]@9, f3@8 f3@9 ~@47, ~ c3@3 ~@12]/2", // G A
})).s("gm_acoustic_guitar_steel").gain(0.38).pan(0.4)

// chords · acoustic guitar steel · "STEEL GTR" · soft notes
const acoustic_guitar_steel_2 = note("<A@6 B C ~@2 D@2 ~ E@3 B C ~@10>".pickRestart({
  A: "[~@20 a3@16 a3@16 a3@15 ~@17 a3@16 a3@16 a3@16 ~@16 a3@16 ~@28]/6", B: "~@3 e2 ~@4", C: "~@4 b2 ~@3",
  D: "[~@5 a3@4 ~@7]/2", E: "[~@5 a3@4 ~@4 a3@4 ~@7]/3",
})).s("gm_acoustic_guitar_steel").gain(0.16).pan(0.4)

// other · pan flute
const pan_flute = note("<~@4 A B C D E@2 ~@4 A B C D E@2 ~@2 F G ~@4>".pickRestart({
  A: "f#5 g5 a5 f#5", B: "a5@4 b5@4 c6@3 ~ [b5,c6] b5@18 ~", C: "a5 g5 f#5 g5@5", D: "f#5 e5 d5 e5@5",
  E: "[f#5@4 e5@4 d5@4 e5@8 d5@2 e5@6 f#5@8 a5@2 f#5@25 ~]/2", F: "d5@15 ~ c#5@8 b4@4 a4@4", G: "c5@8 d5@8 a4@15 ~",
})).s("gm_pan_flute").gain(0.33)

// other · bagpipe · "BAG PIPE"
const bagpipe = note("<~@24 A B@2 ~>".pickRestart({
  A: "~@4 b4 ~ b4@3 ~ a4 ~ b4@3 ~ c#5@6 d5@5 ~ e5@4",
  B: "[~@4 a4 ~ a4@3 ~ b4@2 c5@2 ~@2 b4 ~ a4@2 g4@2 f#4@3 ~ g4 ~ e4@11 ~@25]/2",
})).s("gm_bagpipe").gain(0.27).pan(0.4)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel_3 = note("<A@6 B@4 C@6 D@4 E F E G E H@2 ~>".pickRestart({
  A: "[~@2 [a3,d4] [a3,d4,f#4]@3 [a3,d4] [a3,f#4]@3 [a3,d4] [a3,d4,f#4]@3 d4 [a3,f#4]@3 [a3,d4] [a3,d4,f#4]@3 [a3,d4] [a3,f#4]@3 [a3,d4] [a3,d4,f#4]@3 d4 [a3,f#4]@3 [a3,d4] [a3,d4,f#4]@3 [a3,d4] [a3,f#4]@3 e3 e3@3 [a2,e3,a3,b3,e4]@2, ~ d3@2 d3@2 d3@2 d3@2 d3@2 d3@2 d3@2 d3@2 d3@2 d3@2 [a2,a3,b3,e4]@2 ~]/6", // D5 D D5 D D5 D D5 D …
  B: "[~@4 [b2,b3]@4 [b2,e3,g3,b3]@4 ~ e4@11 [e3,g3,b3,e4]@12 [b2,d3,g3,b3]@4 [b2,d3,g3,b3]@4 ~ e4@11 [b2,d3,g3,b3,e4]@12 [e3,d4,g4]@4 [e3,a3,d4,g4]@4 [e3,a3,d4,g4]@8 [e3,a3,d4,g4]@4 [a2,e3,d4,g4]@4 ~ g4@7 [e3,g3,g4]@4 [e3,g3,c#4,g4]@4 c#4@4 b3@4 [a2,e3,g3]@4 g3@4 g3@4, ~@12 [e2,b2,e3,g3,b3]@12 ~@20 [e2,b2,d3,g3,b3]@12 e2@9 ~@23 a3@8 ~@20 [c#4,g4]@12, ~@92 [a2,e3,d4]@9 ~@7 [a2,e3,g3,g4]@8 ~@4 [a2,e3]@8]/4", // B Em G Em7 Asus4 Em C#dim A7 …
  C: "[~@8 [a3,d4]@4 [a3,d4,f#4]@12 [a3,d4]@4 [a3,f#4]@12 [e3,c4]@4 e4@4 c4@8 [a2,e3,a3,c4,e4]@4 [a2,e3,a3,c4,e4]@10 ~@2 e3@4 e3@12 [e3,a3,b3,e4]@15 ~ [a3,d4]@4 [a3,d4,f#4]@12 [a3,d4,f#4]@4 f#4@8 ~@4 [a3,d4]@4 g4@4 f#4@7 ~ [a3,d4,f#4]@4 [a3,a4]@12 e3@4 e3@12 [a3,b3,e4]@4 ~@2 g3@2, ~@8 d3@16 d3@16 [a2,a3]@16 ~@16 [a2,a3,b3,e4]@16 a2@7 ~@29 a3@11 ~@5 [a3,d4]@12 ~@37 b3@3, ~@11 e3@3 ~@12 d3@4 d3@4 ~@4 d3@4 [a2,a3,b3,e4]@4 [a2,e3]@2, ~@33 f#4@2 ~@12 e4]/6", // D5 D D5 D C Am Esus4 D5 …
  D: "[~@4 [b2,b3]@4 [b2,e3,g3,b3]@4 e4@6 ~@2 d4@4 [e3,g3,b3,e4]@12 [b2,d3,g3,b3]@4 [b2,d3,g3,b3]@4 ~ e4@6 ~@5 [b2,d3,g3,b3]@12 [e3,d4,g4]@4 [e3,a3,d4,g4]@4 [e3,a3,d4,g4]@8 [e3,a3,d4,g4]@4 [a2,e3,a3,d4,g4]@4 ~ g4@7 [e3,a3,g4]@4 [e3,a3,c#4,g4]@4 c#4@4 b3@4 [a2,e3,a3]@4 [a2,e3]@8, e2@12 [e2,b2,e3,g3,b3]@12 ~@20 [e2,b2,d3,g3,b3]@12 e2@9 ~@27 [a2,e3,a3,d4]@9 ~@7 [a2,e3,a3,g4]@8 ~@12, ~ d4@2 ~@6 e4@2 ~@2 e4@3 ~@13 [c#4,g4]@3]/4", // B Em G Em7 Asus4 A7 A5 Em …
  E: "[d4,g4]@2 d4!2 [c#4,e4]@2 [e4,a4]!2, [g2,b2,d3,g3] [a2,e3,a3], ~ [g4,b4] ~ c#4", // G5 C#m A5 G A5 G
  F: "[a2,c4,f4]@2 [c4,f4]!2 [a3,d4,f#4]@2 a3!2, [f2,f3,a3]@16 [a2,d3]@13 ~@3, ~ a4 ~ [d4,f#4]", // F F5 D F D5 D
  G: "[c4,f4]@7 ~ [c4,f4]@4 [c4,f4]@4 [a3,d4,f#4]@8 a3@4 a3@4, [a2,f3,a3]@16 [a2,d3]@13 ~@3, ~ a4 ~ [d4,f#4]", // F5 D Dm D5 D
  H: "[[c4,f4]@7 ~ [c4,f4]@4 [c4,f4]@4 [g2,d3,g3,b3]@6 [d3,d4,f#4]@6 [e3,e4,a4,c#5]@36, [a2,f3,a3]@8 ~@3 [a2,a3]@21, ~ a4 ~@6]/2", // F5 G D A Dm A
})).s("gm_acoustic_guitar_steel").gain(0.33)

// chords · acoustic guitar steel · "STEEL GTR" · soft notes
const acoustic_guitar_steel_4 = note("<A@6 B@2 C D E@2 ~ F@3 B@2 C G ~@8>".pickRestart({
  A: "[~@7 d4@3 ~@4 a3 d4@3 ~@5 d4@3 ~@4 a3 d4@3 ~@5 d4@3 ~@6]/6", B: "[~ [e3,g3] ~@4 b2@3 ~@7, ~@24 e2@9 ~@31]/2",
  C: "~ a3 ~@6", D: "~ c#4 ~@6", E: "[~@7 d4@3 ~@6]/2", F: "[~@7 d4@3 ~@5 d4@3 ~@6]/3", G: "~ c#4 ~@4 a3@2",
})).s("gm_acoustic_guitar_steel").gain(0.16)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel_5 = note("<~@2 A@8 B@3 C@7 D E F G H I@2 ~>".pickRestart({
  A: "[~@104 [a3,c4]@4 [a3,b3]@12 ~@24 e4@20 d4@8 e4@8 d4@8 ~@32 d4@4 ~@4 a3@8 [a3,c#4]@4 d4@2 c#4@5 ~ b3@2 c#4@6, d4@4 d4@4 d4@4 d4@4 d4@4 d4@4 d4@4 d4@4 d4@4 d4@4 f#4@6 a4@6 ~@42 e4@4 ~@14 c#4@5 ~@11, ~@4 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 [a3,a4]@8 a3@8 ~@20 [a3,b3]@11 ~ b3@8 b3@51 ~@5 [a3,d4]@8 [a3,d4,g4]@8 [a3,d4]@8 a3@8 ~@12 a3@8 a3@8, ~@80 d4@8 d4@16 ~@20 e4@11 ~ g3@36 ~@20 e3@8 e3@8 e3@8 e3@8 e3@32, ~@96 a2@31 ~ e3@44 [e3,g3]@21 ~@63]/8", // Am Asus2 A Asus2 D5 Dsus4 D5 Em
  B: "[~@20 [a3,c4]@2 ~@4 e4@2 g4 e4@3 ~@2 e4@2 [a3,c4]@2 a3@2 ~@6 e4@2, d4@2 d4@2 f#4@3 ~ a2@8 a2@8, ~ a4@2 a4@2 a4@2 a4@3 ~@8 a4@3 a3@2 ~, ~@4 d4@2 d4@4 ~ [a3,b3]@3 [a3,b3]@4 ~ [b3,e4]@3 [b3,g4]@2, ~@5 c4]/3", // Am Asus2 E5 Em
  C: "[~@4 a4@4 g4@4 [a3,f#4]@8 d4@4 ~@4 a4@4 ~@4 a4@4 ~@32 [a3,c4]@4 [a3,b3]@12 ~@44 g4@7 ~ g4@7 ~@5 d4@4 g4@4 ~@44 [a3,c#4]@4 [a3,e4]@4 c#4@4 ~@4 e4@4, d4@8 d4@8 ~@8 f#4@8 ~@12 a4@8 [a3,a4]@8 a3@8 ~@20 [a3,b3]@11 ~ b3@8 b3@51 ~ e3@8 e3@8 e3@8 e3@8 g3@31 ~, ~@4 a3@8 ~@8 a3@16 a3@8 ~@4 d4@8 d4@16 ~@32 g3@36 ~@8 g4@7 ~@45 f#4@7 ~@9 c#4@7 ~, ~@26 d4@4 ~@2 d4@8 d4@8 f#4@12 a4@12 ~@44 e4@23 ~ d4@12 ~@4 d4@8 [a3,d4]@8 [a3,g4]@8 [a3,d4]@8 [a3,d4]@8 [a3,c#4]@8 ~@4 c#4@2 ~@2 a3@11 ~, ~@64 a2@31 ~ e3@44 [e3,g3]@21 ~@63]/7", // D Am Asus2 A A5 A Asus2 D5 …
  D: "~@3 b4 ~@3 c#5, g3@15 ~ a3@16, ~ d4@3 ~ e4@3, ~ g4 ~ a4",
  E: "~@3 a4 ~@3 f#4, f3@15 ~ f#3@15 ~, ~@4 c4@12 ~@4 a3@11 ~, ~ f4 ~ d4",
  F: "~@3 b4 ~@3 c#5, g3@15 ~ a3@16, ~@4 d4@11 ~@5 e4@12, ~@8 g4@7 ~@9 a4@8",
  G: "~@3 a4 ~@3 f#4, f3@16 f#3@15 ~, ~@4 c4@12 ~@4 a3@11 ~, ~ f4 ~ d4",
  H: "~@11 b4@5 ~@12 c#5@4, g3@15 ~ a3@16, ~ d4@3 ~ e4@3, ~ g4 ~ a4",
  I: "[~@6 a4@2 [g3,b3,d4,g4]@3 [d3,f#3,a3,d4,f#4]@3 [a2,e3,a3,c#4,e4]@18, f3 ~@3, ~ c4@3 ~@12, ~ f4 ~@6]/2", // G D A
})).s("gm_acoustic_guitar_steel").gain(0.33).pan(0.6)

// drums · ride
const ride = s("rd").struct("<~@19 [~@31 x]!6 [~@16 x ~@5 x ~@3 x!3 ~@3] ~@2>").gain(0.49)

// drums · cabasa
const cabasa = s("cabasa:4").struct("<~@20 [~ x!3 ~ x!3]!5 [~ x!3 ~@4] ~@2>").gain(0.83)

// drums · shaker
const shaker = s("sh").struct("<~@20 [~ x]!4 ~@4>").gain(0.38)

stack(
  piano, bass, acoustic_guitar_steel, acoustic_guitar_steel_2, pan_flute, bagpipe, acoustic_guitar_steel_3,
  acoustic_guitar_steel_4, acoustic_guitar_steel_5, ride, cabasa, shaker
)