イベントコマンド/ColorInOut - VBnetSRC(仮)オンラインhelp

ColorInOutコマンド

画面全体をホワイトアウトやフェードインする

※SRCの、FadeInコマンド,FadeOutコマンド,WhiteInコマンド,WhiteOutコマンドはこのコマンドに統合されました

書式

ColorInOut "In"or"Out" color [fadetime times option]

color	塗りつぶし色(RBG値?)
fadefime	コマンド開始から終了までの時間。省略時は「5」(0.5秒)
times	段階数。省略時は「10」
option	"時間優先"	PCの画像処理が間に合わない場合、段階を間引きしてコマンド終了までの時間を短縮する

解説

"In"の場合は画面全体が指定色colorで塗りつぶした状態から段階的に通常の画面に、"Out"であれば画面全体を段階的に指定色に染めていきます。
fadetimeが小さかったり描画段階数timesが大きい場合、PCの画像処理が間に合わずにコマンド実行にかかる時間がfadetimeの指定時間よりも長くなることがあります。時間超過を避けたい場合は段階数を減らすか"時間優先"オプションを使用してください。

使用例

SRCのFadeInコマンドを再現するサブルーチン

FadeIn:
If Args(1) = "" Then
 ColorInOut "In" "#000000" 5
Else
 ColorInOut "In" "#000000" (0.5 * Args(1)) Args(1)
EndIf
Return

---