Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; le righe che iniziano con ; sono commenti
- (define (script-fu-demolivelligruppo img drawable)
- (let*
- (
- ; dichiarare tutte qui le variabili usate
- ; crea il nuovo gruppo senza visualizzarlo
- ; e ottiene l'id nella variabile miogruppo
- (miogruppo (car(gimp-layer-group-new img)))
- )
- ; qui ci saranno tutte le operazioni da compiere
- ; fai partire l'undo unico per tutte le operazioni
- ; successive fino a gimp-image-undo-group-end
- (gimp-image-undo-group-start img)
- ; deseleziona qualsiasi selezione impostata
- (gimp-selection-none img)
- ; qui ci saranno le nostre operazioni da compiere
- ; ferma l'undo unico
- (gimp-image-undo-group-end img)
- ; conclude tutte le operazioni in corso
- ; e ricgera il display
- (gimp-displays-flush)
- )
- )
- ; ------------------------------
- ; Funzione di registrazione
- ; ------------------------------
- (script-fu-register "script-fu-demolivelligruppo"
- _"<Image>/Filters/Personali/demo livelli gruppo"
- "demo livelli gruppo"
- "MC"
- ""
- "2012, apr"
- "RGB* GRAY*"
- SF-IMAGE "Image" 0
- SF-DRAWABLE "Drawable" 0
- )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement