1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese

Threaded Mode
[Pedido] Comando de Neon para socios!
Wictor
Little Clucker
**
Posts: 20
Threads: 7
Joined: Nov 2012
Reputation: 0
#1

15.11.2012, 10:12
Me ajudem ai, quero o comando de /neon para os sуcios colocarem neon onde quiserem sem lugar especifico.

Meu comando de socio й :
Code:
if(strcmp(cmd, "/darvip", true) == 0)
	{
	    if(IsPlayerConnected(playerid))
	    {
	        if(PlayerInfo[playerid][pAdmin] < 1337)
	    	{
				MSGPLAYER(playerid, COLOR_GRAD1, "Vocк nгo tem autorizaзгo para usar esse comando.");
				return 1;
	    	}
	    	VipVaga();
	    	if(VagaSobrando == 0)
	    	{
				MSGPLAYER(playerid, COLOR_GRAD1, "Nгo hб mais vagas na lista use /limparvip primeiro.");
				return 1;
	    	}
			tmp = strtok(cmdtext, idx);
			if(!strlen(tmp))
			{
				MSGPLAYER(playerid, COLOR_GRAD2, "USE: /darvip [id] [Nivel]");
				return 1;
			}
			new para1;
			new level;
			para1 = ReturnUser(tmp);
			tmp = strtok(cmdtext, idx);
			if(!strlen(tmp))
			{
				MSGPLAYER(playerid, COLOR_GRAD2, "USE: /darvip [id] [Nivel]");
				return 1;
			}
			level = strval(tmp);
			GetPlayerName(para1, giveplayer, sizeof(giveplayer));
			GetPlayerName(playerid, sendername, sizeof(sendername));
		    if(IsPlayerConnected(para1))
		    {
		        if(para1 != INVALID_PLAYER_ID)
		        {
					format(string, sizeof string, "Vocк deu VIP Nнvel %d para %s", level, giveplayer);
					MSGPLAYER(playerid, COLOR_LIGHTBLUE, string);
					format(string, sizeof string, "Vocк ganhou VIP Nнvel %d do admin %s", level, sendername);
					MSGPLAYER(para1, COLOR_LIGHTBLUE, string);
					getdate(year, month, day);
					gettime(hour,minute,second);
					format(string, sizeof(string), "%s deu vip ao %s nнvel %d (%d/%d/%d - %d:%d)",sendername,giveplayer,level,day, month, year,hour, minute);
					VipsLog(string);
					PlayerInfo[para1][pVIP] = level;
					new var03 = 0;
					for(new i = 0; i < sizeof(VipInfo); i++)
				    {
				        if(strcmp(giveplayer,VipInfo[i][vNick],true)==0)
				        {
				            VipInfo[i][vTipo] = level;
				            SaveVip();
				            var03 = 1;
				            break;
				        }
					}
					if(var03 == 0)
					{
					    for(new i = 0; i < sizeof(VipInfo); i++)
				    	{
				        	if(strcmp("Ninguem",VipInfo[i][vNick],true)==0)
					        {
		    	    		    strmid(VipInfo[i][vNick], giveplayer, 0, strlen(giveplayer), 255);
		    	    		    VipInfo[i][vTipo] = level;
					            SaveVip();
					            break;
							}
						}
					}
				}
			}
		}
		return 1;
	}
O Nivel 3 й Socio
Find
Reply
Nice-.-
Huge Clucker
****
Posts: 378
Threads: 43
Joined: Oct 2012
Reputation: 0
#2

15.11.2012, 10:24
poste o comando /neon
Find
Reply
[NRG]Dark
Big Clucker
***
Posts: 167
Threads: 7
Joined: Nov 2011
Reputation: 0
#3

15.11.2012, 10:35
( Last edited by [NRG]Dark; 16/11/2012 at 11:54 PM. )
no topo do GM:

Code:
#define menuneon    678

forward RemoverNeon(playerid);
forward IsABike(vehicleid);
Na CallBack OnDialogResponse:

