esx_core/client/esx_jobs_cl.lua

local Keys = {
	["ESC"] = 322, ["F1"] = 288, ["F2"] = 289, ["F3"] = 170, ["F5"] = 166, ["F6"] = 167, ["F7"] = 168, ["F8"] = 169, ["F9"] = 56, ["F10"] = 57,
	["~"] = 243, ["1"] = 157, ["2"] = 158, ["3"] = 160, ["4"] = 164, ["5"] = 165, ["6"] = 159, ["7"] = 161, ["8"] = 162, ["9"] = 163, ["-"] = 84, ["="] = 83, ["BACKSPACE"] = 177,
	["TAB"] = 37, ["Q"] = 44, ["W"] = 32, ["E"] = 38, ["R"] = 45, ["T"] = 245, ["Y"] = 246, ["U"] = 303, ["P"] = 199, ["["] = 39, ["]"] = 40, ["ENTER"] = 18,
	["CAPS"] = 137, ["A"] = 34, ["S"] = 8, ["D"] = 9, ["F"] = 23, ["G"] = 47, ["H"] = 74, ["K"] = 311, ["L"] = 182,
	["LEFTSHIFT"] = 21, ["Z"] = 20, ["X"] = 73, ["C"] = 26, ["V"] = 0, ["B"] = 29, ["N"] = 249, ["M"] = 244, [","] = 82, ["."] = 81,
	["LEFTCTRL"] = 36, ["LEFTALT"] = 19, ["SPACE"] = 22, ["RIGHTCTRL"] = 70,
	["HOME"] = 213, ["PAGEUP"] = 10, ["PAGEDOWN"] = 11, ["DELETE"] = 178,
	["LEFT"] = 174, ["RIGHT"] = 175, ["TOP"] = 27, ["DOWN"] = 173,
	["NENTER"] = 201, ["N4"] = 108, ["N5"] = 60, ["N6"] = 107, ["N+"] = 96, ["N-"] = 97, ["N7"] = 117, ["N8"] = 61, ["N9"] = 118
}

local PlayerData              = {}
local menuIsShowed			  = false
local hintIsShowed			  = false


local hasAlreadyEnteredMarker = false
local Blips                   = {}
local JobBlips                = {}

local collectedItem           = nil
local collectedQtty			  = 0
local collectedQttyUpToDate   = false
local previousCollectedItem   = nil
local previousCollectedQtty	  = 0
local isInMarker              = false
local isInPublicMarker        = false

local newTask                 = false
local hintToDisplay           = "no hint to display"
local jobDone                 = false
local onDuty				  = false
local moneyInBank			  = 0

local spawner 				  = 0
local myPlate                 = {}

local isJobVehicleDestroyed   = false

local cautionVehicleInCaseofDrop 	= 0
local maxCautionVehicleInCaseofDrop = 0
local vehicleObjInCaseofDrop		= nil
local vehicleInCaseofDrop 			= nil
local vehicleHashInCaseofDrop 		= nil
local vehicleMaxHealthInCaseofDrop	= nil
local vehicleOldHealthInCaseofDrop	= nil

ESX = nil

Citizen.CreateThread(function()
	while ESX == nil do
		TriggerEvent('esx:getSharedObject', function(obj) ESX = obj end)
		Citizen.Wait(0)
	end
end)

RegisterNetEvent('esx:playerLoaded')
AddEventHandler('esx:playerLoaded', function(xPlayer)
    PlayerData = xPlayer
    TriggerServerEvent('esx_jobs:giveBackCautionInCaseOfDrop')
    refreshBlips()
end)

AddEventHandler('esx_jobs:publicTeleports', function(position)
	SetEntityCoords(GetPlayerPed(-1), position.x, position.y, position.z)
end)

function OpenMenu()
	ESX.UI.Menu.CloseAll()

	ESX.UI.Menu.Open(
		'default', GetCurrentResourceName(), 'cloakroom',
		{
			title    = _U('cloakroom'),
			elements = {
				{label = _U('job_wear'), value = 'job_wear'},
				{label = _U('citizen_wear'), value = 'citizen_wear'}
			}
		},
		function(data, menu)
			if data.current.value == 'citizen_wear' then
				onDuty = false
				ESX.TriggerServerCallback('esx_skin:getPlayerSkin', function(skin)
	    			TriggerEvent('skinchanger:loadSkin', skin)
				end)
			end
			if data.current.value == 'job_wear' then
				onDuty = true
				ESX.TriggerServerCallback('esx_skin:getPlayerSkin', function(skin, jobSkin)
	    			if skin.sex == 0 then
	    				TriggerEvent('skinchanger:loadClothes', skin, jobSkin.skin_male)
					else
	    				TriggerEvent('skinchanger:loadClothes', skin, jobSkin.skin_female)
					end
				end)
			end
			menu.close()
		end,
		function(data, menu)
			menu.close()
		end
	)
end

AddEventHandler('esx_jobs:action', function(job, zone)
	menuIsShowed = true
	if zone.Type == "cloakroom" then
		OpenMenu()
	elseif zone.Type == "work" then
		hintToDisplay = "no hint to display"
		hintIsShowed = false
		local playerPed = GetPlayerPed(-1)
		if IsPedInAnyVehicle(playerPed, 0) then
			TriggerEvent('esx:showNotification', _U('foot_work'))
		else
			TriggerServerEvent('esx_jobs:startWork', zone.Item)
		end
	elseif zone.Type == "vehspawner" then
		TriggerServerEvent('esx_jobs:requestPlayerData', 'refresh_bank_account')
		local spawnpt = nil
		local deliverypt = nil
		local vehicle = nil

		for k,v in pairs(Config.Jobs) do
			if PlayerData.job.name == k then
				for l,w in pairs(v.Zones) do
					if (w.Type == "vehspawnpt") and (w.Spawner == zone.Spawner) then
						spawnpt = w
						spawner = w.Spawner
					end
				end
				for m,x in pairs(v.Vehicles) do
					if (x.Spawner == zone.Spawner) then
						vehicle = x
					end
				end
			end
		end

		local caution = zone.Caution

		if deliverypt == nil then
			deliverypt = 0
		end

		TriggerServerEvent('esx_jobs:setCautionInCaseOfDrop', caution)
		cautionVehicleInCaseofDrop = caution
		maxCautionVehicleInCaseofDrop = cautionVehicleInCaseofDrop

		spawncar(spawnpt, vehicle)

	elseif zone.Type == "vehdelete" then
		local looping = true
		for k,v in pairs(Config.Jobs) do
			if PlayerData.job.name == k then
				for l,w in pairs(v.Zones) do
					if (w.Type == "vehdelete") and (w.Spawner == zone.Spawner) then
						local playerPed = GetPlayerPed(-1)
						if IsPedInAnyVehicle(playerPed, 0) then
							local vehicle = GetVehiclePedIsIn(playerPed, 0)
							local plate = GetVehicleNumberPlateText(vehicle)
							plate = string.gsub(plate, " ", "")
							local driverPed = GetPedInVehicleSeat(vehicle, -1)
							for i=1, #myPlate, 1 do
								if (myPlate[i] == plate) and (playerPed == driverPed) then
									TriggerServerEvent('esx_jobs:caution', "give_back", cautionVehicleInCaseofDrop, 0, 0)
									DeleteVehicle(GetVehiclePedIsIn(playerPed, 0))

									if w.Teleport ~= 0 then
										SetEntityCoords(GetPlayerPed(-1), w.Teleport.x, w.Teleport.y, w.Teleport.z)
									end

									TriggerEvent('esx_vehiclelock:updatePlayerCars', "remove", myPlate[i])
									table.remove(myPlate, i)

									if vehicleObjInCaseofDrop.HasCaution then
										cautionVehicleInCaseofDrop = 0
										maxCautionVehicleInCaseofDrop = 0
										vehicleInCaseofDrop = nil
										vehicleHashInCaseofDrop = nil
										vehicleMaxHealthInCaseofDrop = nil
										vehicleOldHealthInCaseofDrop = nil
										vehicleObjInCaseofDrop = nil
										TriggerServerEvent('esx_jobs:setCautionInCaseOfDrop', 0)
									end

									break
								end
							end
						end
						looping = false
						break
					end
					if looping == false then
						break
					end
				end
			end
			if looping == false then
				break
			end
		end
	elseif zone.Type == "delivery" then
		if Blips['delivery'] ~= nil then
			RemoveBlip(Blips['delivery'])
			Blips['delivery'] = nil
		end
		hintToDisplay = "no hint to display"
		hintIsShowed = false
		TriggerServerEvent('esx_jobs:startWork', zone.Item)
	end
	--nextStep(zone.GPS)
end)

function nextStep(gps)
	if gps ~= 0 then
		if Blips['delivery'] ~= nil then
			RemoveBlip(Blips['delivery'])
			Blips['delivery'] = nil
		end
		Blips['delivery'] = AddBlipForCoord(gps.x, gps.y, gps.z)
		SetBlipRoute(Blips['delivery'], true)
		TriggerEvent('esx:showNotification', _U('next_point'))
	end
end

-- #########################
AddEventHandler('esx_jobs:hasExitedMarker', function(zone)
	TriggerServerEvent('esx_jobs:stopWork')
	hintToDisplay = "no hint to display"
	menuIsShowed = false
	hintIsShowed = false
	isInMarker = false
	SendNUIMessage({
		showControls = false,
		showMenu     = false,
	})
end)

RegisterNetEvent('esx:setJob')
AddEventHandler('esx:setJob', function(job)
	PlayerData.job = job
	onDuty = false
	myPlate = {} -- loosing vehicle caution in case player changes job.
	isJobVehicleDestroyed = false
	spawner = 0
	--deleteBlips()
	--refreshBlips()
end)

function deleteBlips()
	if JobBlips[1] ~= nil then
		for i=1, #JobBlips, 1 do
			RemoveBlip(JobBlips[i])
			table.remove(JobBlips, i)
		end
	end
end

function refreshBlips()
	local zones = {}
	local blipInfo = {}
	if PlayerData.job ~= nil then
		for jobKey,jobValues in pairs(Config.Jobs) do
			for zoneKey,zoneValues in pairs(jobValues.Zones) do
				if zoneValues.Blip then
					local blip = AddBlipForCoord(zoneValues.Pos.x, zoneValues.Pos.y, zoneValues.Pos.z)
					SetBlipSprite (blip, jobValues.BlipInfos.Sprite)
					SetBlipDisplay(blip, 4)
					SetBlipScale  (blip, 1.2)
					SetBlipColour (blip, jobValues.BlipInfos.Color)
					SetBlipAsShortRange(blip, true)
					BeginTextCommandSetBlipName("STRING")
					AddTextComponentString(zoneValues.Name)
					EndTextCommandSetBlipName(blip)
					table.insert(JobBlips, blip)
				end
			end
		end
	end
end

function spawncar(spawnPoint, vehicle)
	hintToDisplay = "no hint to display"
	hintIsShowed = false
	TriggerServerEvent('esx_jobs:caution', "take", cautionVehicleInCaseofDrop, spawnPoint, vehicle)
end

RegisterNetEvent('esx_jobs:spawnJobVehicle')
AddEventHandler('esx_jobs:spawnJobVehicle', function(spawnPoint, vehicle)
	local playerPed = GetPlayerPed(-1)
	local coords = spawnPoint.Pos
	local vehicleModel = GetHashKey(vehicle.Hash)

	RequestModel(vehicleModel)
	while not HasModelLoaded(vehicleModel) do
		Citizen.Wait(0)
	end

	local plate = math.random(100, 900)
	if not IsAnyVehicleNearPoint(coords.x, coords.y, coords.z, 5.0) then
		local veh = CreateVehicle(vehicleModel, coords.x, coords.y, coords.z, spawnPoint.Heading, true, false)

		if vehicle.Trailer ~= "none" then
			RequestModel(vehicle.Trailer)

			while not HasModelLoaded(vehicle.Trailer) do
				Citizen.Wait(0)
			end

			local trailer = CreateVehicle(vehicle.Trailer, coords.x, coords.y, coords.z, spawnPoint.Heading, true, false)
			AttachVehicleToTrailer(veh, trailer, 1.1)
		end

		SetVehicleHasBeenOwnedByPlayer(veh,  true)
		SetEntityAsMissionEntity(veh,  true,  true)
		local id = NetworkGetNetworkIdFromEntity(veh)
		SetNetworkIdCanMigrate(id, true)

		local platePrefix = "WORK"
		for k,v in pairs(Config.Plates) do
			if PlayerData.job.name == k then
				platePrefix = v
			end
		end

		plate = platePrefix .. plate
		SetVehicleNumberPlateText(veh, plate)
		table.insert(myPlate, plate)
		plate = string.gsub(plate, " ", "")
		TriggerEvent('esx_vehiclelock:updatePlayerCars', "add", plate)
		SetVehRadioStation(veh, "OFF")
		TaskWarpPedIntoVehicle(playerPed, veh, -1)
		isJobVehicleDestroyed = false

		if vehicle.HasCaution then
			vehicleInCaseofDrop = veh
			vehicleHashInCaseofDrop = vehicle.Hash
			vehicleObjInCaseofDrop = vehicle
			vehicleMaxHealthInCaseofDrop = GetEntityMaxHealth(veh)
			vehicleOldHealthInCaseofDrop = vehicleMaxHealthInCaseofDrop
		end
	end
end)

-- Show top left hint
Citizen.CreateThread(function()
	while true do
		Wait(0)
		if hintIsShowed == true then
			SetTextComponentFormat("STRING")
			AddTextComponentString(hintToDisplay)
			DisplayHelpTextFromStringLabel(0, 0, 1, -1)
		end
	end
end)

-- Display markers (only if on duty and the player's job ones)
Citizen.CreateThread(function()
	while true do
		Wait(0)
		local zones = {}
		if PlayerData.job ~= nil then
			for k,v in pairs(Config.Jobs) do
				if PlayerData.job.name == k then
					zones = v.Zones
				end
			end

			local coords = GetEntityCoords(GetPlayerPed(-1))
			for k,v in pairs(zones) do
				if onDuty or v.Type == "cloakroom" or PlayerData.job.name == "reporter" then
					if(v.Marker ~= -1 and GetDistanceBetweenCoords(coords, v.Pos.x, v.Pos.y, v.Pos.z, true) < Config.DrawDistance) then
						DrawMarker(v.Marker, v.Pos.x, v.Pos.y, v.Pos.z, 0.0, 0.0, 0.0, 0, 0.0, 0.0, v.Size.x, v.Size.y, v.Size.z, v.Color.r, v.Color.g, v.Color.b, 100, false, true, 2, false, false, false, false)
					end
				end
			end
		end
	end
end)

-- Display public markers
Citizen.CreateThread(function()
	while true do
		Wait(0)
		local coords = GetEntityCoords(GetPlayerPed(-1))
		for k,v in pairs(Config.PublicZones) do
			if(v.Marker ~= -1 and GetDistanceBetweenCoords(coords, v.Pos.x, v.Pos.y, v.Pos.z, true) < Config.DrawDistance) then
				DrawMarker(v.Marker, v.Pos.x, v.Pos.y, v.Pos.z, 0.0, 0.0, 0.0, 0, 0.0, 0.0, v.Size.x, v.Size.y, v.Size.z, v.Color.r, v.Color.g, v.Color.b, 100, false, true, 2, false, false, false, false)
			end
		end
	end
end)

-- Activate public marker
Citizen.CreateThread(function()
	while true do
		Wait(0)
		local coords      = GetEntityCoords(GetPlayerPed(-1))
		local position    = nil
		local zone        = nil

		for k,v in pairs(Config.PublicZones) do
			if(GetDistanceBetweenCoords(coords, v.Pos.x, v.Pos.y, v.Pos.z, true) < v.Size.x) then
				isInPublicMarker = true
				position = v.Teleport
				zone = v
				break
			else
				isInPublicMarker  = false
			end
		end

		if IsControlJustReleased(0, Keys["E"]) and isInPublicMarker then
			TriggerEvent('esx_jobs:publicTeleports', position)
		end

		-- hide or show top left zone hints
		if isInPublicMarker then
			hintToDisplay = zone.Hint
			hintIsShowed = true
		else
			if not isInMarker then
				hintToDisplay = "no hint to display"
				hintIsShowed = false
			end
		end
	end
end)

-- Activate menu when player is inside marker
Citizen.CreateThread(function()
	while true do
		Wait(0)

		if PlayerData.job ~= nil and PlayerData.job.name ~= 'unemployed' then
			local zones = nil
			local job = nil

			for k,v in pairs(Config.Jobs) do
				if PlayerData.job.name == k then
					job = v
					zones = v.Zones
				end
			end

			if zones ~= nil then
				local coords      = GetEntityCoords(GetPlayerPed(-1))
				local currentZone = nil
				local zone 		  = nil
				local lastZone    = nil

				for k,v in pairs(zones) do
					if(GetDistanceBetweenCoords(coords, v.Pos.x, v.Pos.y, v.Pos.z, true) < v.Size.x) then
						isInMarker  = true
						currentZone = k
						zone        = v
						break
					else
						isInMarker  = false
					end
				end

				if IsControlJustReleased(0, Keys["E"]) and not menuIsShowed and isInMarker then
					if onDuty or zone.Type == "cloakroom" or PlayerData.job.name == "reporter" then
						TriggerEvent('esx_jobs:action', job, zone)
					end
				end

				-- hide or show top left zone hints
				if isInMarker and not menuIsShowed then
					hintIsShowed = true
					if (onDuty or zone.Type == "cloakroom" or PlayerData.job.name == "reporter") and zone.Type ~= "vehdelete" then
						hintToDisplay = zone.Hint
						hintIsShowed = true
					elseif zone.Type == "vehdelete" and (onDuty or PlayerData.job.name == "reporter") then
						local playerPed = GetPlayerPed(-1)
						if IsPedInAnyVehicle(playerPed, 0) then
							local vehicle = GetVehiclePedIsIn(playerPed)
							local driverPed = GetPedInVehicleSeat(vehicle, -1)
							local isVehicleOwner = false
							local plate = GetVehicleNumberPlateText(vehicle)
							plate = string.gsub(plate, " ", "")
							for i=1, #myPlate, 1 do
								Citizen.Trace(myPlate[i])
								if (myPlate[i] == plate) and (playerPed == driverPed) then
									hintToDisplay = zone.Hint .. "\n" .. _U('security_deposit') .. cautionVehicleInCaseofDrop .. "~s~."
									isVehicleOwner = true
									break
								end
							end
							if not isVehicleOwner then
								hintToDisplay = _U('not_your_vehicle')
							end
						else
							hintToDisplay = _U('in_vehicle')
						end
						hintIsShowed = true
					elseif onDuty and zone.Spawner ~= spawner then
						hintToDisplay = _U('wrong_point')
						hintIsShowed = true
					else
						if not isInPublicMarker then
							hintToDisplay = "no hint to display"
							hintIsShowed = false
						end
					end
				end

				if isInMarker and not hasAlreadyEnteredMarker then
					hasAlreadyEnteredMarker = true
				end

				if not isInMarker and hasAlreadyEnteredMarker then
					hasAlreadyEnteredMarker = false
					TriggerEvent('esx_jobs:hasExitedMarker', zone)
				end
			end
		end
	end
end)

-- VEHICLE CAUTION
Citizen.CreateThread(function()
	while true do
		Wait(0)
		if vehicleInCaseofDrop ~= nil then
			if onDuty and IsVehicleModel(vehicleInCaseofDrop, vehicleHashInCaseofDrop) then
				local vehicleHealth = GetEntityHealth(vehicleInCaseofDrop)
				if vehicleOldHealthInCaseofDrop ~= vehicleHealth then
					local cautionValue = 0
				    vehicleOldHealthInCaseofDrop = vehicleHealth
				    if vehicleHealth == vehicleMaxHealthInCaseofDrop then
				    	cautionValue = maxCautionVehicleInCaseofDrop
				    	cautionVehicleInCaseofDrop = cautionValue
				    else
						local healthPct = (vehicleHealth * 100) / vehicleMaxHealthInCaseofDrop
						local damagePct = 100 - healthPct
						cautionValue =  math.ceil(cautionVehicleInCaseofDrop - cautionVehicleInCaseofDrop * damagePct * 2.5 / 100)
						if cautionValue < 0 then
						    cautionValue = 0
						elseif cautionValue >= cautionVehicleInCaseofDrop then
						    cautionValue = cautionVehicleInCaseofDrop
						end
						cautionVehicleInCaseofDrop = cautionValue
					end
					TriggerServerEvent('esx_jobs:setCautionInCaseOfDrop', cautionValue)
				end
			end
		end
	end
end)

-- Menu Controls
Citizen.CreateThread(function()
	while true do
		Wait(0)
		if IsControlJustReleased(0, Keys['ENTER']) or IsControlJustReleased(0, Keys['E']) then
			SendNUIMessage({ enterPressed = true })
		elseif IsControlJustReleased(0, Keys['BACKSPACE']) then
			SendNUIMessage({ backspacePressed = true })
		elseif IsControlJustReleased(0, Keys['LEFT']) then
			SendNUIMessage({ move = 'LEFT' })
		elseif IsControlJustReleased(0, Keys['RIGHT']) then
			SendNUIMessage({ move = 'RIGHT' })
		elseif IsControlJustReleased(0, Keys['TOP']) then
			SendNUIMessage({ move = 'UP' })
		elseif IsControlJustReleased(0, Keys['DOWN']) then
			SendNUIMessage({ move = 'DOWN' })
		end
	end
end)