// Strange Days — The Doors
// 140 bpm, 4/4, key E minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 5 overdriven guitar (copy of ch 6 electric guitar clean)
// note: Full arrangement: all 96 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(140/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · [...]/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 · electric bass finger
const bass = note(`<
  ~@3 A B@5 C B C B C B D E F G F G F G F G H I J K L M N O N O N O N O B C B C B C B D E F G F G F G F G H I J K L M N
  O N O N O N O L M B C B C B C B D E B C B C B C B D E P I J K Q@2
>`.pickRestart({
  A: "~@3 b1", B: "e1@2 e2 b1 d2@2 a1 b1", C: "a1@2 a2 e2 g2@2 e2 g2", D: "f#1@2 f#1!6", E: "f#1!8",
  F: "g1@2 g2 d2 f2@2 d2 f2", G: "c2@2 c3 g2 a#2@2 g2 a#2", H: "g2@2 g2!6", I: "b1@2 b1!6", J: "a#1@2 a#1!6",
  K: "a1@2 a1!6", L: "b1@3 b1 b1@4", M: "b0@3 b0 b0@4", N: "g1!2 b1!2", O: "a#1@2 a#1 a1@2 a1@2 a1", P: "g1@2 g1!6",
  Q: "b1/2",
})).s("gm_electric_bass_finger").gain(0.64)

// other · rock organ
const rock_organ = note(`<
  ~@8 A B C@2 A D E F@2 G H I@2 G H I@2 J@2 K L M N ~@8 A B C@2 A D E F@2 G H I@2 G H I@2 J@2 K L M N ~@10 M O P@2 Q R S
  T@2 M O P@2 Q R S T@2 U@2 K L M ~
>`.pickRestart({
  A: "e6", B: "e6@3 g6", C: "[g6 e6@7]/2", D: "e6@3 e6", E: "e6 g6", F: "[f#6@7 f#6]/2", G: "g6", H: "g6@3 a#6",
  I: "[a#6 g6@6 g6]/2", J: "[b6@4 b6@2 b6 b6@5 b6@2 b6@2]/2", K: "a#6", L: "a6@4 a6 a#6@3", M: "b6", N: "~@3 b6",
  O: "b6@3 b6", P: "[d7 b6@7]/2", Q: "b6 b6@2 b6", R: "a6@3 b6", S: "d7!2", T: "b6/2",
  U: "[b6@4 b6@2 b6 d7@5 b6@2 b6@2]/2",
})).s("gm_rock_organ").gain(0.64).pan(0.4)

// other · rock organ
const rock_organ_2 = note(`<
  ~ A B@2 C D C D E F E F C F C G@2 H I H I H I H I J K L M N@2 O P O P O P O P E F E F C F C G@2 H I H I H I H I J K L
  M N@2 O P O P O P O P N@2 E F E F C F C G@2 E F E F C F C G@2 J K L M Q@2
>`.pickRestart({
  A: "e7 b6 d7 a6 b6 g6 a6 e6", B: "e6 b5 d6 a5 b5 g5 a5 e5", C: "e5 d5@2 a4 b4 d5@2 a4", D: "b4 d5@2 a4 b4 d5@2 a4",
  E: "e4 d5@2 a4 b4 d5@2 a4", F: "c5 e5@2 a4 c5 e5@2 c5", G: "f#5 c#5 e5 c#5 f#5 c#5 e5 c#5",
  H: "g4 f4@2 d4 f4 g4@2 d4", I: "c5 a#4@2 g4 a#4 c5@2 g4", J: "g4@2 g4!2", K: "b4@2 b4!2", L: "a#4", M: "a4@2 a4!2",
  N: "b4@3 b4 b4@4", O: "g4!2 b4!2", P: "a#4@2 a#4 a4@2 a4@2 a4", Q: "b4/2",
})).s("gm_rock_organ").gain(0.64).pan(0.6)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@4 A@4 B C B C B C B D E F G F G F G F G H I J C K@2 L M L M L M L M B C B C B C B D E F G F G F G F G H I J C K@2 L
  M L M L M L M K@2 B C B C B C B D E B C B C B C B D E F I J C N@2
>`.pickRestart({
  A: "[e2,b2,e3]/2", B: "[e2,b2,e3]", C: "[a2,e3,a3]", D: "[f#2,c#3,f#3]@2 [f#2,c#3,f#3]!6", E: "[f#2,c#3,f#3]!8",
  F: "[g2,d3,g3]", G: "[c3,g3,c4]", H: "[g3,d4,g4]", I: "[b2,f#3,b3]", J: "[a#2,f3,a#3]",
  K: "[b2,f#3,b3]@3 [b2,f#3,b3] [b2,f#3,b3]@4", L: "[g2,d3,g3]!2 [b2,f#3,b3]!2",
  M: "[a#2,f3,a#3]@2 [a#2,f3,a#3] [a2,e3,a3]@2 [a2,e3,a3]@2 [a2,e3,a3]", N: "[b2,f#3,b3]/2",
})).s("gm_electric_guitar_clean").gain(0.64)

// drums · kick
const kick = s("bd").struct("<~@25 A@4 ~@2 B C B C B C B C ~@17 A@4 ~@2 B C B C B C B C D@24 A E>".pickRestart({
  A: "x", B: "~ x ~ x ~ x ~ x", C: "~ x ~ x ~@4", D: "x ~@2 x!2 ~@3", E: "~ x",
})).gain(0.4)

// drums · snare
const snare = s("sd").struct("<~@30 A B C B D B C B D ~@22 A B C B D B C B D E F E@18 G@4 ~ G>".pickRestart({
  A: "~@10 x!3 ~ x ~", B: "x!4", C: "x ~@3 x ~@3 x ~ x!3 ~ x ~", D: "x ~@3 x ~@3 x ~ x!3 ~ x!2", E: "~ x ~ x",
  F: "~@4 x ~@5 x!3 ~ x ~", G: "~ x ~@2",
})).gain(0.4)

// drums · low tom
const low_tom = s("lt").struct("<~@4 A@10 B@3 A@7 C D@4 E F ~@8 A@6 B@3 A@7 C D@4 E F ~@28 G@4 H I>".pickRestart({
  A: "x", B: "x!8", C: "x ~ x!6", D: "~@2 x!6", E: "x ~@5 x ~ x ~@3 x ~ x!2", F: "x ~@2 x!2 ~@3", G: "~@7 x",
  H: "~@12 x!4", I: "x!4 ~@12",
})).gain(0.4)

// drums · mid tom
const mid_tom = s("mt").struct("<~@4 A@10 ~@3 A@7 ~@15 A@6 ~@3 A@7 ~@35 B@4 C ~>".pickRestart({
  A: "~@2 x!6", B: "~@3 x", C: "~@8 x!4 ~@4",
})).gain(0.4)

// drums · crash
const crash = s("cr").struct(`<
  ~@15 A ~@9 A@5 ~ B@8 ~@7 A ~@9 A@4 ~@2 B@8 A@3 ~ A ~ A ~ A ~ C A ~ A ~ A ~ A ~ C A ~ A ~ A ~
>`.pickRestart({
  A: "x", B: "x!4", C: "x!2",
})).gain(0.4)

// drums · ride
const ride = s("rd").struct("<~@70 A@3 B A B A B A B ~ A B A B A B A B ~ A B A B ~ C>".pickRestart({
  A: "~ x!3", B: "x!4", C: "~ x",
})).gain(0.4)

stack(bass, rock_organ, rock_organ_2, electric_guitar_clean, kick, snare, low_tom, mid_tom, crash, ride)