| 皆さんはじめまして、ねーむれすという者です
戦闘アニメに関して御指南をもらいに来ました。
『物凄く太いビームがうねりながら前方を薙ぎ払う』
というイメージのＭＡＰ兵器を作りたくて、自作の絵を作って
Ｍ扇ビーム攻撃のルーチンを写して改変したのですが、
いざやってみるとデフォルトのセクタービーム(しかも黄色)が出てしまいます。
どうすれば自作したビームが映るようになるでしょうか？
戦闘アニメ_ＭＡＰ荷電粒子砲攻撃:
# 引数１ 色
# 引数２ 効果音
Local i
Local BMP_FILE
Local COL
Local C_X
Local C_Y
Local ANG
Local X_S
Local Y_S
Local RNG
Local DRCT
Local B_S
Local WID
_UnSetBattleAnimeValue
Set RNG _MapRangeCheck(4)
If (RNG > 7) Then
Set RNG 7
EndIf
Set WID _MapWidthCheck(5)
Set BMP_FILE ("MapBeam\EFFECT_Warmbeam")
Set DRCT _MapDirectionCheck()
Set B_S (32 * WID)
_Map_CenteringCheck DRCT
Switch DRCT
Case 上
Set X_S B_S
Set Y_S ((64 * RNG) + 16)
Set C_X -
Set C_Y (WY(対象ユニットＩＤ) + 16 - Y_S)
Set ANG 0
Case 下
Set X_S B_S
Set Y_S ((64 * RNG) + 16)
Set C_X -
Set C_Y (WY(対象ユニットＩＤ) + 16)
Set ANG 180
Case 左
Set X_S ((64 * RNG) + 16)
Set Y_S B_S
Set C_X (WX(対象ユニットＩＤ) + 16 - X_S)
Set C_Y -
Set ANG 270
Case 右
Set X_S ((64 * RNG) + 16)
Set Y_S B_S
Set C_X (WX(対象ユニットＩＤ) + 16)
Set C_Y -
Set ANG 90
EndSw
Call 戦闘アニメ_Ｍビーム用粒子集中 WX(対象ユニットＩＤ) WY(対象ユニットＩＤ) B_C
Wait Start
_SelectSound "Beam.wav" _GetWavFromArgs()
For i = 1 To 9
_PaintCutin_KZSL (BMP_FILE & "0" & i & ".bmp") ANG C_X C_Y X_S Y_S
Wait Until (i * 0.7)
Next
ClearPicture
Refresh
Return
あと、ビームのような動くアニメを作るのには特別なコマンドが必要なのでしょうか？サブルーチンとか係数とか関数とかさっぱり分からないのでこの点も教えてください。
では
|
新着情報