Code:
if(dialogid == menuneon)
	{
		if(response)
		{
			if(listitem == 0)
			{


			//blue
			SetPVarInt(playerid, "Status", 1);
            SetPVarInt(playerid, "neon", CreateObject(18648,0,0,0,0,0,0));
            SetPVarInt(playerid, "neon1", CreateObject(18648,0,0,0,0,0,0));
            AttachObjectToVehicle(GetPVarInt(playerid, "neon"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
            AttachObjectToVehicle(GetPVarInt(playerid, "neon1"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
   			 }
			if(listitem == 1)
			{


			 //red
				SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "neon2", CreateObject(18647,0,0,0,0,0,0));
	            SetPVarInt(playerid, "neon3", CreateObject(18647,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon2"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon3"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);

}
			if(listitem == 2)
			{


			//green
		   	   SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "neon4", CreateObject(18649,0,0,0,0,0,0));
	            SetPVarInt(playerid, "neon5", CreateObject(18649,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon4"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon5"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            SendClientMessage(playerid, 0xFFFFFFAA, "neon installed");

	            }
			if(listitem == 3)
			{

			//white
		   	   SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "neon6", CreateObject(18652,0,0,0,0,0,0));
	            SetPVarInt(playerid, "neon7", CreateObject(18652,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon6"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon7"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);

}
			if(listitem == 4)
			{


			//pink
		   	   SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "neon8", CreateObject(18651,0,0,0,0,0,0));
	            SetPVarInt(playerid, "neon9", CreateObject(18651,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon8"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon9"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);

}
			if(listitem == 5)
			{


			//yellow
  				 SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "neon10", CreateObject(18650,0,0,0,0,0,0));
	            SetPVarInt(playerid, "neon11", CreateObject(18650,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon10"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon11"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);

}
			if(listitem == 6)
			{


			//police
   	 		   SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "neon12", CreateObject(18646,0,0,0,0,0,0));
	            SetPVarInt(playerid, "neon13", CreateObject(18646,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon12"), GetPlayerVehicleID(playerid), -0.8, 0.0, -0.70, 0.0, 0.0, 0.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "neon13"), GetPlayerVehicleID(playerid), 0.8, 0.0, -0.70, 0.0, 0.0, 0.0);

	            }

	           	if(listitem == 7)
				{
	            SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "interior", CreateObject(18646,0,0,0,0,0,0));
	            SetPVarInt(playerid, "interior1", CreateObject(18646,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "interior"), GetPlayerVehicleID(playerid), 0, -0.0, 0, 2.0, 2.0, 3.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "interior1"), GetPlayerVehicleID(playerid), 0, -0.0, 0, 2.0, 2.0, 3.0);

	            }
          	if(listitem == 8)
			{

			//back
	            SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "back", CreateObject(18646,0,0,0,0,0,0));
	            SetPVarInt(playerid, "back1", CreateObject(18646,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "back"), GetPlayerVehicleID(playerid), -0.0, -1.5, -1, 2.0, 2.0, 3.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "back1"), GetPlayerVehicleID(playerid), -0.0, -1.5, -1, 2.0, 2.0, 3.0);
	            }
            	if(listitem == 9)
				{

				//front
	            SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "front", CreateObject(18646,0,0,0,0,0,0));
	            SetPVarInt(playerid, "front1", CreateObject(18646,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "front"), GetPlayerVehicleID(playerid), -0.0, 1.5, -0.6, 2.0, 2.0, 3.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "front1"), GetPlayerVehicleID(playerid), -0.0, 1.5, -0.6, 2.0, 2.0, 3.0);
	            }
	            if(listitem == 10)
				{
	            //undercover
	            SetPVarInt(playerid, "Status", 1);
	            SetPVarInt(playerid, "undercover", CreateObject(18646,0,0,0,0,0,0));
	            SetPVarInt(playerid, "undercover1", CreateObject(18646,0,0,0,0,0,0));
	            AttachObjectToVehicle(GetPVarInt(playerid, "undercover"), GetPlayerVehicleID(playerid), -0.5, -0.2, 0.8, 2.0, 2.0, 3.0);
	            AttachObjectToVehicle(GetPVarInt(playerid, "undercover1"), GetPlayerVehicleID(playerid), -0.5, -0.2, 0.8, 2.0, 2.0, 3.0);
	            }
			if(listitem == 11)
			{
			//remove neon
            DestroyObject(GetPVarInt(playerid, "neon"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon1"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon2"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon3"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon4"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon5"));
			DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon6"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon7"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon8"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon9"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon10"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon11"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon12"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "neon13"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "interior"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "interior1"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "back"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "back1"));
            DeletePVar(playerid, "Status");
			DestroyObject(GetPVarInt(playerid, "front"));
			DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "front1"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "undercover"));
            DeletePVar(playerid, "Status");
            DestroyObject(GetPVarInt(playerid, "undercover1"));

            DeletePVar(playerid, "Status");


	 	      }
		 }
		 }
Na Callback OnPlayerDisconnect:

Code:
RemoverNeon(playerid);
Nos Comandos:

Code:
if (strcmp("/neon", cmd, true) == 0) {
    if (IsPlayerInAnyVehicle(playerid) && PlayerInfo[playerid][pVIP] > 0) {
        new vehid = GetPlayerVehicleID(playerid);
        if (IsABike(vehid)) {
            SendClientMessage(playerid, VERMELHO, "Nгo й possivel instalar neon nesse veнculo");
            return 1;
        }
        ShowPlayerDialog(playerid, menuneon, DIALOG_STYLE_LIST, "Escolha a cor", "Azul\nVermelho\nVerde\nBranco\nRosa\nAmarelo\nPolice\nInterior Lights\nNeon traseiro\nNeon dianteiro\nUndercover Roof Light\nDesligar Neon", "Select", "Cancel");
    } else {
        SendClientMessage(playerid, VERMELHO, "Vocк nгo estб em um veнculo!");
    }
    return 1;
}
no Final do GM:

