GIMP Script-Fu Shiro-Layer-Shift (for GIMP 2.99.6 ＋)

GIMP 2.99.6 + （3.0+）の Script-Fu ファイル です。
選択されている活性レイヤーの位置 を 座標値（数値）にて 変更 します。




　　　　　　　　　Download Link  >　Shiro-Layer-Shift.scm

　　　　　　　　　　　　　　　　　　Link の無断転載を禁じます！。.

FileName : Shiro-Layer-Shift.scm
FileDate : 2021/08/07 0:27:07 ( or * Downloaded Date * )
FileSize : 1693 (2KB)
   MD5 : 044d3da4ebd97fa7c07886d43d966502
  SHA1 : af5a52c37fb481ffdc9eb9ae78f51230c877f7dc

　　　　　　　　　　　　　　　
利用環境：　GIMP 2.99.6 + 前提のファイルです。　動作確認しています。
　　　　　　　　　　　　　　　　　　　　　　　　3.0 での動作を期待しています。

スクリプト名：　Shiro-Layer-Shift.scm　 *1.
登録関数名：　script-fu-shiro-layer-shift　 *1.


ファイルイメージ：

;Scheme for GIMP 2.99.6 +

;関数（関数名・引数・処理）

(define (script-fu-shiro-layer-shift img drawable x y type)
(gimp-image-undo-group-start img)
(let ((offsetsX 0) (offsetsY 0))
(set! offsetsX (car (gimp-drawable-get-offsets drawable)))
(set! offsetsY (cadr (gimp-drawable-get-offsets drawable)))
(if (= type 0)
  (gimp-layer-set-offsets drawable (+ offsetsX x) (+ offsetsY y))
  (gimp-layer-set-offsets drawable x y)
)
(gimp-displays-flush)
(gimp-image-undo-group-end img)
))


;登録

(script-fu-register
  _"script-fu-shiro-layer-shift" ;func name
  _"レイヤー移動  (Shiro版)  UnDo:Ctrl+Z" ;menu label
  _"レイヤーを指定した座標に移動させます" ;description
  ;_"Move Layer by Value"                ;menu label (en)
  ;_"Move layer by value (relative/absolute)" ;description (en)
  _"ShiroYuki_Mot" ;Original scm by"Go" ;author
  _"ShiroYuki_Mot" ;Original scm by"Go" ;copyright notice
  _"2021/08/07" ;Original scm in 2006/10" ;date created
  _"*" ;image type on the script1:04 2021/08/09
  SF-IMAGE    _"Image"    0
  SF-DRAWABLE _"Drawable" 0
  SF-ADJUSTMENT _"X (横座標) " '(0 -8000 8000 1 100 0 1)
  SF-ADJUSTMENT _"Y (縦座標) " '(0 -8000 8000 1 100 0 1)
  SF-OPTION     _"位置 (相対/絶対) " '(_"相対値" _"絶対値")
  ;SF-ADJUSTMENT _"X (Horizontal) " '(0 -8000 8000 1 100 0 1)
  ;SF-ADJUSTMENT _"Y (Vertical) " '(0 -8000 8000 1 100 0 1)
  ;SF-OPTION    _"Coordinates " '(_"Relative Value" _"Absolute Value"))
)

(script-fu-menu-register "script-fu-shiro-layer-shift"
"<Image>/Layer")


;Notice for Migration to GIMP 3 API
; register name/label/desc. start with _"..."
; proc gimp-drawable-offsets > gimp-drawable-get-offsets

使い方：
　　　　　　フォルダ：%APPDATA%\GIMP\2.99\scripts　に配置します。
　　　　　　一般的には、
　　　　　　C:¥Users¥UserA¥AppData¥Roaming¥GIMP¥2.99¥scripts　です。（左記はコピペ不可）
　　　　　　尚、既存ファイル･関数との競合が生じた場合には、
　　　　　　何れかを、削除する必要があります。　　（名前の衝突）
　　　　　　また、　ファイルを配置する前に、
　　　　　　プロパティ から　インターネット取得時の ブロック 解除 を行って下さい。

　　　　　　メニューでは　画像(I) レイヤー(L) 　の中に格納されます。

　　　　　　画像がある状態で、　このスクリプトを実行すると、
　　　　　　現在選択している（アクティブな） 活性レイヤーに対し　位置移動　します。
　　　　　　指定は　相対/絶対　の　座標値（数値）で行います。


特記事項：　改行コード LF 。


参考事項：　
　　　　　　　GoogleDrive 上では テキストファイルでなくバイナリファイルと認識され、
　　　　　　　プレビュー出来ません。

　　　　　　　日本語表記から英語表記に変更

Japanese notation is assumed, but to change to English notation, ...

Open Windows notepad.exe/your-test-editor
Read this .scm file
Add ";" at top of line#23 (;menu label)
Add ";" at top of line#24 (;description)
Remove ";" at top of line#25 (;menu label (en))
Remove ";" at top of line#26 (;description (en))
Add ";" at top of line#33 (SF-ADJUSTMENT _"X (横...)
Add ";" at top of line#34 (SF-ADJUSTMENT _;Y (縦...)
Add ";" at top of line#35 (SF-OPTION     _"位置...)
Remove ";" at top of line#36 (SF-ADJUSTMENT _;X (H...)
Remove ";" at top of line#37 (SF-ADJUSTMENT _;Y (V...)
Remove ";" at top of line#38 (SF-OPTION    _"Coordinates...)
Save a file

ShiroYuki_Mot の ひとりごと　掲載 URL　  http 接続です。　別ページ（タブ）で開きます。

　　　http://shiroyuki-mot-says.blogspot.com/2021/08/gimp-script-fu-5.html





[2021/08/15] スクリプト変更に伴い、投稿を作成
[2021/08/18] メニューでの場所 誤記訂正 / タイトルに 対応 Version 明記