From 70cf2193faa3522bf40ce16fba276f9ee25d767e Mon Sep 17 00:00:00 2001
From: Raphael Forment <raphael.forment@gmail.com>
Date: Thu, 28 Dec 2023 14:50:14 +0100
Subject: [PATCH] new method to sequence samples

---
 Classes/BuboArray.sc  | 11 +++++++++++
 Classes/BuboString.sc |  5 -----
 2 files changed, 11 insertions(+), 5 deletions(-)

diff --git a/Classes/BuboArray.sc b/Classes/BuboArray.sc
index 171d364..bd7904a 100644
--- a/Classes/BuboArray.sc
+++ b/Classes/BuboArray.sc
@@ -1,4 +1,15 @@
 + Array {
+
+  sp {
+    arg repeats=inf;
+    var pat;
+    if (this[0].isString,
+      { pat = Pseq(this[0], inf).collect({|i| Bank(i)}); },
+      { pat = this[0].collect({|i| Bank(i)})}
+    );
+    ^Pindex(pat, this[1], repeats)
+  }
+
   pat {
     arg node_proxy, quant=4, fade=0.05;
     node_proxy.quant_(quant);
diff --git a/Classes/BuboString.sc b/Classes/BuboString.sc
index 4fe3830..af53bca 100644
--- a/Classes/BuboString.sc
+++ b/Classes/BuboString.sc
@@ -1,11 +1,6 @@
 + String {
-
-  /*
-  * Interface with Bank.sc to return a sample faster
-  */
   sp {
     arg sampleNumber = 0, repeats=inf;
     ^Pindex(Bank(this), sampleNumber, repeats);
   }
-
 }