// Eis im Vulkan — Brunner & Brunner
// 114 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 100 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.

// chords · acoustic guitar steel · "M-Gesang"
const acoustic_guitar_steel = note(`<
  ~@25 A B C@2 D@2 E F G@2 H@2 I J K@2 ~@21 A B C@2 D@2 E F G@2 H@2 I J K@2 A B C@2 D@2 E F G@2 H@2 I J K@2 ~@6
>`.pickRestart({
  A: "[g3,b3]@3 [b3,d4]@3 [g3,b3]@2", B: "[f#3,a3]@7 [g3,b3]", C: "[[c4,e4] [c4,e4]@3 [b3,d4] [a3,c4]@2 [b3,d4]@9]/2",
  D: "[[g3,b3] [g3,b3]@2 [g3,b3]@3 [g3,e4] [a3,c4]@9]/2", E: "[f#3,a3]@3 [f#3,a3]@4 [b3,d4]",
  F: "[a3,c4] [g3,b3] [f#3,a3] [g3,b3]@5", G: "[[g3,b3]@3 [b3,d4]@3 [g3,b3] [f#3,a3]@8 [e3,g3]]/2",
  H: "[[c4,e4]@2 [c4,e4] [b3,d4]@2 [a3,c4]@2 [b3,d4]@9]/2", I: "[g3,b3]@3 [g3,b3]@4 [c4,e4]",
  J: "[b3,d4] [a3,c4] [g3,b3] [a3,c4]@5", K: "[[c4,e4]@3 [b3,d4]@3 [a3,c4] [b3,d4]@9]/2",
})).s("gm_acoustic_guitar_steel").gain(0.56)

// bass · acoustic bass · "M-Bass"
const bass = note(`<
  A B C D E F G H I B J K L A M N I B O P L A M Q R S T U V W X Y Z AA AB AC V W X AD V AE AF AG AH I B J K L A M N I B
  O P L A M Q R S T U V W X Y Z AA AB AC V W X AD V S T U V W X Y Z AA AB AC V W X AD V AI AJ AK AL@3
>`.pickRestart({
  A: "g2", B: "d2", C: "c2", D: "g2@7 b2", E: "c3", F: "g3@11 ~ g3@4", G: "e3@11 ~ e3@4", H: "d3@6 a2 d3", I: "g1",
  J: "a2@7 a2", K: "e2@11 ~ b1@4", L: "c2@3 e2", M: "a1@3 c2@4 e2", N: "d2@7 ~ d2@6 d2@2", O: "a2@13 ~ a2@2",
  P: "e2@3 b1", Q: "d2@5 ~ d2@7 ~ d2@2", R: "d2@6 e2@6 f#2@3 ~", S: "g2@5 ~ g2@10", T: "d2@5 ~ d2@2 a2@4 d2@4",
  U: "c2@3 c2@3 e2@2", V: "g2@5 ~ g2@2 d2@4 g2@4", W: "e2@3 e2 b1@2 e2@2", X: "a2@5 ~ a2@2 e2@4 a2@4",
  Y: "d2@3 d2 d2@2 e2 f#2", Z: "g2@5 ~ g2@6 d2@2 e2@2", AA: "g2@3 g2@3 g2@2", AB: "d2@3 d2 a2@2 d2@2",
  AC: "c2@6 c2 ~ c2@4 e2@4", AD: "d2@5 ~ d2@2 d2@4 e2@2 f#2@2", AE: "c2@3 c2 c2@4", AF: "g2@3 g2 d2@2 g2@2",
  AG: "c2@3 c2 c2@2 g2@2", AH: "d2@5 ~ d2@2 a2@8", AI: "g2@5 ~ g2 ~ g2@8", AJ: "d2@6 d2 ~ d2@7 ~",
  AK: "c2@6 c2@2 c2@7 ~", AL: "[g2@17 ~@7]/3",
})).s("gm_acoustic_bass").gain(0.56)

// chords · epiano2 · "M-Rhodes"
const epiano2 = note(`<
  A B C D E F G H I J K L M N O P Q J R L M S O T U V W X Y Z AA AB AC AD AE AF AG AH AI AJ AK AL AM AN AO I J K L M N O
  P Q J R L M S O T U V W X Y Z AA AB AC AD AE AF AG AH AI AJ AK AP W X Y Z AA AB AC AD AE AF AG AH AI AJ AK AQ AR AS
  AT@3
>`.pickRestart({
  A: "[g4,b4]@2 d4@2 g4@2 b4 ~ [b4,d5]@2 [g4,b4]@2 [d4,g4]@2 [g4,b4]@2, [g2,g3]@7 ~", // G Bm G G5 G
  B: "[f#4,a4] d4 f#4 a4 [f#4,d5] a4 f#4 d4, [d2,d3]@15 ~", // F#m D
  C: "[g4,c5] e4 ~ c5 [c5,e5] [g4,c5] g4 e4, [c2,c3]@15 ~, ~@4 g4@4 ~@4 e4 ~@3", // C5 C C5 C
  D: "[g4,b4] ~@2 b4 d5 b4 g4 d4, [g2,g3]@7 ~, ~ d4@4 ~@3, ~ g4 ~@2", // G
  E: "[g4,c5] ~@2 c5 ~ c5 g4 e4, [c2,c3]@7 ~, ~ e4@3 ~@4, ~ g4 e5 ~", // C5 C
  F: "[g4,b4] ~@2 b4 d5 b4 [g2,g3,g4,b4] d4, [g2,g3]@3 ~, ~ d4@5 ~@2, ~ g4 ~@2", // G
  G: "[g4,b4] ~@2 b4 ~@2 [e3,g4] e4, e2@15 ~, e3@5 b4@2 ~, ~ e4@5 ~@2, ~@2 g4@2 e5@3 ~", // G Em
  H: "[f#4,a4] ~@2 a4 ~@2 f#4 d4, [d2,d3], ~@2 d4@11 ~@3, ~@4 f#4@4 d5@7 ~, ~@5 a4@2 ~", // F#m D
  I: "b5 g5@2 d5@2 g5@2 b5, [g2,g3]@15 ~", J: "a5@2 f#5@4 c6@9 ~, [d2,d3]", K: "c6 a5@2 e5@2 a5 c6@2, [a2,a3]",
  L: "b5@2 g5@4 e5@9 ~, [e2,e3]", M: "e6 c6@2 g5@2 c6 e6 g6, [c2,c3]", N: "d6 b5@2 g5@5, [g2,g3]",
  O: "e5 c5 e5 a5 c6@2 e5@2, [a2,a3]", P: "c6@2 b5 a5@2 g5@2 e5, [d2,d3]", Q: "b5 g5@2 d5@2 g5@2 b5, [g2,g3]",
  R: "c6 a5@2 e5@2 a5@2 c6, [a2,a3]", S: "d6@2 b5@4 g5@9 ~, [g2,g3]", T: "~ f#5 g5 a5, [d2,d3,d5]",
  U: "[d2,d3,f#3,d4]@6 [e2,e3,g3,e4]@5 ~ [f#2,f#3,a3,f#4]@4", // D Em F#m
  V: "[g4,b4]@2 d4@2 g4@2 b4@2 d4@2 g4@2 b4@2 g4 ~, [g2,g3]@7 ~", W: "[f#4,a4] d4 f#4 a4 d4 a4 f#4 d4, [d2,d3]@15 ~",
  X: "[g4,c5]@2 e4@2 g4 ~ [g4,c5]@2 e4@2 [g4,c5]@2 e4@2 [g4,c5]@2, [c2,c3]@15 ~", // C5 C
  Y: "[g4,b4] d4 g4 b4 g4 d4 [g4,b4] d4, [g2,g3]@7 ~", // G
  Z: "[g4,b4]@2 e4@2 g4@2 [g4,b4] ~ [g4,b4]@2 e4 ~ e4@2 [g4,b4]@2, [e2,e3]@15 ~", // G E
  AA: "[a4,c5] e4 a4 c5 a4 e4 a4 e4, [a1,a2]@13 ~@3", // Am A
  AB: "[f#4,a4]@2 ~@2 f#4 ~ [f#4,a4] ~ [f#4,a4]@2 ~@4 a4@2, [d2,d3]@7 ~, ~ d4@2 ~@2 d4@3, ~@3 f#4", // F#m D
  AC: "[g4,b4]@2 d4@2 g4 ~ [g4,b4]@2 [g4,b4]@2 d4@2 [g4,b4]@2 d4 ~, [g2,g3]", // G
  AD: "[b4,d5]@2 [g4,b4]@2 [b4,d5]@2 g4 ~ [g4,b4]@2 d4@2 [g4,b4]@2 d4@2, [g2,g3]@4 [g2,g3]@3 ~", // Bm G Bm G
  AE: "[f#4,a4] d4 [f#4,a4] d4 [f#4,a4] d4 [f#4,a4] d4, [d2,d3]", // F#m D
  AF: "[g4,c5] e4 g4 [g4,c5] e4 [g4,c5] e4 g4, [c2,c3]@7 ~", // C5 C
  AG: "[g4,b4]@2 d4@2 g4 ~ [g4,b4]@2 d4@2 b4@2 g4@2 d4@2, [g2,g3]@15 ~", // G
  AH: "[g4,b4] e4 g4 [g4,b4] e4 [g4,b4] e4 [g4,b4], [e2,e3]@7 ~", // G E
  AI: "[a4,c5]@2 e4@2 a4 ~ [a4,c5]@2 [a4,c5]@2 e4@2 [a4,c5]@2 e4@2, [a2,a3]@13 ~@3", // Am A
  AJ: "[f#4,a4]@2 d4@2 f#4 ~ [f#4,a4]@2 d4@2 [f#4,a4]@2 d4@2 f#4@2, [d2,d3]@13 ~ a4 ~", // F#m D
  AK: "[g4,b4]@2 d4@2 g4 ~ [g4,b4]@2 d4@2 [g4,b4]@2 d4@2 [g4,b4]@2, [g2,g3]", // G
  AL: "[g3,e5,c6] ~ [e5,g5] ~ [c5,e5] ~ [g4,c5] ~ [e4,g4] ~ [e4,c5] ~ e5@2 c5@2, [e3,c4]@15 ~, ~@12 c5 ~ g4 ~", // C Em C C5 Em C
  AM: "d5@2 [g4,b4] ~ [d4,g4] ~ [g4,b4] ~ [b4,d5] ~ [b4,g5] ~ [b4,d5] ~ [g4,b4]@2, [d3,g3,b3]@15 ~, b4 ~@15", // G G5 G Bm Em Bm G
  AN: "[c5,e5] ~ [c5,e5] ~ [g4,c5] ~ [c5,e5] ~ g5@2 [c5,e5] ~ [g4,c5] ~ [c5,e5] ~, [g3,c4,e4]@15 ~, ~@8 e5 ~@7", // C C5 C C5 C
  AO: "[d5,f#5]@2 [a4,d5] ~ [d5,f#5] ~ [f#5,a5] ~ f#5@2 [a4,d5] ~ [a4,d5] ~ [d5,f#5] ~, [a3,d4,f#4], ~@8 d5 ~@7", // D D5 D F#m D5 D
  AP: "[g4,b4]@2 d4@2 g4@2 b4@2 d4@2 g4@2 b4@2 g4 ~, [g2,g3] ~@15", AQ: "[g1,b3,d4,g4], g2 ~@15",
  AR: "[d2,d3,a3,d4,f#4]@15 ~", AS: "[c2,c3,g3,c4,e4]@15 ~", AT: "[[g1,g2,g3,b3,d4]@17 ~@7]/3",
})).s("gm_epiano2").gain(0.48).pan(0.4)

