(clear)
; drag an image on the window
(open $path)
;
(pixels 
  (rect 100 100 400 400) saturation 0)
(pixels 
  (rect 300 300 400 400) contrast 0.5)