DestinationVIPsystem

/* DestinationVIP pirmas update!

	Pakeisti šie dalykai :

	1. Pridėti 4 transportai, juos galite gauti parašę /vtransportas ( iš viso 5 ).
	2. Pridėtas VIP'ų chatas.
	3. Viskas labiau optimatizuota.
	4. Ačiū ES.^ už mažutę pagalbą. :)

*/
#include <a_samp>
#include <zcmd>

#define Raudona 0xFF0000AA
#define Zalia 0x00EA00FF

new NegalimaNaudoti[MAX_PLAYERS];
new Laikmatis;
new bool:VIP[MAX_PLAYERS];

new NRG, Elegy, Infernus, Sraigtasparnis, HYDRA;

public OnFilterScriptInit()
{
	print(" dVIP v0.1 PALEISTAS");
	return 1;
}

public OnFilterScriptExit()
{
	print(" dVIP v0.1 UŽDAROMAS");
	return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	if(dialogid == 1)
	{
		if(response)
		{
		    new zinute[256], vardas[25];
		    GetPlayerName(playerid, vardas, sizeof(vardas));
		    format(zinute, sizeof(zinute), "{FF0000}VIP Narys %s : {FFFFFF}%s", vardas, inputtext);
		    SendClientMessageToAll(Raudona, zinute);
		}
	}
	if(dialogid == 2)
	{
	    if(response)
	    {
	        if(listitem == 0)
	        {
         		Laikmatis = SetTimerEx("LaikasKolNegalima", 120000, false, "d", playerid);
         		NegalimaNaudoti[playerid] = 1;
	            new prizai = random(5);
	            switch(prizai)
	            {
	                case 0: GivePlayerWeapon(playerid, 24, 24), SendClientMessage(playerid, Zalia, "Laimėjote ginklą su 24 kulkom!");
	                case 1: GivePlayerMoney(playerid, 50000), SendClientMessage(playerid, Zalia, "Laimėjote 50000 žalių!");
					case 2: SetPlayerHealth(playerid, 100), SetPlayerArmour(playerid, 100), SendClientMessage(playerid, Zalia, "Laimėjote šarvus bei gyvybes!");
					case 3: SetPlayerScore(playerid, GetPlayerScore(playerid)+2000), SendClientMessage(playerid, Zalia, "Laimėjote 2000 patirties taškų!");
					case 4: SetPlayerHealth(playerid, 1), SetPlayerArmour(playerid, 100), SendClientMessage(playerid, Raudona, "Dabar tu turi 1 gyvybę ir 100 armoro!");
					case 5: SendClientMessage(playerid, Raudona, "Nieko nelaimėjai!");
				}
			}
		}
	}
	if(dialogid == 3)
	{
	    if(response)
	    {
	        new Float:pos[3];
	        GetPlayerPos(playerid, pos[0], pos[1], pos[2]);
	        if(listitem == 0)
	        {
				NRG = CreateVehicle(522, pos[0], pos[1], pos[2], 0, 1, 1, 0);
				PutPlayerInVehicle(playerid, NRG, 0);
				SendClientMessage(playerid, Zalia, "Tu gavai NRG-500");
			}
			if(listitem == 1)
			{
			    Elegy = CreateVehicle(562, pos[0], pos[1], pos[2], 0, 1, 1, 0);
			    PutPlayerInVehicle(playerid, Elegy, 0);
			    SendClientMessage(playerid, Zalia, "Gavai Elegy");
			}
			if(listitem == 2)
			{
			    Infernus = CreateVehicle(411, pos[0], pos[1], pos[2], 0, 1, 1, 0);
			    PutPlayerInVehicle(playerid, Infernus, 0);
			    SendClientMessage(playerid, Zalia, "Gavai Infernus");
			}
			if(listitem == 3)
			{
			    Sraigtasparnis = CreateVehicle(487, pos[0], pos[1], pos[2]+15, 0, 1, 1, 0);
			    PutPlayerInVehicle(playerid, Sraigtasparnis, 0);
			    SendClientMessage(playerid, Zalia, "Gavai Sraigtasparni");
			}
			if(listitem == 4)
			{
			    HYDRA = CreateVehicle(520, pos[0], pos[1], pos[2], 0, 1, 1, 0);
			    PutPlayerInVehicle(playerid, HYDRA, playerid);
			    SendClientMessage(playerid, Zalia, "Gavai HYDRAAAAAAAAAAAAAAAAAAAAA");
			}
		}
	}
	if(dialogid == 4)
	{
	    if(response)
	    {
	        new zin[128], vardas[128];
	        GetPlayerName(playerid, vardas, sizeof(vardas));
	        format(zin, sizeof(zin), "{FF0000}[VIP CHAT] {FFFFFF}%s {FF0000}: %s", vardas, zin);
	        VipChatas(0xFF0000FF, zin);
		}
	}
	return 1;
}

