9 lines
182 B
Common Lisp
9 lines
182 B
Common Lisp
;; Blur effect - gaussian blur
|
|
(require-primitives "image")
|
|
|
|
(define-effect blur
|
|
:params (
|
|
(radius :type int :default 5 :range [1 50])
|
|
)
|
|
(image:blur frame (max 1 radius)))
|