[RISOLTO] Filtro Plastic Wrap

[adri76]

Ciao a tutti!
Sto cercando di scaricare lo script per il filtro "Plastic Wrap", ma in quasi tutte le mie ricerche vengo reindirizzata a un sito che evidentemente lo forniva, ma che adesso sembra non esista più: Guicon.
L'unica cosa che sono riuscita a trovare e a scaricare è stato il filtro "Plastic Wrap all layers", che lavora su tutti i livelli anzichè su uno solo, per cui ogni volta che lo uso sono costretta a copiare e incollare il livello che mi interessa su un nuovo file di Gimp, ad applicare il filtro solo su di esso e a riportarlo sul file a cui stavo lavorando in precedenza.
Inoltre nell'elaborazione ci sono altre differenze che mi obbligano a smanettare parecchio per ottenere il risultato voluto.
Sapreste indicarmi un sito da cui è possibile scaricare il "Plastic Wrap" semplice?
Grazie!

[snait]

Codice: Seleziona tutto

(define (plasti-wrap inimage indraw radius nocopy)



(gimp-image-undo-group-start inimage)



(let*



     (



          (flush-copy (car(gimp-layer-copy indraw 1)))



          (second-copy (car(gimp-layer-copy indraw 1)))



     )







(gimp-image-add-layer inimage flush-copy -1)



(gimp-image-add-layer inimage second-copy -1)



(gimp-desaturate flush-copy)



(gimp-desaturate second-copy)



(gimp-invert second-copy)



(plug-in-neon 1 inimage  flush-copy radius 0)



(plug-in-neon 1 inimage  second-copy radius 0)



(gimp-layer-set-mode second-copy 4)







(let*



     (



          (merge(car(gimp-image-merge-down inimage second-copy 2)))



     )



(let* (



(copy(car(gimp-layer-copy merge 1)))



)



(gimp-image-add-layer inimage copy -1)







(gimp-layer-set-mode copy 15)



(let*



     (



          (merge2(car(gimp-image-merge-down inimage copy 2)))



          (layerCopy 1)



     )







(gimp-invert merge2)











(gimp-layer-set-mode merge2 4)



(while (< layerCopy nocopy)



(let* (



     (copy (car(gimp-layer-copy merge2 1)))



     )



(gimp-image-add-layer inimage copy -1)



(set! layerCopy (+ layerCopy 1))



))



(gimp-displays-flush)



(gimp-image-undo-group-end inimage)



)



)



)



)



)







(script-fu-register      "plasti-wrap"



               "<Image>/Filters/Light and Shadow/plasti-wrap..."



               "This Filter attempts to do the same as the pastic wrap PS Filter (taken from tutorial at 







http://guicon.110mb.com 



)"



               "Karl Ward"



               "Karl Ward"



               "SEPT 2007"



               "Licence GPL -http://www.gnu.org/licenses/gpl-3.0.txt"



               SF-IMAGE      "SF-IMAGE" 0



               SF-DRAWABLE   "SF-DRAWABLE" 0







               SF-ADJUSTMENT "Neon Radius (10 recommended)" '(10 1 100 1 2 0 1)



               SF-ADJUSTMENT "final layer Copy" '(1 1 10 1 2 0 1)















)

copia in un file di testo, salva come plastiwrap.scm e metti nella cartella degli script

[adri76]

Grazie mille Snait, mi hai fatto un grandissimo favore!!

Ho seguito le tue istruzioni e il filtro funziona benissimo!

Grazie ancora!!!