Fixed variation in sides. Extra brush option

Fixed the variation in sides as they are painted. Added option to allow for Existing brush settings to be used instead.

Author: karlhof26

hexgrid.scm

@@ -28,7 +28,15 @@
 ; The GNU Public License is available at
 ; http://www.gnu.org/copyleft/gpl.html
 
-(define (script-fu-hex-grid img inLayer inElement inLength inOrientation inStroke inXoff inYoff inColour)
+(define (script-fu-hex-grid img inLayer
+            inElement
+            inLength
+            inOrientation
+            inStroke
+            inXoff
+            inYoff
+            inColour
+            inBrushtoUse)
   (let*
         (
             (width (car (gimp-image-width img)))
@@ -117,27 +125,38 @@
         ;(gimp-message "ok to line 115")
 
         (gimp-context-set-paint-method "gimp-paintbrush")
-        (set! brushTemp (car (gimp-brush-new "HexGrid Temp Stroke Circle Brush")))
-        (gimp-brush-set-shape brushTemp BRUSH-GENERATED-CIRCLE)
-        (gimp-brush-set-hardness brushTemp 0.99)
-        (gimp-brush-set-radius brushTemp (round (+ (/ inStroke 2) 1.0)))
-        (gimp-brush-set-spacing brushTemp 20.0)
-        (gimp-brush-set-spikes brushTemp 2)
-        (gimp-brush-set-aspect-ratio brushTemp 1.0)
-        (gimp-brush-set-angle brushTemp 1.0)
 
-        (gimp-context-set-brush "HexGrid Temp Stroke Circle Brush") ; was brushTemp variable
-        (gimp-context-set-paint-mode LAYER-MODE-NORMAL)
-        (gimp-context-set-brush-size inStroke)
-        (gimp-context-set-dynamics "Dynamics Off")
+        (if (= inBrushtoUse 0)
+            (begin
+                
+                (set! brushTemp (car (gimp-brush-new "HexGrid Temp Stroke Circle Brush")))
+                (gimp-brush-set-shape brushTemp BRUSH-GENERATED-CIRCLE)
+                (gimp-brush-set-hardness brushTemp 1.0)
+                (gimp-brush-set-radius brushTemp (round (+ (/ inStroke 2) 1.0)))
+                (gimp-brush-set-spacing brushTemp 20.0)
+                ;(gimp-brush-set-spikes brushTemp 2)
+                ;(gimp-brush-set-aspect-ratio brushTemp 1.0)
+                ;(gimp-brush-set-angle brushTemp 1.0)
+                
+                (gimp-context-set-brush "HexGrid Temp Stroke Circle Brush") ; was brushTemp variable
+                (gimp-context-set-paint-mode LAYER-MODE-NORMAL)
+                (gimp-context-set-brush-size inStroke)
+                (gimp-context-set-brush-spacing 0.2)
+                (gimp-context-set-dynamics "Dynamics Off")
+            )
+        )
 
         (gimp-edit-stroke-vectors inLayer varPath)
 
 
 
         ;(gimp-image-remove-vectors img varPath)
-        (gimp-brush-delete brushTemp)
-        (gimp-brushes-refresh)
+        (if (= inBrushtoUse 0)
+            (begin
+                (gimp-brush-delete brushTemp)
+            )
+        )
+        ;(gimp-brushes-refresh)
 
         ;done
         (gimp-image-undo-group-end img)
@@ -149,7 +168,7 @@
 
 (script-fu-register "script-fu-hex-grid"
         "<Toolbox>/Script-Fu/Render/Pattern/Hex Grid"
-        "Draw a hex grid on the image. Less advanced version.\n hexgrid.scm"
+        "Draw a hex grid on the image. Less advanced version. Creates a brush in the background.\n hexgrid.scm"
         "karlhof26"
         "karlhof26"
         "March 2020"
@@ -160,9 +179,11 @@
         SF-ADJUSTMENT "Length of Element"   '(70 2 400 1 10 0 SF-SPINNER)
         SF-OPTION     "Hex Orientation"     '("Horizontal" "Vertical")
         SF-ADJUSTMENT "Line Width (px)"     '(2 1 400 1 10 0 SF-SPINNER)
-        SF-ADJUSTMENT "Horizontal Offset"   '(0 0 399 0.5 10 1 SF-SPINNER)
-        SF-ADJUSTMENT "Vertical Offset"     '(0 0 399 0.5 10 1 SF-SPINNER)
+        SF-ADJUSTMENT "Horizontal Offset (px)"   '(0 0 399 0.5 10 0 SF-SPINNER)
+        SF-ADJUSTMENT "Vertical Offset (px)"     '(0 0 399 0.5 10 0 SF-SPINNER)
         SF-COLOR      "Color"               "black"
+        SF-OPTION     "Brush to use"     '("Default" "Current Brush settings")
+
 )
 
 ;end of script