Noticias:

Debes de estar registrado para poder ver el contenido indicado. Registrate o Conectate

Menú Principal

Control Vehiculos

Iniciado por Swarlog, Ene 30, 2023, 11:19 PM

Tema anterior - Siguiente tema

Swarlog

Información Adicional:

Contiene los códigos necesarios para apagar/encencer las luces del behiculo, abrir todas las puertas del vehiculo (incluido capo y maletero), sistema de alarma y apagado/encendido del motor. Espero que les sea util!

Código:

// Ultimate Vehicle Control by Camacorn
// Keep These Credits Please

// Includes
#include <a_samp>
#include <zcmd>

// Forwards
forward NearByMessage( playerid, colour, string[]);

// Colors
#define RED 0xE60000FF
#define ORANGE 0xF97804FF
#define NICESKY 0x00C2ECFF
#define WHITE 0xFFFFFFFF

// Defines
new bool:Engine[MAX_VEHICLES];
new DoorInfo[MAX_PLAYERS], AlarmInfo[MAX_PLAYERS], HoodInfo[MAX_PLAYERS], TrunkInfo[MAX_PLAYERS];
new LightPwr[3000];

// Script
public OnFilterScriptInit()
{
print("\n--------------------------------------");
print(" Ultimate Vehicle Control By Camacorn   ");
print(" Started..............................  ");
print("--------------------------------------\n");
return 1;
}

public OnFilterScriptExit()
{
print("\n--------------------------------------");
print(" Ultimate Vehicle Control By Camacorn   ");
print(" Exited...............................  ");
print("--------------------------------------\n");
return 1;
}

// Stocks
stock GetName( playerid )
{
new Name[ MAX_PLAYER_NAME ];

if( IsPlayerConnected( playerid ) )
{
GetPlayerName( playerid, Name, sizeof( Name ) );
}
else
{
Name = "Disconnected/Nothing";
}

return Name;
}

