Commit eed3b054 authored by Alexandre Prokoudine's avatar Alexandre Prokoudine
Browse files

Porting to new API: add-[layer|channel] > insert-[layer|channel] and more

parent 9f2f1785
......@@ -84,8 +84,8 @@
)
(gimp-image-undo-disable temp-img)
(gimp-image-add-layer temp-img temp-draw 0)
(gimp-image-add-layer temp-img temp-draw2 0)
(gimp-image-insert-layer temp-img temp-draw -1 0)
(gimp-image-insert-layer temp-img temp-draw2 -1 0)
(gimp-context-set-background backcolor)
(gimp-edit-fill temp-draw BACKGROUND-FILL)
(gimp-edit-fill temp-draw2 BACKGROUND-FILL)
......@@ -181,9 +181,9 @@
(gimp-image-undo-disable img)
(gimp-image-undo-disable tile)
(gimp-image-add-layer img layer-one 0)
(gimp-image-add-layer tile tiledraw1 0)
(gimp-image-add-layer tile tiledraw2 0)
(gimp-image-insert-layer img layer-one -1 0)
(gimp-image-insert-layer tile tiledraw1 -1 0)
(gimp-image-insert-layer tile tiledraw2 -1 0)
;just to look a little better
(gimp-selection-all img)
......
......@@ -32,13 +32,13 @@
(gimp-context-push)
(gimp-image-add-layer theImage baseLayer 0)
(gimp-image-insert-layer theImage baseLayer 0)
(set! thickLayer (car (gimp-layer-new theImage theWidth theHeight RGBA-IMAGE "Camo Thick Layer" 100 NORMAL-MODE)))
(gimp-image-add-layer theImage thickLayer 0)
(gimp-image-insert-layer theImage thickLayer 0)
(set! thinLayer (car (gimp-layer-new theImage theWidth theHeight RGBA-IMAGE "Camo Thin Layer" 100 NORMAL-MODE)))
(gimp-image-add-layer theImage thinLayer 0)
(gimp-image-insert-layer theImage thinLayer 0)
(gimp-selection-all theImage)
(gimp-context-set-background inColor1)
......
......@@ -80,7 +80,7 @@
(gimp-image-undo-disable img)
(gimp-image-add-layer img layer1 0)
(gimp-image-insert-layer img layer1 -1 0)
(gimp-selection-all img)
(gimp-edit-clear layer1)
......@@ -88,7 +88,7 @@
(copy-layer-carve-it img layer1 bg-image bg-layer)
(gimp-edit-copy mask-drawable)
(gimp-image-add-channel img mask 0)
(gimp-image-insert-channel img mask -1 0)
(plug-in-tile RUN-NONINTERACTIVE img layer1 width height FALSE)
(set! mask-fs (car (gimp-edit-paste mask FALSE)))
......@@ -97,28 +97,28 @@
(gimp-invert mask))
(set! mask-fat (car (gimp-channel-copy mask)))
(gimp-image-add-channel img mask-fat 0)
(gimp-selection-load mask-fat)
(gimp-image-insert-channel img mask-fat -1 0)
(gimp-item-to-selection mask-fat 2)
(gimp-context-set-brush (carve-brush brush-size))
(gimp-context-set-foreground '(255 255 255))
(gimp-edit-stroke mask-fat)
(gimp-selection-none img)
(set! mask-emboss (car (gimp-channel-copy mask-fat)))
(gimp-image-add-channel img mask-emboss 0)
(gimp-image-insert-channel img mask-emboss -1 0)
(plug-in-gauss-rle RUN-NONINTERACTIVE img mask-emboss feather TRUE TRUE)
(plug-in-emboss RUN-NONINTERACTIVE img mask-emboss 315.0 45.0 7 TRUE)
(gimp-context-set-background '(180 180 180))
(gimp-selection-load mask-fat)
(gimp-item-to-selection mask-fat 2)
(gimp-selection-invert img)
(gimp-edit-fill mask-emboss BACKGROUND-FILL)
(gimp-selection-load mask)
(gimp-item-to-selection mask 2)
(gimp-edit-fill mask-emboss BACKGROUND-FILL)
(gimp-selection-none img)
(set! mask-highlight (car (gimp-channel-copy mask-emboss)))
(gimp-image-add-channel img mask-highlight 0)
(gimp-image-insert-channel img mask-highlight -1 0)
(gimp-levels mask-highlight 0 180 255 1.0 0 255)
(set! mask-shadow mask-emboss)
......@@ -144,16 +144,16 @@
(set! csl-mask (car (gimp-layer-create-mask cast-shadow-layer ADD-BLACK-MASK)))
(gimp-layer-add-mask cast-shadow-layer csl-mask)
(gimp-selection-load mask)
(gimp-item-to-selection mask 2)
(gimp-context-set-background '(255 255 255))
(gimp-edit-fill csl-mask BACKGROUND-FILL)
(set! inset-layer (car (gimp-layer-copy layer1 TRUE)))
(gimp-image-add-layer img inset-layer 1)
(gimp-image-insert-layer img inset-layer -1 1)
(set! il-mask (car (gimp-layer-create-mask inset-layer ADD-BLACK-MASK)))
(gimp-layer-add-mask inset-layer il-mask)
(gimp-selection-load mask)
(gimp-item-to-selection mask 2)
(gimp-context-set-background '(255 255 255))
(gimp-edit-fill il-mask BACKGROUND-FILL)
(gimp-selection-none img)
......
......@@ -113,11 +113,11 @@
(gimp-image-undo-disable img)
(gimp-image-add-channel img mask 0)
(gimp-image-add-layer img bg-layer 0)
(gimp-image-add-layer img shadow 0)
(gimp-image-add-layer img layer3 0)
(gimp-image-add-layer img layer2 0)
(gimp-image-insert-channel img mask -1 0)
(gimp-image-insert-layer img bg-layer -1 0)
(gimp-image-insert-layer img shadow -1 0)
(gimp-image-insert-layer img layer3 -1 0)
(gimp-image-insert-layer img layer2 -1 0)
(gimp-edit-copy mask-drawable)
(set! mask-fs (car (gimp-edit-paste mask FALSE)))
......@@ -135,7 +135,7 @@
(gimp-item-set-visible bg-layer FALSE)
(gimp-item-set-visible shadow FALSE)
(gimp-selection-load mask)
(gimp-item-to-selection mask 2)
(gimp-context-set-background '(0 0 0))
(gimp-selection-translate img offx1 offy1)
(gimp-selection-feather img feather)
......@@ -146,7 +146,7 @@
(set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
(gimp-invert layer2)
(gimp-image-add-layer img layer1 0)
(gimp-image-insert-layer img layer1 -1 0)
(copy-layer-chrome-it img layer1 banding-img banding-layer)
(gimp-image-delete banding-img)
(gimp-layer-scale layer1 width height FALSE)
......@@ -157,12 +157,12 @@
(set! layer-mask (car (gimp-layer-create-mask layer1 ADD-BLACK-MASK)))
(gimp-layer-add-mask layer1 layer-mask)
(gimp-selection-load mask)
(gimp-item-to-selection mask 2)
(gimp-context-set-background '(255 255 255))
(gimp-edit-fill layer-mask BACKGROUND-FILL)
(set! layer2 (car (gimp-layer-copy layer1 TRUE)))
(gimp-image-add-layer img layer2 0)
(gimp-image-insert-layer img layer2 -1 0)
(gimp-context-set-brush (brush brush-size))
(gimp-context-set-foreground '(255 255 255))
(gimp-edit-stroke layer-mask)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment