// pokemon theme — Jason Paige
// 142 bpm, 4/8, key Bb major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Transcription provider: pdmx. https://musescore.com/score/2690616; license: https://creativecommons.org/publicdomain/mark/1.0/
// note: Full arrangement: all 73 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(142/2)

// 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 · "Piano, Keyboard"
const piano = note(`<
  A@2 B@2 A@2 B@2 A@2 B@2 C@2 D@2 E F B@2 A@2 B@2 A@2 B@2 C@2 D@2 E F B@2 G@2 H@2 G@2 I@2 G@2 J@2 K@4 L@2 M@2 L@2 N@2
  O@2 P@2 Q@3 R@2 S T U ~
>`.pickRestart({
  A: "[g4,bb4,d5]!4", B: "[f4,a4,d5]!4", C: "[g4,bb4,eb5]!4", D: "[f4,bb4,d5]!4", E: "[f4,bb4,d5]!3 [g4,c5,d5]",
  F: "[g4,c5,d5]!2 [f4,a4,d5]!2", G: "[[bb3,eb4]@2 bb3 [bb3,eb4]@2 bb3 bb3@2, ~@5 eb4@2 ~]/2",
  H: "[[bb3,d4]@2 bb3 [bb3,d4]@2 bb3 bb3@2, ~@5 d4@2 ~]/2", I: "[[c4,f4]@2 c4 [c4,f4]@2 c4 c4@2, ~@5 f4@2 ~]/2",
  J: "[[a3,c4]@2 a3 [a3,c4]@2 a3 a3@2, ~@5 c4@2 ~]/2", // Am
  K: "[[bb3,d4]@8 bb3@4 [a3,c4]@8 c4@4 [a3,d4]@27 ~ bb3@4 d4@4 eb4@4]/4", // Bb Am D5
  L: "[[bb3,eb4]@2 bb3 [bb3,eb4]@2 eb4 eb4@2, ~@5 bb3@2 ~]/2", M: "[[a3,c4]@2 a3 [a3,c4]@2 c4 c4@2, ~@5 a3@2 ~]/2",
  N: "[[a3,c4]@2 c4 [a3,c4]@2 c4 c4@2, ~@5 a3@2 ~]/2", O: "[[bb3,eb4]@2 eb4 [bb3,eb4]@2 eb4 eb4@2, ~@5 bb3@2 ~]/2",
  P: "[[a3,d4]@2 d4 [a3,d4]@2 d4 d4@2, ~@5 a3@2 ~]/2", // D5
  Q: "[[bb3,d4]@8 bb3@4 [a3,c4]@8 c4@4 d4@11 ~@5 [d3,d4]@4 [d3,d4]@4, ~@24 a3@23 ~]/3", // Bb Am D
  R: "[[f3,f4]@4 [g3,bb3,g4]@4 d4@4 [g3,g4]@11 ~ [d3,d4]@4 [d3,d4]@4, ~@3 eb4 ~@4]/2", S: "[f3,f4] [g3,g4] ~ [bb3,bb4]",
  T: "[g3,g4] ~ [d3,d4] [f3,f4]", U: "[g3,g4]@15 ~",
})).s("gm_piano").gain(0.4)

// bass · electric bass pick · "Bass Guitar, Bass"
const bass = note(`<
  A@2 B@3 ~@2 C@2 ~ D@2 E ~ F ~ G@3 H@2 ~@2 C@2 ~ D@2 E ~ F ~ G@3 I J K L M J K N O P Q R S G@3 T J K N O P Q U S V W X
  Y G@3 T Z@3 AA@2
>`.pickRestart({
  A: "g3/2", B: "[~@3 bb2@2 d2 f2 g2@2 ~@3]/3", C: "[~ f2 d2 g1@2 ~@3]/2", D: "[~@3 f2@2 c2@2 eb2]/2", E: "eb2 ~",
  F: "bb1", G: "[bb1 c2 d2 ~]/3", H: "[~ d2 f2 g2@2 ~@3]/2", I: "~ d2 f2 bb1", J: "eb2@7 bb1", K: "eb2 ~ eb2@6",
  L: "bb1@7 f1", M: "bb1 ~ bb1@6", N: "f2@7 c2", O: "f2 ~ f2@6", P: "g1@7 d1", Q: "g1 ~ g1@6", R: "a1", S: "a1 ~ a1@6",
  T: "~ c2 bb1 eb2", U: "a1@7 f1", V: "c2@7 g1", W: "c2 ~ c2@6", X: "d2@7 a1", Y: "d2 ~ d2@6",
  Z: "[eb2@3 f2@3 g2@3 ~ g1!2]/3", AA: "[g1@5 ~@3]/2",
})).s("gm_electric_bass_pick").gain(0.4)

// chords · acoustic guitar steel · "Acoustic Guitar, Rythmn Guitar"
const acoustic_guitar_steel = note(`<
  ~@20 A@2 B@2 A@2 B@2 A@2 C D E F G H I J K L I M N O P Q N O R S T H I J N O P Q U V W X Y Z R S T AA AB@5
>`.pickRestart({
  A: "bb4!3 ~ bb4!3 ~, g4!2", B: "a4!3 ~ a4!3 ~, f4!2", C: "bb4!3 ~ d5!3 ~, f4 [f4,bb4]",
  D: "d5!3 ~ d5!3 ~, [f4,bb4]!2", E: "[f4,bb4,d5]!3 [e4,g4,c5]", F: "[e4,g4,c5]!2 [f4,a4,d5]!2", G: "[f4,a4,d5]!4",
  H: "[f4,a4,d5] [d4,a4,d5] [f4,a4,d5] [g4,bb4,eb5]", I: "[f4,f5] [bb3,bb4] [eb4,eb5] [f4,f5]",
  J: "[bb3,bb4] [eb4,eb5] [f4,f5] [bb3,bb4]", K: "[f4,f5] [bb3,bb4] [d4,d5] [f4,f5]",
  L: "[bb3,bb4] [d4,d5] [f4,f5] [bb3,bb4]", M: "[bb3,bb4] [eb4,eb5] [f4,f5] [c4,c5]",
  N: "[a4,a5] [c4,c5] [f4,f5] [a4,a5]", O: "[c4,c5] [f4,f5] [a4,a5] [c4,c5]", P: "[bb4,bb5] [d4,d5] [g4,g5] [bb4,bb5]",
  Q: "[d4,d5] [g4,g5] [bb4,bb5] [d4,d5]", R: "[d4,f4,bb4] [d4,f4] d4 [c4,eb4,g4]",
  S: "[c4,eb4] c4 [d4,gb4,a4] [d4,gb4]", T: "d4!2 [d4,gb4] [d4,gb4,a4]", U: "[c5,c6] [f4,f5] [a4,a5] [c5,c6]",
  V: "[f4,f5] [a4,a5] [c5,c6] [f4,f5]", W: "[g4,g5] [bb3,bb4] [eb4,eb5] [g4,g5]",
  X: "[bb3,bb4] [eb4,eb5] [g4,g5] [bb3,bb4]", Y: "[f4,f5] [d4,d5] [bb3,bb4] [f4,f5]",
  Z: "[d4,d5] [bb3,bb4] [f4,f5] [d4,d5]", AA: "[d4,gb4] d4 [d4,gb4] [eb4,g4,bb4]",
  AB: "[[eb4,g4,bb4]@3 [c4,f4,a4]@3 [g3,d4,g4]@3 ~ d4 f4 [f4,g4]@8, ~@11 d4@9]/5", // Eb F G5 Fsus2
})).s("gm_acoustic_guitar_steel").gain(0.4)

// chords · overdriven guitar · "Electric Guitar, Elec Guitar"
const overdriven_guitar = note(`<
  A@2 ~ B@2 ~@2 C@2 ~ D@2 E ~ F ~ G@3 H@2 I J K@2 I L@2 M N O P Q@3 R@4 S T@2 U V P W@2 U X@3 Y@4 Z T@2 U@2 AA@2 J@2
  AB@3 AC AD@3 AE@2
>`.pickRestart({
  A: "g2/2", B: "[~ d2 f2 g2@5]/2", C: "[~ f2 d2 g1@4 ~]/2", D: "[~@3 f2@2 c2@2 eb2]/2", E: "eb2@3 ~", F: "bb1@3 ~",
  G: "[bb1 c2 d2 ~]/3", H: "[~ d2 f2 ~ [d4,g4]@2 [d4,g4]@2, ~@3 g2@4 ~]/2", I: "[d4,g4]!2", J: "[d4,f4]!2",
  K: "[~ f2 d2 ~ [d4,g4]@2 [d4,g4]@2, [d4,f4]!2 ~@2, ~@3 g1@2 ~@3]/2", // G5 Dm
  L: "[[d4,f4]@2 ~@5 eb2, ~ [d4,f4] [d4,f4]!2, ~@3 f2@2 c2@2 ~]/2", M: "[eb2,bb3,eb4] [bb3,eb4]", N: "[bb3,eb4]!2",
  O: "[bb1,bb3,d4] [bb3,d4]", P: "[bb3,d4]!2", Q: "[bb3 d4 f4 c4 e4 g4 [a3,d4,f4]@3 ~@3, bb1@2 ~ c2@2 ~ d2@2 ~@4]/3",
  R: "[~@16 [g3,bb3]@8 ~@2 d4@3 ~@5 f4@3 ~@3 [g3,bb3]@6 ~@4 f4@3 ~@3 [f3,bb3]@8, ~@2 c2@2 bb1@2 eb2@4 ~@5 d4@3 ~ g4@2 ~@2 g4@3 ~@6, ~@3 d4@2 f4@2 g4@3 ~@2 [g3,bb3]@4 [g3,bb3]@4 ~@4 [f3,bb3]@4 ~@4]/4", // Gm Bb5 Gm Bb5
  S: "[f3,bb3]!2", T: "[g3,bb3]!2", U: "[a3,c4]!2", V: "~ d4 f4 g4, [a3,c4]!2",
  W: "[[bb3,d4]@2 g4 ~ [a3,c4]@2 [a3,c4]@2, g4 ~ [bb3,eb4]@2 ~@4, ~@3 f4@2 ~@3]/2", // Bb Am Eb5
  X: "[[bb3,d4] [c4,eb4] [d4,gb4]@2]/3", // Bb Cm D
  Y: "[~@6 d4@4 f4@3 ~@3 [g3,bb3]@8 ~@2 d4@3 ~@5 f4@3 ~@3 [g3,bb3]@6 ~@4 f4@3 ~@3 [f3,a3]@8, ~@7 g4@3 ~@2 [g3,bb3]@3 d4@3 ~ g4@2 ~@2 g4@3 ~@6, ~@4 [g3,bb3] ~ [f3,a3] ~]/4", // Gm F Gm F
  Z: "[f3,a3]!2", AA: "[c4,eb4]!2", AB: "[[bb3,d4]@3 [c4,eb4]@3 [d4,gb4]@3 ~ d4!2]/3", AC: "f4 g4@2 g4",
  AD: "[[eb3,g3,eb4]@3 [f3,a3,f4]@3 [d3,g3,g4]@3 ~ [g2,d3,d4] [g2,f3,f4]]/3", AE: "[[g2,g3,g4]@7 ~]/2",
})).s("gm_overdriven_guitar").gain(0.4)

