// Ninna nanna — Berte
// 95 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: duplicate parts dropped: ch 16 piano (copy of ch 5 synth choir)
// note: Full arrangement: all 106 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(95/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 · electric bass finger
const bass = note(`<
  ~@5 A B C D A B C D A B C D A B C D A B C D A B C D E F G H E F G H E F G H E F G I A B C D A B C D A B C D E F G H E
  F G H E F G H E F G I A B C D A B C D E F G H E F G H E F G H E F G I A B C D A B C D J
>`.pickRestart({
  A: "e2@2 e2 ~@5 b1 ~ b1 ~@2 b1@3", B: "a1 ~ a1 ~@7 b1@2 c#2@2 d#2 ~", C: "e2@2 e2 ~@5 b1 ~ b1 ~@5", D: "a1 ~ a1 ~@13",
  E: "e1 ~ b1 ~ e2 ~@2 e1!2 ~@7", F: "g#1!2 d#2 g#2 ~@3 d#1 g#1 ~ g#1 ~ g#1 ~@3", G: "f#1!2 c#2 f#2 ~@3 f#1 f#1@2 ~@6",
  H: "c#2!2 g#2 c#3 ~@3 g#1 c#2 ~ c#2@2 b1@4", I: "a1@2 e2 a2 ~@3 e2 a2@7 ~", J: "e1 ~@3",
})).s("gm_electric_bass_finger").gain(0.57)

// chords · electric guitar clean
const electric_guitar_clean = note(`<
  ~@5 A B A B ~@8 A B C B ~@8 D E@2 ~@2 F G H I J K L M N O ~ A B C B A B A B A B A B P Q R S ~ T ~ U ~ V W X Y ~@5 A B
  C B A B ~ Z AA AB ~ F ~@2 I J ~ AC AD ~@5 C B A B C B AE
>`.pickRestart({
  A: "[g#4,c#5]@7 ~ [f#4,b4]@7 ~", B: "[e4,a4]@3 ~", C: "[g#4,c#5]@7 ~@6 c#5 b4 c#5, ~@8 [f#4,b4]@7 ~",
  D: "~@8 e5@5 ~@3", E: "[~@8 c#5@4 ~@3 c#5@3 b4@4 ~@10]/2", F: "~@4 a#5@5 ~@7, ~@4 g#5 ~@11",
  G: "~@4 [f#5,g#5] f#5 d#5 ~ f#5 [f#5,g#5] d#5 ~ [f#5,g#5] f#5 d#5 ~", H: "g#5 f#5@3 f#5@3 ~@5 g#4 ~@3",
  I: "~@4 g#4@2 e4 ~@9", J: "~ c#5@2 ~", K: "~@10 c#5 ~@3 b4 g#4",
  L: "~@2 f#4 e4 ~@2 [e4,f#4] ~@3 [c#4,e4] ~ b3 c4 c#4 ~", M: "e4 c#4@2 ~@5", N: "~@4 c#5@3 ~@5 g#4@4", O: "e4@5 ~@11",
  P: "~@6 b4@5 ~@5", Q: "~@6 [b4,c#5,e5] ~ b4@2 ~ b4 ~ a4 g#4 ~, ~@4 [c#5,e5]@3 ~", R: "~ b4 ~@2, ~@4 a4 ~@11",
  S: "~@5 b3 c#4 ~ e4@2 c#4 ~@3 g4 ~", T: "~@4 [e5,f#5] ~@3 [e5,f#5] ~@3 [e5,f#5] ~@3",
  U: "~@4 d#5 b4 g#4 ~ d#5 ~ b4 ~ g#4@4", V: "~@3 b4@5 ~@4 b4 c#5 d#5@2", W: "~@4 b4@4 ~ c#5@3 ~@4",
  X: "~@10 [e4,f#4] ~@3 f#4 e4", Y: "e4@7 ~@9", Z: "~@7 g#5", AA: "~ g#5 ~ g#5 ~@4",
  AB: "~@6 g#4 g#4@4 ~@5, ~@7 b4 ~@8", AC: "~@5 [g#4,b4] e5 ~ e5 ~ f#5 ~ g#5 ~ g#5@2", AD: "g#5!2 ~@6",
  AE: "[e4,g#4]@7 ~@9", // E
})).s("gm_electric_guitar_clean").gain(0.42)

// chords · epiano1
const epiano1 = note(`<
  ~ A B C D C D C D C D C D C D C D C D C D C D C D C D C D E F G H E F G H E F G H E F G I C D C D C D C D C D C J E F
  G H E F G H E F G H E F G I C D C D C D C D E F G H E F G H E F G H E F G I C D C D C D C D K
>`.pickRestart({
  A: "e2 ~ [e2,g#3,b3,e4] ~@3 [g#3,b3,e4] ~ b2 ~ [f#3,b3,d#4] ~@2 b2 [b3,d#4,f#4] ~", // E B
  B: "a2 ~ [a3,c#4,e4] ~@3 [a3,c#4,e4] ~@3 [a3,c#4,e4] ~@2 b2 [b3,d#4,f#4] ~", // A B
  C: "e2 ~ [b3,e4,g#4]!2 ~@2 [b3,e4,g#4] ~ b2 ~ [b3,d#4,f#4]!2 ~@2 [b3,d#4,f#4] ~", // E B
  D: "a2 ~ [a3,c#4,e4]!2 ~@2 [a3,c#4,e4] ~@3 [a3,c#4,e4]!2 ~ b2 [b3,d#4,f#4] ~", // A B
  E: "e2 ~ [b3,e4,g#4]!2 ~@2 [b3,e4,g#4] ~ e2 ~ [b3,e4,g#4]!2 ~@2 [b3,e4,g#4] ~", // E
  F: "g#2@2 [b3,d#4,f#4]!2 ~@2 [b3,d#4,f#4] ~ g#2@2 [b3,d#4,f#4]!2 ~@2 [b3,d#4,f#4] ~", // B
  G: "~@2 [c#4,f#4,a4]!2 ~@2 [c#4,f#4,a4] ~@3 [c#4,f#4,a4]!2 ~@2 [c#4,f#4,a4] ~", // F#m
  H: "~@2 [c#4,e4,g#4]!2 ~@2 [c#4,e4,g#4] ~@3 [c#4,e4,g#4]!2 ~@2 [c#4,e4,g#4] ~", // C#m
  I: "~@4 [a3,b3,c4,e4]@3 ~ [c4,e4,a4]@4 [a3,c4,e4]@3 ~", // Am
  J: "a2 ~ [a3,c#4,e4]!2 ~@2 [a3,c#4,e4] ~@3 [a3,c#4,e4]!2 ~ b2 [b3,d#4,f#4] b2", K: "[g#3,b3,e4] ~@7",
})).s("gm_epiano1").gain(0.48)

// chords · drawbar organ
const drawbar_organ = note(`<
  ~ A B A B A B A B C D C D C D C D A B A B C D C D C D C D ~@16 A B A B A B A B A B A B ~@16 A B A B A B A B ~@16 A B A
  B A B A B E
>`.pickRestart({
  A: "~@2 [b5,e6,g#6] ~@5", B: "~@4 [a5,c#6,e6]@3 ~@9", C: "~@4 [e5,g#5]@3 ~@9", D: "~@4 [c#5,e5]@3 ~@9",
  E: "[b5,e6,g#6]@3 ~@13", // E
})).s("gm_drawbar_organ").gain(0.51).pan(0.4)

// other · trumpet
const trumpet = note(`<
  ~ A B C@2 A D E@2 ~@21 F G ~@2 F G ~@2 F G ~ H I ~ J ~@4 A B K L A B K M ~ F G ~@2 F G ~@2 F G ~ H I N O ~@4 A D E@2 ~
  F G ~@2 F G ~@2 F G ~ H I ~ J ~@4 A B P@2 Q
>`.pickRestart({
  A: "~@2 e4!2 g#4!2 e4 ~@9", B: "~@12 e4 ~ e4!2", C: "[g#4!2 e4 ~@9 c#4@7 ~@13]/2", D: "~@12 g#4@2 b4 ~",
  E: "[~@2 e4!2 g#4!2 e4 ~@5 c#4@2 b3@10 ~@4 c#4@2 e4 ~]/2", F: "~@3 b3 d#4!2 ~ d#4 ~ d#4 ~ d#4 ~ c#4 b3@2",
  G: "a3@3 ~@13", H: "~ g#4@2 ~", I: "~@3 g#4 c#5!2 ~ c#5 ~ c#5 ~ c#5 ~ a4 g#4@2", J: "f#5@3 f#5 e5@2 f#5@2, a4",
  K: "g#4!2 e4 ~@13", L: "~@2 b4@5 ~", M: "~@4 b4@7 ~ c#5@2 e5 ~", N: "~@14 [e3,f#3,g3,g#3] [b3,c4,c#4,e4,f4]",
  O: "f#5@3 f#5 e5@2 f#5@2, a4, f#4 ~@15", P: "[g#4!2 e4 ~@9 c#4@7 ~@9 g#4@2 b4 ~]/2", Q: "[e4,b4] ~@7",
})).s("gm_trumpet").gain(0.53).pan(0.8)

