// Calcutta — The Ventures
// 182 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: pitch bends are ignored
// note: Full arrangement: all 97 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(182/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.

// other · electric guitar jazz
const electric_guitar_jazz = note(`<
  ~@5 A@3 B C D C E F G H I C D C E F G J K L M L N L O P Q C D C R F G J S T U V N W X Y K T U V N W X Z AA AB AC AB AD
  AB AC AE AF AG O AH N AI AJ AK AL ~@2 AM AN C D C E AO G H I C D C E AO G J AP AQ G AR AS
>`.pickRestart({
  A: "g4@2 b4@2 ~@2 b4@2 [e4,b4]@4 [d4,g4]@3 ~, d4@3 ~@5, ~ g4 ~@2", B: "g4 b4 ~ b4 [e4,b4]@2 d4@2, d4@3 ~@5, ~ g4 ~@2",
  C: "e4 f#4 b4 f#4", D: "e4@3 ~ e4@8 d4@4", E: "e4@5 ~ d4@2", F: "e4@4 f#4@4 c5@4 g4@3 ~", G: "f#4@3 ~ f#4@7 ~ g4@4",
  H: "e4@3 ~ e4@8 f#4@4", I: "d4@5 ~ d4@2", J: "e4@3 ~ e4@8 b4@4", K: "g4@5 ~ g4@2", L: "a4 b4 d5 b4",
  M: "a4@3 ~ a4@8 g4@3 ~", N: "a4@5 ~ g4@2", O: "a4@3 ~ a4@7 ~ g4@4", P: "a4@4 ~@2 [f#4,d5]!2", Q: "[f#4,d5] ~@5 d4@2",
  R: "e4@9 ~@3 d4@4", S: "g4@2 ~ g4", T: "a4 b4 ~ b4, ~ e5", U: "a4@2 ~@2 a4@7 ~ g4@4, c5@5 ~@3",
  V: "a4@4 b4@3 ~@5 b4@4, ~@8 e5@7 ~", W: "a4@4 b4@4 f5@3 ~ c5@3 ~", X: "b4@3 ~ b4@7 ~ c5@4", Y: "a4@2 ~@2 a4@8 b4@3 ~",
  Z: "a4@2 ~@2 a4@8 e5@3 ~", AA: "c5@11 ~ c5@4", AB: "d5 e5 g5 e5", AC: "d5@3 ~ d5@8 c5@4", AD: "d5@5 ~ c5@2",
  AE: "d5@10 ~@2 [b4,g5]@2 [b4,g5] ~", AF: "[b4,g5] ~@5 g4@2", AG: "a4 b4 e5 b4", AH: "a4@4 b4@3 ~ e5@4 b4@4",
  AI: "a4@2 b4@2 f5 ~@2 c5", AJ: "b4@2 ~@2 b4@7 ~ c5@4", AK: "a4@3 ~ a4@6 ~@2 e5@4", AL: "c5 ~@7",
  AM: "g4@2 b4@2 g4@2 b4@2 e4@4 [d4,g4]@3 ~, d4@3 ~@5", AN: "g4@2 b4@2 ~@2 b4@2 [e4,b4]@4 d4@3 ~, d4@3 ~@5, ~ g4 ~@2",
  AO: "e4@4 f#4@4 c5@2 ~@2 g4@3 ~", AP: "g4@5 ~ d4@2", AQ: "e4@4 f#4@4 a4@4 g4@3 ~", AR: "e4@3 ~ e4@7 ~ b4@4",
  AS: "g4 ~ [d4,g4,b4] [g4,b4] [d4,g4,b4] ~@3", // G
})).s("gm_electric_guitar_jazz").gain(0.44).pan(0.4)

