ブラシの種類がそのまま反映されるので通常の『ブラシ』を選択して実行して下さい。『エアブラシ』だと薄くなりますし、『鉛筆』だと、ラインがガタガタになります。 ※ 2012/08/16 : 縁の線の太さを指定できるようにしました もうかなり前に出来上がっていたのですが、ハードディスクの底に眠っていたものを整理しました。オリジナルよりパラメータが増えていますので、いろいろ楽しい文字ステンドグラスが作成できます。 関連する記事 GIMP Portable Rev 4 がリリースされました。GIMP Portable も テーマを変更してみましょう パラメータ設定
オリジナルでは、結果レイヤーを統合していましたが、コメントにしてありますので以下のような画像を同時に得る事ができます。
UTF8N で保存して下さい ※ 場所は例えば『C:\GIMPPortable\App\gimp\share\gimp\2.0\scripts\super-logos03s.scm』 【重要】 ブラシの種類がそのまま反映されるので通常の『ブラシ』を選択して実行して下さい。『エアブラシ』だと薄くなりますし、『鉛筆』だと、ラインがガタガタになります。 Circle というブラシは将来的にはなくなるかもしれないブラシなので、今後、他のブラシを使ったほうが良いかもしれません。2.8で、gimp-obsolete-files に存在しますが、今後使えるかどうかは解りません。
; ***********************************************************
; GIMP 2.8 動作確認済
; ***********************************************************
(define (apply-super-logos03-effect image logo-layer tsize random blur offset sf ft-color bg-color lwidth)
(let* (
(bump-layer 0)
(v_point 0)
(path-layer 0)
(outline-layer 0)
(width (car (gimp-drawable-width logo-layer))) ;ロゴの幅
(height (car (gimp-drawable-height logo-layer))) ;ロゴの高さ
(bg-layer (car (gimp-layer-new image width height RGB-IMAGE "Background" 100 NORMAL-MODE))) ;背景レイヤー
(fg-color '(0 0 0)) ) ;前景色=黒
; (bg-color '(20 20 20)) ) ;背景色=白
;イメージサイズ変更と背景レイヤー作成
(gimp-image-add-layer image bg-layer 1) ;背景レイヤーをlogo-layerの下にAdd
(gimp-image-resize-to-layers image) ;イメージサイズをレイヤーに合わせる
(gimp-selection-none image) ;選択なし
(gimp-context-set-background bg-color) ;背景モザイク色
(gimp-edit-fill bg-layer BACKGROUND-FILL) ;背景レイヤーを背景モザイク色でFILL
(plug-in-mosaic 1 image bg-layer ;モザイク描画
15
4
1
0.65
1
135
0.2
1
1
1
0
0 )
;バンプマップ用イメージ作成
(set! bump-layer (car(gimp-layer-copy logo-layer 1))) ;logo-layerのコピー
(gimp-image-add-layer image bump-layer -1) ;bump-layerをTopに追加
(gimp-image-raise-layer-to-top image bump-layer)
(gimp-layer-set-name bump-layer "Text")
;テキストにプラズマ/モザイク描画
(gimp-selection-layer-alpha logo-layer) ;AlphaChanelをSelecdtionMaskに
(plug-in-plasma 1 image logo-layer random 7) ;プラズマ描画
(gimp-context-set-background fg-color) ;背景色を黒に
(plug-in-mosaic 1 image logo-layer ;モザイク描画
tsize
4
1
0.65
1
135
0.2
1
1
1
sf
1 )
(set! v_point (cons-array 8 'byte)) ;明るさとコントラストを調整
(set-pt v_point 0 0 0 )
(set-pt v_point 1 64 64 )
(set-pt v_point 2 128 226 )
(set-pt v_point 3 255 255 )
(gimp-curves-spline logo-layer HISTOGRAM-VALUE 8 v_point)
(gimp-selection-none image)
;輪郭を描画
;テキストをパスに変換
(gimp-selection-layer-alpha bump-layer) ;テキストを選択
(plug-in-sel2path 1 image bump-layer) ;選択をパスに
(gimp-selection-none image)
(set! path-layer (car (gimp-layer-new image width height RGBA-IMAGE "Path" 100 NORMAL-MODE)))
(gimp-image-add-layer image path-layer -1) ;新規レイヤーpath-layerを追加
(gimp-selection-all image)
(gimp-edit-clear path-layer)
(gimp-context-set-foreground fg-color)
(define brush-array (vector "Circle (05)" "Circle (07)" "Circle (09)" "Circle (11)" "Circle (13)" "Circle (15)" "Circle (17)" "Circle (19)"))
(gimp-context-set-brush (vector-ref brush-array lwidth))
(gimp-path-stroke-current image)
(set! outline-layer (car(gimp-layer-copy path-layer 1)))
(gimp-image-add-layer image outline-layer 0)
(gimp-drawable-set-visible bump-layer 0)
(gimp-context-set-background ft-color) ;文字の縁取色
(gimp-selection-layer-alpha outline-layer) ;透明以外を選択
(gimp-edit-blend outline-layer ;drawable
FG-BG-RGB-MODE ;blend_mode
NORMAL-MODE ;paint_mode
GRADIENT-SHAPEBURST-SPHERICAL ;gradient_type
100 ;opacity
0 ;offset
REPEAT-NONE ;repeat
TRUE ;reverse
FALSE ;supersample
0 ;max_depth(supersample)
0 ;threshold(supersample)
TRUE ;dither
width
height
(+ width 20)
height )
(gimp-selection-none image) ;選択解除
(plug-in-bump-map 1 image outline-layer outline-layer 135 45 3 0 0 0 0 1 0 LINEAR )
(plug-in-gauss-iir2 1 image path-layer blur blur)
(gimp-layer-set-offsets path-layer offset offset)
(gimp-selection-none image) ;選択なし
; (gimp-image-flatten image) ;画像統合
);end of let*
);end of define
(define (script-fu-super-logos03s text size fontname tsize random blur offset sf col bcol lwidth)
(let*
(
(img 0)
(text-layer 0)
)
(set! img (car (gimp-image-new 256 256 RGB)))
(gimp-context-set-foreground '(0 0 0) )
(set! text-layer (car (gimp-text-fontname img -1 0 0 text 10 TRUE size PIXELS fontname)))
(gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-super-logos03-effect img text-layer tsize random blur offset sf col bcol lwidth) ;FONT EFFECT
(gimp-image-undo-enable img)
(gimp-display-new img)
)
)
(define
(set-pt a index x y)
(begin
(aset a (* index 2) x)
(aset a (+ (* index 2) 1) y)
)
)
(script-fu-register
"script-fu-super-logos03s" ;Script name
"<Image>/File/Create/汎用ステンドグラスロゴ" ;Menu
"Super Logos No.01 beta 0.1" ;Description
"RETOUCH-SCRIPT" ;Creater
"copyright 2006, RETOUCH-SCRIPT" ;copyright notice
"Nov 01, 2006" ;date created
""
SF-STRING "Text" "GIMP 2.8"
SF-ADJUSTMENT "Font size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT "Font" "Sans Bold"
SF-ADJUSTMENT "タイルサイズ" '(15 5 100 1 10 0 1)
SF-ADJUSTMENT "Random seed" '(1000 0 2000 5 10 0 0)
SF-ADJUSTMENT "Shadow blur" '(3 0 30 1 10 0 1)
SF-ADJUSTMENT "Shadow offset" '(1 0 30 1 10 0 1)
SF-TOGGLE "表面の起伏" FALSE
SF-COLOR "縁の色" '(255 255 255)
SF-COLOR "Background color" '(255 255 255)
SF-OPTION "線の太さ" '("Circle (05)" "Circle (07)" "Circle (09)" "Circle (11)" "Circle (13)" "Circle (15)" "Circle (17)" "Circle (19)")
);end of register
縁取りの色は、オリジナルでは『白』なので、銀色の光沢入りのパイプのようになりますが、それよりかなり雰囲気の違った画像が手に入ります。ステンドグラスのピースの大きさも変更できますし、表面に起伏を追加してガラス的な効果も狙えます
タグ：GIMP
|
|
【GIMP スクリプトの最新記事】
- PaintsChainer 用、線画作成 GIMP(Script-Fu)スクリプト
- GIMP スクリプトで、二段雲形吹き出し( Baloon-3 を改造 )
- GIMP : タマちゃんスクリプトの水部分
- 無事みつけた Pencil-sketch.scm でイラストを加工したら、やはり一番の出来で挿絵っぽくなりました。
- GIMP : 鉛筆スクリプト / quick-sketch.scm と FU_sketch_pencil-sketch-BW.scm
- GIMP FX-Foundry : ロモ風スクリプト
- GIMP FX Foundry release for GIMP 2.6
- GIMP 水滴スクリプト
- フリーフォントで簡単アイコン・はんこ画像作成 + TTEdit + GIMP + ステンドグラスロゴスクリプト
- Analogize(torres-analogize.scm) の解説というか、日本語化『GIMP 用スクリプト』
- Imageafter の画像を加工してイラスト調背景に
- GIMP 効果の Landscape Illustrator
- Scripts that work in GIMP-2.8+
- GIMP スクリプトの基本を知る為のドキュメント
- 【GIMP2.6とステンドグラスロゴ】
- ステンドグラスロゴ【GIMPScript-Fu】
- 久しぶりにGIMPスクリプトを使って・・・
