magic variables.vb.svn-base

MirUnleashed vb.net Module modMainServer Public WithEvents Socket As New WinsockServer Pub

Imports Microsoft.DirectX
Imports Microsoft.DirectX.Direct3D

Module Magic_Variables

    Public MagicActionLastTick As Long
    Public MagicTexture(1, 10000) As Texture
    Public MagicTextureLoaded(1, 10000) As Boolean
    Public TotalMagic As Integer
    Public Magic(1000) As MagicType
    Public LoopMagic As Boolean

    Public Structure MagicType

        Dim TickMiss As Short
        Dim Ticks As Short
        Dim FollowPlayer As Boolean
        Dim FollowMob As Boolean
        Dim FollowPlayerID As Integer
        Dim FollowMobID As Integer
        Dim Light As Short
        Dim StartFrame As Integer
        Dim EndFrame As Integer
        Dim MagicFile As Short
        Dim Exist As Boolean
        Dim CordX As Single
        Dim CordY As Single
        Dim X As Short
        Dim Y As Short
        Dim Animation As Short
        Dim LightIndex As Integer

    End Structure


End Module