Commit e6a88085 authored by GMT 1998 Andy Thomas's avatar GMT 1998 Andy Thomas Committed by Andy Thomas

plug-ins/script-fu/scripts/comic-logo.scm


Tue Nov  3 21:47:53 GMT 1998 Andy Thomas <alt@picnic.demon.co.uk>

	* plug-ins/script-fu/scripts/comic-logo.scm
	* plug-ins/script-fu/scripts/glossy.scm
	* plug-ins/script-fu/scripts/land.scm
	* plug-ins/script-fu/scripts/lava.scm
	* plug-ins/script-fu/scripts/rendermap.scm

	Updated these scripts to use the new SF-GRADIENT Script-fu type.
parent b41811e6
Tue Nov 3 21:47:53 GMT 1998 Andy Thomas <alt@picnic.demon.co.uk>
* plug-ins/script-fu/scripts/comic-logo.scm
* plug-ins/script-fu/scripts/glossy.scm
* plug-ins/script-fu/scripts/land.scm
* plug-ins/script-fu/scripts/lava.scm
* plug-ins/script-fu/scripts/rendermap.scm
Updated these scripts to use the new SF-GRADIENT Script-fu type.
Tue Nov 3 04:39:40 EST 1998 Adrian Likins <adrian@gimp.org>
* plug-ins/script-fu/scripts/swirl-tile.scm: ooops, I accidently
......
......@@ -88,5 +88,5 @@
SF-STRING "Text String" "Moo"
SF-VALUE "Font Size (in pixels)" "85"
SF-STRING "Font" "tribeca"
SF-STRING "Gradient" "Incandescent"
SF-GRADIENT "Gradient" "Incandescent"
SF-VALUE "Outline width" "5")
......@@ -128,8 +128,8 @@
SF-STRING "Text String" "Galaxy"
SF-VALUE "Font Size (in pixels)" "100"
SF-STRING "Font" "Eras"
SF-STRING "Blend Gradient (text)" "Shadows_2"
SF-STRING "Blend Gradient (outline)" "Shadows_2"
SF-GRADIENT "Blend Gradient (text)" "Shadows_2"
SF-GRADIENT "Blend Gradient (outline)" "Shadows_2"
SF-VALUE "How big outline?" "5"
SF-COLOR "Background Color" '(255 255 255)
SF-TOGGLE "Use pattern for text instead of gradient" FALSE
......
......@@ -30,16 +30,14 @@
(define (script-fu-land width height seed detail landheight seadepth xscale yscale)
(define (script-fu-land width height seed detail landheight seadepth xscale yscale gradient)
(let* (
(img (car (gimp-image-new width height RGB)))
(layer-one (car (gimp-layer-new img width height RGB "bottom" 100 NORMAL)))
)
(gimp-gradients-set-active gradient)
(gimp-image-disable-undo img)
(gimp-image-add-layer img layer-one 0)
(plug-in-solid-noise 1 img layer-one TRUE FALSE seed detail xscale yscale)
(plug-in-c-astretch 1 img layer-one)
......@@ -81,7 +79,8 @@
SF-VALUE "Land height" "60"
SF-VALUE "Sea depth" "4"
SF-VALUE "X Scale" "4.0"
SF-VALUE "Y Scale" "4.0")
SF-VALUE "Y Scale" "4.0"
SF-GRADIENT "gradient" "Land_1")
......
......@@ -110,7 +110,7 @@
SF-VALUE "Seed" "2"
SF-VALUE "Size" "10"
SF-VALUE "Roughness" "7"
SF-STRING "Gradient" "German_flag_smooth"
SF-GRADIENT "Gradient" "German_flag_smooth"
SF-TOGGLE "Keep Selection?" TRUE
SF-TOGGLE "Seperate Layer?" TRUE
SF-TOGGLE "Use current Gradient?" FALSE)
......
......@@ -68,7 +68,7 @@
""
SF-ADJUSTMENT "Image Size" '(256 0 2048 1 10 0 0)
SF-ADJUSTMENT "Granularity (0 - 15):" '(4 0 15 1 1 0 1)
SF-STRING "Gradient:" "Land_and_Sea"
SF-GRADIENT "Gradient:" "Land_and_Sea"
SF-TOGGLE "TRUE = Detail in middle, FALSE = tile" FALSE
)
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment