// Das Madchen Carina — Roy Black
// 120 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 95 bars on a 32-step grid, each part at one level; ghost notes are separate "_soft" parts. 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.

// bass · fretless bass · "FRETLESS"
const bass = note(`<
  A B A C D E D E D E A B A B F G H G H I J K L M N O P Q R S T U V W X Y Z AA AB AC AD AA AB AC AE@2 G H G H I J K L M
  N O P Q R S T U V W X Y Z AA AB AC AD AA AB AF AG AH T U V W X Y Z AA AB AC AD AA AB AC AI AJ AK@2
>`.pickRestart({
  A: "c2@9 ~ c2 ~@2 c2 ~@2", B: "c#2@15 ~", C: "c#2@11 d3 c#2@4", D: "c2 ~ c2!3 ~ c2!3 ~ c2!3 ~ c2 ~",
  E: "c#2 ~ c#2!3 ~ c#2!3 ~ c#2!2 d#2 ~ c#2 ~", F: "c2@5 ~ c2 ~ c2@7 ~", G: "f2@5 ~ f2 ~ d#2@5 ~ d#2 ~",
  H: "f2@10 ~@2 f2@2 ~@2 f2@5 ~ f2 ~ c2@4 d#2@4", I: "f2@9 ~@3 f2@4 d#2@5 ~ c2@4 ~ a#1@5",
  J: "g#1@9 ~@3 g#1 ~@3 g#1@10 ~@2 g1@4", K: "g#1@9 ~@2 g#1@5 a#1@5 g#1@5 ~ a#1@5",
  L: "c2@9 ~@3 c2 ~@3 c2@6 g2@2 c2@4 a#1@4", M: "c#2@9 ~@3 c#2@2 ~@2 c#2@9 ~@3 c#2@4", N: "c2@5 ~ c2 ~ c2@5 ~ g1@2",
  O: "c2@9 ~@3 c2@2 ~@2 c#2@16", P: "~@4 c2@3 ~@5 c2@4 ~@4 c2 ~ c2@2 g1@4 a#1@4",
  Q: "c2@9 ~@3 c2@2 ~@2 c2@6 ~@2 c2@4 d2@3 ~", R: "f2@4 ~ f2@4 ~@2 f2@4 ~ a#1@4 ~ a#1@4 ~@2 c2@4 ~", S: "f2 ~@7",
  T: "f2@8 ~@4 f2 ~@3 f2@10 ~@2 c2@4", U: "f2@9 ~@3 f2 ~@3 f2@7 ~ c2@4 d2@4", V: "f2@10 ~@2 f2 ~@3 f2@12 g2@4",
  W: "c2@9 ~@3 c2 ~@3 c2@11 ~ g1@4", X: "c2@8 ~@4 c2 ~@3 c2@5 ~ c2 ~ g1@4 a1@4", Y: "c2@9 ~@3 c2 ~@3 c2@10 ~@6",
  Z: "c2@8 ~@4 c2 ~@3 c2@8 g1@4 a1@4", AA: "c2@9 ~@3 c2 ~@3 c2@8 ~@4 c2@4", AB: "f2@9 ~@3 f2@2 ~@2 f2@12 g2@4",
  AC: "c2@9 ~@3 c2@2 ~@2 c2@9 ~@3 c2@4", AD: "f2@9 ~@3 f2@4 a2@5 g2@5 ~ f2@5", AE: "f2@9 ~@3 f2@2 ~@2 f2@12 c2@4",
  AF: "c2@9 ~@3 c2@2 ~@2 c2@4 a#1@4 g1@4 e1@4", AG: "f1@3 ~ f1@3 ~ f1@3 ~ f1@3 ~ f1@3 ~ f1@3 ~ f1@3 ~ f1@3 ~",
  AH: "f1@3 ~ f1@3 ~ g1@3 ~ a1@3 ~ c2@3 ~ d2@3 ~ f2@3 ~ g2@3 ~",
  AI: "f2@6 ~@2 f2@3 ~ f2@3 ~ f2@3 ~ f2@3 ~ f2@3 ~ c2@3 ~", AJ: "f2@6 ~@2 f2@3 ~ f2@3 ~ f2@4 d2@3 ~ c2@2 a1@2 g1@4",
  AK: "[f1@3 ~]/2",
})).s("gm_fretless_bass").gain(0.48)

