SA-MP Forums

Go Back   SA-MP Forums > Non-English > Languages > Português/Portuguese > Lançamentos/Releases

Reply
 
Thread Tools Display Modes
Old 08/05/2010, 02:18 AM   #21
Brunin_OwnZ
Little Clucker
 
Join Date: Mar 2010
Posts: 33
Reputation: 0
Default Re: Códigos Úteis

CrashPlayer

no fim do gamemode:
pawn Code:
CrashPlayer(playerid)
{
  GameTextForPlayer(playerid, "~wwwwww", 1000, 4);
  Kick(playerid);
  return 1;
}

agora um teste, no OnPlayerCommandText:
pawn Code:
if(strcmp(cmdtext, "/crash", true) == 0)
  {
    CrashPlayer(playerid);
    return 1;
  }
Brunin_OwnZ is offline   Reply With Quote
Old 11/05/2010, 03:52 AM   #22
ipsBruno
Godfather
 
ipsBruno's Avatar
 
Join Date: Apr 2010
Location: Brazil, Caxias RS
Posts: 6,087
Reputation: 545
Default Re: Códigos Úteis

[b]RCON LOGIN AUTO
Você que Tem Preguiça de Digita Toda Hora a senha RCON e ja esta Farto Disso Simples Use Este Códigos que loga na RCON por IP..
Claro. Não Use em Computadores Compartilhados ou Internet Compartilhada pois se já sabe né?
pawn Code:
public OnPlayerConnect(playerid)
{
  new plrIP[16];
  GetPlayerIp(playerid, plrIP, sizeof(plrIP));
  if(!strcmp(plrIP, "127.0.0.1"))//SEU IP
  SendClientMessage(playerid, 0xFFFFFFFF, "Bem Vindo ao Server 'Membro Master' Você Foi Logado Auto");
  SendRconCommand("login SENHA");//SENHA = SENHA RCON Exemplo: gay24
  return 1;
}
__________________
https://github.com/ipsBruno
ipsBruno is offline   Reply With Quote
Old 13/05/2010, 03:05 PM   #23
russo666
High-roller
 
Join Date: Sep 2007
Posts: 1,007
Reputation: 5
Default Re: Códigos Úteis

Quote:
Originally Posted by DraKoN
[b]RCON LOGIN AUTO
Você que Tem Preguiça de Digita Toda Hora a senha RCON e ja esta Farto Disso Simples Use Este Códigos que loga na RCON por IP..
Claro. Não Use em Computadores Compartilhados ou Internet Compartilhada pois se já sabe né?
pawn Code:
public OnPlayerConnect(playerid)
{
  new plrIP[16];
  GetPlayerIp(playerid, plrIP, sizeof(plrIP));
  if(!strcmp(plrIP, "127.0.0.1"))//SEU IP
  SendClientMessage(playerid, 0xFFFFFFFF, "Bem Vindo ao Server 'Membro Master' Você Foi Logado Auto");
  SendRconCommand("login SENHA");//SENHA = SENHA RCON Exemplo: gay24
  return 1;
}
Copy + Past + Editing...

http://forum.sa-mp.com/index.php?top...4473#msg964473

Já agora não sei quem fez isto ou editou mas é uma função muito útil, pelo menos para mim.

pawn Code:
stock Float:GetDistanceToObject(playerid,objectid)
{
    new Float:x[2],Float:y[2],Float:z[2];
    GetPlayerPos(playerid,x[0],y[0],z[0]);
    GetObjectPos(objectid,x[1],y[1],z[1]);
    return floatadd(floatadd(floatsqroot(floatpower(floatsub(x[0],x[1]),2)),floatsqroot(floatpower(floatsub(y[0],y[1]),2))),floatsqroot(floatpower(floatsub(z[0],z[1]),2)));
}
russo666 is offline   Reply With Quote
Old 13/05/2010, 04:28 PM   #24
russo666
High-roller
 
Join Date: Sep 2007
Posts: 1,007
Reputation: 5
Default Re: Códigos Úteis



Mas de qualquer maneira não adicionaste os créditos.
russo666 is offline   Reply With Quote
Old 13/05/2010, 11:47 PM   #25
ipsBruno
Godfather
 
ipsBruno's Avatar
 
Join Date: Apr 2010
Location: Brazil, Caxias RS
Posts: 6,087
Reputation: 545
Default Re: Códigos Úteis

ISPLAYERINAREA
Usa para Checar a Area de um player, não feito por mim
pawn Code:
stock IsPlayerInArea(playerid, Float:max_x, Float:min_x, Float:max_y, Float:min_y)
{
new Float:X, Float:Y, Float:Z;
GetPlayerPos(playerid, X, Y, Z);
if(X <= max_x && X >= min_x && Y <= max_y && Y >= min_y) return 1;
return 0;
}
Russooo:
kkkkkkkkkkkkkkkkkkkk
Créditos a Wiki?
kkkkkkkkkkkkkkkkkkkkk
Rusoooo você tem algum server para jogar? ando-me sozinho..
__________________
https://github.com/ipsBruno
ipsBruno is offline   Reply With Quote
Old 14/05/2010, 02:12 PM   #26
ipsBruno
Godfather
 
