// Cryin' — Joe Satriani
// 74 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: Full arrangement: all 107 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(74/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 · pad new age · "Keyboard"
const pad_new_age = note(`<
  A B A B A B C D A B A B A E C F E C G H E C G I J A B A B A E C F E C G H E C G I J ~@20 A B A B A E C K E C G H E C G
  I E C G H E C G I J ~@20
>`.pickRestart({
  A: "[e3,b3,d#4,f#4]", B: "[e3,a3,c#4,e4]", C: "[e3,g#3,b3,d#4]", D: "[b2,a3,c#4,e4]", E: "[a2,a3,c#4,e4]",
  F: "a3@6 ~ c#4, [a2,e4], c#4@7 ~, ~@3 a3", G: "[f#3,a3,c#4,e4]", H: "b3@5 ~ e3@2, [g#2,f#3], e3@3 ~, ~@5 b3@3",
  I: "[b2,e3,f#3]", J: "b2", K: "[a2,a3,c#4,e4]@4 a4 a3 c#4@2",
})).s("gm_pad_new_age").gain(0.12).pan(0.3)

// chords · pad poly · "Keyboard"
const pad_poly = note("<~@54 A B A B A B C@2 ~@45>".pickRestart({
  A: "[c#3,f#3,g#3,b3]", B: "[a2,c#3,e3,g#3]", C: "[e3,f#3,b3]/2",
})).s("gm_pad_poly").gain(0.25).pan(0.3)

// bass · fretless bass · "Bass"
const bass = note(`<
  A@3 B A C D E A@3 B A C D F@2 G H G F G I J K A@3 B A C D F@2 G H G F G I J K L@2 M@2 N B O P Q R S T U V U V U V W@2
  A@3 B A C D F@2 G H G F G I J F G H G F G I J ~ L@2 M@2 L@2 M@2 L@2 M@2 L@2 M@2 X@2 ~@2
>`.pickRestart({
  A: "e2", B: "e2@7 e2", C: "e2@14 a2 f#2", D: "g#2", E: "b2@3 b2@5", F: "a2@7 a2", G: "g#2@7 g#2", H: "f#2@7 f#2",
  I: "f#2@4 f#2 c#3@2 b2", J: "b2@7 b2", K: "b2", L: "[e2@7 d2@9]/2", M: "[c2@7 a1@9]/2", N: "c#2@7 c#2", O: "a1@7 a1",
  P: "b1@4 b1@3 b1", Q: "c#2@3 c#2 c#2@4", R: "e2@3 e2 e2@4", S: "a1@3 a1 a1@4", T: "b1@3 b1 b1@4", U: "c#2", V: "a1",
  W: "e2/2", X: "[e2@11 ~@5]/2",
})).s("gm_fretless_bass").gain(0.48).pan(0.4)

// chords · distortion guitar · "El. Guita"
const distortion_guitar = note(`<
  ~@42 A@2 B@2 C D E F C D E F ~@33 A@2 B@2 A@2 G@2 A@2 B@2 A@2 B@2 H@2 ~@2
>`.pickRestart({
  A: "[[e3,b3,e4]@7 [d3,e3,g3,b3]@9]/2", B: "[[c3,e3,g3,a3,b3]@7 [b2,d3,e3,f#3,a3]@9]/2", C: "[c#3,e3,g#3]",
  D: "[e3,f#3,a#3,c#4] [e3,g#3,b3]", E: "[a2,c#3,e3]", F: "[b2,e3,f#3]",
  G: "[[c3,e3,g3,a3,b3]@7 [b2,d3,e3,f#3,a3]@7 b3 g2]/2", H: "[~@4 b3 e4@6 ~@5]/2",
})).s("gm_distortion_guitar").gain(0.25)

// other · electric guitar muted · "El. Guita"
const electric_guitar_muted = note("<~@54 A B A B A B C@2 ~@15 D E ~@28>".pickRestart({
  A: "f#4 b3 e4 f#4@2 e4 b3 f#4@2 e4 b3 f#4@2 e4 b3@2", B: "g#4 a3 e4 g#4@2 e4 a3 g#4@2 e4 a3 g#4@2 e4 a3@2",
  C: "[f#4 b3 e4 f#4@2 e4 b3 f#4@2 e4 b3 f#4@2 e4 b3@18]/2", D: "~@6 f#3@2 [b3,c#4,e4]@2 [b3,e4] g#3 f#3 e3 c#3 b2",
  E: "b2@3 ~@13",
})).s("gm_electric_guitar_muted").gain(0.25)

// other · guitar harmonics · "El. Guita"
const guitar_harmonics = note("<~@103 [b3 a4 d4@2 ~@4] ~@3>").s("gm_guitar_harmonics").gain(0.06)

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

// drums · snare
const snare = s("sd").struct("<~@25 A@7 B A@7 B C D@12 ~@8 A@7 B A@7 B A@7 B ~ D@16 ~@4>".pickRestart({
  A: "~ x", B: "~@8 x ~@3 x!2 ~@2", C: "~@10 x ~ x!4", D: "x!2",
})).gain(0.54)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@24 A ~@7 B ~@7 B ~@2 C ~ D ~@3 C E ~ C ~@16 B ~@3 F ~@3 G ~@7 B A ~ C ~ D ~ C ~ D ~ C ~ D ~ C ~ D ~@4
>`.pickRestart({
  A: "~@3 x", B: "~@5 x ~@2", C: "~@7 x", D: "~@14 x!2", E: "x", F: "~@6 x!2", G: "~@5 x!2 ~",
})).gain(0.48)

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

// drums · mid tom
const mid_tom = s("mt").struct(`<
  ~@24 A ~@18 B ~ C ~@3 D ~@2 E ~@20 F ~@3 G ~@8 A ~ B ~ C ~ B ~ C ~ B ~ C ~ B ~ C ~@4
>`.pickRestart({
  A: "~@5 x ~@2", B: "~@10 x!2 ~ x ~@2", C: "~@12 x!2 ~@2", D: "~@3 x", E: "~@2 x!2", F: "~@4 x!2 ~@2",
  G: "~@3 x!2 ~@3",
})).gain(0.48)

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

// drums · high tom
const high_tom = s("ht").struct("<~@45 A ~@3 A ~@27 B ~@12 A ~@3 A ~@3 A ~@3 A ~@4>".pickRestart({
  A: "~@5 x ~@2", B: "~ x!2 ~@5",
})).gain(0.48)

// drums · crash
const crash = s("cr").struct(`<
  ~@33 A ~@3 A ~@2 A@2 ~@4 B C@7 A ~@6 D ~@8 A ~@3 A ~@2 A@2 ~@3 A ~@2 A ~@17 A ~@3
>`.pickRestart({
  A: "x", B: "x!2", C: "~ x", D: "~@11 x!3 ~@2",
})).gain(0.48)

// drums · crash · soft notes
const crash_soft = s("cr").struct("<~@61 [x!11 ~@5] ~@45>").gain(0.12)

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

stack(
  pad_new_age, pad_poly, bass, distortion_guitar, electric_guitar_muted, guitar_harmonics, kick, snare, low_tom, hihat,
  mid_tom, open_hat, high_tom, crash, crash_soft, ride
)