forward LaikasKolNegalima(playerid);
public LaikasKolNegalima(playerid)
{
	NegalimaNaudoti[playerid] = 0;
	KillTimer(Laikmatis);
}

forward Keturi();
public Keturi()
{
	SetTimer("Trys", 3200, false);
	GameTextForAll("~g~-~y~4~g~-", 2000, 3);
}

forward Trys();
public Trys()
{
	SetTimer("Du", 3200, false);
	GameTextForAll("~g~-~y~3~g~-", 2000, 3);
}

forward Du();
public Du()
{
	SetTimer("Vienas", 3200, false);
	GameTextForAll("~g~-~y~2~g~-", 2000, 3);
}

forward Vienas();
public Vienas()
{
	SetTimer("GoGoGo", 3200, false);
	GameTextForAll("~g~-~y~1~g~-", 2000, 3);
}

forward GoGoGo();
public GoGoGo()
{
    GameTextForAll("~g~-~y~GO GO GO~g~-", 2000, 3);
}

COMMAND:vip(playerid, params[])
{
    if(VIP[playerid] == true) return SendClientMessage(playerid, Raudona, "Tu ir taip VIP'as!");
	VIP[playerid] = true;
	SetPlayerColor(playerid, Raudona);
	SendClientMessage(playerid, Zalia, "Tu dabar esi VIP'as.");
	return 1;
}

COMMAND:vskelbti(playerid, params[])
{
	if(VIP[playerid] == false) return SendClientMessage(playerid, Raudona, "Tu ne VIP'as!");
	ShowPlayerDialog(playerid, 1, DIALOG_STYLE_INPUT, "{FF0000}VIP Skelbimas", "{FFFFFF}Apačion į laukelį įveskite ką norite skelbti visiems žaidėjams.", "Skelbti", "Atšaukti");
	return 1;
}

COMMAND:rtd(playerid, params[])
{
	if(NegalimaNaudoti[playerid] == 1) return SendClientMessage(playerid, Raudona, "Dar negali naudoti šios komandos");
	if(VIP[playerid] == false) return SendClientMessage(playerid, Raudona, "Tu ne VIP'as!");
	ShowPlayerDialog(playerid, 2, DIALOG_STYLE_LIST, "{FF0000}RollTheDice", "{FFFFFF}Mesti Kauliuką", "Rinktis", "Atšaukti");
	return 1;
}

COMMAND:skaic(playerid, params[])
{
    if(VIP[playerid] == false) return SendClientMessage(playerid, Raudona, "Tu ne VIP'as!");
	SetTimer("Keturi", 3200, false);
	GameTextForAll("~g~-~y~5~g~-", 2000, 3);
	return 1;
}

COMMAND:vtransportas(playerid, params[])
{
	if(VIP[playerid] == false) return SendClientMessage(playerid, Raudona, "Tu ne VIP'as!");
	ShowPlayerDialog(playerid, 3, DIALOG_STYLE_LIST, "{FF0000}VIP Mašinos", "{FFFFFF}NRG-500.\nElegy.\nInfernus.\nSraigtasparnis.\nHYDRAAA :D", "Rinktis", "Atšaukti");
	return 1;
}

COMMAND:vchat(playerid, params[])
{
	if(VIP[playerid] == false) return SendClientMessage(playerid, Raudona, "Tu ne VIP'as!");
	ShowPlayerDialog(playerid, 4, DIALOG_STYLE_INPUT, "{FF0000}VIP Chat'o žinutė", "{FFFFFF}Įvesk tai ką nori išsiųsti VIP nariams", "Siųsti", "Atšaukti");
	return 1;
}

stock VipChatas(color, message[])
{
	for(new i; i <MAX_PLAYERS; i++)
	{
	    if(VIP[i] == true)
	    {
	        SendClientMessage(i, color, message);
		}
	}
	return 1;
}