// Star — Erasure
// 123 bpm, 4/4, key B major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: duplicate parts dropped: ch 1 "Acoustic Guitar/Synth Brass 1" synth brass 1 (copy of ch 2 "Bright Acoustic Piano" piano); ch 13 "Clavinet" clavinet (copy of ch 12 "Clavinet" clavinet, 0.1 beats late)
// note: Full arrangement: all 121 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(123/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.

// other · acoustic guitar steel · "Acoustic Guitar/Synth Brass 1"
const acoustic_guitar_steel = note("<A B C D E B C F G ~@112>".pickRestart({
  A: "~@14 f#3 a#3", B: "b3@7 c#4", C: "f#3@7 f#3", D: "b3@5 e4@2 c#4", E: "f#3@14 f#3 g#3", F: "b3@5 e4@2 d#4",
  G: "c#4@7 ~",
})).s("gm_acoustic_guitar_steel").gain(0.6).pan(0.4)

// chords · piano · "Bright Acoustic Piano"
const piano = note(`<
  A B C D E B C F G ~@25 H I H I H I H I ~@16 J ~@29 H I H I H I H I H I H I H I H I H I H I H I H I H I H I H I H I ~
>`.pickRestart({
  A: "~@14 f#3 a#3", B: "b3@7 c#4", C: "f#3@7 f#3", D: "b3@5 e4@2 c#4", E: "f#3@14 f#3 g#3", F: "b3@5 e4@2 d#4",
  G: "c#4@7 ~", H: "[f#4,b4,d#5] ~ [f#4,b4,d#5]!2 ~ [f#4,b4,d#5]!2 ~@2 [f#4,b4,d#5]!2 ~ [f#4,b4,d#5] ~ [f#4,b4,d#5] ~",
  I: "[f#4,a#4,c#5] ~ [f#4,a#4,c#5]!2 ~ [f#4,a#4,c#5]!2 ~@2 [f#4,a#4,c#5]!2 ~ [f#4,a#4,c#5] ~ [f#4,a#4,c#5] ~", // F#
  J: "~ f#4@2 f#3@4 ~",
})).s("gm_piano").gain(0.4).pan(0.6)

// chords · electric guitar clean · "Electric Guitar (clean)"
const electric_guitar_clean = note("<~@5 A B C B ~@56 D E B A B@2 A B@2 A@2 B@2 A ~@42>".pickRestart({
  A: "[b2,f#3,b3] ~ [b2,f#3] [b2,f#3,b3] ~ [b2,f#3] [b2,f#3,b3] ~@2 [b2,f#3] [b2,f#3,b3] [b2,f#3] [b2,f#3,b3] ~ [b2,f#3] ~", // B5
  B: "[f#2,c#3,f#3] ~ [f#2,c#3] [f#2,c#3,f#3] ~ [f#2,c#3] [f#2,c#3,f#3] ~@2 [f#2,c#3] [f#2,c#3,f#3] [f#2,c#3] [f#2,c#3,f#3] ~ [f#2,c#3] ~", // F#5
  C: "[b2,f#3,b3] ~ [b2,f#3] [b2,f#3,b3] ~ [b2,f#3] [b2,f#3,b3] ~@2 [b2,f#3] [b2,f#3,e4] [b2,f#3,d#4] [b2,f#3,e4] ~ [b2,f#3,d#4] ~", // B5 Bsus4 B Bsus4 B
  D: "[b2,f#3,b3] ~ [b2,f#3] [b2,f#3,b3] ~ [b2,f#3] [b2,f#3,b3] ~@2 [f#2,c#3] [f#2,c#3,f#3] [f#2,c#3] [f#2,c#3,f#3] ~ [f#2,c#3] ~", // B5 F#5
  E: "[a2,e3,a3] ~ [a2,e3] [a2,e3,a3] ~ [a2,e3] [a2,e3,a3] ~@2 [e2,b2] [e2,b2,e3] [e2,b2] [e2,b2,e3] ~ [e2,b2] ~", // A5 E5
})).s("gm_electric_guitar_clean").gain(0.6).pan(0.1)