// chords · synth strings 1 · "M-SynStr"
const synth_strings_1 = note(`<
  A B C D C D E F A B G E C D G F D F H I J D G F K A B C D E G B A@2 B C D E G B A L M N B A B G E C D G F D F H I J D
  G F K A B C D E G B A@2 B C D E G B A O B C D E G B A@2 B C D E G B A O B P Q@3
>`.pickRestart({
  A: "[b3,d4,g4]", B: "[a3,d4,f#4]", C: "[g3,c4,e4]", D: "[g3,b3,d4]", E: "[g3,b3,e4]", F: "[f#3,a3,d4]",
  G: "[a3,c4,e4]", H: "[e3,a3,c4]", I: "[e3,g3,b3]", J: "[e3,g3,c4]", K: "[d3,f#3,d4]@6 [e3,g3,e4]@5 ~ [f#3,a3,f#4]@4",
  L: "[e4,c5], g4 ~@15", M: "[d4,g4,b4]", N: "[c4,e4,g4]", O: "[b3,d4,g4] ~@15", P: "[g3,c4,e4]@15 ~",
  Q: "[[g3,b3,d4]@17 ~@7]/3", // G
})).s("gm_synth_strings_1").gain(0.28)

// chords · string ensemble 1 · "M-String"
const string_ensemble_1 = note(`<
  ~@7 A B C D E F G H I B C J E F K H L M N O P@2 Q@2 R S T@2 U@3 V W@2 X Y Z AA B C D E F G H I B C J E F K H L M N O
  P@2 Q@2 R S T@2 U@3 V W@2 N O P@2 Q@2 R S T@2 U@3 V W@2 N AB AC@4
>`.pickRestart({
  A: "~@4 d5 f#5 a5 d6", B: "b5 g5@2 d5@2 g5@2 b5", C: "a5@2 f#5@4 c6@9 ~", D: "c6 a5@2 e5@2 a5 c6@2",
  E: "b5@2 g5@4 e5@9 ~", F: "e6 c6@2 g5@2 c6 e6 g6", G: "d6 b5@2 g5@5", H: "e5 c5 e5 a5 c6@2 e5@2",
  I: "c6@2 b5 a5@2 g5@2 e5", J: "c6 a5@2 e5@2 a5@2 c6", K: "d6@2 b5@4 g5@9 ~", L: "~ f#5 g5 a5, d5",
  M: "[f#4,d5]@3 [g4,e5]@3 [a4,f#5]@2", N: "[g5,b5]@3 [b5,d6]@3 [g5,b5]@2", O: "[f#5,a5]@7 [g5,b5]",
  P: "[[c6,e6] [c6,e6]@3 [b5,d6] [a5,c6]@2 [b5,d6]@9]/2", Q: "[[g5,b5] [g5,b5]@2 [g5,b5]@3 [g5,e6] [a5,c6]@9]/2",
  R: "[f#5,a5]@3 [f#5,a5]@4 [b5,d6]", S: "[a5,c6] [g5,b5] [f#5,a5] [g5,b5]@5",
  T: "[[g5,b5]@3 [b5,d6]@3 [g5,b5] [f#5,a5]@8 [e5,g5]]/2", // G Bm G F#m Em
  U: "[[c6,e6]@4 [c6,e6]@2 [b5,d6]@4 [a5,c6]@4 [b5,d6]@17 g5@7 [g5,b5]@8 [c6,e6]@2, ~@31 b5 ~@16]/3", // C Bm Am Bm G C
  V: "[b5,d6] [a5,c6] [g5,b5] [a5,c6]@5", W: "[[c6,e6]@3 [b5,d6]@3 [a5,c6] [b5,d6]@9]/2", X: "c6@2 d6 e6", Y: "d6",
  Z: "g6@2 a6 b6", AA: "b6@4 f#6 e6 d6@2", AB: "[f#5,a5]@13 ~ g5@2, ~@14 b5 ~",
  AC: "[[c6,e6]@2 c6@4 [b5,d6]@4 [a5,c6]@4 [b5,d6]@35 ~@15, ~@2 e6 ~@61]/4", // C Bm Am Bm
})).s("gm_string_ensemble_1").gain(0.2)