stock sscanf(string[], format[], {Float,_}:...)
{
#if defined isnull
if (isnull(string))
#else
if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
#endif
{
return format[0];
}
#pragma tabsize 4
new
formatPos = 0,
stringPos = 0,
paramPos = 2,
paramCount = numargs(),
delim = ' ';
while (string[stringPos] && string[stringPos] <= ' ')
{
stringPos++;
}
while (paramPos < paramCount && string[stringPos])
{
switch (format[formatPos++])
{
case '\0':
{
return 0;
}
case 'i', 'd':
{
new
neg = 1,
num = 0,
ch = string[stringPos];
if (ch == '-')
{
neg = -1;
ch = string[++stringPos];
}
do
{
stringPos++;
if ('0' <= ch <= '9')
{
num = (num * 10) + (ch - '0');
}
else
{
return -1;
}
}
while ((ch = string[stringPos]) > ' ' && ch != delim);
setarg(paramPos, 0, num * neg);
}
case 'h', 'x':
{
new
num = 0,
ch = string[stringPos];
do
{
stringPos++;
switch (ch)
{
case 'x', 'X':
{
num = 0;
continue;
}
case '0' .. '9':
{
num = (num << 4) | (ch - '0');
}
case 'a' .. 'f':
{
num = (num << 4) | (ch - ('a' - 10));
}
case 'A' .. 'F':
{
num = (num << 4) | (ch - ('A' - 10));
}
default:
{
return -1;
}
}
}
while ((ch = string[stringPos]) > ' ' && ch != delim);
setarg(paramPos, 0, num);
}
case 'c':
{
setarg(paramPos, 0, string[stringPos++]);
}
case 'f':
{

new changestr[16], changepos = 0, strpos = stringPos;
while(changepos < 16 && string[strpos] && string[strpos] != delim)
{
changestr[changepos++] = string[strpos++];
}
changestr[changepos] = '\0';
setarg(paramPos,0,_:floatstr(changestr));
}
case 'p':
{
delim = format[formatPos++];
continue;
}
case '\'':
{
new
end = formatPos - 1,
ch;
while ((ch = format[++end]) && ch != '\'') {}
if (!ch)
{
return -1;
}
format[end] = '\0';
if ((ch = strfind(string, format[formatPos], false, stringPos)) == -1)
{
if (format[end + 1])
{
return -1;
}
return 0;
}
format[end] = '\'';
stringPos = ch + (end - formatPos);
formatPos = end + 1;
}
case 'u':
{
new
end = stringPos - 1,
id = 0,
bool:num = true,
ch;
while ((ch = string[++end]) && ch != delim)
{
if (num)
{
if ('0' <= ch <= '9')
{
id = (id * 10) + (ch - '0');
}
else
{
num = false;
}
}
}
if (num && IsPlayerConnected(id))
{
setarg(paramPos, 0, id);
}
else
{
#if !defined foreach
#define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
#define __SSCANF_FOREACH__
#endif
string[end] = '\0';
num = false;
new
name[MAX_PLAYER_NAME];
id = end - stringPos;
foreach (Player, playerid)
{
GetPlayerName(playerid, name, sizeof (name));
if (!strcmp(name, string[stringPos], true, id))
{
setarg(paramPos, 0, playerid);
num = true;
break;
}
}
if (!num)
{
setarg(paramPos, 0, INVALID_PLAYER_ID);
}
string[end] = ch;
#if defined __SSCANF_FOREACH__
#undef foreach
#undef __SSCANF_FOREACH__
#endif
}
stringPos = end;
}
case 's', 'z':
{
new
i = 0,
ch;
if (format[formatPos])
{
while ((ch = string[stringPos++]) && ch != delim)
{
setarg(paramPos, i++, ch);
}
if (!i)
{
return -1;
}
}
else
{
while ((ch = string[stringPos++]))
{
setarg(paramPos, i++, ch);
}
}
stringPos--;
setarg(paramPos, i, '\0');
}
default:
{
continue;
}
}
while (string[stringPos] && string[stringPos] != delim && string[stringPos] > ' ')
{
stringPos++;
}
while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= ' '))
{
stringPos++;
}
paramPos++;
}
do
{
if ((delim = format[formatPos++]) > ' ')
{
if (delim == '\'')
{
while ((delim = format[formatPos++]) && delim != '\'') {}
}
else if (delim != 'z')
{
return delim;
}
}
}
while (delim > ' ');
return 0;
}

public OnGameModeInit()
{
ManualVehicleEngineAndLights();
return 1;
}

// This is for the Messages used on the Engine command!
public NearByMessage( playerid, colour, string[])
{
new Float: PlayerX, Float: PlayerY, Float: PlayerZ;
for(new i = 0; i < MAX_PLAYERS; i++)
{
GetPlayerPos( playerid, PlayerX, PlayerY, PlayerZ);
if(IsPlayerInRangeOfPoint(i, 12, PlayerX, PlayerY, PlayerZ) )
{
if(GetPlayerVirtualWorld( playerid ) == GetPlayerVirtualWorld( i ) && GetPlayerInterior( playerid ) == GetPlayerInterior( i ) )
{
SendClientMessage(i, colour, string);
}
}
}
return 1;
}

public OnVehicleRespray( playerid, vehicleid, color1, color2)
{
if (LightPwr[vehicleid] == 0)
{
new panels,doors,lights,tires;
GetVehicleDamageStatus(vehicleid,panels,doors,lights,tires);
UpdateVehicleDamageStatus(vehicleid, panels, doors, 5, tires);
}
return 1;
}

public OnGameModeExit()
{
return 1;
}

