SA-MP Forums

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

Reply
 
Thread Tools Display Modes
Old 28/04/2010, 09:47 PM   #1
Ambrósio
Huge Clucker
 
Ambrósio's Avatar
 
Join Date: Dec 2009
Location: Foz do Iguaçu - Brasil
Posts: 447
Reputation: 20
Default Códigos Úteis #1

●● Códigos Úteis ●●

Você tem algum pequeno Script e quer compartilhar? Aqui é o lugar.

Crio esse Tópico com o intúito de diminuir tópicos com pequenos Scripts que as vezes são considerados pelos criadores como TUT ou as vezes FS e também, claro, para ajudar todos.

Sempre que for postar um código, coloque uma descrição do Script, e por favor use:

Quote:
[pawn*] SCRIPT [/pawn]
Peço que não façam post's para agradecer ou upar Scripts, a não ser que você agradeça e logo após, no mesmo post, coloque um Script.

Enjoy Kids
__________________

Last edited by Ambrósio; 01/01/2011 at 11:30 AM.
Ambrósio is offline   Reply With Quote
Old 28/04/2010, 09:55 PM   #2
ipsBruno
Godfather
 
ipsBruno's Avatar
 
Join Date: Apr 2010
Location: Brazil, Caxias RS
Posts: 6,084
Reputation: 546
Default Re: ●● Códigos Úteis ●●

Enviar Mensagem ao Player
pawn Code:
if(strcmp(cmd, "/ambrosio", true) == 0) //-- Comando
    {
        SendClientMessage(playerid,COR,"MENSAGEM "); //MSG
        SendClientMessage(playerid,COR,"MELHOR TOPICO EU AMO O AMBROSIO rs"); //MSG
        return 1;
    }

