Weather System

[Da Undead]

Update it xD.

And for the GlobalMsg, already tried that and it gives me an error on it and says..

Wrong number of arguments or invalid property assignments



-----------
EDIT:

MAJOR FIX FOR IT! I fixed it, it just wansn't registering straight so i had compared it to a previous call add text, well heres the correct packet .

Code:

If (LCase(Parse(0)) = "weather") Then
        If Val(Parse(1)) = WEATHER_RAINING And GameWeather  WEATHER_RAINING Then
            Call TextAdd(frmMirage.txtChat, "You see rain drops falling from the sky above!", True)
        End If
        If Val(Parse(1)) = WEATHER_SNOWING And GameWeather  WEATHER_SNOWING Then
            Call TextAdd(frmMirage.txtChat, "You see snow falling from the sky above!", True)
        End If
        
        If Val(Parse(1)) = WEATHER_NONE Then
            If GameWeather = WEATHER_RAINING Then
                Call TextAdd(frmMirage.txtChat, "The rain beings to calm.", True)
            ElseIf GameWeather = WEATHER_SNOWING Then
                Call TextAdd(frmMirage.txtChat, "The snow is melting away.", True)
            End If
        End If
        GameWeather = Val(Parse(1))
        RainIntensity = 100
        If MAX_RAINDROPS  RainIntensity Then
            MAX_RAINDROPS = RainIntensity
            ReDim DropRain(1 To MAX_RAINDROPS) As DropRainRec
            ReDim DropSnow(1 To MAX_RAINDROPS) As DropRainRec
        End If
    End If