// drums · kick
const kick = s("bd").struct(`<
  ~@2 A B ~@3 B ~@2 A B C ~ C ~ D E ~ B C B ~ B ~ B D B C A C ~ D E ~ F C G C G C G C G C G C G D H ~ B C G C G C G C G
  C G C G D H ~ B D F I C ~
>`.pickRestart({
  A: "~@3 x", B: "~ x ~ x", C: "x", D: "x ~@2 x", E: "~ x", F: "~ x!3", G: "x!2 ~@2", H: "~ x!2 ~", I: "x ~ x!2",
})).gain(0.4)

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

// drums · low tom
const low_tom = s("lt").struct("<~@2 A ~@18 B ~ B ~ B ~@5 C ~@3 D ~@15 A ~@15 E ~@2 F ~@2>".pickRestart({
  A: "~@2 x!2", B: "~@3 x", C: "~@6 x!2", D: "~ x ~@2", E: "~ x", F: "x",
})).gain(0.4)

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

// drums · mid tom
const mid_tom = s("mt").struct("<~ A B ~@18 C ~@3 C ~@5 D ~@2 E F ~@14 G H ~@14 G H ~ I ~@3>".pickRestart({
  A: "~ x!3", B: "~ x ~@2", C: "~ x", D: "~@2 x!4 ~@2", E: "~ x ~ x", F: "x", G: "~@3 x", H: "x!2 ~@2", I: "~@6 x!2",
})).gain(0.4)

// drums · open hat
const open_hat = s("oh").struct("<A ~@2 B ~@15 B ~@12 C D ~ B ~@8 A ~@4 D ~@2 A ~@12 D ~@2 C D E A ~>".pickRestart({
  A: "x", B: "~@3 x", C: "x ~@2 x", D: "~ x", E: "~@2 x!2",
})).gain(0.4)

// drums · high tom
const high_tom = s("ht").struct("<~@34 A ~@15 B ~@15 B ~@2 C ~@3>".pickRestart({
  A: "~ x", B: "~ x!2 ~", C: "~@4 x!2 ~@2",
})).gain(0.4)

// drums · crash
const crash = s("cr").struct("<A ~@6 B ~@2 C B A ~ A ~ D E ~@5 B ~@2 C B A C A ~@42>".pickRestart({
  A: "x", B: "~ x ~ x", C: "~@3 x", D: "x ~@2 x", E: "~ x",
})).gain(0.4)

// drums · ride bell
const ride_bell = s("rd").struct("<A ~@31 B C ~@10 A ~@4 C ~@15 C ~@2 B C D A ~>".pickRestart({
  A: "x", B: "x ~@2 x", C: "~ x", D: "~@2 x!2",
})).gain(0.4)

stack(
  piano, bass, acoustic_guitar_steel, overdriven_guitar, kick, snare, low_tom, hihat, mid_tom, open_hat, high_tom,
  crash, ride_bell
)