8 lines
147 B
Common Lisp
8 lines
147 B
Common Lisp
(clear)
|
|
; drag an image on the window
|
|
(open $path)
|
|
;
|
|
(pixels saturation 0
|
|
(rect 100 100 400 400))
|
|
(pixels contrast 0.5
|
|
(rect 300 300 400 400)) |