; zona_ajuste.scm version 1.13 11 de junio de 2018 ; ; ;############################################################################## ; INSTALACIÓN ; 1.- Copia el archivo en: ; Si es GIM 2.4 y linux en la carpeta /home/tunombreusuario/.gimp-2.4/scripts ; Si es GIM 2.6 y linux en la carpeta /home/tunombreusuario/.gimp-2.6/scripts ; Si es GIM 2.8 y linux en la carpeta /home/tunombreusuario/.gimp-2.6/scripts ; Si es GIM 2.10 y linux en la carpeta /home/tunombreusuario/.config/.gimp-2.10/scripts ; ; 2.- Reinicia Gimp ; ;############################################################################## ; CONFIGURACIÓN EN GIMP ; ; 1.- El script aparece en el menú Script-Fu de Gimp. Yo le he añadido una combinación de ; teclas para ejecutarlo (CTRL+ALT+Z). Para hacerlo tienes que ir a: ; Archivo -> Preferencias -> Interfaz -> Configurar las combinaciones de teclas... ; ; 2.- Despliegas la lista de "Complementos" y al final del todo te aparecerá el script ; "Zona de Ajuste". Lo seleccionas con el ratón y pulsas la combinación de teclas ; que te gusta (en mi caso CTRL+ALT+Z) ; ;############################################################################## ; TRATAMIENTO DIGITAL DE IMÁGENES POR ZONAS: ; Este script automatiza el tratamiento por zonas de imágenes digitales con Gimp. No obstante, ; a continuación os explico paso por paso, cuales son los pasos que se siguen habitualmente para ; trabajar una imagen por zonas, esto lo hago para que se comprenda qué es lo que hace el script ; y sirva para comprender el proceso de forma general. Los pasos que se detallan en los puntos: ; 4, 5, 6, 7 y 8 son los que el script automatiza para aligerar nuestro flujo de trabajo de revelado ; creativo de fotografías NO RAW con Gimp (para no confundir he puesto un asterisco a los puntos ; que se realizarán de forma automática al ejecutar el script): ; ; 1.- Abrir un archivo de imagen (NO RAW) con Gimp. ; 2.- Hacer los ajustes generales de contraste y puntos blanco y negro con las herramientas Niveles o Curvas. ; 3.- Con la herramienta "selección libre" (F). Selecciono la zona que quiero ajustar con ayuda de tableta ; gráfica o ratón. ; 3.1.- Si necesitas rectificar la selección. Máscara rápida Sift+Q y pintas en negro o blanco para ; añadir o quitar selección. ; 3.2.- Quitar Máscara rápida. Sift+Q ; ; EJECUTA AHORA EL SCRIPT PARA AUTOMATIZAR TODOS ESTOS PASOS QUE VIENEN A CONTINUACIÓN: ; ; 4*.- Se copia como capa la imagen de base, pero esta vez lo que ajustaré será la zona que tenía seleccionada, ; con las herramientas Niveles o Curvas. ; ; 5*.- Añadir máscara de capa a partir de la selección. ; ; 6*.- Cambiar el modo de fusión de la capa dependiendo del ajuste que queremos hacer: ; 6.1.- Modo de fusión NORMAL si es una foto en escala de grises. ; 6.2.- Modo de fusión VALOR si se trata de una foto RGB. ; ; 7*.- Cambiamos la opacidad de la capa al 50%. Esto nos permite un ajuste a "posteriori" del efecto que buscamos. ; ; 8*.- Para suavizar la transición entre la zona ajustada y la imagen puedes desenfocar la máscara con ; Desenfoque gaussiano, hasta que dejes de notar la transición. Depende de la zona y de la resolución ; de la imagen, pero generalmente no suelo bajar de 300 y no es raro usar 1000 o más en los cielos, por ejemplo. ; ; 9.- Volvemos al paso 3 del tratamiento digital para la siguiente zona ; ; ; ; Este Plugin está hecho para Gimp a partir de su versión 2.0 ; ; Log de cambios: ; 1.00 - Script inicial ; 1.01 - Script para desenfocar la máscara después de creada (Al gusto de Tat) ; 1.10 - Script que pregunta el radio de desenfoque que aplicará a la máscara ; 1.11 - Script que abre el diálogo de desenfoque gausiano después de ejecutarse ; 1.12 - Se completa la información adjunta en el script. Posibilidad de aplanar la imagen en cada ciclo. ; 1.13 - Corrección de la sintaxis del comando "plug-in-gauss-iir" para que funcione en Gimp 2.10 ; ;############################################################################## ; ; LICENCIA ; ; Copyright (C) 2007 www.tomassenabre.es ; ; Zona de ajuste es software libre; puedes copiarlo, distribuirlo y/o ; modificarlo dentro de los términos considerados en la Licencia Pública General ; de GNU publicada por la Fundación de Software Libre. ; ; Zona de Ajuste se distribuye con la esperanza de de que será de ; utilidad, pero NO SIN NINGUNA GARANTÍAS; tampoco tiene garantías de ; MERCHANDISE o APTITUD PARA UN PROPÓSITO PARTICULAR. ; ;############################################################################## ; ; LICENSE ; ; Copyright (C) 2007 www.tomassenabre.es ; ; Adjust Zone is free software; you can redistribute it and/or ; modify it under the terms of the GNU General Public License as ; published by the Free Software Foundation. ; ; Adjust Zone is distributed in the hope that it will be useful, ; but WITHOUT ANY WARRANTY; without even the implied warranty of ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ; General Public License for more details. ; ;############################################################################## ; ; ------------------------------------------------------------------------------------------------ ; Definición de las variables (define (script-fu-zona-ajuste aimg drawable) ; ------------------------------------------------------------------------------------------------ ; Si tu ordenador no es muy potente, es conveniente que acoples cada una de las zonas que vas revelando ; por que Gimp se vuelve pesado con forme se incrementa el número de capas. Para ello suprime el ";" ; de la siguiente línea: ; (gimp-image-flatten aimg) ; ------------------------------------------------------------------------------------------------ ; Comienza a guardar las acciones para poder usar la acción "deshacer" (gimp-undo-push-group-start aimg) ; ------------------------------------------------------------------------------------------------ ; Crear nuevas imágenes y capas necesarias a partir de la imagen de base (let* ( (layers (gimp-image-get-layers aimg)) (nb-layers (car layers)) (layers-array (cadr layers)) (image-type (car (gimp-image-base-type aimg))) (background-dup (car (gimp-layer-copy drawable TRUE))) (background-dup (car (if (> nb-layers 0) (gimp-layer-copy (aref layers-array (- nb-layers 1)) TRUE)))) (layer-mask (car (gimp-layer-create-mask background-dup ADD-SELECTION-MASK))) ) ; Realizamos las siguientes acciones descritas en el flujo de trabajo: ; ------------------------------------------------------------------------------------------------ ; Creamos la nueva capa con la imagen de base (gimp-image-add-layer aimg background-dup -1) ; ------------------------------------------------------------------------------------------------ ; Crea una máscara de capa a partir de nuestra selección (gimp-layer-create-mask background-dup ADD-SELECTION-MASK) (gimp-layer-add-mask background-dup layer-mask) ; ------------------------------------------------------------------------------------------------ ; Quita la selección para que el desenfoque afecte a toda la máscara (gimp-selection-none aimg) ; ------------------------------------------------------------------------------------------------ ; Inicia la herramienta de desenfoque gaussiano. El método de desenfoque es IIR que es preferible ; cuando se usan radios grandes. El radio de desenfoque por defecto es 250 pero podemos cambiarlo ; en la siguiente línea: (plug-in-gauss-iir RUN-NONINTERACTIVE aimg layer-mask 250 TRUE TRUE) ; ------------------------------------------------------------------------------------------------ ; Le da nombre a la capa generada (gimp-layer-set-name background-dup "Zona ") ; ------------------------------------------------------------------------------------------------ ; Determina el modo de fusión de la capa VALOR para imágenes RGB y NORMAL para imágenes en Escala de grises ; (if (= image-type 0) (gimp-layer-set-mode background-dup VALUE)) ; ------------------------------------------------------------------------------------------------ ; Fija la opacidad de la nueva capa. Por defecto está en 50%, pero se puede cambiar a vuestras necesidades (gimp-layer-set-opacity background-dup 50) ; ------------------------------------------------------------------------------------------------ ; Cambia la selección de edición de la máscara a la imagen para que no tengamos que hacerlo nosotros (gimp-layer-set-edit-mask background-dup FALSE) ) ; ------------------------------------------------------------------------------------------------ ; Cierra el grupo de la acción "deshacer" (gimp-undo-push-group-end aimg) ; ------------------------------------------------------------------------------------------------ ; Vacia todos los procesos internos del script (gimp-displays-flush)) (script-fu-register "script-fu-zona-ajuste" "/Script-Fu/_Zona de ajuste" "Crea una capa con máscara a partir de una zona seleccionada para ajustar con niveles o curvas una imagen RGB." "Tomas Senabre " "www.tomassenabre.es" "Jun 11, 2018" "RGB*, GRAY*" SF-IMAGE "Input Image" 1 SF-DRAWABLE "Input Drawable" 0) ; Copyright 2006 Tomás Senabre www.tomassenabre.es