// other · brass section
const brass_section = note(`<
  ~ A B C@2 A D E@2 ~@21 F G ~@2 F G ~@2 F G ~ H F G I ~@4 A B J K A B J L ~ F G ~@2 F G ~ M F G ~ H F G I ~@4 A N O@2 ~
  F G ~ P F G ~ P F G ~ H F G I ~@4 A B Q@2 R
>`.pickRestart({
  A: "~@2 e4!2 g#4!2 e4 ~@9", B: "~@12 e4 ~ e4!2", C: "[g#4!2 e4 ~@9 c#4@19 ~]/2", D: "~@12 [g#4,g#5]@2 [b4,b5] ~",
  E: "[~@2 e4!2 g#4!2 e4 ~@5 c#4@2 b3@10 ~@4 c#4@2 e4 ~]/2", F: "~@3 e4 g#4!2 ~ g#4 ~ g#4 ~ g#4 ~ f#4 e4@2",
  G: "c#4@3 ~@13", H: "~@2 e4@5 ~", I: "f#5@3 f#5 e5@2 f#5@2, a4", J: "g#4!2 e4 ~@13", K: "~@2 b4@5 ~",
  L: "~@4 b4@7 ~ c#5@2 e5 ~", M: "e4@7 ~", N: "~@12 g#4@2 b4 ~", O: "[~@2 e4!2 g#4!2 e4 ~@5 c#4@2 b3@14 c#4@2 e4 ~]/2",
  P: "[e4,g#4]@7 ~", Q: "[g#4!2 e4 ~@9 c#4@13 ~@3 g#4@2 b4 ~]/2", R: "[b4,e5] ~@7",
})).s("gm_brass_section").gain(0.45).pan(0.4)

// chords · electric guitar clean
const electric_guitar_clean_2 = note(`<
  ~@5 A B A B C B C B C B C B A B A B C B C B C B C B D E F G D E F H D ~ F G D E F ~ A B A B A B A B A B A B D E F G D
  E F H D E F H D E F ~ A B A B A B A B D E F H D E F H D ~ F G D E F ~ A B A B A B A B ~
>`.pickRestart({
  A: "~@14 [d#4,f#4,b4] ~", B: "~@6 [c#4,e4,a4] ~@7 [c#4,e4,a4] ~", C: "~@6 [e4,g#4,b4] ~@7 [d#4,f#4,b4] ~",
  D: "[b3,e4]@3 [e4,g#4]@3 ~@10", E: "[g#4,c#5]@3 ~@5", F: "[c#4,e4]@9 ~@7", G: "[c#4,e4,g#4]@7 b3 ~ c#4 e4 ~@5",
  H: "[c#4,e4,g#4] ~", // C#m
})).s("gm_electric_guitar_clean").gain(0.32).pan(0)

// chords · electric guitar clean
const electric_guitar_clean_3 = note(`<
  ~ A B A B A B A B A B A B A B A B A B A B A B A B A B A B C D E C@2 D E C@2 D E C@2 D E F A B A B A B A B A B A B C D
  E C G H E C@2 D E C@2 D E F A B A B A B A B C D E C@2 D E C@2 D E C@2 D E F A B A B A B A B ~
>`.pickRestart({
  A: "~@2 [e4,g#4,b4]!2 ~@6 [d#4,f#4,b4]!2 ~@4", B: "~@2 [c#4,e4,a4] [c#4,e4] ~@6 [c#4,e4,a4] [c#4,e4] ~@4",
  C: "~@2 [e4,g#4]!2 ~@2 [e4,g#4] ~@3 [e4,g#4]!2 ~@2 [e4,g#4] ~", // E
  D: "~@2 [d#4,f#4]!2 ~@2 [d#4,f#4] ~@3 [d#4,f#4]!2 ~@2 [d#4,f#4] ~", // D#m
  E: "~@2 [e4,a4]!2 ~@2 [e4,a4] ~@3 [e4,a4]!2 ~@2 [e4,a4] ~", F: "~@2 [a4,c#5,f#5]!2 ~@12",
  G: "~@2 [g#4,e5]!2 ~@2 [g#4,e5] ~@3 [g#4,e5]!2 ~@2 [g#4,e5] ~", // C#m
  H: "~@2 [f#4,d#5]!2 ~@2 [f#4,d#5] ~@3 [f#4,d#5]!2 ~@2 [f#4,d#5] ~", // D#m
})).s("gm_electric_guitar_clean").gain(0.29).pan(0.6)

// drums · kick
const kick = s("bd").struct("<~ A@27 B A@15 C D A@22 E A@3 C D A@22 C D A@3 D A@2 B ~>".pickRestart({
  A: "x!2", B: "x ~@3 x!2 ~@2", C: "x ~@6 x ~@2 x ~@2 x ~@2", D: "~ x", E: "x ~@7 x ~@2 x ~@4",
})).gain(0.72)

// drums · rim
const rim = s("rim").struct("<~@24 [~@3 x] ~@81>").gain(0.24)

