Down 26.07.2006 22:54 - oppdatert 710 dager siden av Terje Pedersen script-fu-enkel-tekst

Et lite eksempel på hvordan sette inn en liten, A photo by senikk, tekst nederst i høyre hjørne på et bilde via Script-Fu (Scheme) i GIMP.

Kommer nok selv ikke til bruke meg av akkurat denne koden slik den er nå, men en litt modifisert utgave som spørr etter tittel og sentrerer den i topp. Dette fordi denne teksten her den har jeg allerede satt fast i rammemalen min.

  1. (define (senikk-photo-by image drawable)
  2. (let*
  3. ((width (car (gimp-image-width image)))
  4. (height (car (gimp-image-height image)))
  5. (text "A photo by senikk")
  6. (font-name "Rudelsberg")
  7. (font-size 24))
  8. (gimp-image-undo-group-start image)
  9. (set! text-size (gimp-text-get-extents-fontname text font-size 0 font-name))
  10. (set! text-width (car text-size))
  11. (set! text-height (cadr text-size))
  12. (set! text-layer (car (gimp-text-fontname image drawable
  13. (- width text-width 20) (- height text-height 10) text 0 1 font-size 0 font-name)))
  14. (gimp-floating-sel-anchor text-layer)
  15. (gimp-image-undo-group-end image)
  16. (gimp-displays-flush)))
  17. (script-fu-register "senikk-photo-by"
  18. "A photo by senikk"
  19. "Creates a photo by senikk text in\
  20. the bottom-right corner."
  21. "Terje Pedersen <terje>"
  22. "Copyright 2006, Terje Pedersen"
  23. "2006-07-26, 2006"
  24. "RGB*, GRAY*"
  25. SF-IMAGE "Input Image" 0
  26. SF-DRAWABLE "Input Drawable" 0)
  27. (script-fu-menu-register "senikk-photo-by"
  28. "<image>/Script-Fu/Senikk")
Tilbaketråkk url: klikk her!
Stikkord: gimp

Relevante innlegg/sider/lenker

0 tilbaketråkk: