RFX-GIMP

Artifact d2c5c19321d1eafcb7e31d61deb0d01324b4777a:

• File effects/video-pattern.loop — part of check-in [fc9abb07d8] at 2012-03-20 07:56:15 on branch trunk — Added Video Pattern filter. (user: saul size: 671)

&rfx_sendmsg (
  qq{
  
    (let* ((input-file (string-append "$curtmpdir" DIR-SEPARATOR "$in"))
           (image (car (gimp-file-load RUN-NONINTERACTIVE input-file input-file)))
           (layer (car (gimp-image-get-active-layer image))) )
      (plug-in-unsharp-mask RUN-NONINTERACTIVE
                            image
                            layer
                            (length (member 1 (list $p8 $p7 $p6 $p5 $p4 
                                                    $p3 $p2 $p1 $p0 )))
                            $p9 ; additive
                            $p10 ; rotated
                            ) 
      (rfx-save-frame image "$out") )

    }
  );