// bass · electric bass finger
const bass = note(`<
  ~ A B C D E F G F H I J K L K M N@2 I J O L K P Q R S T U V W X Y Z AA AB AC AD AE AF AG AH AI AJ AK AL AM AN AO AP@2
  AQ N AR N AS AT AU AV AW AX AY AZ BA BB BC BD BE N BF H AN BG A B E F H I J K L K M N@2 I J O L K P AB BH BI AF BJ
>`.pickRestart({
  A: "g1@4 ~@2 g1 ~ e1@2 ~@2 d1 ~@3", B: "g1@5 ~ g1 ~ e1@3 ~ d1@2 ~@2", C: "g1@3 ~ g1 ~ g1 ~ e1@3 ~ d1@2 ~@2",
  D: "g1@5 ~ g1 ~ e1@3 ~ d1 ~@3", E: "g1 ~ g1 ~ g1 ~ g1 ~ e1@2 ~@2 d1 ~@3", F: "g1 ~ g1 ~ g1 ~ g1 ~ e1@2 ~@2 d1@2 ~@2",
  G: "g1@3 ~ g1 ~ g1 ~ e1@2 ~@2 d1 ~@3", H: "g1@4 ~@2 g1 ~ d1@4 ~@4", I: "g1@4 ~@2 g1 ~ d1@2 ~@2 e1 ~@3",
  J: "g1@4 ~@2 g1 ~ b1 ~@3 c2 ~@3", K: "d2@4 ~@2 d2 ~ a1@2 ~@6", L: "d2@4 ~@2 d2 ~ a1 ~@3 c2@2 ~@2",
  M: "d2@7 ~ e1@2 ~@2 f#1@2 ~@2", N: "g1@4 ~@2 g1 ~ d1@3 ~@5", O: "d2@4 ~@2 d2 ~ a1@2 ~@2 a1@2 ~@2",
  P: "d2@5 ~ d2 ~ e1@2 ~@2 f#1@2 ~@2", Q: "g1@4 ~@2 g1 ~ d1@2 ~@2 d1@2 ~@2", R: "g1@3 ~ f1 ~ f1 ~",
  S: "e2@5 ~@3 d2@2 ~@2 b1@2 ~@2", T: "c2@6 ~@2 g1@5 ~@3", U: "c2@3 ~ c2@2 ~@2", V: "g1@5 ~ g1 ~ d1@4 ~@4",
  W: "a1@5 ~ a1 ~ e1@3 ~@5", X: "a1@4 ~@2 a1 ~ e1@3 ~ a1@2 ~@2", Y: "d2 ~@3 d2 ~ d2 ~ d2 ~@7",
  Z: "g1@4 ~@2 g1 ~ d1@5 ~@3", AA: "g1@4 ~@2 g1 ~ d1@2 ~@2 f#1@2 ~@2", AB: "g1@4 ~@2 g1 ~ b1@2 ~@2 c2@2 ~@2",
  AC: "d2@4 ~@2 d2@2 a1 ~@3 c2 ~@3", AD: "d2@4 ~@2 d2 ~ a1@4 ~@4", AE: "d2@4 ~@2 d2 ~ a1@6 ~@2",
  AF: "d2@4 ~@2 d2 ~ e1@2 ~@2 f#1@2 ~@2", AG: "g1@3 ~@3 g1 ~ g1 ~@7", AH: "c2@4 ~@2 c2 ~ g1@3 ~@5",
  AI: "c2@4 ~@2 c2@2 g1 ~@3 b1 ~@3", AJ: "c2@6 ~@2 e1@2 ~@2 f#1 ~@3", AK: "g1@4 ~@2 g1 ~ d1 ~@3 d1 ~@3",
  AL: "g1@5 ~ g1 ~ d1@2 ~@6", AM: "g1@4 ~@2 g1 ~ d1@2 ~@6", AN: "g1@5 ~ g1 ~ a1@2 ~@2 b1@2 ~@2",
  AO: "c2@4 ~@2 c2 ~ g1 ~@3 g1@2 ~@2", AP: "c2@5 ~@3 g1@4 ~@4", AQ: "c2@3 ~ e1 ~ f#1 ~", AR: "g1@5 ~ g1 ~ d1@3 ~@5",
  AS: "g1@4 ~@2 g1 ~ a1@2 ~@2 b1 ~@3", AT: "c2@5 ~@3 g1@2 ~@2 g1 ~@3", AU: "c2@3 ~ a#1@2 ~@2",
  AV: "a1@6 ~@2 g1 ~@3 e1@2 ~@2", AW: "f1 ~ c2 ~", AX: "f1@4 ~@2 f1 ~ c2@4 ~@4", AY: "c2 ~ g1 ~",
  AZ: "d2@5 ~@3 a1@4 ~@4", BA: "d1@5 ~@3 f#1@2 ~@2 a1@2 ~@2", BB: "g1 ~@3 g1 ~ g1 ~ g1 ~@7", BC: "c2@5 ~@3 g1@6 ~@2",
  BD: "c2@5 ~@3 g1@5 ~@3", BE: "c2@5 ~@3 e1 ~@3 f#1@2 ~@2", BF: "g1@5 ~@3 d1@4 ~@4",
  BG: "c2 ~@3 d1@4 f1 ~ d1@2 f1@2 f#1 ~", BH: "d2@3 ~ a1@2 ~@2", BI: "d2@2 ~ d2 a1@2 ~@2",
  BJ: "g1@2 ~@2 g1 ~ g1 ~ g1 ~@7",
})).s("gm_electric_bass_finger").gain(0.3)

// chords · acoustic guitar steel
const acoustic_guitar_steel = note(`<
  ~ A@11 B@4 A@4 B@4 A C@2 D E F G H I A@3 B@4 A J@3 A@4 J@4 A@4 J K@2 L M N O P Q J@3 A@4 R A@7 B@4 A@4 B@4 A B@3 S
>`.pickRestart({
  A: "[g3,b3,d4,g4]@2 [g3,b3,d4,g4] ~ [g3,b3,d4,g4]@2 [g3,b3,d4,g4]@2 [a3,c4,e4,a4]@2 ~@2 [g3,b3,d4,g4]@2 ~@2", // G Am G
  B: "[f#3,a3,d4,f#4]@2 [f#3,a3,d4,f#4] ~ [f#3,a3,d4,f#4]@2 [f#3,a3,d4,f#4]@2 [g3,b3,e4,g4]@2 ~@2 [f#3,a3,d4,f#4]@2 ~@2", // D Em D
  C: "[g3,b3,d4,f4]@2 [g3,d4,f4] ~ [g3,b3,d4,f4]@2 [g3,b3,d4,f4,g4]@3 ~ [g3,b3,d4,f4]@2 [g3,b3,d4,f4,g4]@2 [g3,b3,d4,f4]@2, ~ [b3,g4] ~@6", // G7 Em
  D: "[e3,g3,c4,e4]@2 [g3,c4,e4] ~ [e3,g3,c4,e4]@2 [e3,g3,c4,e4,g4]@3 ~ [e3,g3,c4,e4]@2 [e3,g3,c4,e4,g4]@2 [e3,g3,c4,e4]@2, ~ [e3,g4] ~@6", // C Em
  E: "[d#3,g3,c4,d#4]@2 [g3,c4,d#4] ~ [d#3,g3,c4,d#4]@2 [d#3,g3,c4,d#4,g4]@3 ~ [d#3,g3,c4,d#4]@2 [d#3,g3,c4,d#4,g4]@2 [d#3,g3,c4,d#4]@2, ~ [d#3,g4] ~@6", // Cm D#
  F: "[g3,b3,d4,g4]@2 [g3,b3,d4,g4] ~ [g3,b3,d4,g4]@2 [g3,b3,d4,g4]@3 ~ [g3,b3,d4,g4]@2 [g3,b3,d4,g4]@2 [g3,b3,d4,g4]@2", // G
  G: "[e3,a3,c#4,e4]@2 [e3,c#4,e4] ~ [e3,a3,c#4,e4]@2 [e3,a3,c#4,e4,g4]@3 ~ [e3,a3,c#4,e4]@2 [e3,a3,c#4,e4,g4]@2 [e3,a3,c#4,e4]@2, ~ [a3,g4] ~@6", // A C#m A A7 A A7 A A7
  H: "[e3,a3,c4,e4]@2 [e3,c4,e4] ~ [e3,a3,c4,e4]@2 [e3,a3,c4,e4,g4]@3 ~ [e3,a3,c4,e4]@2 [e3,a3,c4,e4,g4]@2 [a3,c4]@2, ~ [a3,g4] ~@6", // Am C Am Am7 Am Am7 Am A7
  I: "~@4 [d3,a3,d4,f#4]@2 [d3,a3,d4,f#4] ~ [d3,a3,d4,f#4]@2 ~@6", // D
  J: "[g3,c4,e4,g4]@2 [g3,c4,e4,g4] ~ [g3,c4,e4,g4]@2 [g3,c4,e4,g4]@2 [a3,d4,f4,a4]@2 ~@2 [g3,c4,e4,g4]@2 ~@2", // C Dm C
  K: "[a#3,c4,e4,g4]@2 [a#3,c4,e4,g4] ~ [a#3,c4,e4,g4]@2 [a#3,c4,e4,g4]@3 ~ [a#3,c4,e4,g4]@2 [a#3,c4,e4,g4]@2 [a#3,c4,e4,g4]@2", // C7
  L: "[a3,c4,f4,a4]@2 [a3,c4,f4,a4] ~ [a3,c4,f4,a4]@2 [a3,c4,f4,a4]@3 ~ [a3,c4,f4,a4]@2 [a3,c4,f4,a4]@2 [a3,c4,f4,a4]@2", // F
  M: "[g#3,c4,f4,g#4]@2 [g#3,c4,f4,g#4] ~ [g#3,c4,f4,g#4]@2 [g#3,c4,f4,g#4]@3 ~ [g#3,c4,f4,g#4]@2 [g#3,c4,f4,g#4]@2 [g#3,c4,f4,g#4]@2", // Fm
  N: "[g3,c4,e4,g4]@2 [g3,c4,e4,g4] ~ [g3,c4,e4,g4]@2 [g3,c4,e4,g4]@3 ~ [g3,c4,e4,g4]@2 [g3,c4,e4,g4]@2 [g3,c4,e4,g4]@2", // C
  O: "[a3,d4,f#4,a4]@2 [a3,f#4,a4] ~ [a3,d4,f#4,a4]@2 [a3,c4,d4,f#4,a4]@3 ~ [a3,d4,f#4,a4]@2 [a3,c4,d4,f#4,a4]@2 [a3,d4,f#4,a4]@2, ~ [c4,d4] ~@6", // D D7 D D7 D Csus2
  P: "[a3,d4,f4,a4]@2 [a3,f4,a4] ~ [a3,d4,f4,a4]@2 [a3,c4,d4,f4,a4]@3 ~ [a3,d4,f4,a4]@2 [a3,c4,d4,f4,a4]@2 [d4,f4]@2, ~ [c4,d4] ~@6", // Dm Dm7 Dm Dm7 Dm Csus2
  Q: "~@4 [g3,d4,g4,b4]@2 [g3,d4,g4,b4] ~ [g3,d4,g4,b4]@2 ~@6", R: "[g3,c4,e4,g4] ~@7",
  S: "[g3,b3,d4,g4]@2 ~@2 [g3,b3,d4,g4] ~ [g3,b3,d4,g4]@2 [g3,b3,d4,g4]@2 ~@6", // G
})).s("gm_acoustic_guitar_steel").gain(0.25).pan(0.7)

