sistema de radar! me ajudem pf -
GustavoG3D - 27.12.2013
Ajuda FS de radar!!
Bem tavo pesquisando na net e achei esse FS dahora
Achei 1 Fs de radar
dai alguem passa da velocidade Aparece
Voce passo do limite de velocidade e foi multado
Nгo perde dinheiro e nada sу aparece isso!
tem como alguem colocar pra ir pro dp e da /pagarmulta ?
Ficaria bem Legal!
Alguem ajuda?
Por favor! Obrigado!
SOU NOVATO NO FORUM.SA-MP.COM
Desculpem se postei algo errado!
FS
#include <a_samp>
// SISTEMA FEITO POR: DESCONHECIDO
// SISTEMA DE EDITADO E TRADUZIDO POR Pedro_Felipe - Pedro_Tilambucu
//----------------------------------------
new UpdateSeconds = 2; // Nгo Mecher
new maxobject = 4;
//----------------------------------------
public OnFilterScriptInit() {
print("\n----------------------------------");
print("[FS] Radar Automatico Carregado");
print("----------------------------------\n");
SetTimer("UpdateSpeed", UpdateSeconds*1000, 1);
}
public OnFilterScriptExit() {
print("\n----------------------------------");
print("[FS] Radar Automatico Desativado");
print("----------------------------------\n");
}
forward UpdateSpeed(playerid);
enum SavePlayerPosEnum {
Float:LastX,
Float:LastY,
Float:LastZ
}
#define COLOR_YELLOW 0xFFFF00AA
#define VERDEFRACO 0x80cf80AA
#define SLOTS 500
new objectcreated;
new SavePlayerPos[SLOTS][SavePlayerPosEnum];
new distance1[MAX_PLAYERS];
public UpdateSpeed(playerid)
{
new Float,Float:y,Float:z;
new Float:distance,value;
for(new i=0; i<SLOTS; i++)
{
if(IsPlayerConnected(i))
{
GetPlayerPos(i, x, y, z);
distance = floatsqroot(floatpower(floatabs(floatsub(x,SavePla yerPos[i][LastX])),2)+floatpower(floatabs(floatsub(y,SavePlayerPos[i][LastY])),2)+floatpower(floatabs(floatsub(z,SavePlayerPos[i][LastZ])),2));
value = floatround(distance * 3600);
if(UpdateSeconds > 1)
{
value = floatround(value / UpdateSeconds);
}
distance1[i] = floatround(value/1600);
SavePlayerPos[i][LastX] = x;
SavePlayerPos[i][LastY] = y;
SavePlayerPos[i][LastZ] = z;
/* Para colocar Coordenada no lugar que voce quer , basta colocar a Coordenada X,Y,Z no lugar dos 00000 ,
o 40 й o raio que o radar pega, e o 50 , й a velocidade maxima*/
AddFlitsPaal(i, 1278, 1476.2402,-1726.3396,13.5469, 40, 50); // Radar da DP PM
AddFlitsPaal(i, 1278, 1524.1256,-1679.0756,13.5469, 40, 50); // Prefeitura
AddFlitsPaal(i, 1278, 2048.7131,1353.5975,10.6719, 40, 50); // BANCO
AddFlitsPaal(i, 1278, 1200.9847,-1337.9875,13.3984, 40, 45); // HOSPITAL
AddFlitsPaal(i, 1278, 0000.0000,0000.0000,0000.0000, 50, 70); // VAGO
AddFlitsPaal(i, 1278, 0000.0000,0000.0000,0000.0000, 20, 50); // VAGO
AddFlitsPaal(i, 1278, 0000.0000,0000.0000,0000.0000, 20, 50); // VAGO
AddFlitsPaal(i, 1278, 0000.0000,0000.0000,0000.0000, 20, 50); // VAGO
AddFlitsPaal(i, 1278, 0000.0000,0000.0000,0000.0000, 20, 50); // VAGO
AddFlitsPaal(i, 1278, 0000.0000,0000.0000,0000.0000, 20, 50); // VAGO
}
}
}
public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
return 1;
}
public OnPlayerExitVehicle(playerid, vehicleid)
{
return 1;
}
IsPlayerInCircle(playerid,Float,Float:y,radius)
{
if(GetPlayerDistanceToPoint(playerid,Float,Float :y) < radius)
{
return 1;
}
return 0;
}
GetPlayerDistanceToPoint(playerid,Float,Float:y)
{
new Float1,Float:y1,Float:z1; GetPlayerPos(playerid,x1,y1,z1);
new Float:tmpdis = floatsqroot(floatpower(floatabs(floatsub(x,x1)),2) +
floatpower(floatabs(floatsub(y,y1)),2));
return floatround(tmpdis);
}
stock AddFlitsPaal(playerid, modelid, Floatx, Float:yy, Float:zz, radius, speed)
{
new fine[MAX_PLAYERS];
new str[256];
if(objectcreated!=maxobject)
{
CreateObject(modelid, xx, yy, zz, 0.0, 0.0, 10);
objectcreated++;
}
if((distance1[playerid])>speed)
{
if(IsPlayerInCircle(playerid, xx, yy, radius) && GetPlayerState(playerid)== PLAYER_STATE_DRIVER)
{
fine[playerid]=((distance1[playerid]*17/10)-speed);
GivePlayerMoney(playerid, -2000);
format(str,sizeof(str), "[RADAR xXX ] O Limite de velocidade й %d KM/H Voce Passou a %d KM/H e foi multado!",speed, distance1[playerid] ,fine[playerid]);
// Caso queira mudar o nome do radar , й so mudar o xXx pelo nome que quiser. e o -2000 й o valor da multa.
SendClientMessage(playerid, VERDEFRACO, str);
PlayerPlaySound(playerid, 1132, 0.0, 0.0, 0.0);
}
}
}
public OnPlayerCommandText(playerid, cmdtext[])
if (strcmp("/sradar", cmdtext, true, 10) == 0)
{
SendClientMessage(playerid,0x33CCFFAA,"******* SISTEMA DE RADAR ************");
SendClientMessage(playerid,0x33CCFFAA,"Existem Radar na Prefeitura, No Hospital e no DP's de Los Santos e Banco");
SendClientMessage(playerid,0x33CCFFAA,"O Limite de velocidade й entre 50 KM/H");
SendClientMessage(playerid,0x33CCFFAA,"Se vocк exceder o Limite de velocidade Nesses Locais , Levara Multa de 2000 $ ");
SendClientMessage(playerid,0xAA3333AA,"Atenciosame nte , A administraзгo.");
return 1;
}
Re: sistema de radar! me ajudem pf -
Kyl3 - 27.12.2013
"Primeiro aprenda a programar, depois comece a desenvolver algo."
Tenho certeza que ninguйm vai fazer isso para vocк por nada.
Por que em vez de ficar no CONTROL + C e V, vocк nгo vai na Wiki do SA-MP e comeзa a estudar a linguagem, sua lуgica, funзхes, plugins, e depois comeзa a fazer alguma coisa?
Re: sistema de radar! me ajudem pf -
Pablo_Mantega - 27.12.2013
Fica mais Zika quando alguem passar no radar leva estrela ! ta ai o code sem adaptaзгo das estrelas se alguem quiser posta ta ai.
Код:
if(strcmp(cmd, "/pagarmulta", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(!PlayerToPoint(4.0, playerid, 249.56, 67.87, 1003.64))
{
SendClientMessage(playerid, COLOR_GREY, "Vocк precisa estar no balcгo da DP para pagar uma multa!");
return 1;
}
else
{
if(Multa[playerid] == 0)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк nгo tem uma multa pra pagar!");
return 1;
}
else if(Multa[playerid] == 1)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 1 multa no valor de R$100.");
Multa[playerid] -= 1;
GivePlayerGP(playerid, -100);
}
else if(Multa[playerid] == 2)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 2 multas no valor de R$200.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -200);
}
else if(Multa[playerid] == 3)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 3 multas no valor de R$300.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -300);
}
else if(Multa[playerid] == 4)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 4 multas no valor de R$400.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -400);
}
else if(Multa[playerid] == 5)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 5 multas no valor de R$500.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -500);
}
else if(Multa[playerid] == 6)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 6 multas no valor de R$600.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -600);
}
else if(Multa[playerid] == 7)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 7 multas no valor de R$700.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -700);
}
else if(Multa[playerid] == 8)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 8 multas no valor de R$800.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -800);
}
else if(Multa[playerid] == 9)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 9 multas no valor de R$900.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -900);
}
else if(Multa[playerid] == 10)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 10 multas no valor de R$1000.");
Multa[playerid] = 0;
GivePlayerGP(playerid, -1000);
}
}
}
return 1;
}
Re: sistema de radar! me ajudem pf -
GustavoG3D - 27.12.2013
Mals sou novato ou pablo como eu posto que nen vocк?
Os codigos sou novato e nao sei pode ensinar Por favor
Obrigado Pablo!
Re: sistema de radar! me ajudem pf -
GustavoG3D - 27.12.2013
Ou pablo deu 10 erros
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42119) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42125) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42131) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42137) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42143) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42149) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42155) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42161) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42167) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42173) : error 017: undefined symbol "GivePlayerGP"
Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
10 Errors.
Re: sistema de radar! me ajudem pf -
cantiliano - 27.12.2013
Quote:
Originally Posted by GustavoG3D
Ou pablo deu 10 erros
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42119) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42125) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42131) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42137) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42143) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42149) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42155) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42161) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42167) : error 017: undefined symbol "GivePlayerGP"
C:\Users\Samsung 2 - Gustavo\Desktop\SPS LS\gamemodes\*******RPG.pwn(42173) : error 017: undefined symbol "GivePlayerGP"
Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
10 Errors.
|
Troque GivePlayerGP
Por
GivePlayerMoney
........
Код:
if(strcmp(cmd, "/pagarmulta", true) == 0)
{
if(IsPlayerConnected(playerid))
{
if(!PlayerToPoint(4.0, playerid, 249.56, 67.87, 1003.64))
{
SendClientMessage(playerid, COLOR_GREY, "Vocк precisa estar no balcгo da DP para pagar uma multa!");
return 1;
}
else
{
if(Multa[playerid] == 0)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк nгo tem uma multa pra pagar!");
return 1;
}
else if(Multa[playerid] == 1)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 1 multa no valor de R$100.");
Multa[playerid] -= 1;
GivePlayerMoney(playerid, -100);
}
else if(Multa[playerid] == 2)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 2 multas no valor de R$200.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -200);
}
else if(Multa[playerid] == 3)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 3 multas no valor de R$300.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -300);
}
else if(Multa[playerid] == 4)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 4 multas no valor de R$400.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -400);
}
else if(Multa[playerid] == 5)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 5 multas no valor de R$500.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -500);
}
else if(Multa[playerid] == 6)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 6 multas no valor de R$600.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -600);
}
else if(Multa[playerid] == 7)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 7 multas no valor de R$700.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -700);
}
else if(Multa[playerid] == 8)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 8 multas no valor de R$800.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -800);
}
else if(Multa[playerid] == 9)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 9 multas no valor de R$900.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -900);
}
else if(Multa[playerid] == 10)
{
SendClientMessage(playerid, COLOR_YELLOW, "Vocк pagou 10 multas no valor de R$1000.");
Multa[playerid] = 0;
GivePlayerMoney(playerid, -1000);
}
}
}
return 1;
}
Re: sistema de radar! me ajudem pf -
Pablo_Mantega - 27.12.2013
Isso Ai !
Re: sistema de radar! me ajudem pf -
GustavoG3D - 27.12.2013
Agora como eu posto os codigos que nen voce
Re: sistema de radar! me ajudem pf -
GustavoG3D - 27.12.2013
Alguem ajdua ai agora?
https://sampforum.blast.hk/showthread.php?tid=483828