// chords · distortion guitar · "DISTORTION"
const distortion_guitar = note("<A B A C D E D E D E A B A C F ~ G@2 H@2 I J K ~@24 G@2 H@2 I J K ~@41>".pickRestart({
  A: "[c2,g2,c3]@31 ~", B: "[c#2,g#2,c#3]@29 ~@3", C: "[c#2,g#2,c#3]@31 ~", D: "[c2,g2,c3]",
  E: "c#3@10 d#3@3 c#3@3, [c#2,g#2]", F: "[c2,g2,c3]@15 ~", G: "[~ c4@2 g#3 a#3 c4 g#3 f3@3 ~@6]/2",
  H: "[~@4 c4@7 ~ d#4@4 c4@4 a#3@4 g#3@4 f3@18 ~@2 g3@16]/2", I: "g#3@15 ~",
  J: "g#3@5 g3@5 ~ g#3@5 a#3@5 g#3@5 ~ a#3@5", K: "c4@29 ~@3",
})).s("gm_distortion_guitar").gain(0.18).pan(0.6)

// chords · epiano1 · "E.PIANO 1"
const epiano1 = note(`<
  ~@14 A B C B C D E F G H I J K A L M N@5 O@3 P@7 Q B C B C D E F G H I J K A L M N@5 O@3 R@7 S N@5 O@3 T@7 U V@2
>`.pickRestart({
  A: "[e4,g4,c5]@15 ~", B: "[f4,g#4,c5]@15 ~ [d#4,g4,a#4]@14 ~@2", C: "[f4,g#4,c5]@15 ~",
  D: "[f4,g#4,c5]@7 ~ [d#4,g4,a#4]@7 ~", E: "[c4,d#4,g#4]@15 ~", F: "[c4,d#4,g#4]@15 ~ [d4,f4,a#4]@15 ~",
  G: "[e4,g4,c5]@31 ~", H: "[g#3,c#4,d#4,f4]@29 ~@3", I: "[g3,c4,e4]@15 ~ [c4,e4,g4]@14 ~@2",
  J: "[c4,e4,g4]@7 ~ [c#4,f4,g#4]@7 ~", // C C#
  K: "~@4 [f4,c5]@2 ~@6 [f4,c5]@2 ~@6 [f4,g4,c5] ~ [f4,g4,c5] ~ [f4,g4] ~@3 [g4,c5] ~@3, ~@4 g4 ~@7 g4 ~@15 f4@2 ~@2", // F5 Fsus2 C5
  L: "[f4,a4,c5]@3 ~@2 [f4,a4,c5]@3 ~@3 [f4,a4,c5]@3 ~@2 [f4,a#4,d5]@4 ~ [f4,a4,c5]@4 ~@2 [d4,f4,a#4]@3 ~@2", // F A# F A#
  M: "[f4,a4,c5]@3 ~@29", // F
  N: "[[a3,c4,f4]@3 ~@2 f4 g4 a4 f4@3 ~@2 f4 g4 ~ [c4,f4]@3 ~@3 a3 ~ e4@3 g3 c4 g3 [g3,c4,f4] ~ [c4,e4]@3 g3 c4 [c4,e4,g4]@2 c4, ~@3 a3@8 a3@4 a3@4 a3@2 f4@2 ~ g3@2 ~@5 g3@4 ~@5, ~@4 c4@7 ~ c4@3 ~@5 c4@2 ~ c4@4 ~@13]/5", // F F5 Csus4 C
  O: "[[e4,g4,c5] ~@2 d5@2 ~ [g4,e5]@2 [g3,c4]@3 ~@2 e4 ~@2 g4 ~ c4 [g3,c4,e4]@2 ~ c4 g3, ~ e4@4 e4@6 g3@2 ~ g3@3 g3@2 ~@2 g3@2 ~, ~@2 g4@4 ~@6 c4@2 ~ c4@2 ~@7]/3", // C C5 C
  P: "[[f4,a4]@3 ~@2 a4@2 ~ [e4,g4]@5 ~ e4 ~ [f4,a4]@5 ~@2 a4 [e4,g4]@5 ~@2 g4 [f4,a4]@3 ~@3 a4 ~ [e4,g4]@3 ~@2 g4 ~ e4 f4@5 ~@2 c4, c4@2 ~ c4@4 c4@6 c4@2 c4@6 c4@8 c4@6 c4@2 c4@2 c4@4 c4@3 c4@7 c4@2 ~, ~@2 f4@2 ~@7 f4 ~@3 e4 ~@2 f4!2 ~@2 e4 ~ a4@3 f4]/7", // F Em F Em F Em
  Q: "c4 g#3 c4 f4@5",
  R: "[[f4,a4]@3 ~@2 a4@2 ~ [e4,g4]@5 ~ e4 ~ [f4,a4]@5 ~@2 a4 [e4,g4]@5 ~@2 g4 [f4,a4]@3 ~@3 a4 ~ [e4,g4]@3 ~@2 g4 ~ e4 f4@5 c4!3, c4@2 ~ c4@4 c4@6 c4@2 c4@6 c4@8 c4@6 c4@2 c4@2 c4@4 c4@3 c4@7 ~@3, ~@2 f4@2 ~@7 f4 ~@3 e4 ~@2 f4!2 ~@2 e4 ~ a4@3 f4]/7", // F Em F Em F Em
  S: "a3@24 ~@2 a3 ~@5",
  T: "[[f4,a4]@6 ~@4 a4@4 ~@2 [e4,g4]@10 ~@2 e4@2 ~@2 [f4,a4]@10 ~@4 a4@2 [e4,g4]@10 ~@4 g4@2 [f4,a4]@6 ~@6 a4@2 ~@2 [e4,g4]@6 ~@4 g4@2 ~@2 e4@2 [f4,a4]@3 ~ [c4,f4,a4]@2 [d4,f4,a#4]@2 [f4,a4,c5]@2 [f4,a#4,d5]@2 [f4,a4,c5]@2 [d4,f4,a#4]@2, c4@4 ~@2 c4@8 c4@12 c4@4 c4@12 c4@16 c4@12 c4@4 c4@4 c4@8 c4@6 c4@7 ~@13, ~@2 f4@2 ~@7 f4 ~@3 e4 ~@2 f4!2 ~@2 e4 ~@5]/7", // F Em F Em F Em F A# …
  U: "[c4,f4,a4]@3 ~ [a3,c4,f4]@2 [c4,e4,g4]@2 [c4,f4,a4]@2 [d4,f4,a#4]@2 [c4,f4,a4]@2 [c4,e4,g4]@2", // F C F A# F C
  V: "[[a3,c4,f4]@3 ~]/2", // F
})).s("gm_epiano1").gain(0.36)

