我在网上下载了一个类似雷电的vb6.0开发的游戏,其中确定enemy当前帧的代码段看不明白,希望高手指点一二
If Animated Then
L_nCurrentFrame = (Parent.Parent.Parent.FrameCount Mod (.TileCount * .AnimationDelay)) \ .AnimationDelay
End If
If Directed Then
L_nCurrentFrame = State.Direction \ (360 / (.TileCount + 1)) '\整数除法,不舍入
End If
If Targetting Then
L_nDX = Parent.Parent.Parent.Player.PositionX - PositionX
L_nDY = Parent.Parent.Parent.Player.PositionY - PositionY
If L_nDX = 0 Then L_nDX = 1
If L_nDX >= 0 And L_nDY >= 0 Then
L_nAngle = 90 + Abs(Atn(L_nDY / L_nDX)) * 57.297469
End If
If L_nDX < 0 And L_nDY >= 0 Then
L_nAngle = 270 - Abs(Atn(L_nDY / L_nDX)) * 57.297469
End If
If L_nDX >= 0 And L_nDY < 0 Then
L_nAngle = 90 - Abs(Atn(L_nDY / L_nDX)) * 57.297469
End If
If L_nDX < 0 And L_nDY < 0 Then
L_nAngle = 270 + Atn(L_nDY / L_nDX) * 57.297469
End If