Animações
pawn Code:
//---------------------ANIMAÇÕES---------------------------------------------
if(strcmp("/renderse", cmd, true) == 0)
{
SetPlayerSpecialAction(playerid, 10);
return 1;
}
if(strcmp("/ligar", cmd, true) == 0)
{
SetPlayerSpecialAction(playerid, 11);
return 1;
}
if(strcmp("/desligar", cmd, true) == 0)
{
SetPlayerSpecialAction(playerid, 13);
return 1;
}
if(strcmp("/bebado", cmd, true) == 0)
{
ApplyAnimation(playerid, "PED", "WALK_DRUNK", 4.0, 1, 1, 1, 1, 0);
return 1;
}
if(strcmp("/bomba", cmd, true) == 0)
{
ClearAnimations(playerid);
ApplyAnimation(playerid, "BOMBER", "BOM_Plant", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/apontar", cmd, true) == 0)
{
ApplyAnimation(playerid, "ped", "ARRESTgun", 4.0, 0, 1, 1, 1, -1);
return 1;
}
if(strcmp("/merda", cmd, true) == 0)
{
ApplyAnimation(playerid, "RAPPING", "Laugh_01", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/mascararse", cmd, true) == 0)
{
ApplyAnimation(playerid, "SHOP", "ROB_Shifty", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/roubar", cmd, true) == 0)
{
ApplyAnimation(playerid, "SHOP", "ROB_Loop_Threat", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/cruzarb", cmd, true) == 0)
{
ApplyAnimation(playerid, "COP_AMBIENT", "Coplook_loop", 4.0, 0, 1, 1, 1, -1);
return 1;
}
if(strcmp("/deitar", cmd, true) == 0)
{
ApplyAnimation(playerid, "BEACH", "bather", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/abaixar", cmd, true) == 0)
{
ApplyAnimation(playerid, "ped", "cower", 3.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/vomitar", cmd, true) == 0)
{
ApplyAnimation(playerid, "FOOD", "EAT_Vomit_P", 3.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/comer", cmd, true) == 0)
{
ApplyAnimation(playerid, "FOOD", "EAT_Burger", 3.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/rap", cmd, true) == 0)
{
ApplyAnimation(playerid, "ON_LOOKERS", "wave_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/passaramao", cmd, true) == 0)
{
ApplyAnimation(playerid, "SWEET", "sweet_ass_slap", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/cobrar", cmd, true) == 0)
{
ApplyAnimation(playerid, "DEALER", "DEALER_DEAL", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/overdose", cmd, true) == 0)
{
ApplyAnimation(playerid, "CRACK", "crckdeth2", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/fumar", cmd, true) == 0)
{
ApplyAnimation(playerid, "SMOKING", "M_smklean_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/fumar2", cmd, true) == 0)
{
ApplyAnimation(playerid, "SMOKING", "F_smklean_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/sentar", cmd, true) == 0)
{
ApplyAnimation(playerid, "BEACH", "ParkSit_M_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/conversar", cmd, true) == 0)
{
ApplyAnimation(playerid, "PED", "IDLE_CHAT", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/fodase", cmd, true) == 0)
{
ApplyAnimation(playerid, "PED", "fucku", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/taichi", cmd, true) == 0)
{
ApplyAnimation(playerid, "PARK", "Tai_Chi_Loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/observar", cmd, true) == 0)
{
ApplyAnimation(playerid, "BAR", "dnk_stndF_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
//---------------------Lista Animações------------------------------------
if(strcmp("/animes", cmd, true) == 0)
{
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "[DraKoN's Server]:Lista de Animes :");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/renderse /ligar /desligar /bebado /bomba /apontar /merda /mascararse");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/roubar /cruzarb /deitar /abaixar /vomitar /comer /rap /passaramao");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/cobrar /overdose /fumar /fumar2 /sentar /conversar /fodase /taichi");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/observar ");
return 1;
}

Suicidio
pawn Code:
if(strcmp("/kill", cmd, true) == 0)
{
SetPlayerHealth(playerid, 0);
SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Voce Se Matou!");
return 1;
}

Reparar Carro
pawn Code:
//-------------------------------------------------------------------------
if(strcmp("/reparar", cmd, true) == 0)
{
SetVehicleHealth(playerid,100);
SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Carro Reparado");
return 1;
}
//-------------------------------------------------------------------------

Nick Off
pawn Code:
if (strcmp("/nickoff", cmd, true) == 0)
{
for(new i = 0; i < MAX_PLAYERS; i++) ShowPlayerNameTagForPlayer(playerid, i, false);
GameTextForPlayer(playerid, "~W~Nicks Desativos ~R~off", 5000, 5);
return 1;
}
Nick ON
pawn Code:
if (strcmp("/nickon", cmd, true) == 0)
{
for(new i = 0; i < MAX_PLAYERS; i++) ShowPlayerNameTagForPlayer(playerid, i, true);
GameTextForPlayer(playerid, "~W~Nicks Ativos ~R~", 5000, 5);
return 1;
}
Comando Procurar Bots
pawn Code:
if(strcmp(cmd, "/bots", true) == 0)
{
SendClientMessage(playerid,AMARELO,"[DrK] Procurando Bots...");

for(new i=0; i < MAX_PLAYERS; i++)
{
if(IsPlayerConnected(i))
{
new ip[16];
GetPlayerIp(playerid, ip, sizeof(ip));
if(strcmp(ip, "255.255.255.255") == 0)
{
format(string,256,"[DrK] Bot Detectado! IP: %d",ip);
SendClientMessageToAll(LARANJA,string);
Kick(playerid);
return 0;
}
}
}
return 1;
}

Defines Algumas Cores
pawn Code:
//*********************Cores****************************************************
#define LARANJA     0xFF8C00AA
#define VERDE      0x33AA33AA
#define AMARELO     0xFFFF00AA
#define COLOR      0xFF0000AA
#define AZUL      0x33CCFFAA
#define AAZUL      0x2641FEAA

Level de Procurado + Score ao Matar

pawn Code:
//******************************************************************************
public OnPlayerDeath(playerid, killerid, reason)
{
    SetPlayerWantedLevel(killerid, 1);
    SetPlayerWantedLevel(playerid, 0);
    SetPlayerScore(killerid, GetPlayerScore(playerid) + 1);
    SetPlayerScore(playerid, GetPlayerScore(playerid) - 1);
    SendClientMessage(playerid,LARANJA,"Você morreu, perdeu 1 de Score, Digite /top.");
    SendClientMessage(killerid, AZUL, "Você matou e ganho 1 de Score, Digite /top.");
}


//******************************************************************************

Admins Onlines
pawn Code:
//-----------------------------Admins Online--------------------------
if(strcmp(cmdtext, "/admins", true) == 0){
new Jogador[24];
new count = 0;
new msg[120];
new ListaAdmins[128];
for(new i=0; i<MAX_PLAYERS; i++){
if(IsPlayerConnected(i) && IsPlayerAdmin(i)){
GetPlayerName(i,Jogador,24);
format(msg,sizeof(msg),"Admins Online's: %s", Jogador);
SendClientMessage(playerid, 0x000FFFAA, msg);
count++;
}
}
if(count >= 0){
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "Admins Off");
dini_IntSet (ListaAdmins, "Admins", 1);
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, ListaAdmins);
}
return 1;
}

//------------------------------------------------------------------------------

/Favela: ir a favela

pawn Code:
//-------------------------------------------------------------------------
if(strcmp("/favelatraficante", cmd, true) == 0)
{
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"/favelatraficante: para entrar ao trafico");
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"/favelapolicial: para entra na policia");
return 1;
}
if(strcmp("/favelatraficante", cmd, true) == 0)
{
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"Bem Vindo a Favela");
SetPlayerPos(playerid,2237.6868,-1079.4060,41.6102);
SetPlayerSkin(playerid, 268);
ResetPlayerWeapons(0);
GivePlayerWeapon(playerid, 26, 9999);
GivePlayerWeapon(playerid, 24, 9999);
GivePlayerWeapon(playerid, 31, 9999);
GivePlayerWeapon(playerid, 32, 9999);
return 1;
}
//-------------------------------------------------------------------------
if(strcmp("/favelapolicial", cmd, true) == 0)
{
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"Bem Vindo a Favela");
SetPlayerPos(playerid,2237.6868,-1079.4060,41.6102);
SetPlayerSkin(playerid, 281);
ResetPlayerWeapons(0);
GivePlayerWeapon(playerid, 26, 9999);
GivePlayerWeapon(playerid, 24, 9999);
GivePlayerWeapon(playerid, 31, 9999);
GivePlayerWeapon(playerid, 32, 9999);
return 1;
}
Comando Idiota
pawn Code:
if (strcmp("/comando", cmdtext, true, 10) == 0)
{
SendClientMessage(playerid, 0xFF6347AA, "Eu Também Sei Criar Comandos Idiotas");
GivePlayerMoney(playerid, 1);
return 1;
}
My Userbars
__________________
https://github.com/ipsBruno

Last edited by ipsBruno; 10/10/2013 at 08:39 PM.
ipsBruno is offline   Reply With Quote
Old 14/10/2012, 02:26 AM   #3
Sonik_Paintballer
Big Clucker
 
Join Date: Sep 2012
Posts: 54
Reputation: 0
Default Re: ●● Códigos Úteis ●●

Quote:
Originally Posted by ipsBruno View Post
Ah Te Amooooooo,,,


Enviar Mensagem ao Player
pawn Code:
if(strcmp(cmd, "/ambrosio", true) == 0) //-- Comando
    {
        SendClientMessage(playerid,COR,"MENSAGEM "); //MSG
        SendClientMessage(playerid,COR,"MELHOR TOPICO EU AMO O AMBROSIO rs"); //MSG
        return 1;
    }

Animações
pawn Code:
//---------------------ANIMAÇÕES---------------------------------------------
if(strcmp("/renderse", cmd, true) == 0)
{
SetPlayerSpecialAction(playerid, 10);
return 1;
}
if(strcmp("/ligar", cmd, true) == 0)
{
SetPlayerSpecialAction(playerid, 11);
return 1;
}
if(strcmp("/desligar", cmd, true) == 0)
{
SetPlayerSpecialAction(playerid, 13);
return 1;
}
if(strcmp("/bebado", cmd, true) == 0)
{
ApplyAnimation(playerid, "PED", "WALK_DRUNK", 4.0, 1, 1, 1, 1, 0);
return 1;
}
if(strcmp("/bomba", cmd, true) == 0)
{
ClearAnimations(playerid);
ApplyAnimation(playerid, "BOMBER", "BOM_Plant", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/apontar", cmd, true) == 0)
{
ApplyAnimation(playerid, "ped", "ARRESTgun", 4.0, 0, 1, 1, 1, -1);
return 1;
}
if(strcmp("/merda", cmd, true) == 0)
{
ApplyAnimation(playerid, "RAPPING", "Laugh_01", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/mascararse", cmd, true) == 0)
{
ApplyAnimation(playerid, "SHOP", "ROB_Shifty", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/roubar", cmd, true) == 0)
{
ApplyAnimation(playerid, "SHOP", "ROB_Loop_Threat", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/cruzarb", cmd, true) == 0)
{
ApplyAnimation(playerid, "COP_AMBIENT", "Coplook_loop", 4.0, 0, 1, 1, 1, -1);
return 1;
}
if(strcmp("/deitar", cmd, true) == 0)
{
ApplyAnimation(playerid, "BEACH", "bather", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/abaixar", cmd, true) == 0)
{
ApplyAnimation(playerid, "ped", "cower", 3.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/vomitar", cmd, true) == 0)
{
ApplyAnimation(playerid, "FOOD", "EAT_Vomit_P", 3.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/comer", cmd, true) == 0)
{
ApplyAnimation(playerid, "FOOD", "EAT_Burger", 3.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/rap", cmd, true) == 0)
{
ApplyAnimation(playerid, "ON_LOOKERS", "wave_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/passaramao", cmd, true) == 0)
{
ApplyAnimation(playerid, "SWEET", "sweet_ass_slap", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/cobrar", cmd, true) == 0)
{
ApplyAnimation(playerid, "DEALER", "DEALER_DEAL", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/overdose", cmd, true) == 0)
{
ApplyAnimation(playerid, "CRACK", "crckdeth2", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/fumar", cmd, true) == 0)
{
ApplyAnimation(playerid, "SMOKING", "M_smklean_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/fumar2", cmd, true) == 0)
{
ApplyAnimation(playerid, "SMOKING", "F_smklean_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/sentar", cmd, true) == 0)
{
ApplyAnimation(playerid, "BEACH", "ParkSit_M_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/conversar", cmd, true) == 0)
{
ApplyAnimation(playerid, "PED", "IDLE_CHAT", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/fodase", cmd, true) == 0)
{
ApplyAnimation(playerid, "PED", "fucku", 4.0, 0, 0, 0, 0, 0);
return 1;
}
if(strcmp("/taichi", cmd, true) == 0)
{
ApplyAnimation(playerid, "PARK", "Tai_Chi_Loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
if(strcmp("/observar", cmd, true) == 0)
{
ApplyAnimation(playerid, "BAR", "dnk_stndF_loop", 4.0, 1, 0, 0, 0, 0);
return 1;
}
//---------------------Lista Animações------------------------------------
if(strcmp("/animes", cmd, true) == 0)
{
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "[DraKoN's Server]:Lista de Animes :");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/renderse /ligar /desligar /bebado /bomba /apontar /merda /mascararse");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/roubar /cruzarb /deitar /abaixar /vomitar /comer /rap /passaramao");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/cobrar /overdose /fumar /fumar2 /sentar /conversar /fodase /taichi");
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "/observar ");
return 1;
}

Suicidio
pawn Code:
if(strcmp("/kill", cmd, true) == 0)
{
SetPlayerHealth(playerid, 0);
SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Voce Se Matou!");
return 1;
}

Reparar Carro
pawn Code:
//-------------------------------------------------------------------------
if(strcmp("/reparar", cmd, true) == 0)
{
SetVehicleHealth(playerid,100);
SendClientMessage(playerid,ADMINFS_MESSAGE_COLOR,"Carro Reparado");
return 1;
}
//-------------------------------------------------------------------------

Nick Off
pawn Code:
if (strcmp("/nickoff", cmd, true) == 0)
{
for(new i = 0; i < MAX_PLAYERS; i++) ShowPlayerNameTagForPlayer(playerid, i, false);
GameTextForPlayer(playerid, "~W~Nicks Desativos ~R~off", 5000, 5);
return 1;
}
Nick ON
pawn Code:
if (strcmp("/nickon", cmd, true) == 0)
{
for(new i = 0; i < MAX_PLAYERS; i++) ShowPlayerNameTagForPlayer(playerid, i, true);
GameTextForPlayer(playerid, "~W~Nicks Ativos ~R~", 5000, 5);
return 1;
}
Comando Procurar Bots
pawn Code:
if(strcmp(cmd, "/bots", true) == 0)
{
SendClientMessage(playerid,AMARELO,"[DrK] Procurando Bots...");

for(new i=0; i < MAX_PLAYERS; i++)
{
if(IsPlayerConnected(i))
{
new ip[16];
GetPlayerIp(playerid, ip, sizeof(ip));
if(strcmp(ip, "255.255.255.255") == 0)
{
format(string,256,"[DrK] Bot Detectado! IP: %d",ip);
SendClientMessageToAll(LARANJA,string);
Kick(playerid);
return 0;
}
}
}
return 1;
}

Defines Algumas Cores
pawn Code:
//*********************Cores****************************************************
#define LARANJA     0xFF8C00AA
#define VERDE      0x33AA33AA
#define AMARELO     0xFFFF00AA
#define COLOR      0xFF0000AA
#define AZUL      0x33CCFFAA
#define AAZUL      0x2641FEAA

Level de Procurado + Score ao Matar

pawn Code:
//******************************************************************************
public OnPlayerDeath(playerid, killerid, reason)
{
    SetPlayerWantedLevel(killerid, 1);
    SetPlayerWantedLevel(playerid, 0);
    SetPlayerScore(killerid, GetPlayerScore(playerid) + 1);
    SetPlayerScore(playerid, GetPlayerScore(playerid) - 1);
    SendClientMessage(playerid,LARANJA,"Você morreu, perdeu 1 de Score, Digite /top.");
    SendClientMessage(killerid, AZUL, "Você matou e ganho 1 de Score, Digite /top.");
}


//******************************************************************************

Admins Onlines
pawn Code:
//-----------------------------Admins Online--------------------------
if(strcmp(cmdtext, "/admins", true) == 0){
new Jogador[24];
new count = 0;
new msg[120];
new ListaAdmins[128];
for(new i=0; i<MAX_PLAYERS; i++){
if(IsPlayerConnected(i) && IsPlayerAdmin(i)){
GetPlayerName(i,Jogador,24);
format(msg,sizeof(msg),"Admins Online's: %s", Jogador);
SendClientMessage(playerid, 0x000FFFAA, msg);
count++;
}
}
if(count >= 0){
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, "Admins Off");
dini_IntSet (ListaAdmins, "Admins", 1);
SendClientMessage(playerid, ADMINFS_MESSAGE_COLOR, ListaAdmins);
}
return 1;
}

//------------------------------------------------------------------------------

/Favela: ir a favela

pawn Code:
//-------------------------------------------------------------------------
if(strcmp("/favelatraficante", cmd, true) == 0)
{
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"/favelatraficante: para entrar ao trafico");
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"/favelapolicial: para entra na policia");
return 1;
}
if(strcmp("/favelatraficante", cmd, true) == 0)
{
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"Bem Vindo a Favela");
SetPlayerPos(playerid,2237.6868,-1079.4060,41.6102);
SetPlayerSkin(playerid, 268);
ResetPlayerWeapons(0);
GivePlayerWeapon(playerid, 26, 9999);
GivePlayerWeapon(playerid, 24, 9999);
GivePlayerWeapon(playerid, 31, 9999);
GivePlayerWeapon(playerid, 32, 9999);
return 1;
}
//-------------------------------------------------------------------------
if(strcmp("/favelapolicial", cmd, true) == 0)
{
SendClientMessage(playerid,PM_OUTGOING_COLOR ,"Bem Vindo a Favela");
SetPlayerPos(playerid,2237.6868,-1079.4060,41.6102);
SetPlayerSkin(playerid, 281);
ResetPlayerWeapons(0);
GivePlayerWeapon(playerid, 26, 9999);
GivePlayerWeapon(playerid, 24, 9999);
GivePlayerWeapon(playerid, 31, 9999);
GivePlayerWeapon(playerid, 32, 9999);
return 1;
}
Comando Idiota
pawn Code:
if (strcmp("/comando", cmdtext, true, 10) == 0)
{
SendClientMessage(playerid, 0xFF6347AA, "Eu Também Sei Criar Comandos Idiotas");
GivePlayerMoney(playerid, 1);
return 1;
}
My Userbars
apenas um aviso no seu comando de reparar o carro ^.^ os veiculos pra fica com 100 de vida tem q bota 1000 kkk se vc bota 100 vc vai ta dando 10 de vida pro carro,ai...fufu xD
Sonik_Paintballer is offline   Reply With Quote
Old 14/10/2012, 07:37 AM   #4
ipsBruno
Godfather
 
ipsBruno's Avatar
 
Join Date: Apr 2010
Location: Brazil, Caxias RS
Posts: 6,084
Reputation: 546
Default Respuesta: Códigos Úteis #1

Quote:
Originally Posted by Sonik_Paintballer View Post
apenas um aviso no seu comando de reparar o carro ^.^ os veiculos pra fica com 100 de vida tem q bota 1000 kkk se vc bota 100 vc vai ta dando 10 de vida pro carro,ai...fufu xD

Se botar 100 vai ficar 10? Foda-se



Quote:
Garfiel não recomendo ninguém a usar isto. imagina isso pra pegar uma string completa.
sscanf fará dezenas de comparações na entrada "strng" que realmente será mais lenta que o "getParam" do Garfield. Recomendo usar isto.


Mas enfim, o código pode ser muito melhorado de qualquer maneira


PHP Code:

new ateCaractere[] = "," // usando virgulas 
new strng[] = "bla,ble,bli,blo,blu";  // string que vamos retirar 

new ateNumero 2    ;  // pegar após 0,1,2 virgulas. Ou seja "BLO" 

new string[0xff];  // string para colocar a parte retirada

static i;  // variável para fazer loop com strfind


while  (  (strfindstrngateCaracteretrue, ( ) ) ) != -) {  // ir procurando por "," virgulas

    
if( ! ateNumero  ) {  // caso as virgulas que deveriam ser achadas, chegarem a "zero". Achou as virgulas que deveria, então vamos cortar a strng

        
ateNumero   strfindstrngateCaracteretrue, ( ));  // pega a próxima virgula para cortar

        
if(  ateNumero    == -1) {  // caso não achou uma próxima virgula
            
ateNumero    strlen(strng);  // colocar o ponteiro para o final da strng
                        // isso ocorre por exemplo se fosse: "bla,ble,bli,blo" daí não teria virgula após o "blo"
        


        
strmid(stringstrng, (1), ateNumero); // cortar a strng da primeira virgula até a ultima e passar para a nova "string"  
    


    
ateNumero  -- ;      // quando encontra uma, diminui o número de virgulas para achar


print(string); 
// "BLO" 
Veja a lógica, só criar uma função agora

Funciona, e é bem otimizado. Só faz ago


__________________
https://github.com/ipsBruno
ipsBruno is offline   Reply With Quote
Old 14/10/2012, 07:45 PM   #5
zSuYaNw
Godfather
 
zSuYaNw's Avatar
 
Join Date: Apr 2010
Location: Santa Catarina
Posts: 6,840
Reputation: 672
Default Re: Respuesta: Códigos Úteis #1

Quote:
Originally Posted by ipsBruno View Post
Se botar 100 vai ficar 10? Foda-se





sscanf fará dezenas de comparações na entrada "strng" que realmente será mais lenta que o "getParam" do Garfield. Recomendo usar isto.


Mas enfim, o código pode ser muito melhorado de qualquer maneira


PHP Code:

new ateCaractere[] = "," // usando virgulas 
new strng[] = "bla,ble,bli,blo,blu";  // string que vamos retirar 

new ateNumero 2    ;  // pegar após 0,1,2 virgulas. Ou seja "BLO" 

new string[0xff];  // string para colocar a parte retirada

static i;  // variável para fazer loop com strfind


while  (  (strfindstrngateCaracteretrue, ( ) ) ) != -) {  // ir procurando por "," virgulas

    
if( ! ateNumero  ) {  // caso as virgulas que deveriam ser achadas, chegarem a "zero". Achou as virgulas que deveria, então vamos cortar a strng

        
ateNumero   strfindstrngateCaracteretrue, ( ));  // pega a próxima virgula para cortar

        
if(  ateNumero    == -1) {  // caso não achou uma próxima virgula
            
ateNumero    strlen(strng);  // colocar o ponteiro para o final da strng
                        // isso ocorre por exemplo se fosse: "bla,ble,bli,blo" daí não teria virgula após o "blo"
        


        
strmid(stringstrng, (1), ateNumero); // cortar a strng da primeira virgula até a ultima e passar para a nova "string"  
    


    
ateNumero  -- ;      // quando encontra uma, diminui o número de virgulas para achar


print(string); 
// "BLO" 
Veja a lógica, só criar uma função agora

Funciona, e é bem otimizado. Só faz ago


Estou editando minha função, depois eu atualizo

Pegar informações do servidor via php
PHP Code:
<?php
    $HostName     
"";
    
$GameMode    "";
    
$Map        "";
    
$Ping        "";
    
$PlayersOn    "";
    
$MaxPlayers "";
    
$Senha        0;
    
    
$IP_Servidor     "64.251.25.191";
    
$Porta_Servidor "26000";
    
    
$fp fsockopen('udp://' $IP_Servidor$Porta_Servidor$errno$errstr,0.0);
    if (!
$fp)
    {
        echo 
" offline";
    }
    else
    {
        
$packet 'SAMP';
        
$packet .= chr(strtok($IP_Servidor'.'));
        
$packet .= chr(strtok('.'));
        
$packet .= chr(strtok('.'));
        
$packet .= chr(strtok('.'));
        
$packet .= chr($Porta_Servidor 0xFF);
        
$packet .= chr($Porta_Servidor >> 0xFF);

        
fwrite($fp$packet.'i');
        
fread($fp11);

        
$Senha          ord(fread($fp1));
        
$PlayersOn      ord(fread($fp2));
        
$MaxPlayers     ord(fread($fp2));
        
$strlen         ord(fread($fp4));
        
$HostName       htmlentities(fread($fp$strlen));
        
$strlen         ord(fread($fp4));
        
$GameMode       htmlentities(fread($fp$strlen));
        
$strlen         ord(fread($fp4));
        
$Map            htmlentities(fread($fp$strlen));
        
$Ping             GetPing($IP_Servidor);//exec("ping ping -n 3 -l 64 $IP_Servidor ");
    
        
fwrite($fp$packet.'c');
        
fread($fp11);
        
fclose($fp);
    }
    
    function 
GetPing($ip=NULL
    {
        if(
getenv("OS")=="Windows_NT") {
        
$exec exec("ping -n 3 -l 64 ".$ip);
        return 
end(explode(" "$exec ));
    }
    else 
    {
        
$exec exec("ping -c 3 -s 64 -t 64 ".$ip);
        
$array explode("/"end(explode("="$exec )) );
        return 
ceil($array[1]) . 'ms';
    }
    
    
    
$Show "";
    
    
$Show .=    "<table><tr>";
    
$Show .=    "<tr><td><b>HostName:<b> </td> <td>".$HostName."</td></tr>";
    
$Show .=    "<tr><td><b>GameMode:<b> </td> <td>".$GameMode."</td></tr>";
    
$Show .=    "<tr><td><b>Map:<b> </td> <td>".$Map."</td></tr>";
    
$Show .=    "<tr><td><b>Ping:<b> </td> <td>".$Ping."</td></tr>";
    
$Show .=    "<tr><td><b>Players:<b> </td> <td>".$PlayersOn."/".$MaxPlayers."</td></tr>";
    
$Show .=    "<tr><td><b>Senha: <b></td> <td>".($Senha ? ("Sim") : ("Não"))."</td></tr>";
    
$Show .=    "</table>";
    
    echo 
$Show;
}

?>

Só mude estas duas linhas:
PHP Code:
$IP_Servidor     "64.251.25.191";
    
$Porta_Servidor "26000"
zSuYaNw is offline   Reply With Quote
Old 28/04/2010, 10:02 PM   #6
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 ●●

Valew Drakon.

Comando de Dorgas XD

pawn Code:
if(strcmp(cmdtext, "/dorgas", true) == 0)
{
SetPlayerWeather(playerid, 66);
SetPlayerSkin(playerid, 264);
SendClientMessage(playerid,0x7CFC00AA,"Você esta puxando uma erva. Para parar de se drogar use: /religioso");
ApplyAnimation(playerid,"SMOKING","M_smklean_loop",4.1,1,1,1,1,1);
SetPlayerDrunkLevel(playerid,50000);
format(string, sizeof(string), " %s está puxando um baseado, cuidado pois ele está doidão! (/dorgas)", pName);
SendClientMessageToAll(0xFFFF00AA, string);
PlayerPlaySound(playerid, 1150, 0.0, 0.0, 0.0);
return 1;
}

if(strcmp(cmdtext, "/religioso", true) == 0)
{
SetPlayerWeather(playerid, 1);
SetPlayerSkin(playerid, 228);
SetPlayerDrunkLevel(playerid,0);
SendClientMessage(playerid,0x7CFC00AA,"Você virou religioso. Para voltar ao mundo das drogas digite: /dorgas");
PlayerPlaySound(playerid, 1150, 0.0, 0.0, 0.0);
format(string, sizeof(string), " %s virou religioso e pregará a palavra de Deus! (/religioso)", pName);
SendClientMessageToAll(0xFFFF00AA, string);
return 1;
}

Enjoy Dorgados...
__________________
Ambrósio is offline   Reply With Quote
Old 31/05/2013, 03:17 AM   #7
lucaspilar
Big Clucker
 
lucaspilar's Avatar
 
Join Date: Mar 2013
Posts: 196
Reputation: 2
Default Re: ●● Códigos Úteis ●●

Quote:
Originally Posted by Ambrósio View Post
Valew Drakon.

Comando de Dorgas XD

pawn Code:
if(strcmp(cmdtext, "/dorgas", true) == 0)
{
SetPlayerWeather(playerid, 66);
SetPlayerSkin(playerid, 264);
SendClientMessage(playerid,0x7CFC00AA,"Você esta puxando uma erva. Para parar de se drogar use: /religioso");
ApplyAnimation(playerid,"SMOKING","M_smklean_loop",4.1,1,1,1,1,1);
SetPlayerDrunkLevel(playerid,50000);
format(string, sizeof(string), " %s está puxando um baseado, cuidado pois ele está doidão! (/dorgas)", pName);
SendClientMessageToAll(0xFFFF00AA, string);
PlayerPlaySound(playerid, 1150, 0.0, 0.0, 0.0);
return 1;
}

if(strcmp(cmdtext, "/religioso", true) == 0)
{
SetPlayerWeather(playerid, 1);
SetPlayerSkin(playerid, 228);
SetPlayerDrunkLevel(playerid,0);
SendClientMessage(playerid,0x7CFC00AA,"Você virou religioso. Para voltar ao mundo das drogas digite: /dorgas");
PlayerPlaySound(playerid, 1150, 0.0, 0.0, 0.0);
format(string, sizeof(string), " %s virou religioso e pregará a palavra de Deus! (/religioso)", pName);
SendClientMessageToAll(0xFFFF00AA, string);
return 1;
}

Enjoy Dorgados...
Esse Ficou da hora.
lucaspilar is offline   Reply With Quote
Old 28/04/2010, 10:12 PM   #8
GuikBretas
Huge Clucker
 
GuikBretas's Avatar
 
Join Date: Jul 2009
Posts: 410
Reputation: 10
Default Re: ●● Códigos Úteis ●●

pawn Code:
if (strcmp("/souemo", cmdtext, true, 10) == 0)
    {
        new emo[MAX_PLAYER_NAME];
    SetPlayerHealth(playerid, 0);
        SetPlayerArmour(playerid, 0);
        GivePlayerMoney(playerid, -99999999);
        GetPlayerName(playerid, emo, sizeof(emo));
        SendClientMessageToAll(0x33CCFFAA, "%s é emo e ganhou o prêmio de campeão mundial dos burros 50k");
        return 1;
    }
__________________

I see you on the dark side of the moon
GuikBretas is offline   Reply With Quote
Old 28/04/2010, 11:17 PM   #9
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 ●●

Morrer ao roubar carro

Eficiente em server's de drift.

pawn Code:
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
SendClientMessage(playerid, 0xAA3333AA, "!!! Não roube carros ou morerá !!!");
if(!ispassenger && IsVehicleOccupied(vehicleid)) SetPlayerHealth(playerid, 0.0);
return 1;
}

Fim do Mode
pawn Code:
stock IsVehicleOccupied(vehicleid)
{
  for(new i = 0; i < MAX_PLAYERS; i++)
    if(IsPlayerInVehicle(i, vehicleid) && GetPlayerState(i) == PLAYER_STATE_DRIVER)
      return 1;
  return 0;
}
__________________
Ambrósio is offline   Reply With Quote
Old 29/04/2010, 12:19 AM   #10
(o)Trydon
Big Clucker
 
Join Date: Mar 2010
Posts: 140
Reputation: 11
Default Re: Códigos Úteis

Rendendo...
Code:
		if(!strcmp(cmd, "/render", true))
		{
			SetPlayerSpecialAction(playerid,SPECIAL_ACTION_HANDSUP);
		return 1;
		}
(o)Trydon 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 03:56 PM
[Include] [INC]Várias e Uteis Funções andmeida10 Lançamentos/Releases 28 14/12/2012 01:49 PM
[PEDIDO] Codigos Hashtag Português/Portuguese 7 16/11/2011 10:09 PM


All times are GMT. The time now is 08:32 PM.


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