Add composable ASCII art with per-cell effects and explicit effect loading
Implements ascii_fx_zone effect that allows applying arbitrary sexp effects to each character cell via cell_effect lambdas. Each cell is rendered as a small image that effects can operate on. Key changes: - New ascii_fx_zone effect with cell_effect parameter for per-cell transforms - Zone context (row, col, lum, sat, hue, etc.) available in cell_effect lambdas - Effects are now loaded explicitly from recipe declarations, not auto-loaded - Added effects_registry to plan for explicit effect dependency tracking - Updated effect definition syntax across all sexp effects - New run_staged.py for executing staged recipes - Example recipes demonstrating alternating rotation and blur/rgb_split patterns Co-Authored-By: Claude Opus 4.5 <noreply@anthropic.com>
This commit is contained in:
@@ -6,8 +6,10 @@
|
||||
;; (def segments (beat-alternate beats-data (list video-a video-b)))
|
||||
|
||||
(define-construct beat-alternate
|
||||
"Alternate between sources on each beat"
|
||||
(analysis sources)
|
||||
:params (
|
||||
(analysis :type any :desc "Analysis data with :times")
|
||||
(sources :type any :desc "List of source nodes to alternate between")
|
||||
)
|
||||
;; Body: map over time pairs, return segment descriptors
|
||||
(let [times (get analysis :times)
|
||||
pairs (zip-pairs (cons 0 times))
|
||||
|
||||
@@ -8,8 +8,13 @@
|
||||
;; Binding specs {:bind "analyzer" :range [min max]} are resolved to actual bindings
|
||||
|
||||
(define-construct cycle-effects-preset
|
||||
"Cycle through effects from a data preset, with automatic binding resolution"
|
||||
()
|
||||
:params (
|
||||
(preset :type any :desc "List of effect preset definitions")
|
||||
(videos :type any :desc "List of video source nodes")
|
||||
(video_infos :type any :desc "List of video info analysis results")
|
||||
(beats :type any :desc "Beat analysis data with :times")
|
||||
(beats_per_segment :type int :default 4 :desc "Number of beats per segment")
|
||||
)
|
||||
(let [num-effects (len preset)
|
||||
num-videos (len videos)
|
||||
;; Extract durations from video-info analysis results
|
||||
|
||||
@@ -12,9 +12,12 @@
|
||||
;; Groups every N analysis times into one segment, calling reducer once per group
|
||||
|
||||
(define-construct slice-every-n
|
||||
"Group every N analysis beats into segments"
|
||||
(analysis n)
|
||||
;; 'init' and 'reducer' come from keyword args
|
||||
:params (
|
||||
(analysis :type any :desc "Analysis data with :times")
|
||||
(n :type int :default 4 :desc "Number of beats per segment")
|
||||
(init :type any :default 0 :desc "Initial accumulator value")
|
||||
(reducer :type any :desc "Reducer function (fn [acc i start end] ...)")
|
||||
)
|
||||
;; Reducer receives: (acc, i, start, end) where start/end are audio beat times
|
||||
;; Reducer returns: {:source src :effects fx :acc new-acc}
|
||||
;; Optionally include :start/:end to override (e.g., for wrapping/randomizing)
|
||||
|
||||
@@ -15,9 +15,11 @@
|
||||
;; - :reducer as 'reducer' (the reducer lambda)
|
||||
|
||||
(define-construct slice-on
|
||||
"Iterate over analysis times, calling reducer for each slice"
|
||||
(analysis)
|
||||
;; 'init' and 'reducer' come from keyword args
|
||||
:params (
|
||||
(analysis :type any :desc "Analysis data with :times")
|
||||
(init :type any :default 0 :desc "Initial accumulator value")
|
||||
(reducer :type any :desc "Reducer function (fn [acc i start end] ...)")
|
||||
)
|
||||
;; Get times from analysis data
|
||||
(let [times (get analysis :times)
|
||||
pairs (zip-pairs (cons 0 times))]
|
||||
|
||||
Reference in New Issue
Block a user