diff --git a/src/shimmers/sketches/pendulum_sway.cljs b/src/shimmers/sketches/pendulum_sway.cljs index 210bc26d..b4db0e37 100644 --- a/src/shimmers/sketches/pendulum_sway.cljs +++ b/src/shimmers/sketches/pendulum_sway.cljs @@ -97,8 +97,8 @@ [:epsilon 1.0]]) :dx (+ (dr/random-int 1 6) (dr/random -0.01 0.01)) :dy (+ (dr/random-int 1 6) (dr/random -0.01 0.01)) - :lambda1 (tm/clamp (dr/gaussian 0.005 0.0015) 0.0001 0.05) - :lambda2 (tm/clamp (dr/gaussian 0.005 0.0015) 0.0001 0.05) + :lambda1 ((dr/sample-between #(dr/gaussian 0.005 0.0015) 0.0001 0.05)) + :lambda2 ((dr/sample-between #(dr/gaussian 0.005 0.0015) 0.0001 0.05)) :gamma-rate (dr/weighted {0.125 4 0.25 2 0.5 1 0.75 1 1.25 1})}) (defn scene [{:keys [scene-id params]}] diff --git a/src/shimmers/sketches/remaining.cljs b/src/shimmers/sketches/remaining.cljs index 83fcdf14..2fbea9aa 100644 --- a/src/shimmers/sketches/remaining.cljs +++ b/src/shimmers/sketches/remaining.cljs @@ -72,8 +72,8 @@ (tm/- p line-delta)))) (defn draw-frame [{:keys [n-points] :as params}] - (q/stroke-weight (tm/clamp (dr/gaussian 0.225 0.15) 0.1 0.6)) - (q/stroke 0.0 (tm/clamp (dr/gaussian 0.25 0.1) 0.1 0.6)) + (q/stroke-weight ((dr/sample-between #(dr/gaussian 0.225 0.15) 0.1 0.6))) + (q/stroke 0.0 ((dr/sample-between #(dr/gaussian 0.1 0.1) 0.005 0.5))) (q/no-fill) (let [height (q/height) pts (harmonic-loop (cq/rel-vec 0.5 0.5) (* 0.45 height) params) diff --git a/src/shimmers/sketches/window_glimpses.cljs b/src/shimmers/sketches/window_glimpses.cljs index 1bbc7611..e21f9474 100644 --- a/src/shimmers/sketches/window_glimpses.cljs +++ b/src/shimmers/sketches/window_glimpses.cljs @@ -324,7 +324,7 @@ :windows (map (fn [s] (-> s - (vary-width (tm/clamp (dr/gaussian 1.5 1.0) 0.75 2.5)) + (vary-width ((dr/sample-between #(dr/gaussian 1.5 1.0) 0.75 2.5))) (vary-meta assoc :project (when (dr/chance (* (if (instance? Circle2 s) 0.5 1.0) 0.2)) (tm/* shadow-dir 1.8)))))