[Ajuda] Botz Fake-Kill
#3

ta ae uns que eu ja usei os creditos de algum ae nem lembro mais quem for o dono pode ficar tranquilo o codigoo e seu e eu respeito os creditos!
ta ae so testei 2 desses ae e funciono tenta ae espero ter ajudado!
pawn Код:
#include <  a_samp  >

new fkill [ MAX_PLAYERS ] ;

forward MenosFKill ( id ) ;
public MenosFKill ( id ) if ( fkill [ id ] > 0 && fkill [ id ] < 3 ) fkill [ id ] -- ;

public OnPlayerDeath ( playerid , killerid , reason )
{
    if ( fkill [ playerid ] < 3 ) fkill[playerid]++ , SetTimerEx ( "MenosFKill" , 1000 , false , "d" , playerid ) ;
    else
    {
        new string23 [ 128 ] , nome23 [ MAX_PLAYER_NAME ] ;
        GetPlayerName ( playerid , nome23 , sizeof ( nome23 ) ) ;
        format ( string23 , sizeof ( string23 ) ,"%s[ID:%d] Foi Banido. (Fake-Kill)" , nome23 , playerid ) ;
        SendClientMessageToAll ( -1 , string23 ) , Ban(playerid);
    }
    return 1;
}

public OnPlayerConnect ( playerid ) fkill [ playerid ] = 0 ;
//ja usei esse ae acima e baum mais nao perfeito !
//nao lembro de quem e os creditos nao meu !
pawn Код:
public OnPlayerDeath(playerid, killerid, reason)
{
    if(gettime() - GetPVarInt(playerid, "ultimaDeath") < 3) //  ou o jogador morreu mais de uma vez nos ъltimos 2 segundos
    {
        static bftmp[128];
        format(bftmp, 128, "[AdminBot] %s(%d) foi kickado por suspeita de fake-kill", PlayerName(playerid), playerid);
        SendClientMessageToAll(RED, bftmp);
        return true;
    }

    if(IsPlayerConnected(killerid) && killerid != INVALID_PLAYER_ID) { // caso ouver killerid
        if(GetDistanceBetweenPlayers(killerid, playerid) > 300 && GetPVarInt(playerid, "ultimoShoot") != killerid) { // caso a distancia entre o killerid for menor que 300
            static bftmp[128];
            format(bftmp, 128, "[AdminBot] %s(%d) foi kickado por suspeita de fake-kill", PlayerName(playerid), playerid);
            SendClientMessageToAll(RED, bftmp);
            return true;
        }
    }
    SetPVarInt(playerid, "ultimaDeath", gettime());
    return false;
}

public OnPlayerTakeDamage(playerid, issuerid, Float: amount, weaponid)
{
    SetPVarInt(playerid, "ultimoShoot", issuerid);
    return true;
}
pawn Код:
#include <a_samp>
new antifakekill[MAX_PLAYERS];
public OnFilterScriptInit()
{
    print(" Anti Fake Kill by; LuizFel");
    return 1;
}

public OnPlayerText(playerid, text[])
{
   if(strfind(text,"!kill",true) == 0) return Kick(playerid);
   if(strfind(text,"www.samphax.tk",true) == 0) return Kick(playerid);

   return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
    antifakekill[playerid] ++;
    SetTimerEx("antifakekill2", 1000,false,"i",playerid);
    return 1;
}

forward antifakekill2(playerid);
public antifakekill2(playerid)
{
    antifakekill[playerid] --;
    if(antifakekill[playerid] > 5)
    {
        SendClientMessage(playerid, 0xFF0000AA, "Este servidor esta protegido por um Anti Fake Kill");
        Ban(playerid); // aki era kick eu mudei para ban
    }
    return 1;
}
Reply


Messages In This Thread
Botz Fake-Kill - by Luciano* - 20.07.2012, 14:09
Re: Botz Fake-Kill - by [XPG]MarlonCS - 20.07.2012, 14:20
AW: Botz Fake-Kill - by billy the kid - 20.07.2012, 14:24
Re: Botz Fake-Kill - by Luciano* - 20.07.2012, 21:48
Re: Botz Fake-Kill - by leonardo1434 - 20.07.2012, 22:04
Re: Botz Fake-Kill - by Luciano* - 21.07.2012, 13:56
Re: Botz Fake-Kill - by Luciano* - 21.07.2012, 15:17
Re: Botz Fake-Kill - by leonardo1434 - 21.07.2012, 15:19
Re: Botz Fake-Kill - by matheuspain - 21.07.2012, 17:17
Re: Botz Fake-Kill - by Mercurio - 22.07.2012, 01:09

Forum Jump:


Users browsing this thread: 2 Guest(s)