したらばTOP ■掲示板に戻る■ 全部 1-100 最新50 | |

ゴーストをつくろうとしてる人たちが話すスレ

1023任意たん@age推奨:2022/01/15(土) 16:36:09
>>1020
imgctl_saori.dllを使ってみよう。使い方覚えると楽しいよ。
http://whiteball.m7.coreserver.jp/

里々ならこんな感じで。(satori_confのSAORIにはimgctlで登録)


:縮小処理開始!
(set,単語群「縮小するファイル」の重複回避,昇順、トーク中)φ
(loop,縮小するループ,(単語群「縮小するファイル」の数))

#imgctl_saori.dllからのパスを指定する。
@縮小するファイル
..\..\image\sample0.png
..\..\image\sample1.png
..\..\image\sample2.png
..\..\image\sample3.png
..\..\image\sample4.png
..\..\image\sample5.png

#高さに合わせるなら-1とか指定する。
@縮小後の幅
100

#幅に合わせるなら-1とか指定する。
@縮小後の高さ
50

#元のファイルに上書きする。困るならbackupをとっておくか、縮小後のpathを適当に弄って。
@縮小するループ
(set,tmp.filename,(縮小するファイル))φ
(call,縮小する,(tmp.filename),(tmp.filename),(縮小後の幅),(縮小後の高さ))φ
(set,tmp.filename,)

#A0: 縮小前のファイルパス
#A1: 縮小後のファイルパス
#A2: 縮小後の幅(負値を指定すると高さに合わせてアスペクト比を保つ)
#A3: 縮小後の高さ(負値を指定すると幅に合わせてアスペクト比を保つ)
@縮小する
(set,tmp.ID,(imgctl,ToDIB,(A0)))φ
(imgctl,ResizeDIB,(tmp.ID),(A2),(A3))φ
(imgctl,DIBtoPNG,(A1),(tmp.ID),0)φ
(imgctl,DeleteDIB,(tmp.ID))φ
(set,tmp.ID,)


新着レスの表示


名前: E-mail(省略可)

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

(画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります)

掲示板管理者へ連絡 無料レンタル掲示板