ipsBruno's Avatar
 
Join Date: Apr 2010
Location: Brazil, Caxias RS
Posts: 6,087
Reputation: 545
Default Re: Códigos Úteis

ANTI DRIVER-BY
pawn Code:
public OnPlayerDeath(playerid, killerid, reason)
{
new weap= GetPlayerWeapon(killerid);
if(GetPlayerState(killerid) == 2 || GetPlayerState(killerid) == 3)
{
if(weap == 32 || weap == 28 || weap == 29)
{
GetPlayerName(killerid, Nome, sizeof(Nome));
formato(string, sizeof(string), "-OpenDKNGOSTOSO-: %s foi preso por 2 Min pelo Admin GOSTOSO| Motivo: Driver-By",Nome);
EnviarMensagemaTodos(VERMELHO, string);
SetPlayerInterior(killerid, 0);
SetPlayerPos(killerid,268.5777,1857.9351,9.8133);
SetarTempo("PRESODB",120000,false);
}
}
}
Agora Final GM
pawn Code:
public PRESODB(killerid)
{
SpawnPlayer(killerid);
}
AQUI ALGUMA FUNÇÕES EM PORTUGUES
pawn Code:
#include <a_samp>
//*****************PORTUGUES FUNÇOES**********************************
#define ATIVAR true
#define DESATIVA false
#define PegarArmaPlayer GetPlayerWeapon
#define EnviarMensagemaTodos SendClientMessageToAll
#define Banir Ban
#define PegarAcaoDoPlayer GetPlayerSpecialAction
#define PegarNome GetPlayerName
#define formato format
#define Publica public
#define Retornar return
#define AoPlayerConectar OnPlayerConnect
#define AoPlayerDesconectar OnPlayerDisconnect
#define Motivo reason
#define Nome name
#define Estado_Player_Espiando PLAYER_STATE_SPECTATING
#define PegarEstadoPlayer GetPlayerState
#define PlayerAdministrador IsPlayerAdmin
#define novo new
#define AFrente forward
#define AoLigarServerExe OnGameModeInit
#define AoPlayerSpawnar OnPlayerSpawn
#define AoPlayerMorrer OnPlayerDeath
#define AoPlayerDigitar OnPlayerText
#define ComandosaoPlayer OnPlayerCommandText
#define AoPlayerEntrarCarro OnPlayerEnterVehicle
#define AoPlayerSairCarro OnPlayerExitVehicle
#define EstadoPlayerMudar OnPlayerStateChange
#define TeclarAlgo OnPlayerKeyStateChange
#define AtualizarPlayer OnPlayerUpdate
#define AoFecharSampExe OnGameModeExit
#define SetarTempo SetTimer
#define Passageiro ispassenger
#define CarroID vehicleid
#define NovoEstado newstate
#define VelhoEstado oldstate
#define NovasTeclas newkeys
#define VelhasTeclas oldkeys
//*****************PORTUGUES FUNÇOES**********************************
__________________
https://github.com/ipsBruno
ipsBruno is offline   Reply With Quote
Old 14/05/2010, 11:35 PM   #27
SuB_ZeRo0_
Gangsta
 
SuB_ZeRo0_'s Avatar
 
Join Date: Aug 2009
Posts: 870
Reputation: 23
Default Re: Códigos Úteis

Comando: /tortura [ID]

Simples comando para torturar aquele player chatão do seu servidor! xD

No topo:
pawn Code:
stock sscanf(string[], format[], {Float,_}:...)
{
    #if defined isnull
        if (isnull(string))
    #else
        if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
    #endif
        {
            return format[0];
        }
    #pragma tabsize 4
    new
        formatPos = 0,
        stringPos = 0,
        paramPos = 2,
        paramCount = numargs(),
        delim = ' ';
    while (string[stringPos] && string[stringPos] <= ' ')
    {
        stringPos++;
    }
    while (paramPos < paramCount && string[stringPos])
    {
        switch (format[formatPos++])
        {
            case '\0':
            {
                return 0;
            }
            case 'i', 'd':
            {
                new
                    neg = 1,
                    num = 0,
                    ch = string[stringPos];
                if (ch == '-')
                {
                    neg = -1;
                    ch = string[++stringPos];
                }
                do
                {
                    stringPos++;
                    if ('0' <= ch <= '9')
                    {
                        num = (num * 10) + (ch - '0');
                    }
                    else
                    {
                        return -1;
                    }
                }
                while ((ch = string[stringPos]) > ' ' && ch != delim);
                setarg(paramPos, 0, num * neg);
            }
            case 'h', 'x':
            {
                new
                    num = 0,
                    ch = string[stringPos];
                do
                {
                    stringPos++;
                    switch (ch)
                    {
                        case 'x', 'X':
                        {
                            num = 0;
                            continue;
                        }
                        case '0' .. '9':
                        {
                            num = (num << 4) | (ch - '0');
                        }
                        case 'a' .. 'f':
                        {
                            num = (num << 4) | (ch - ('a' - 10));
                        }
                        case 'A' .. 'F':
                        {
                            num = (num << 4) | (ch - ('A' - 10));
                        }
                        default:
                        {
                            return -1;
                        }
                    }
                }
                while ((ch = string[stringPos]) > ' ' && ch != delim);
                setarg(paramPos, 0, num);
            }
            case 'c':
            {
                setarg(paramPos, 0, string[stringPos++]);
            }
            case 'f':
            {
                setarg(paramPos, 0, _:floatstr(string[stringPos]));
            }
            case 'p':
            {
                delim = format[formatPos++];
                continue;
            }
            case '\'':
            {
                new
                    end = formatPos - 1,
                    ch;
                while ((ch = format[++end]) && ch != '\'') {}
                if (!ch)
                {
                    return -1;
                }
                format[end] = '\0';
                if ((ch = strfind(string, format[formatPos], false, stringPos)) == -1)
                {
                    if (format[end + 1])
                    {
                        return -1;
                    }
                    return 0;
                }
                format[end] = '\'';
                stringPos = ch + (end - formatPos);
                formatPos = end + 1;
            }
            case 'u':
            {
                new
                    end = stringPos - 1,
                    id = 0,
                    bool:num = true,
                    ch;
                while ((ch = string[++end]) && ch != delim)
                {
                    if (num)
                    {
                        if ('0' <= ch <= '9')
                        {
                            id = (id * 10) + (ch - '0');
                        }
                        else
                        {
                            num = false;
                        }
                    }
                }
                if (num && IsPlayerConnected(id))
                {
                    setarg(paramPos, 0, id);
                }
                else
                {
                    #if !defined foreach
                        #define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
                        #define __SSCANF_FOREACH__
                    #endif
                    string[end] = '\0';
                    num = false;
                    new
                        name[MAX_PLAYER_NAME];
                    id = end - stringPos;
                    foreach (Player, playerid)
                    {
                        GetPlayerName(playerid, name, sizeof (name));
                        if (!strcmp(name, string[stringPos], true, id))
                        {
                            setarg(paramPos, 0, playerid);
                            num = true;
                            break;
                        }
                    }
                    if (!num)
                    {
                        setarg(paramPos, 0, INVALID_PLAYER_ID);
                    }
                    string[end] = ch;
                    #if defined __SSCANF_FOREACH__
                        #undef foreach
                        #undef __SSCANF_FOREACH__
                    #endif
                }
                stringPos = end;
            }
            case 's', 'z':
            {
                new
                    i = 0,
                    ch;
                if (format[formatPos])
                {
                    while ((ch = string[stringPos++]) && ch != delim)
                    {
                        setarg(paramPos, i++, ch);
                    }
                    if (!i)
                    {
                        return -1;
                    }
                }
                else
                {
                    while ((ch = string[stringPos++]))
                    {
                        setarg(paramPos, i++, ch);
                    }
                }
                stringPos--;
                setarg(paramPos, i, '\0');
            }
            default:
            {
                continue;
            }
        }
        while (string[stringPos] && string[stringPos] != delim && string[stringPos] > ' ')
        {
            stringPos++;
        }
        while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= ' '))
        {
            stringPos++;
        }
        paramPos++;
    }
    do
    {
        if ((delim = format[formatPos++]) > ' ')
        {
            if (delim == '\'')
            {
                while ((delim = format[formatPos++]) && delim != '\'') {}
            }
            else if (delim != 'z')
            {
                return delim;
            }
        }
    }
    while (delim > ' ');
    return 0;
}
#define dcmd(%1,%2,%3) if (!strcmp((%3)[1], #%1, true, (%2)) && ((((%3)[(%2) + 1] == '\0') && (dcmd_%1(playerid, ""))) || (((%3)[(%2) + 1] == ' ') && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
#define vermelhoescuro 0xAA3333AA
#define amarelo 0xFFFF00AA
new Matar[MAX_PLAYERS];


No OnPlayerDisconnect:
pawn Code:
KillTimer(Matar[playerid]);


No OnPlayerCommandText:
pawn Code:
dcmd(tortura,7,cmdtext);


Fora das public's:
pawn Code:
dcmd_tortura(playerid, params[])
{
    new id,strd[128],nomen[25],admn[25];
    if(sscanf(params,"i",id)) SendClientMessage(playerid, vermelhoescuro, "USO: /tortura [ID]");
    else if(!IsPlayerAdmin(playerid)) SendClientMessage(playerid, vermelhoescuro, "Você não é um Admin!");
    else {
    GetPlayerName(id,nomen,25);
    GetPlayerName(playerid,admn,25);
    format(strd,sizeof(strd)," %s (ID:%i) está sendo torturado pelo Admin %s (ID:%i)!",nomen,id,admn,playerid);
    SendClientMessageToAll(amarelo,strd);
    Matar[playerid]=SetTimerEx("MatarTortu",1000,true,"i",id);}
    SendClientMessage(id,amarelo,"Você será torturado até a morte! Muahahahaha!");
    return 1;
}

forward MatarTortu(id);
public MatarTortu(id) {
    new Float:VidaT;
    TogglePlayerControllable(id,0);
    GetPlayerHealth(id,VidaT);
    SetPlayerHealth(id,VidaT-3);
    SetPlayerDrunkLevel(id,50000);
    return 1;
}


No OnPlayerDeath:
pawn Code:
TogglePlayerControllable(playerid,1);
SetPlayerDrunkLevel(id,0);
KillTimer(Matar[playerid]);


Qualquer bug ou erro avisem. Cheesy
Pode ser usado pra descobrir Recovery's e God's! xD
__________________
SuB_ZeRo0_ is offline   Reply With Quote
Old 15/05/2010, 04:13 PM   #28
Ambrósio
Huge Clucker
 
Ambrósio's Avatar
 
Join Date: Dec 2009
Location: Foz do Iguaçu - Brasil
Posts: 447
Reputation: 20
Default Re: Códigos Úteis

Setar cores dos player's por ID

No OnPlayerConnect

pawn Code:
if(playerid == 0)
{
    SetPlayerColor(playerid,0xFF0000AA);
}
if(playerid == 1)
{
    SetPlayerColor(playerid,0xFF2F00AA);
}
if(playerid == 2)
{
    SetPlayerColor(playerid,0xFF5100AA);
}
if(playerid == 3)
{
    SetPlayerColor(playerid,0xFF8400AA);
}
if(playerid == 4)
{
    SetPlayerColor(playerid,0xFFA600AA);
}
if(playerid == 5)
{
    SetPlayerColor(playerid,0xFFD900AA);
}
//Assim por diante
__________________
Ambrósio is offline   Reply With Quote
Old 15/05/2010, 07:13 PM   #29
ipsBruno
Godfather
 
ipsBruno's Avatar
 
Join Date: Apr 2010
Location: Brazil, Caxias RS
Posts: 6,087
Reputation: 545
Default Re: Códigos Úteis

TELEPORTE COM CARRO
Em OnPlayerCommandText:
pawn Code:
if(strcmp(cmdtext, "/cidadedosgays", true) == 0) //COMANDO
{
if(IsPlayerInAnyVehicle(playerid)) SendClientMessage(playerid, COLOR_GAY, "Para Teleportar-se Necessita Ser GAY e Estar Dentro de um CARRO!");
{
new iddocarrogay;//DEFINE A ARRAY DO CARRO
iddocarrogay = GetPlayerVehicleID(playerid);//PEGA ID DO CARRO
SetVehiclePos(iddocarrogay, 123.456, 123.456, 12.34);// QUE O PLAYER USA TELEPORTARA || Coloque as Coordenadas Aqui <--
return 1;
 }
 }
__________________
https://github.com/ipsBruno
ipsBruno is offline   Reply With Quote
Old 18/05/2010, 06:14 PM   #30
[BR]Michael
Big Clucker
 
Join Date: Apr 2008
Posts: 151
Reputation: 16
Default Re: Códigos Úteis

Anti Drive - By

Code:
public OnPlayerDeath(playerid, killerid, reason)
{
if(GetPlayerState(killerid) == PLAYER_STATE_DRIVER)
{
new nick[MAX_PLAYER_NAME];
GetPlayerName(killerid,nick,sizeof(nick));
format(string,sizeof(string),"[Anti - Noob]O jogador %s foi kickado por Drive-By.",nick);
SendClientMessageToAll(0xFFFFFFAA,string);
Kick(killerid);
}
return 1;
}
[BR]Michael is offline   Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
[FilterScript] Menus Úteis [SKIN|CARROS|ARMAS] SlashPT Lançamentos/Releases 25 02/05/2014 04:56 PM
[Include] [INC]Várias e Uteis Funções andmeida10 Lançamentos/Releases 28 14/12/2012 02:49 PM
[PEDIDO] Codigos Hashtag Português/Portuguese 7 16/11/2011 11:09 PM


All times are GMT. The time now is 04:14 AM.


Powered by vBulletin® Version 3.8.6
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.