callisto-debian/gimp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Script-Fu string cleanup/simplification: apply the same fix for menu path

Browse Source 
2004-11-18  Michael Natterer  <mitch@gimp.org>

	Script-Fu string cleanup/simplification: apply the same fix for
	menu path translation that was done for plug-ins a while ago.

	* plug-ins/script-fu/script-fu.c (script_fu_auxillary_init): use
	gimp_plugin_menu_register() on the "Refresh" temp_proc.

	* plug-ins/script-fu/scripts/*.scm: ported all scripts to use
	script-fu-menu-register and pass just the menu label in
	script-fu-register. Cleaned up all register calls to share a
	somewhat similar formatting.
This commit is contained in:
Michael Natterer
2004-11-18 22:44:28 +00:00
committed by Michael Natterer
parent 2d4aad8683
commit 8a46203e5a
100 changed files with 1121 additions and 787 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
ChangeLog
View File

@ -1,3 +1,16 @@
2004-11-18 Michael Natterer <mitch@gimp.org>
Script-Fu string cleanup/simplification: apply the same fix for
menu path translation that was done for plug-ins a while ago.
* plug-ins/script-fu/script-fu.c (script_fu_auxillary_init): use
gimp_plugin_menu_register() on the "Refresh" temp_proc.
* plug-ins/script-fu/scripts/*.scm: ported all scripts to use
script-fu-menu-register and pass just the menu label in
script-fu-register. Cleaned up all register calls to share a
somewhat similar formatting.
2004-11-18 Sven Neumann <sven@gimp.org>
* plug-ins/common/postscript.c: changed the default to load only

5
plug-ins/script-fu/script-fu.c
View File

@ -279,12 +279,15 @@ script_fu_auxillary_init (void)
"Spencer Kimball & Peter Mattis",
"Spencer Kimball & Peter Mattis",
"1997",
N_("<Toolbox>/Xtns/Script-Fu/_Refresh Scripts"),
N_("_Refresh Scripts"),
NULL,
GIMP_TEMPORARY,
G_N_ELEMENTS (args), 0,
args, NULL,
script_fu_refresh_proc);
gimp_plugin_menu_register ("script_fu_refresh",
N_("<Toolbox>/Xtns/Script-Fu"));
}
static void

11
plug-ins/script-fu/scripts/3d-outline.scm
View File

@ -109,7 +109,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-3d-outline-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/3D _Outline..."
_"3D _Outline..."
"Creates outlined texts with drop shadow"
"Hrvoje Horvat (hhorvat@open.hr)"
"Hrvoje Horvat"
@ -125,6 +125,10 @@
SF-ADJUSTMENT _"Shadow X offset" '(0 0 200 1 5 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(0 0 200 1 5 0 1))
(script-fu-menu-register "script-fu-3d-outline-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-3d-outline-logo text-pattern
text
size
@ -146,7 +150,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-3d-outline-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/3D _Outline..."
_"3D _Outline..."
"Creates outlined texts with drop shadow"
"Hrvoje Horvat (hhorvat@open.hr)"
"Hrvoje Horvat"
@ -162,3 +166,6 @@
SF-TOGGLE _"Default bumpmap settings" TRUE
SF-ADJUSTMENT _"Shadow X offset" '(0 0 200 1 5 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(0 0 200 1 5 0 1))
(script-fu-menu-register "script-fu-3d-outline-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/3dTruchet.scm
View File

@ -212,7 +212,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-3dtruchet"
_"<Toolbox>/Xtns/Script-Fu/Patterns/3_D Truchet..."
_"3_D Truchet..."
"3D Truchet pattern"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
@ -226,3 +226,6 @@
SF-TOGGLE _"Supersample" TRUE
SF-ADJUSTMENT _"Number of X tiles" '(5 1 1000 1 10 0 1)
SF-ADJUSTMENT _"Number of Y tiles" '(5 1 1000 1 10 0 1))
(script-fu-menu-register "script-fu-3dtruchet"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

8
plug-ins/script-fu/scripts/add-bevel.scm
View File

@ -178,7 +178,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-add-bevel"
_"<Image>/Script-Fu/Decor/Add B_evel..."
_"Add B_evel..."
"Add a bevel to an image"
"Andrew Donkin <ard@cs.waikato.ac.nz>"
"Andrew Donkin"
@ -188,5 +188,7 @@
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Thickness" '(5 0 30 1 2 0 0)
SF-TOGGLE _"Work on copy" TRUE
SF-TOGGLE _"Keep bump layer" FALSE
)
SF-TOGGLE _"Keep bump layer" FALSE)
(script-fu-menu-register "script-fu-add-bevel"
_"<Image>/Script-Fu/Decor")

5
plug-ins/script-fu/scripts/addborder.scm
View File

@ -165,7 +165,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-addborder"
_"<Image>/Script-Fu/Decor/Add _Border..."
_"Add _Border..."
"Add a border around an image"
"Andy Thomas <alt@picnic.demon.co.uk>"
"Andy Thomas"
@ -177,3 +177,6 @@
SF-ADJUSTMENT _"Border Y size" '(12 1 250 1 10 0 1)
SF-COLOR _"Border color" '(38 31 207)
SF-ADJUSTMENT _"Delta value on color" '(25 1 255 1 10 0 1))
(script-fu-menu-register "script-fu-addborder"
_"<Image>/Script-Fu/Decor")

5
plug-ins/script-fu/scripts/alien-glow-arrow.scm
View File

@ -144,7 +144,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-alien-glow-right-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/_Arrow..."
_"_Arrow..."
"Create an X-file deal"
"Adrian Likins"
"Adrian Likins"
@ -158,3 +158,6 @@
SF-COLOR _"Glow color" '(63 252 0)
SF-COLOR _"Background color" '(0 0 0)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-right-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")

5
plug-ins/script-fu/scripts/alien-glow-bar.scm
View File

@ -82,7 +82,7 @@
(script-fu-register "script-fu-alien-glow-horizontal-ruler"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/_Hrule..."
_"_Hrule..."
"Create an Hrule with the Alien Glow look"
"Adrian Likins"
"Adrian Likins"
@ -93,3 +93,6 @@
SF-COLOR _"Glow color" '(63 252 0)
SF-COLOR _"Background color" '(0 0 0)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-horizontal-ruler"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")

5
plug-ins/script-fu/scripts/alien-glow-bullet.scm
View File

@ -93,7 +93,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-alien-glow-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/_Bullet..."
_"_Bullet..."
"Create a Bullet with an Alien Glow theme for web pages"
"Adrian Likins"
"Adrian Likins"
@ -103,3 +103,6 @@
SF-COLOR _"Glow color" '(63 252 0)
SF-COLOR _"Background color" '(0 0 0)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")

5
plug-ins/script-fu/scripts/alien-glow-button.scm
View File

@ -137,7 +137,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-alien-glow-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/B_utton..."
_"B_utton..."
"Button with an eerie glow"
"Adrian Likins"
"Adrian Likins"
@ -152,3 +152,6 @@
SF-ADJUSTMENT _"Padding" '(6 1 100 1 10 0 1)
SF-ADJUSTMENT _"Glow radius" '(10 1 200 1 10 0 1)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")

11
plug-ins/script-fu/scripts/alien-glow-logo.scm
View File

@ -55,7 +55,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-alien-glow-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Alien _Glow..."
_"Alien _Glow..."
"Create an X-Files-esque logo with the specified glow color"
"Spencer Kimball"
"Spencer Kimball"
@ -66,6 +66,10 @@
SF-ADJUSTMENT _"Glow size (pixels * 4)" '(150 2 1000 1 10 0 1)
SF-COLOR _"Glow color" '(63 252 0))
(script-fu-menu-register "script-fu-alien-glow-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-alien-glow-logo text
size
font
@ -87,7 +91,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-alien-glow-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Alien _Glow..."
_"Alien _Glow..."
"Create an X-Files-esque logo with the specified glow color"
"Spencer Kimball"
"Spencer Kimball"
@ -97,3 +101,6 @@
SF-ADJUSTMENT _"Font size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "Sans Bold"
SF-COLOR _"Glow color" '(63 252 0))
(script-fu-menu-register "script-fu-alien-glow-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

18
plug-ins/script-fu/scripts/alien-neon-logo.scm
View File

@ -116,7 +116,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-alien-neon-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Alien _Neon..."
_"Alien _Neon..."
"Creates a psychedelic effect with outlines of the specified color around the letters"
"Raphael Quinet (quinet@gamers.org)"
"Raphael Quinet"
@ -129,8 +129,11 @@
SF-ADJUSTMENT _"Width of bands" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT _"Width of gaps" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT _"Number of bands" '(7 1 100 1 10 0 1)
SF-TOGGLE _"Fade away" TRUE
)
SF-TOGGLE _"Fade away" TRUE)
(script-fu-menu-register "script-fu-alien-neon-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-alien-neon-logo text
size
@ -152,7 +155,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-alien-neon-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Alien _Neon..."
_"Alien _Neon..."
"Creates a psychedelic effect with outlines of the specified color around the letters"
"Raphael Quinet (quinet@gamers.org)"
"Raphael Quinet"
@ -166,8 +169,7 @@
SF-ADJUSTMENT _"Width of bands" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT _"Width of gaps" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT _"Number of bands" '(7 1 100 1 10 0 1)
SF-TOGGLE _"Fade away" TRUE
)
; end
SF-TOGGLE _"Fade away" TRUE)
(script-fu-menu-register "script-fu-alien-neon-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

19
plug-ins/script-fu/scripts/asc2img.scm
View File

@ -221,9 +221,8 @@
; Register the function with the GIMP:
(script-fu-register
"script-fu-asc-2-img"
_"<Toolbox>/Xtns/Script-Fu/Utils/_ASCII to Image..."
(script-fu-register "script-fu-asc-2-img"
_"_ASCII to Image..."
"Create a new image containing text from a simple text file"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"8th April 1998"
@ -235,11 +234,13 @@
SF-COLOR _"Text color" '(0 0 0)
SF-TOGGLE _"Transparent background" FALSE
SF-COLOR _"Background color" '(255 255 255)
SF-ADJUSTMENT _"Buffer amount (% height of text)" '(35 0 100 1 10 0 0)
)
SF-ADJUSTMENT _"Buffer amount (% height of text)" '(35 0 100 1 10 0 0))
(script-fu-menu-register "script-fu-asc-2-img"
_"<Toolbox>/Xtns/Script-Fu/Utils")
(script-fu-register "script-fu-asc-2-img-layer"
_"<Image>/Script-Fu/Utils/_ASCII to Layer..."
_"_ASCII to Layer..."
"Create a new layer of text from a simple text file"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"30th April 1998"
@ -250,5 +251,7 @@
SF-FILENAME _"File name" "afile"
SF-FONT _"Font" "Bitstream Charter"
SF-ADJUSTMENT _"Font size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR _"Text color" '(0 0 0)
)
SF-COLOR _"Text color" '(0 0 0))
(script-fu-menu-register "script-fu-asc-2-img-layer"
_"<Image>/Script-Fu/Utils")

11
plug-ins/script-fu/scripts/basic1-logo.scm
View File

@ -49,7 +49,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-basic1-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/_Basic I..."
_"_Basic I..."
"Creates a simple logo with a drop shadow"
"Spencer Kimball"
"Spencer Kimball"
@ -60,6 +60,10 @@
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(6 6 206))
(script-fu-menu-register "script-fu-basic1-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-basic1-logo text
size
font
@ -75,7 +79,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-basic1-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/_Basic I..."
_"_Basic I..."
"Creates a simple logo with a drop shadow"
"Spencer Kimball"
"Spencer Kimball"
@ -86,3 +90,6 @@
SF-FONT _"Font" "Dragonwick"
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(6 6 206))
(script-fu-menu-register "script-fu-basic1-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

11
plug-ins/script-fu/scripts/basic2-logo.scm
View File

@ -68,7 +68,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-basic2-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/B_asic II..."
_"B_asic II..."
"Creates a simple logo with a shadow and a highlight"
"Spencer Kimball"
"Spencer Kimball"
@ -79,6 +79,10 @@
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(206 6 50))
(script-fu-menu-register "script-fu-basic2-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-basic2-logo text
size
font
@ -94,7 +98,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-basic2-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/B_asic II..."
_"B_asic II..."
"Creates a simple logo with a shadow and a highlight"
"Spencer Kimball"
"Spencer Kimball"
@ -105,3 +109,6 @@
SF-FONT _"Font" "Sans Bold"
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(206 6 50))
(script-fu-menu-register "script-fu-basic2-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/beveled-button.scm
View File

@ -136,7 +136,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-button00"
_"<Toolbox>/Xtns/Script-Fu/Buttons/Simple _Beveled Button..."
_"Simple _Beveled Button..."
"Simple beveled button"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -151,3 +151,6 @@
SF-ADJUSTMENT _"Padding" '(2 1 100 1 10 0 1)
SF-ADJUSTMENT _"Bevel width" '(4 1 100 1 10 0 1)
SF-TOGGLE _"Pressed" FALSE)
(script-fu-menu-register "script-fu-button00"
_"<Toolbox>/Xtns/Script-Fu/Buttons")

5
plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
View File

@ -140,7 +140,7 @@
(script-fu-register "script-fu-beveled-pattern-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/_Arrow..."
_"_Arrow..."
"Beveled pattern arrow"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -152,3 +152,6 @@
_"Up"
_"Down")
SF-PATTERN _"Pattern" "Wood")
(script-fu-menu-register "script-fu-beveled-pattern-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")

5
plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
View File

@ -77,7 +77,7 @@
(script-fu-register "script-fu-beveled-pattern-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/_Bullet..."
_"_Bullet..."
"Beveled pattern bullet"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -86,3 +86,6 @@
SF-ADJUSTMENT _"Diameter" '(16 1 150 1 10 0 1)
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Transparent background" FALSE)
(script-fu-menu-register "script-fu-beveled-pattern-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")

5
plug-ins/script-fu/scripts/beveled-pattern-button.scm
View File

@ -113,7 +113,7 @@
(script-fu-register "script-fu-beveled-pattern-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/B_utton..."
_"B_utton..."
"Beveled pattern button"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -125,3 +125,6 @@
SF-COLOR _"Text color" '(0 0 0)
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Pressed" FALSE)
(script-fu-menu-register "script-fu-beveled-pattern-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")

5
plug-ins/script-fu/scripts/beveled-pattern-heading.scm
View File

@ -100,7 +100,7 @@
(script-fu-register "script-fu-beveled-pattern-heading"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/H_eading..."
_"H_eading..."
"Beveled pattern heading"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -111,3 +111,6 @@
SF-FONT _"Font" "Sans"
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Transparent background" FALSE)
(script-fu-menu-register "script-fu-beveled-pattern-heading"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")

5
plug-ins/script-fu/scripts/beveled-pattern-hrule.scm
View File

@ -70,7 +70,7 @@
(script-fu-register "script-fu-beveled-pattern-hrule"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/_Hrule..."
_"_Hrule..."
"Beveled pattern hrule"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -79,3 +79,6 @@
SF-ADJUSTMENT _"Width" '(480 5 1500 1 10 0 1)
SF-ADJUSTMENT _"Height" '(16 1 100 1 10 0 1)
SF-PATTERN _"Pattern" "Wood")
(script-fu-menu-register "script-fu-beveled-pattern-hrule"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")

5
plug-ins/script-fu/scripts/blend-anim.scm
View File

@ -217,7 +217,7 @@
(gimp-message "Blend Animation needs at least three source layers"))))
(script-fu-register "script-fu-blend-anim"
_"<Image>/Script-Fu/Animators/_Blend..."
_"_Blend..."
"Blend two or more layers over a background, so that an
animation can be saved"
"Sven Neumann <sven@gimp.org>"
@ -229,3 +229,6 @@
SF-ADJUSTMENT _"Intermediate frames" '(3 1 1024 1 10 0 1)
SF-ADJUSTMENT _"Max. blur radius" '(0 0 1024 1 10 0 1)
SF-TOGGLE _"Looped" TRUE)
(script-fu-menu-register "script-fu-blend-anim"
_"<Image>/Script-Fu/Animators")

11
plug-ins/script-fu/scripts/blended-logo.scm
View File

@ -115,7 +115,7 @@
(script-fu-register "script-fu-blended-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Blen_ded..."
_"Blen_ded..."
"Creates logos with blended backgrounds, highlights, and shadows"
"Spencer Kimball"
"Spencer Kimball"
@ -134,6 +134,10 @@
SF-GRADIENT _"Gradient" "Golden"
SF-TOGGLE _"Gradient reverse" FALSE)
(script-fu-menu-register "script-fu-blended-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-blended-logo text
size
font
@ -165,7 +169,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-blended-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Blen_ded..."
_"Blen_ded..."
"Creates logos with blended backgrounds, highlights, and shadows"
"Spencer Kimball"
"Spencer Kimball"
@ -184,3 +188,6 @@
SF-COLOR _"End blend" '(129 9 82)
SF-GRADIENT _"Gradient" "Golden"
SF-TOGGLE _"Gradient reverse" FALSE)
(script-fu-menu-register "script-fu-blended-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

10
plug-ins/script-fu/scripts/bovinated-logo.scm
View File

@ -83,7 +83,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-bovinated-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Bo_vination..."
_"Bo_vination..."
"Makes Cow-spotted logos"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
@ -95,6 +95,10 @@
SF-ADJUSTMENT _"Spots density Y" '(4 1 16 1 10 0 1)
SF-COLOR _"Background Color" '(255 255 255))
(script-fu-menu-register "script-fu-bovinated-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-bovinated-logo text
size
font
@ -111,7 +115,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-bovinated-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Bo_vination..."
_"Bo_vination..."
"Makes Cow-spotted logos"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
@ -124,3 +128,5 @@
SF-ADJUSTMENT _"Spots density Y" '(4 1 16 1 10 0 1)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-bovinated-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

7
plug-ins/script-fu/scripts/burn-in-anim.scm
View File

@ -183,8 +183,8 @@
(script-fu-register "script-fu-burn-in-anim"
_"<Image>/Script-Fu/Animators/B_urn-In..."
_"Burn-in like effect on a fg (text) layer and a bg layer; V2.1"
_"B_urn-In..."
"Burn-in like effect on a fg (text) layer and a bg layer; V2.1"
"Roland Berger roland@fuchur.leute.server.de"
"Roland Berger"
"January 2001"
@ -199,3 +199,6 @@
SF-TOGGLE _"Add glowing" TRUE
SF-TOGGLE _"Prepare for GIF" FALSE
SF-VALUE _"Speed (pixels/frame)" "50")
(script-fu-menu-register "script-fu-burn-in-anim"
_"<Image>/Script-Fu/Animators")

12
plug-ins/script-fu/scripts/camo.scm
View File

@ -86,11 +86,8 @@
(gimp-context-pop)))
; Register the function with the GIMP:
(script-fu-register
"script-fu-camo-pattern"
_"<Toolbox>/Xtns/Script-Fu/Patterns/_Camouflage..."
(script-fu-register "script-fu-camo-pattern"
_"_Camouflage..."
"Camouflage pattern"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"28th April 1998"
@ -102,6 +99,7 @@
SF-COLOR _"Color 2" '(170 170 60)
SF-COLOR _"Color 3" '(150 115 100)
SF-TOGGLE _"Smooth" FALSE
SF-TOGGLE _"Flatten image" TRUE
)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-camo-pattern"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

5
plug-ins/script-fu/scripts/carve-it.scm
View File

@ -174,7 +174,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-carve-it"
_"<Image>/Script-Fu/Stencil Ops/C_arve-It..."
_"C_arve-It..."
"Use the specified [GRAY] drawable as a stencil to carve from the specified image. The specified image must be either RGB colour or grayscale, not indexed."
"Spencer Kimball"
"Spencer Kimball"
@ -184,3 +184,6 @@
SF-DRAWABLE "Mask drawable" 0
SF-DRAWABLE _"Image to carve" 0
SF-TOGGLE _"Carve white areas" TRUE)
(script-fu-menu-register "script-fu-carve-it"
_"<Image>/Script-Fu/Stencil Ops")

5
plug-ins/script-fu/scripts/carved-logo.scm
View File

@ -153,7 +153,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-carved-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Carved..."
_"Carved..."
"Carve the text from the specified image. The image will be automatically tiled to accomodate the rendered text string. The \"Carve Raised Text\" parameter determines whether to carve the text itself, or around the text."
"Spencer Kimball"
"Spencer Kimball"
@ -168,3 +168,6 @@
"/scripts/images/texture3.jpg")
SF-TOGGLE _"Carve raised text" FALSE
SF-ADJUSTMENT _"Padding around text" '(10 0 1000 1 10 0 1))
(script-fu-menu-register "script-fu-carved-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

10
plug-ins/script-fu/scripts/chalk.scm
View File

@ -66,7 +66,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-chalk-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/_Chalk..."
_"_Chalk..."
"Chalk scribbled logos"
"Manish Singh <msingh@uclink4.berkeley.edu>"
"Manish Singh"
@ -76,6 +76,9 @@
SF-DRAWABLE "Drawable" 0
SF-COLOR _"Background color" '(0 0 0))
(script-fu-menu-register "script-fu-chalk-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-chalk-logo text
size
@ -100,7 +103,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-chalk-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/_Chalk..."
_"_Chalk..."
"Chalk scribbled logos"
"Manish Singh <msingh@uclink4.berkeley.edu>"
"Manish Singh"
@ -111,3 +114,6 @@
SF-FONT _"Font" "Cooper"
SF-COLOR _"Background color" '(0 0 0)
SF-COLOR _"Chalk color" '(255 255 255))
(script-fu-menu-register "script-fu-chalk-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

15
plug-ins/script-fu/scripts/chip-away.scm
View File

@ -127,7 +127,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-chip-away-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Chip Awa_y..."
_"Chip Awa_y..."
"Chip away effect"
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins <adrian@gimp.org>"
@ -142,8 +142,10 @@
SF-TOGGLE _"Keep bump layer" FALSE
SF-TOGGLE _"Fill BG with pattern" TRUE
SF-TOGGLE _"Keep background" TRUE
SF-PATTERN _"Pattern" "Burlwood"
)
SF-PATTERN _"Pattern" "Burlwood")
(script-fu-menu-register "script-fu-chip-away-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-chip-away-logo text
@ -169,7 +171,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-chip-away-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Chip Awa_y..."
_"Chip Awa_y..."
"Chip away effect"
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins <adrian@gimp.org>"
@ -185,6 +187,7 @@
SF-TOGGLE _"Keep bump layer" FALSE
SF-TOGGLE _"Fill BG with pattern" TRUE
SF-TOGGLE _"Keep background" TRUE
SF-PATTERN _"Pattern" "Burlwood"
)
SF-PATTERN _"Pattern" "Burlwood")
(script-fu-menu-register "script-fu-chip-away-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/chrome-it.scm
View File

@ -179,7 +179,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-sota-chrome-it"
_"<Image>/Script-Fu/Stencil Ops/C_hrome-It..."
_"C_hrome-It..."
"Use the specified [GRAY] drawable as a stencil to run the chrome effect on."
"Spencer Kimball"
"Spencer Kimball"
@ -197,3 +197,6 @@
SF-COLOR _"Highlight balance" '(211 95 0)
SF-COLOR _"Chrome balance" '(0 0 0)
SF-TOGGLE _"Chrome white areas" TRUE)
(script-fu-menu-register "script-fu-sota-chrome-it"
_"<Image>/Script-Fu/Stencil Ops")

17
plug-ins/script-fu/scripts/chrome-logo.scm
View File

@ -75,7 +75,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-chrome-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/C_hrome..."
_"C_hrome..."
"Somewhat simplistic, but cool chromed logos"
"Spencer Kimball"
"Spencer Kimball & Peter Mattis"
@ -84,8 +84,11 @@
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Offsets (pixels * 2)" '(10 2 100 1 10 0 1)
SF-COLOR _"Background Color" '(191 191 191)
)
SF-COLOR _"Background Color" '(191 191 191))
(script-fu-menu-register "script-fu-chrome-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-chrome-logo text
size
@ -101,7 +104,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-chrome-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/C_hrome..."
_"C_hrome..."
"Somewhat simplistic, but cool chromed logos"
"Spencer Kimball"
"Spencer Kimball & Peter Mattis"
@ -110,5 +113,7 @@
SF-STRING _"Text" "The GIMP"
SF-ADJUSTMENT _"Font size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT _"Font" "Bodoni"
SF-COLOR _"Background color" '(191 191 191)
)
SF-COLOR _"Background color" '(191 191 191))
(script-fu-menu-register "script-fu-chrome-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/circuit.scm
View File

@ -126,7 +126,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-circuit"
_"<Image>/Script-Fu/Render/_Circuit..."
_"_Circuit..."
"Fills the current selection with something that looks
vaguely like a circuit board."
"Adrian Likins <adrian@gimp.org>"
@ -140,3 +140,6 @@
SF-TOGGLE _"No background (only for separate layer)" FALSE
SF-TOGGLE _"Keep selection" TRUE
SF-TOGGLE _"Separate layer" TRUE)
(script-fu-menu-register "script-fu-circuit"
_"<Image>/Script-Fu/Render")

5
plug-ins/script-fu/scripts/clothify.scm
View File

@ -45,7 +45,7 @@
(script-fu-register "script-fu-clothify"
_"<Image>/Script-Fu/Alchemy/_Clothify..."
_"_Clothify..."
"Gives the current layer a cloth-like texture"
"Tim Newsome <drz@froody.bloke.com>"
"Tim Newsome"
@ -58,3 +58,6 @@
SF-ADJUSTMENT _"Azimuth" '(135 0 360 1 10 1 0)
SF-ADJUSTMENT _"Elevation" '(45 0 90 1 10 1 0)
SF-ADJUSTMENT _"Depth" '(3 1 50 1 10 0 1))
(script-fu-menu-register "script-fu-clothify"
_"<Image>/Script-Fu/Alchemy")

5
plug-ins/script-fu/scripts/coffee.scm
View File

@ -74,7 +74,7 @@
; Register the function with the GIMP:
(script-fu-register "script-fu-coffee-stain"
_"<Image>/Script-Fu/Decor/_Coffee Stain..."
_"_Coffee Stain..."
"Draws realistic looking coffee stains"
"Chris Gutteridge"
"1998, Chris Gutteridge / ECS dept, University of Southampton, England."
@ -84,3 +84,6 @@
SF-DRAWABLE "The layer" 0
SF-ADJUSTMENT _"Stains" '(3 1 10 1 1 0 0)
SF-TOGGLE _"Darken only\n(Better, but only for images with alot of white)" TRUE)
(script-fu-menu-register "script-fu-coffee-stain"
_"<Image>/Script-Fu/Decor")

10
plug-ins/script-fu/scripts/comic-logo.scm
View File

@ -106,7 +106,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-comic-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Comic Boo_k..."
_"Comic Boo_k..."
"Comic-book Style Logos"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
@ -120,6 +120,9 @@
SF-COLOR _"Outline color" '(255 255 255)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-comic-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-comic-logo text
size
@ -141,7 +144,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-comic-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Comic Boo_k..."
_"Comic Boo_k..."
"Comic-book Style Logos"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
@ -155,3 +158,6 @@
SF-ADJUSTMENT _"Outline size" '(5 1 100 1 10 0 1)
SF-COLOR _"Outline color" '(255 255 255)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-comic-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

10
plug-ins/script-fu/scripts/coolmetal-logo.scm
View File

@ -122,7 +122,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-cool-metal-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Cool _Metal..."
_"Cool _Metal..."
"Metallic logos with reflections and perspective shadows"
"Spencer Kimball & Rob Malda"
"Spencer Kimball & Rob Malda"
@ -135,6 +135,9 @@
SF-GRADIENT _"Gradient" "Horizon 1"
SF-TOGGLE _"Gradient reverse" FALSE)
(script-fu-menu-register "script-fu-cool-metal-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-cool-metal-logo text
size
@ -153,7 +156,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-cool-metal-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Cool _Metal..."
_"Cool _Metal..."
"Metallic logos with reflections and perspective shadows"
"Spencer Kimball & Rob Malda"
"Spencer Kimball & Rob Malda"
@ -165,3 +168,6 @@
SF-COLOR _"Background color" '(255 255 255)
SF-GRADIENT _"Gradient" "Horizon 1"
SF-TOGGLE _"Gradient reverse" FALSE)
(script-fu-menu-register "script-fu-cool-metal-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/copy-visible.scm
View File

@ -66,7 +66,7 @@
(gimp-image-delete image)))
(script-fu-register "script-fu-copy-visible"
_"<Image>/Edit/Copy/Copy _Visible"
_"Copy _Visible"
"Copy the visible selection"
"Sven Neumann <sven@gimp.org>, Adrian Likins <adrian@gimp.org>, Raphael Quinet <raphael@gimp.org>"
"Sven Neumann, Adrian Likins, Raphael Quinet"
@ -74,3 +74,6 @@
"RGB* INDEXED* GRAY*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0)
(script-fu-menu-register "script-fu-copy-visible"
"<Image>/Edit/Copy")

5
plug-ins/script-fu/scripts/crystal-logo.scm
View File

@ -186,7 +186,7 @@
(script-fu-register "script-fu-crystal-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Crystal..."
_"Crystal..."
"Crystal/Gel effect which displaces the image underneath"
"Spencer Kimball"
"Spencer Kimball"
@ -204,3 +204,6 @@
(string-append ""
gimp-data-directory
"/scripts/images/beavis.jpg"))
(script-fu-menu-register "script-fu-crystal-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

7
plug-ins/script-fu/scripts/distress-selection.scm
View File

@ -82,10 +82,8 @@
(gimp-displays-flush))
; Register the function with the GIMP:
(script-fu-register "script-fu-distress-selection"
_"<Image>/Script-Fu/Selection/_Distress Selection..."
_"_Distress Selection..."
"No description"
"Chris Gutteridge"
"1998, Chris Gutteridge / ECS dept, University of Southampton, England."
@ -99,3 +97,6 @@
SF-ADJUSTMENT _"Smooth" '(2 0 150 1 10 0 1)
SF-TOGGLE _"Smooth horizontally" TRUE
SF-TOGGLE _"Smooth vertically" TRUE)
(script-fu-menu-register "script-fu-distress-selection"
_"<Image>/Script-Fu/Selection")

5
plug-ins/script-fu/scripts/drop-shadow.scm
View File

@ -159,7 +159,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-drop-shadow"
_"<Image>/Script-Fu/Shadow/_Drop-Shadow..."
_"_Drop-Shadow..."
"Add a drop-shadow of the current selection or alpha-channel"
"Sven Neumann <sven@gimp.org>"
"Sven Neumann"
@ -173,3 +173,6 @@
SF-COLOR _"Color" '(0 0 0)
SF-ADJUSTMENT _"Opacity" '(80 0 100 1 10 0 0)
SF-TOGGLE _"Allow resizing" TRUE)
(script-fu-menu-register "script-fu-drop-shadow"
_"<Image>/Script-Fu/Shadow")

4
plug-ins/script-fu/scripts/erase-rows.scm
View File

@ -23,7 +23,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-erase-rows"
_"<Image>/Script-Fu/Alchemy/_Erase every other Row..."
_"_Erase every other Row..."
"Erase every other row/column with the background color"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -35,3 +35,5 @@
SF-OPTION _"Even/odd" '(_"Even" _"Odd")
SF-OPTION _"Erase/fill" '(_"Erase" _"Fill with BG"))
(script-fu-menu-register "script-fu-erase-rows"
_"<Image>/Script-Fu/Alchemy")

11
plug-ins/script-fu/scripts/fade-outline.scm
View File

@ -153,12 +153,8 @@
(gimp-context-pop)))
; Register the function with the GIMP:
; ------------------------------------
(script-fu-register
"script-fu-fade-outline"
_"<Image>/Script-Fu/Selection/_Fade Outline..."
(script-fu-register "script-fu-fade-outline"
_"_Fade Outline..."
"Blend the Layers outline border from one alpha value (opaque) to another (transparent) by generating a Layermask"
"Wolfgang Hofer <hof@hotbot.com>"
"Wolfgang Hofer"
@ -172,3 +168,6 @@
SF-TOGGLE _"Use growing selection" FALSE
SF-TOGGLE _"Apply generated layermask" FALSE
SF-TOGGLE _"Clear unselected maskarea" TRUE)
(script-fu-menu-register "script-fu-fade-outline"
_"<Image>/Script-Fu/Selection")

5
plug-ins/script-fu/scripts/flatland.scm
View File

@ -57,7 +57,7 @@
))
(script-fu-register "script-fu-flatland"
_"<Toolbox>/Xtns/Script-Fu/Patterns/_Flatland..."
_"_Flatland..."
"A Land Pattern"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
@ -69,3 +69,6 @@
SF-ADJUSTMENT _"Detail level" '(3 1 15 1 10 1 0)
SF-ADJUSTMENT _"Scale X" '(4 0.1 16 0.1 2 1 1)
SF-ADJUSTMENT _"Scale Y" '(4 0.1 16 0.1 2 1 1))
(script-fu-menu-register "script-fu-flatland"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

5
plug-ins/script-fu/scripts/font-map.scm
View File

@ -127,7 +127,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-font-map"
_"<Toolbox>/Xtns/Script-Fu/Utils/_Font Map..."
_"_Font Map..."
"Generate a listing of fonts matching a filter"
"Spencer Kimball"
"Spencer Kimball"
@ -141,3 +141,6 @@
SF-ADJUSTMENT _"_Border (pixels)" '(10 0 200 1 10 0 1)
SF-OPTION _"_Color scheme" '(_"Black on white"
_"Active colors"))
(script-fu-menu-register "script-fu-font-map"
_"<Toolbox>/Xtns/Script-Fu/Utils")

16
plug-ins/script-fu/scripts/frosty-logo.scm
View File

@ -81,7 +81,7 @@
(script-fu-register "script-fu-frosty-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/_Frosty..."
_"_Frosty..."
"Frozen logos with drop shadows"
"Spencer Kimball & Ed Mackey"
"Spencer Kimball & Ed Mackey"
@ -90,8 +90,10 @@
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Effect size (pixels)" '(100 2 1000 1 10 0 1)
SF-COLOR _"Background color" '(255 255 255)
)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-frosty-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-frosty-logo text
size
@ -107,7 +109,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-frosty-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/_Frosty..."
_"_Frosty..."
"Frozen logos with drop shadows"
"Spencer Kimball & Ed Mackey"
"Spencer Kimball & Ed Mackey"
@ -116,5 +118,7 @@
SF-STRING _"Text" "The GIMP"
SF-ADJUSTMENT _"Font size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT _"Font" "Becker"
SF-COLOR _"Background color" '(255 255 255)
)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-frosty-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

13
plug-ins/script-fu/scripts/fuzzyborder.scm
View File

@ -144,11 +144,8 @@
(gimp-selection-none inImage)
)
; Register the function with the GIMP:
(script-fu-register
"script-fu-fuzzy-border"
_"<Image>/Script-Fu/Decor/_Fuzzy Border..."
(script-fu-register "script-fu-fuzzy-border"
_"_Fuzzy Border..."
"Fade border to chosen color"
"Chris Gutteridge"
"1998, Chris Gutteridge / ECS dept, University of Southampton, England."
@ -163,5 +160,7 @@
SF-TOGGLE _"Add shadow" FALSE
SF-ADJUSTMENT _"Shadow weight (%)" '(100 0 100 1 10 0 0)
SF-TOGGLE _"Work on copy" TRUE
SF-TOGGLE _"Flatten image" TRUE
)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-fuzzy-border"
_"<Image>/Script-Fu/Decor")

9
plug-ins/script-fu/scripts/gimp-headers.scm
View File

@ -132,7 +132,7 @@
(script-fu-register "script-fu-big-header-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org/_Big Header..."
_"_Big Header..."
"Big Gimp.org Header"
"Adrian Likins & Jens Lautenbacher"
"Adrian Likins & Jens Lautenbacher"
@ -150,8 +150,11 @@
SF-TOGGLE _"Index image" TRUE
SF-ADJUSTMENT _"Number of colors" '(15 2 255 1 10 0 1))
(script-fu-menu-register "script-fu-big-header-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org")
(script-fu-register "script-fu-small-header-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org/_Small Header..."
_"_Small Header..."
"Small Gimp.org Header"
"Adrian Likins & Jens Lautenbacher"
"Adrian Likins & Jens Lautenbacher"
@ -170,3 +173,5 @@
SF-ADJUSTMENT _"Number of colors" '(15 2 255 1 10 0 1)
SF-ADJUSTMENT _"Select-by-color threshold" '(1 1 256 1 10 0 1))
(script-fu-menu-register "script-fu-small-header-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org")

22
plug-ins/script-fu/scripts/gimp-labels.scm
View File

@ -105,7 +105,7 @@
(script-fu-register "script-fu-tube-button-label-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org/_Tube Button Label..."
_"_Tube Button Label..."
"Tube Button Label Header for gimp.org"
"Adrian Likins & Jens Lautenbacher"
"Adrian Likins & Jens Lautenbacher"
@ -115,8 +115,12 @@
SF-TOGGLE _"Remove background" TRUE
SF-TOGGLE _"Index image" TRUE)
(script-fu-menu-register "script-fu-tube-button-label-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org")
(script-fu-register "script-fu-tube-subbutton-label-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org/T_ube Sub-Button Label..."
_"T_ube Sub-Button Label..."
"Tube Button Label Header for gimp.org"
"Adrian Likins & Jens Lautenbacher"
"Adrian Likins & Jens Lautenbacher"
@ -126,8 +130,12 @@
SF-TOGGLE _"Remove background" TRUE
SF-TOGGLE _"Index image" TRUE)
(script-fu-menu-register "script-fu-tube-subbutton-label-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org")
(script-fu-register "script-fu-tube-subsubbutton-label-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org/Tub_e Sub-Sub-Button Label..."
_"Tub_e Sub-Sub-Button Label..."
"Tube Button Label Header for gimp.org"
"Adrian Likins & Jens Lautenbacher"
"Adrian Likins & Jens Lautenbacher"
@ -137,9 +145,12 @@
SF-TOGGLE _"Remove background" TRUE
SF-TOGGLE _"Index image" TRUE)
(script-fu-menu-register "script-fu-tube-subsubbutton-label-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org")
(script-fu-register "script-fu-labels-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org/_General Tube Labels..."
_"_General Tube Labels..."
"Tube Button Label Header for gimp.org"
"Adrian Likins & Jens Lautenbacher"
"Adrian Likins & Jens Lautenbacher"
@ -158,3 +169,6 @@
SF-ADJUSTMENT _"Offset X" '(8 0 50 1 10 0 1)
SF-ADJUSTMENT _"Offset Y" '(0 0 50 1 10 0 1)
SF-ADJUSTMENT _"Height" '(30 2 1000 1 10 0 1))
(script-fu-menu-register "script-fu-labels-gimp-org"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Classic.Gimp.Org")

10
plug-ins/script-fu/scripts/glossy.scm
View File

@ -173,7 +173,7 @@
(script-fu-register "script-fu-glossy-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Glo_ssy..."
_"Glo_ssy..."
"Creates anything you can create with it :)"
"Hrvoje Horvat (hhorvat@open.hr)"
"Hrvoje Horvat"
@ -198,6 +198,9 @@
SF-ADJUSTMENT _"Shadow X offset" '(8 0 100 1 10 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(8 0 100 1 10 0 1))
(script-fu-menu-register "script-fu-glossy-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-glossy-logo text
size
@ -237,7 +240,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-glossy-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Glo_ssy..."
_"Glo_ssy..."
"Creates anything you can create with it :)"
"Hrvoje Horvat (hhorvat@open.hr)"
"Hrvoje Horvat"
@ -262,3 +265,6 @@
SF-TOGGLE _"Shadow" TRUE
SF-ADJUSTMENT _"Shadow X offset" '(8 0 100 1 10 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(8 0 100 1 10 0 1))
(script-fu-menu-register "script-fu-glossy-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

17
plug-ins/script-fu/scripts/glowing-logo.scm
View File

@ -67,7 +67,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-glowing-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Glo_wing Hot..."
_"Glo_wing Hot..."
"Glowing hot logos"
"Spencer Kimball"
"Spencer Kimball"
@ -76,8 +76,11 @@
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Effect size (pixels * 3)" '(150 2 1000 1 10 0 1)
SF-COLOR _"Background color" '(7 0 20)
)
SF-COLOR _"Background color" '(7 0 20))
(script-fu-menu-register "script-fu-glowing-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-glowing-logo text
size
@ -92,7 +95,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-glowing-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Glo_wing Hot..."
_"Glo_wing Hot..."
"Glowing hot logos"
"Spencer Kimball"
"Spencer Kimball"
@ -101,5 +104,7 @@
SF-STRING _"Text" "GLOWING"
SF-ADJUSTMENT _"Font size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "Slogan"
SF-COLOR _"Background color" '(7 0 20)
)
SF-COLOR _"Background color" '(7 0 20))
(script-fu-menu-register "script-fu-glowing-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

11
plug-ins/script-fu/scripts/gradient-bevel-logo.scm
View File

@ -88,7 +88,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-gradient-bevel-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Gradient Beve_l..."
_"Gradient Beve_l..."
"Makes Shiny Bevelly text"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
@ -101,6 +101,10 @@
SF-ADJUSTMENT _"Bevel width" '(2.5 1 200 1 10 1 1)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-gradient-bevel-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-gradient-bevel-logo text
size
font
@ -119,7 +123,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-gradient-bevel-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Gradient Beve_l..."
_"Gradient Beve_l..."
"Makes Shiny Bevelly text"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
@ -131,3 +135,6 @@
SF-ADJUSTMENT _"Bevel height (sharpness)" '(40 1 250 1 10 0 1)
SF-ADJUSTMENT _"Bevel width" '(2.5 1 200 1 10 1 1)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-gradient-bevel-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/gradient-example.scm
View File

@ -56,7 +56,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-gradient-example"
_"<Toolbox>/Xtns/Script-Fu/Utils/Custom _Gradient..."
_"Custom _Gradient..."
"Create an example image of a custom gradient"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -65,3 +65,6 @@
SF-ADJUSTMENT _"Width" '(400 1 2000 1 10 0 1)
SF-ADJUSTMENT _"Height" '(30 1 2000 1 10 0 1)
SF-TOGGLE _"Gradient reverse" FALSE)
(script-fu-menu-register "script-fu-gradient-example"
_"<Toolbox>/Xtns/Script-Fu/Utils")

8
plug-ins/script-fu/scripts/grid-system.scm
View File

@ -83,7 +83,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-grid-system"
_"<Image>/Script-Fu/Render/_Grid..."
_"_Grid..."
"Draw grid as specified by X-DIVIDES (list of propotions relative to the drawable) and Y-DIVIDES. The color and width of grid is detemined by the current settings of brush."
"Shuji Narazaki <narazaki@InetQ.or.jp>"
"Shuji Narazaki"
@ -92,7 +92,7 @@
SF-IMAGE "Image to use" 0
SF-DRAWABLE "Drawable to draw grid" 0
SF-VALUE _"X divisions" script-fu-grid-system-x-divides
SF-VALUE _"Y divisions" script-fu-grid-system-y-divides
)
SF-VALUE _"Y divisions" script-fu-grid-system-y-divides)
;;; grid-system.scm ends here
(script-fu-menu-register "script-fu-grid-system"
_"<Image>/Script-Fu/Render")

5
plug-ins/script-fu/scripts/guides-from-selection.scm
View File

@ -24,7 +24,7 @@
(gimp-displays-flush)))))
(script-fu-register "script-fu-guides-from-selection"
_"<Image>/Image/Guides/New Guides from _Selection"
_"New Guides from _Selection"
_"Creates four Guides around the bounding box of the current selection."
"Alan Horkan"
"Alan Horkan, 2004. Public Domain."
@ -32,3 +32,6 @@
""
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0)
(script-fu-menu-register "script-fu-guides-from-selection"
"<Image>/Image/Guides")

5
plug-ins/script-fu/scripts/guides-new-percent.scm
View File

@ -24,7 +24,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-guide-new-percent"
_"<Image>/Image/Guides/New Guide (by _Percent)..."
_"New Guide (by _Percent)..."
"Add a single Line Guide with the specified postion. Position specified as a percent of the image size."
"Alan Horkan"
"Alan Horkan, 2004"
@ -35,3 +35,6 @@
SF-OPTION _"Direction" '(_"Horizontal"
_"Vertical")
SF-ADJUSTMENT _"Position (in %)" '(50 0 100 1 10 0 1))
(script-fu-menu-register "script-fu-guide-new-percent"
"<Image>/Image/Guides")

5
plug-ins/script-fu/scripts/guides-new.scm
View File

@ -21,7 +21,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-guide-new"
_"<Image>/Image/Guides/New _Guide..."
_"New _Guide..."
"Add a single Line Guide with the specified postion and orientation. Postion is specified in Pixels (px)."
"Alan Horkan"
"Alan Horkan, 2004. Public Domain."
@ -32,3 +32,6 @@
SF-OPTION _"Direction" '(_"Horizontal"
_"Vertical")
SF-ADJUSTMENT "Position" '(0 0 1000 1 10 0 1))
(script-fu-menu-register "script-fu-guide-new"
"<Image>/Image/Guides")

5
plug-ins/script-fu/scripts/guides-remove-all.scm
View File

@ -14,7 +14,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-guides-remove"
_"<Image>/Image/Guides/_Remove all Guides"
_"_Remove all Guides"
"Removes all horizontal and vertical guides."
"Alan Horkan"
"Alan Horkan, 2004. Public Domain."
@ -22,3 +22,6 @@
""
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0)
(script-fu-menu-register "script-fu-guides-remove"
"<Image>/Image/Guides")

11
plug-ins/script-fu/scripts/hsv-graph.scm
View File

@ -330,9 +330,8 @@
(gimp-context-pop)))
(script-fu-register
"script-fu-hsv-graph"
_"<Image>/Script-Fu/Utils/Draw _HSV Graph..."
(script-fu-register "script-fu-hsv-graph"
_"Draw _HSV Graph..."
"Draph the graph of H/S/V values on the drawable"
"Shuji Narazaki <narazaki@InetQ.or.jp>"
"Shuji Narazaki"
@ -347,7 +346,7 @@
SF-ADJUSTMENT _"Start X" (cons script-fu-hsv-graph-beg-x '(0 5000 1 10 0 1))
SF-ADJUSTMENT _"Start Y" (cons script-fu-hsv-graph-beg-y '(0 5000 1 10 0 1))
SF-ADJUSTMENT _"End X" (cons script-fu-hsv-graph-end-x '(0 5000 1 10 0 1))
SF-ADJUSTMENT _"End Y" (cons script-fu-hsv-graph-end-y '(0 5000 1 10 0 1))
)
SF-ADJUSTMENT _"End Y" (cons script-fu-hsv-graph-end-y '(0 5000 1 10 0 1)))
;;; hsv-graph.scm ends here
(script-fu-menu-register "script-fu-hsv-graph"
_"<Image>/Script-Fu/Utils")

5
plug-ins/script-fu/scripts/i26-gunya2.scm
View File

@ -84,7 +84,7 @@
(script-fu-register "script-fu-i26-gunya2"
_"<Toolbox>/Xtns/Script-Fu/Logos/Imigre-26..."
_"Imigre-26..."
"Two-colored text by hand"
"Shuji Narazaki"
"Shuji Narazaki"
@ -97,4 +97,5 @@
SF-ADJUSTMENT _"Font size (pixels)" '(100 2 1000 1 10 0 1)
SF-ADJUSTMENT _"Frame size" '(2 1 20 1 5 0 1))
;;; i26-gunya2.scm ends here
(script-fu-menu-register "script-fu-i26-gunya2"
_"<Toolbox>/Xtns/Script-Fu/Logos")

11
plug-ins/script-fu/scripts/image-structure.scm
View File

@ -139,9 +139,8 @@
(gimp-context-pop)))
(script-fu-register
"script-fu-show-image-structure"
_"<Image>/Script-Fu/Utils/Show Image _Structure..."
(script-fu-register "script-fu-show-image-structure"
_"Show Image _Structure..."
"Show the layer structure of the image"
"Shuji Narazaki <narazaki@InetQ.or.jp>"
"Shuji Narazaki"
@ -159,7 +158,7 @@
SF-COLOR _"Pad color" script-fu-show-image-structure-padding-color
SF-ADJUSTMENT _"Pad opacity" (cons script-fu-show-image-structure-padding-opacity '(0 100 1 10 1 0))
SF-TOGGLE _"Make new background" script-fu-show-image-structure-with-background?
SF-COLOR _"Background color" script-fu-show-image-structure-background-color
)
SF-COLOR _"Background color" script-fu-show-image-structure-background-color)
;;; image-structure.scm ends here
(script-fu-menu-register "script-fu-show-image-structure"
_"<Image>/Script-Fu/Utils")

5
plug-ins/script-fu/scripts/land.scm
View File

@ -68,7 +68,7 @@
))
(script-fu-register "script-fu-land"
_"<Toolbox>/Xtns/Script-Fu/Patterns/_Land..."
_"_Land..."
"A Topgraphic map pattern"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
@ -83,3 +83,6 @@
SF-ADJUSTMENT _"Scale X" '(4 0.1 16 1 5 0.1 0)
SF-ADJUSTMENT _"Scale Y" '(4 0.1 16 1 5 0.1 0)
SF-GRADIENT _"Gradient" "Land 1")
(script-fu-menu-register "script-fu-land"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

5
plug-ins/script-fu/scripts/lava.scm
View File

@ -98,7 +98,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-lava"
_"<Image>/Script-Fu/Render/_Lava..."
_"_Lava..."
"Fills the current selection with lava."
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins"
@ -113,3 +113,6 @@
SF-TOGGLE _"Keep selection" TRUE
SF-TOGGLE _"Separate layer" TRUE
SF-TOGGLE _"Use current gradient" FALSE)
(script-fu-menu-register "script-fu-lava"
_"<Image>/Script-Fu/Render")

12
plug-ins/script-fu/scripts/line-nova.scm
View File

@ -69,9 +69,8 @@
(gimp-image-undo-group-end img)
(gimp-displays-flush)))
(script-fu-register
"script-fu-line-nova"
_"<Image>/Script-Fu/Render/Line _Nova..."
(script-fu-register "script-fu-line-nova"
_"Line _Nova..."
"Line Nova. Draw lines with Foreground color from the center of image to the edges. 1st undo cancels bucket-fill. 2nd undo gets orignal selection."
"Shuji Narazaki <narazaki@gimp.org>"
"Shuji Narazaki"
@ -82,6 +81,7 @@
SF-ADJUSTMENT _"Number of lines" '(200 40 1000 1 1 0 1)
SF-ADJUSTMENT _"Sharpness (degrees)" '(1.0 0.0 10.0 0.1 1 1 1)
SF-ADJUSTMENT _"Offset radius" '(100 0 2000 1 1 0 1)
SF-ADJUSTMENT _"Randomness" '(30 0 2000 1 1 0 1)
)
;;; line-nova.scm ends here
SF-ADJUSTMENT _"Randomness" '(30 0 2000 1 1 0 1))
(script-fu-menu-register "script-fu-line-nova"
_"<Image>/Script-Fu/Render")

20
plug-ins/script-fu/scripts/mkbrush.scm
View File

@ -57,7 +57,7 @@
(gimp-context-set-brush name)))
(script-fu-register "script-fu-make-brush-rectangular"
_"<Toolbox>/Xtns/Script-Fu/Make Brush/_Rectangular..."
_"_Rectangular..."
"Create size of brush"
"Seth Burgess <sjburges@ou.edu>"
"Seth Burgess"
@ -68,6 +68,9 @@
SF-ADJUSTMENT _"Height" '(20 1 200 1 10 0 1)
SF-ADJUSTMENT _"Spacing" '(25 1 100 1 10 1 0))
(script-fu-menu-register "script-fu-make-brush-rectangular"
_"<Toolbox>/Xtns/Script-Fu/Make Brush")
(define (script-fu-make-brush-rectangular-feathered name width height
feathering spacing)
@ -114,7 +117,7 @@
(gimp-context-set-brush name)))
(script-fu-register "script-fu-make-brush-rectangular-feathered"
_"<Toolbox>/Xtns/Script-Fu/Make Brush/Re_ctangular, Feathered..."
_"Re_ctangular, Feathered..."
"Create size of brush"
"Seth Burgess <sjburges@ou.edu>"
"Seth Burgess"
@ -126,6 +129,9 @@
SF-ADJUSTMENT _"Feathering" '(4 1 100 1 10 0 1)
SF-ADJUSTMENT _"Spacing" '(25 1 100 1 10 1 0))
(script-fu-menu-register "script-fu-make-brush-rectangular-feathered"
_"<Toolbox>/Xtns/Script-Fu/Make Brush")
(define (script-fu-make-brush-elliptical name width height spacing)
(let* ((img (car (gimp-image-new width height GRAY)))
@ -161,7 +167,7 @@
(gimp-context-set-brush name)))
(script-fu-register "script-fu-make-brush-elliptical"
_"<Toolbox>/Xtns/Script-Fu/Make Brush/_Elliptical..."
_"_Elliptical..."
"Create size of brush"
"Seth Burgess <sjburges@ou.edu>"
"Seth Burgess"
@ -172,6 +178,9 @@
SF-ADJUSTMENT _"Height" '(20 1 200 1 10 0 1)
SF-ADJUSTMENT _"Spacing" '(25 1 100 1 10 1 0))
(script-fu-menu-register "script-fu-make-brush-elliptical"
_"<Toolbox>/Xtns/Script-Fu/Make Brush")
(define (script-fu-make-brush-elliptical-feathered name width height
feathering spacing)
@ -220,7 +229,7 @@
(gimp-context-set-brush name)))
(script-fu-register "script-fu-make-brush-elliptical-feathered"
_"<Toolbox>/Xtns/Script-Fu/Make Brush/Elli_ptical, Feathered..."
_"Elli_ptical, Feathered..."
"Makes a feathered elliptical brush of specified size"
"Seth Burgess <sjburges@ou.edu>"
"Seth Burgess"
@ -231,3 +240,6 @@
SF-ADJUSTMENT _"Height" '(20 1 200 1 10 0 1)
SF-ADJUSTMENT _"Feathering" '(4 1 100 1 10 0 1)
SF-ADJUSTMENT _"Spacing" '(25 1 100 1 10 1 0))
(script-fu-menu-register "script-fu-make-brush-elliptical-feathered"
_"<Toolbox>/Xtns/Script-Fu/Make Brush")

17
plug-ins/script-fu/scripts/neon-logo.scm
View File

@ -176,7 +176,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-neon-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/N_eon..."
_"N_eon..."
"Neon logos"
"Spencer Kimball"
"Spencer Kimball"
@ -187,8 +187,11 @@
SF-ADJUSTMENT _"Effect size (pixels * 5)" '(150 2 1000 1 10 0 1)
SF-COLOR _"Background color" '(0 0 0)
SF-COLOR _"Glow color" '(38 211 255)
SF-TOGGLE _"Create shadow" FALSE
)
SF-TOGGLE _"Create shadow" FALSE)
(script-fu-menu-register "script-fu-neon-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-neon-logo text
size
@ -206,7 +209,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-neon-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/N_eon..."
_"N_eon..."
"Neon logos"
"Spencer Kimball"
"Spencer Kimball"
@ -217,5 +220,7 @@
SF-FONT _"Font" "Blippo"
SF-COLOR _"Background color" '(0 0 0)
SF-COLOR _"Glow color" '(38 211 255)
SF-TOGGLE _"Create shadow" FALSE
)
SF-TOGGLE _"Create shadow" FALSE)
(script-fu-menu-register "script-fu-neon-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/news-text.scm
View File

@ -64,7 +64,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-newsprint-text"
_"<Toolbox>/Xtns/Script-Fu/Logos/Newsprint Text..."
_"Newsprint Text..."
"Apply a screen to text"
"Austin Donnelly"
"Austin Donnelly"
@ -78,3 +78,6 @@
SF-ADJUSTMENT _"Blur radius" '(0 0 100 1 5 0 0)
SF-COLOR _"Text color" '(0 0 0)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-newsprint-text"
_"<Toolbox>/Xtns/Script-Fu/Logos")

13
plug-ins/script-fu/scripts/old-photo.scm
View File

@ -80,11 +80,8 @@
(gimp-displays-flush theImage)
)
; Register the function with the GIMP:
(script-fu-register
"script-fu-old-photo"
_"<Image>/Script-Fu/Decor/_Old Photo..."
(script-fu-register "script-fu-old-photo"
_"_Old Photo..."
"Makes the image look like an old photo. A border size of 0 means no border."
"Chris Gutteridge"
"1998, Chris Gutteridge / ECS dept, University of Southampton, England."
@ -99,5 +96,7 @@
; and the 'minimum' value.
SF-TOGGLE _"Sepia" TRUE
SF-TOGGLE _"Mottle" FALSE
SF-TOGGLE _"Work on copy" TRUE
)
SF-TOGGLE _"Work on copy" TRUE)
(script-fu-menu-register "script-fu-old-photo"
_"<Image>/Script-Fu/Decor")

5
plug-ins/script-fu/scripts/perspective-shadow.scm
View File

@ -175,7 +175,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-perspective-shadow"
_"<Image>/Script-Fu/Shadow/_Perspective..."
_"_Perspective..."
"Add a perspective shadow"
"Sven Neumann <sven@gimp.org>"
"Sven Neumann"
@ -191,3 +191,6 @@
SF-ADJUSTMENT _"Opacity" '(80 0 100 1 10 0 0)
SF-OPTION _"Interpolation" '(_"None" _"Linear" _"Cubic")
SF-TOGGLE _"Allow resizing" FALSE)
(script-fu-menu-register "script-fu-perspective-shadow"
_"<Image>/Script-Fu/Shadow")

5
plug-ins/script-fu/scripts/predator.scm
View File

@ -107,7 +107,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-predator"
_"<Image>/Script-Fu/Alchemy/_Predator..."
_"_Predator..."
"Looks like images from the movie Predator"
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins"
@ -120,3 +120,6 @@
SF-ADJUSTMENT _"Pixel amount" '(3 1 16 1 1 0 0)
SF-TOGGLE _"Keep selection" TRUE
SF-TOGGLE _"Separate layer" TRUE)
(script-fu-menu-register "script-fu-predator"
_"<Image>/Script-Fu/Alchemy")

5
plug-ins/script-fu/scripts/pupi-button.scm
View File

@ -180,7 +180,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-round-button"
_"<Toolbox>/Xtns/Script-Fu/Buttons/_Round Button..."
_"_Round Button..."
"Round button"
"Arturo Espinosa (stolen from quartic's beveled button)"
"Arturo Espinosa & Federico Mena Quintero"
@ -202,3 +202,6 @@
SF-TOGGLE _"Not pressed" TRUE
SF-TOGGLE _"Not pressed (active)" TRUE
SF-TOGGLE _"Pressed" TRUE)
(script-fu-menu-register "script-fu-round-button"
_"<Toolbox>/Xtns/Script-Fu/Buttons")

5
plug-ins/script-fu/scripts/rendermap.scm
View File

@ -73,7 +73,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-render-map"
_"<Toolbox>/Xtns/Script-Fu/Patterns/Render _Map..."
_"Render _Map..."
"Another pattern which resembles a map"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"28th April 1998"
@ -85,3 +85,6 @@
SF-TOGGLE _"Gradient reverse" FALSE
SF-OPTION _"Behaviour" '(_"Tile"
_"Detail in Middle"))
(script-fu-menu-register "script-fu-render-map"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

9
plug-ins/script-fu/scripts/ripply-anim.scm
View File

@ -110,7 +110,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-ripply-anim"
_"<Image>/Script-Fu/Animators/_Rippling..."
_"_Rippling..."
"Ripple any image by creating animation frames as layers"
"Adam D. Moss (adam@foxbox.org)"
"Adam D. Moss"
@ -120,4 +120,9 @@
SF-DRAWABLE "Drawable to animate" 0
SF-ADJUSTMENT _"Rippling strength" '(3 0 256 1 10 1 0)
SF-ADJUSTMENT _"Number of frames" '(15 0 256 1 10 0 1)
SF-OPTION _"Edge behaviour" '(_"Wrap" _"Smear" _"Black"))
SF-OPTION _"Edge behaviour" '(_"Wrap"
_"Smear"
_"Black"))
(script-fu-menu-register "script-fu-ripply-anim"
_"<Image>/Script-Fu/Animators")

5
plug-ins/script-fu/scripts/round-corners.scm
View File

@ -122,7 +122,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-round-corners"
_"<Image>/Script-Fu/Decor/_Round Corners..."
_"_Round Corners..."
"Round the corners of an image and optionally adds a drop-shadow and a background"
"Sven Neumann <sven@gimp.org>"
"Sven Neumann"
@ -137,3 +137,6 @@
SF-ADJUSTMENT _"Blur radius" '(15 0 1024 1 10 0 1)
SF-TOGGLE _"Add background" TRUE
SF-TOGGLE _"Work on copy" TRUE)
(script-fu-menu-register "script-fu-round-corners"
_"<Image>/Script-Fu/Decor")

8
plug-ins/script-fu/scripts/script-fu-util.scm
View File

@ -19,13 +19,11 @@
; The resulting image has the selected layer size.
; Copyright (C) 2002 Chauk-Mean PROUM
;
(define (script-fu-util-image-resize-from-layer image layer)
(define (script-fu-util-image-resize-from-layer image
layer)
(let*
((width (car (gimp-drawable-width layer)))
(height (car (gimp-drawable-height layer)))
(posx (- (car (gimp-drawable-offsets layer))))
(posy (- (cadr (gimp-drawable-offsets layer)))))
(gimp-image-resize image width height posx posy)
)
)
(gimp-image-resize image width height posx posy)))

5
plug-ins/script-fu/scripts/select-to-brush.scm
View File

@ -112,7 +112,7 @@
(gimp-context-set-brush name)))
(script-fu-register "script-fu-selection-to-brush"
_"<Image>/Script-Fu/Selection/To _Brush..."
_"To _Brush..."
"Convert a selection to a brush"
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins"
@ -123,3 +123,6 @@
SF-STRING _"Brush name" "My Brush"
SF-STRING _"File name" "mybrush"
SF-ADJUSTMENT _"Spacing" '(25 0 1000 1 1 1 0))
(script-fu-menu-register "script-fu-selection-to-brush"
_"<Image>/Script-Fu/Selection")

5
plug-ins/script-fu/scripts/select-to-image.scm
View File

@ -66,7 +66,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-selection-to-image"
_"<Image>/Script-Fu/Selection/To _Image"
_"To _Image"
"Convert a selection to an image"
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins"
@ -74,3 +74,6 @@
"RGB* GRAY*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0)
(script-fu-menu-register "script-fu-selection-to-image"
_"<Image>/Script-Fu/Selection")

5
plug-ins/script-fu/scripts/select-to-pattern.scm
View File

@ -72,7 +72,7 @@
(gimp-displays-flush))
(script-fu-register "script-fu-selection-to-pattern"
_"<Image>/Script-Fu/Selection/To _Pattern..."
_"To _Pattern..."
"Convert a selection to a pattern"
"Cameron Gregory <cameron@bloke.com>"
"Cameron Gregory"
@ -82,3 +82,6 @@
SF-DRAWABLE "Drawable" 0
SF-STRING _"Pattern name" "My Pattern"
SF-STRING _"Filename" "mypattern")
(script-fu-menu-register "script-fu-selection-to-pattern"
_"<Image>/Script-Fu/Selection")

8
plug-ins/script-fu/scripts/selection-round.scm
View File

@ -147,7 +147,7 @@
(script-fu-register "script-fu-selection-rounded-rectangle"
_"<Image>/Select/Rounded R_ectangle..."
_"Rounded R_ectangle..."
"Converts the current selection, to a rectangular selection with rounded edges. The radius is a percentage of half the selection width or height, whichever is smaller. Select 'Concave' if you want the round edges will to be indented. Round Edges works by subtracting and adding circles to the selection. "
"Alan Horkan, Sven Neumann" ; authors
"Sven Neumann" ; copyright
@ -155,10 +155,13 @@
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Radius (%)" '(50 0 100 1 10 0 0)
SF-TOGGLE _"Concave" FALSE)
(script-fu-menu-register "script-fu-selection-rounded-rectangle"
"<Image>/Select")
(script-fu-register "script-fu-selection-round"
""
"Rounds the active selection. This procedure exists for backward compatibility only. Please use script-fu-selection-rounded-rectangle instead."
@ -168,5 +171,4 @@
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT "Relative radius" '(1 0 128 .1 1 1 1))

5
plug-ins/script-fu/scripts/slide.scm
View File

@ -229,7 +229,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-slide"
_"<Image>/Script-Fu/Decor/_Slide..."
_"_Slide..."
"Gives the image the look of a slide"
"Sven Neumann <sven@gimp.org>"
"Sven Neumann"
@ -242,3 +242,6 @@
SF-FONT _"Font" "Serif"
SF-COLOR _"Font color" '(255 180 0)
SF-TOGGLE _"Work on copy" TRUE)
(script-fu-menu-register "script-fu-slide"
_"<Image>/Script-Fu/Decor")

5
plug-ins/script-fu/scripts/sota-chrome-logo.scm
View File

@ -178,7 +178,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-sota-chrome-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/SOTA Chrome..."
_"SOTA Chrome..."
"State of the art chromed logos"
"Spencer Kimball"
"Spencer Kimball"
@ -196,3 +196,6 @@
"/scripts/images/beavis.jpg")
SF-COLOR _"Highlight balance" '(211 95 0)
SF-COLOR _"Chrome balance" '(0 0 0))
(script-fu-menu-register "script-fu-sota-chrome-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/speed-text.scm
View File

@ -78,7 +78,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-speed-text"
_"<Toolbox>/Xtns/Script-Fu/Logos/Speed Text..."
_"Speed Text..."
"give text a speedy effect"
"Austin Donnelly"
"Austin Donnelly"
@ -90,3 +90,6 @@
SF-ADJUSTMENT _"Density (%)" '(80 0 100 1 10 0 0)
SF-COLOR _"Text color" '(0 0 0)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-speed-text"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/sphere.scm
View File

@ -65,7 +65,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-sphere"
_"<Toolbox>/Xtns/Script-Fu/Misc/_Sphere..."
_"_Sphere..."
"Simple sphere with a drop shadow"
"Spencer Kimball"
"Spencer Kimball"
@ -76,3 +76,6 @@
SF-TOGGLE _"Shadow" TRUE
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Sphere color" '(255 0 0))
(script-fu-menu-register "script-fu-sphere"
_"<Toolbox>/Xtns/Script-Fu/Misc")

13
plug-ins/script-fu/scripts/spinning-globe.scm
View File

@ -104,11 +104,8 @@
)
)
; Register the function with the GIMP:
(script-fu-register
"script-fu-spinning-globe"
_"<Image>/Script-Fu/Animators/_Spinning Globe..."
(script-fu-register "script-fu-spinning-globe"
_"_Spinning Globe..."
"Maps the image on an animated spinning globe"
"Chris Gutteridge"
"1998, Chris Gutteridge / ECS dept, University of Southampton, England."
@ -120,5 +117,7 @@
SF-TOGGLE _"Turn from left to right" FALSE
SF-TOGGLE _"Transparent background" TRUE
SF-ADJUSTMENT _"Index to n colors (0 = remain RGB)" '(63 0 256 1 10 0 1)
SF-TOGGLE _"Work on copy" TRUE
)
SF-TOGGLE _"Work on copy" TRUE)
(script-fu-menu-register "script-fu-spinning-globe"
_"<Image>/Script-Fu/Animators")

9
plug-ins/script-fu/scripts/spyrogimp.scm
View File

@ -317,9 +317,8 @@
)
(script-fu-register "script-fu-spyrogimp"
_"<Image>/Script-Fu/Render/_Spyrogimp..."
_"_Spyrogimp..."
_"Draws Spirographs, Epitrochoids and Lissajous Curves. More info at http://netword.com/*spyrogimp"
"Elad Shahar <elad@wisdom.weizmann.ac.il>"
"Elad Shahar"
@ -356,7 +355,7 @@
_"Gradient: Loop Sawtooth"
_"Gradient: Loop Triangle")
SF-COLOR _"Color" '(0 0 0)
SF-GRADIENT _"Gradient" "Deep Sea"
)
SF-GRADIENT _"Gradient" "Deep Sea")
;; End of syprogimp.scm
(script-fu-menu-register "script-fu-spyrogimp"
_"<Image>/Script-Fu/Render")

16
plug-ins/script-fu/scripts/starburst-logo.scm
View File

@ -73,7 +73,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-starburst-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Starb_urst..."
_"Starb_urst..."
"Starburst as inspired by GIMP News"
"Spencer Kimball & Xach Beane"
"Spencer Kimball & Xach Beane"
@ -83,8 +83,10 @@
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Effect size (pixels * 30)" '(150 0 512 1 10 0 1)
SF-COLOR _"Burst color" '(60 196 33)
SF-COLOR _"Background color" '(255 255 255)
)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-starburst-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-starburst-logo text size fontname burst-color bg-color)
@ -100,7 +102,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-starburst-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Starb_urst..."
_"Starb_urst..."
"Starburst as inspired by GIMP News"
"Spencer Kimball & Xach Beane"
"Spencer Kimball & Xach Beane"
@ -110,5 +112,7 @@
SF-ADJUSTMENT _"Font size (pixels)" '(150 0 512 1 10 0 1)
SF-FONT _"Font" "Blippo"
SF-COLOR _"Burst color" '(60 196 33)
SF-COLOR _"Background color" '(255 255 255)
)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-starburst-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

10
plug-ins/script-fu/scripts/starscape-logo.scm
View File

@ -122,7 +122,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-starscape-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Sta_rscape..."
_"Sta_rscape..."
"Starscape using the Nova plug-in"
"Spencer Kimball"
"Spencer Kimball"
@ -133,6 +133,9 @@
SF-ADJUSTMENT _"Effect size (pixels * 4)" '(150 1 1000 1 10 0 1)
SF-COLOR _"Glow color" '(28 65 188))
(script-fu-menu-register "script-fu-starscape-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-starscape-logo text
size
@ -149,7 +152,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-starscape-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Sta_rscape..."
_"Sta_rscape..."
"Starscape using the Nova plug-in"
"Spencer Kimball"
"Spencer Kimball"
@ -159,3 +162,6 @@
SF-ADJUSTMENT _"Font size (pixels)" '(150 1 1000 1 10 0 1)
SF-FONT _"Font" "Engraver"
SF-COLOR _"Glow color" '(28 65 188))
(script-fu-menu-register "script-fu-starscape-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

5
plug-ins/script-fu/scripts/swirltile.scm
View File

@ -44,7 +44,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-swirl-tile"
_"<Toolbox>/Xtns/Script-Fu/Patterns/Swirl-_Tile..."
_"Swirl-_Tile..."
"Create an interesting swirled tile"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
@ -59,3 +59,6 @@
SF-ADJUSTMENT _"Whirl amount" '(320 0 360 1 10 0 0)
SF-ADJUSTMENT _"Roughness" '(.5 0 1 .1 .01 2 1)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-swirl-tile"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

5
plug-ins/script-fu/scripts/swirly-pattern.scm
View File

@ -77,7 +77,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-swirly-pattern"
_"<Toolbox>/Xtns/Script-Fu/Patterns/_Swirly..."
_"_Swirly..."
"Create a swirly pattern"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -86,3 +86,6 @@
SF-ADJUSTMENT _"Quarter size" '(20 0 2048 1 10 0 1)
SF-ADJUSTMENT _"Whirl angle" '(90 0 360 1 1 0 0)
SF-ADJUSTMENT _"Number of times to whirl" '(4 0 128 1 1 0 1))
(script-fu-menu-register "script-fu-swirly-pattern"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

16
plug-ins/script-fu/scripts/t-o-p-logo.scm
View File

@ -92,7 +92,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-t-o-p-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/_Particle Trace..."
_"_Particle Trace..."
"Trace of Particles Effect"
"Shuji Narazaki (narazaki@InetQ.or.jp)"
"Shuji Narazaki"
@ -105,8 +105,10 @@
SF-ADJUSTMENT _"Edge width" '(2 0 128 1 1 0 0)
SF-TOGGLE _"Edge only" FALSE
SF-COLOR _"Base color" '(0 40 0)
SF-COLOR _"Background color" '(255 255 255)
)
SF-COLOR _"Background color" '(255 255 255))
(script-fu-menu-register "script-fu-t-o-p-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-t-o-p-logo text
@ -128,7 +130,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-t-o-p-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/_Particle Trace..."
_"_Particle Trace..."
"Trace of Particles Effect"
"Shuji Narazaki (narazaki@InetQ.or.jp)"
"Shuji Narazaki"
@ -141,7 +143,7 @@
SF-ADJUSTMENT _"Edge width" '(2 0 128 1 1 0 0)
SF-TOGGLE _"Edge only" FALSE
SF-COLOR _"Base color" '(0 40 0)
SF-COLOR _"Background color" '(255 255 255)
)
SF-COLOR _"Background color" '(255 255 255))
; end of t-o-p.scm
(script-fu-menu-register "script-fu-t-o-p-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

13
plug-ins/script-fu/scripts/text-circle.scm
View File

@ -133,21 +133,20 @@
(gimp-display-new img)
(gimp-displays-flush)))
(script-fu-register
"script-fu-text-circle"
_"<Toolbox>/Xtns/Script-Fu/Logos/Text Circle..."
(script-fu-register "script-fu-text-circle"
_"Text Circle..."
"Render the specified text along the perimeter of a circle"
"Shuji Narazaki <narazaki@gimp.org>"
"Shuji Narazaki"
"1997-1998"
""
SF-STRING _"Text" "The GNU Image Manipulation Program Version 2.0 "
SF-STRING _"Text" "The GNU Image Manipulation Program Version 2.2 "
SF-ADJUSTMENT _"Radius" '(80 1 8000 1 1 0 1)
SF-ADJUSTMENT _"Start angle" '(0 -180 180 1 1 0 1)
SF-ADJUSTMENT _"Fill angle" '(360 -360 360 1 1 0 1)
SF-ADJUSTMENT _"Font size (pixels)" '(18 1 1000 1 1 0 1)
SF-TOGGLE _"Antialias" TRUE
SF-FONT _"Font" "Sans"
)
SF-FONT _"Font" "Sans")
;; text-circle.scm ends here
(script-fu-menu-register "script-fu-text-circle"
_"<Toolbox>/Xtns/Script-Fu/Logos")

11
plug-ins/script-fu/scripts/textured-logo.scm
View File

@ -111,7 +111,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-textured-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/_Textured..."
_"_Textured..."
"Creates textured logos with blended backgrounds, highlights, and shadows"
"Spencer Kimball"
"Spencer Kimball"
@ -128,6 +128,10 @@
SF-COLOR _"Starting blend" '(32 106 0)
SF-COLOR _"Ending blend" '(0 0 106))
(script-fu-menu-register "script-fu-textured-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-textured-logo text
size
fontname
@ -148,7 +152,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-textured-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/_Textured..."
_"_Textured..."
"Creates textured logos with blended backgrounds, highlights, and shadows"
"Spencer Kimball"
"Spencer Kimball"
@ -164,3 +168,6 @@
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Starting blend" '(32 106 0)
SF-COLOR _"Ending blend" '(0 0 106))
(script-fu-menu-register "script-fu-textured-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")

12
plug-ins/script-fu/scripts/tileblur.scm
View File

@ -55,11 +55,9 @@
)
)
; Register the function with the GIMP:
(script-fu-register
"script-fu-tile-blur"
_"<Image>/Filters/Blur/_Tileable Blur..."
(script-fu-register "script-fu-tile-blur"
_"_Tileable Blur..."
"Blurs image edges so that the final result tiles seamlessly"
"Chris Gutteridge"
"1998, Chris Gutteridge / ECS dept, University of Southampton, England."
@ -70,7 +68,7 @@
SF-ADJUSTMENT _"Radius" '(5 0 128 1 1 0 0)
SF-TOGGLE _"Blur vertically" TRUE
SF-TOGGLE _"Blur horizontally" TRUE
SF-OPTION _"Blur type" '(_"IIR" _"RLE")
)
SF-OPTION _"Blur type" '(_"IIR" _"RLE"))
(script-fu-menu-register "script-fu-tile-blur"
"<Image>/Filters/Blur")

5
plug-ins/script-fu/scripts/title-header.scm
View File

@ -158,7 +158,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-title-header"
_"<Toolbox>/Xtns/Script-Fu/Logos/Web Title Header..."
_"Web Title Header..."
"Web title header"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -168,3 +168,6 @@
SF-ADJUSTMENT _"Font size (pixels)" '(32 2 256 1 10 0 0)
SF-FONT _"Font" "Sans"
SF-TOGGLE _"Gradient reverse" FALSE)
(script-fu-menu-register "script-fu-title-header"
_"<Toolbox>/Xtns/Script-Fu/Logos")

10
plug-ins/script-fu/scripts/truchet.scm
View File

@ -147,18 +147,20 @@
(gimp-context-pop)))
(script-fu-register "script-fu-truchet"
_"<Toolbox>/Xtns/Script-Fu/Patterns/T_ruchet..."
_"T_ruchet..."
"Create a Truchet pattern \n\nWorks best with even sized thicknesses"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
"1997"
""
SF-ADJUSTMENT _"Block size" '(32 2 512 1 10 1 1)
SF-ADJUSTMENT _"Thickness" '(2 1 512 1 10 1 1)
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Foreground color" '(0 0 0)
SF-ADJUSTMENT _"Number of X tiles" '(5 1 512 1 10 1 1)
SF-ADJUSTMENT _"Number of Y tiles" '(5 1 512 1 10 1 1)
)
SF-ADJUSTMENT _"Number of Y tiles" '(5 1 512 1 10 1 1))
(script-fu-menu-register "script-fu-truchet"
_"<Toolbox>/Xtns/Script-Fu/Patterns")

6
plug-ins/script-fu/scripts/unsharp-mask.scm
View File

@ -66,8 +66,9 @@
(gimp-image-undo-enable new-image)
(gimp-displays-flush)))
(script-fu-register "script-fu-unsharp-mask"
_"<Image>/Script-Fu/Alchemy/_Unsharp Mask..."
_"_Unsharp Mask..."
"Make a sharp image of IMAGE's DRAWABLE by applying unsharp mask method"
"Shuji Narazaki <narazaki@gimp.org>"
"Shuji Narazaki"
@ -77,3 +78,6 @@
SF-DRAWABLE "Drawable to apply" 0
SF-ADJUSTMENT _"Mask size" '(5 1 100 1 1 0 1)
SF-ADJUSTMENT _"Mask opacity" '(50 0 100 1 1 0 1))
(script-fu-menu-register "script-fu-unsharp-mask"
_"<Image>/Script-Fu/Alchemy")

6
plug-ins/script-fu/scripts/waves-anim.scm
View File

@ -85,8 +85,9 @@
(gimp-image-undo-enable image)
(gimp-display-new image)))
(script-fu-register "script-fu-waves-anim"
_"<Image>/Script-Fu/Animators/_Waves..."
_"_Waves..."
"Animate an image like a stone's been thrown into it"
"Sven Neumann <sven@gimp.org>"
"Sven Neumann"
@ -98,3 +99,6 @@
SF-ADJUSTMENT _"Wavelength" '(10 .10 100 1 10 1 0)
SF-ADJUSTMENT _"Number of frames" '(6 1 512 1 10 0 1)
SF-TOGGLE _"Invert direction" FALSE)
(script-fu-menu-register "script-fu-waves-anim"
_"<Image>/Script-Fu/Animators")

6
plug-ins/script-fu/scripts/weave.scm
View File

@ -384,8 +384,9 @@
(gimp-context-pop)))
(script-fu-register "script-fu-weave"
_"<Image>/Script-Fu/Alchemy/_Weave..."
_"_Weave..."
"Weave effect like Alien Skin"
"Federico Mena Quintero"
"Federico Mena Quintero"
@ -400,3 +401,6 @@
SF-ADJUSTMENT _"Thread length" '(200 0 256 1 10 1 1)
SF-ADJUSTMENT _"Thread density" '(50 0 100 1 10 1 1)
SF-ADJUSTMENT _"Thread intensity" '(100 0 512 1 10 1 1))
(script-fu-menu-register "script-fu-weave"
_"<Image>/Script-Fu/Alchemy")

22
plug-ins/script-fu/scripts/web-browser.scm
View File

@ -28,26 +28,38 @@
(define (gimp-online-plug-in-web-site)
(plug-in-web-browser "http://registry.gimp.org"))
(script-fu-register "gimp-online-main-web-site"
_"<Toolbox>/Help/The GIMP Online/_Main Web Site"
_"_Main Web Site"
"Link to http://www.gimp.org"
"Henrik Brix Andersen <brix@gimp.org>"
"Henrik Brix Andersen <brix@gimp.org>"
"2003"
"")
(script-fu-menu-register "gimp-online-main-web-site"
_"<Toolbox>/Help/The GIMP Online")
(script-fu-register "gimp-online-developer-web-site"
_"<Toolbox>/Help/The GIMP Online/_Developer Web Site"
"Link to http://www.gimp.org"
_"_Developer Web Site"
"Link to http://developer.gimp.org"
"Henrik Brix Andersen <brix@gimp.org>"
"Henrik Brix Andersen <brix@gimp.org>"
"2003"
"")
(script-fu-menu-register "gimp-online-developer-web-site"
_"<Toolbox>/Help/The GIMP Online")
(script-fu-register "gimp-online-plug-in-web-site"
_"<Toolbox>/Help/The GIMP Online/Plug-in _Registry"
"Link to http://www.gimp.org"
_"Plug-in _Registry"
"Link to http://registry.gimp.org"
"Henrik Brix Andersen <brix@gimp.org>"
"Henrik Brix Andersen <brix@gimp.org>"
"2003"
"")
(script-fu-menu-register "gimp-online-plug-in-web-site"
_"<Toolbox>/Help/The GIMP Online")

6
plug-ins/script-fu/scripts/xach-effect.scm
View File

@ -111,7 +111,7 @@
(script-fu-register "script-fu-xach-effect"
_"<Image>/Script-Fu/Shadow/_Xach-Effect..."
_"_Xach-Effect..."
"Add a subtle translucent 3-d effect to the current selection or alpha channel"
"Adrian Likins <adrian@gimp.org>"
"Adrian Likins"
@ -130,5 +130,5 @@
SF-ADJUSTMENT _"Drop shadow Y offset" '(5 0 255 1 10 0 1)
SF-TOGGLE _"Keep selection" TRUE)
(script-fu-menu-register "script-fu-xach-effect"
_"<Image>/Script-Fu/Shadow")