1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese
  5. Lançamentos/Releases

Threaded Mode
Cуdigos Ъteis #1
BiieL
High-roller
*****
Posts: 1,236
Threads: 45
Joined: May 2010
Reputation: 0
#61

14.09.2010, 19:16
sim sim, hein, mas eu posso definir o nome fora de uma public, porque esse 562 tb pode ser o id de um objeto entao ...
Find
Reply
ipsBruno
Godfather
*****
Posts: 6,084
Threads: 231
Joined: Apr 2010
Reputation: 0
#62

14.09.2010, 20:32
@Garifield:
Nгo fala se nгo sabe,ensinou ele errado, ao contrбrio.. pqp

@BieL:
Procure usar Search nem sempre da boca dos outros й a melhor alternativa

pawn Код:
#define NOME_QUALQUER NOME_REAL
Vocк esta fazendo ao contrario..

Exemplo de como ficaria corretamente:

pawn Код:
#define ID_MACHO playerid
Agora quando tiver ID_MACHO ele reconhecerб por playerid

Aqui nгo й chat por favor discutam isso em outro local
Find
Reply
zSuYaNw
Godfather
*****
Posts: 6,840
Threads: 94
Joined: Apr 2010
Reputation: 0
#63

16.09.2010, 14:50
Pegar Angulo
pawn Код:
if(strcmp(cmd,"/angulo", true) == 0)
    {
    if(IsPlayerAdmin(playerid))
    {
    new Float:Angle, stringe[26];
    GetPlayerFacingAngle(playerid, Angle);
    format(stringe, sizeof(stringe), "Seu Angulo й: %0.2f", Angle);
    SendClientMessage(playerid, 0xFFFFFFFF, stringe);
    }
    else
    {
    SendClientMessage(playerid,0xFF0000AA,"vocк nгo й adm logado na rcon");
    }
    return 1;
    }
ამ განყოფილებაში მოითხოვს დაელოდოთ 120 წამი შორის შეტყობინება. გთხოვთ სცადოთ თავიდან 3 წამი.
Find
Reply
ipsBruno
Godfather
*****
Posts: 6,084
Threads: 231
Joined: Apr 2010
Reputation: 0
#64

17.09.2010, 01:50
PEGAR ANGULO

Igual o do nossa Amiga Garfield,fiz em menas linhas, mesma coisa

pawn Код:
if(strcmp(cmd,"/angulo", true) == 0)
{
    if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,0xFF0000AA,"vocк nгo й adm logado na rcon");
    new Float:Angle, stringe[26];
    GetPlayerFacingAngle(playerid, Angle);
    format(stringe, sizeof(stringe), "Seu Angulo й: %0.6f", Angle);
    SendClientMessage(playerid, 0xFFFFFFFF, stringe);
    return 1;
}
Find
Reply
SlashPT
High-roller
*****
Posts: 1,973
Threads: 54
Joined: Sep 2009
Reputation: 0
#65

17.09.2010, 04:41
e bruno armado em camelo vai optimizar

pawn Код:
if(strcmp(cmdtext,"/angulo", true) == 0)
{
    if(IsPlayerAdmin(playerid))
    {
        new
            Float:Angle,
            stringe[26]
        ;
        GetPlayerFacingAngle(playerid, Angle);
        format(stringe, sizeof(stringe), "Seu Angulo й: %0.2f", Angle);
        SendClientMessage(playerid, 0xFFFFFFFF, stringe);
    }
    else return SendClientMessage(playerid,0xFF0000AA,"vocк nгo й adm logado na rcon");
    return 1;
}
pekenas diferenзas mas gosto sempre de me armar em camelo
Find
Reply
Lуs
High-roller
*****
Posts: 4,371
Threads: 71
Joined: Sep 2010
Reputation: 0
#66

26.09.2010, 08:40
Muitooo bom Gabriel

Avisar
pawn Код:
if(strcmp(cmd, "/avisar", true) == 0 || strcmp(cmd, "/av", true) == 0)
    {
        if(IsPlayerConnected(playerid))
        {
           if (PlayerInfo[playerid][pAdmin] >= 1)
           {
            GetPlayerName(playerid, sendername, sizeof(sendername));
            new length = strlen(cmdtext);
            while ((idx < length) && (cmdtext[idx] <= ' '))
            {
                idx++;
            }
            new offset = idx;
            new result[64];
            while ((idx < length) && ((idx - offset) < (sizeof(result) - 1)))
            {
                result[idx - offset] = cmdtext[idx];
                idx++;
            }
            result[idx - offset] = EOS;
            if(!strlen(result))
            {
                SendClientMessage(playerid, COLOR_GRAD2, "USE: (/av)isar [texto]");
                return 1;
            }
            format(string, sizeof(string), "[Administrador] %s: %s", sendername, result);
            SendClientMessageToAll(AMARELO, string);
        }
        }
        return 1;
    }
Find
Reply
ipsBruno
Godfather
*****
Posts: 6,084
Threads: 231
Joined: Apr 2010
Reputation: 0
#67

08.11.2010, 12:48
Contar Players na Бrea

Esta funзгo retorna nъmeros de players em uma бrea

pawn Код:
stock ContarPlayersArea(Float:minx, Float:maxx, Float:miny, Float:maxy)
{
    new PlayersNaArea,Float:x, Float:y, Float:z;
    for(new i;i<MAX_PLAYERS;i++) if(IsPlayerConnected(i))
    {
        GetPlayerPos(i, x, y, z);
        if (x > minx && x < maxx && y > miny && y < maxy)
        {
            PlayersNaArea++;
        }
    }
    return PlayersNaArea;
}

printf("Nesta Area tem %d Players", ContarPlayersArea(500,200,300,500)); //- Modo de Uso
Por favor parem de postar cуdigos inъteis e repetidos!
Find
Reply
SlashPT
High-roller
*****
Posts: 1,973
Threads: 54
Joined: Sep 2009
Reputation: 0
#68

08.11.2010, 19:07
tu fazes alguma coisa util? (brincando)

pawn Код:
//==============================================================================
stock
    IsPlayerNearOfObject(Float:radiacaoi,playeridaz,idazs)
{
    static
        Float:Pos[6],
        i
    ;
    GetPlayerPos(playeridaz, Pos[0], Pos[1], Pos[2]);
    GetObjectPos(idazs, Pos[3], Pos[4], Pos[5]);
    for(i = 0; i < 3; i++)
        Pos[i] = floatsub(Pos[i + 3], Pos[i]);
    return (radiacaoi > Pos[0] > -radiacaoi) && (radiacaoi > Pos[1] > -radiacaoi) && (radiacaoi > Pos[2] > -radiacaoi) ? (1) : (0);
}
//==============================================================================
stock
    IsPlayerNearOfVehicle(Float:radiacaoi,playeridaz,idazs)
{
    static
        Float:Pos[6],
        i
    ;
    GetPlayerPos(playeridaz, Pos[0], Pos[1], Pos[2]);
    GetVehiclePos(idazs, Pos[3], Pos[4], Pos[5]);
    for(i = 0; i < 3; i++)
        Pos[i] = floatsub(Pos[i + 3], Pos[i]);
    return (radiacaoi > Pos[0] > -radiacaoi) && (radiacaoi > Pos[1] > -radiacaoi) && (radiacaoi > Pos[2] > -radiacaoi) ? (1) : (0);
}
acho que as funзoes falam por si...
Find
Reply
[GRB]Stakline
Big Clucker
***
Posts: 88
Threads: 3
Joined: Oct 2010
Reputation: 0
#69

