>> 古い記事: Script-Fu: 選択範囲の角を丸めた枠を描く
<< 新しい記事: Script-Fu: 現在のレイヤーをレベル補正して緑色にする

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

Script-Fu: 透明な新規レイヤーを作成して追加

ただそれだけの簡単なスクリプトです。 マウス操作がだるいのでショートカットキー Insert を割り当てて使っています。

現在選択しているレイヤーのすぐ上に追加します。


; anobota-add-transparentlayer.scm

(define (script-fu-anobota-add-transparentlayer-ts img drawable)
(let (
       (width  0)
       (height 0)
       (temp   0)
      )
  ; アンドゥしたらここに戻る
  (gimp-image-undo-group-start img)
  
  ; 幅と高さを取得
  (set! width (car  (gimp-image-width img)))
  (set! height (car (gimp-image-height img)))

  ; 新規レイヤー生成
  (set! temp (car (gimp-layer-new img width height 1 "new layer" 100 0 )))
  ; 透明塗りつぶし(?)
  (gimp-drawable-fill temp TRANS-IMAGE-FILL)
  ; 作ったレイヤーを追加
  (gimp-image-add-layer img temp -1)

  ; 表示に反映
  (gimp-displays-flush)

  ; ここまでがアンドゥの対象
  (gimp-image-undo-group-end img)
))

(script-fu-register
  "script-fu-anobota-add-transparentlayer-ts"
  "<Image>/Script-Fu/misc/ts-透明な新規レイヤーを追加" ;このスクリプトのメニュー位置
  "透明な新規レイヤーを追加する(TS)" ; このスクリプトの説明
  "sonota" ; 作者名
  "(c) 2007"    ; コピーライト
  "2007-06-21"  ; 日付
  "RGB*, GRAY*, INDEXED*"  ; スクリプトが動作可能なモード
  SF-IMAGE    "Image"    0 ; 引数1
  SF-DRAWABLE "Drawable" 0 ; 引数2
)

Gimp: 記事のもくじ

>> 古い記事: Script-Fu: 選択範囲の角を丸めた枠を描く
<< 新しい記事: Script-Fu: 現在のレイヤーをレベル補正して緑色にする
** ホームに戻る

コメント

コメントの投稿

管理者にだけ表示を許可する

|
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。