// ZCMD Commands:
command(lights,playerid,params[])
{
new light[4];
new vehicleid,panels,doors,lights,tires;
if(sscanf(params,"s",light) != 0) return SendClientMessage(playerid,WHITE,"[USAGE]: '/LIGHTS [ON/OFF]'");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,ORANGE,"You aren't in a vehicle!");
if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER) return SendClientMessage(playerid,RED,"You aren't the driver!");
if(strcmp(light,"off",true,3) == 0)
{
vehicleid = GetPlayerVehicleID(playerid);
GetVehicleDamageStatus(vehicleid,panels,doors,lights,tires);
UpdateVehicleDamageStatus(vehicleid, panels, doors, 5, tires);
SendClientMessage(playerid,WHITE,"Lights {E31919}off!");
LightPwr[vehicleid] = 0;
}
else if(strcmp(light,"on",true,2) == 0)
{
vehicleid = GetPlayerVehicleID(playerid);
GetVehicleDamageStatus(vehicleid,panels,doors,lights,tires);
UpdateVehicleDamageStatus(vehicleid, panels, doors, 0, tires);
SendClientMessage(playerid,WHITE,"Lights {2F991A}on!");
SendClientMessage(playerid,ORANGE,"Remember that if it's light out, the lights wont be visible!");
LightPwr[vehicleid] = 1;
}
return 1;
}
command(engine,playerid,params[])
{
new vehicleid;
new string[55];
new turn[4];
new engine,lights,alarm,doors,bonnet,boot,objective;
new car = GetPlayerVehicleID(playerid);
if(sscanf(params,"s",turn) != 0) return SendClientMessage(playerid,WHITE,"[USAGE]: '/ENGINE [ON/OFF]'");
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,ORANGE,"You must be in a vehicle!");
if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER) return SendClientMessage(playerid,RED,"Sorry, You Are Not The Driver Of This Vehicle!");
vehicleid = GetPlayerVehicleID(playerid);
if(strcmp(turn,"off",true,3) == 0)
{
if(!Engine[vehicleid]) return SendClientMessage(playerid,WHITE,"The Engine Is Already Switched {E31919}Off!");
format(string,sizeof(string),"%s stops his vehicle engine!",GetName(playerid));
NearByMessage( playerid, NICESKY, string);
TogglePlayerControllable(playerid, true);
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,VEHICLE_PARAMS_OFF,lights,alarm,doors,bonnet,boot,objective);
Engine[vehicleid] = false;
}
else if(strcmp(turn,"on",true,2) == 0)
{
new Float:health;
car = GetPlayerVehicleID(playerid);
GetVehicleHealth(car, health);
if(health >350)
{
if(Engine[vehicleid]) return SendClientMessage(playerid,WHITE,"The Engine Is Already Switched {2F991A}On!");
format(string,sizeof(string),"%s starts his vehicle engine!",GetName(playerid));
NearByMessage( playerid, NICESKY, string);
TogglePlayerControllable(playerid, true);
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,VEHICLE_PARAMS_ON,lights,alarm,doors,bonnet,boot,objective);
Engine[vehicleid] = true;
}
else
{
SendClientMessage(playerid, ORANGE, "Your Vehicles Moter Is Damaged, Engine Off!");
Engine[vehicleid] = false;
RemovePlayerFromVehicle(playerid);
}
}
else return SendClientMessage(playerid,RED,"[USAGE]: '/ENGINE [ON/OFF]'");
return 1;
}

