(Aporte)Sistema de Robo al blindado sencillo!

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
NameDVB
Aprendiz
Aprendiz
Mensajes: 1
Registrado: 21 Jun 2019 13:53
Reputación: 0

30 Jun 2019 16:03

Bueno este es mi primer aporte, a la comunidad de Pawno Script.
Principalmente hago este aporte ya que estaba buscando un servidor para emprestarle mis servicio y no encontré y bueno decidí aportar esto aquí, es algo sencillo modificar los punto de entrega de bolsas de dinero y todo los otro que este en verde, ha y lo pueden mejorar ya que en solo algo básico y sencillo.

Esperoooo le guste -mu -dance4 -dance4

Esto es para la gm OZ -punk -punk

.:::New:::.
 Codigo Pawno:
1
2
3
4

new EnRoboBlindado[MAX_PLAYERS];
new TiempoSalidaBlin[MAX_PLAYERS];
new Text3D:BlosasTexto, CamionListo[MAX_PLAYERS], DinamitaMano[MAX_PLAYERS];
new CrearCamion, Text3D:DetonarTexto, YaFueColocada = 0;
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 4
.:::stock LimpiarCuenta:::.
 Codigo Pawno:
1
2
3
4
5

EnRoboBlindado[playerid] = 0;
TiempoSalidaBlin[playerid] = 0;
CamionListo[playerid] = 0;
DinamitaMano[playerid] = 0;
SeActivoCamion = 0;
  Cantidad de llaves: Abiertas(0)-Cerradas(0) | Lineas Totales: 5
.:::OnGameModeInit:::.
 Codigo Pawno:
1
2

SetTimer("CamionOn",5400000,true);//1h y 30 minutos
CreateDynamic3DTextLabel("{74F20C}Tomar Dinamita:{FFFFFF}\n/tomar dinamita {DBED15}(30.000$)",0xFFFFFFFF,00, 00, 00,10.0);//Lugar Donde quiere que salga el /tomar dinamita
  Cantidad de llaves: Abiertas(3)-Cerradas(3) | Lineas Totales: 2
.:::forward :::.
 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

forward CamionOn(playerid);
public CamionOn(playerid)
{
	CamionListo[playerid] = 1;
	YaFueColocada = 0;
	SeActivoCamion = 1;
	SetTimer("DesapareceCamion",1200000,true);
	CrearCamion = CreateVehicle(idcoche,x,y,z,angle,0,0,-1);
	DetonarTexto = CreateDynamic3DTextLabel("{74F20C}Robar Bolsas:{FFFFFF}\n/detonar dinamita",0xFFFFFFFF,00, 00, 00,10.0);//Lugar Donde quiere que salga el /detonar dinamita
	SendClientMessageToAll(-1,"{C939E6}[CNN]:{FFFFFF}Se dice que el camion blindado salio lleno de dinero hacia Las Aventuras");
	return 1;
}

forward DetonandoC(playerid);
public DetonandoC(playerid)
{
	BlosasTexto = CreateDynamic3DTextLabel("{74F20C}Robar Bolsas:{FFFFFF}\n/robar bolsas",0xFFFFFFFF,00, 00, 00,10.0);//Lugar Donde quiere que salga el /robar bolsas
}


forward DesapareceCamion(playerid);
public DesapareceCamion(playerid)
{
	if(CamionListo[playerid] == 1)
	{
        DestroyVehicle(CrearCamion);
	    DestroyDynamic3DTextLabel(BlosasTexto);
	}
}

forward MandarMensajeB(playerid);
public MandarMensajeB(playerid)
{
    new dineroblindado = random(8);
    switch(dineroblindado)
	{
		case 0:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Primer Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}200.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 1:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Segundo Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}300.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 2:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Tercer Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}400.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 3:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Cuarto Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}500.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 4:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Quinto Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}600.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 5:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Sexto Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}700.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 6:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Sestimo Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}800.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
		case 7:
		{
			SetPlayerCheckpoint(playerid,00,00,00,7.0);//Octavo Punto de entrega
	        SendClientMessage(playerid,-1,"{E76924}Revisaste la bolsa de dinero y conseguiste  {74F20C}100.000$");
            SendClientMessage(i, COLOR_DORADO, "((SMS del Maestro [Numero Desconocido])): No me hagas esperar trae el dinero, si no te la veras conmigo.");
            SendClientMessage(playerid,-1,"Se ha marcado en el mapa un punto ve.");
            EnRoboBlindado[playerid] = 1;
		}
	}
    return 1;
}
  Cantidad de llaves: Abiertas(36)-Cerradas(36) | Lineas Totales: 103
.:::Crear Stock:::.
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14

stock RobarBolsasC(playerid)
{
    new zone[MAX_ZONE_NAME];
    GetPlayer2DZone(playerid, zone, MAX_ZONE_NAME);
    SetTimerEx("MandarMensajeB",20000,false,"d",playerid);
    PlayerInfo[playerid][pCargos] = 5;
	SetPlayerWantedLevel(playerid, PlayerInfo[playerid][pCargos]);
	TipoCargo[playerid] = 1;
    SendClientMessage(playerid,-1,"{FFFFFF}El Guardia le aviso a la central y te cologo {74F20C}5(Cargos)");
    SendClientMessage(playerid,-1,"{FFFFFF}Te llegara en 20 segundo un mensaje del {74F20C}[Maestro]");
    format(string, 200,"{C939E6}[Gobierno GeratZone] {FFFFFF}¡ATENCION! Informan de un robo al {74F20C}Camion blindado:{FFFFFF}En (%s)",zone);
    SendRadioMessage(1,-1,string,INVALID_PLAYER_ID);
	return 1;
}
  Cantidad de llaves: Abiertas(9)-Cerradas(9) | Lineas Totales: 14
.:::OnPlayerEnterCheckpoint:::.
 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

if(EnRoboBlindado[playerid] != 1)
 	{
		if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(1)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,200000);
            SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(200.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(2)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,300000);
            SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(300.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(3)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,400000);
            SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(400.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(4)
	    {

        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,500000);
        	SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(500.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(5)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,600000);
        	SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(600.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(6)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,700000);
        	SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(700.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(7)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,800000);
        	SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(800.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Punto(8)
	    {
        	SetPlayerCheckpoint(playerid,00,00,00,7.0);//Punto Quitar Cargos
        	DarDinero(playerid,100000);
        	SendClientMessage(playerid,-1,"Felicitaciones, te has ganado {C939E6}(100.000$).");
        	SendClientMessage(playerid,-1,"Se ha marcado otro punto en el mapa ve.");
	        return 1;
    	}
    	if(IsPlayerInRangeOfPoint(playerid, 3.0,00,00))//Quitar Cargos
	    {
            EnRoboBlindado[playerid] = 0;
        	DisablePlayerCheckpoint(playerid);
        	PlayerInfo[playerid][pCargos] = 0;
	        SetPlayerWantedLevel(playerid, PlayerInfo[playerid][pCargos]);
	        TipoCargo[playerid] = 0;
	        SeActivoCamion != 0;
	        SendClientMessage(playerid,-1,"Limpiamos todo rastro tuyo la policia ya no te buscara.");
        	format(string, 200,"{C939E6}[Gobierno GeratZone] {FFFFFF}¡Oops! algo paso, perdimo la pista del sujeto que robo al camion blindado");
            SendRadioMessage(1,-1,string,INVALID_PLAYER_ID);
	        return 1;
    	}
    }
  Cantidad de llaves: Abiertas(20)-Cerradas(20) | Lineas Totales: 81
.:::CMD:ROBAR:::.
 Codigo Pawno:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

if(strcmp(item, "bolsas", true) == 0)
		{
            if(YaFueColocada != 1) return SendClientMessage(playerid,-1,"No han colocado una dinamita");
            if(PlayerInfo[playerid][pNivelLadron] == 2 && PlayerInfo[playerid][vip] == 1)
            {
                if(PlayerInfo[playerid][pWP2] == 24 || PlayerInfo[playerid][pWP3] == 27 || PlayerInfo[playerid][pWP5] == 30 ||PlayerInfo[playerid][pWP5] == 31)
                {
                    new pName[32];
                    GetPlayerName(playerid, pName, 32);
				    if(IsPlayerInRangeOfPoint(playerid, 2.0, 00,00,00))//Punto de robar bolsas
		            {
				        RobarBolsasC(playerid);
				        format(string,256,"%s comienza agarrar y meter el dinero en la bolsa.",pName);
				        ProxDetector(15.0, playerid, string, COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO);
			        }
			        else SendClientMessage(playerid,-1,"No estas en el lugar correcto");
		        }
		        else SendClientMessage(playerid,-1,"Debes tener una arma en mano [DK-M4-AK47-EDC]");
		    }
			else SendClientMessage(playerid,-1,"Necesitas ser level 2 de ladron");
	    }
  Cantidad de llaves: Abiertas(4)-Cerradas(4) | Lineas Totales: 21
.:::CMD:::.
 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

CMD:asaltos(playerid,params[])
{
	new string[256];
	new hora,minutos;
	gettime(hora, minutos);
	GetPlayerName(playerid, pName, 32);
	hora = 1;
	minutos = 30;
    format(string,256,"{C939E6}Camion blindado:{FFFFFF}Faltan {00CC00}%d{FFFFFF}h{00CC00}%d{FFFFFF}m para su salida",hora, minutos);
    SendClientMessage(playerid, -1, string);
    return 1;
}

CMD:tomar(playerid,params[])
{
	new dina[32],string[256],pName[32];
	GetPlayerName(playerid, pName, 32);
	if(!sscanf(params, "dinamita", dina))
	{
        if(IsPlayerInRangeOfPoint(playerid, 2.0, 00,00,00)) return SendClientMessage(playerid,-1,"No estas donde se comprar la dinamita");//Donde obtener dinamita
		if(DinamitaMano[playerid] == 0) return SendClientMessage(playerid,-1,"Ya tienes una dinamita");
		{
            DinamitaMano[playerid] = 1;
            QuitarDinero(playerid, 30000);
            SendClientMessage(playerid,-1,"{E76924}Se te a descontado {74F20C}30.000${FFFFFF} por la dinamita");
            format(string,256,"%s agarra una dinamita y la mete en su bolso",pName);
		    ProxDetector(15.0, playerid, string, COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO);
		}
    }
    return 1;
}

CMD:detonar(playerid,params[])
{
	new dina[32],string[256],pName[32];
	GetPlayerName(playerid, pName, 32);
	if(CamionListo[playerid] == 1)
	if(!sscanf(params, "dinamita", dina))
	{
        if(YaFueColocada != 0 && SeActivoCamion != 1)
		if(DinamitaMano[playerid] == 1) return SendClientMessage(playerid,-1,"Necesitas comprar una dinamita en el mercado negro");
		{
            SetTimer("DetonandoC",20000,true);
            YaFueColocada = 1;
            DestroyDynamic3DTextLabel(DetonarTexto);
            format(string,256,"%s coloca una dinamita que detonara en 20 segundos",pName);
		    ProxDetector(15.0, playerid, string, COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO,COLOR_VERDECLARO);
		}
    }
    return 1;
}
  Cantidad de llaves: Abiertas(16)-Cerradas(16) | Lineas Totales: 51
Avatar de Usuario
<\>Diego</>
Aprendiz
Aprendiz
Mensajes: 84
Registrado: 25 Feb 2018 13:38
Ubicación: localhost
Reputación: 7

30 Jun 2019 16:12

hola amigo espero estes bien.

1 el lenguaje de programacion es pawn no pawno, ya que pawno solo es el editor de codigo.

2 es muy recomendable poner fotos de tus aportes.

espero crescas en esta comunidad -good -bye
Imagen<\>Diego</>#4162

Aportes:
Telefono Con Texdraws [viewtopic.php?f=40&t=34001]

Copyright © Pueden Usar Mis Aportes Sin Respetar Creditos . Todos los Derechos Reservados.
Responder