// chords · string ensemble 1
const string_ensemble_1 = note("<~@25 A@5 B@2 ~@25 C@5 D@2 ~@33>".pickRestart({
  A: "[[b3,f5]@2 e5 d#5 [b3,d5], g4, ~@2 c4@2 ~]/5", B: "[c#5@8 c5@7 ~, [a3,e4]@15 ~]/2",
  C: "[[e4,a#5]@2 a5 g#5 [e4,g5], c5, ~@2 f4@2 ~]/5", D: "[f#5@8 f5@7 ~, [d4,a4]@15 ~]/2",
})).s("gm_string_ensemble_1").gain(0.16)

// drums · kick
const kick = s("bd").struct("<~ A@31 B A@31 B A@7 C A@23 B>".pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x!2", C: "x",
})).gain(0.25)

// drums · clap
const clap = s("cp").struct("<~@73 [~@2 x!2 ~@2 x ~]!23 ~>").gain(0.25)

// drums · snare
const snare = s("sd").struct("<~@9 A@23 B A@8 C@16 A@7 ~ A@7 ~ C@23 B>".pickRestart({
  A: "~ x ~@2", B: "~@2 x!3 ~@3", C: "~ x ~ x",
})).gain(0.3)

// drums · hihat
const hihat = s("hh").struct("<~@25 [x!4]!7 [x ~ x!3 ~@3] ~@24 [x!4]!7 [x ~ x!3 ~@3] ~@31 [x ~ x!3 ~@3]>").gain(0.25)

// drums · mid tom
const mid_tom = s("mt").struct("<~@64 [~@2 x!3 ~@3] ~@32>").gain(0.3)

// drums · ride
const ride = s("rd").struct("<~@9 A@16 B@7 ~ A@24 B@7 ~ A@7 C A@23 ~>".pickRestart({
  A: "x!4", B: "x!8", C: "x",
})).gain(0.25)

// drums · tambourine
const tambourine = s("tb").struct("<~@5 A@27 B A@31 ~ A@7 ~ A@23 C>".pickRestart({
  A: "~ x ~ x", B: "~ x ~@2", C: "~ x!2 ~",
})).gain(0.25)

// drums · shaker
const shaker = s("sh").struct("<~@5 A@20 ~@8 A@24 ~@8 A@7 B A@23 ~>".pickRestart({
  A: "x!8", B: "x ~@3 x!12",
})).gain(0.25)

stack(
  electric_guitar_jazz, bass, acoustic_guitar_steel, string_ensemble_1, kick, clap, snare, hihat, mid_tom, ride,
  tambourine, shaker
)