command(open,playerid,params[])
{
new engine,lights,alarm,doors,bonnet,boot,objective;
new car = GetPlayerVehicleID(playerid);
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,ORANGE,"You aren't in a vehicle!");
if(strcmp(params, "hood", true) == 0)
{
if(car != INVALID_VEHICLE_ID)
{
if(HoodInfo[playerid] == 0)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,alarm,doors,VEHICLE_PARAMS_ON,boot,objective);
HoodInfo[playerid] = 1;
SendClientMessage(playerid, WHITE, "Hood {2F991A}open!");
}
else if(HoodInfo[playerid] == 1)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,alarm,doors,VEHICLE_PARAMS_OFF,boot,objective);
HoodInfo[playerid] = 0;
SendClientMessage(playerid, WHITE, "Hood {E31919}closed!");
}
}
}
else if(strcmp(params, "trunk", true) == 0)
{
if(car != INVALID_VEHICLE_ID)
{
if(TrunkInfo[playerid] == 0)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,VEHICLE_PARAMS_ON,objective);
TrunkInfo[playerid] = 1;
SendClientMessage(playerid, WHITE, "Trunk {2F991A}open!");
}
else if(TrunkInfo[playerid] == 1)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,VEHICLE_PARAMS_OFF,objective);
TrunkInfo[playerid] = 0;
SendClientMessage(playerid, WHITE, "Trunk {E31919}closed!");
}
}
}
else if(strcmp(params, "doors", true) == 0)
{
if(car != INVALID_VEHICLE_ID)
{
if(DoorInfo[playerid] == 0)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,alarm,VEHICLE_PARAMS_ON,bonnet,boot,objective);
DoorInfo[playerid] = 1;
SendClientMessage(playerid, WHITE, "Doors {2F991A}open!");
}
else if(DoorInfo[playerid] == 1)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,alarm,VEHICLE_PARAMS_OFF,bonnet,boot,objective);
DoorInfo[playerid] = 0;
SendClientMessage(playerid, WHITE, "Doors {E31919}closed!");
}
}
}
else SendClientMessage(playerid, WHITE, "SYNTAX: {E31919}/OPEN [HOOD/TRUNK/DOORS]");
return 1;
}

command(vehinfo,playerid,params[])
{
SendClientMessage(playerid, ORANGE,"Camacorns Ultimate Vehicle Control CMDS:");
SendClientMessage(playerid, WHITE,"Headlights: /LIGHTS [ON/OFF]");
SendClientMessage(playerid, WHITE,"Doors: /OPEN [HOOD/TRUNK/DOORS]");
SendClientMessage(playerid, WHITE,"Alarm: /ALARM");
SendClientMessage(playerid, WHITE,"Engine: /ENGINE [ON/OFF]");
return 1;
}

command(alarm,playerid,params[])
{
new engine,lights,alarm,doors,bonnet,boot,objective;
new car = GetPlayerVehicleID(playerid);
if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,ORANGE,"You must be in a vehicle!");
if(AlarmInfo[playerid] == 0)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,VEHICLE_PARAMS_ON,doors,bonnet,boot,objective);
AlarmInfo[playerid] = 1;
SendClientMessage(playerid, WHITE, "Alarm {2F991A}on!");
}
else if(AlarmInfo[playerid] == 1)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,engine,lights,VEHICLE_PARAMS_OFF,doors,bonnet,boot,objective);
AlarmInfo[playerid] = 0;
SendClientMessage(playerid, WHITE, "Alarm {E31919}off!");
}
return 1;
}

public OnPlayerSpawn(playerid)
{
SendClientMessage(playerid, ORANGE, "This server uses Camacorns 'Ultimate Vehicle Control' script.");
SendClientMessage(playerid, WHITE,"Ultimate Vehicle Control Commands: [/VEHINFO]");
return 1;
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
new engine,lights,alarm,doors,bonnet,boot,objective,panels,tires;
new car = GetPlayerVehicleID(playerid);
if (Engine[vehicleid] == false)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,VEHICLE_PARAMS_OFF,lights,alarm,doors,bonnet,boot,objective);
}
else if (Engine[vehicleid] == true)
{
GetVehicleParamsEx(car,engine,lights,alarm,doors,bonnet,boot,objective);
SetVehicleParamsEx(car,VEHICLE_PARAMS_ON,lights,alarm,doors,bonnet,boot,objective);
}
if (LightPwr[vehicleid] == 0)
{
GetVehicleDamageStatus(vehicleid,panels,doors,lights,tires);
UpdateVehicleDamageStatus(vehicleid, panels, doors, 5, tires);
}
else
{
GetVehicleDamageStatus(vehicleid,panels,doors,lights,tires);
UpdateVehicleDamageStatus(vehicleid, panels, doors, 0, tires);
}
SendClientMessage(playerid, ORANGE, "Headlights: [/LIGHTS [on/off]] Alarm: [/ALARM] Doors: [/OPEN [hood/trunk/doors]]!");
return 1;
}

// Ultimate Vehicle Control by Camacorn
// Keep These Credits Pleas