[FS]Anti-Pénzcheat

//script by danix99
#include <a_samp>
#include <sprintf>

#if defined _ALS_OnPlayerConnect
    #undef OnPlayerConnect
#else
    #define _ALS_OnPlayerConnect
#endif
#define OnPlayerConnect amh_OnPlayerConnect
forward amh_OnPlayerConnect(playerid);

#if defined _ALS_OnPlayerDisconnect
    #undef OnPlayerDisconnect
#else
    #define _ALS_OnPlayerDisconnect
#endif
#define OnPlayerDisconnect amh_OnPlayerDisconnect
forward amh_OnPlayerDisconnect(playerid, reason);


forward timer(playerid)
#define GivePlayerMoney GivePlayerMoneytwo
new penze[MAX_PLAYERS];
new time[MAX_PLAYERS];
public OnVehicleMod(playerid,vehicleid,componentid) return penze[playerid] = penze[playerid]-100;
public OnVehiclePaintjob(playerid,vehicleid,paintjobid) return penze[playerid] = penze[playerid]-100;
public OnVehicleRespray(playerid,vehicleid,color1,color2) return penze[playerid] = penze[playerid]-100;
public OnPlayerConnect(playerid) return time[playerid]=SetTimerEx("timer",500,true,"i",playerid);
public OnPlayerDisconnect(playerid,reason) return KillTimer(time[playerid]);
public timer(playerid)
{
        new n[24]; GetPlayerName(playerid,n,24);
        if(penze[playerid] != GetPlayerMoney(playerid)) return SendClientMessageToAll(-1,sprintf("%s megpróbált pénzt cheatelni... de nem sikerült neki így bannoltuk :(:( ÉG VELED ÖRÖKRE :'=(",n)),BanEx(playerid,"Moneyhack");
        return 1;
}
stock GivePlayerMoneytwo(playerid,money)
{
        penze[playerid] = penze[playerid]+money;
        GivePlayerMoney(playerid,money);
        return 1;
}