2008/07/28(月) [n年前の日記]
#1 [cg_tools] レイヤーを連番保存するスクリプトをGIMP-2.4に対応させた
_continuous-save_m256.scm
WIndows版 GIMP 2.4.6-painter 上では、一応動いてるように見える。
_たむぶん版 Continuous Save に以下の修正を。
Perlのsplit(',', $hoge) に相当するらしき、strbreakup が無くなったという話をどこかで見かけた気もするけど。Script-fuコンソール上で試したところまだ無くなってないように見える。
WIndows版 GIMP 2.4.6-painter 上では、一応動いてるように見える。
_たむぶん版 Continuous Save に以下の修正を。
- SF-FILENAME では既に存在しているファイル名しか選択できなくなったので、SF-FILENAME を、SF-DIRNAME、SF-STRING にして、(file-name (string-append dirname "/" basefilename)) で求めるようにした。
- (aref "abcdef" 1) という記述で文字列中の1文字を取れなくなったので、(string-ref "abcdef" 1) という形に変更。
- (aref 〜) を (vector-ref 〜) に変更。
- メニュー登録の記述を若干変更。script-fu-menu-register を使うようにした。
Perlのsplit(',', $hoge) に相当するらしき、strbreakup が無くなったという話をどこかで見かけた気もするけど。Script-fuコンソール上で試したところまだ無くなってないように見える。
> (strbreakup "abc,def,hij" ",")
("abc" "def" "hij")
もしかして、Tiny-fuでは未実装だったけど、GIMP 2.4 リリース時にScript-fuのソレを持ってきたのだろうか。なんにせよ自前で書かずに済んでちょっと助かったかも。
[ ツッコむ ]
以上です。