// La Copa de la Vida (Spanish) — Ricky Martin
// 120 bpm, 4/4, key C minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 128 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(120/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 · brass section
const brass_section = note(`<
  ~@2 A B C D E B C D F G H I J G H I J ~@4 K ~ L M ~@5 N ~@2 O P Q ~@3 K ~ L M R H I J S ~@3 K ~ L M ~@5 N ~@2 O P Q
  ~@3 K ~ L M ~@2 T U V W T U V W X Y Z AA X Y Z AA ~@5 N ~@2 O P Q ~@3 K ~ L M K ~ L M K ~ L A B C D E B C D F AB
>`.pickRestart({
  A: "~@15 e5", B: "g5@15 f5", C: "ab5@15 g5", D: "bb5@12 ab5@3 [ab5,bb5]", E: "g5@15 e5",
  F: "~@12 [g4,ab4] [a4,bb4,b4] [c5,db5,d5] [eb5,e5,f5], g5@15 ~", G: "g5 ~ g5 ~ g5 ~@2 eb5, gb5 ~@3 gb5 ~@3 gb5 ~@7",
  H: "f5 ~ f5 ~ ab5@2 f5 g5@3 ~@6", I: "g5@2 ~@2 [f5,gb5] ~@3 g5@2 ~@4 d5@2, gb5 ~@3 g5@2 ~@2 gb5 ~@7",
  J: "[eb5,f5] ~ f5 ~ eb5@2 d5 eb5@3 c5@6", K: "~@3 g5@2 ~ g5 ~@4 g5@3 g5 ~", L: "~@3 g5@2 ~ g5 ~@4 g5@2 ~ g5 ~",
  M: "~@10 g5 ~ g5@2 ~@2", N: "~@10 g5 ~ g5 ~@3", O: "[g4,g5]!2 ~ [g4,g5]!2 ~ [g4,g5]!2 ~ [g4,g5]!2 ~@5",
  P: "[g4,g5]!2 ~ [g4,g5]!2 ~ [g4,g5]!2 ~ [g4,g5]!2 ~ [g4,ab4] [a4,bb4,b4] [c5,db5,d5] [eb5,e5,f5]", // G Abmaj7
  Q: "[g5,g6] ~@7, gb5 ~@15", R: "g5 ~ g5 ~ g5 ~@2 eb5, ~@4 gb5 ~@3 gb5 ~@7", S: "gb5 ~@15",
  T: "g4@2 ~ b4 ~@2 d5@2 ~@2 f5 ~ eb5 ~ d5 ~", U: "c5 ~@2 eb5 ~@2 g5@2 ~@8", V: "g4@2 ~ b4 ~@2 d5@3 ~ f5@2 eb5 ~ d5 ~",
  W: "c5 ~@7", X: "g5!2 ~ [b4,g5] g5 ~ g5!2 ~ g5 [f5,g5] ~ [eb5,g5] ~ [d5,g5] ~, g4 ~@2 d5 ~@4",
  Y: "[c5,f5,g5] g5 ~ [eb5,g5] g5 ~ g5!2 ~ g5!2 ~ g5 ~@3", // Csus4 Eb
  Z: "[g4,g5]!2 ~ [g4,b4,g5] [g4,g5] ~ [g4,g5]!2 ~ [g4,g5]!2 ~ [g4,eb5,g5] ~ [g4,d5,g5] ~, ~@6 d5@3 ~ f5@2 ~@4", // G Cm G5
  AA: "[g4,g5]!2 ~ [g4,g5]!2 ~ g5!2 ~ [g4,g5] g5 ~ [g4,g5] ~@3, c5 ~@2 g4 ~@4", AB: "[gb5,d6] d6 ~@14, [c5,c6]@3 ~@13",
})).s("gm_brass_section").gain(0.64)

