■

なんとなく半透明機能を実装してみる。
eve側のコードはこんな感じ。64*64のファイルを96*96に拡大してPaintPictureしてる。

For i = 0 to 4
　For j = 0 to 4
　　dx = i * 96
　　dy = j * 96
　　dw = 96
　　dh = 96
　　par = "$(((j * 5 + i) * 15) Mod 100 + 1)%"
　　PaintPicture Bitmap\Pilot\RM_MariaDePalmarsh.bmp dx dy dw dh 透過 半透明 par
　Next
Next

• 半透明実行サンプル

一応、半透明にすることは出来た。けど動作が非常に重い。
「半透明 par」を記述しなかった場合（拡大・透過のみの場合）は0.056秒で終了した処理が、半透明処理を加えると0.389秒になるという。ほぼ7倍の処理時間というステキ仕様。
ちょっとした演出には使えるけど、グリグリ動かそうとするとかなり怪しいなぁ。投稿するかどうか、微妙なところだ。