Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
In eigener Sache!
Liebe Mitglieder, liebe Besucher und Gäste
ich weiß, es ist ein leidiges Thema, aber ich muss es ansprechen: Werbung, Werbeblocker und Finanzierung des Forums.
Bitte hier weiterlesen ...
Unlauterer Verkäufer wieder unterwegs!
Liebe Mitglieder,
Florian Franzek, der seit Jahren mit verschiedensten Usernamen in allen möglichen Foren und auf etlichen Verkaufsplattformen auftritt,
ist wieder hier im Forum und versucht, ehrliche Käufer zu betrügen.
Wir können wenig tun, außer bei Bekanntwerden einer weiteren Registrierung eines Accounts für seine Machenschaften, diese umgehend zu sperren.
Ich empfehle, bei Kontakt umgehend die Polizei einzuschalten.
; addadvborder.scm
; 0.2 (2004-08-13)
;
; This program is free software; you can redistribute it and/or modify
; it under the terms of the GNU General Public License as published by
; the Free Software Foundation; either version 2 of the License, or
; (at your option) any later version.
;
; This program is distributed in the hope that it will be useful,
; but WITHOUT ANY WARRANTY; without even the implied warranty of
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
; GNU General Public License for more details.
;
; You should have received a copy of the GNU General Public License
; along with this program; if not, write to the Free Software
; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
;
; Fancy Freaky Fraenky Borders ;-)
;
; (C) 2004 by Thorsten Schnebeck (thorsten.schnebeck@gmx.net)
;
; copy this script to ~/.gimp/scripts/addadvborder.scm
; and in Gimp2: Xtns->Script-Fu->Refresh Scripts
; you will find this script in Script-Fu/Alchemy/Add Adv. Border...
(define (set_path direction width height)
; direction: 0=left 1=right 2=top 3=bottom
(let* (
(delta (/ height 2))
(n_array (cons-array 33 'double)))
(if (> height width) (set! delta (/ width 2)))
(if (or (= direction 0) (= direction 2))
(begin ;left or top
(aset n_array 00 0.0)
(aset n_array 01 0.0)
(aset n_array 02 1.0)
(aset n_array 03 0.0)
(aset n_array 04 0.0)
(aset n_array 05 2.0)
(aset n_array 06 delta)
(aset n_array 07 delta)
(aset n_array 08 2.0)
(aset n_array 09 delta)
(aset n_array 10 delta)
(aset n_array 11 1.0)
(aset n_array 12 delta)
(aset n_array 13 delta)
(aset n_array 14 2.0)
)
(begin ; right or bottom
(aset n_array 00 (- width 1))
(aset n_array 01 (- height 1))
(aset n_array 02 1.0)
(aset n_array 03 (- width 1))
(aset n_array 04 (- height 1))
(aset n_array 05 2.0)
(aset n_array 06 (- width delta))
(aset n_array 07 (- height delta))
(aset n_array 08 2.0)
(aset n_array 09 (- width delta))
(aset n_array 10 (- height delta))
(aset n_array 11 1.0)
(aset n_array 12 (- width delta))
(aset n_array 13 (- height delta))
(aset n_array 14 2.0)
)
)
(if (or (= direction 0) (= direction 3))
(begin ;left or bottom
(aset n_array 15 delta)
(aset n_array 16 (- height delta))
(aset n_array 17 2.0)
(aset n_array 18 delta)
(aset n_array 19 (- height delta))
(aset n_array 20 1.0)
(aset n_array 21 delta)
(aset n_array 22 (- height delta))
(aset n_array 23 2.0)
(aset n_array 24 0.0)
(aset n_array 25 (- height 1))
(aset n_array 26 2.0)
(aset n_array 27 0.0)
(aset n_array 28 (- height 1))
(aset n_array 29 1.0)
(aset n_array 30 0.0)
(aset n_array 31 (- height 1))
(aset n_array 32 2.0)
)
(begin ;right or top
(aset n_array 15 (- width delta))
(aset n_array 16 delta)
(aset n_array 17 2.0)
(aset n_array 18 (- width delta))
(aset n_array 19 delta)
(aset n_array 20 1.0)
(aset n_array 21 (- width delta))
(aset n_array 22 delta)
(aset n_array 23 2.0)
(aset n_array 24 (- width 1))
(aset n_array 25 0.0)
(aset n_array 26 2.0)
(aset n_array 27 (- width 1))
(aset n_array 28 0.0)
(aset n_array 29 1.0)
(aset n_array 30 (- width 1))
(aset n_array 31 0.0)
(aset n_array 32 2.0)
)
)
n_array)
)
(define (3d-border image pixel type)
(let*
(
(height (car (gimp-image-height image)))
(width (car (gimp-image-width image)))
(col_left 30)
(col_right 20)
(col_top 40)
(col_bottom 20)
)
(if (= type 0)
(begin
(set! col_left -30)
(set! col_right -10)
(set! col_top -20)
(set! col_bottom -10)
)
)
(gimp-path-set-points image "leftbevel" 1 33 (set_path 0 width height))
(gimp-path-set-points image "rightbevel" 1 33 (set_path 1 width height))
(gimp-path-set-points image "topbevel" 1 33 (set_path 2 width height))
(gimp-path-set-points image "bottombevel" 1 33 (set_path 3 width height))
(gimp-selection-all image)
(gimp-selection-shrink image pixel)
(gimp-selection-invert image)
(gimp-path-to-selection image "leftbevel" 3 1 1 1 1)
(gimp-brightness-contrast (car (gimp-image-get-active-drawable image)) col_left 0)
(gimp-selection-all image)
(gimp-selection-shrink image pixel)
(gimp-selection-invert image)
(gimp-path-to-selection image "topbevel" 3 1 1 1 1)
(gimp-brightness-contrast (car (gimp-image-get-active-drawable image)) col_top 0)
(gimp-selection-all image)
(gimp-selection-shrink image pixel)
(gimp-selection-invert image)
(gimp-path-to-selection image "rightbevel" 3 1 1 1 1)
(gimp-brightness-contrast (car (gimp-image-get-active-drawable image)) col_right 0)
(gimp-selection-all image)
(gimp-selection-shrink image pixel)
(gimp-selection-invert image)
(gimp-path-to-selection image "bottombevel" 3 1 1 1 1)
(gimp-brightness-contrast (car (gimp-image-get-active-drawable image)) col_bottom 0)
(gimp-selection-clear image)
(gimp-path-delete image "leftbevel")
(gimp-path-delete image "rightbevel")
(gimp-path-delete image "topbevel")
(gimp-path-delete image "bottombevel")
(gimp-image-flatten image)
)
)
;from script-fu-beveled-pattern-fixedbutton:
(define (text-width extents)
(car extents))
(define (text-height extents)
(cadr extents))
(define (text-ascent extents)
(caddr extents))
(define (script-fu-add-adv-border image drawable text1 fs1 text2 fs2 text3 fs3 position font ftcolor bcolor fcolor pxborder pxframe pxgap ratioi ratioo textspace)
(let*
(
(restore (car (gimp-palette-get-foreground)))
(height (car (gimp-image-height image)))
(width (car (gimp-image-width image)))
(pxshadow (+ (/ (* height (/ width height)) 400) 1))
(ax (- (* pxgap ratioi) pxshadow))
(ay (- pxgap pxshadow))
(bx (- (* pxborder ratioo) (+ (+ (* 2 pxshadow) ax) pxframe))) ; negativ prÃ?fen!
(by (- pxborder (+ (+ (* 2 pxshadow) ay) pxframe))) ;negativ prÃ?fen
(text-extents (gimp-text-get-extents-fontname text1 fs1 1 font))
(tx1width (text-width text-extents))
(tx1height (text-height text-extents))
(tx1ascent (text-ascent text-extents))
(text-extents (gimp-text-get-extents-fontname text2 fs2 1 font))
(tx2width (text-width text-extents))
(tx2height (text-height text-extents))
(tx2ascent (text-ascent text-extents))
(text-extents (gimp-text-get-extents-fontname text3 fs3 1 font))
(tx3width (text-width text-extents))
(tx3height (text-height text-extents))
(tx3ascent (text-ascent text-extents))
)
; (gimp-image-undo-group-start image)
(3d-border image pxshadow 0)
(script-fu-addborder image (car (gimp-image-get-active-drawable image)) ax ay bcolor 1)
(gimp-image-flatten image)
(script-fu-addborder image (car (gimp-image-get-active-drawable image)) pxshadow pxshadow fcolor 1)
(gimp-image-flatten image)
(3d-border image pxshadow 0)
(script-fu-addborder image (car (gimp-image-get-active-drawable image)) pxframe pxframe fcolor 1)
(gimp-image-flatten image)
(script-fu-addborder image (car (gimp-image-get-active-drawable image)) pxshadow pxshadow fcolor 1)
(gimp-image-flatten image)
(3d-border image pxshadow 0)
(script-fu-addborder image (car (gimp-image-get-active-drawable image)) bx by bcolor 1)
(gimp-image-flatten image)
; text handling
(set! height (car (gimp-image-height image)))
(set! width (car (gimp-image-width image)))
(set! txpos (- height (/ by 2))) ;bottom baseline !!by bei Erweiterung anpassen!!
(if (= position 1) (set! txpos (/ by 2)))
(set! txdisplace tx1ascent)
(if (> tx2ascent txdisplace) (set! txdisplace tx2ascent))
(if (> tx3ascent txdisplace) (set! txdisplace tx3ascent))
(set! txpos (+ txpos (/ txdisplace 2))) ; Zentrieren im freien Bereich
; text color
(gimp-palette-set-foreground ftcolor)
; left text
(gimp-floating-sel-anchor (car (gimp-text-fontname image (car (gimp-image-get-active-drawable image)) bx (- txpos tx1ascent) text1 -1 TRUE fs1 1 font)))
; centred text
(gimp-floating-sel-anchor (car (gimp-text-fontname image (car (gimp-image-get-active-drawable image)) (- (/ width 2) (/ tx2width 2)) (- txpos tx2ascent) text2 -1 TRUE fs2 1 font)))
; right text
(gimp-floating-sel-anchor (car (gimp-text-fontname image (car (gimp-image-get-active-drawable image)) (- (- width bx) tx3width) (- txpos tx3ascent) text3 -1 TRUE fs3 1 font)))
(gimp-palette-set-foreground restore)
; Flush the display
; (gimp-image-undo-group-end image)
(gimp-displays-flush)
)
)
(script-fu-register "script-fu-add-adv-border"
"<Image>/Script-Fu/Decor/Add Adv. Border..."
"Adv. Border"
"Thorsten Schnebeck"
"Thorsten Schnebeck (thorsten.schnebeck@gmx.net)"
"2004"
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-STRING "Text (left)" ""
SF-ADJUSTMENT "Font Size" '(20 8 100 1 10 0 1)
SF-STRING "Text (center)" ""
SF-ADJUSTMENT "Font Size" '(36 8 100 1 10 0 1)
SF-STRING "Text (right)" "(c) 2004"
SF-ADJUSTMENT "Font Size" '(14 8 100 1 10 0 1)
SF-OPTION "Text Position" '("Bottom" "Top")
SF-FONT "Font" "Arial"
SF-COLOR "Font Color" '(255 255 255)
SF-COLOR "Border Color" '(000 000 000)
SF-COLOR "Frame Color" '(255 255 255)
SF-ADJUSTMENT "Border (px)" '(50 1 9000 1 10 0 0)
SF-ADJUSTMENT "Frame (px)" '(02 0 1000 1 10 0 0)
SF-ADJUSTMENT "Frame-Pic-Gap (px)" '(20 0 9000 1 10 0 0)
SF-ADJUSTMENT "Inner Border H/V-Ratio" '(1.0 0.1 10 0.1 1 1 1)
SF-ADJUSTMENT "Outer Border H/V-Ratio" '(1.0 0.1 10 0.1 1 1 1)
SF-ADJUSTMENT "Additional Text Space (px)" '(1 0 1000 1 10 0 1)
)
;Tab=4
Fancy Freaky Fraenky Borders ;-)
fraenky schrieb:Die Funktion Inner Border H/V bewirkt das der innere Rahmen weiter weg von innen aus wandert. Aber nur links und rechts.
Siehe Bild 1
Die Funktion Outer Border H/V bewirkt das der Aussen Rahmen breiter wird. Also 2.0 bedeutet er verdoppelt sich. Aber nur links und rechts
Siehe Bild 2
Nur wie bekomme ich den nur oben und unten dicker ?
Respektive was nutzt die Funktion Inner Border denn ? Braucht die jemand ?
Ist es nicht sinnvoller hier strikt zwischen top/bottom left/right "nur Outer Border" zu trennen ?
So hat man den im Bild schwarzen Rahmen entweder oben/unten größer oder links/rechts
Benötigen tut man das ja eh meistens nur für den Textinhalt da es halt besser ausschaut wenn da der Rahmen dicker ist wie die anderen Seiten.
Ansonsten spitze für ne Alpha !!!
Danke Thorsten......hoffe das die Beta bald erscheintvorallem mit Textfunktion