From a4c4c6025cda2fce048161bc0388b0f9eb8363e1 Mon Sep 17 00:00:00 2001
From: eefano <77832+eefano@users.noreply.github.com>
Date: Tue, 2 Jul 2024 19:05:34 +0200
Subject: [PATCH] start-and-loop

Adds setLoop(start, length) and cyclecounter() widget.
---
 packages/codemirror/widget.mjs |  5 +++++
 packages/core/cyclist.mjs      | 21 ++++++++++++++++++++-
 packages/core/repl.mjs         |  3 +++
 packages/draw/cyclecounter.mjs | 16 ++++++++++++++++
 packages/draw/index.mjs        |  1 +
 5 files changed, 45 insertions(+), 1 deletion(-)
 create mode 100644 packages/draw/cyclecounter.mjs

diff --git a/packages/codemirror/widget.mjs b/packages/codemirror/widget.mjs
index 72b4ec65d..b4c0a16d3 100644
--- a/packages/codemirror/widget.mjs
+++ b/packages/codemirror/widget.mjs
@@ -133,3 +133,8 @@ registerWidget('_pitchwheel', (id, options = {}, pat) => {
   const ctx = getCanvasWidget(id, options).getContext('2d');
   return pat.pitchwheel({ ...options, ctx, id });
 });
+
+registerWidget('_cyclecounter', (id, options = {}, pat) => {
+  const ctx = getCanvasWidget(id, options).getContext('2d');
+  return pat.cyclecounter({ ...options, ctx, id });
+});
diff --git a/packages/core/cyclist.mjs b/packages/core/cyclist.mjs
index 472e83a8b..f0eabd5cb 100644
--- a/packages/core/cyclist.mjs
+++ b/packages/core/cyclist.mjs
@@ -23,6 +23,8 @@ export class Cyclist {
     this.beforeStart = beforeStart;
     this.cps = 0.5;
     this.num_ticks_since_cps_change = 0;
+    this.loopStart = 0;
+    this.loopLength = 0;
     this.lastTick = 0; // absolute time when last tick (clock callback) happened
     this.lastBegin = 0; // query begin of last tick
     this.lastEnd = 0; // query end of last tick
@@ -48,6 +50,10 @@ export class Cyclist {
           this.lastBegin = begin;
           const end = this.num_cycles_at_cps_change + num_cycles_since_cps_change;
           this.lastEnd = end;
+          if (this.loopLength > 0 && this.lastEnd >= this.loopStart + this.loopLength) {
+            this.lastEnd = this.loopStart + (this.lastEnd % 1);
+            this.num_ticks_since_cps_change = 0;
+          }
           this.lastTick = phase;
 
           if (phase < t) {
@@ -112,7 +118,7 @@ export class Cyclist {
   stop() {
     logger('[cyclist] stop');
     this.clock.stop();
-    this.lastEnd = 0;
+    this.lastEnd = this.loopStart;
     this.setStarted(false);
   }
   async setPattern(pat, autostart = false) {
@@ -128,6 +134,19 @@ export class Cyclist {
     this.cps = cps;
     this.num_ticks_since_cps_change = 0;
   }
+  setLoop(start = 0, length = 0) {
+    if (start >= 0 && length >= 0) {
+      start = Math.floor(start);
+      length = Math.floor(length);
+
+      if (start != this.loopStart || length != this.loopLength) {
+        this.loopStart = Math.floor(start);
+        this.loopLength = Math.floor(length);
+        this.lastEnd = this.loopStart + (this.lastEnd % 1);
+        this.num_ticks_since_cps_change = 0;
+      }
+    }
+  }
   log(begin, end, haps) {
     const onsets = haps.filter((h) => h.hasOnset());
     console.log(`${begin.toFixed(4)} - ${end.toFixed(4)} ${Array(onsets.length).fill('I').join('')}`);
diff --git a/packages/core/repl.mjs b/packages/core/repl.mjs
index 016eca3ee..69825ba2c 100644
--- a/packages/core/repl.mjs
+++ b/packages/core/repl.mjs
@@ -84,6 +84,7 @@ export function repl({
   const toggle = () => scheduler.toggle();
   const setCps = (cps) => scheduler.setCps(cps);
   const setCpm = (cpm) => scheduler.setCps(cpm / 60);
+  const setLoop = (start, length) => scheduler.setLoop(start, length);
   const all = function (transform) {
     allTransform = transform;
     return silence;
@@ -137,6 +138,8 @@ export function repl({
       setcps: setCps,
       setCpm,
       setcpm: setCpm,
+      setLoop,
+      setloop: setLoop,
     });
   };
 
diff --git a/packages/draw/cyclecounter.mjs b/packages/draw/cyclecounter.mjs
new file mode 100644
index 000000000..d23c3adac
--- /dev/null
+++ b/packages/draw/cyclecounter.mjs
@@ -0,0 +1,16 @@
+import { Pattern } from '@strudel/core';
+
+Pattern.prototype.cyclecounter = function (options = {}) {
+  return this.onPaint((ctx, time, haps, drawTime) => {
+    ctx.clearRect(0, 0, ctx.canvas.width, ctx.canvas.height);
+
+    ctx.font = options.font || '2em monospace';
+    ctx.fillStyle = options.color || 'red';
+    ctx.textBaseline = 'bottom';
+    ctx.textAlign = 'right';
+
+    const div = options.div || 1;
+
+    ctx.fillText('Cycle' + (div > 1 ? '/' + div : '') + ' ' + ((time / div) >> 0), ctx.canvas.width, ctx.canvas.height);
+  });
+};
diff --git a/packages/draw/index.mjs b/packages/draw/index.mjs
index 506c6151d..58949acbb 100644
--- a/packages/draw/index.mjs
+++ b/packages/draw/index.mjs
@@ -4,3 +4,4 @@ export * from './draw.mjs';
 export * from './pianoroll.mjs';
 export * from './spiral.mjs';
 export * from './pitchwheel.mjs';
+export * from './cyclecounter.mjs';