[Aporte] /computadora para bases ZC

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
MrDave
Ayudante
Ayudante
Mensajes: 1048
Registrado: 05 Oct 2017 12:13
Reputación: 113

27 Nov 2017 13:00

Spoiler:
AlexhitoxD escribió:
27 Nov 2017 12:52
Miwi escribió:
23 Nov 2017 14:37
Que tal gente, hoy el tío miwi les trae algo simple pero que a muchos les gustaran, es el sistema de /computadoras en los vehículos de LSPD, eh notado que muchos dueños de servidores me lo han pedido y después de que me diera unas vueltas decidí hacer uno y compartirlo no es tan complicado pero se ve bonito y le da mas rol a LSPD


Bien primero lo primero los #defines
 Codigo Pawno:
1

#define     PCPD                        (8754)
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1

Bien ahora vamos a crear un if para que el comando solo se pueda usar en las patrullas yo solo pondré 2 ID de los vehículos de SAPD si ustedes tienen mas o otro tipo de autos solo modifiquen o agreguen mas
 Codigo Pawno:
1
2
3
4
5
6
7
8

IsAPCPD(carid)
{
	if(GetVehicleModel(carid) == ID VEH || GetVehicleModel(carid) == ID VEH)
	{
		return 1;
	}
	return 0;
}
  Cantidad de llaves: Abiertas(2)-Cerradas(2) | Lineas Totales: 8

Bien ahora vamos a crear el comando para LSPD nos vamos a nuestros comando o al final de la GM
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

CMD:computadora(playerid, params[])
{
 	if(IsACop(playerid))
  	{
   	if(IsAPCPD(carid))
     	{
        SafeDialogEx(playerid, PCPD, DIALOG_STYLE_LIST, "{0000FF}L.S.P.D{FFFFFF} Base de datos de SAPD","Buscar sospechosos\nPrender Sirenas\nEncender Radio de unidad\nEncender Luces\nEn Servicio", "Ok", "Cancelar");
     	}
      	else
       	{
        	SendClientMessageEx(playerid, -1,"{FF0000}[!Error!]{FFFFFF} No estas dentro de una unidad de policia");
        }
  	}
   	else
	{
 		SendClientMessageEx(playerid, , "{FF0000}[Anti-Haking]{FFFFFF} No intentes usar la base de datos del gobierno");
	}
	return 1;
}
  Cantidad de llaves: Abiertas(11)-Cerradas(11) | Lineas Totales: 19

Bien ahora vamos a crear el dialogresponse :u que feo suena eso
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

	if(dialogid == PCPD){
	    if(response == 1){
	        switch (listitem){
	            case 0:{
                                cmd_sospechosos(playerid, params);
				}
				case 1:{
                                cmd_sirena(playerid, params);
				}
				case 2:{
                                cmd_radio(playerid, params);
				}
				case 3:{
                                cmd_luces(playerid, params);
				}
				case 4:{
                                cmd_placaex(playerid, params);
				}
			}
		}
	}
  Cantidad de llaves: Abiertas(8)-Cerradas(8) | Lineas Totales: 21
Bien antes de terminar recuerda que si te gusto puedes apoyarme con un +1 me da inspiración a seguir aportando cositas :3 si tienes alguna duda o problema déjamelo en los comentarios, te la resolveré en un instante

me ayudas con este error ?
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 017: undefined symbol "params"
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : fatal error 107: too many error messages on one line
Ponlo así:
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

if(dialogid == PCPD){
	    if(response == 1){
	        switch (listitem){
	            case 0:{
                                cmd_sospechosos(playerid);
				}
				case 1:{
                                cmd_sirena(playerid);
				}
				case 2:{
                                cmd_radio(playerid);
				}
				case 3:{
                                cmd_luces(playerid);
				}
				case 4:{
                                cmd_placaex(playerid);
				}
			}
		}
	}
  Cantidad de llaves: Abiertas(8)-Cerradas(8) | Lineas Totales: 21

- 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
Miwi
Baneado
Baneado
Mensajes: 502
Registrado: 02 Nov 2016 17:54
Ubicación: nicaragua
Contactar:
Reputación: 55

27 Nov 2017 13:38

AlexhitoxD escribió:
27 Nov 2017 12:52
Miwi escribió:
23 Nov 2017 14:37
Que tal gente, hoy el tío miwi les trae algo simple pero que a muchos les gustaran, es el sistema de /computadoras en los vehículos de LSPD, eh notado que muchos dueños de servidores me lo han pedido y después de que me diera unas vueltas decidí hacer uno y compartirlo no es tan complicado pero se ve bonito y le da mas rol a LSPD


Bien primero lo primero los #defines
 Codigo Pawno:
1

#define     PCPD                        (8754)
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1

Bien ahora vamos a crear un if para que el comando solo se pueda usar en las patrullas yo solo pondré 2 ID de los vehículos de SAPD si ustedes tienen mas o otro tipo de autos solo modifiquen o agreguen mas
 Codigo Pawno:
1
2
3
4
5
6
7
8

IsAPCPD(carid)
{
	if(GetVehicleModel(carid) == ID VEH || GetVehicleModel(carid) == ID VEH)
	{
		return 1;
	}
	return 0;
}
  Cantidad de llaves: Abiertas(2)-Cerradas(2) | Lineas Totales: 8

Bien ahora vamos a crear el comando para LSPD nos vamos a nuestros comando o al final de la GM
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

CMD:computadora(playerid, params[])
{
 	if(IsACop(playerid))
  	{
   	if(IsAPCPD(carid))
     	{
        SafeDialogEx(playerid, PCPD, DIALOG_STYLE_LIST, "{0000FF}L.S.P.D{FFFFFF} Base de datos de SAPD","Buscar sospechosos\nPrender Sirenas\nEncender Radio de unidad\nEncender Luces\nEn Servicio", "Ok", "Cancelar");
     	}
      	else
       	{
        	SendClientMessageEx(playerid, -1,"{FF0000}[!Error!]{FFFFFF} No estas dentro de una unidad de policia");
        }
  	}
   	else
	{
 		SendClientMessageEx(playerid, , "{FF0000}[Anti-Haking]{FFFFFF} No intentes usar la base de datos del gobierno");
	}
	return 1;
}
  Cantidad de llaves: Abiertas(11)-Cerradas(11) | Lineas Totales: 19

Bien ahora vamos a crear el dialogresponse :u que feo suena eso
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

	if(dialogid == PCPD){
	    if(response == 1){
	        switch (listitem){
	            case 0:{
                                cmd_sospechosos(playerid, params);
				}
				case 1:{
                                cmd_sirena(playerid, params);
				}
				case 2:{
                                cmd_radio(playerid, params);
				}
				case 3:{
                                cmd_luces(playerid, params);
				}
				case 4:{
                                cmd_placaex(playerid, params);
				}
			}
		}
	}
  Cantidad de llaves: Abiertas(8)-Cerradas(8) | Lineas Totales: 21
Bien antes de terminar recuerda que si te gusto puedes apoyarme con un +1 me da inspiración a seguir aportando cositas :3 si tienes alguna duda o problema déjamelo en los comentarios, te la resolveré en un instante

me ayudas con este error ?
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 017: undefined symbol "params"
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : fatal error 107: too many error messages on one line
Si lo quieres usar en Oz tendras que adactar el sistema
Aportes y Liberaciones de script

[GM] Whaler Streep 1.8 viewtopic.php?f=41&t=23746
[FS] /emisoras con posibilidad de transmitir en vivo viewtopic.php?f=81&t=23747
[GM] Whaler Streep version final viewtopic.php?f=41&t=24317
[Aporte] /duda en dialogos viewtopic.php?f=40&t=22784
[Aporte] /vendertodas viewtopic.php?f=40&t=24331
[Aporte-Guía] Sistema de armas en el cuerpo viewtopic.php?f=40&t=24580
[GM] New States viewtopic.php?f=41&t=24645
[Aporte] Despendedora sistema único viewtopic.php?f=40&t=24660
[Aporte] /computadora para LSPD viewtopic.php?f=40&t=24789
[Aporte] Anti-Cbug Avanzado viewtopic.php?f=40&t=24839
[Guía] Explicación [TAG] En las variables viewtopic.php?f=40&t=25156
[Gamemode] Zombie vs Humanos Version Miwi viewtopic.php?f=41&t=25411&p=128322#p128322
[Guía] Alterar distancia de cargado de objetos streamer viewtopic.php?f=40&t=25970
[Guía] Actualizar seguridad y activar el corta fuegos VPS Linux viewtopic.php?f=40&t=26572
[Guía] Permitir el transito de datos en tu VPS Linux Ubuntu viewtopic.php?f=40&t=26595


AlexhitoxD
Mensajes: 138
Registrado: 03 Oct 2016 18:04
Reputación: -2

27 Nov 2017 14:10

Miwi escribió:
27 Nov 2017 13:38
AlexhitoxD escribió:
27 Nov 2017 12:52
Miwi escribió:
23 Nov 2017 14:37
Que tal gente, hoy el tío miwi les trae algo simple pero que a muchos les gustaran, es el sistema de /computadoras en los vehículos de LSPD, eh notado que muchos dueños de servidores me lo han pedido y después de que me diera unas vueltas decidí hacer uno y compartirlo no es tan complicado pero se ve bonito y le da mas rol a LSPD


Bien primero lo primero los #defines
 Codigo Pawno:
1

#define     PCPD                        (8754)
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1

Bien ahora vamos a crear un if para que el comando solo se pueda usar en las patrullas yo solo pondré 2 ID de los vehículos de SAPD si ustedes tienen mas o otro tipo de autos solo modifiquen o agreguen mas
 Codigo Pawno:
1
2
3
4
5
6
7
8

IsAPCPD(carid)
{
	if(GetVehicleModel(carid) == ID VEH || GetVehicleModel(carid) == ID VEH)
	{
		return 1;
	}
	return 0;
}
  Cantidad de llaves: Abiertas(2)-Cerradas(2) | Lineas Totales: 8

Bien ahora vamos a crear el comando para LSPD nos vamos a nuestros comando o al final de la GM
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

CMD:computadora(playerid, params[])
{
 	if(IsACop(playerid))
  	{
   	if(IsAPCPD(carid))
     	{
        SafeDialogEx(playerid, PCPD, DIALOG_STYLE_LIST, "{0000FF}L.S.P.D{FFFFFF} Base de datos de SAPD","Buscar sospechosos\nPrender Sirenas\nEncender Radio de unidad\nEncender Luces\nEn Servicio", "Ok", "Cancelar");
     	}
      	else
       	{
        	SendClientMessageEx(playerid, -1,"{FF0000}[!Error!]{FFFFFF} No estas dentro de una unidad de policia");
        }
  	}
   	else
	{
 		SendClientMessageEx(playerid, , "{FF0000}[Anti-Haking]{FFFFFF} No intentes usar la base de datos del gobierno");
	}
	return 1;
}
  Cantidad de llaves: Abiertas(11)-Cerradas(11) | Lineas Totales: 19

Bien ahora vamos a crear el dialogresponse :u que feo suena eso
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

	if(dialogid == PCPD){
	    if(response == 1){
	        switch (listitem){
	            case 0:{
                                cmd_sospechosos(playerid, params);
				}
				case 1:{
                                cmd_sirena(playerid, params);
				}
				case 2:{
                                cmd_radio(playerid, params);
				}
				case 3:{
                                cmd_luces(playerid, params);
				}
				case 4:{
                                cmd_placaex(playerid, params);
				}
			}
		}
	}
  Cantidad de llaves: Abiertas(8)-Cerradas(8) | Lineas Totales: 21
Bien antes de terminar recuerda que si te gusto puedes apoyarme con un +1 me da inspiración a seguir aportando cositas :3 si tienes alguna duda o problema déjamelo en los comentarios, te la resolveré en un instante

me ayudas con este error ?
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 017: undefined symbol "params"
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : error 029: invalid expression, assumed zero
C:\Users\Usuario\Desktop\QZ3\OZ.pwn(12141) : fatal error 107: too many error messages on one line
Si lo quieres usar en Oz tendras que adactar el sistema
No tienes una para OZ ?
Avatar de Usuario
gless
Avanzado
Avanzado
Mensajes: 448
Registrado: 22 Oct 2017 04:10
Ubicación: Soy de una casa versátil.
Reputación: 28

27 Nov 2017 14:52

Productor músical
Programador
Editor Gráfico
Compositor
Cantante
Editor Audiovisual
AMX Booster
Mastering
Webmaster
Scripter
Y odioso, jeje..

Perdí mi facebook, cualquier problema hablarme por privado..

Liberaciones y aportes qué recuerdo.....

[AFK System Pause]: Ir a el sistema
[Pawno y sus funciones] [GUÍA]: Ir a la guía
[Include easyDialog]: Ir a la librería
Tunear vehículo vía comando]: Ir a el sistema
Include foreach: Ir a la librería
Declaraciones ¡RECOMENDADO!: Ir a la guía
Depuraciones y crasheos ¡RECOMENDADO! Ir a la guía
Ordenador policial para OZ: Ir al aporte
Cambiar personaje cómo GTA V: Ir al filterscript
Gamemode Stories of Sa: Ir al gamemode
Mensajes aleatorios: Ir al aporte
Sistema de administración BÁSICO: Ir a el sistema
Modifica tu servidor desde un comando: Ir al aporte
Mapa VC Para GTA.. Ir al aporte

"Pensemos en la modalidad de ayudar al prójimo y no en la competencia.."


Tony_Angelo
Aprendiz
Aprendiz
Mensajes: 46
Registrado: 15 Oct 2016 12:04
Reputación: 0

31 Dic 2017 19:19

Imagen quien me da una mano?
Liover
Aprendiz
Aprendiz
Mensajes: 3
Registrado: 24 May 2016 16:28
Reputación: 0

09 Mar 2018 12:12

amigo en que parte va el paso 2 y el ultimo?
quiang_lee
Aprendiz
Aprendiz
Mensajes: 41
Registrado: 26 Mar 2018 00:33
Reputación: 0

01 Abr 2018 23:25

Miwi escribió:
23 Nov 2017 14:37
Que tal gente, hoy el tío miwi les trae algo simple pero que a muchos les gustaran, es el sistema de /computadoras en los vehículos de LSPD, eh notado que muchos dueños de servidores me lo han pedido y después de que me diera unas vueltas decidí hacer uno y compartirlo no es tan complicado pero se ve bonito y le da mas rol a LSPD


Bien primero lo primero los #defines
 Codigo Pawno:
1

#define     PCPD                        (8754)
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 1

Bien ahora vamos a crear un if para que el comando solo se pueda usar en las patrullas yo solo pondré 2 ID de los vehículos de SAPD si ustedes tienen mas o otro tipo de autos solo modifiquen o agreguen mas
 Codigo Pawno:
1
2
3
4
5
6
7
8

IsAPCPD(carid)
{
	if(GetVehicleModel(carid) == ID VEH || GetVehicleModel(carid) == ID VEH)
	{
		return 1;
	}
	return 0;
}
  Cantidad de llaves: Abiertas(2)-Cerradas(2) | Lineas Totales: 8

Bien ahora vamos a crear el comando para LSPD nos vamos a nuestros comando o al final de la GM
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

CMD:computadora(playerid, params[])
{
 	if(IsACop(playerid))
  	{
   	if(IsAPCPD(carid))
     	{
        SafeDialogEx(playerid, PCPD, DIALOG_STYLE_LIST, "{0000FF}L.S.P.D{FFFFFF} Base de datos de SAPD","Buscar sospechosos\nPrender Sirenas\nEncender Radio de unidad\nEncender Luces\nEn Servicio", "Ok", "Cancelar");
     	}
      	else
       	{
        	SendClientMessageEx(playerid, -1,"{FF0000}[!Error!]{FFFFFF} No estas dentro de una unidad de policia");
        }
  	}
   	else
	{
 		SendClientMessageEx(playerid, , "{FF0000}[Anti-Haking]{FFFFFF} No intentes usar la base de datos del gobierno");
	}
	return 1;
}
  Cantidad de llaves: Abiertas(11)-Cerradas(11) | Lineas Totales: 19

Bien ahora vamos a crear el dialogresponse :u que feo suena eso
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

	if(dialogid == PCPD){
	    if(response == 1){
	        switch (listitem){
	            case 0:{
                                cmd_sospechosos(playerid, params);
				}
				case 1:{
                                cmd_sirena(playerid, params);
				}
				case 2:{
                                cmd_radio(playerid, params);
				}
				case 3:{
                                cmd_luces(playerid, params);
				}
				case 4:{
                                cmd_placaex(playerid, params);
				}
			}
		}
	}
  Cantidad de llaves: Abiertas(8)-Cerradas(8) | Lineas Totales: 21
Bien antes de terminar recuerda que si te gusto puedes apoyarme con un +1 me da inspiración a seguir aportando cositas :3 si tienes alguna duda o problema déjamelo en los comentarios, te la resolveré en un instante

no me aparece nada y quiero crear una computado para new estate version 2.8
Avatar de Usuario
Father Squirrel
Aprendiz
Aprendiz
Mensajes: 21
Registrado: 11 May 2016 15:17
Reputación: 1

07 Abr 2018 22:32

Buen sistema, facilmente se puede adaptar a otras bases y GM, doy repu :).
Imagen

Responder