// other · trombone
const trombone = note(`<
  ~@2 A B C D E B C D F G H I J G H I J ~@4 K ~ L M ~@5 N ~@2 O P Q ~@3 K ~ L M R H I J S ~@3 K ~ L M ~@5 N ~@2 O P Q
  ~@3 K ~ L M ~@2 T U V W T U V W X Y Z AA X Y Z AA ~@5 N ~@2 O P Q ~@3 K ~ L M K ~ L M K ~ L A B C D E B C D F AB
>`.pickRestart({
  A: "~@15 e3", B: "g3@15 f3", C: "ab3@15 g3", D: "bb3@12 ab3@3 [ab3,bb3]", E: "g3@15 e3",
  F: "~@12 [g2,ab2] [a2,bb2,b2] [c3,db3,d3] [eb3,e3,f3], g3@15 ~", G: "g3 ~ g3 ~ g3 ~@2 eb3, gb3 ~@3 gb3 ~@3 gb3 ~@7",
  H: "f3 ~ f3 ~ ab3@2 f3 g3@3 ~@6", I: "g3@2 ~@2 [f3,gb3] ~@3 g3@2 ~@4 d3@2, gb3 ~@3 g3@2 ~@2 gb3 ~@7",
  J: "[eb3,f3] ~ f3 ~ eb3@2 d3 eb3@3 c3@6", K: "~@3 g3@2 ~ g3 ~@4 g3@3 g3 ~", L: "~@3 g3@2 ~ g3 ~@4 g3@2 ~ g3 ~",
  M: "~@10 g3 ~ g3@2 ~@2", N: "~@10 g3 ~ g3 ~@3", O: "[g2,g3]!2 ~ [g2,g3]!2 ~ [g2,g3]!2 ~ [g2,g3]!2 ~@5",
  P: "[g2,g3]!2 ~ [g2,g3]!2 ~ [g2,g3]!2 ~ [g2,g3]!2 ~ [g2,ab2] [a2,bb2,b2] [c3,db3,d3] [eb3,e3,f3]", // G Abmaj7
  Q: "[g2,g3]@3 ~@13, gb3 ~@15", R: "g3 ~ g3 ~ g3 ~@2 eb3, ~@4 gb3 ~@3 gb3 ~@7", S: "gb3 ~@15",
  T: "g2@2 ~ b2 ~@2 d3@2 ~@2 f3 ~ eb3 ~ d3 ~", U: "c3 ~@2 eb3 ~@2 g3@2 ~@8", V: "g2@2 ~ b2 ~@2 d3@3 ~ f3@2 eb3 ~ d3 ~",
  W: "c3 ~@7", X: "g3!2 ~ [b2,g3] g3 ~ g3!2 ~ g3 [f3,g3] ~ [eb3,g3] ~ [d3,g3] ~, g2 ~@2 d3 ~@4",
  Y: "[c3,f3,g3] g3 ~ [eb3,g3] g3 ~ g3!2 ~ g3!2 ~ g3 ~@3", // Csus4 Eb
  Z: "[g2,g3]!2 ~ [g2,b2,g3] [g2,g3] ~ [g2,g3]!2 ~ [g2,g3]!2 ~ [g2,eb3,g3] ~ [g2,d3,g3] ~, ~@6 d3@3 ~ f3@2 ~@4", // G Cm G5
  AA: "[g2,g3]!2 ~ [g2,g3]!2 ~ g3!2 ~ [g2,g3] g3 ~ [g2,g3] ~@3, c3 ~@2 g2 ~@4", AB: "[gb3,d4] d4 ~@14, [c3,c4]@3 ~@13",
})).s("gm_trombone").gain(0.64)

// chords · brass section
const brass_section_2 = note("<~@7 A B C D ~@112 A B C D ~>".pickRestart({
  A: "[c4,e4]@15 d4", B: "[db4,f4]@15 e4", C: "g4@12 [db4,f4]@3 [f4,g4], eb4@15 ~", D: "[c4,e4]@15 ~",
})).s("gm_brass_section").gain(0.57)

// other · trumpet
const trumpet = note("<~@3 A B C D A B C E ~@108 A B C D A B C E ~>".pickRestart({
  A: "g5@15 f5", B: "ab5@15 g5", C: "bb5@12 ab5@3 [ab5,bb5]", D: "g5@15 e5", E: "g5@15 ~",
})).s("gm_trumpet").gain(0.64)

