Merge remote-tracking branch 'origin/main' into in-source-doc

packages/core/index.mjs

@@ -14,4 +14,6 @@ export * from './signal.mjs';
 export * from './state.mjs';
 export * from './timespan.mjs';
 export * from './util.mjs';
+export * from './speak.mjs';
+export * as gist from './gist.js';
 // export * from './value.mjs';

packages/core/package-lock.json

@@ -1,6 +1,6 @@
 {
 	"name": "@strudel.cycles/core",
-	"version": "0.0.5",
+	"version": "0.1.0",
 	"lockfileVersion": 2,
 	"requires": true,
 	"packages": {

packages/core/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@strudel.cycles/core",
-  "version": "0.0.5",
+  "version": "0.1.0",
   "description": "Port of Tidal Cycles to JavaScript",
   "main": "index.mjs",
   "type": "module",

packages/core/pattern.mjs

@@ -450,7 +450,7 @@ export class Pattern {
         // set context type to midi to let the player know its meant as midi number and not as frequency
         return new Hap(hap.whole, hap.part, toMidi(hap.value), { ...hap.context, type: 'midi' });
       }
-      if (dropfail) {
+      if (dropfails) {
         // return 'nothing'
         return undefined;
       }
@@ -461,10 +461,6 @@ export class Pattern {
       throw new Error('cannot parse as number: "' + hap.value + '"');
       return hap;
     });
-    if (dropfail) {
-      return result._removeUndefineds();
-    }
-    return result;
   }
 
   /**
@@ -744,6 +740,14 @@ export class Pattern {
     return this._fast(Fraction(1).div(factor));
   }
 
+  _inside(factor, f) {
+    return f(this._slow(factor))._fast(factor);
+  }
+
+  _outside(factor, f) {
+    return f(this._fast(factor))._slow(factor);
+  }
+
   _ply(factor) {
     return this.fmap((x) => pure(x)._fast(factor))._squeezeJoin();
   }
@@ -870,6 +874,16 @@ export class Pattern {
     return slowcatPrime(...pats);
   }
 
+  /**
+   * Returns a new pattern where every other cycle is played once, twice as
+   * fast, and offset in time by one quarter of a cycle. Creates a kind of
+   * breakbeat feel.
+   * @returns Pattern
+   */
+  brak() {
+    return this.when(slowcat(false, true), (x) => fastcat(x, silence)._late(0.25));
+  }
+
   rev() {
     const pat = this;
     const query = function (state) {
@@ -1007,6 +1021,10 @@ export class Pattern {
   _velocity(velocity) {
     return this._withContext((context) => ({ ...context, velocity: (context.velocity || 1) * velocity }));
   }
+
+  _loopAt(factor,cps=1) {
+    return this.speed((1/factor)*cps).unit("c").slow(factor)
+  }
 }
 
 // TODO - adopt value.mjs fully..
@@ -1430,6 +1448,10 @@ Pattern.prototype.chunkBack = function (...args) {
   args = args.map(reify);
   return patternify2(Pattern.prototype._chunkBack)(...args, this);
 };
+Pattern.prototype.loopAt = function (...args) {
+  args = args.map(reify);
+  return patternify2(Pattern.prototype._loopAt)(...args, this);
+};
 Pattern.prototype.zoom = function (...args) {
   args = args.map(reify);
   return patternify2(Pattern.prototype._zoom)(...args, this);
@@ -1438,6 +1460,14 @@ Pattern.prototype.compress = function (...args) {
   args = args.map(reify);
   return patternify2(Pattern.prototype._compress)(...args, this);
 };
+Pattern.prototype.outside = function (...args) {
+  args = args.map(reify);
+  return patternify2(Pattern.prototype._outside)(...args, this);
+};
+Pattern.prototype.inside = function (...args) {
+  args = args.map(reify);
+  return patternify2(Pattern.prototype._inside)(...args, this);
+};
 
 // call this after all Patter.prototype.define calls have been executed! (right before evaluate)
 Pattern.prototype.bootstrap = function () {

packages/core/speak.mjs

@@ -6,7 +6,13 @@ This program is free software: you can redistribute it and/or modify it under th
 
 import { Pattern, patternify2 } from './index.mjs';
 
-const synth = window?.speechSynthesis;
+let synth;
+try {
+  synth = window?.speechSynthesis;
+} catch (err) {
+  console.warn('cannot use window: not in browser?');
+}
+
 let allVoices = synth?.getVoices();
 // console.log('voices', allVoices);
 

packages/core/test/pattern.test.mjs

@@ -41,6 +41,7 @@ import {
   tri2,
   id,
   ply,
+  rev
 } from '../index.mjs';
 
 import { steady } from '../signal.mjs';
@@ -277,10 +278,7 @@ describe('Pattern', function () {
       );
     });
     it('can SqueezeOut() structure', () => {
-      sameFirst(
-        sequence(1, [2, 3]).keepifSqueezeOut(true, true, false),
-        sequence([1, [2, 3]], [1, [2, 3]], silence),
-      );
+      sameFirst(sequence(1, [2, 3]).keepifSqueezeOut(true, true, false), sequence([1, [2, 3]], [1, [2, 3]], silence));
     });
   });
   describe('sub()', function () {
@@ -439,6 +437,20 @@ describe('Pattern', function () {
       // mini('eb3 [c3 g3]/2 ') always plays [c3 g3]
     });
   });
+  describe('inside', () => {
+    it('can rev inside a cycle', () => {
+      sameFirst(sequence('a', 'b', 'c', 'd').inside(2, rev),
+        sequence('b', 'a', 'd', 'c')
+      );
+    });
+  });
+  describe('outside', () => {
+    it('can rev outside a cycle', () => {
+      sameFirst(sequence('a', 'b', 'c', 'd')._slow(2).outside(2, rev),
+        sequence('d', 'c')
+      );
+    });
+  });
   describe('_filterValues()', function () {
     it('Filters true', function () {
       assert.equal(
@@ -589,6 +601,11 @@ describe('Pattern', function () {
       );
     });
   });
+  describe('brak()', () => {
+    it('Can make something a bit breakbeaty', () => {
+      sameFirst(sequence('a', 'b').brak()._fast(2), sequence('a', 'b', fastcat(silence, 'a'), fastcat('b', silence)));
+    });
+  });
   describe('timeCat()', function () {
     it('Can concatenate patterns with different relative durations', function () {
       assert.deepStrictEqual(