// California Blue — Roy Orbison
// 114 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 105 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(114/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 · piano · "ACOU BASS"
const bass = note("<c#-1 ~@104>").s("gm_piano").gain(0.05)

// bass · electric bass finger · "ACOU BASS"
const bass_2 = note(`<
  ~@4 A B C D E F G H I B C J K L M N C O I P Q R I S T D U V Q W I V X Y Z AA T Y Z@2 AB@2 H AC I AD AE J E AF I AG U
  AH AI O AJ AK M P C O AL V AM W U S AN J H AH AM W AL V AO AP AA B AQ AR H Z AS@2 Z AA AT W M AD AU AF U V AV Q AW
  AX@2
>`.pickRestart({
  A: "c2@5 ~ c2 ~ c2@4 ~@4", B: "c2@5 ~ c2 ~ c2@4 ~@2 c2@2", C: "f1@4 ~@2 f1 ~ f1@5 ~ f1 ~",
  D: "f1@4 ~@2 f1 ~ f1@4 ~@2 f1@2", E: "g1@4 ~@2 g1 ~ g1@4 ~@2 g1 ~", F: "g1@4 ~@2 g1 ~ g1@4 ~@2 g1@2",
  G: "c2@4 ~@2 c2 ~ c2@3 ~@3 c2 ~", H: "c2@4 ~@2 c2 ~ c2@5 ~ g1@2", I: "c2@4 ~@2 c2 ~ c2@4 ~@2 c2 ~",
  J: "f1@4 ~@2 f1 ~ f1@5 ~ f1@2", K: "d1@4 ~@2 d1 ~ d1@4 ~@2 d1@2", L: "g1@2 ~ g1 a1@2 b1@2",
  M: "c2@4 ~@2 c2 ~ c2@4 ~@2 g1@2", N: "c2 ~@3", O: "f1@5 ~ f1 ~ f1@5 ~ f1@2", P: "c2@4 ~@2 c2 ~ c2@4 ~@2 c2@2",
  Q: "g1@4 ~@2 g1 ~ g1@5 ~ g1 ~", R: "g1@5 ~@3 g1@4 ~@2 g1@2", S: "c2@2 ~ c2 c1@2 d1 e1", T: "f1@4 ~@2 f1 ~ f1@5 ~@3",
  U: "c2@4 ~@2 c2 ~ c2@5 ~ c2 ~", V: "c2@4 ~@2 c2 ~ c2@5 ~ c2@2", W: "g1@5 ~ g1 ~ g1@5 ~ g1@2",
  X: "g1@4 ~@2 g1 ~ g1@5 ~@3", Y: "g1@4 ~@2 g1 ~ g1@6 ~@2", Z: "c2@4 ~@2 c2 ~ c2@5 ~@3", AA: "c2@4 ~@2 c2 ~ c2@6 ~@2",
  AB: "g1@2 ~ g1 b1@2 d2@2", AC: "c2@9 ~@7", AD: "c2@4 ~@2 c2 ~ c2@8", AE: "f1@5 ~ f1 ~ f1@5 ~ f1 ~",
  AF: "g1@4 ~@2 g1 ~ g1@5 ~ g1@2", AG: "c2@5 ~ c2 ~ c2@4 ~@2 g1@2", AH: "c2@5 ~ c2 ~ c2@5 ~ c2@2",
  AI: "f1@5 ~ f1@3 ~@5 f1 ~", AJ: "d1@4 ~@2 d1 ~ d1@5 ~ d1@2", AK: "g1@5 ~ g1@2 a1@4 b1@4",
  AL: "c2@5 ~ c2 ~ c2@5 ~ c2 ~", AM: "g1@5 ~ g1 ~ g1@5 ~ g1 ~", AN: "f1@4 ~@2 f1 ~ f1@4 ~@2 f1 ~",
  AO: "g1@5 ~ g1 ~ g1@4 ~@4", AP: "g1@5 ~ g1 ~ g1@4 ~@2 g1@2", AQ: "f1@5 ~ f1 ~ f1@6 ~@2", AR: "g1@5 ~ g1 ~ g1@5 ~@3",
  AS: "g1@4 ~@2 g1 ~ g1@4 ~@4", AT: "d2@4 ~@2 d2 ~ d2@5 ~ d2@2", AU: "d2@5 ~ d2 ~ d2@5 ~ d2@2",
  AV: "d1@5 ~ d1 ~ d1@4 ~@2 d1@2", AW: "g1@4 ~@2 g1@2 c2@5 ~ c2 ~", AX: "[c2@2 ~ g1 c2@6 ~@6]/2",
})).s("gm_electric_bass_finger").gain(0.3)