// chords · string ensemble 1 · "STRINGS"
const string_ensemble_1 = note("<~@3 A@8 ~@17 B C@2 D@8 E@7 ~@13 B C@2 D@8 F@8 G@8 H@5 I@4>".pickRestart({
  A: "[~@32 c5@35 ~ a#4@5 ~ c5@5 ~ c#5@5 ~ d#5@4 ~ c#5@4 ~ c5@27 ~ g4@3 ~ a#4@27 ~ g#4@3 ~ g4@27 ~ c4@3 ~ f4@19 ~ d#4@5 ~ c#4@5 ~ c4@30 ~@2, ~@31 c4@36 a#3@6 c4@6 c#4@6 d#4@5 c#4@5 c4@28 g3@4 a#3@28 g#3@4 g3@28 c3@4 f3@20 d#3@6 c#3@6 c3@30 ~@3]/8",
  B: "[a4,c5]@16 [a#4,d5]@5 [a4,c5]@5 ~ [d4,f4,a#4]@5, f4@27 ~@5", // Am A# Am A#
  C: "[[f4,a4,c5]@3 ~@4 c5@13 ~ f4@5 [a#4,d5]@5 c5@12 f4@21, ~@7 a4@19 ~@5 a4@33]/2", // F A#
  D: "[~@7 a3@8 ~@8 a4@8 [a4,c5]@12 [g4,a#4]@12 [f4,a4]@8 [e4,g4]@12 [f4,a4]@4 [g4,a#4]@4 [a4,c5]@4 [g4,a#4]@4 [f4,a4]@4 [e4,g4]@56 [g4,a#4]@4 [f4,a4]@4 [e4,g4]@16 c5@8 b4@4 ~@4 e5@12 d5@12 g4@8 d5@12 c5@12 f4@8 c5, ~@7 c4@16 ~@164 c5@16 a#4@32 a4@21, ~@15 f4@16 ~@144 g4@16 ~@65]/8", // Am Gm F Em F Gm Am Gm …
  E: "[~@11 a#4@12 e4@8 a4@16 c5@5 ~ b4@5 ~@5 e5@12 d5@12 g4@8 d5@12 c5@12 f4@8 c5@12 a#4@12 e4@8 a4@32 g#4@32 ~, ~@11 g4@20 f4@32 ~@76 g4@20 f4@64 ~, ~@58 c5@17 a#4@32 a4@32 ~@85]/7",
  F: "[~@11 a#4@12 e4@8 a4@16 c5@5 ~ b4@5 ~@5 e5@12 d5@12 g4@8 d5@12 c5@12 f4@8 c5@12 a#4@12 e4@8 a4@32 ~@8 c6@13 ~ f5@5 ~ [a#5,d6]@4 c6@12 f5@21, ~@11 g4@20 f4@32 ~@76 g4@20 f4@64 ~@33, ~@58 c5@17 a#4@32 a4@32 ~@60 a5@19 ~@5 a5@33]/8", // A#
  G: "[~@7 a4@8 ~@8 a5@8 [a5,c6]@12 [g5,a#5]@12 [f5,a5]@8 [e5,g5]@12 [f5,a5]@4 [g5,a#5]@4 [a5,c6]@4 [g5,a#5]@4 [f5,a5]@4 [e5,g5]@56 [g5,a#5]@4 [f5,a5]@4 [e5,g5]@16 c6@8 b5@4 ~@4 e6@12 d6@12 g5@8 d6@12 c6@12 f5@8 c6, ~@7 c5@16 ~@164 c6@16 a#5@32 a5@21, ~@15 f5@16 ~@144 g5@16 ~@65]/8", // Am Gm F Em F Gm Am Gm …
  H: "[~@11 a#5@12 e5@8 a5@16 c6@5 ~ b5@5 ~@5 e6@12 d6@12 g5@8 d6@12 c6@12 f5@8 c6@12 a#5@12 e5@8 [f5,a5], ~@11 g5@20 f5@32 ~@12 a#5@32 a5@32 g5@20 ~, ~@59 c6@17 ~@84]/5", // F
  I: "[~@7 [f4,f5,a5]@4 [g4,g5,a#5]@4 [a4,a5,c6]@4 [a#4,a#5,d6]@4 [a4,a5,c6]@4 [g4,g5,a#5]@4 [f4,f5,a5]@8 [a3,c5,f5]@4 [a#3,e5,g5]@4 [c4,f5,a5]@4 [d4,g5,a#5]@4 [c4,f5,a5]@4 [a#3,e5,g5]@4 [a3,c5,f5]@48 ~@17]/4", // F Gm Am A# Am Gm F Edim …
})).s("gm_string_ensemble_1").gain(0.36)

// chords · brass section · "BRASS 1"
const brass_section = note(`<
  A B C D E ~@5 A B C D E ~@5 F G H I J@2 K L ~@16 M N ~@5 F G H I J@2 K L ~@16 M ~@19
>`.pickRestart({
  A: "~@4 [g4,c5] ~ [g4,c5] ~ [g4,c5] ~@3 [g4,c5] ~@3 [g4,c5,e5]@16, ~@6 d5 ~@9", // C5 C
  B: "~ [g#4,c#5] [g#4,d#5] [g#4,c#5,f5] [g#4,c#5,g5] [c#5,f5] [g#4,c#5,d#5] [g#4,c#5], ~@8 c#5 ~@11 g#4@2 ~@10", // C#5 G#5 C# G#sus4 C#5
  C: "~@4 [g4,c5] ~ [g4,c5] ~ [g4,c5]@2 ~@2 [g4,c5] ~@3 [g4,c5,e5]@16, ~@6 d5 ~@9", // C5 C
  D: "~@2 [g#4,c#5]@2 d#5@2 [g#4,c#5,f5]@2 [g#4,c#5,g5]@2 [g#4,c#5,f5]@2 [g#4,c#5] ~ c#5@2, ~@4 g#4 ~@9 g#4 ~, ~@8 c#5 ~@15 d#5@4 ~@4", // C#5 C# C#5
  E: "[g4,c5]@7 ~", F: "~@4 [d#4,g#4] ~ [d#4,g#4] ~ g#4@2 ~@2 [d#4,a#4] ~@3 [d#4,c5]@14 ~@2, ~@8 d#4 ~@23",
  G: "[d#4,c5]@13 ~@3 [f4,d5]@14 ~@2", H: "[c5,e5] ~@3 [c5,e5] ~ [c5,e5] ~ [c5,e5] ~@3 [c5,f5] ~@3 [c5,e5,g5]@15 ~",
  I: "[c#5,f5]", J: "[[c5,e5] ~@3 [c5,e5] ~ [c5,e5] ~ [c5,e5] ~@3 [c5,f5] ~@3 [c5,e5,g5]@32 [c#5,f5]@16]/2",
  K: "~@4 [g4,c5,f5] ~@7 [g4,c5,f5] ~@7 [g4,c5,f5] ~ [g4,c5,f5] ~ [g4,c5,f5] ~@3 [g4,c5,f5] ~@3", L: "[g4,c5,e5]",
  M: "[f4,a4,c5]", N: "[f4,g#4,c5]",
})).s("gm_brass_section").gain(0.43)

// chords · acoustic guitar steel · "STEEL GTR"
const acoustic_guitar_steel = note(`<
  ~@30 A@3 B@5 A B A B A B A C ~@15 A@3 B@5 A B A B A B A@5 B@5 A B A B A B D@2 C ~
>`.pickRestart({
  A: "[c3,f3,a3,c4]@2 [c3,f3,a3,c4]!2 [c3,f3,a3,c4]@2 [c3,f3,a3,c4]@2", // F
  B: "[c3,e3,g3,c4]@2 [c3,e3,g3,c4]!2 [c3,e3,g3,c4]@2 [c3,e3,g3,c4]@2", C: "[f3,g#3,c4,f4] ~@3",
  D: "[c3,f3,a3,c4]@2 [c3,f3,a3,c4]!6", // F
})).s("gm_acoustic_guitar_steel").gain(0.11)

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

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

// drums · snare · soft notes
const snare_soft = s("sd").struct("<A B A B C@6 A B A B ~@81>".pickRestart({
  A: "x ~@9 x ~@2 x ~@2", B: "x", C: "x ~@3 x!3 ~ x ~@3 x!3 ~ x ~@3 x!3 ~ x ~@3 x ~@3",
})).gain(0.24)

// drums · low tom
const low_tom = s("lt").struct("<~ A ~ A ~@7 A ~ A ~@7 B ~@6 B ~@23 B ~@6 B ~@16 C ~@18>".pickRestart({
  A: "~@31 x", B: "~@11 x ~@15 x ~@4", C: "~@12 x!3 ~",
})).gain(0.36)

// drums · hihat
const hihat = s("hh").struct("<~@15 A@6 B A@6 ~@18 A@6 B A@6 ~@36>".pickRestart({
  A: "x!7 ~", B: "x!3 ~",
})).gain(0.18)

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

// drums · open hat
const open_hat = s("oh").struct("<~@15 A@6 B A@6 C ~@16 A@7 B A@6 C ~@35>".pickRestart({
  A: "~@7 x", B: "~@3 x", C: "x",
})).gain(0.18)

// drums · crash
const crash = s("cr").struct(`<
  A@5 ~@5 A@5 ~@7 A ~@7 A ~@10 A ~@11 A ~@7 A ~@10 A ~@2 A ~ A ~@10 A ~@4 A ~
>`.pickRestart({
  A: "x",
})).gain(0.3)

// drums · ride
const ride = s("rd").struct("<~@30 [x!8]!15 [x!7 ~] ~@15 [x!8]!15 ~ [x!8]!16 ~@2>").gain(0.3)

// drums · rim
const rim = s("rim").struct("<~@4 [x ~@3 x!3 ~ x ~@3 x!3 ~ x ~@3 x!3 ~ x ~@3 x ~@3]!6 ~@85>").gain(0.42)

stack(
  bass, distortion_guitar, epiano1, string_ensemble_1, brass_section, acoustic_guitar_steel, kick, snare, snare_soft,
  low_tom, hihat, mid_tom, open_hat, crash, ride, rim
)