lr_occ/client/main.lua

557 lines
21 KiB
Lua
Raw Normal View History

2024-07-21 09:07:35 +07:00
LR = {}
LR.__index = LR
local coroutine_yield = coroutine.yield
ostime = GlobalState.ostime
function LR:Init()
local o = {}
setmetatable(o, LR)
o.PlayerData = {}
if ESX.IsPlayerLoaded() then
o.PlayerData = ESX.GetPlayerData()
end
o.CurrentZone = nil
o.ZoneDistance = nil
o.NUIOpen = false
o.Blips = {}
o.RadiusBlips = {}
o.SelfRadius = {}
o.YellowRadius = {}
o.PulseBlip = nil
o.Capturing = false
o.CurCapture = nil
o.canC = false
o:EventHandler()
o:ZoneThread()
o:MainThread()
o:BlipsThread()
return o
end
function LR:EventHandler()
RegisterNetEvent("esx:playerLoaded", function(xPlayer)
self.PlayerData = xPlayer
end)
RegisterNetEvent("esx:setJob", function(org)
self.PlayerData.org = org
end)
RegisterNetEvent("lr_occ2:client:startCapture", function(index, name)
local zone = Config.Occ[index]
self.CurCapture = index
self:ShowNotification("warning", ("%s đang bị chiếm bởi %s"):format(zone.Label, name), true)
TriggerEvent("lr_captcha:close")
self:PulseBlipF(index)
end)
RegisterNetEvent("lr_occ:client:cancelCapture", function(index, name)
local zone = Config.Occ[index]
self:ShowNotification("warning",
("%s đã hủy chiếm khu vực %s, mọi người có thể tiến hành chiếm khu vực lại sau 120 giây nữa"):format(name,
zone.Label))
TriggerEvent("lr_captcha:close")
self:UnPulse()
self.Capturing = false
self.CurCapture = nil
end)
RegisterNetEvent("lr_occ:client:captured", function(index, name, gang)
local zone = Config.Occ[index]
if self.CurrentZone == index then
--SetCurrentPedWeapon(PlayerPedId(), "WEAPON_UNARMED", true) --cam ban
end
--TriggerServerEvent("lr_occ:server:addPoint", gang, zone.point)
self:ShowNotification("success",
("%s đã chiếm thành công %s mang về %s điểm cho %s"):format(name, zone.Label, zone.point, gang))
TriggerEvent("lr_captcha:close")
self:UnPulse()
self.Capturing = false
self.CurCapture = nil
Wait(5000)
self:BlipsThread()
end)
RegisterNetEvent("lr_occ2:client:openOcc", function(isOpen)
if isOpen then
self:ShowNotification("warning", "Đã bắt đầu thời gian chiếm đóng")
else
self:ShowNotification("warning", "Đã kết thúc thời gian chiếm đóng")
end
end)
end
function LR:BlipsThread()
for k, v in pairs(self.Blips) do
RemoveBlip(v)
end
for k, v in pairs(self.RadiusBlips) do
RemoveBlip(v)
end
for k, v in pairs(self.SelfRadius) do
RemoveBlip(v)
end
for k, v in pairs(GlobalState.Occ) do
local p = v.Pos
local Cblip = AddBlipForRadius(p.x, p.y, p.z, v.oRadius)
SetBlipColour(Cblip, 5)
SetBlipAlpha(Cblip, 150)
SetBlipHighDetail(Cblip, true)
SetBlipRotation(Cblip, 0.0)
SetBlipDisplay(Cblip, 4)
SetBlipAsShortRange(Cblip, false)
SetBlipHiddenOnLegend(Cblip, true)
self.YellowRadius[k] = Cblip
local blip = AddBlipForCoord(p.x, p.y, p.z)
SetBlipSprite(blip, v.owner and GlobalState.GangBlips[v.owner].sprite or 78)
SetBlipDisplay(blip, 2)
SetBlipScale(blip, v.owner and 1.2 or 0.9)
SetBlipColour(blip, 0)
SetBlipAsShortRange(blip, true)
SetBlipHighDetail(blip, true)
BeginTextCommandSetBlipName("STRING")
AddTextComponentString(("Khu Vực Chiếm Đóng [%s]"):format(v.Label))
EndTextCommandSetBlipName(blip)
self.Blips[k] = blip
local Ablip = AddBlipForRadius(p.x, p.y, p.z, v.Radius)
SetBlipColour(Ablip, 1)
SetBlipAlpha(Ablip, 150)
SetBlipHighDetail(Ablip, true)
SetBlipRotation(Ablip, 0.0)
SetBlipDisplay(Ablip, 4)
SetBlipAsShortRange(Ablip, false)
SetBlipHiddenOnLegend(Ablip, true)
self.RadiusBlips[k] = Ablip
local Bblip = AddBlipForRadius(p.x, p.y, p.z, v.cRadius)
SetBlipColour(Bblip, 7)
SetBlipAlpha(Bblip, 200)
SetBlipHighDetail(Bblip, true)
SetBlipRotation(Bblip, 0.0)
SetBlipDisplay(Bblip, 4)
SetBlipAsShortRange(Bblip, false)
SetBlipHiddenOnLegend(Bblip, true)
self.SelfRadius[k] = Bblip
end
end
function LR:ZoneThread()
self.CurCapture = lib.callback.await("lr_occ2:callback:getCurCapture", false)
Citizen.CreateThread(function()
while true do
coroutine_yield(0)
local ped = PlayerPedId()
local pedCoords = GetEntityCoords(ped)
local z
for k, v in pairs(Config.Occ) do
local distance = #(pedCoords - v.Pos)
if distance <= v.Radius then
-- TriggerEvent("LRPT:SetWhiteList", false)
SetEntityCanBeDamaged(ped, true)
if self.CurrentZone == nil then
TriggerServerEvent("lr_occ2:server:join", k)
LocalPlayer.state:set('inOcc', true, false)
end
self.CurrentZone = k
self.ZoneDistance = distance
self.lastJoin = k
self.lastZone = k
z = k
self:NUI()
--[[if self.CurCapture == k then
local joinTime = GlobalState.ostime - self.PlayerData.org.join_date
if joinTime < 172800 then
ESX.ShowNotification("Thời gian gia nhập băng đảng của bạn")
ESX.ShowNotification("không đủ để tham gia chiếm đóng")
ESX.ShowNotification("Bạn sẽ được teleport về garage")
SetEntityCoords(PlayerPedId(), 215.67095947266, -809.82708740234, 30.739696502686, 0.0, 0.0, 0.0, false)
TriggerServerEvent("lr_occ2:server:leave", k)
LocalPlayer.state:set('inOcc', false, false)
self.lastZone = nil
end
end--]]
goto continue
break
elseif distance > v.Radius and distance < v.oRadius then
if self.CurrentZone == nil then
local veh = GetVehiclePedIsIn(ped, false)
local vehHash = GetEntityModel(veh)
if Config.BlockVehicle[vehHash] then
SetEntityAsMissionEntity(veh, true, true)
DeleteVehicle(veh)
end
self.CurrentZone = k
self.ZoneDistance = distance
TriggerServerEvent("lr_occ2:server:join", k)
LocalPlayer.state:set('inOcc', true, false)
end
DisablePlayerFiring(PlayerId(), true)
self.lastZone = k
if self.lastJoin == nil then
-- TriggerEvent("LRPT:SetWhiteList", true)
SetEntityCanBeDamaged(ped, false)
end
z = k
goto continue2
break
end
end
if z == nil then
TriggerEvent("LRPT:SetWhiteList", false)
SetEntityCanBeDamaged(ped, true)
if self.lastZone then
TriggerServerEvent("lr_occ2:server:leave", self.lastZone)
LocalPlayer.state:set('inOcc', false, false)
self.lastZone = nil
end
end
self.CurrentZone = nil
self.ZoneDistance = nil
::continue::
Wait(1000)
::continue2::
end
end)
end
local KEYS = {
['E'] = 38,
['B'] = 29,
['Q'] = 44,
['Z'] = 20,
['G'] = 47,
['Z'] = 48
}
local CONTROL = { 'E', 'B', 'Q', 'Z', 'G', 'Z' }
function GetRandomControl()
local rd = math.random(1, #CONTROL)
return CONTROL[rd]
end
local cA, cB, cC = GetRandomControl(), GetRandomControl(), GetRandomControl()
local pA, pB, pC = false, false
local HELP = ("Nhấn ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ ~%s~[%s]~w~ để chiếm")
--[[ function LR:GetRandomKeyPress(cb)
Citizen.CreateThread(function()
local keys = {}
for i = 1, 10, 1 do
local k = GetRandomControl()
table.insert(keys, k)
end
local crKey = 1
while self.ZoneDistance <= 1.0 and not self.Capturing and not self.CurCapture and self.canC do
coroutine_yield(0)
ShowHelpNotification(HELP:format(crKey > 1 and 'g' or 'r', keys[1], crKey > 2 and 'g' or 'r', keys[2], crKey > 3 and 'g' or 'r', keys[3], crKey > 4 and 'g' or 'r', keys[4], crKey > 5 and 'g' or 'r', keys[5], crKey > 6 and 'g' or 'r', keys[6], crKey > 7 and 'g' or 'r', keys[7], crKey > 8 and 'g' or 'r', keys[8], crKey > 9 and 'g' or 'r', keys[9], crKey > 10 and 'g' or 'r', keys[10]))
for k, v in pairs(KEYS) do
DisableControlAction(0, v, true)
if IsDisabledControlJustReleased(0, v) then
if keys[crKey] == k then
crKey = crKey + 1
if crKey > 10 then
cb(true)
return
end
else
cb(false)
return
end
end
end
end
cb()
return
end)
end ]]
function LR:MainThread()
local t = 0
Citizen.CreateThread(function()
Wait(2000)
local OutzoneAttemp = nil
local timeout = 0
local lastPress = 0
while true do
coroutine_yield(0)
if self.CurrentZone ~= nil then
LocalPlayer.state:set('occ', true, false)
local zone = Config.Occ[tostring(self.CurrentZone)]
local pos = zone.Pos
DrawMarker(1, pos.x, pos.y, pos.z - 100.100, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, zone.Radius * 2, zone.Radius *
2, 200.0, 255, 0, 0, 100, false, true, 2, nil, nil, false)
DrawMarker(1, pos.x, pos.y, pos.z - 1.100, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 2.0, 2.0, 2.0, 255, 0, 0, 100,
false, true, 2, nil, nil, false)
--if self.ZoneDistance <= 1.0 and not self.Capturing and not self.CurCapture and GlobalState.OccOpen then
if self.ZoneDistance <= 1.0 and not self.Capturing and not self.CurCapture and self.canC and GlobalState.OccOpen then
--ShowHelpNotification("Nhấn [E] để chiếm")
TriggerEvent("hm_hud:toggleNotifyHelp", {
press = cooldown, -- neu true thi sang false thi toi
key = "E", -- text phim tat
msg = "để chiếm",
percent = 0 -- thoi gian nut e sang len
})
if IsControlJustReleased(0, 38) then
if GetGameTimer() - lastPress > 5000 then
lastPress = GetGameTimer()
ESX.TriggerServerCallback("lr_occ2:callback:CanCapture", function(canCapture)
if canCapture then
self.Capturing = true
end
self.IsBusy = false
end, self.CurrentZone)
else
lastPress = GetGameTimer()
ESX.ShowNotification('Vui lòng không SPAM')
end
end
end
if self.Capturing then
if self.ZoneDistance > zone.cRadius then
if OutzoneAttemp == 0 then
OutzoneAttemp = ostime
self:ShowNotification("warning",
"Chiếm đóng sẽ bị hủy sau 10 giây nếu không quay lại khu vực chiếm đóng")
else
if ostime - OutzoneAttemp > 10 then
OutzoneAttemp = 0
TriggerServerEvent("lr_occ2:server:cancelCapture")
self.Capturing = false
end
end
else
if OutzoneAttemp ~= 0 then
OutzoneAttemp = 0
end
end
if GetEntityHealth(PlayerPedId()) <= 0 then
OutzoneAttemp = 0
TriggerServerEvent("lr_occ2:server:cancelCapture")
self.Capturing = false
end
end
local i = 0
local zoneData = GlobalState.ZoneData[self.CurrentZone]
if zoneData then
for k, v in pairs(zoneData) do
SetTextFont(0)
SetTextProportional(0)
SetTextScale(0.3, 0.3)
SetTextColour(255, 255, 255, 255)
SetTextDropshadow(0, 0, 0, 0, 255)
SetTextEdge(1, 0, 0, 0, 255)
SetTextDropShadow()
SetTextOutline()
BeginTextCommandDisplayText("STRING")
AddTextComponentSubstringPlayerName(("[%s]: %s"):format(k, v))
EndTextCommandDisplayText(0.01, 0.5 + i)
i = i + 0.02
end
end
else
if self.Capturing then
TriggerServerEvent("lr_occ2:server:cancelCapture")
end
LocalPlayer.state:set('occ', false, false)
if self.NUIOpen then
self.NUIOpen = false
self:TogglePanel2(false)
end
Wait(1000)
end
end
end)
end
function LR:NUI()
if (IsPedInAnyVehicle(PlayerPedId(), false) or IsPlayerFreeAiming(PlayerId()) or IsPlayerDead(PlayerId())) and self.NUIOpen then
self.NUIOpen = false
self:TogglePanel2(false)
elseif not self.NUIOpen and not IsPedInAnyVehicle(PlayerPedId(), false) and not IsPlayerFreeAiming(PlayerId()) and not IsPlayerDead(PlayerId()) then
self.NUIOpen = true
self:TogglePanel2(true)
end
local globalCurCapture = GlobalState.CurrentCapture
if globalCurCapture[self.CurrentZone] ~= nil then
local zone = Config.Occ[self.CurrentZone]
self.canC = false
self:SetDataPanel2({
type = "capturing",
data = {
name = zone.Label,
point = zone.point,
time = zone.time - (ostime - globalCurCapture[self.CurrentZone].startAt),
player = globalCurCapture[self.CurrentZone].name
}
})
else
local zone = GlobalState.Occ[self.CurrentZone]
local d = ostime - GlobalState.LastCapture
if d < Config.Delay then
self.canC = false
self:SetDataPanel2({
type = "blocked",
data = {
name = zone.Label,
point = zone.point,
time = Config.Delay - d
}
})
else
if zone.lastCapture ~= nil then
local d = ostime - zone.lastCapture
if d < Config.DelayPoint then
self.canC = false
self:SetDataPanel2({
type = "blocked",
data = {
name = zone.Label,
point = zone.point,
owner = zone.owner,
time = Config.DelayPoint - d
}
})
else
if zone.owner ~= nil then
self.canC = true
self:SetDataPanel2({
type = "owned",
data = {
name = zone.Label,
point = zone.point,
owner = zone.owner
}
})
else
self.canC = true
self:SetDataPanel2({
type = "allow",
data = {
name = zone.Label,
point = zone.point,
time = zone.time
}
})
end
end
else
if zone.owner ~= nil then
self.canC = true
self:SetDataPanel2({
type = "owned",
data = {
name = zone.Label,
point = zone.point,
owner = zone.owner
}
})
else
self.canC = true
self:SetDataPanel2({
type = "allow",
data = {
name = zone.Label,
point = zone.point,
time = zone.time
}
})
end
end
end
end
end
function LR:TogglePanel2(t)
SendNUIMessage({
event = "toggle-panel2",
data = t
})
end
function LR:SetDataPanel2(data)
SendNUIMessage({
event = "data-panel2",
data = data
})
end
function LR:ShowNotification(type, msg, playSound)
SendNUIMessage({
event = "notification",
data = {
type = type,
msg = msg,
playSound = playSound
}
})
end
function LR:PulseBlipF(index)
local zoneCoords = Config.Occ[index].Pos
local Pblip = AddBlipForCoord(zoneCoords.x, zoneCoords.y, zoneCoords.z)
SetBlipSprite(Pblip, 161)
SetBlipScale(Pblip, 2.0)
SetBlipColour(Pblip, 1)
PulseBlip(Pblip)
self.PulseBlip = Pblip
end
function LR:UnPulse()
RemoveBlip(self.PulseBlip)
self.PulseBlip = nil
end
ESX = nil
Citizen.CreateThread(function()
while ESX == nil do
Wait(0)
ESX = exports["es_extended"]:getSharedObject()
end
Wait(5000)
while GlobalState.GangBlips == nil do
Wait(100)
end
LR:Init()
while true do
Wait(1000)
ostime = ostime + 1
if GlobalState.ostime > ostime then ostime = GlobalState.ostime end
end
end)
RegisterCommand("thaneo", function()
if IsPedInAnyBoat(PlayerPedId()) then
local veh = GetVehiclePedIsIn(PlayerPedId(), false)
local driver = GetPedInVehicleSeat(veh, -1)
if driver == PlayerPedId() then
FreezeEntityPosition(veh, true)
else
ESX.ShowNotification("Bạn phải lái phương tiện này")
end
else
ESX.ShowNotification("Bạn phải ở trên tàu hoặc thuyền để sử dụng lệnh này")
end
end, false)
RegisterCommand("huythaneo", function()
if IsPedInAnyBoat(PlayerPedId()) then
local veh = GetVehiclePedIsIn(PlayerPedId(), false)
local driver = GetPedInVehicleSeat(veh, -1)
if driver == PlayerPedId() then
FreezeEntityPosition(veh, false)
else
ESX.ShowNotification("Bạn phải lái phương tiện này")
end
else
ESX.ShowNotification("Bạn phải ở trên tàu hoặc thuyền để sử dụng lệnh này")
end
end, false)
ShowHelpNotification = function(msg, thisFrame, beep, duration)
AddTextEntry('esxHelpNotification', "<FONT FACE='arial font'>" .. msg .. "</FONT>")
if thisFrame then
DisplayHelpTextThisFrame('esxHelpNotification', false)
else
if beep == nil then beep = true end
BeginTextCommandDisplayHelp('esxHelpNotification')
EndTextCommandDisplayHelp(0, false, beep, duration or -1)
end
end