// other · overdriven guitar · "M-Gitarr"
const overdriven_guitar = note(`<
  ~@24 A B C D B E F C B G H I J K L H B M B N O ~@16 A B C D B E F C B G H I J K L H B@2 C D B E F C B G H I J K L H B
  ~@6
>`.pickRestart({
  A: "d3@3 e3@3 f#3@2", B: "g2", C: "d3", D: "c3@3 c3", E: "e3@12 e3 ~@3", F: "a2", G: "g2@3 g2", H: "d3@3 d3",
  I: "c3@3 d3@3 e3@2", J: "g3@3 f#3", K: "e3@3 e3", L: "a2@11 ~ a2@4", M: "c3", N: "c3@11 ~ c3@4", O: "d3@15 ~",
})).s("gm_overdriven_guitar").gain(0.39).pan(0.6)

// chords · orchestral harp · "M-Harfe"
const orchestral_harp = note(`<
  ~@7 A B C D E F G H I B C J E F K H L ~@4 M N O P Q ~@3 M R S T@2 U V W X B C D E F G H I B C J E F K H L ~@4 M N O P
  Q ~@3 M R S T@2 ~@3 M N O P Q ~@3 M R S T@2 Y Z AA@4
>`.pickRestart({
  A: "~@4 d5 f#5 a5 d6", B: "b5 g5@2 d5@2 g5@2 b5", C: "a5@2 f#5@4 c6@9 ~", D: "c6 a5@2 e5@2 a5 c6@2",
  E: "b5@2 g5@4 e5@9 ~", F: "e6 c6@2 g5@2 c6 e6 g6", G: "d6 b5@2 g5@5", H: "e5 c5 e5 a5 c6@2 e5@2",
  I: "c6@2 b5 a5@2 g5@2 e5", J: "c6 a5@2 e5@2 a5@2 c6", K: "d6@2 b5@4 g5@9 ~", L: "~ f#5 g5 a5, d5",
  M: "~@6 [d5,b5]@3 ~ [c5,a5] ~ [b4,g5] ~ [a4,f#5] ~", N: "[g4,e5]@3 ~", O: "[c5,a5]@3 ~",
  P: "[f#5,a5]@5 ~ [f#5,a5]@6 ~@2 [b5,d6] ~", // F#m Bm
  Q: "[a5,c6] ~ [g5,b5] ~ [f#5,a5] ~ [g5,b5] ~ [b5,d6] ~ g6 ~ [b5,d6] ~ g6 ~", R: "[g4,e5]", S: "[a4,c5]@13 ~@3",
  T: "[[e5,c6]@5 ~ [d5,b5]@6 [c5,a5]@2 [d5,b5]@17 ~]/2", U: "c6@2 d6 e6", V: "d6", W: "g6@2 a6 b6",
  X: "b6@4 f#6 e6 d6@2", Y: "[g5,b5]@3 [b5,d6]@3 [g5,b5]@2", Z: "[f#5,a5]@13 ~ g5@2, ~@14 b5 ~",
  AA: "[[c6,e6]@2 c6@4 [b5,d6]@4 [a5,c6]@4 [b5,d6]@35 ~@15, ~@2 e6 ~@61]/4", // C Bm Am Bm
})).s("gm_orchestral_harp").gain(0.4).pan(0.7)

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

// drums · snare
const snare = s("sd").struct("<~@23 A B@8 C B@12 ~@15 D E B@7 C B@15 C B@7 F B@3 ~@3>".pickRestart({
  A: "~ x ~@2", B: "~@3 x", C: "~@6 x!2", D: "~ x ~ x", E: "~@3 x!2 ~ x!2", F: "~@2 x ~@2 x!3",
})).gain(0.4)

// drums · low tom
const low_tom = s("lt").struct("<~@24 [~@7 x] ~@36 [~@7 x] ~@15 [~@7 x] ~@22>").gain(0.4)

// drums · hihat
const hihat = s("hh").struct("<A@8 B@16 ~ A@15 C A@3 C B@16 ~ A@15 C A@15 C A@2 C D ~@2>".pickRestart({
  A: "x!4", B: "~ x ~ x", C: "x ~ x ~ x ~ x!2", D: "x",
})).gain(0.35)

// drums · mid tom
const mid_tom = s("mt").struct("<~@24 [~@3 x] ~@36 [~@3 x] ~@15 [~@3 x] ~@22>").gain(0.35)

// drums · high tom
const high_tom = s("ht").struct("<~@24 [~@4 x!2 ~@2] ~@36 [~@4 x!2 ~@2] ~@15 [~ x!5 ~@2] ~@22>").gain(0.4)

// drums · tambourine
const tambourine = s("tb").struct("<~@8 [~@3 x]!16 ~ [~@3 x]!36 ~ [~@3 x]!32 ~@6>").gain(0.35)

// drums · woodblocks
const woodblocks = s("woodblock:5").struct("<~ A ~ A ~ A ~ A B@16 ~ B@36 ~ B@34 ~ B ~@2>".pickRestart({
  A: "~ x", B: "~ x ~@2",
})).gain(0.65)

stack(
  acoustic_guitar_steel, bass, epiano2, synth_strings_1, string_ensemble_1, overdriven_guitar, orchestral_harp, kick,
  snare, low_tom, hihat, mid_tom, high_tom, tambourine, woodblocks
)