@audiofab-io/fv1-core 0.6.1 → 0.6.3

package/blocks/effects/pitch/octave_up_down.atl

@@ -1,80 +1,80 @@
----
-{
-  "type": "effects.pitch.octave_up_down",
-  "name": "Octave Up & Down",
-  "category": "Effects",
-  "subcategory": "Pitch",
-  "description": "Fixed pitch shifter with both Octave Up and Octave Down outputs.",
-  "color": "#fcba03",
-  "inputs": [
-    {
-      "id": "in",
-      "name": "Input",
-      "type": "audio",
-      "required": true
-    }
-  ],
-  "outputs": [
-    {
-      "id": "octave_down",
-      "name": "Octave Down",
-      "type": "audio"
-    },
-    {
-      "id": "octave_up",
-      "name": "Octave Up",
-      "type": "audio"
-    }
-  ],
-  "memories": [
-    {
-      "id": "delayl",
-      "size": "bufferSize"
-    },
-    {
-      "id": "temp",
-      "size": 1
-    }
-  ],
-  "registers": [],
-  "parameters": []
-}
----
-@section header
-@equals bufferSize 4096
-
-@section init
-; Octave Up (s = 2; rate = (2-1)*16384 = 16384)
-; Octave Down (s = 0.5; rate = (0.5-1)*16384 = -8192)
-skp run, done_init
-wldr 0, -8192, ${bufferSize}
-wldr 1, 16384, ${bufferSize}
-done_init:
-
-@section main
-rdax ${input.in}, 1.0
-wra ${mem.delayl}, 0.0
-
-@if pinConnected(octave_down)
-; Perform Octave Down (RMP0)
-cho rda, RMP0, REG | COMPC, ${mem.delayl}
-cho rda, RMP0, 0, ${mem.delayl} + 1
-wra ${mem.temp}, 0.0
-cho rda, RMP0, RPTR2 | COMPC, ${mem.delayl}
-cho rda, RMP0, RPTR2, ${mem.delayl} + 1
-cho sof, RMP0, NA | COMPC, 0.0
-cho rda, RMP0, NA, ${mem.temp}
-wrax ${output.octave_down}, 0.0
-@endif
-
-@if pinConnected(octave_up)
-; Perform Octave Up (RMP1)
-cho rda, RMP1, REG | COMPC, ${mem.delayl}
-cho rda, RMP1, 0, ${mem.delayl} + 1
-wra ${mem.temp}, 0.0
-cho rda, RMP1, RPTR2 | COMPC, ${mem.delayl}
-cho rda, RMP1, RPTR2, ${mem.delayl} + 1
-cho sof, RMP1, NA | COMPC, 0.0
-cho rda, RMP1, NA, ${mem.temp}
-wrax ${output.octave_up}, 0.0
-@endif
+---
+{
+  "type": "effects.pitch.octave_up_down",
+  "name": "Octave Up & Down",
+  "category": "Effects",
+  "subcategory": "Pitch",
+  "description": "Fixed pitch shifter with both Octave Up and Octave Down outputs.",
+  "color": "#fcba03",
+  "inputs": [
+    {
+      "id": "in",
+      "name": "Input",
+      "type": "audio",
+      "required": true
+    }
+  ],
+  "outputs": [
+    {
+      "id": "octave_down",
+      "name": "Octave Down",
+      "type": "audio"
+    },
+    {
+      "id": "octave_up",
+      "name": "Octave Up",
+      "type": "audio"
+    }
+  ],
+  "memories": [
+    {
+      "id": "delayl",
+      "size": "bufferSize"
+    },
+    {
+      "id": "temp",
+      "size": 1
+    }
+  ],
+  "registers": [],
+  "parameters": []
+}
+---
+@section header
+@equals bufferSize 4096
+
+@section init
+; Octave Up (s = 2; rate = (2-1)*16384 = 16384)
+; Octave Down (s = 0.5; rate = (0.5-1)*16384 = -8192)
+skp run, done_init
+wldr 0, -8192, ${bufferSize}
+wldr 1, 16384, ${bufferSize}
+done_init:
+
+@section main
+rdax ${input.in}, 1.0
+wra ${mem.delayl}, 0.0
+
+@if pinConnected(octave_down)
+; Perform Octave Down (RMP0)
+cho rda, RMP0, REG | COMPC, ${mem.delayl}
+cho rda, RMP0, 0, ${mem.delayl} + 1
+wra ${mem.temp}, 0.0
+cho rda, RMP0, RPTR2 | COMPC, ${mem.delayl}
+cho rda, RMP0, RPTR2, ${mem.delayl} + 1
+cho sof, RMP0, NA | COMPC, 0.0
+cho rda, RMP0, NA, ${mem.temp}
+wrax ${output.octave_down}, 0.0
+@endif
+
+@if pinConnected(octave_up)
+; Perform Octave Up (RMP1)
+cho rda, RMP1, REG | COMPC, ${mem.delayl}
+cho rda, RMP1, 0, ${mem.delayl} + 1
+wra ${mem.temp}, 0.0
+cho rda, RMP1, RPTR2 | COMPC, ${mem.delayl}
+cho rda, RMP1, RPTR2, ${mem.delayl} + 1
+cho sof, RMP1, NA | COMPC, 0.0
+cho rda, RMP1, NA, ${mem.temp}
+wrax ${output.octave_up}, 0.0
+@endif

package/blocks/effects/pitch/pitch_offset.atl

@@ -1,149 +1,149 @@
----
-{
-  "type": "effects.pitch.pitch_offset",
-  "name": "Pitch Offset (Hilbert)",
-  "category": "Effects",
-  "subcategory": "Pitch",
-  "description": "Bipolar frequency shift (+/-). Neutral at 12 o'clock, turning down lowers pitch, turning up raises pitch.",
-  "color": "#fcba03",
-  "inputs": [
-    {
-      "id": "in",
-      "name": "Audio Input",
-      "type": "audio",
-      "required": true
-    },
-    {
-      "id": "shift_ctrl",
-      "name": "Shift CV",
-      "type": "control",
-      "required": false,
-      "parameter": "shiftValue"
-    }
-  ],
-  "outputs": [
-    {
-      "id": "out",
-      "name": "Output",
-      "type": "audio"
-    }
-  ],
-  "parameters": [
-    {
-      "id": "shiftRange",
-      "name": "Shift Range (Hz)",
-      "type": "number",
-      "default": 600,
-      "min": 1,
-      "max": 2000,
-      "conversion": "HZ_TO_HILBERT_SHIFT",
-      "description": "The total frequency range covered by the Shift control (e.g. 600 means +/- 300Hz)."
-    },
-    {
-      "id": "shiftValue",
-      "name": "Shift",
-      "type": "number",
-      "default": 0.5,
-      "min": 0.0,
-      "max": 1.0,
-      "step": 0.01,
-      "description": "Manual control for pitch shift. 0.5 is neutral (no shift)."
-    }
-  ],
-  "registers": [
-    "sigs",
-    "sigc",
-    "lpf",
-    "hpf",
-    "sigfil",
-    "sinosc",
-    "cososc",
-    "temp",
-    "shift_amount",
-    "potfil"
-  ],
-  "memories": [
-    { "id": "ap1", "size": 2 },
-    { "id": "ap2", "size": 2 },
-    { "id": "ap3", "size": 2 },
-    { "id": "ap4", "size": 2 },
-    { "id": "ap5", "size": 2 },
-    { "id": "ap6", "size": 2 }
-  ]
-}
----
-@section header
-
-@section init
-; Initialize oscillator (cosine = 1.0)
-skp run, done_init
-or $7fffff
-wrax ${reg.cososc}, 0.0
-done_init:
-
-@section main
-; 1. Process CV and smoothing
-@cv shift_ctrl
-; ACC = Shift position (0..1, defaults to 0.5)
-rdfx ${reg.potfil}, 0.001
-wrlx ${reg.potfil}, -1.0
-; Map [0..1] to [Range/2 .. -Range/2]
-; Bipolar: (0.5 - shiftValue) * Range
-sof -1.0, 0.5
-sof ${shiftRange}, 0.0 ; Substitutes converted HZ_TO_HILBERT_SHIFT value
-wrax ${reg.shift_amount}, 0.0
-
-; 2. Audio input filtering (300Hz HPF, 3kHz LPF)
-rdax ${input.in}, 1.0
-rdfx ${reg.hpf}, 0.04
-wrhx ${reg.hpf}, -1.0
-rdfx ${reg.lpf}, 0.4
-wrlx ${reg.lpf}, -1.0
-wrax ${reg.sigfil}, 0.0039 ; Attenuate to avoid clipping in Hilbert chain
-
-; 3. All-pass phase shifter bank (Sine path)
-rda ${mem.ap1} + 1, 0.995 ; 44Hz
-wrap ${mem.ap1}, -0.995
-rda ${mem.ap2} + 1, 0.937 ; 488Hz
-wrap ${mem.ap2}, -0.937
-rda ${mem.ap3} + 1, 0.61 ; 3531Hz
-wrap ${mem.ap3}, -0.61
-wrax ${reg.sigs}, 0.0
-
-; 4. All-pass phase shifter bank (Cosine path)
-rdax ${reg.sigfil}, 0.0039 ; Match Sine path attenuation
-rda ${mem.ap4} + 1, 0.978 ; 178Hz
-wrap ${mem.ap4}, -0.978
-rda ${mem.ap5} + 1, 0.84 ; 1289Hz
-wrap ${mem.ap5}, -0.84
-rda ${mem.ap6} + 1, 0.0
-wrap ${mem.ap6}, 0.0
-wrax ${reg.sigc}, 0.0
-
-; 5. Update Oscillator (Quadrature oscillator)
-rdax ${reg.cososc}, 1.0
-mulx ${reg.shift_amount}
-rdax ${reg.sinosc}, 1.0
-wrax ${reg.sinosc}, -1.0
-mulx ${reg.shift_amount}
-rdax ${reg.cososc}, 1.0
-wrax ${reg.cososc}, 0.0
-
-; 6. Modulation and Summing (Hilbert - SpinCAD pattern)
-; Sum = -2 * (in_c * cos + in_s * sin) -> Frequency DOWN if rate > 0
-rdax ${reg.sigc}, -2.0
-mulx ${reg.cososc}
-wrax ${reg.temp}, 0.0
-rdax ${reg.sigs}, -2.0
-mulx ${reg.sinosc}
-rdax ${reg.temp}, 1.0
-
-; Scale back up to recovery signal level
-sof -2.0, 0.0
-sof -2.0, 0.0
-sof -2.0, 0.0
-sof -2.0, 0.0
-sof -2.0, 0.0
-sof -2.0, 0.0
-sof -2.0, 0.0
-wrax ${output.out}, 0.0
+---
+{
+  "type": "effects.pitch.pitch_offset",
+  "name": "Pitch Offset (Hilbert)",
+  "category": "Effects",
+  "subcategory": "Pitch",
+  "description": "Bipolar frequency shift (+/-). Neutral at 12 o'clock, turning down lowers pitch, turning up raises pitch.",
+  "color": "#fcba03",
+  "inputs": [
+    {
+      "id": "in",
+      "name": "Audio Input",
+      "type": "audio",
+      "required": true
+    },
+    {
+      "id": "shift_ctrl",
+      "name": "Shift CV",
+      "type": "control",
+      "required": false,
+      "parameter": "shiftValue"
+    }
+  ],
+  "outputs": [
+    {
+      "id": "out",
+      "name": "Output",
+      "type": "audio"
+    }
+  ],
+  "parameters": [
+    {
+      "id": "shiftRange",
+      "name": "Shift Range (Hz)",
+      "type": "number",
+      "default": 600,
+      "min": 1,
+      "max": 2000,
+      "conversion": "HZ_TO_HILBERT_SHIFT",
+      "description": "The total frequency range covered by the Shift control (e.g. 600 means +/- 300Hz)."
+    },
+    {
+      "id": "shiftValue",
+      "name": "Shift",
+      "type": "number",
+      "default": 0.5,
+      "min": 0.0,
+      "max": 1.0,
+      "step": 0.01,
+      "description": "Manual control for pitch shift. 0.5 is neutral (no shift)."
+    }
+  ],
+  "registers": [
+    "sigs",
+    "sigc",
+    "lpf",
+    "hpf",
+    "sigfil",
+    "sinosc",
+    "cososc",
+    "temp",
+    "shift_amount",
+    "potfil"
+  ],
+  "memories": [
+    { "id": "ap1", "size": 2 },
+    { "id": "ap2", "size": 2 },
+    { "id": "ap3", "size": 2 },
+    { "id": "ap4", "size": 2 },
+    { "id": "ap5", "size": 2 },
+    { "id": "ap6", "size": 2 }
+  ]
+}
+---
+@section header
+
+@section init
+; Initialize oscillator (cosine = 1.0)
+skp run, done_init
+or $7fffff
+wrax ${reg.cososc}, 0.0
+done_init:
+
+@section main
+; 1. Process CV and smoothing
+@cv shift_ctrl
+; ACC = Shift position (0..1, defaults to 0.5)
+rdfx ${reg.potfil}, 0.001
+wrlx ${reg.potfil}, -1.0
+; Map [0..1] to [Range/2 .. -Range/2]
+; Bipolar: (0.5 - shiftValue) * Range
+sof -1.0, 0.5
+sof ${shiftRange}, 0.0 ; Substitutes converted HZ_TO_HILBERT_SHIFT value
+wrax ${reg.shift_amount}, 0.0
+
+; 2. Audio input filtering (300Hz HPF, 3kHz LPF)
+rdax ${input.in}, 1.0
+rdfx ${reg.hpf}, 0.04
+wrhx ${reg.hpf}, -1.0
+rdfx ${reg.lpf}, 0.4
+wrlx ${reg.lpf}, -1.0
+wrax ${reg.sigfil}, 0.0039 ; Attenuate to avoid clipping in Hilbert chain
+
+; 3. All-pass phase shifter bank (Sine path)
+rda ${mem.ap1} + 1, 0.995 ; 44Hz
+wrap ${mem.ap1}, -0.995
+rda ${mem.ap2} + 1, 0.937 ; 488Hz
+wrap ${mem.ap2}, -0.937
+rda ${mem.ap3} + 1, 0.61 ; 3531Hz
+wrap ${mem.ap3}, -0.61
+wrax ${reg.sigs}, 0.0
+
+; 4. All-pass phase shifter bank (Cosine path)
+rdax ${reg.sigfil}, 0.0039 ; Match Sine path attenuation
+rda ${mem.ap4} + 1, 0.978 ; 178Hz
+wrap ${mem.ap4}, -0.978
+rda ${mem.ap5} + 1, 0.84 ; 1289Hz
+wrap ${mem.ap5}, -0.84
+rda ${mem.ap6} + 1, 0.0
+wrap ${mem.ap6}, 0.0
+wrax ${reg.sigc}, 0.0
+
+; 5. Update Oscillator (Quadrature oscillator)
+rdax ${reg.cososc}, 1.0
+mulx ${reg.shift_amount}
+rdax ${reg.sinosc}, 1.0
+wrax ${reg.sinosc}, -1.0
+mulx ${reg.shift_amount}
+rdax ${reg.cososc}, 1.0
+wrax ${reg.cososc}, 0.0
+
+; 6. Modulation and Summing (Hilbert - SpinCAD pattern)
+; Sum = -2 * (in_c * cos + in_s * sin) -> Frequency DOWN if rate > 0
+rdax ${reg.sigc}, -2.0
+mulx ${reg.cososc}
+wrax ${reg.temp}, 0.0
+rdax ${reg.sigs}, -2.0
+mulx ${reg.sinosc}
+rdax ${reg.temp}, 1.0
+
+; Scale back up to recovery signal level
+sof -2.0, 0.0
+sof -2.0, 0.0
+sof -2.0, 0.0
+sof -2.0, 0.0
+sof -2.0, 0.0
+sof -2.0, 0.0
+sof -2.0, 0.0
+wrax ${output.out}, 0.0