Code:
public IsABike(vehicleid)
{
new id = GetVehicleModel(vehicleid);
if( id==448 || id==461 || id==462 || id==463 || id==468 || id==481 || id==509 || id==510 || id==521 || id==522 || id==523 || id==581 || id==586){
	return true;
}else{
	return false;
}
}

public RemoverNeon(playerid)
{
DestroyObject(GetPVarInt(playerid, "neon"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon1"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon2"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon3"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon4"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon5"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon6"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon7"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon8"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon9"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon10"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon11"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon12"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "neon13"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "interior"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "interior1"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "back"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "back1"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "front"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "front1"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "undercover"));
DeletePVar(playerid, "Status");
DestroyObject(GetPVarInt(playerid, "undercover1"));
DeletePVar(playerid, "Status");
}
Find
Reply
Wictor
Little Clucker
**
Posts: 20
Threads: 7
Joined: Nov 2012
Reputation: 0
#4

15.11.2012, 10:47
Vo testa aki
Find
Reply
[NRG]Dark
Big Clucker
***
Posts: 167
Threads: 7
Joined: Nov 2011
Reputation: 0
#5

15.11.2012, 10:48
Estarei aguardando no tуpico
Find
Reply
Wictor
Little Clucker
**
Posts: 20
Threads: 7
Joined: Nov 2012
Reputation: 0
#6

15.11.2012, 11:44
Deu erro
Code:
C:\Users\Wictor\Documents\GMS\Brasil Power Life 2\gamemodes\BPA.pwn(25536) : error 017: undefined symbol "frente"
C:\Users\Wictor\Documents\GMS\Brasil Power Life 2\gamemodes\BPA.pwn(25536) : error 017: undefined symbol "vehicleid"
C:\Users\Wictor\Documents\GMS\Brasil Power Life 2\gamemodes\BPA.pwn(25538) : error 017: undefined symbol "p"
C:\Users\Wictor\Documents\GMS\Brasil Power Life 2\gamemodes\BPA.pwn(25538) : error 029: invalid expression, assumed zero
C:\Users\Wictor\Documents\GMS\Brasil Power Life 2\gamemodes\BPA.pwn(25538) : error 017: undefined symbol "blico"
C:\Users\Wictor\Documents\GMS\Brasil Power Life 2\gamemodes\BPA.pwn(25538) : fatal error 107: too many error messages on one line

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




6 Errors.

Linhas :

Code:
frente IsABike (vehicleid);

pъblico IsABike (vehicleid)
{
novo ID GetVehicleModel = (vehicleid);
if (id == 448 | | id == 461 | | id == 462 | | id == 463 | | id == 468 | | id == 481 | | id == 509 | | id == 510 | | id == 521 | | id == 522 | | id == 523 | | id == 581 | | id == 586) {
	return true;
Else {}
	return false;
}
}
Find
Reply
Wictor
Little Clucker
**
Posts: 20
Threads: 7
Joined: Nov 2012
Reputation: 0
#7

15.11.2012, 12:53
( Last edited by Wictor; 15/11/2012 at 01:35 PM. Reason: erro )
Me ajudem pfv
Find
Reply
[NRG]Dark
Big Clucker
***
Posts: 167
Threads: 7
Joined: Nov 2011
Reputation: 0
#8

15.11.2012, 15:41
Desculpe, ficou faltando coisa mesmo.

Jб edito corrigindo
Find
Reply
Wictor
Little Clucker
**
Posts: 20
Threads: 7
Joined: Nov 2012
Reputation: 0
#9

15.11.2012, 16:49
Quote:
Originally Posted by [NRG]Dark
View Post
Desculpe, ficou faltando coisa mesmo.

Jб edito corrigindo
Ok! Poste nesse tуpico assim que puder
Find
Reply
[NRG]Dark
Big Clucker
***
Posts: 167
Threads: 7
Joined: Nov 2011
Reputation: 0
#10

16.11.2012, 23:55
Editado!!

Olhe lб
Find
Reply
Vinicius_TroLL
Huge Clucker
****
Posts: 351
Threads: 75
Joined: May 2012
Reputation: 0
#11

17.11.2012, 09:58
pъblico ? Q eu saiba й Public
Find
Reply
« Next Oldest | Next Newest »


Forum Jump:


Users browsing this thread: 2 Guest(s)
  1. SA-MP Forums Archive
  2. Non-English
  3. Languages
  4. Português/Portuguese