// bass · piano · "SYN STRIN"
const bass_3 = note("<c#-1 ~@104>").s("gm_piano").gain(0.05)

// chords · synth strings 1 · "SYN STRIN"
const synth_strings_1 = note(`<
  ~@3 A B@4 C@6 D@2 E@3 ~ F@8 G@8 H@2 I@3 J@7 K@4 L@8 M N@5 O@6 G@8 H@2 P@3 Q@7 R@8 S@4 ~
>`.pickRestart({
  A: "[c4,e4,g4]@13 ~@3", B: "[[e4,g4]@32 [a3,f4]@31 ~, c4@63 ~]/4", C: "[[b3,d4] [c4,e4]@2, g4]/6",
  D: "[[a3,f4]@31 ~]/2", E: "[[a3,f4] b3 [c4,e4], d4@2 ~, ~ g4@2]/3",
  F: "[[a3,f4]@4 e4@4 ~@3 f4 c4@2 a#3@2, c4@2 [b3,d4] e4, ~ g3@3]/8", G: "[[a3,f4] e4 [b3,d4] [c4,e4], c4 ~, ~ g3@3]/8",
  H: "[~ f4, [b3,d4]]/2", I: "[e4@32 [a3,f4]@15 ~, c4@47 ~]/3",
  J: "[[b3,d4]@16 [c4,e4]@32 [b3,d4]@32 [c4,e4]@17 ~@15, g3@97 ~@15]/7", K: "[[g3,e4] [a3,f4], c4]/4",
  L: "[[b3,d4] e4@2 [a3,f4], g3@3 ~, ~ c4@3]/8", M: "d4", N: "[b3@16 e4@31 ~ [a3,f4]@32, g3@3 ~@2, ~ c4@4]/5",
  O: "[e4@2 [b3,d4]@2 c4 a#3, g3, ~@2 e4]/6", P: "[e4@2 [a3,f4], c4]/3",
  Q: "[[b3,d4] [c4,e4]@2 [b3,d4]@2 [c4,e4]@2, g3]/7", R: "[[a3,f4] b3 [c4,e4]@2, d4 ~, ~ g3@3]/4",
  S: "[[a3,f4]@16 b3@23 ~ [c4,e4]@24, d4@39 ~@25, ~ g3@3]/4", // Dm C
})).s("gm_synth_strings_1").gain(0.15)

// chords · synth strings 1 · "SYN STRIN"
const synth_strings_1_2 = note(`<
  ~@35 A B C D E F G H@2 ~@4 I@2 J@2 K@2 I@3 L M N O P@3 ~@15 A B C D Q F G R@2 ~@4 S T@3 S T@3 S U@4
>`.pickRestart({
  A: "~ g4 a4 b4 c5 d5 e5 f5", B: "g5@3 d5", C: "b4", D: "c5@3 g4", E: "e4@2 f4@2 f4@2 g4@2 g4@2 a4 ~ a4@2 g4@2",
  F: "a4@3 c5", G: "b4@6 c5 d5", H: "[c5@15 ~]/2", I: "~@4 [c5,e5,g5] ~ [c5,e5,g5] ~ [c5,e5,g5] ~@3 [c5,e5,g5] ~@3",
  J: "~@4 [a4,c5,f5] ~ [a4,c5,f5] ~ [a4,c5,f5] ~@3 [a4,c5,f5] ~@3", // F
  K: "~@4 [b4,d5,g5] ~ [b4,d5,g5] ~ [b4,d5,g5] ~@3 [b4,d5,g5] ~@3", L: "c5 d5 e5@2", M: "f5@6 a5 c6", N: "f6 e6 c6 g5",
  O: "a5", P: "[g5@11 ~@5]/3", Q: "e4@2 f4@2 f4@2 g4 ~ g4@2 a4 ~ a4@2 g4@2", R: "[c5@31 ~]/2",
  S: "d5 a4 f4 a4 f4 d4 f4 d4", T: "g4/3", U: "[g4@49 ~@15]/4",
})).s("gm_synth_strings_1").gain(0.2)

