| サンガイオー改め、三界です。
下記のようなインクルードを作ってみたのですが、上手く動作してくれません。
フォントのところがおかしいようなのですが、どう直せばいいのかわからないのです。
アドバイス、お願いします
文章:
# Call 文章 横位置 縦位置 文章内容 Ｒ変化量 Ｂ変化量 Ｇ変化量 フォント (段階)
Local 段階 変化量
If Args(8) = "" Then
段階 = 40
Else
段階 = Args(8)
Endif
Ｒ変化量 = INT(Args(4) / 段階)
Ｇ変化量 = INT(Args(5) / 段階)
Ｂ変化量 = INT(Args(6) / 段階)
フォント = Args(7)pt
For I = 1 to 段階
Font フォント RGB(Ｒ変化量 * I, Ｇ変化量 * I, Ｂ変化量 * I) ゴシック Regular 通常
PaintString Args(1) Args(2) Args(3)
Refresh
Wait 0.1
Next
Return
|
新着情報