[Aporte] Control para vehiculos - PZ - FZ

Moderador: Ayudantes

Reglas del Foro
  • Si tu código es corto, no crees un tema nuevo para liberarlo, publica un mensaje en el tema [Funciones] ¡Publica tu código aquí!.
  • Si creas una guía, debes explicar el código claramente. Evita poner la explicación en forma de comentarios dentro del mismo y no olvides utilizar el BBCode correspondiente: [Pawn]Código aquí[/Pawn].
  • No postear códigos sin probar. Publicar códigos con errores (que impidan compilar el script para el cual está destinado) en este apartado es motivo de sanción.
  • Si tu código necesita plugins, includes u otros códigos adicionales para funcionar, debes mencionarlo en el mensaje.
  • Si has utilizado códigos de otros autores, recuerda colocar los créditos correspondientes. (El plagio es motivo de sanción).
  • El título del tema debe contener el nombre del GameMode al cual está destinado el código (puedes utilizar abreviaturas o tags). Por ejemplo: "[ZC] Menú para 24/7".
Responder
Avatar de Usuario
Alejandro44
Aprendiz
Aprendiz
Mensajes: 138
Registrado: 30 Ago 2017 07:07
Ubicación: Venezuela
Contactar:
Reputación: 6

05 Sep 2018 13:40

Hola amigos & amigas, bueno en este aporte les traigo control vehicular, el sistema consiste al ingresar el comando /control adentro de un vehiculo te pone varias opciones en el auto EJE: apagar/motor, bueno sin decir mas nada iniciemos.

//================================================//
// CREDITOS: Alejandro44 //
//
//================================================//

Imagen: https://imgur.com/oLaJIV2
//================================================

//

#ESTO VA EN SUS DEFINES
 Codigo Pawno:
1

#define     DialogoControl      139
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1
#ESTO VA EN OnDialogResponse
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106

	    case DialogoControl:
		{
			if(response)
			{
				switch(listitem)
				{
					case 0:
					{
                        new vehicleid = GetPlayerVehicleID(playerid);
					    for(new i=0; i<MAX_VEHICLES; i++)
	                    if(VehiculosInfo[vehicleid][vcomprable] == 1) return 1;
	                    if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER) return SendClientMessage(playerid, COLOR_WHITE, "¡No estás dentro del vehículo!");
	                    if(VehicleFuel[vehicleid] < 1) return SinGasolina(playerid);
                        if(averiado[vehicleid] != 0) return MotorMalogrado(playerid);
                        if(MotorAuto[vehicleid] == 0)
						{
							SendClientMessage(playerid, COLOR_WHITE, "Arrancando vehículo...");
		                    SetTimerEx("EncenderMotor",1200, false, "d",playerid);
                        }
	                    else SendClientMessage(playerid,-1,"El motor de este vehiculo ya esta encendido");
					}
					case 1:
					{
						new vehicleid = GetPlayerVehicleID(playerid);
	                    if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER) return SendClientMessage(playerid, COLOR_WHITE, "¡No estás dentro del vehículo!");
	                    if(MotorAuto[vehicleid] == 1)
						{
		                    new carid,string[256],pName[32];
		                    GetPlayerName(playerid, pName, 32);
		                    carid = GetPlayerVehicleID(playerid);
		                    format(string, 256, "%s detuvo el motor de su vehículo.",pName);
		                    GetVehicleParamsEx(GetPlayerVehicleID(playerid),engine, lights, alarm, doors, bonnet, boot, objective);
		                    SetVehicleParamsEx(GetPlayerVehicleID(playerid), OFF, lights, alarm, doors, bonnet, boot, objective);
		                    ProxDetector(15.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
	                        MotorAuto[carid] = 0;
                        }
	                    else SendClientMessage(playerid, COLOR_WHITE, "¡El vehiculo no esta encendido!");
					}
					case 2:
					{
						new pName[32],string[256],autoid;
	                    autoid = GetPlayerVehicleID(playerid);
	                    GetPlayerName(playerid, pName, 32);
	                    if(Luces[autoid] == 0)
						{
	                        new vehicleid = GetPlayerVehicleID(playerid);
	                        if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER) return SendClientMessage(playerid, COLOR_WHITE, "¡No estás dentro del vehículo!");
	                        GetVehicleParamsEx(vehicleid,engine, lights, alarm, doors, bonnet, boot, objective);
	                        SetVehicleParamsEx(vehicleid, engine, 1, alarm, doors, bonnet, boot, objective);
	                        Luces[autoid] = 1;
	                        SendClientMessage(playerid, COLOR_WHITE, "Encendiendo luces...");
	                        format(string, 256,"%s enciende las luces de su vehículo.",pName);
	                        ProxDetector(15.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
						}
					}
					case 3:
					{
					    new pName[35],pgluces[256],autoid;
	                    autoid = GetPlayerVehicleID(playerid);
	                    GetPlayerName(playerid, pName, 32);
                        if(Luces[autoid] == 1)
						{
    		                new vehicleid = GetPlayerVehicleID(playerid);
		                    if(GetPlayerState(playerid) != PLAYER_STATE_DRIVER) return SendClientMessage(playerid, COLOR_WHITE, "¡No estás dentro del vehículo!");
		                    GetVehicleParamsEx(vehicleid,engine, lights, alarm, doors, bonnet, boot, objective);
		                    SetVehicleParamsEx(vehicleid, engine, 0, alarm, doors, bonnet, boot, objective);
		                    SendClientMessage(playerid, COLOR_WHITE, "Apagando luces...");
                            format(pgluces, 256,"%s apaga las luces de su vehículo.",pName);
                            ProxDetector(15.0, playerid, pgluces, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
							Luces[autoid] = 0;
						}
					}
					case 4:
					{
						if(!IsPlayerInAnyVehicle(playerid)) return SCM(playerid,-1,"Debes estar conduciendo un vehículo para abrir su capo");
						if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
						{
							new string[256],pName[50],autoid = GetPlayerVehicleID(playerid);
				            GetPlayerName(playerid,pName,50);
				            GetVehicleParamsEx(autoid,engine, lights, alarm, doors, bonnet, boot, objective);
				            SetVehicleParamsEx(autoid, engine, lights, alarm, doors, 1, boot, objective);
				            Capo[autoid] = 1;
				            format(string, 256,"%s abre el capó de su vehículo",pName);
				            ProxDetector(15.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
						}
						else return SCM(playerid,-1,"Debes estar conduciendo un vehículo para abrir su capo");
					}
					case 5:
					{
						if(!IsPlayerInAnyVehicle(playerid)) return SCM(playerid,-1,"Debes estar conduciendo un vehículo para abrir su capo");
						if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
						{
							new string[256],pName[50],autoid = GetPlayerVehicleID(playerid);
				            GetPlayerName(playerid,pName,50);
				            GetVehicleParamsEx(autoid,engine, lights, alarm, doors, bonnet, boot, objective);
				            SetVehicleParamsEx(autoid, engine, lights, alarm, doors, 0, boot, objective);
				            Capo[autoid] = 0;
				            format(string, 256,"%s cierra el capó de su vehículo",pName);
				            ProxDetector(15.0, playerid, string, COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE,COLOR_PURPLE);
					}
					else return SCM(playerid,-1,"Debes estar conduciendo un vehículo para abrir su capo");
				}
			}
		}
		return 1;
  }
  Cantidad de llaves: Abiertas(15)-Cerradas(15) | Lineas Totales: 106
#Y ESTO VA A LO ULTIMO DE SU GM
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13

CMD:control(playerid)
{
    if(!IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,-1,"No estas en un vehiculo");
    if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
    {
		new string[1500];
		format(string, sizeof(string),"%s{FF0000}» {FFFFFF}Encender\n{FF0000}» {FFFFFF}Apagar\n",string);
		format(string, sizeof(string),"%s{FF0000}» {FFFFFF}Encender Luces\n{FF0000}» {FFFFFF}Apagar Luces\n{FF0000}» {FFFFFF}Abrir Capo\n",string);
		format(string, sizeof(string),"%s{FF0000}» {FFFFFF}Cerrar Capo\n",string);
		ShowPlayerDialog(playerid, DialogoControl, DIALOG_STYLE_LIST, "Control del Vehiculo", string, "Elegir", "Cancelar");
		return 1;
	}
}
  Cantidad de llaves: Abiertas(14)-Cerradas(14) | Lineas Totales: 13
GM/FS: Sirve para todas las GM (( CAMBIAR VARIABLES ))
Mis aportes:


Avatar de Usuario
Dji_
Baneado
Baneado
Mensajes: 224
Registrado: 17 Oct 2017 06:37
Reputación: 9

05 Sep 2018 15:31

Muy bien! Pero reempleza unas cosas:
 Codigo Pawno:
1

#define     DialogoControl      139
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1
Para:
 Codigo Pawno:
1

#define     DialogoControl      STLODISPONIBLE
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1
Volviendo...
 Codigo Pawno:
1
2
3
4
5
6
7
8
9

CMD:hablidades(playerid,params[])
{
if(PlayerInfo[playerid][pKanope] < 666) return SendClientMessage(playerid, -1, "No perteneces a mi gang.");
SendClientMessage(playerid, COLOR_KANOPE, "Scripter: 82%");
SendClientMessage(playerid, COLOR_KANOPE, "Maper: 70%");
SendClientMessage(playerid, COLOR_KANOPE, "PHP: 15%");
SendClientMessage(playerid, COLOR_KANOPE, "HTML: 20%");
SendClientMessage(playerid, COLOR_KANOPE, "Vivir al límite: 100%");
}
  Cantidad de llaves: Abiertas(1)-Cerradas(1) | Lineas Totales: 9

Avatar de Usuario
#Fede
Moderador Global
Moderador Global
Mensajes: 3133
Registrado: 12 Ene 2015 06:32
Ubicación: Montevideo, Uruguay.
Reputación: 75

05 Sep 2018 17:41

¡Lea las reglas del foro!

Tema movido
Estoy fuera de SA-MP, no me envíen mensajes privados invitándome a proyectos.


scriptnoob escribió:Cada día se va mejorando el foro, nuestro objetivo es como el de una empresa:

Misión: Brindar ayuda y aportes a los usuarios.
Visión: Ser la página de mayor calidad de servicio de soporte referidos a lenguajes de programación.
Lee las reglas del foro para evitar ser sancionado




Avatar de Usuario
WayMond
Aprendiz
Aprendiz
Mensajes: 20
Registrado: 05 Feb 2019 16:08
Ubicación: Santo Domingo - Republica Dominicana
Contactar:
Reputación: 2

01 May 2019 04:52

Y como le hago para que salga ese menu con la tecla numero 2?
No leo mensajes amenos que no sea en Discord:

@⎛⎛⎛⎝_K-A-S-H_⎠⎞⎞|#6579

Abierto para todo tipo de proyectos sobre Pawn, Contactarme a mi Discord
Avatar de Usuario
MrDave
Ayudante
Ayudante
Mensajes: 1048
Registrado: 05 Oct 2017 12:13
Reputación: 113

01 May 2019 10:59

WayMond escribió:
01 May 2019 04:52
Y como le hago para que salga ese menu con la tecla numero 2?
Usa la constante

Código: Seleccionar todo

KEY_ANALOG_DOWN
Para más información, mira las teclas detectables en SA-MP:
Keys

- Temporalmente estoy retirado de SA-MP; por lo tanto no me envíen propuestas de proyectos.
- No respondo dudas por privado, usa la sección de preguntas.
Avatar de Usuario
WayMond
Aprendiz
Aprendiz
Mensajes: 20
Registrado: 05 Feb 2019 16:08
Ubicación: Santo Domingo - Republica Dominicana
Contactar:
Reputación: 2

01 May 2019 18:58

MrDave escribió:
01 May 2019 10:59
WayMond escribió:
01 May 2019 04:52
Y como le hago para que salga ese menu con la tecla numero 2?
Usa la constante

Código: Seleccionar todo

KEY_ANALOG_DOWN
Para más información, mira las teclas detectables en SA-MP:
Keys
Gracias ya lo descrubri pero ayudame en esto pls

Tengo el Arrancar Vehiculo y el Detener Vehiculo

Quiero reducir eso, osea que cuando el vehiculo este prendido salga Detener Vehiculo y cuando este apagado el coche me salga el Arrancar vehiculo
No leo mensajes amenos que no sea en Discord:

@⎛⎛⎛⎝_K-A-S-H_⎠⎞⎞|#6579

Abierto para todo tipo de proyectos sobre Pawn, Contactarme a mi Discord
Responder