pawn Код:
#include <a_samp>#include <zcmd>#include <sscanf>#define Vermelho 0xFF230AFF#define DialogAjuda 9999#define DialogCob 9998new bool:entrouevento
[MAX_PLAYERS
];
new evento
= 0;
new Float:Dest
[3];
new entrou
= 0;
new EVENTOID
= 0;
new Name
[MAX_PLAYER_NAME
];
new Celulas
[150];
public OnPlayerConnect
(playerid
){ if(playerid
> EVENTOID
) EVENTOID
= playerid;
entrouevento
[playerid
] = false;
SendClientMessage
(playerid,Vermelho,
"[Info]Esse Servidor Contem Fs De Evento de Don_Speed");
SendClientMessage
(playerid,Vermelho,
"[Info]Don_Speed msn: maurilio_don@hotmail.com");
return 1;
}public OnPlayerSpawn
(playerid
){ entrouevento
[playerid
] = false;
return 1;
}public OnPlayerDeath
(playerid, killerid, reason
){ GetPlayerName
(playerid, Name,
sizeof(Name
));
for(new i
=0;i
<=EVENTOID;i
++) { format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento]O Player {FF230A}%s{FFFFFF}({FF230A}ID:%d{FFFFFF}) Morreu No Evento.", Name, playerid
);
SendClientMessageToAll
(Vermelho,Celulas
);
entrouevento
[playerid
] = false;
} return 1;
}COMMAND:ajudaevento
(playerid, params
[]){ new Don
[450];
strcat(Don,
"|---------------| Sistema Evento |------------------|\n");
strcat(Don,
" Comandos Ajuda -> /evento \n");
strcat(Don,
" /abrirevento /skinevento /armaevento /vidaevento \n");
strcat(Don,
" /coleteevento /irevento /sairevento \n");
strcat(Don,
" /congelar /descongelar /carro \n");
strcat(Don,
" /primeiro /segundo /terceiro \n");
strcat(Don,
" Apenas Jogadores Logados Na Rcon \n");
strcat(Don,
"|--------------| Sistema Evento |-------------------|\n");
ShowPlayerDialog
(playerid, DialogAjuda, DIALOG_STYLE_MSGBOX,
"Creditos",Don,
"Fechar",
"");
return 1;
}COMMAND:abrirevento
(playerid, params
[]){ if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
if(evento
== 0) { for(new i
= 0; i
<= EVENTOID
+1; i
++) entrouevento
[i
] = false;
evento
= 1;
format(Celulas,
sizeof(Celulas
),
"{FFFFFF} -- Evento aberto pelo admin! Digite {FF230A}/irevento {FFFFFF}-- ");
SendClientMessageToAll
(Vermelho,Celulas
);
GetPlayerPos
(playerid, Dest
[0],Dest
[1],Dest
[2]);
return 1;
} else if(evento
>= 1) { evento
= 0;
format(Celulas,
sizeof(Celulas
),
"{FFFFFF} -- Evento fechado pelo admin ! -- {FF230A}%d{FFFFFF} pessoas foram ao evento.",entrou
);
SendClientMessageToAll
(Vermelho,Celulas
);
entrou
=0;
return 1;
} return 0;
}COMMAND:irevento
(playerid, params
[]){ if(entrouevento
[playerid
] == true
) return SendClientMessage
(playerid, Vermelho,
"[ERRO] Vocк jб estб no evento.");
entrou
++;
entrouevento
[playerid
] = true;
ResetPlayerWeapons
(playerid
);
SetPlayerPos
(playerid, Dest
[0],Dest
[1],Dest
[2]);
SendClientMessage
(playerid, Vermelho,
"{FFFFFF}Vocк foi para o {FF230A}evento");
SetPlayerHealth
(playerid,
100);
return 1;
}COMMAND:sairevento
(playerid, params
[]){ if(!entrouevento
[playerid
] == false
) return SendClientMessage
(playerid,Vermelho,
"Voce Nao Esta Em Um Evento");
SendClientMessage
(playerid,Vermelho,
"{FFFFFF}Voce Saiu do {FF230A}Evento");
SpawnPlayer
(playerid
);
entrouevento
[playerid
] = false;
return 1;
}COMMAND:armaevento
(playerid, params
[]){ new Arma, Municao;
GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
for(new i
=0;i
<=EVENTOID;i
++) { if(sscanf
(params,
"dd", Arma, Municao
)) return SendClientMessage
(playerid,Vermelho,
"{FFFFFF}Use: {FF230A}/armaevento [arma] [municao]");
if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid,Vermelho,
"Nenhum evento em andamento");
if(Arma
< 1 || Arma
> 46) return SendClientMessage
(playerid,Vermelho,
"Armas de ID 1 a 46");
GivePlayerWeapon
(i, Arma, Municao
);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Deu um(a) Arma para Todos do {FF230A}Evento", Name, playerid
);
SendClientMessageToAll
(Vermelho, Celulas
);
} return 1;
}COMMAND:spawnevento
(playerid, params
[]){ GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
)) return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
for(new i
=0;i
<=EVENTOID;i
++) { if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid, Vermelho,
"Nenhum Evento Em Andamento");
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Spawnou Todos os Players Do {FF230A}Evento", Name, playerid
);
SendClientMessageToAll
(Vermelho, Celulas
);
SpawnPlayer
(i
);
ResetPlayerWeapons
(i
);
} return 1;
}COMMAND:vidaevento
(playerid, params
[]){ new Vida;
GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
)) return SendClientMessage
(playerid,Vermelho,
"Voce nao й admin");
for(new i
=0;i
<=EVENTOID;i
++) { if(sscanf
(params,
"i", Vida
)) return SendClientMessage
(playerid,Vermelho,
"{FFFFFF}Use: {FF230A}/vidaevento [vida]");
if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid,Vermelho,
"Nenhum Evento Em Andamento");
if(Vida
< 1 || Vida
> 100) return SendClientMessage
(playerid,Vermelho,
"1 a 100");
SetPlayerHealth
(i, Vida
);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Setou a Vida para Todos do {FF230A}Evento para %d.", Name, playerid, Vida
);
SendClientMessageToAll
(Vermelho, Celulas
);
} return 1;
}COMMAND:coleteevento
(playerid, params
[]){ new Colete;
GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
for(new i
=0;i
<=EVENTOID;i
++) { if(sscanf
(params,
"i", Colete
)) return SendClientMessage
(playerid,Vermelho,
"{FFFFFF}Use: {FF230A}/coleteevento [colete]");
if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid, Vermelho,
"Nenhum Evento em Andamento");
if(Colete
< 1 || Colete
> 100) return SendClientMessage
(playerid, Vermelho,
"1 a 100");
SetPlayerArmour
(i, Colete
);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Setou o Colete para Todos do {FF230A}Evento para %d.", Name, playerid, Colete
);
SendClientMessageToAll
(Vermelho, Celulas
);
} return 1;
}COMMAND:skinevento
(playerid, params
[]){ new Skin;
GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
for(new i
=0;i
<=EVENTOID;i
++) { if(sscanf
(params,
"i", Skin
)) return SendClientMessage
(playerid,Vermelho,
"{FFFFFF}Use: {FF230A}/skinevento [skin]");
if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid,Vermelho,
"Nenhum Evento Em Andamento");
if(Skin
< 1 || Skin
> 399) return SendClientMessage
(playerid, Vermelho,
"1 a 399");
SetPlayerSkin
(i, Skin
);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Setou a Skin de Todos Do {FF230A}Evento para %d.", Name,playerid,Skin
);
SendClientMessageToAll
(Vermelho, Celulas
);
} return 1;
}COMMAND:congelar
(playerid, params
[]){ GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
)) return SendClientMessage
(playerid,Vermelho,
"Voce nao й admin");
for(new i
=0;i
<=EVENTOID;i
++) { if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid,Vermelho,
"Nenhum Evento Em Andamento");
TogglePlayerControllable
(i,
0);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Congelou Todos Do {FF230A}Evento", Name, playerid
);
SendClientMessageToAll
(Vermelho, Celulas
);
} return 1;
}COMMAND:descongelar
(playerid, params
[]){ GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
)) return SendClientMessage
(playerid,Vermelho,
"Voce nao й admin");
for(new i
=0;i
<=EVENTOID;i
++) { if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid,Vermelho,
"Nenhum Evento Em Andamento");
TogglePlayerControllable
(i,
1);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Congelou Todos Do {FF230A}Evento", Name, playerid
);
SendClientMessageToAll
(Vermelho, Celulas
);
} return 1;
}COMMAND:primeiro
(playerid,params
[]){ new ID;
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
if(sscanf
(params,
"i", ID
)) return SendClientMessage
(playerid, Vermelho,
"Use:/primeiro [id]");
if(!IsPlayerConnected
(ID
)) return SendClientMessage
(playerid, Vermelho,
"Player nao encontrado");
GetPlayerName
(ID, Name,
sizeof(Name
));
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}O primeiro colocado foi :{FF230A} %s ({FF230A}ID:%d{FFFFFF})!!!", Name, playerid
);
SendClientMessageToAll
(-1, Celulas
);
SendClientMessage
(ID,
-1,
"Vocк ficou em primeiro lugar e recebeu R$ 5.000 . Parabйns!");
GivePlayerMoney
(ID,
5000);
return 1;
}COMMAND:segundo
(playerid,params
[]){ new ID;
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
if(sscanf
(params,
"i", ID
)) return SendClientMessage
(playerid, Vermelho,
"Use:/segundo [id]");
if(!IsPlayerConnected
(ID
)) return SendClientMessage
(playerid, Vermelho,
"Player nao encontrado");
GetPlayerName
(ID, Name,
sizeof(Name
));
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}O segundo colocado foi :{FF230A} %s ({FF230A}ID:%d{FFFFFF})!!!", Name, playerid
);
SendClientMessageToAll
(-1, Celulas
);
SendClientMessage
(ID,
-1,
"Vocк ficou em segundo lugar e recebeu R$ 2.500 . Parabйns!");
GivePlayerMoney
(ID,
2500);
return 1;
}COMMAND:terceiro
(playerid,params
[]){ new ID;
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
if(sscanf
(params,
"i", ID
)) return SendClientMessage
(playerid, Vermelho,
"Use:/terceiro [id]");
if(!IsPlayerConnected
(ID
)) return SendClientMessage
(playerid, Vermelho,
"Player nao encontrado");
GetPlayerName
(ID, Name,
sizeof(Name
));
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}O terceiro colocado foi :{FF230A} %s ({FF230A}ID:%d{FFFFFF})!!!", Name, playerid
);
SendClientMessageToAll
(-1, Celulas
);
SendClientMessage
(ID,
-1,
"Vocк ficou em terceiro lugar e recebeu R$ 1.000 . Parabйns!");
GivePlayerMoney
(ID,
1000);
return 1;
}COMMAND:carro
(playerid, params
[])// By: Los{ new carro, IDC,
Float:X,
Float:Y,
Float:Z,
Float:FA;
GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
))return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
for(new i
=0;i
<=EVENTOID;i
++) { if(sscanf
(params,
"d", carro
)) return SendClientMessage
(playerid,
-1,
"Use: {FF230A}/carro [Modelo]");
if(400 < (carro
) > 611) return SendClientMessage
(playerid,
-1,
"O modelo tem que ser entre 400 e 611");
GetPlayerPos
(playerid, X, Y, Z
);
GetPlayerFacingAngle
(playerid, FA
);
IDC
= CreateVehicle
(carro, X, Y, Z
+2, FA,
0,
0,
25000);
PutPlayerInVehicle
(playerid, IDC,
0);
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento]O Admins {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Deu Carro Id {FF230A}%d{FFFFFF} Para Todos do {FF230A}Evento", Name, playerid, carro
);
SendClientMessageToAll
(Vermelho,Celulas
);
} return 1;
}COMMAND:resetararmas
(playerid, params
[]){ GetPlayerName
(playerid, Name,
sizeof(Name
));
if(!IsPlayerAdmin
(playerid
)) return SendClientMessage
(playerid, Vermelho,
"Voce Nao e Admin Noob");
for(new i
=0;i
<=EVENTOID;i
++) { if(!entrouevento
[i
] == true
) return SendClientMessage
(playerid, Vermelho,
"Nenhum Evento Em Andamento");
format(Celulas,
sizeof(Celulas
),
"{FFFFFF}[DS-Evento] O Admin {FF230A}%s{FFFFFF} ({FF230A}ID:%d{FFFFFF}) Resetou as Armas de Todos os Players do {FF230A}Evento", Name, playerid
);
SendClientMessageToAll
(Vermelho, Celulas
);
ResetPlayerWeapons
(i
);
} return 1;
}COMMAND:evento
(playerid, params
[]){ new Speed
[200];
strcat(Speed,
"* {FF230A}Colaboraзoes \n");
strcat(Speed,
"* {FF230A}Vini_Born -> Base\n");
strcat(Speed,
"* {FF230A}HumildadeForever -> Ajuda A Tirar Bugґs\n");
strcat(Speed,
"* {FF230A}Los -> Comando Carro\n");
strcat(Speed,
"* {FF230A}Don_Speed Msn: maurilio_don@hotmail.com\n");
ShowPlayerDialog
(playerid, DialogCob, DIALOG_STYLE_MSGBOX,
"Creditos",Speed,
"Fechar",
"");
return 1;
}