// drums · snare
const snare = s("sd").struct(`<
  A ~@27 B C@7 D C@6 E F G ~@10 H C@14 E F G ~@7 C@3 D C@10 E F G ~@3 G B ~@2 G
>`.pickRestart({
  A: "~@7 x", B: "~@3 x", C: "~ x ~ x", D: "~@2 x ~@3 x!2", E: "~@4 x ~@7 x ~ x!2", F: "~ x!3", G: "x", H: "~@5 x ~@2",
})).gain(0.72)

// drums · low tom
const low_tom = s("lt").struct("<[~@7 x] ~@27 [~@7 x] ~@51 [~@7 x] ~@25>").gain(0.64)

// drums · hihat
const hihat = s("hh").struct(`<
  ~ A B C@13 D C@7 D C@3 D E C@3 E C@2 D E C@3 E C@2 F E C@2 D C@8 E C@2 D E C@2 D E C@2 D E C@2 F E C@2 D C@4 E C@2 D E
  C@2 D E C@3 E C@2 F E C@2 D E G C D ~
>`.pickRestart({
  A: "x ~ x ~ x!4", B: "~@2 x ~@2 x!3", C: "x!8", D: "x!7 ~", E: "~ x!7", F: "~ x!5 ~@2", G: "x!6 ~ x",
})).gain(0.32)

// drums · mid tom
const mid_tom = s("mt").struct("<A ~@3 B ~@15 C ~@7 D ~@27 E ~@17 F G ~@4 H ~@23 I ~>".pickRestart({
  A: "~@12 x!2 ~@2", B: "~@7 x ~@5 x ~ x", C: "~@15 x", D: "~@13 x ~@2", E: "~@14 x!2", F: "~@12 x!4", G: "x",
  H: "~@10 x ~ x!2 ~@2", I: "~@13 x!2 ~",
})).gain(0.48)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@16 A ~@7 A ~@3 A ~@7 A ~@7 B ~@3 A ~@11 A ~@3 A ~@3 A ~@3 B ~@3 A ~@7 A ~@3 A ~@7 B ~@3 A ~@3 A ~
>`.pickRestart({
  A: "~@7 x", B: "~@3 x",
})).gain(0.56)

// drums · high tom
const high_tom = s("ht").struct(`<
  A B ~ B A C ~ C D ~@8 C ~@2 E ~@7 F ~@17 G C H C ~ C I C ~ C J ~@17 K C B C ~@2 L ~@17 G C H ~ G C H ~
>`.pickRestart({
  A: "~@4 x!2 ~@2", B: "~@11 x ~@2 x ~", C: "x", D: "~@8 x ~ x ~ x ~ x!2", E: "~@9 x ~@2 x ~@3", F: "~@7 x ~@3 x ~@4",
  G: "~@9 x ~ x!2 ~ x!2", H: "~ x!4 ~@2 x!4 ~ x ~@3", I: "~@6 x!2", J: "~@12 x!3 ~", K: "~@6 x!3 ~@7",
  L: "~@6 x!3 ~ x!3 ~ x!2",
})).gain(0.56)

// drums · high tom · soft notes
const high_tom_soft = s("ht").struct("<~@8 A ~@15 B ~@27 C ~@21 D ~@31>".pickRestart({
  A: "~@7 x ~@8", B: "~@14 x!2", C: "~@11 x ~@4", D: "~@4 x!2 ~@10",
})).gain(0.24)

// drums · crash
const crash = s("cr").struct(`<
  ~@29 A ~@3 A ~@3 A ~@3 A ~@2 A ~@12 A ~@3 A ~@3 A ~@3 A ~@2 A ~@8 A ~@3 A ~@3 A ~@3 A ~@2 A ~@5 B ~@3
>`.pickRestart({
  A: "x", B: "~@3 x",
})).gain(0.32)

// drums · cowbell
const cowbell = s("cb").struct("<~@16 [~@8 x ~@2 x ~@4] ~@5 [~@3 x] x [~@11 x ~@4] ~@81>").gain(0.48)

// drums · woodblocks
const woodblocks = s("woodblock:5").struct("<~@22 [~@7 x] ~@3 [~@12 x!2 ~@2] x ~@78>").gain(0.7)

// drums · woodblocks
const woodblocks_2 = s("woodblock:4").struct("<~@26 [~@7 x] ~@79>").gain(0.7)

stack(
  bass, electric_guitar_clean, epiano1, drawbar_organ, trumpet, brass_section, electric_guitar_clean_2,
  electric_guitar_clean_3, kick, rim, snare, low_tom, hihat, mid_tom, open_hat, high_tom, high_tom_soft, crash, cowbell,
  woodblocks, woodblocks_2
)