(define (image-satin-script theImage drawable hue saturation lightness)

    (let* 
    (
	(theSelection)
	(height (car (gimp-image-height theImage)))
	(width (car (gimp-image-width theImage)))
	(satinLayer)
	(noiseLayer)
	(counter 15)
	(X1)
	(X2)
	(Y1)
	(Y2)
    )







)	;closing parenthesis for let* block
)	;closing parenthesis for the define function block

(script-fu-register 	"image-satin-script"
			"<Image>/Filters/Render/Satin..."
			"Create a Satin Fabric"
			"Art Wade"
			"Art Wade"
			"Feb 2008"
			"RGB*"
			SF-IMAGE      "image" 0
			SF-DRAWABLE   "drawable" 0
			SF-ADJUSTMENT	  "Satin Color (order of color is R O Y G B V - Red is zero)" '(20 0 360 1 10 0 0)
			SF-ADJUSTMENT	  "Color Saturation - Its Depth" '(50 10 100 1 10 0 1)
		      SF-ADJUSTMENT	  "Color Lightness - Its Brightness" '(0 -50 70 1 10 0 1)
)