InferNus` Vehicle Editor

/*
Created by:

	   ----- InferNus` -----
	   -----    |    | -----
	   ----- @  |\   | -----
	   -----    | \  | -----
	   ----- |  |  \ | -----
	   ----- |  |   \| -----
	   ----- |  |    | -----
	   ---------------------

*/

#include <a_samp>
#include <dutils>

/*** Colors ***/
#define Green 0x33FF3300
#define Green_dark 0x33AA3300
#define Cyan 0x33CCCC00
#define Blue 0x3300FF00
#define Red 0xFF000000
#define White 0xFFFFFF00
#define Black 0x00000000
#define Gray 0x99999900
#define Yellow 0xFFFF0000
#define Gold 0xFFCC0000
#define Pink 0xff519bff
#define carid GetPlayerVehicleID(playerid)

/*** Dialogs Defines ***/
#define VehCreateInfo 0
#define VehCreate 1
#define VehEditInfo 2
#define VehEdit 3

#pragma unused ret_memcpy

public OnFilterScriptInit()
{
	print(" == InferNus` == | Vehicles Loaded");
	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

public OnPlayerConnect(playerid)
{
	return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
	return 1;
}

public OnPlayerSpawn(playerid)
{
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
	return 1;
}

public OnVehicleSpawn(vehicleid)
{
	return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
	return 1;
}

public OnPlayerText(playerid, text[])
{
	return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
	new cmd[256], idx;
	cmd = strtok(cmdtext, idx);
	if(strcmp(cmd, "/vehhelp", true) == 0)
	{
        SendClientMessage(playerid, White, "----___ Vehicle Help ___----");
        SendClientMessage(playerid, Gray, "PLAYER: /unmodcar, /vehcre");
        if(IsPlayerAdmin(playerid)) SendClientMessage(playerid, Gray, "RCON ADMIN: /veh, /destroycar, /modcar, /repairvehicle");
		return 1;
	}
	if(strcmp(cmd, "/vehcre", true) == 0)
	{
        SendClientMessage(playerid, White, "----___ Vehicle Credits ___----");
        SendClientMessage(playerid, Gray, "Created by {00FFFF}InferNus`");
        SendClientMessage(playerid, Gray, "Enjoy it as you can.");
   		return 1;
	}
	if(strcmp(cmd, "/veh", true) == 0)
	{
		if(!IsPlayerAdmin(playerid)) return Error(playerid, "You are not Authorised to use this Command");
		if(!IsPlayerInAnyVehicle(playerid))
		{
			new cnt[500];
			format(cnt, sizeof(cnt), "{FFFF00}~~~~ Vehicle Creation ~~~~\n\n\n{33FFCC}Press 'Create', and Choose Vehicle Model ID.\n{33FFCC}Vehicle models can be found at:\n\n{FFFF00}http://www.http://wiki.sa-mp.com/wiki/Category:Vehicle");
			ShowPlayerDialog(playerid, VehCreateInfo, DIALOG_STYLE_MSGBOX, "{33FF33}Vehicle Creation", cnt, "Create", "Cancel");
			return 1;
		}
		if(IsPlayerInAnyVehicle(playerid))
		{
			Error(playerid, "You cannot use that command while in Vehicle!");
			return 1;
		}
		return 1;
	}
	if(strcmp(cmd, "/destroycar", true) == 0)
	{
		if(!IsPlayerAdmin(playerid)) return Error(playerid, "You are not Authorised to use this Command");
		if(!IsPlayerInAnyVehicle(playerid))
		{
			Error(playerid, "You are not in Vehicle!");
			return 1;
		}
		if(IsPlayerInAnyVehicle(playerid))
		{
			new l1[128];
            format(l1, sizeof(l1), "{FF0000}Vehicle Destroyed: {FFFFFF}Model: %d | Vehicle ID: %i ", GetVehicleModel(carid), carid);
            SendClientMessage(playerid, White, l1);
			DestroyVehicle(carid);
			return 1;
		}
		return 1;
	}
	if(strcmp(cmd, "/modcar", true) == 0)
	{
		if(!IsPlayerAdmin(playerid)) return Error(playerid, "You are not Authorised to use this Command");
		if(!IsPlayerInAnyVehicle(playerid))
		{
			Error(playerid, "You are not in Vehicle!");
			return 1;
		}
		if(IsPlayerInAnyVehicle(playerid))
		{
            new cnt[500];
			format(cnt, sizeof(cnt), "{FFFF00}~~~~ Vehicle Modding ~~~~\n\n\n{33FFCC}Press 'List', and Choose Vehicle Mod ID.");
            ShowPlayerDialog(playerid, VehEditInfo, DIALOG_STYLE_MSGBOX, "{33FF33}Vehicle Modding", cnt, "List", "Cancel");
			return 1;
		}
		return 1;
	}
	if(strcmp(cmd, "/unmodcar", true) == 0)
	{
		if(!IsPlayerInAnyVehicle(playerid))
		{
			Error(playerid, "You are not in Vehicle!");
			return 1;
		}
		if(IsPlayerInAnyVehicle(playerid))
		{
			SendClientMessage(playerid, White, "{FF0000}Vehicle Unmodded!");
			UnmodVehicle(carid);
   			return 1;
		}
		return 1;
	}
	if(strcmp(cmd, "/repairvehicle", true) == 0)
	{
		if(!IsPlayerAdmin(playerid)) return Error(playerid, "You are not Authorised to use this Command");
		if(!IsPlayerInAnyVehicle(playerid))
		{
			Error(playerid, "You are not in Vehicle!");
			return 1;
		}
		if(IsPlayerInAnyVehicle(playerid))
		{
			RepairVehicle(carid);
			SendClientMessage(playerid, White, "{33FF33}Vehicle Repaired!");
   			return 1;
		}
		return 1;
	}
	return 0;
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
	return 1;
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
	return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
	return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
	return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
	return 1;
}

public OnRconCommand(cmd[])
{
	return 1;
}

public OnPlayerRequestSpawn(playerid)
{
	return 1;
}

public OnObjectMoved(objectid)
{
	return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
	return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
	return 1;
}

public OnVehicleMod(playerid, vehicleid, componentid)
{
	return 1;
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
	return 1;
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
	return 1;
}

public OnPlayerSelectedMenuRow(playerid, row)
{
	return 1;
}

public OnPlayerExitedMenu(playerid)
{
	return 1;
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
	return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
	return 1;
}

public OnRconLoginAttempt(ip[], password[], success)
{
	return 1;
}

public OnPlayerUpdate(playerid)
{
	return 1;
}

public OnPlayerStreamIn(playerid, forplayerid)
{
	return 1;
}

public OnPlayerStreamOut(playerid, forplayerid)
{
	return 1;
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
	return 1;
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
	return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	if(dialogid == VehCreateInfo)
	{
        if(!response) return 1;
        ShowPlayerDialog(playerid, VehCreate, DIALOG_STYLE_INPUT, "{33FF33}Vehicle Creation", "{FFFFFF}Write down the Vehicle Model ID and Press 'Spawn'\n{FF0000}Note: You will be directed to the Vehicle you'll spawn.", "Spawn", "Cancel");
		return 1;
	}
	if(dialogid == VehCreate)
	{
        if(!response) return 1;
        if(!strlen(inputtext)) return Error(playerid, "You didn't wrote any Vehicle Model ID");
        if(strval(inputtext) < 400) return Error(playerid, "Invalid Vehicle Model ID");
        if(strval(inputtext) > 611) return Error(playerid, "Invalid Vehicle Model ID");
        new SpawnedVehicle;
        new Float:X,Float:Y,Float:Z,Float:A;
        GetPlayerPos(playerid, X,Y,Z);
        GetPlayerFacingAngle(playerid, A);
        SpawnedVehicle = CreateVehicle(strval(inputtext), X,Y,Z,A,1,1,600000);
        PutPlayerInVehicle(playerid, SpawnedVehicle, 0);
        new l1[128], l2[128];
        format(l1, sizeof(l1), "{FF0000}Vehicle Created: {FFFFFF}Model: %i | Color: White | Location:", strval(inputtext));
        format(l2, sizeof(l2), "{FFFFFF}X - %f | Y - %f | Z - %f | Angle - %f", X,Y,Z,A);
        SendClientMessage(playerid, White, l1), SendClientMessage(playerid, White, l2);
        return 1;
	}
	if(dialogid == VehEditInfo)
	{
        if(!response) return 1;
        new ModsInfo[500];
        format(ModsInfo, sizeof(ModsInfo), "{FF0000}[X10] {FFFF00}Nitro\n{FFFF00}Hydraulics\n{FFFF00}Gold Wheels\n{33CCCC}Transfender Set\n{33CCCC}Remington Set\n{33CCCC}Sultan Set");
        ShowPlayerDialog(playerid, VehEdit, DIALOG_STYLE_LIST, "{33FF33}Vehicle Modding", ModsInfo, "Mod", "Cancel");
		return 1;
	}
	if(dialogid == VehEdit)
	{
        if(!response) return 1;
        if(!IsPlayerInAnyVehicle(playerid)) return Error(playerid, "You are not in Vehicle!");
        if(listitem == 0)
        {
            AddVehicleComponent(carid, 1010);
            SendClientMessage(playerid, White, "{FF0000}[X10] {FFFF00}Nitro {33FF33}ADDED!");
            Error(playerid, "HINT: Might not work for some of the Vehicles.");
			return 1;
		}
		if(listitem == 1)
        {
            AddVehicleComponent(carid, 1087);
            SendClientMessage(playerid, White, "{FFFF00}Hydraulics {33FF33}ADDED!");
            Error(playerid, "HINT: Might not work for some of the Vehicles.");
			return 1;
		}
		if(listitem == 2)
        {
            AddVehicleComponent(carid, 1080);
            SendClientMessage(playerid, White, "{FFFF00}Gold Wheels {33FF33}ADDED!");
            Error(playerid, "HINT: Might not work for some of the Vehicles.");
			return 1;
		}
		if(listitem == 3)
        {
            AddVehicleComponent(carid, 1010);
            AddVehicleComponent(carid, 1080);
            AddVehicleComponent(carid, 1087);
            AddVehicleComponent(carid, 1000);
            AddVehicleComponent(carid, 1004);
            AddVehicleComponent(carid, 1006);
            AddVehicleComponent(carid, 1024);
            AddVehicleComponent(carid, 1018);
            AddVehicleComponent(carid, 1007);
            AddVehicleComponent(carid, 1142);
            AddVehicleComponent(carid, 1143);
            SendClientMessage(playerid, White, "{33CCCC}Transfender Set:");
            SendClientMessage(playerid, White, "{FF33FF}* Nitro, Hydraulics, Gold Wheels");
            SendClientMessage(playerid, White, "{FF33FF}* Lamps, Vents, Hood, Roof, Exhaust ({FFFF00}And more{FF33FF})");
            SendClientMessage(playerid, White, "{33FF33}Were ADDED!");
            Error(playerid, "HINT: Might not work for some of the Vehicles.");
			return 1;
		}
		if(listitem == 4)
        {
			if(GetVehicleModel(carid) != 534) return Error(playerid, "You need to be in 'Remington' Vehicle.");
            AddVehicleComponent(carid, 1010);
            AddVehicleComponent(carid, 1080);
            AddVehicleComponent(carid, 1087);
            AddVehicleComponent(carid, 1106);
            AddVehicleComponent(carid, 1124);
            AddVehicleComponent(carid, 1125);
            AddVehicleComponent(carid, 1126);
            AddVehicleComponent(carid, 1179);
            AddVehicleComponent(carid, 1180);
            SendClientMessage(playerid, White, "{33CCCC}Remington Set:");
            SendClientMessage(playerid, White, "{FF33FF}* Nitro, Hydraulics, Gold Wheels");
            SendClientMessage(playerid, White, "{FF33FF}* Bullbars, Skirts, Exhaust ({FFFF00}And more{FF33FF})");
            SendClientMessage(playerid, White, "{33FF33}Were ADDED!");
			return 1;
		}
		if(listitem == 5)
        {
			if(GetVehicleModel(carid) != 560) return Error(playerid, "You need to be in 'Sultan' Vehicle.");
            AddVehicleComponent(carid, 1010);
            AddVehicleComponent(carid, 1080);
            AddVehicleComponent(carid, 1087);
            AddVehicleComponent(carid, 1029);
            AddVehicleComponent(carid, 1030);
            AddVehicleComponent(carid, 1031);
            AddVehicleComponent(carid, 1033);
            AddVehicleComponent(carid, 1139);
            AddVehicleComponent(carid, 1140);
            AddVehicleComponent(carid, 1170);
            SendClientMessage(playerid, White, "{33CCCC}Sultan Set:");
            SendClientMessage(playerid, White, "{FF33FF}* Nitro, Hydraulics, Gold Wheels");
            SendClientMessage(playerid, White, "{FF33FF}* Spoilers, Skirts, Exhaust, Roofs ({FFFF00}And more{FF33FF})");
            SendClientMessage(playerid, White, "{33FF33}Were ADDED!");
			return 1;
		}
   		return 1;
	}
	return 1;
}

public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
	return 1;
}

stock Error(playerid, text[])
{
	new msg[128];
	format(msg, sizeof(msg), "  %s", text);
	return SendClientMessage(playerid, 0x99999900, msg);
}

stock UnmodVehicle(vehicleid)
{
    new Com0,Com1,Com2,Com3,Com4,Com5,Com6,Com7,Com8,Com9,Com10,Com11,Com12,Com13;
    Com0 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_SPOILER);
	Com1 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_HOOD);
	Com2 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_ROOF);
	Com3 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_SIDESKIRT);
	Com4 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_LAMPS);
	Com5 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_NITRO);
	Com6 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_EXHAUST);
	Com7 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_WHEELS);
	Com8 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_STEREO);
	Com9 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_HYDRAULICS);
	Com10 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_FRONT_BUMPER);
	Com11 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_REAR_BUMPER);
	Com12 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_VENT_RIGHT);
	Com13 = GetVehicleComponentInSlot(vehicleid, CARMODTYPE_VENT_LEFT);
    RemoveVehicleComponent(vehicleid, Com0);
    RemoveVehicleComponent(vehicleid, Com1);
    RemoveVehicleComponent(vehicleid, Com2);
    RemoveVehicleComponent(vehicleid, Com3);
    RemoveVehicleComponent(vehicleid, Com4);
    RemoveVehicleComponent(vehicleid, Com5);
    RemoveVehicleComponent(vehicleid, Com6);
    RemoveVehicleComponent(vehicleid, Com7);
    RemoveVehicleComponent(vehicleid, Com8);
    RemoveVehicleComponent(vehicleid, Com9);
    RemoveVehicleComponent(vehicleid, Com10);
    RemoveVehicleComponent(vehicleid, Com11);
    RemoveVehicleComponent(vehicleid, Com12);
    RemoveVehicleComponent(vehicleid, Com13);
	return 1;
}