SA-MP Forums Archive
[Include] [INC]Barres - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+----- Forum: Lançamentos/Releases (https://sampforum.blast.hk/forumdisplay.php?fid=56)
+----- Thread: [Include] [INC]Barres (/showthread.php?tid=156849)


[INC]Barres - Leo Nikov - 24.06.2010

olб galera venho aqui lanзar meu primeiro INC.
Temos 4 comandos +-
seguinte:
pawn Код:
CreateBarres criar uma barreira
DeleteAllBarres deleta todas as barreiras
CreateStrip criar um barreira no chгo de espinhos
DeleteAllStrip deleta todas as barreiras de espinhos
Download
Como Usar:
pawn Код:
#include <a_samp>
#include <Barres>
#define Cor_Barreira   0x009493FF
#define Cor_BarreiraToAll 0xEDA838FF
#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[])
{
  new cmd[256];
  if (strcmp(cmd,"/br",true) == 0)
    {
      new Float:plocx,Float:plocy,Float:plocz,Float:ploca;
    GetPlayerPos(playerid, plocx, plocy, plocz);
    GetPlayerFacingAngle(playerid,ploca);
    CreateStrip(plocx,plocy,plocz,ploca);
    SendClientMessage(playerid, Cor_Barreira, "Vocк colocou uma barreira de espinhos.");
    SendClientMessage(playerid, Cor_Barreira, "Para remover (/rbr).");
    SendClientMessage(playerid, Cor_Barreira, "(/rbr) removerar todas as barreiras de espinhos.");
    new string[128];
    new pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,"%s Colocou uma barreira de espinhos!",pName);
    SendClientMessageToAll(Cor_BarreiraToAll,string);
    return 1;
    }
    else if (strcmp(cmd,"/rbr",true) == 0)
    {
    DeleteAllStrip();
    SendClientMessage(playerid, Cor_Barreira, "Vocк removeu todas as barreiras de espinhos.");
    new string[128];
    new pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,"%s Retirou todas as barreiras de espinhos!",pName);
    SendClientMessageToAll(Cor_BarreiraToAll,string);
    return 1;
    }
  if (strcmp(cmd,"/br2",true) == 0)
    {
      new Float:plocx,Float:plocy,Float:plocz,Float:ploca;
    GetPlayerPos(playerid, plocx, plocy, plocz);
    GetPlayerFacingAngle(playerid,ploca);
    CreateBarres(plocx,plocy,plocz,ploca);
    SetPlayerPos(playerid, plocx, plocy, plocz+4);
    SendClientMessage(playerid, Cor_Barreira, "Vocк colocou uma barreira.");
    SendClientMessage(playerid, Cor_Barreira, "Para remover (/rbr2).");
    SendClientMessage(playerid, Cor_Barreira, "(/rbr2) removerar todas as barreira.");
    new string[128];
    new pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,"%s Colocou uma barreira!",pName);
    SendClientMessageToAll(Cor_BarreiraToAll,string);
    return 1;
    }
    else if (strcmp(cmd,"/rbr2",true) == 0)
    {
    DeleteAllBarres();
    SendClientMessage(playerid, Cor_Barreira, "Vocк removeu todas as barreiras.");
    new string[128];
    new pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,"%s Retirou todas as barreiras!",pName);
    SendClientMessageToAll(Cor_BarreiraToAll,string);
    return 1;
    }
  else if (strcmp(cmd,"/rtbr",true) == 0)
    {
    DeleteAllBarres();
    DeleteAllStrip();
    SendClientMessage(playerid, Cor_Barreira, "Vocк removeu todas as barreiras, e barreiras de espinhos!.");
    new string[128];
    new pName[MAX_PLAYER_NAME];
    GetPlayerName(playerid,pName,MAX_PLAYER_NAME);
    format(string,sizeof string,"%s Retirou todas as barreiras, e barreiras de espinhos!",pName);
    SendClientMessageToAll(Cor_BarreiraToAll,string);
    return 1;
  }

  return 0;
}
Problemas post aqui eu te ajudo

Re: [INC]Barres - Caio_Cartaxo - 24.06.2010

Muito bom e ultil

Re: [INC]Barres - ipsBruno - 24.06.2010



Re: [INC]Barres - Leo Nikov - 24.06.2010

Quote:
Originally Posted by DraKoNeoN
VLW VLw aos 2

Re: [INC]Barres - russo666 - 24.06.2010

Uma INC com comandos... Hmm.

Altera isso para FS, e jб agora parabйns!

Re: [INC]Barres - zSuYaNw - 24.06.2010

Parabйns, Util para Sever RpG ou RP

Re: [INC]Barres - SuB_ZeRo0_ - 24.06.2010

Quote:
Originally Posted by russooooo
Uma INC com comandos... Hmm.

Altera isso para FS, e jб agora parabйns!
Deixa Include mesmo, nгo й necessбrio se deixar como FS.

Re: [INC]Barres - Leo Nikov - 24.06.2010

Brigadгo a todos e vllw pelos apoio sugestхes e elogios e um INC so dei um exemplo de como usar .

Re: [INC]Barres - [NWD]Tweener_ - 25.06.2010

Quote:
Originally Posted by SuB_ZeRo0_
Quote:
Originally Posted by russooooo
Uma INC com comandos... Hmm.

Altera isso para FS, e jб agora parabйns!
Deixa Include mesmo, nгo й necessбrio se deixar como FS.
@OFFTOPIC

SuB, quando esse sistema de admin vai vir para nуs do fуrum?

Apesar de jб ter um do meu servidor, queria ver como ele й.

Re: [INC]Barres - Andrevic - 08.09.2010

Oi. Estб dando erro na Hora de compilar..

Jб coloquei a include e talz..

<code>
Код:
Compilando new.pwn...
C:\Documents and Settings\User\Desktop\serverbrasilrp^^\ServerBrasilrp\pawno\new.pwn(2) : fatal error 100: cannot read from file: "Barres"

Compilation aborted.Pawn compiler 3.2.3664                          Copyright © 1997-2006, ITB CompuPhase


1 Error.
</code>
Favor ajudar ^^
lб vai as linhas..

<code>
Код:
#include <a_samp>
#include <Barres>
#define Cor_Barreira   0x009493FF
#define Cor_BarreiraToAll 0xEDA838FF
#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
new <Barres>
public OnPlayerCommandText(playerid, cmdtext[])
</code>