3.6. Das Textbox-Skript erweitern
| 3. Ein Skript-Fu-Tutorial |

### 3.6. Das Textbox-Skript erweitern

#### 3.6.1. Rückgängig machen korrekt handhaben

When creating a script, you want to give your users the ability to undo their actions, should they make a mistake. This is easily accomplished by calling the functions `gimp-image-undo-group-start` and `gimp-image-undo-group-end` around the code that manipulates the image. You can think of them as matched statements that let GIMP know when to start and stop recording manipulations on the image, so that those manipulations can later be undone.

Wenn Sie ein völlig neues Bild erstellen, ist das Verwenden dieser Funktionen sinnlos, da Sie kein existierendes Bild verändern. Wenn Sie das allerdings tun, dann sollten Sie diese Funktionen ganz bestimmt verwenden.

Mit Hilfe dieser Funktionen klappt das Zurücknehmen eines Skriptes praktisch ohne Probleme.

#### 3.6.2. Das Skript noch etwas mehr erweitern

Nachdem wir nun ein wirklich nettes Skript zur Texterzeugung haben, lassen Sie uns noch zwei Möglichkeiten hinzufügen:

- Im Moment wird das Bild so skaliert, dass der Text genau hineinpasst – es ist also kein Platz für irgendetwas anderes, etwa Schlagschatten oder spezielle Effekte (auch wenn viele Skripte das Bild bei Bedarf automatisch skalieren). Lassen Sie uns daher einen Puffer um den Text erstellen, ferner soll der Benutzer festlegen können, wie groß der Puffer (in Prozent der Textgröße) sein soll.

- Dieses Skript könnte leicht von anderen Skripten, die mit Text arbeiten verwendet werden. Lassen Sie es uns so erweitern, dass es das Bild und die Ebenen zurückliefert, so dass andere Skripte dieses Skript aufrufen können und das von uns erstellte Bild und die Ebenen verwenden können.

#### 3.6.3. Die Parameter und die Registrierungsfunktion modifizieren

Damit der Benutzer die Puffergröße festlegen kann, fügen wir unserer Funktion und der Registrierungsfunktion einen Parameter hinzu:

      (define (script-fu-text-box inTest inFont inFontSize inTextColor inBufferAmount)
      (let*
            (
               ; define our local variables
               ; create a new image:
               (theImageWidth  10)
               (theImageHeight 10)
               (theImage (car
                              (gimp-image-new
                               theImageWidth
                               theImageHeight
                               RGB
                              )
                         )
               )
               (theText)          ;a declaration for the text
                                  ;we create later

               (theBuffer)        ;added

               (theLayer
                         (car
                             (gimp-layer-new
                              theImage
                               "layer 1"
                              theImageWidth
                              theImageHeight
                              RGB-IMAGE
                              100
                              LAYER-MODE-NORMAL
                             )
                         )
               )
            ) ;end of our local variables

       [Code here]
     )

      (script-fu-register
        "script-fu-text-box"                        ;function name
        "Text Box"                                  ;menu label
        "Creates a simple text box, sized to fit\
          around the user's choice of text,\
          font, font size, and color."              ;description
        "Michael Terry"                             ;author
        "copyright 1997, Michael Terry;\
          2009, the GIMP Documentation Team"        ;copyright notice
        "October 27, 1997"                          ;date created
        ""                                      ;image type that the script works on
        SF-STRING      "Text"          "Text Box"   ;a string variable
        SF-FONT        "Font"          "Charter"    ;a font variable
        SF-ADJUSTMENT  "Font size"     '(50 1 1000 1 10 0 1)
                                                    ;a spin-button
        SF-COLOR       "Color"         '(0 0 0)     ;color variable
        SF-ADJUSTMENT  "Buffer amount" '(35 0 100 1 10 1 0)
                                                    ;a slider
      )
      (script-fu-menu-register "script-fu-text-box" "<Image>/Filters/Tutorial")

#### 3.6.4. Den neuen Code hinzufügen

Wir fügen den Code an zwei Stellen ein: unmittelbar, bevor wir die Größe des Bildes anpassen, und am Ende des Skripts (um das neue Bild, die Ebene und den Text zurückzugeben).

Nachdem die Textbreite und -höhe ermittelt haben, müssen wir diese Werte auf der vom Nutzer spezifizierten Puffergröße basierend anpassen. Wir führen hier keine Fehlerprüfung durch um sicherzustellen, dass sie im Bereich 0-100% liegt, da es zum einen nicht gefährlich wäre und es zum anderen keinen Grund gibt, warum der Benutzer nicht einen Wert wie „200“ als Prozentwert für den Puffer eingeben sollte.

            (set! theBuffer (* theImageHeight (/ inBufferAmount 100) ) )

            (set! theImageHeight (+ theImageHeight theBuffer theBuffer) )
            (set! theImageWidth  (+ theImageWidth  theBuffer theBuffer) )

Wir machen hier nichts weiter, als den Puffer gemäß der Texthöhe zu setzen und ihn dann jeweils zweimal zur Bildhöhe und -breite zu addieren. (Wir addieren ihn zweimal in beide Richtungen, da der Puffer zu beiden Seiten des Textes hinzugefügt werden muss.)

Jetzt, wo wir die Größe des Bildes geändert haben, um einen Puffer zu erlauben, müssen wir den Text innerhalb des Bildes zentrieren. Das machen wir, indem wir ihn zur (x,y)-Koordinate von (`theBuffer`, `theBuffer`) verschieben. Ich habe diese Zeile hinter der Skalierung von Ebene und Bild eingefügt:

            (gimp-layer-set-offsets theText theBuffer theBuffer)

Go ahead and save your script, and try it out after restarting GIMP.

Was noch zu tun bleibt ist, das Bild, die Ebene und die Textebene zurückzugeben. Nach dem Anzeigen des Bildes fügen wir diese Zeile ein:

    (list theImage theLayer theText)

Das ist die letzte Zeile unserer Funktion und macht diese Liste anderen Skripten, die sie verwenden wollen, verfügbar.

Um unser neues Textbox-Skript in anderen Skripten zu verwenden, könnten wir etwa folgendes schreiben:

            (set! theResult (script-fu-text-box
                             "Irgendein Text"
                             "Charter" "30"
                             '(0 0 0)
                             "35"
                            )
            )
            (gimp-image-flatten (car theResult))

Gratuliere, Sie sind nun auf dem besten Wege zu Ihrem Schwarzen Gürtel in Skript-Fu!

3.5. Adding Additional Functionality |  | 3.7. Ihr Skript und seine Ausgabe

Report a bug in GIMP Report a documentation error