// Danger Zone — Kenny Loggins
// 158 bpm, 4/4, key C minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 120 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(158/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.

// bass · acoustic bass · "ACOU BASS"
const bass = note(`<
  A B A B C D E B F B G H@4 I@2 J@2 K@2 L M N O P Q R S H@2 I@4 B ~ N O T U P K P@2 V W X@2 Y@2 Z@2 K N AA AB@2 AA AB@2
  AA AB B AC B AD AE AD B AF B AD I@6 H@2 K@2 T AG O@2 AH AI Z@2 X@2 K@2 AJ AH AK AL AM AH AK AN K@2 T AG O@2 AH AI Z@2
  X@2 K@2 AO AP ~
>`.pickRestart({
  A: "~@2 g1 ~ bb1 ~ c2 ~ f2@3 ~ eb2@3 ~", B: "c2", C: "~@2 g1 ~ bb1 ~ c2 ~ f2@3 ~ eb2@4", D: "bb1",
  E: "~@2 g1 ~ bb1 ~ c2 ~ f2@4 bb1@3 ~", F: "~@2 g1 ~ bb1 ~ c2 ~ f2@4 eb2@4", G: "~@2 g1 ~ bb1 ~ c2 ~ f2@4 eb2@3 ~",
  H: "[c2@29 ~@3]/2", I: "[c2@7 ~]/2", J: "[c2@25 ~@7]/2", K: "bb1@4 ~@2 bb1 ~ bb1@4 ~@4", L: "c2@4 ~@2 c2 ~ c2@8",
  M: "~@2 c2 ~ eb2 ~ f2 ~ g2@3 ~ eb2@4", N: "bb1@4 ~@2 bb1 ~ bb1@6 ~@2", O: "bb1@4 ~@2 bb1 ~ bb1@5 ~@3",
  P: "ab1@4 ~@2 ab1 ~ ab1@6 ~@2", Q: "ab1@4 ~@2 ab1 ~ ab1@5 ~@3", R: "ab1@7 ~", S: "ab1", T: "c2@4 ~@2 c2 ~ c2@7 ~",
  U: "~@2 c2 ~ eb2 ~ f2 ~ g2@3 ~ eb2@2 ~@2", V: "ab1@3 ~", W: "ab1@15 ~", X: "f1@4 ~@2 f1 ~ f1@4 ~@4",
  Y: "eb1@4 ~@2 eb1 ~ eb1@4 ~@4", Z: "ab1@4 ~@2 ab1 ~ ab1@4 ~@4", AA: "bb1@2 c2 ~@3 c2 ~ c2@5 ~@3",
  AB: "bb1@2 c2 ~@3 c2 ~ c2@4 ~@4", AC: "~@2 g1@2 bb1@2 c2@2 f2@4 eb2@3 ~", AD: "~@2 g1@2 bb1@2 c2@2 f2@3 ~ eb2@4",
  AE: "bb1@15 ~", AF: "~@2 g1@2 bb1@2 c2@2 f2@3 ~ eb2@2 ~@2", AG: "c2 ~ g1 ~ bb1 ~ c2 ~ f2@3 ~ eb2@2 ~@2",
  AH: "c2@4 ~@2 c2 ~ c2@5 ~@3", AI: "c2 ~ g1@2 bb1 ~ c2 ~ f2@3 ~ eb2@2 ~@2", AJ: "c2@4 ~@2 c2 ~ c2@4 ~@4",
  AK: "c2@4 ~@2 c2 ~ c2@6 ~@2", AL: "c2 ~ g1@2 bb1 ~ c2@2 f2@3 ~ eb2@3 ~", AM: "c2 ~@5 c2 ~ c2@4 ~@4",
  AN: "~@2 g1 ~ bb1 ~ c2@2 f2@3 ~ eb2@3 ~", AO: "c2@2 ~ c2@5", AP: "~@2 g1 ~ bb1 ~ c2 ~ f2@3 ~ eb2 ~ c2 ~",
})).s("gm_acoustic_bass").gain(0.64)

// chords · percussive organ · "ORGAN 2"
const percussive_organ = note(`<
  ~ A@4 B@2 C D E F ~@8 G@2 H@2 I@2 J@4 ~@8 G@2 H@2 K L M@4 N@2 O@2 P@2 B@2 Q@4 R@4 S@4 G@2 C T U T ~@8 I@2 V@2 I@2 W@2
  X@2 Y@2 G@2 S@4 Z@2 AA@2 I@2 AB@2 G@2 H@2 AC@2 Y@2 B@2 AD AE ~
>`.pickRestart({
  A: "[[c5,g5,c6]@15 ~]/4", B: "[[bb4,d5,f5,bb5]@27 ~@5]/2",
  C: "gb5 g5@3 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@4 ~@2 [c5,g5,bb5,c6]@2, [c5,bb5,c6] ~@3", // C7
  D: "~@2 [c5,g5,bb5,c6]@2 ~@2 [c5,g5,c6] ~ [c5,g5,bb5,c6]@3 ~@5", // C7 C5 C7
  E: "[c5,g5,bb5,c6]@4 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@4 ~@2 [c5,g5,bb5,c6]@2, gb5 ~@15", // C7
  F: "~@2 [c5,g5,bb5,c6]@2 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@3 ~@5", G: "[[bb4,d5,f5,bb5]@7 ~]/2",
  H: "[[c5,g5,c6]@7 ~]/2", I: "[[bb4,d5,f5,bb5]@29 ~@3]/2", J: "[[ab4,c5,eb5,ab5]@63 ~]/4",
  K: "[ab4,ab5]@15 ~, [c5,eb5]@13 ~@3", L: "[d5,f5,bb5]@13 ~@3, bb4@15 ~", M: "[[c5,eb5,ab5]@61 ~@3, ab4@63 ~]/4",
  N: "[[f4,ab4,eb5]@15 ~, c5@7 ~]/2", O: "[[eb4,g4,bb4,eb5]@29 ~@3]/2", P: "[[ab4,eb5,ab5]@15 ~, c5@7 ~]/2",
  Q: "[~@8 eb5@7 ~, c5@31 ~, [g5,c6]@15 ~]/4", R: "[[ab4,c5,eb5,ab5]@15 ~]/4", S: "[[c5,g5,c6]@61 ~@3]/4",
  T: "~@2 [c5,g5,bb5,c6]@2 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@4 ~@4", // C7
  U: "gb5 ~ g5@3 ~ [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@4 ~@2 [c5,g5,bb5,c6]@2, [c5,bb5,c6] ~@3", // C7
  V: "[[g5,c6]@7 ~, c5@15 ~]/2", W: "[[g5,c6]@27 ~@5, c5@29 ~@3]/2", X: "[[c5,eb5,ab5]@7 ~, ab4]/2",
  Y: "[[f4,ab4,c5,eb5]@7 ~]/2", // Fm7
  Z: "[[c5,g5,bb5,c6]@4 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@5 ~ gb5 g5@2 ~ [c5,g5,bb5,c6]@2 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@5 ~@3, ~@7 [c5,bb5,c6] ~@8]/2", // C7
  AA: "[gb5 g5@3 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@4 ~@3 c6@2 ~ [c5,g5,bb5,c6]@2 ~@2 [c5,g5,bb5,c6] ~ [c5,g5,bb5,c6]@4 ~@4, [c5,bb5,c6]@2 ~@5 [c5,g5,bb5] ~@8]/2", // C7
  AB: "[[g5,c6]@7 ~, c5@31 ~]/2", AC: "[[c5,eb5,ab5]@7 ~, ab4@31 ~]/2", AD: "[c5,eb5,g5,c6]",
  AE: "~@2 [g4,g5] ~ [bb4,bb5] ~ [c5,c6] ~ [f5,f6]@4 eb5@2 [c5,c6,c7]@2, ~@12 eb6 ~ b6 ~", // G Bb C F C
})).s("gm_percussive_organ").gain(0.43)

// other · acoustic guitar nylon · "NYLON GTR"
const acoustic_guitar_nylon = note("<~@25 A B C D ~@14 A B C D ~@73>".pickRestart({
  A: "g3 bb3 c4 eb4 f4 g4 bb4 c5 g3 bb3 c4 eb4 g4 bb4 c5 eb5",
  B: "g3 bb3 c4 eb4 bb4 c5 eb5 f5 g3 bb3 c4 eb4 c5 eb5 f5 g5",
  C: "g3 bb3 c4 eb4 eb5 f5 g5 bb5 g3 bb3 c4 eb4 f5 g5 bb5 c6",
  D: "g3 bb3 c4 eb4 g5 bb5 c6 eb6 g3 bb3 c4 eb4 bb5 c6 eb6 g6",
})).s("gm_acoustic_guitar_nylon").gain(0.3)

// chords · distortion guitar · "DISTORTION"
const distortion_guitar = note(`<
  ~ A B C D E@2 F@5 ~@7 G@2 H@2 I@2 J@4 ~@8 K@2 H@2 L M N@4 O@2 P@2 Q@2 G@2 R@2 S T U V@2 W X B C D G@2 A Y Z AA AB@4
  AC@4 E@2 AD@2 K@2 AE@2 AF@2 AG@2 G@2 AH@4 AI AJ AI B G@2 AD@2 AK@2 H@2 AL@2 AM AN G@2 AO AP ~
>`.pickRestart({
  A: "[c3,g3]@4 ~@2 [c3,g3] ~ [c3,g3]@4 ~@2 [c3,g3]@2", B: "~@2 [c3,g3]@2 ~@2 [c3,g3] ~ [c3,g3]@6 ~@2",
  C: "[c3,g3]@5 ~ [c3,g3] ~ [c3,g3]@4 ~@2 [c3,g3]@2", D: "~@2 [c3,g3]@2 ~@2 [c3,g3] ~ [c3,g3]@4 ~@4",
  E: "[[bb2,f3]@7 ~]/2", F: "[[c3,g3]@13 ~@3]/5", G: "[[bb2,f3]@29 ~@3]/2", H: "[[c3,g3]@7 ~]/2", I: "[f3, bb2@7 ~]/2",
  J: "[ab2,eb3]/4", K: "[[bb2,f3]@31 ~]/2", L: "[ab2,eb3]@15 ~", M: "[bb2,f3]@7 ~", N: "[[ab2,eb3]@31 ~]/4",
  O: "[[c3,f3]@21 ~ [c3,f3]@2 ~@2 [c3,f3]@6]/2", P: "[[bb2,eb3]@15 ~]/2", Q: "[ab2,eb3]",
  R: "[~@6 c4@2 bb3 ~ eb4 ~ c4 ~ f4@16 eb4 ~]/2", S: "c4 ~ eb4@7 f4@5 ~@2", T: "~@10 c5 eb5 f5 g5 f5 eb5",
  U: "c5 eb5 f5 g5 f5 eb5 c5 eb5 f5 g5 f5 eb5 c5 eb5 f5 g5", V: "[f5 eb5 c5 eb5 f5@14 eb5@2 c5 ~ bb4 ~ c5@8]/2",
  W: "bb4@2 g4@2 f4 ~ g4 ~ f4@2 eb4@2 c4@2 ~@2", X: "[c3,g3]@5 ~ [c3,g3] ~ [c3,g3]@4 ~@2 [c3,g3]@2, b2 ~@15",
  Y: "~@2 [c3,g3]@2 ~@2 [c3,g3] ~ [c3,g3]@5 ~@3", Z: "[c3,g3]@4 ~@2 [c3,g3] ~ [c3,g3]@4 ~@2 [c3,f3,g3]@2",
  AA: "~@2 [c3,f3,g3]@2 ~@2 [c3,g3] ~ [c3,g3]@5 ~@3", AB: "[[c3,g3]@61 ~@3]/4",
  AC: "[[c3,g3]@49 ~ [c3,g3]@2 ~@2 [c3,g3] ~ [c3,g3]@5 ~@3]/4", AD: "[[c3,g3]@29 ~@3]/2", AE: "[[c3,g3]@27 ~@5]/2",
  AF: "[[ab2,eb3]@29 ~@3]/2", AG: "[[c3,f3]@31 ~]/2",
  AH: "[[c3,g3]@49 ~ [c3,g3] ~@3 [c3,g3] ~ [c3,g3]@3 ~ [c3,g3]@3 ~]/4", // C5
  AI: "[c3,g3]@4 ~@2 [c3,g3] ~ [c3,g3]@5 ~ [c3,g3]@2", AJ: "~@2 [c3,g3]@3 ~ [c3,g3] ~ [c3,g3]@6 ~@2",
  AK: "[[bb2,f3]@15 ~]/2", AL: "[[ab2,eb3]@31 ~]/2", AM: "[f2,c3]@15 ~", AN: "[c3,f3]",
  AO: "[c3,g3,c4]@2 ~ [c3,g3,c4]@5", AP: "~@2 g3 ~ bb3 ~ c4 ~ f4@4 eb4@2 [g3,c4]@2",
})).s("gm_distortion_guitar").gain(0.72)

// drums · kick
const kick = s("bd").struct("<~ x [x ~@2 x!2 ~@3]!115 [x ~@2 x ~@4] [~@7 x] ~>").gain(0.71)

// drums · snare
const snare = s("sd").struct(`<
  ~ A@9 B ~@2 C@2 ~@3 D A@9 B ~@2 C@2 ~@3 D A@9 B A@7 B A@17 B ~@2 C@2 ~@3 D A@15 E A E A E A B A@14 F G ~
>`.pickRestart({
  A: "~ x ~ x", B: "~ x!2 ~@3 x ~", C: "~@14 x!2", D: "~ x ~@2 x!2 ~ x", E: "~@2 x ~@2 x!2 ~", F: "~ x ~@2",
  G: "~@5 x ~@2",
})).gain(0.71)

// drums · hihat
const hihat = s("hh").struct(`<
  ~ A B@9 C@8 A B@9 C@8 A B@9 A B@7 A B@3 A B@3 A B@3 A B@5 C@8 A B@3 A B@3 A B@3 A B A B@7 A B@3 A B@3 A B@3 A B D C ~
>`.pickRestart({
  A: "~ x!7", B: "x!8", C: "~ x ~ x", D: "~@3 x",
})).gain(0.71)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~@10 A ~@3 B ~@3 C ~@9 A ~@3 B ~@3 C ~@9 A ~@7 A ~@17 A ~@3 B ~@3 C ~@15 D ~ D ~ D ~ A ~@15 E ~
>`.pickRestart({
  A: "~@2 x ~@3 x!2", B: "x", C: "~@4 x!2 ~@2", D: "~@7 x", E: "~@3 x",
})).gain(0.71)

// drums · crash
const crash = s("cr").struct(`<
  ~ A ~@17 A ~@17 A ~@9 A ~@7 A ~@3 A ~@3 A ~@3 A ~@13 A ~@3 A ~@3 A ~@3 A ~ A ~@7 A ~@3 A ~@3 A ~@3 A ~ B C D
>`.pickRestart({
  A: "x", B: "x ~@2 x ~@4", C: "~@7 x", D: "~ x ~@14",
})).gain(0.71)

// drums · high tom
const high_tom = s("ht").struct("<~@10 A ~@7 B ~@9 A ~@7 B ~@9 A ~@7 A ~@17 A ~@7 B ~@21 A ~@17>".pickRestart({
  A: "~@4 x!2 ~@2", B: "~ x ~@6",
})).gain(0.71)

stack(bass, percussive_organ, acoustic_guitar_nylon, distortion_guitar, kick, snare, hihat, low_tom, crash, high_tom)