Witamy, Gość. Zaloguj się lub zarejestruj.
Czy dotarł do Ciebie email aktywacyjny?


Zaloguj się podając nazwę użytkownika, hasło i długość sesji

Polskie Forum Użytkowników GIMP-aHyde zoneKoszWątek: Odp: Opracowanie Skyptu Script-Fu
Strony: [1]
DrukujPobierz PDF
Autor Wątek: Odp: Opracowanie Skyptu Script-Fu  (Przeczytany 116 razy)
0 użytkowników i 1 Gość przegląda ten wątek.
Ziomioslaw
Administrator

Reputacja: 46 Online Online

Płeć: Mężczyzna
GIMP: 2.10
JID: ziomioslaw@jabber.org
Licencja: Copyright
Wiadomości: 7 412
Galeria Użytkownika


Cyklista Apokalipsy


Zobacz profil
« : 16.11.2022, 20:18:19 »

Spróbujcie teraz:

[code]
(define (resize-and-add-border image drawable)
   (gimp-image-undo-group-start image)
   (plug-in-autocrop RUN-NONINTERACTIVE image drawable)

   (let* (
         (square-size 1500)
         (current-width (car (gimp-image-width image)))
         (current-height (car (gimp-image-height image)))
         (wanted-width (min (- square-size 10) current-width))
         (wanted-height (min (- square-size 10) current-height))
         (ratio (min (/ wanted-width current-width) (/ wanted-height current-height)))
         (width (* ratio current-width))
         (height (* ratio current-height))
      )

      (gimp-image-scale image width height)
      (gimp-image-resize image square-size square-size (/ (- square-size width) 2) (/ (- square-size height) 2))
   )

   (gimp-image-undo-group-end image)
   (gimp-displays-flush)
)

(script-fu-register "resize-and-add-border"
   "<Image>/Script-Fu/Resize and add border"
   "Automatically adjust contrast of drawable"
   "Ziomioslaw"
   "Ziomioslaw"
   "2022"
   "*"
   SF-IMAGE
Zapisane
Strony: [1]
DrukujPobierz PDF
Polskie Forum Użytkowników GIMP-aHyde zoneKoszWątek: Odp: Opracowanie Skyptu Script-Fu
Skocz do: