SA-MP Forums Archive
[AYUDA] Ayudarme me resta vida un FS - 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: Español/Spanish (https://sampforum.blast.hk/forumdisplay.php?fid=29)
+---- Thread: [AYUDA] Ayudarme me resta vida un FS (/showthread.php?tid=464508)


[AYUDA] Ayudarme me resta vida un FS - Chuso31 - 17.09.2013

Hola buenas a todos tengo un Filterscript descargado de aquн que se llama Luces Intermitentes, es para la policнa, me imagino que todos lo conocerбn.

Pues bien el tema esque me funciona perfectamente pero cuando vas funcionando con el coches y activas las luces intermitentes, me resta vida, cuando me detengo no me baja vida, pero cuando sigo avanzando con el coche me resta.


їA que puede deberse? Me ocurre con cualquier sistema de luces intermitentes

Respuesta: [AYUDA] Ayudarme me resta vida un FS - BecksLennon - 17.09.2013

Si quieres una soluciуn por favor deja el cуdigo, para poder verificarlo.

Re: [AYUDA] Ayudarme me resta vida un FS - Chuso31 - 17.09.2013

Quote:

// Luces Intermitentens by TiNcH010
// www.forum.sa-mp.com

#define FILTERSCRIPT

#include <a_samp>

#if defined FILTERSCRIPT

new PLuces[MAX_PLAYERS];
new TLI, TLI2;

forward TimerLucesIntermitentes(vehicleid);
forward TimerLucesIntermitentes2(vehicleid);
forward LucesIntermitentes(playerid);
forward ApagarLucesIntermitentes(playerid);
forward encode_lights(light1, light2, light3, light4);

#else

main(){}

#endif

public OnPlayerConnect(playerid)
{
PLuces[playerid] = 0;
return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
PLuces[playerid] = 0;
return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, "/hnada", true) == 0)
{
new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);
SetVehicleParamsEx(GetPlayerVehicleID(playerid), VEHICLE_PARAMS_ON, VEHICLE_PARAMS_ON, alarm, doors, bonnet, boot, objective);
return 1;
}

if(strcmp(cmdtext, "/prioritario", true) == 0)
{
if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 596) // Cambiar si se desea.
{
SendClientMessage(playerid, -1, "{FF0000}Debes subirte a un coche de policia de Los Santos!");
return 1;
}

new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);

if(lights == VEHICLE_PARAMS_OFF)
{
SendClientMessage(playerid, -1, "{FF0000}Las luces deben estar encendidas!");
return 1;
}

if(PLuces[playerid] == 0)
{
LucesIntermitentes(playerid);
PLuces[playerid] = 1;
}
else if(PLuces[playerid] == 1)
{
ApagarLucesIntermitentes(playerid);
PLuces[playerid] = 0;
}

return 1;
}
return 0;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys & KEY_YES) // Si presiona la tecla Y.
{
new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);

if(lights == VEHICLE_PARAMS_OFF)
{
SendClientMessage(playerid, -1, "{FF0000}Las luces deben estar encendidas!");
return 1;
}

if(PLuces[playerid] == 0)
{
LucesIntermitentes(playerid);
PLuces[playerid] = 1;
}
}

if(newkeys & KEY_NO) // Si presiona la tecla N.
{
new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);

if(lights == VEHICLE_PARAMS_OFF)
{
SendClientMessage(playerid, -1, "{FF0000}Las luces deben estar encendidas!");
return 1;
}

if(PLuces[playerid] == 1)
{
ApagarLucesIntermitentes(playerid);
PLuces[playerid] = 0;
}
}
return 1;
}

public LucesIntermitentes(playerid)
{
if ( IsPlayerInAnyVehicle(playerid) && GetPlayerVehicleSeat(playerid) == 0 )
{
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(GetPlayerVehicleID(playerid ), Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(GetPlayerVehicleID(playe rid), Panels, Doors1, encode_lights(0,0,1,1), Tires);
TLI = SetTimerEx("TimerLucesIntermitentes", 100, false, "d", GetPlayerVehicleID(playerid));
}
}
public ApagarLucesIntermitentes(playerid)
{
if ( IsPlayerInAnyVehicle(playerid) && GetPlayerVehicleSeat(playerid) == 0 )
{
KillTimer(TLI);
KillTimer(TLI2);
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(GetPlayerVehicleID(playerid ), Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(GetPlayerVehicleID(playe rid), Panels, Doors1, encode_lights(0,0,0,0), Tires);
}
}
public encode_lights(light1, light2, light3, light4)
{
return light1 | (light2 << 1) | (light3 << 2) | (light4 << 3);
}
public TimerLucesIntermitentes(vehicleid)
{
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(vehicleid, Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(vehicleid, Panels, Doors1, encode_lights(1,1,0,0), Tires);
TLI2 = SetTimerEx("TimerLucesIntermitentes2", 100, false, "d", vehicleid);
}
public TimerLucesIntermitentes2(vehicleid)
{
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(vehicleid, Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(vehicleid, Panels, Doors1, encode_lights(0,0,1,1), Tires);
TLI = SetTimerEx("TimerLucesIntermitentes", 100, false, "d", vehicleid);
}
El cуdigo es ese, aunque me da que va a ser cosa del GameMode

Respuesta: Re: [AYUDA] Ayudarme me resta vida un FS - BecksLennon - 17.09.2013

Quote:
Originally Posted by Chuso31
Посмотреть сообщение
El cуdigo es ese, aunque me da que va a ser cosa del GameMode
Pruebalo asi.

pawn Код:
// Luces Intermitentens by TiNcH010
// http://www.forum.sa-mp.com

#define FILTERSCRIPT

#include <a_samp>

#if defined FILTERSCRIPT

new PLuces[MAX_PLAYERS];
new TLI, TLI2;

forward TimerLucesIntermitentes(vehicleid);
forward TimerLucesIntermitentes2(vehicleid);
forward LucesIntermitentes(playerid);
forward ApagarLucesIntermitentes(playerid);
forward encode_lights(light1, light2, light3, light4);

#else

main(){}

#endif

public OnPlayerConnect(playerid)
{
PLuces[playerid] = 0;
return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, "/hnada", true) == 0)
{
new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);
SetVehicleParamsEx(GetPlayerVehicleID(playerid), VEHICLE_PARAMS_ON, VEHICLE_PARAMS_ON, alarm, doors, bonnet, boot, objective);
return 1;
}

if(strcmp(cmdtext, "/prioritario", true) == 0)
{
if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 596) // Cambiar si se desea.
{
SendClientMessage(playerid, -1, "{FF0000}Debes subirte a un coche de policia de Los Santos!");
return 1;
}

new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);

if(lights == VEHICLE_PARAMS_OFF)
{
SendClientMessage(playerid, -1, "{FF0000}Las luces deben estar encendidas!");
return 1;
}

if(PLuces[playerid] == 0)
{
LucesIntermitentes(playerid);
PLuces[playerid] = 1;
}
else if(PLuces[playerid] == 1)
{
ApagarLucesIntermitentes(playerid);
PLuces[playerid] = 0;
}

return 1;
}
return 0;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys & KEY_YES) // Si presiona la tecla Y.
{
new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);

if(lights == VEHICLE_PARAMS_OFF)
{
SendClientMessage(playerid, -1, "{FF0000}Las luces deben estar encendidas!");
return 1;
}

if(PLuces[playerid] == 0)
{
LucesIntermitentes(playerid);
PLuces[playerid] = 1;
}
}

if(newkeys & KEY_NO) // Si presiona la tecla N.
{
new enginem, lights, alarm, doors, bonnet, boot, objective;
GetVehicleParamsEx(GetPlayerVehicleID(playerid), enginem, lights, alarm, doors, bonnet, boot, objective);

if(lights == VEHICLE_PARAMS_OFF)
{
SendClientMessage(playerid, -1, "{FF0000}Las luces deben estar encendidas!");
return 1;
}

if(PLuces[playerid] == 1)
{
ApagarLucesIntermitentes(playerid);
PLuces[playerid] = 0;
}
}
return 1;
}

public LucesIntermitentes(playerid)
{
if ( IsPlayerInAnyVehicle(playerid) && GetPlayerVehicleSeat(playerid) == 0 )
{
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(GetPlayerVehicleID(playerid ), Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(GetPlayerVehicleID(playe rid), Panels, Doors1, encode_lights(0,0,1,1), Tires);
TLI = SetTimerEx("TimerLucesIntermitentes", 100, false, "d", GetPlayerVehicleID(playerid));
}
}
public ApagarLucesIntermitentes(playerid)
{
if ( IsPlayerInAnyVehicle(playerid) && GetPlayerVehicleSeat(playerid) == 0 )
{
KillTimer(TLI);
KillTimer(TLI2);
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(GetPlayerVehicleID(playerid ), Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(GetPlayerVehicleID(playe rid), Panels, Doors1, encode_lights(0,0,0,0), Tires);
}
}
public encode_lights(light1, light2, light3, light4)
{
return light1 | (light2 << 1) | (light3 << 2) | (light4 << 3);
}
public TimerLucesIntermitentes(vehicleid)
{
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(vehicleid, Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(vehicleid, Panels, Doors1, encode_lights(1,1,0,0), Tires);
TLI2 = SetTimerEx("TimerLucesIntermitentes2", 100, false, "d", vehicleid);
}
public TimerLucesIntermitentes2(vehicleid)
{
new Panels, Doors1, Lights, Tires;
GetVehicleDamageStatus(vehicleid, Panels, Doors1, Lights, Tires);
UpdateVehicleDamageStatus(vehicleid, Panels, Doors1, encode_lights(0,0,1,1), Tires);
TLI = SetTimerEx("TimerLucesIntermitentes", 100, false, "d", vehicleid);
Por lo que vi del FS, no tiene nada malo, pero pruebalo de la manera que te dije aver.

Re: [AYUDA] Ayudarme me resta vida un FS - Chuso31 - 17.09.2013

Me tira estos errores:

C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : error 017: undefined symbol "playe"
C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : error 017: undefined symbol "rid"
C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : error 029: invalid expression, assumed zero
C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : fatal error 107: too many error messages on one line

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


4 Errors.

Respuesta: Re: [AYUDA] Ayudarme me resta vida un FS - EduGTA - 17.09.2013

Quote:
Originally Posted by Chuso31
Посмотреть сообщение
Me tira estos errores:

C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : error 017: undefined symbol "playe"
C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : error 017: undefined symbol "rid"
C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : error 029: invalid expression, assumed zero
C:\Users\Jesus\Desktop\LucesIntermitentes.pwn(125) : fatal error 107: too many error messages on one line

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


4 Errors.
En la lнnea 125 en vez de poner "playerid" pusieron "playe rid"

pawn Код:
UpdateVehicleDamageStatus(GetPlayerVehicleID(playerid), Panels, Doors1, encode_lights(0,0,1,1), Tires);


Respuesta: [AYUDA] Ayudarme me resta vida un FS - Parka - 18.09.2013

Yo dudo muchнsimo que sea ese FS!

Respuesta: [AYUDA] Ayudarme me resta vida un FS - TiNcH010 - 19.09.2013

LOL ese es mi script xd.
No puede ser que ese FS te saque vida, es imposible.