This should work, though I didn't actually test it:
File Name: player.pl - Save this in the zone folder you want to adjust weather for
Code:
sub EVENT_ENTERZONE {
# Set the type of weather desired here
my $weathertype = 1; # 0 for none, 1 for rain, 2 for snow
# Check if weather is not already set to the desired type
if ($zoneweather != $weathertype)
{
my $Rain = 1;
my $Snow = 2;
if ($weathertype == $Rain)
{
# Turn off snow (if it is on) and turn on rain
quest::snow(0);
quest::rain(1);
}
elsif ($weathertype == $Snow)
{
# Turn off rain (if it is on) and turn on snow
quest::rain(0);
quest::snow(1);
}
else
{
# Turn off both snow and rain
quest::rain(0);
quest::snow(0);
}
}
}