// Aquarius — Gary Fane
// 173 bpm, 4/4, key A minor. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: Full arrangement: all 102 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(173/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 · "Bass 1"
const bass = note("<A B C D E F G B H D I J@3 ~@88>".pickRestart({
  A: "~@6 a2@2 ~@2 a2@2 ~@2 a2 ~", B: "c3", C: "~@2 d3@2 ~@2 c3 ~ d3@2 ~@2 c3@4", D: "a2@5 ~ a2@2 ~@2 a2 ~@3 a2 ~",
  E: "c3@7 ~", F: "~@2 e3@2 d3@2 c3@2 d3@3 c3@4 ~", G: "a2@5 ~ a2 ~@3 a2 ~@3 a2 ~", H: "~@2 d3 ~@3 c3 ~ d3@4 c3@4",
  I: "c3@15 ~", J: "[~ e3@3 d3@2 c3@2 d3@3 c3@4 a2@24 ~@9]/3",
})).s("gm_fretless_bass").gain(0.3)

// bass · fretless bass · "Bass 2"
const bass_2 = note(`<
  A B C D E F G B H D I J@3 K L M N O L P N O L Q R S L T ~ U V W X Y K Z AA@2 AB AC AD AE AF AG AH AI AJ AK AJ AL AH AM
  AN K AO AP AQ AR AS AT@2 AU AV K L M N O L P N O L Q R S L T ~ U V W X Y K Z AA@2 AB AC AD AE K Z AA@2 AB AC AD AE AF
>`.pickRestart({
  A: "~@6 e2@2 ~@2 e2@2 ~@2 e2 ~", B: "g2", C: "~@2 a2@2 ~@2 g2 ~ a2@2 ~@2 g2@4", D: "e2@5 ~ e2@2 ~@2 e2 ~@3 e2 ~",
  E: "g2@7 ~", F: "~@2 b2@2 a2@2 g2@2 a2@3 g2@4 ~", G: "e2@5 ~ e2 ~@3 e2 ~@3 e2 ~", H: "~@2 a2 ~@3 g2 ~ a2@4 g2@4",
  I: "g2@15 ~", J: "[~ b2@3 a2@2 g2@2 a2@3 g2@4 e2@24 ~@9]/3", K: "d2@4 ~@2 d2 ~ d2@4 ~@2 d2@2",
  L: "g1@4 ~@2 g1 ~ g1@4 ~@2 g1@2", M: "a1@4 ~@2 a1 ~ a1@6 e2@2", N: "a1@4 ~@2 a1 ~ a1@5 ~ c2@2",
  O: "d2@5 ~ d2 ~ d2@4 ~@2 d2@2", P: "a1@4 ~@2 a1 ~ a1@5 ~ e2@2", Q: "a1@4 ~@2 a1 ~ a1@4 ~@2 g1@2",
  R: "a1 ~ a1@2 ~@2 a1@6 g1@4", S: "f1@4 ~@2 f1 ~ f1@5 ~ f1@2", T: "c2@3 ~@13", U: "a#1@4 ~@2 a#1 ~ a#1@7 ~",
  V: "a#1@4 ~@2 a#1 ~ a#1@5 ~ [f1,g1] ~", W: "a#1@4 ~@2 a#1 ~ a#1@5 ~ a#1 ~", X: "a#1@4 ~@2 a#1 ~ a#1@6 c2@2",
  Y: "d2@5 ~ d2 ~ d2@7 ~", Z: "g1@5 ~ g1 ~ g1@6 ~@2", AA: "g1@4 ~@2 g1 ~ g1@6 ~@2", AB: "g1 ~@7",
  AC: "d2@4 ~@2 d2 ~ d2@6 a1 ~", AD: "d2 ~ d2@4 ~@2 d2@6 a1@2", AE: "d2@3 ~ d2@3 ~ d2@4 a1@4", AF: "d2 ~@7",
  AG: "c2@5 ~ c2 ~ c2@5 ~ c2@2", AH: "f2@5 ~ f2 ~ f2@4 ~@2 f2@2", AI: "c2@4 ~@2 c2 ~ c2@5 ~ c2@2",
  AJ: "f2@4 ~@2 f2 ~ f2@4 ~@2 f2@2", AK: "c2@4 ~@2 c2 ~ c2@4 ~@2 c2@2", AL: "d2@5 ~ d2@2 e2@4 ~@2 e2@2",
  AM: "f1@2 ~ f1 a1@2 ~ a1", AN: "d2@4 ~@2 d2 ~ d2@7 ~", AO: "g1@2 ~ g1 a1@2 ~ a1", AP: "a#1@5 ~ a#1 ~ a#1@5 ~ f1@2",
  AQ: "a#1@5 ~ a#1 ~ a#1@6 f1@2", AR: "a#1@4 ~@2 a#1 ~ a#1@5 ~ f1@2", AS: "a#1 ~@6 c2", AT: "d2@4 ~@2 d2 ~ d2@5 ~ a1@2",
  AU: "d2@3 ~@3 d2 ~ d2@5 ~ a1@2", AV: "d2@3 ~@13",
})).s("gm_fretless_bass").gain(0.35)

// chords · piano · "Keyboard 1"
const piano = note(`<
  A B A ~ B A ~ C A ~ B A D@2 E F G H E I G J E I K L M N O ~ P@3 Q R@2 S@2 T U V W X Y Z AA AB AC AB AD AE AF AG AH AI
  AJ AK AL AM AN AO@2 AP Y E F G H E I G J E I K L M N O ~ P@2 AQ AR R W S@2 T U V W X W S@2 T U V W X AS
>`.pickRestart({
  A: "a1 ~@7", B: "~@4 c2 a1 ~ g1", C: "~ e2 d2 c2 d2@2 c2@2", D: "[a1@25 ~@7]/2", E: "[a3,d4,f4]@7 ~",
  F: "[b3,d4,f4]@13 ~@3", G: "[a3,c4,e4]@9 ~ [a3,c4,e4] ~@5", H: "[a3,c4,e4]@13 ~@3", I: "[b3,d4,f4]@7 ~",
  J: "[a3,c4,e4]@3 ~ [a3,c4,e4]@6 ~@2 [a3,e4]@2 ~@2, ~@12 c4 ~@3", K: "[a3,c4,e4]",
  L: "~@2 [a3,c4,e4] ~@5 [a3,c4,e4]@4 ~@4", M: "[f3,a3,c4]@13 ~@3", N: "[g3,b3,d4]@3 ~", O: "[g3,c4,e4] ~@7",
  P: "~@2 [a#3,d4,f4] ~@5 [a#3,d4,f4]@8", Q: "~@2 [a#3,d4,f4] ~@5 [a#3,d4,f4]@7 ~",
  R: "~@2 [a3,d4,f4] ~@5 [a3,d4,f4]@8", S: "~@2 [b3,d4,g4] ~@5 [b3,d4,g4]@8", T: "~@2 [b3,d4,g4] ~@5 [b3,d4,g4]@6 ~@2",
  U: "[b3,d4,g4] ~@15", V: "[a3,d4,f4] f4@2 f4 [a3,d4,f4]@4, ~ [a3,d4]@3 ~@4",
  W: "~@2 [a3,d4,f4] ~@3 f4 ~ [a3,d4,f4]@8", X: "~@2 [a3,d4,f4] ~@5 [a3,d4,f4]@6 ~@2", Y: "[a3,d4,f4] ~@15",
  Z: "[g3,c4,e4]@7 ~", AA: "[a3,c4,f4]@7 ~", AB: "[g3,c4,e4]@13 ~@3", AC: "[a3,c4,f4]@13 ~@3", AD: "[a3,c4,f4]@3 ~",
  AE: "[a3,d4,f4]@7 ~ [c4,e4,g4]@6 ~@2", AF: "[c4,f4,a4]@7 ~", AG: "[c4,f4,a4]@3 ~ [c#4,e4,g4]@3 ~",
  AH: "[d4,f4,a4]@7 ~", AI: "~@2 [f4,a4] ~@3 a4 ~ [d4,f4,a4]@6 ~@2, ~ d4 ~@6", AJ: "[g3,a#3,d4]@3 ~ [a3,c4,e4]@4",
  AK: "[d4,f4] ~ [d4,f4]@4 ~@4 [a#3,d4,f4] ~@5, a#3@5 ~@11", AL: "[a#3,d4,f4]@4 ~ [a#3,d4] ~@2, ~@10 f4 ~@5",
  AM: "[a#3,d4,f4]@7 ~@3 [a#3,d4,f4]@4 ~@2", AN: "[a#3,d4,f4] ~@15", AO: "[a3,d4,f4]@8 ~@2 [a3,d4,f4] ~@5",
  AP: "[a3,d4,f4]@8 ~@2 [a3,d4,f4]@3 ~@3", AQ: "~@2 [a#3,d4,f4] ~@3 f4 ~ [a#3,d4,f4]@8",
  AR: "~@2 [a#3,d4,f4] ~@3 f4 ~ [a#3,d4,f4]@7 ~", AS: "[d4,f4,a4] ~@3",
})).s("gm_piano").gain(0.32).pan(0.4)

// chords · pad bowed · "Keyboard 2"
const pad_bowed = note("<A@2 B@3 C@3 D@3 E F@2 ~@88>".pickRestart({
  A: "[[e5,a5]@22 ~@2 [d5,g5]@5 ~@3]/2", B: "[[e5,a5]@37 ~@3 [d5,g5]@6 ~@2]/3", C: "[[e5,a5]@38 ~@2 [d5,g5]@5 ~@3]/3",
  D: "[[e5,a5]@37 ~@3 [d5,g5]@5 ~@3]/3", E: "[e5,a5]@7 ~", F: "[[c5,e5,a5]@15 ~]/2",
})).s("gm_pad_bowed").gain(0.09).pan(0.6)

// chords · pad sweep · "Keyboard 3"
const pad_sweep = note("<~@30 A@4 B@2 C@4 D@4 ~@36 A@4 B@2 C@4 D@4 C@4 E F ~@2>".pickRestart({
  A: "[[d4,f4,a#4]@31 ~]/4", B: "[[d4,f4,a4]@15 ~]/2", C: "[[d4,g4,b4]@49 ~@15]/4",
  D: "[~@30 a3@19 ~@15, [d4,f4,a4]@49 ~@15]/4", E: "[d4,f4,a4]@3 ~@13", F: "~@7 a3",
})).s("gm_pad_sweep").gain(0.22)

// chords · rock organ · "Organ"
const rock_organ = note("<~@44 A@4 B@2 C D E F@2 G H@4 I J ~@40>".pickRestart({
  A: "[[e4,g4]@8 [f4,a4]@8 [e4,g4]@8 [f4,a4]@7 ~, c4@31 ~]/4", B: "[[e4,g4]@8 [f4,a4]@7 ~, c4@15 ~]/2",
  C: "[d4,f4,a4]@4 [c4,e4,g4]@3 ~", D: "[c4,f4,a4]@7 ~", E: "[c4,f4,a4] [c#4,e4,g4]", F: "[d4,f4,a4]@7 ~",
  G: "[g4,a#4,d5]@8 [a4,c5,e5]@7 ~", H: "[[a#4,d5,f5]@49 ~@15]/4", I: "[a4,d5,f5]@3 ~@13", J: "~@6 d6@3 ~@7",
})).s("gm_rock_organ").gain(0.25).pan(0.3)

// drums · kick
const kick = s("bd").struct("<~@14 [x ~@2 x!2 ~@3]!49 x [x ~@2 x!2 ~@3]!37 ~>").gain(0.4)

// drums · snare
const snare = s("sd").struct("<~@14 A@15 B A@33 ~ A@15 B A@21 ~>".pickRestart({
  A: "~@3 x", B: "~@6 x!2",
})).gain(0.45)

// drums · low tom
const low_tom = s("lt").struct("<~@43 [~@3 x] ~@58>").gain(0.4)

// drums · pedal hat
const pedal_hat = s("hh").struct("<~@14 [~ x ~@2]!87 ~>").gain(0.5)

// drums · mid tom
const mid_tom = s("mt").struct("<~@43 [~@5 x ~@2] ~@58>").gain(0.45)

// drums · ride
const ride = s("rd").struct("<x!4 [~@5 x ~@2 x ~@5 x ~] [x!2]!2 [x ~@3 x ~@2 x] [x!2]!2 [x ~@3 x ~@2 x]!2 x ~@89>")
  .gain(0.2)

// drums · cabasa
const cabasa = s("cabasa:4").struct(`<
  ~@14 A B C A D E C A C A@2 E A@2 ~@2 C A@8 F A C A ~ A@4 D C D A@3 E C A@3 F C A@2 ~ A B C A D E C A C A@2 E A@2 ~@2 C
  A@8 F A C A@5 F A C A ~
>`.pickRestart({
  A: "~ x ~ x ~ x ~ x", B: "~@5 x ~@2", C: "~ x ~ x ~ x ~@2", D: "~@3 x ~ x ~ x", E: "~@3 x ~ x ~@2", F: "~ x ~@6",
})).gain(0.75)

// drums · cabasa · soft notes
const cabasa_soft = s("cabasa:4").struct(`<
  ~@15 A B ~ C D B ~ B ~@2 D ~@23 B C ~@3 D B ~@4 B ~@4 A B ~ C D B ~ B ~@2 D ~@26
>`.pickRestart({
  A: "~ x ~ x ~@3 x", B: "~@7 x", C: "~ x ~@6", D: "~ x ~@5 x",
})).gain(0.5)

// drums · shaker
const shaker = s("sh").struct(`<
  ~@14 A B C D B@2 A@2 D A E@3 D F ~ E A@2 B C G H E D F H D E F H C A B H A E@2 D E D E H E H F E@2 I F A B C D B@2 A@2
  D A E@3 D F ~ E A@2 B C G H E D F H D E G H E D F H D E ~
>`.pickRestart({
  A: "x!3 ~", B: "~ x!2 ~", C: "x!2", D: "~ x!3", E: "x!4", F: "x", G: "~@2 x!2", H: "x ~ x!2", I: "x!2 ~ x",
})).gain(0.2)

// drums · shaker · soft notes
const shaker_soft = s("sh").struct(`<
  ~@14 A ~ B C D ~ A@2 C A ~@3 C ~@4 A ~ A C ~@4 B ~@4 A ~@3 A ~@2 C ~@3 B ~@2 E ~@2 F ~ A ~ B C D ~ A@2 C A ~@3 C ~@4 A
  ~ A C ~@4 B ~@2 C ~@4 B ~@3
>`.pickRestart({
  A: "~@3 x", B: "~ x ~@2", C: "x", D: "x ~@2 x", E: "~@5 x ~@2", F: "~ x",
})).gain(0.15)

// drums · triangle
const triangle = s("triangles:35").struct("<~@44 A B C B D A B D A B D A B D E ~ F D G ~@39>".pickRestart({
  A: "x ~ x!2 ~ x!2 ~", B: "x!2 ~ x!2 ~ x!2", C: "~@2 x!2 ~ x!2 ~", D: "~ x!2 ~ x!2 ~ x", E: "x ~ x ~ x ~ x!2",
  F: "x ~@2 x!2 ~ x!2", G: "~@2 x ~ x ~ x!2",
})).gain(1.73)

// drums · rim
const rim = s("rim").struct("<~@44 A B A B C A B C A B C A B C D E B C F E ~@38>".pickRestart({
  A: "~ x ~@2 x ~@2 x", B: "~@2 x ~@2 x ~@2", C: "x ~@2 x ~@2 x ~", D: "~ x ~ x ~ x ~@2", E: "x", F: "x ~@2 x!3 ~@2",
})).gain(0.4)

stack(
  bass, bass_2, piano, pad_bowed, pad_sweep, rock_organ, kick, snare, low_tom, pedal_hat, mid_tom, ride, cabasa,
  cabasa_soft, shaker, shaker_soft, triangle, rim
)