// other · epiano2 · "E.PIANO"
const epiano2 = note("<~@16 A B C D ~@40 A E C F ~@28 A G ~@2 A H ~@2 A I@2 J@2>".pickRestart({
  A: "f5@2 d5@2 a4@2 d5@2 a4@2 f4@2 a4@2 f4 ~", B: "g3@2 b3@2 d4@2 g4@7 ~@3", C: "~ c4 e4 g4 c5 g4 e4 g4",
  D: "c4@3 ~@5", E: "g3@2 b3@2 d4@2 g4@9 ~", F: "c4@9 ~@7", G: "g3 b3 d4 g4@5", H: "g3 b3 d4 g4@4 ~",
  I: "[g3@2 b3@2 d4@2 g4@19 ~@7]/2", J: "[~@8 [g4,c5,e5]@11 ~@13]/2",
})).s("gm_epiano2").gain(0.3)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  ~@3 A B@2 C@2 D@2 B@4 C@2 E D B A C@2 B@2 D@2 B@2 C@2 B@2 D@2 B@2 D F B@2 C D B@2 D@2 B A B@2 C@2 D@2 B@4 C@2 E D B@2
  C@2 B@2 D@2 B@2 C@2 B@2 D@2 B@2 D@2 B@2 C D G@2 D@2 B@2 E D B@2 E D B@2 E D H I ~
>`.pickRestart({
  A: "[g3,c4,e4] ~@7", B: "[g3,c4,e4]!8", C: "[a3,c4,f4]!8", D: "[b3,d4,g4]!8", E: "[a3,d4,f4]!8",
  F: "[b3,d4,g4]!4 [b3,d4,f4]!4", G: "[c4,e4,g4]!8", H: "[b3,d4,g4]!4 [g3,c4,e4]!4", I: "[g3,c4,e4]!3 [c4,e4]@3 ~@2",
})).s("gm_acoustic_guitar_steel").gain(0.25)

// chords · orchestral harp · "HARP" · G
const orchestral_harp = note(`<
  ~@44
  [~@2 [b5,d6,g6]@2 ~ [b5,d6,g6]@2 ~ [b5,d6,g6]@2 ~ [b5,d6,g6]@2 ~ [b5,d6,g6]@2]
  [~ [b5,d6,g6]@7 ~@8]
  ~@42
  [~@2 [b5,d6,g6]@2 ~ [b5,d6,g6]@2 ~ [b5,d6,g6]@2 ~ [b5,d6,g6]@2 ~ [b5,d6,g6]@2]
  [~ [b5,d6,g6]@7 ~@8]
  ~@15
>`).s("gm_orchestral_harp").gain(0.35)

// drums · kick
const kick = s("bd").struct("<~@4 A@15 B A@27 B A@15 C A@37 C D E ~>".pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x", C: "x ~@2 x!2 ~@2 x", D: "x ~@3 x ~@2 x", E: "x!2",
})).gain(0.31)

// drums · snare
const snare = s("sd").struct("<~@4 A@14 B ~ A@7 C A@7 D A@11 E F A@14 G A@7 B A@7 H A@3 I A@19 J ~>".pickRestart({
  A: "~ x ~ x", B: "~@4 x ~@7 x ~@2 x", C: "~@2 x ~@2 x ~@2", D: "~ x ~@2 x!4", E: "~@15 x", F: "~@3 x",
  G: "~@4 x ~@5 x ~@3 x!2", H: "~@2 x ~ x ~@2 x ~@2 x ~ x ~ x ~", I: "~@4 x ~@7 x ~ x!2", J: "~@2 x!2 ~@4",
})).gain(0.31)

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

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

stack(
  bass, bass_2, bass_3, synth_strings_1, synth_strings_1_2, epiano2, acoustic_guitar_steel, orchestral_harp, kick,
  snare, hihat, open_hat
)