// chords · koto
const koto = note(`<
  ~@5 A B C B ~@8 A B D A@2 B D A B A B A B A B A B ~@8 A B D A@2 B D A B A B A B A B A B E B A B E B F G B A B@2 A B@2
  A@2 B@2 A B A B A B A B@2 ~@34
>`.pickRestart({
  A: "[b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~@2 [b3,f#4] [b3,f#4,b4] [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] ~", // B5
  B: "[f#3,c#4,f#4] ~ [f#3,c#4] [f#3,c#4,f#4] ~ [f#3,c#4] [f#3,c#4,f#4] ~@2 [f#3,c#4] [f#3,c#4,f#4] [f#3,c#4] [f#3,c#4,f#4] ~ [f#3,c#4] ~", // F#5
  C: "[b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~@2 [b3,f#4] [b3,f#4,e5] [b3,f#4,d#5] [b3,f#4,e5] ~ [b3,f#4,d#5] ~", // B5 Bsus4 B Bsus4 B
  D: "[f#3,e4,f#4] ~ [f#3,e4] [f#3,e4,f#4] ~ [f#3,e4] [f#3,e4,f#4] ~@2 [f#3,e4] [f#3,e4,f#4] [f#3,e4] [f#3,e4,f#4] ~ [f#3,e4] ~", // F#7
  E: "[b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~@2 [e3,b3] [e3,b3,e4] [e3,b3] [e3,b3,e4] ~ [e3,b3] ~", // B5 E5
  F: "[b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~@2 [f#3,c#4] [f#3,c#4,f#4] [f#3,c#4] [f#3,c#4,f#4] ~ [f#3,c#4] ~", // B5 F#5
  G: "[a3,e4,a4] ~ [a3,e4] [a3,e4,a4] ~ [a3,e4] [a3,e4,a4] ~@2 [e3,b3] [e3,b3,e4] [e3,b3] [e3,b3,e4] ~ [e3,b3] ~", // A5 E5
})).s("gm_koto").gain(0.4).pan(0.9)

// chords · lead 2 sawtooth · "Lead 2 (sawtooth)"
const lead_2_sawtooth = note(`<
  ~@17 A B C A@2 B C A B A B A B A B A B ~@8 A B C A@2 B C A B A B A B A B A B D B A B D B ~@6 A B@2 A@2 B@2 A B A B A B
  A B ~@35
>`.pickRestart({
  A: "[b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~@2 [b3,f#4] [b3,f#4,b4] [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] ~", // B5
  B: "[f#3,c#4,f#4] ~ [f#3,c#4] [f#3,c#4,f#4] ~ [f#3,c#4] [f#3,c#4,f#4] ~@2 [f#3,c#4] [f#3,c#4,f#4] [f#3,c#4] [f#3,c#4,f#4] ~ [f#3,c#4] ~", // F#5
  C: "[f#3,e4,f#4] ~ [f#3,e4] [f#3,e4,f#4] ~ [f#3,e4] [f#3,e4,f#4] ~@2 [f#3,e4] [f#3,e4,f#4] [f#3,e4] [f#3,e4,f#4] ~ [f#3,e4] ~", // F#7
  D: "[b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~ [b3,f#4] [b3,f#4,b4] ~@2 [e3,b3] [e3,b3,e4] [e3,b3] [e3,b3,e4] ~ [e3,b3] ~", // B5 E5
})).s("gm_lead_2_sawtooth").gain(0.24).pan(0.1)

// bass · fretless bass
const bass = note(`<
  A B C D E B C D E F G F G F G F G F G H I F G H I H F H F H F H F H F G F G F G F G F G H I F G H I H F H F H F H F H
  J G F G J G ~@6 F G@2 F@2 G@2 F H F H F H F H@2 ~ F G F G F G F G F G F G F G F G F G F G F G F G F G F G F G F G ~
>`.pickRestart({
  A: "~@14 f#1 a#1", B: "b1@7 c#2", C: "f#1@7 f#1", D: "b1@5 e2@2 c#2", E: "f#1@14 f#1 g#1",
  F: "b1 b2 b1 b2 b1 b2 b1 b2", G: "f#1@2 f#2@2 f#1@2 f#2@2 f#1@2 f#2@2 f#1@2 f#2!2",
  H: "f#1 f#2 f#1 f#2 f#1 f#2 f#1 f#2", I: "b1@2 b2@2 b1@2 b2@2 b1@2 b2@2 b1@2 b2!2", J: "b1 b2 b1 b2 e1 e2 e1 e2",
})).s("gm_fretless_bass").gain(0.5)

// bass · lead 8 bass lead · "Lead 8 (bass + lead)"
const bass_2 = note("<~@88 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 A B A B ~>".pickRestart({
  A: "b2", B: "f#2",
})).s("gm_lead_8_bass_lead").gain(0.45)

// other · pad metallic · "Pad 6 (metallic)"
const pad_metallic = note("<~@2 [~@2 c#5@2 f#4@11 ~] ~@2 [~@2 f#4 a#4 b4@7 ~@5] [~@2 c#5 f#4@4 ~] ~@114>")
  .s("gm_pad_metallic").gain(0.5).pan(0.4)

// other · pan flute
const pan_flute = note("<~@56 A B C D E B C F G ~@56>".pickRestart({
  A: "~@14 [c#6,d#6] e6", B: "f#6 ~ f#6!2 ~ f#6!2 ~ f#6 ~ f#6!2 ~ f#6!2 ~",
  C: "f#6 ~ f#6!2 ~ f#6!2 ~ f#6 ~ f#6 f#5 ~ f#5!2 ~", D: "f#6 ~ f#6!2 ~ f#6!2 ~ f#6 ~ f#6 e6 ~ e6 d#6 ~",
  E: "c#6 ~@13 [c#6,d#6] e6", F: "f#6 ~ f#6 b6 ~ b6 f#6 ~ f#6 ~ f#6 e6 ~ e6 d#6 ~", G: "c#6 ~@15",
})).s("gm_pan_flute").gain(0.6)

// other · clavinet
const clavinet = note(`<
  ~@9 A B A B A B A B ~@17 A B A B A B A B ~@46 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 A B A B ~
>`.pickRestart({
  A: "b4 b5 f#5 d#5 b4!2 f#4!2 b4 b5 f#5 d#5 b4!2 f#4!2", B: "f#4 f#5 c#5 a#4 f#4!2 c#4!2 f#4 f#5 c#5 a#4 f#4!2 c#4!2",
})).s("gm_clavinet").gain(0.28).pan(0)

// chords · sitar
const sitar = note("<~@25 A B C D A B C D C ~@16 A B C D A B C D C ~@20 A B C D A B C ~@35>".pickRestart({
  A: "[f#4,a#4] ~ [f#4,a#4] ~@5 [f#4,a#4] ~ [f#4,a#4] ~@5", B: "[f#4,b4] ~ [f#4,b4] ~@5 [f#4,b4] ~ [f#4,b4] ~@5",
  C: "[a#4,c#5] ~ [a#4,c#5] ~@5 [a#4,c#5] ~ [a#4,c#5] ~@5", D: "[b4,d#5] ~ [b4,d#5] ~@5 [b4,d#5] ~ [b4,d#5] ~@5",
})).s("gm_sitar").gain(0.36).pan(0.3)

// chords · synth strings 1 · "SynthStrings 1"
const synth_strings_1 = note(`<
  ~@60 A@5 ~@6 B@8 ~@9 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 C D C D C D ~
>`.pickRestart({
  A: "[~@10 f#4@4 b4@12 f#4@4 c#5@12 f#4@4 d#5@4 c#5@4 d#5@4 e5@4 c#5@15 ~@3]/5",
  B: "[b3@8 f#3@2 d#3@4 c#3@8 e3@4 f#3@4 c#4@10 b3@2 a#3@4 g#3@4 f#3@13 ~]/4", C: "[f#4,b4,d#5]@15 ~",
  D: "[f#4,a#4,c#5]@15 ~", // F#
})).s("gm_synth_strings_1").gain(0.45)

// drums · kick
const kick = s("bd").struct("<~@5 [x!4]!82 ~ [x!4]!32 ~>").gain(0.6)

// drums · snare
const snare = s("sd").struct("<~@4 A@5 B@8 A@17 B@8 A@23 C A@2 D C A@15 D E F B@32 ~>".pickRestart({
  A: "~@7 x", B: "~ x ~ x", C: "x ~@6 x", D: "~@14 x!2", E: "x ~@13 x!2", F: "x",
})).gain(0.6)

// drums · low tom
const low_tom = s("lt").struct(`<
  ~ A@8 ~@8 B A B A B A B A B A B A B A B A@2 C@8 B A B A B A B A B A B A B A B A@3 B A B A@2 ~@5 A B A@3 B A B A B A B
  A B A B A@2 C@32 ~
>`.pickRestart({
  A: "x ~ x!2 ~ x!2 ~ x!3 ~ x ~ x ~", B: "x ~ x!2 ~ x!2 ~ x!3 ~ x ~ x!2", C: "~@2 x!3 ~ x ~@3 x!3 ~ x ~",
})).gain(0.48)

// drums · hihat
const hihat = s("hh").struct(`<
  ~@9
  [~@2 x!3 ~@5 x!3 ~@3]!8
  ~@17
  [~@2 x!3 ~@5 x!3 ~@3]!8
  ~@46
  [~@2 x!3 ~@5 x!3 ~@3]!32
  ~
>`).gain(0.6)

// drums · open hat
const open_hat = s("oh").struct("<~@9 [~@3 x ~@3 x]!8 ~@17 [~@3 x ~@3 x]!8 ~@46 [~@3 x ~@3 x]!32 ~>").gain(0.6)

// drums · crash
const crash = s("cr").struct("<~@65 x ~@5 x ~@16 x ~@32>").gain(0.6)

stack(
  acoustic_guitar_steel, piano, electric_guitar_clean, koto, lead_2_sawtooth, bass, bass_2, pad_metallic, pan_flute,
  clavinet, sitar, synth_strings_1, kick, snare, low_tom, hihat, open_hat, crash
)