Commit 99f85a46 authored by Sven Neumann's avatar Sven Neumann

applied gimp-quinet-000308-0, gimp-quinet-000310-0 and gimp-quinet-000322-0


--Sven
parent ed9b7f79
Fri Mar 24 15:48:40 CET 2000 Sven Neumann <sven@gimp.org>
applied gimp-quinet-000310-0 by Raphael Quinet <quinet@gamers.org>
* plug-ins/script-fu/scripts/coolmetal-logo.scm: replaced the
seascape toggle with a direct selection of the gradient.
* plug-ins/script-fu/scripts/carved-logo.scm: added new parameter
to allow some padding around the text (useful for tiling backgr.)
* plug-ins/script-fu/scripts/news-text.scm, speed-text.scm: added
new parameter to specify the text color and the background color,
instead of using the active colors.
* plug-ins/script-fu/scripts/bovinated-logo.scm, comic-logo.scm,
gradient-bevel-logo.scm: added new parameter to specify the
background color, instead of using the active one.
* plug-ins/script-fu/scripts/asc2img.scm: save and restore
foreground and background colors; do not flatten the final image.
* plug-ins/script-fu/scripts/3d-outline.scm: set foreground and
background colors before using them; do not flatten the final
image.
* plug-ins/script-fu/scripts/clothify.scm: set the background
color before using it.
* plug-ins/script-fu/scripts/3d-outline.scm, 3dTruchet.scm,
addborder.scm, alien-glow-arrow.scm, alien-glow-bar.scm,
alien-glow-bullet.scm, alien-glow-button.scm, alien-glow-logo.scm,
alien-neon-logo.scm, asc2img.scm, basic1-logo.scm,
basic2-logo.scm, beveled-button.scm, beveled-pattern-arrow.scm,
beveled-pattern-bullet.scm, beveled-pattern-button.scm,
beveled-pattern-heading.scm, beveled-pattern-hrule.scm,
blended-logo.scm, bovinated-logo.scm, camo.scm, carve-it.scm,
carved-logo.scm, chalk.scm, chip-away.scm, chrome-it.scm,
chrome-logo.scm, clothify.scm, comic-logo.scm, coolmetal-logo.scm,
crystal-logo.scm, distress_selection.scm, drop-shadow.scm,
erase-rows.scm, fade-outline.scm, font-map.scm, frosty-logo.scm,
fuzzyborder.scm, gimp-headers.scm, gimp-labels.scm,
glowing-logo.scm, gradient-bevel-logo.scm, hsv-graph.scm,
i26-gunya2.scm, image-structure.scm, mkbrush.scm, neon-logo.scm,
news-text.scm, perspective-shadow.scm, pupi-button.scm,
ripply-anim.scm, slide.scm, sota-chrome-logo.scm, speed-text.scm,
sphere.scm, starburst-logo.scm, starscape-logo.scm, swirltile.scm,
t-o-p-logo.scm, test-sphere.scm, text-circle.scm,
textured-logo.scm, title-header.scm, trochoid.scm, truchet.scm,
weave.scm, xach-effect.scm: adapted the scripts to the new
interface for gimp-edit-fill.
* plug-ins/script-fu/scripts/Makefile.am
* plug-ins/script-fu/scripts/alien-neon-logo.scm: added file.
Fri Mar 24 15:31:33 CET 2000 Sven Neumann <sven@gimp.org>
* app/commands.[ch]
* app/edit_cmds.c * app/gdisplay.c
* app/global_edit.[ch]
* app/menus.c
* tools/pdbgen/pdb/edit.pdb: applied sligthly modified versions
of gimp-quinet-000308-0 and gimp-quinet-000322-0.
From the README, Raphael Quinet provided with the patches:
This patch fixes the problems with Edit/Fill by allowing
the user to choose the fill mode. The "Fill with background
color" is prefered by some users who have been using the Gimp
for a long time, but the "Fill with foreground color" is
prefered by those who are familiar with most other paint
programs.
This change breaks a lot of the Perl scripts. Marc knows about this,
so you do not need to write bugreports. Please report broken
Script-Fus however, since they are supposed to work.
Fri Mar 24 01:53:07 PST 2000 Manish Singh <yosh@gimp.org>
* configure.in: more sanity checking for the gtkxmhtml test. Also
......
......@@ -251,12 +251,15 @@ edit_clear_cmd_callback (GtkWidget *widget,
void
edit_fill_cmd_callback (GtkWidget *widget,
gpointer client_data)
gpointer callback_data,
guint callback_action)
{
GimpFillType fill_type;
GDisplay *gdisp;
return_if_no_display (gdisp);
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage));
fill_type = (GimpFillType) callback_action;
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage), fill_type);
gdisplays_flush ();
}
......
......@@ -40,7 +40,9 @@ void edit_named_cut_cmd_callback (GtkWidget *, gpointer);
void edit_named_copy_cmd_callback (GtkWidget *, gpointer);
void edit_named_paste_cmd_callback (GtkWidget *, gpointer);
void edit_clear_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *widget,
gpointer callback_data,
guint callback_action);
void edit_stroke_cmd_callback (GtkWidget *, gpointer);
void select_invert_cmd_callback (GtkWidget *, gpointer);
......
......@@ -251,12 +251,15 @@ edit_clear_cmd_callback (GtkWidget *widget,
void
edit_fill_cmd_callback (GtkWidget *widget,
gpointer client_data)
gpointer callback_data,
guint callback_action)
{
GimpFillType fill_type;
GDisplay *gdisp;
return_if_no_display (gdisp);
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage));
fill_type = (GimpFillType) callback_action;
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage), fill_type);
gdisplays_flush ();
}
......
......@@ -40,7 +40,9 @@ void edit_named_cut_cmd_callback (GtkWidget *, gpointer);
void edit_named_copy_cmd_callback (GtkWidget *, gpointer);
void edit_named_paste_cmd_callback (GtkWidget *, gpointer);
void edit_clear_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *widget,
gpointer callback_data,
guint callback_action);
void edit_stroke_cmd_callback (GtkWidget *, gpointer);
void select_invert_cmd_callback (GtkWidget *, gpointer);
......
......@@ -432,7 +432,8 @@ edit_clear (GImage *gimage,
gboolean
edit_fill (GImage *gimage,
GimpDrawable *drawable)
GimpDrawable *drawable,
GimpFillType fill_type)
{
TileManager *buf_tiles;
PixelRegion bufPR;
......@@ -442,10 +443,42 @@ edit_fill (GImage *gimage,
if (!gimage || drawable == NULL)
return FALSE;
gimage_get_background (gimage, drawable, col);
if (drawable_has_alpha (drawable))
col [drawable_bytes (drawable) - 1] = OPAQUE_OPACITY;
switch (fill_type)
{
case FOREGROUND_FILL:
gimage_get_foreground (gimage, drawable, col);
break;
case BACKGROUND_FILL:
gimage_get_background (gimage, drawable, col);
break;
case WHITE_FILL:
col[RED_PIX] = 255;
col[GREEN_PIX] = 255;
col[BLUE_PIX] = 255;
break;
case TRANSPARENT_FILL:
col[RED_PIX] = 0;
col[GREEN_PIX] = 0;
col[BLUE_PIX] = 0;
if (drawable_has_alpha (drawable))
col [drawable_bytes (drawable) - 1] = TRANSPARENT_OPACITY;
break;
case NO_FILL:
return TRUE; /* nothing to do, but the fill succeded */
default:
g_warning ("unknown fill type");
gimage_get_background (gimage, drawable, col);
break;
}
drawable_mask_bounds (drawable, &x1, &y1, &x2, &y2);
if (!(x2 - x1) || !(y2 - y1))
......
......@@ -36,7 +36,8 @@ gboolean edit_paste_as_new (GImage *gimage,
gboolean edit_clear (GImage *gimage,
GimpDrawable *drawable);
gboolean edit_fill (GImage *gimage,
GimpDrawable *drawable);
GimpDrawable *drawable,
GimpFillType fill_type);
gboolean global_edit_cut (GDisplay *gdisp);
gboolean global_edit_copy (GDisplay *gdisp);
......
......@@ -432,7 +432,8 @@ edit_clear (GImage *gimage,
gboolean
edit_fill (GImage *gimage,
GimpDrawable *drawable)
GimpDrawable *drawable,
GimpFillType fill_type)
{
TileManager *buf_tiles;
PixelRegion bufPR;
......@@ -442,10 +443,42 @@ edit_fill (GImage *gimage,
if (!gimage || drawable == NULL)
return FALSE;
gimage_get_background (gimage, drawable, col);
if (drawable_has_alpha (drawable))
col [drawable_bytes (drawable) - 1] = OPAQUE_OPACITY;
switch (fill_type)
{
case FOREGROUND_FILL:
gimage_get_foreground (gimage, drawable, col);
break;
case BACKGROUND_FILL:
gimage_get_background (gimage, drawable, col);
break;
case WHITE_FILL:
col[RED_PIX] = 255;
col[GREEN_PIX] = 255;
col[BLUE_PIX] = 255;
break;
case TRANSPARENT_FILL:
col[RED_PIX] = 0;
col[GREEN_PIX] = 0;
col[BLUE_PIX] = 0;
if (drawable_has_alpha (drawable))
col [drawable_bytes (drawable) - 1] = TRANSPARENT_OPACITY;
break;
case NO_FILL:
return TRUE; /* nothing to do, but the fill succeded */
default:
g_warning ("unknown fill type");
gimage_get_background (gimage, drawable, col);
break;
}
drawable_mask_bounds (drawable, &x1, &y1, &x2, &y2);
if (!(x2 - x1) || !(y2 - y1))
......
......@@ -36,7 +36,8 @@ gboolean edit_paste_as_new (GImage *gimage,
gboolean edit_clear (GImage *gimage,
GimpDrawable *drawable);
gboolean edit_fill (GImage *gimage,
GimpDrawable *drawable);
GimpDrawable *drawable,
GimpFillType fill_type);
gboolean global_edit_cut (GDisplay *gdisp);
gboolean global_edit_copy (GDisplay *gdisp);
......
......@@ -1665,7 +1665,8 @@ gdisplay_set_menu_sensitivity (GDisplay *gdisp)
SET_SENSITIVE ("Edit/Buffer/Cut Named...", lp);
SET_SENSITIVE ("Edit/Buffer/Copy Named...", lp);
SET_SENSITIVE ("Edit/Clear", lp);
SET_SENSITIVE ("Edit/Fill", lp);
SET_SENSITIVE ("Edit/Fill with FG Color", lp);
SET_SENSITIVE ("Edit/Fill with BG Color", lp);
SET_SENSITIVE ("Edit/Stroke", lp);
}
......
......@@ -1665,7 +1665,8 @@ gdisplay_set_menu_sensitivity (GDisplay *gdisp)
SET_SENSITIVE ("Edit/Buffer/Cut Named...", lp);
SET_SENSITIVE ("Edit/Buffer/Copy Named...", lp);
SET_SENSITIVE ("Edit/Clear", lp);
SET_SENSITIVE ("Edit/Fill", lp);
SET_SENSITIVE ("Edit/Fill with FG Color", lp);
SET_SENSITIVE ("Edit/Fill with BG Color", lp);
SET_SENSITIVE ("Edit/Stroke", lp);
}
......
......@@ -20,6 +20,7 @@
#include "procedural_db.h"
#include "apptypes.h"
#include "drawable.h"
#include "gimage_mask.h"
#include "global_edit.h"
......@@ -255,16 +256,21 @@ edit_fill_invoker (Argument *args)
{
gboolean success = TRUE;
GimpDrawable *drawable;
gint32 fill_type;
GimpImage *gimage;
drawable = gimp_drawable_get_ID (args[0].value.pdb_int);
if (drawable == NULL)
success = FALSE;
fill_type = args[1].value.pdb_int;
if (fill_type < FOREGROUND_FILL || fill_type > NO_FILL)
success = FALSE;
if (success)
{
gimage = drawable_gimage (GIMP_DRAWABLE (drawable));
success = edit_fill (gimage, drawable);
success = edit_fill (gimage, drawable, (GimpFillType) fill_type);
}
return procedural_db_return_args (&edit_fill_proc, success);
......@@ -276,6 +282,11 @@ static ProcArg edit_fill_inargs[] =
PDB_DRAWABLE,
"drawable",
"The drawable to fill to"
},
{
PDB_INT32,
"fill_type",
"The type of fill: FG_IMAGE_FILL (0), BG_IMAGE_FILL (1), WHITE_IMAGE_FILL (2), TRANS_IMAGE_FILL (3), NO_IMAGE_FILL (4)"
}
};
......@@ -283,12 +294,12 @@ static ProcRecord edit_fill_proc =
{
"gimp_edit_fill",
"Fill selected area of drawable.",
"This procedure fills the specified drawable with the background color. This procedure only affects regions within a selection if there is a selection active.",
"This procedure fills the specified drawable with the fill mode. If the fill mode is foreground, the current foreground color is used. If the fill mode is background, the current background color is used. Other fill modes should not be used. This procedure only affects regions within a selection if there is a selection active.",
"Spencer Kimball & Peter Mattis & Raphael Quinet",
"Spencer Kimball & Peter Mattis",
"Spencer Kimball & Peter Mattis",
"1995-1996",
"1995-2000",
PDB_INTERNAL,
1,
2,
edit_fill_inargs,
0,
NULL,
......
......@@ -1665,7 +1665,8 @@ gdisplay_set_menu_sensitivity (GDisplay *gdisp)
SET_SENSITIVE ("Edit/Buffer/Cut Named...", lp);
SET_SENSITIVE ("Edit/Buffer/Copy Named...", lp);
SET_SENSITIVE ("Edit/Clear", lp);
SET_SENSITIVE ("Edit/Fill", lp);
SET_SENSITIVE ("Edit/Fill with FG Color", lp);
SET_SENSITIVE ("Edit/Fill with BG Color", lp);
SET_SENSITIVE ("Edit/Stroke", lp);
}
......
......@@ -432,7 +432,8 @@ edit_clear (GImage *gimage,
gboolean
edit_fill (GImage *gimage,
GimpDrawable *drawable)
GimpDrawable *drawable,
GimpFillType fill_type)
{
TileManager *buf_tiles;
PixelRegion bufPR;
......@@ -442,10 +443,42 @@ edit_fill (GImage *gimage,
if (!gimage || drawable == NULL)
return FALSE;
gimage_get_background (gimage, drawable, col);
if (drawable_has_alpha (drawable))
col [drawable_bytes (drawable) - 1] = OPAQUE_OPACITY;
switch (fill_type)
{
case FOREGROUND_FILL:
gimage_get_foreground (gimage, drawable, col);
break;
case BACKGROUND_FILL:
gimage_get_background (gimage, drawable, col);
break;
case WHITE_FILL:
col[RED_PIX] = 255;
col[GREEN_PIX] = 255;
col[BLUE_PIX] = 255;
break;
case TRANSPARENT_FILL:
col[RED_PIX] = 0;
col[GREEN_PIX] = 0;
col[BLUE_PIX] = 0;
if (drawable_has_alpha (drawable))
col [drawable_bytes (drawable) - 1] = TRANSPARENT_OPACITY;
break;
case NO_FILL:
return TRUE; /* nothing to do, but the fill succeded */
default:
g_warning ("unknown fill type");
gimage_get_background (gimage, drawable, col);
break;
}
drawable_mask_bounds (drawable, &x1, &y1, &x2, &y2);
if (!(x2 - x1) || !(y2 - y1))
......
......@@ -36,7 +36,8 @@ gboolean edit_paste_as_new (GImage *gimage,
gboolean edit_clear (GImage *gimage,
GimpDrawable *drawable);
gboolean edit_fill (GImage *gimage,
GimpDrawable *drawable);
GimpDrawable *drawable,
GimpFillType fill_type);
gboolean global_edit_cut (GDisplay *gdisp);
gboolean global_edit_copy (GDisplay *gdisp);
......
......@@ -251,12 +251,15 @@ edit_clear_cmd_callback (GtkWidget *widget,
void
edit_fill_cmd_callback (GtkWidget *widget,
gpointer client_data)
gpointer callback_data,
guint callback_action)
{
GimpFillType fill_type;
GDisplay *gdisp;
return_if_no_display (gdisp);
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage));
fill_type = (GimpFillType) callback_action;
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage), fill_type);
gdisplays_flush ();
}
......
......@@ -40,7 +40,9 @@ void edit_named_cut_cmd_callback (GtkWidget *, gpointer);
void edit_named_copy_cmd_callback (GtkWidget *, gpointer);
void edit_named_paste_cmd_callback (GtkWidget *, gpointer);
void edit_clear_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *widget,
gpointer callback_data,
guint callback_action);
void edit_stroke_cmd_callback (GtkWidget *, gpointer);
void select_invert_cmd_callback (GtkWidget *, gpointer);
......
......@@ -251,12 +251,15 @@ edit_clear_cmd_callback (GtkWidget *widget,
void
edit_fill_cmd_callback (GtkWidget *widget,
gpointer client_data)
gpointer callback_data,
guint callback_action)
{
GimpFillType fill_type;
GDisplay *gdisp;
return_if_no_display (gdisp);
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage));
fill_type = (GimpFillType) callback_action;
edit_fill (gdisp->gimage, gimage_active_drawable (gdisp->gimage), fill_type);
gdisplays_flush ();
}
......
......@@ -40,7 +40,9 @@ void edit_named_cut_cmd_callback (GtkWidget *, gpointer);
void edit_named_copy_cmd_callback (GtkWidget *, gpointer);
void edit_named_paste_cmd_callback (GtkWidget *, gpointer);
void edit_clear_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *, gpointer);
void edit_fill_cmd_callback (GtkWidget *widget,
gpointer callback_data,
guint callback_action);
void edit_stroke_cmd_callback (GtkWidget *, gpointer);
void select_invert_cmd_callback (GtkWidget *, gpointer);
......
......@@ -244,7 +244,9 @@ static GimpItemFactoryEntry image_entries[] =
NULL, NULL },
{ { N_("/Edit/Clear"), "<control>K", edit_clear_cmd_callback, 0 },
"edit/clear.html", NULL },
{ { N_("/Edit/Fill"), "<control>period", edit_fill_cmd_callback, 0 },
{ { N_("/Edit/Fill with FG Color"), "<control>comma", edit_fill_cmd_callback, (guint)FOREGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Fill with BG Color"), "<control>period", edit_fill_cmd_callback, (guint)BACKGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Stroke"), NULL, edit_stroke_cmd_callback, 0 },
"edit/stroke.html", NULL },
......
......@@ -244,7 +244,9 @@ static GimpItemFactoryEntry image_entries[] =
NULL, NULL },
{ { N_("/Edit/Clear"), "<control>K", edit_clear_cmd_callback, 0 },
"edit/clear.html", NULL },
{ { N_("/Edit/Fill"), "<control>period", edit_fill_cmd_callback, 0 },
{ { N_("/Edit/Fill with FG Color"), "<control>comma", edit_fill_cmd_callback, (guint)FOREGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Fill with BG Color"), "<control>period", edit_fill_cmd_callback, (guint)BACKGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Stroke"), NULL, edit_stroke_cmd_callback, 0 },
"edit/stroke.html", NULL },
......
......@@ -244,7 +244,9 @@ static GimpItemFactoryEntry image_entries[] =
NULL, NULL },
{ { N_("/Edit/Clear"), "<control>K", edit_clear_cmd_callback, 0 },
"edit/clear.html", NULL },
{ { N_("/Edit/Fill"), "<control>period", edit_fill_cmd_callback, 0 },
{ { N_("/Edit/Fill with FG Color"), "<control>comma", edit_fill_cmd_callback, (guint)FOREGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Fill with BG Color"), "<control>period", edit_fill_cmd_callback, (guint)BACKGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Stroke"), NULL, edit_stroke_cmd_callback, 0 },
"edit/stroke.html", NULL },
......
......@@ -244,7 +244,9 @@ static GimpItemFactoryEntry image_entries[] =
NULL, NULL },
{ { N_("/Edit/Clear"), "<control>K", edit_clear_cmd_callback, 0 },
"edit/clear.html", NULL },
{ { N_("/Edit/Fill"), "<control>period", edit_fill_cmd_callback, 0 },
{ { N_("/Edit/Fill with FG Color"), "<control>comma", edit_fill_cmd_callback, (guint)FOREGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Fill with BG Color"), "<control>period", edit_fill_cmd_callback, (guint)BACKGROUND_FILL },
"edit/fill.html", NULL },
{ { N_("/Edit/Stroke"), NULL, edit_stroke_cmd_callback, 0 },
"edit/stroke.html", NULL },
......
......@@ -34,8 +34,12 @@
(gimp-image-resize img width height 0 0)
(gimp-image-add-layer img pattern 1)
(gimp-image-add-layer img bg-layer 2)
(gimp-edit-fill bg-layer)
(gimp-palette-set-background '(255 255 255))
(gimp-edit-fill bg-layer BG-IMAGE-FILL)
(gimp-edit-clear pattern)
(gimp-layer-set-preserve-trans text-layer TRUE)
(gimp-palette-set-foreground '(0 0 0))
(gimp-edit-fill text-layer FG-IMAGE-FILL)
(gimp-layer-set-preserve-trans text-layer FALSE)
(plug-in-gauss-iir 1 img text-layer outline-blur-radius TRUE TRUE)
......@@ -67,7 +71,7 @@
(gimp-layer-set-visible layer2 FALSE)
(gimp-layer-set-visible pattern TRUE)
(set! final (car (gimp-image-flatten img)))
;;(set! final (car (gimp-image-flatten img)))
(gimp-palette-set-background old-bg)
(gimp-palette-set-foreground old-fg)
......
......@@ -46,7 +46,7 @@
(gimp-selection-all img)
(gimp-palette-set-background backcolor)
(gimp-edit-fill drawable1)
(gimp-edit-fill drawable1 BG-IMAGE-FILL)
(let* (
(tempSize (* size 3))
......@@ -58,8 +58,8 @@
(gimp-image-add-layer temp-img temp-draw 0)
(gimp-image-add-layer temp-img temp-draw2 0)
(gimp-palette-set-background backcolor)
(gimp-edit-fill temp-draw)
(gimp-edit-fill temp-draw2)
(gimp-edit-fill temp-draw BG-IMAGE-FILL)
(gimp-edit-fill temp-draw2 BG-IMAGE-FILL)
;weird aint it
(gimp-palette-set-background begincolor)
......@@ -77,7 +77,7 @@
(center-ellipse temp-img (* size 2) size outer-radius outer-radius ADD TRUE FALSE 0)
(center-ellipse temp-img (* size 2) size inner-radius inner-radius SUB TRUE FALSE 0)
;(gimp-edit-fill temp-img temp-draw2)
;(gimp-edit-fill temp-img temp-draw2 BG-IMAGE-FILL)
(gimp-blend temp-draw2 FG-BG-RGB NORMAL SHAPEBURST-ANGULAR 100 0 FALSE supersample 3 .2 size size (* size 2) (* size 2) )
(gimp-selection-none temp-img)
......@@ -130,7 +130,7 @@
;just to look a little better
(gimp-selection-all img)
(gimp-palette-set-background backcolor)
(gimp-edit-fill layer-one)
(gimp-edit-fill layer-one BG-IMAGE-FILL)
(gimp-selection-none img)
(create-tile tile tiledraw1 tiledraw2 size thickness backcolor begincolor endcolor supersample)
......
......@@ -12,6 +12,7 @@ scriptdata_DATA = \
alien-glow-bullet.scm \
alien-glow-button.scm \
alien-glow-logo.scm \
alien-neon-logo.scm \
asc2img.scm \
basic1-logo.scm \
basic2-logo.scm \
......
......@@ -122,7 +122,7 @@
0
0
0.0)
(gimp-edit-fill layer)
(gimp-edit-fill layer BG-IMAGE-FILL)
(gimp-palette-set-background (adjcolour colour (/ dvalue 2)))
(gimp-free-select img
10
......@@ -131,7 +131,7 @@
0
0
0.0)
(gimp-edit-fill layer)
(gimp-edit-fill layer BG-IMAGE-FILL)
(gimp-palette-set-background (adjcolour colour (- 0 (/ dvalue 2))))
(gimp-free-select img
10
......@@ -141,7 +141,7 @@
0
0.0)
(gimp-edit-fill layer)
(gimp-edit-fill layer BG-IMAGE-FILL)
(gimp-palette-set-background (adjcolour colour (- 0 dvalue)))
(gimp-free-select img
10
......@@ -151,7 +151,7 @@
0
0.0)
(gimp-edit-fill layer)
(gimp-edit-fill layer BG-IMAGE-FILL)
(gimp-selection-none img)
(gimp-image-add-layer img layer 0)
(gimp-image-undo-enable img)
......
......@@ -101,8 +101,8 @@
(gimp-blend ruler-layer FG-BG-RGB NORMAL SHAPEBURST-ANGULAR 100 0 REPEAT-NONE FALSE 0 0 0 0 size size)
(gimp-selection-grow img grow-amount)
(gimp-palette-set-background glow-color)
(gimp-edit-fill glow-layer)
(gimp-palette-set-foreground glow-color)
(gimp-edit-fill glow-layer FG-IMAGE-FILL)
(gimp-selection-none img)
......@@ -110,7 +110,7 @@
(plug-in-gauss-rle 1 img glow-layer blur-radius TRUE TRUE)
(gimp-palette-set-background bg-color)
(gimp-edit-fill bg-layer)
(gimp-edit-fill bg-layer BG-IMAGE-FILL)
(gimp-palette-set-background old-bg)
(gimp-palette-set-foreground old-fg)
......
......@@ -36,7 +36,7 @@
; (gimp-layer-set-preserve-trans ruler-layer TRUE)
(gimp-palette-set-background bg-color)
(gimp-edit-fill bg-layer)
(gimp-edit-fill bg-layer BG-IMAGE-FILL)
(gimp-edit-clear glow-layer)
(gimp-edit-clear ruler-layer)
......@@ -45,9 +45,9 @@
(gimp-palette-set-background '(0 0 0))
(gimp-blend ruler-layer FG-BG-RGB NORMAL SHAPEBURST-ANGULAR 100 0 REPEAT-NONE FALSE 0 0 0 0 height height)
(gimp-palette-set-background glow-color)
(gimp-palette-set-foreground glow-color)
(gimp-selection-grow img border)
(gimp-edit-fill glow-layer)
(gimp-edit-fill glow-layer FG-IMAGE-FILL)
(gimp-selection-none img)
(plug-in-gauss-rle 1 img glow-layer 25 TRUE TRUE)
......
......@@ -43,7 +43,7 @@
; (gimp-layer-set-preserve-trans ruler-layer TRUE)
(gimp-palette-set-background bg-color)
(gimp-edit-fill bg-layer)
(gimp-edit-fill bg-layer BG-IMAGE-FILL)