// bass · electric bass finger
const bass = note(`<
  ~@11 A B A@3 B A@3 B A@3 B A@2 C D E F G@2 H I J K A B A@3 B A@2 ~@4 A B A@3 B A@2 C D E F G@2 H I J K A B A@3 B A@2
  ~@5 L M N O P M N O P M N O P C D E F G@2 H I J K A B A@3 B A@3 B A@3 B A Q ~@8 R
>`.pickRestart({
  A: "c2@2 ~ c2@3 eb2@2 c2@2 ~ c2@3 eb2@2", B: "c2@2 ~@2 c2@2 eb2@2 c2@2 ~ eb2@5",
  C: "g1@2 ~ d2@2 ~ d2@2 g1@2 ~ d2@3 d2@2", D: "c2@3 eb2@2 ~ eb2@2 c2@3 eb2@3 eb2@2",
  E: "f1@2 ~ c2@2 ~ c2@2 f1@3 ~ b1 ~ c2 ~, ~@11 c2@3 ~@2", F: "c2@2 ~ eb2@2 ~ eb2@2 c2@3 eb2@2 ~ eb2@2",
  G: "[g1@2 ~ d2@2 ~ d2@2 g1@3 d2@3 ~@2 c2@3 eb2@3 eb2@2 c2@3 eb2@3 eb2@2, ~@15 d2@2 ~@15]/2",
  H: "f1@2 ~ c2@2 ~ c2@2 f1@3 c2@2 ~ c2@2", I: "g1@2 ~ b1@3 d2@2 g1@3 d2@2 ~ d2@2",
  J: "g1@3 d2@2 ~ d2@2 g1@3 d2@2 ~ d2@2", K: "g1@3 b1@3 d2@2 g1@3 b1@3 d2@2", L: "~@8 c3 bb2 ~ g2 ~ f2 eb2 ~",
  M: "g1@2 ~ b1 ~@2 d2@2 ~@2 f2 ~ eb2 ~ d2 ~", N: "c2 ~@2 eb2 ~@2 g2@2 ~@8", O: "g1@2 ~ b1 ~@2 d2@3 ~ f2@2 eb2 ~ d2 ~",
  P: "c2 ~@7", Q: "c2@2 ~ c2@3 eb2@2 c2@2 ~ c2@3 c2@2", R: "c2 ~@3",
})).s("gm_electric_bass_finger").gain(0.56)

// other · accordion
const accordion = note("<~@11 A@16 ~@10 A@8 ~@4 A@8 ~@10 A@8 ~@28 A@16 ~@9>".pickRestart({
  A: "~ c4 ~ c4 c3@2 [eb4,g4]@2 c3 c4 ~ c4 c3@2 [eb4,g4]@2, c3 ~@7", // Eb
})).s("gm_accordion").gain(0.36)

// other · piano
const piano = note(`<
  ~@27 A B C D E F G H I J K ~@19 A B C D E F G H I J K ~@25 A B C D E F G H I J K ~@24
>`.pickRestart({
  A: "[d4,d5]@2 [bb3,b3] ~ [ab4,ab5]@2 [b3,b4] [g4,g5]@2 [b3,b4]@2 [d4,d5] [ab4,ab5]@2 [b3,b4]@2, ~@2 b4@2 ~@3 ab4 ~@8", // D Bmaj7 Ab B G B D Ab …
  B: "[g4,g5]@2 [c4,c5]@2 [ab4,ab5]@2 [c4,c5] [g4,g5]@2 [c4,c5]@2 eb4 [ab4,ab5]@2 [c4,c5]@2, ~@4 db4 ~@6 eb5@2 ~@3", // G C Ab C G C Ab C
  C: "[ab4,ab5]@2 [c4,c5]@2 [f4,f5]@2 [c4,c5] [ab4,ab5]@2 [c4,c5]@2 [f4,f5] [ab4,ab5]@2 [c4,c5]@2", // Ab C F C Ab C F Ab …
  D: "[g4,g5]@2 [c4,c5]@2 [ab4,ab5]@2 [c4,c5] [g4,g5]@2 [c4,c5]@2 [eb4,eb5] [ab4,ab5]@2 [c4,c5]@2", // G C Ab C G C Eb Ab …
  E: "[d4,d5]@2 [b3,b4]@2 [ab4,ab5]@2 [b3,b4] [g4,g5]@2 [b3,b4]@2 [d4,d5] [ab4,ab5]@2 [b3,d5]@2", // D B Ab B G B D Ab …
  F: "[eb4,eb5]@2 [c4,c5]@2 [ab4,ab5]@2 [c4,c5] [g4,g5]@2 [c4,c5]@2 [eb4,eb5] [g4,g5]@2 [c4,c5]@2", // Eb C Ab C G C Eb G …
  G: "[ab4,ab5]@2 [c4,c5]@2 [f4,f5]@2 [b3,c4,c5] [ab4,ab5]@2 [c4,c5]@2 [f4,f5] ab4@2 [c4,c5]@2, ~@3 ab5", // Ab C F Cmaj7 Ab C F C
  H: "[d4,d5]@2 [b3,b4]@2 [ab4,ab5]@2 [b3,b4] [g4,g5]@2 [b3,b4]@2 [d4,d5] [g4,g5]@2 [b3,b4]@2, ~@2 bb3 ~@13", // D B Ab B G B D G …
  I: "[d4,d5]@2 [b3,b4]@2 [ab4,ab5]@2 [b3,b4] [g4,g5]@2 [b3,b4]@2 [d4,d5] [g4,g5]@2 [b3,b4]@2", // D B Ab B G B D G …
  J: "[d4,d5]@2 [b3,b4]@2 [ab4,ab5]@2 b4 [g4,g5]@2 b3@2 d4 [d6,e6,f6,g6,a6,b6,c7] [f5,g5,a5,b5,c6] [g4,a4,b4,c5,d5,e5] [a3,b3,c4,d4,e4,f4], ~@6 b3@2 ~ b4 ~@6", // D B Ab G Dm7 F Cmaj7 Dm7
  K: "g3 ~@15",
})).s("gm_piano").gain(0.43)

// other · lead 2 sawtooth
const lead_2_sawtooth = note(`<
  ~@19 A B A@3 B A@2 C D E F G@2 H I J K A B A@3 B A@2 ~@4 A B A@3 B A@2 C D E F G@2 H I J K A B A@3 B A@2 ~@18 C D E F
  G@2 H I J K A B A@3 B A@3 B A@3 B A@2 ~@9
>`.pickRestart({
  A: "c3@2 ~ c3@3 eb3@2 c3@2 ~ c3@3 eb3@2", B: "c3@2 ~@2 c3@2 eb3@2 c3@2 ~ eb3@5",
  C: "g2@2 ~ d3@2 ~ d3@2 g2@2 ~ d3@3 d3@2", D: "c3@3 eb3@2 ~ eb3@2 c3@3 eb3@3 eb3@2",
  E: "f2@2 ~ c3@2 ~ c3@2 f2@3 ~ b2 ~ c3 ~, ~@11 c3@3 ~@2", F: "c3@2 ~ eb3@2 ~ eb3@2 c3@3 eb3@2 ~ eb3@2",
  G: "[g2@2 ~ d3@2 ~ d3@2 g2@3 d3@3 ~@2 c3@3 eb3@3 eb3@2 c3@3 eb3@3 eb3@2, ~@15 d3@2 ~@15]/2",
  H: "f2@2 ~ c3@2 ~ c3@2 f2@3 c3@2 ~ c3@2", I: "g2@2 ~ b2@3 d3@2 g2@3 d3@2 ~ d3@2",
  J: "g2@3 d3@2 ~ d3@2 g2@3 d3@2 ~ d3@2", K: "g2@3 b2@3 d3@2 g2@3 b2@3 d3@2",
})).s("gm_lead_2_sawtooth").gain(0.35)

// drums · kick
const kick = s("bd").struct("<~ [x!4]!126 x>").gain(0.56)

// drums · snare
const snare = s("sd").struct("<~ [~@3 x ~@2 x ~@4 x ~@2 x ~]!126 ~>").gain(0.72)

// drums · hihat
const hihat = s("hh").struct("<[x!4] [x!8]!126 ~>").gain(0.64)

// drums · low tom
const low_tom = s("lt").struct("<~@126 [~@7 x] ~>").gain(0.72)

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

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

// drums · crash
const crash = s("cr").struct("<~ x ~@125 x>").gain(0.64)

// drums · bongos
const bongos = s("bongo:18").struct(`<
  ~
  [x ~ x!2 ~@2 x ~@3 x ~ x ~@3]!44
  [~@2 x!2 ~@2 x ~@3 x ~ x ~@3]
  [x ~ x!2 ~@2 x ~@3 x ~ x ~@3]!81
  ~
>`).gain(1.47)

// drums · congas
const congas = s("conga:13").struct("<~@2 [~@4 x ~@6 x ~@4]!125 ~>").gain(1.54)

// drums · congas
const congas_2 = s("conga:18").struct("<~ [~ x ~@2 x ~@2 x ~ x ~ x ~@4] [~ x ~@5 x ~ x ~@6]!125 ~>").gain(1.54)

// drums · congas
const congas_3 = s("conga:33").struct("<~ [~@7 x]!126 ~>").gain(1.54)

// drums · agogo bells
const agogo_bells = s("agogo:2").struct("<~@45 x ~@82>").gain(3.57)

// drums · agogo bells
const agogo_bells_2 = s("agogo:4").struct("<~ [x!2 ~@6 x ~@7]!44 [~ x ~@6 x ~@7] [x!2 ~@6 x ~@7]!81 ~>").gain(3.57)

// drums · woodblocks
const woodblocks = s("woodblock:5").struct("<~ [~@3 x ~@2 x ~@4 x ~@2 x ~]!126 ~>").gain(0.81)

// drums · shaker
const shaker = s("sh").struct("<~ [x!16]!126 ~>").gain(0.32)

stack(
  brass_section, trombone, brass_section_2, trumpet, bass, accordion, piano, lead_2_sawtooth, kick, snare, hihat,
  low_tom, mid_tom, high_tom, crash, bongos, congas, congas_2, congas_3, agogo_bells, agogo_bells_2, woodblocks, shaker
)