Snow System

//-_-_-_-_-_-_-_-_-_-_-_-_This is my sixth release!!-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-
//-_-_-_-_-_-_-_-_-_-_-_-_-_- {Indian Keval} _-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-
//-_-_-_-_-_-_-_-_-_-_-_-_- Nick : {ProDude}-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
//-_-_-_-_-_-_-_-_-_-_-_-Mail ID : kevalbro@outlook.com-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-
//-_-_-_-_-_-_-_-_-_-_-_-_-_-Dont Take Credits :@-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_


#include <a_samp>
#include <streamer>
#include <zcmd>


#define COLOR_LIGHTRED 0xFF6347AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_LIGHTBLUE 0x00BFFFAA

#undef MAX_PLAYERS
#define MAX_SLOTS                       200

#define MAX_SNOW_OBJECTS    20
#define UPDATE_INTERVAL     750

#if MAX_SLOTS == -1
        #error Change MAX_SLOTS to the max players of your server! (At line 6)
#endif

#define ploop(%0)                       for(new %0 = 0; %0 < MAX_SLOTS; %0++) if(IsPlayerConnected(%0))
#define CB:%0(%1)           forward %0(%1); public %0(%1)

new bool:snowOn[MAX_SLOTS char],
        snowObject[MAX_SLOTS][MAX_SNOW_OBJECTS],
        updateTimer[MAX_SLOTS char]
;

public OnFilterScriptExit()
{
        ploop(i)
        {
            if(snowOn{i})
            {
                for(new j = 0; j < MAX_SNOW_OBJECTS; j++) DestroyDynamicObject(snowObject[i][j]);
                KillTimer(updateTimer{i});
                }
        }
        return 1;
}
public OnPlayerDisconnect(playerid)
{
        if(snowOn{playerid})
        {
            for(new i = 0; i < MAX_SNOW_OBJECTS; i++) DestroyDynamicObject(snowObject[playerid][i]);
            snowOn{playerid} = false;
            KillTimer(updateTimer{playerid});
        }
        return 1;
}

CB:UpdateSnow(playerid)
{
        if(!snowOn{playerid}) return 0;
        new Float:pPos[3];
        GetPlayerPos(playerid, pPos[0], pPos[1], pPos[2]);
        for(new i = 0; i < MAX_SNOW_OBJECTS; i++) SetDynamicObjectPos(snowObject[playerid][i], pPos[0] + random(25), pPos[1] + random(25), pPos[2] - 5);
        return 1;
}

stock CreateSnow(playerid)
{
        if(snowOn{playerid}) return 0;
        new Float:pPos[3];
        GetPlayerPos(playerid, pPos[0], pPos[1], pPos[2]);
        for(new i = 0; i < MAX_SNOW_OBJECTS; i++) snowObject[playerid][i] = CreateDynamicObject(18864, pPos[0] + random(25), pPos[1] + random (25), pPos[2] - 5, random(100), random(100), random(100), -1, -1, playerid);
        snowOn{playerid} = true;
        updateTimer{playerid} = SetTimerEx("UpdateSnow", UPDATE_INTERVAL, true, "i", playerid);
        return 1;
}

stock DeleteSnow(playerid)
{
        if(!snowOn{playerid}) return 0;
        for(new i = 0; i < MAX_SNOW_OBJECTS; i++) DestroyDynamicObject(snowObject[playerid][i]);
        KillTimer(updateTimer{playerid});
        snowOn{playerid} = false;
        return 1;
}

CMD:snow(playerid, params[])
{
        if(snowOn{playerid})
        {
            DeleteSnow(playerid);
            SendClientMessage(playerid, 0xFF6347AA, "* Pak Reality Roleplay Gaming Info."); // Your Server Name
            SendClientMessage(playerid, 0x00FF00AA, "* ____----Snow Is De-Activated----____.");
            SendClientMessage(playerid, 0xFF6347AA, "* Pak Reality Roleplay Gaming Info.");        }
        else
        {
            CreateSnow(playerid);
            SendClientMessage(playerid, 0xFF6347AA, "* Pak Reality Roleplay Gaming Info."); // Your Server Name
            SendClientMessage(playerid, 0x00FF00AA, "* ____----Snow Is Activated----____.");
            SendClientMessage(playerid, 0xFF6347AA, "* Pak Reality Roleplay Gaming Info.");
        }
        return 1;
}

CMD:allsnowon(playerid, params[])
{
	new String[128];
	new St[118];
    if(!IsPlayerAdmin(playerid)) return 0;
    ploop(i) //This is included in my FS! It's the '#define ploop(%0)' thing.
    {
        if(snowOn{i}) continue;
        CreateSnow(i);
        format(St, 118, "ServerCMD : Pak Reality Roleplay Gaming Weather Info ."); // Your Server Name
        SendClientMessageToAll(COLOR_LIGHTRED, St);
		format(String, 128, "ServerCMD : ------Guys , Enjoy The Snow Season------ .");
        SendClientMessageToAll(COLOR_LIGHTBLUE, String);
    }
    return 1;
}

CMD:allsnowoff(playerid, params[])
{
    new String[138];
    new Str[148];
    if(!IsPlayerAdmin(playerid)) return 0;
    ploop(i)
    {
        if(!snowOn{i}) continue;
        DeleteSnow(i);
        format(Str, 148, "ServerCMD : Pak Reality Roleplay Gaming Weather Info ."); // Your Server Name
        SendClientMessageToAll(COLOR_LIGHTRED, Str);
        format(String, 138, "ServerCMD : ----Guys , Snow Season Is Gonna End---- .");
        SendClientMessageToAll(COLOR_LIGHTBLUE, String);
    }
    return 1;
}