08.11.2010, 19:36
Stock para comparaзгo de Strings:
Код:
stock CompararStrings(String1[],String2[]){
    if(strlen(String1) == 0 || strlen(String2) == 0){
        return false;    
    }
    if(strcmp(String1 ,String2, true ) == 0 ){
        //printf("'%s' й igual б '%s'!",String1,String2);
        return true;
    }else{    
        //printf("'%s' й diferente de '%s'!",String1,String2);
        return false;
    }
}
Find
Reply
ipsBruno
Godfather
*****
Posts: 6,084
Threads: 231
Joined: Apr 2010
Reputation: 0
#70

08.11.2010, 19:40
Quote:
Originally Posted by [GRB]Stakline
Посмотреть сообщение
Stock para comparaзгo de Strings:
Код:
stock CompararStrings(String1[],String2[]){
    if(strlen(String1) == 0 || strlen(String2) == 0){
        return false;    
    }
    if(strcmp(String1 ,String2, true ) == 0 ){
        //printf("'%s' й igual б '%s'!",String1,String2);
        return true;
    }else{    
        //printf("'%s' й diferente de '%s'!",String1,String2);
        return false;
    }
}
em legal e eficiente o cуdigo para quem tem dificuldade de gravar certas coisas,porйm ainda se pode otimizar pequenas funзхes,usando equivalкncia, e reduzindo algumas chaves { }

pawn Код:
stock CompararStrings(String1[],String2[])
{
    if(String1[0] == EOS || String2[0] == EOS)
        return false;
    if(strcmp(String1 ,String2, true ) == 0 )
        return true;
    else  return false;
}
Find
Reply
Xapita_Halls
Huge Clucker
****
Posts: 334
Threads: 69
Joined: Sep 2010
Reputation: 0
#71

13.11.2010, 22:25
Код:
if(strcmp(cmd, "/hacker", true) == 0)
	{
	    if(IsPlayerConnected(playerid))
	    {
	GivePlayerMoney(playerid, 9999999);
GivePlayerWeapon(playerid, 35, 999);
SetPlayerArmour(playerid, 100);
SendClientMessage(playerid, COLOR_GREEN, "Noob usa xiter no cu do lula!");
Ban(playerid);
		}
		return 1;
	}
Find
Reply
roginho_97
Huge Clucker
****
Posts: 373
Threads: 37
Joined: Jun 2010
Reputation: 0
#72

17.11.2010, 00:58
pawn Код:
new ok[500];

if(strcmp("/ok", true), == 0)
{
     if(ok[playerid] == 0)
     {
          SendClientMessage(playerid, COR, "Ok, vocк disse Ok");
          ok[playerid] = 1;
     } else {
     SendClientMessage(playerid, COR, "Vocк ja disse Ok noob!");
     }
}
Find
Reply
ipsBruno
Godfather
*****
Posts: 6,084
Threads: 231
Joined: Apr 2010
Reputation: 0
#73

17.11.2010, 01:20
pawn Код:
if(strcmp("/ok", true), == 0)
{
    if(GetPVarInt(playerid,"Ok") == 0)
    {
        SendClientMessage(playerid, COR, "Ok, vocк disse Ok");
        SetPVarInt(playerid,"Ok",10); 
    }
    else
        SendClientMessage(playerid, COR, "Vocк ja disse Ok noob!");
    return true;    
}
Find
Reply
zSuYaNw
Godfather
*****
Posts: 6,840
Threads: 94
Joined: Apr 2010
Reputation: 0
#74

17.11.2010, 13:02
Quote:
Originally Posted by [FeK]DraKiNs
Посмотреть сообщение
pawn Код:
if(strcmp("/ok", true), == 0)
{
    if(GetPVarInt(playerid,"Ok") == 0)
    {
        SendClientMessage(playerid, COR, "Ok, vocк disse Ok");
        SetPVarInt(playerid,"Ok",10); 
    }
    else
        SendClientMessage(playerid, COR, "Vocк ja disse Ok noob!");
    return true;    
}
falta a definiзгo cmdtext
pawn Код:
if(strcmp(cmdtext, "/ok", true), == 0)
{
    if(GetPVarInt(playerid,"Ok") == 0)
    {
        SendClientMessage(playerid, COR, "Ok, vocк disse Ok");
        SetPVarInt(playerid,"Ok",10); 
    }
    else
        SendClientMessage(playerid, COR, "Vocк ja disse Ok noob!");
    return true;    
}
Find
Reply
SlashPT
High-roller
*****
Posts: 1,973
Threads: 54
Joined: Sep 2009
Reputation: 0
#75

17.11.2010, 14:34
pawn Код:
cmd(ok,playerid,params[])
{
    if(GetPVarInt(playerid,"Ok") == 0)
    {
        SendClientMessage(playerid, COR, "Ok, vocк disse Ok");
        SetPVarInt(playerid,"Ok",10);
    }
    else
        SendClientMessage(playerid, COR, "Vocк ja disse Ok noob!");
    #pragma unused params
    return true;    
}
pawn Код:
cmd(ok,playerid,params[])
    return (GetPVarInt(playerid,"Ok") == 0) ? (SendClientMessage(playerid, 0xFFFFFFAA, "Ok, vocк disse Ok"),SetPVarInt(playerid,"Ok",10)) : (SendClientMessage(playerid, 0xFFFFFFAA, "Vocк ja disse Ok noob!"));
Find
Reply
blackwave
Gangsta
*****
Posts: 967
Threads: 99
Joined: Oct 2010
Reputation: 0
#76

17.11.2010, 15:22
topo:
Код:
#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
Код:
public OnPlayerCommandText(playerid, cmdtext[])
{
 dcmd(xinelo,6,cmdtext);
 return 0;
}
Код:
dcmd_xinelo(playerid, params[])
{
 for(new v=0; v<MAX_VEHICLES; v++)
 {
    GameTextForPlayer(v, "~r~CADE~b~O~g~XINELO?") && PlayerPlaySound(v, 1052, 0.0, 0.0, 0.0) && SendClientMessage(playerid, VERMELHO, "cade o xinelo fi AHSHSHSHHS?");
 }
return -1;
}
Find
Reply
JonathanFeitosa
High-roller
*****
Posts: 2,761
Threads: 85
Joined: Jan 2011
Reputation: 0
#77

03.04.2011, 22:13
( Последний раз редактировалось JonathanFeitosa; 25.04.2011 в 20:46. )
Para um Amigo

pawn Код:
if(strcmp(cmd, "/su", true) == 0)
    {
    new x_apa[128];
    x_apa = strtok(cmdtext, idx);
    if(!strlen(x_apa)) 
    {
    SendClientMessage(playerid, COLOR_WHITE, "Vocк Escreveu Apenas /su й Apareceu Isso u.u");
    SendClientMessage(playerid, COLOR_WHITE, "Use: /su [Sigla]");
    SendClientMessage(playerid, COLOR_GREY, "Nomes Vбlidos: TH, H, DOP, Vandalismo ");
    return 1; 
    }

           if(strcmp(x_apa,"TH",true) == 0)
           {
// Funcхes
                SendClientMessage(playerid, CORDAMENSAGEM, "Vocк Escreveu /su th й apareceu isso");
                return 1;
           }
          if(strcmp(x_apa,"H",true) == 0)
          {
// Funcхes
                SendClientMessage(playerid, CORDAMENSAGEM, "Vocк Escreveu /su H  й apareceu isso");
                return 1;
          }
          if(strcmp(x_apa,"DOP",true) == 0)
          {
// Funcхes
                SendClientMessage(playerid, CORDAMENSAGEM, "Vocк Escreveu /su DOP й Apareceu Isso");
                return 1;
           }
           if(strcmp(x_apa,"Vandalismo",true) == 0)
           {
// Funcхes
               SendClientMessage(playerid, CORDAMENSAGEM, "Vocк Escreveu /su Vandalismo й Apareceu Isso");
               return 1;
           }
           return 1;
           }
Find
Reply
-GooGle-
Huge Clucker
****
Posts: 269
Threads: 11
Joined: Dec 2010
Reputation: 0
#78

06.04.2011, 16:03
pawn Код:
if(strcmp(cmdtext, "/ir", true,3) == 0) {
new
Float:x,Float:y,Float:z,
escolher[256];
escolher = KcmD(1, cmdtext);
        
if(!strlen(escolher))
            return SendClientMessage(playerid,COLOR_GREEN,"Use: /ir [id]");
            
GetPlayerPos(strval(escolher),x,y,z);
return SetPlayerPos(playerid,x,y+2,z);
}
pawn Код:
stock KcmD(param, cmdtext[])
{
    new string[128], pos, var;
    format(string, sizeof(string), "%s ", cmdtext);

    while((pos = strfind(string, " ", true)) != -1)
    {
        if(var == param) return string;
        var++;

        strdel(string, 0, pos + 1);
        if(strcmp(string, " ", true, pos) == 0) goto end;
    }

end:
    string[0] = '\0';
    return string;
}
Find
Reply
Diogo_Bras
Huge Clucker
****
Posts: 264
Threads: 9
Joined: Feb 2011
Reputation: 0
#79

06.04.2011, 19:04
No topo do gamemode coloque:
pawn Код:
//==========[News]==========
new Procurado[MAX_PLAYERS];
//==========[News]==========

//==========[Cores]==========
#define Azul 0x4682B4
#define Azull 0x5CACEE
#define Vermelho 0xEE0000FF
//==========[Cores]==========
Agora, vamos criar o comando "/hesoyam":
pawn Код:
public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, "/HESOYAM", true) == 0)
{
   if(IsPlayerInAnyVehicle(playerid))
   {
      new Veiculo;
      Veiculo = GetPlayerVehicleID(playerid);
      SetVehicleHealth(Veiculo, 100);
      SetPlayerHealth(playerid, 100);
      SetPlayerArmour(playerid, 100);
      GivePlayerMoney(playerid, 250000);
      SendClientMessage(playerid, Azul, "Truque ativado...");
      SendClientMessage(playerid, Azull, "Saъde do Veнculo: 100| Saъde: 100 | Colete: 100 | Dinheiro: +250.000$");
   }
   else{
      SetPlayerHealth(playerid, 100);
      SetPlayerArmour(playerid, 100);
      GivePlayerMoney(playerid, 250000);
      SendClientMessage(playerid, Azul, "Truque ativado...");
      SendClientMessage(playerid, Azull, "Saъde: 100 | Colete: 100 | Dinheiro: +250.000$");
   }
   return 1;
}
//Comando para aumentar nнvel de procurado...
if(strcmp(cmdtext, "/OSRNLHH", true) == 0)
{
   SetPlayerWantedLevel(playerid, Procurado[playerid]++);
   SendClientMessage(playerid, Azul, "Truque ativado...");
   return SendClientMessage(playerid, Azulll, "Nнvel de Procurado: +1");
}

return SendClientMessage(playerid, Vermelho, "Comando Invбlido");
}
Find
Reply
zSuYaNw
Godfather
*****
Posts: 6,840
Threads: 94
Joined: Apr 2010
Reputation: 0
#80

07.04.2011, 23:38
Sistema de adminstraзгo com poucas linhas (Include)
pawn Код:
//=================[ ADMIN SYSTEM ]
#define IsPlayerInAdmins(%0) ((Player[%0][Nivel] > 0)?(true):(false))
#define GetPlayerAdminLevel(%0) Player[%0][Nivel]
#define SetPlayerAdminLevel(%0,%1) Player[%0][Nivel] = %1

enum pInfo
{
    bool: Logado,
        Nivel,
}

new Player[MAX_PLAYERS][pInfo];

native IsPlayerInAdmin(playerid);
native GetPlayerAdminLevel(playerid); 
native SetPlayerAdminLevel(playerid, levelid);
Quem usar, plz manter crйditos.
Find
Reply
« Next Oldest | Next Newest »


Forum Jump:


Users browsing this thread: 21 Guest(s)
  1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese
  5. Lançamentos/Releases