[SCR] Anti money cheat

#include <a_samp>

new pMoney[MAX_PLAYERS], pCashCheck[MAX_PLAYERS];
forward CheckCash();

#define GivePlayerCash(%0,%1) pCashCheck[%0] = gettime() + 15, pMoney[%0] += %1, GivePlayerMoney(%0, %1)
#define SetPlayerCash(%0,%1) pCashCheck[%0] = gettime() + 15, pMoney[%0] = %1, ResetPlayerMoney(%0), GivePlayerMoney(%0, %1)
#define GetPlayerCash(%0) pMoney[%0]
#define ResetPlayerCash(%0) pCashCheck[%0] = gettime() + 15, pMoney[%0] = 0, ResetPlayerMoney(%0)

public OnPlayerConnect(playerid)
{
    pMoney[playerid] = 0;
    pCashCheck[playerid] = gettime() + 60;
    return 1;
}

public OnGameModeInit()
{
    SetTimer("CheckCash", 5000, true);
    return 1;
}

public CheckCash()
{
    new money;
    for(new p = 0; p < MAX_PLAYERS; p++)
    {
            if(!IsPlayerConnected(p) || IsPlayerNPC(p)) continue;
        if(pCashCheck[p] < gettime())
        {
                money = GetPlayerMoney(p);
                if(money > pMoney[p])
            {
                        ResetPlayerMoney(p);
                        GivePlayerMoney(p, pMoney[p]);
                }
                else
                {
                        pMoney[p] = money;
            }
        }
    }
    return 1;
}