VehicleGodMode no script

[HirlanPacheco]

O "VehicleGodMode" não está ativando, o carro ainda toma dano e explode no perímetro... O que falta?

RestricLocation = {}
TeleportLocation = {}
EnabledAlarm = true
ColCuboid = false

--------------------------------------- CONFIGS --------------------------------------------


RestricLocation["location1"] = {-454.89999389648, -1782, 36.900001525879}  --Local PARTE DE CIMA
RestricLocation["location2"] = {-395.29998779297, -1676.5999755859, 10}  --LOCAL PARTE DE BAIXO
TeleportLocation = {-384.079, -1678.615, 22.101} --LOCAL TO TELEPORT PLAYER
GroupName = "Snake" 
GroupNameBy = 2 -- 1 
MsgInvasao = "Não entre, base do Snake, propriedade privada!"
EnableVehicleGodMode = true
HabilitarAdmin = true 
GodMode = false 
NaoAtirar = false 

maxAutos = 5

--------------------------------------- CONFIGS --------------------------------------------

function sendMsg(iplayer,msg)
  outputChatBox(msg,iplayer,255,0,0,true)
end

function getVehicleType2(veh)
  vt = getVehicleType(veh)
  if vt == "Automobile" or vt == "Bike" or vt == "BMX" or vt == "Monster Truck" or vt == "Quad" or vt == "Plane" or vt == "Helicopter" then
    return "automobiles"
  end
end
function getVehiclesInsideBase(Colshape)
  automobiles,aircrafts = 1,1
  if isElement(Colshape) then
    for i,veh in pairs(getElementsWithinColShape(Colshape,"vehicle"))do
      if getVehicleType2(veh) == "automobiles" then
        automobiles = automobiles + 1
      end
    end
    setElementData(Colshape,"currentAutos",automobiles)
  end
  return automobiles
end

function EnterPlace(theElement)
  if getElementType(theElement)== "player" then
    local accName = getAccountName(getPlayerAccount(theElement))
    if HabilitarAdmin == true then
      if(isObjectInACLGroup("user."..accName,aclGetGroup("")))then
        return
      end
    end
  end
  if(getElementType(theElement)== "player")and(PlayerHaveLevel(theElement)== false)then
    sendMsg(theElement,MsgInvasao)
    if getPedOccupiedVehicle(theElement) then
      setElementPosition(getPedOccupiedVehicle(theElement),TeleportLocation[1],TeleportLocation[2],TeleportLocation[3])
    else
      setElementPosition(theElement,TeleportLocation[1],TeleportLocation[2],TeleportLocation[3])
    end
    sendMsgOwners(theElement)
  elseif getElementType(theElement)== "vehicle" then
    SetVehicleGodMode(theElement,true)
    currentAutos = getVehiclesInsideBase(source)
    local playerr = getVehicleController(theElement)
    if currentAutos > maxAutos then
      setElementPosition(theElement,TeleportLocation[1],TeleportLocation[2],TeleportLocation[3])
      setElementVelocity(theElement,0,0,0)
      if getVehicleController(theElement) then
        outputChatBox("#ffffffO limite de #ff00005 #ffffffveículos nesta base já foi atingido.",playerr,255,0,0, true)
      end
    elseif getVehicleController(theElement) then
      if getVehicleType2(theElement) == "automobiles" then
        outputChatBox("#ffffffLimite de veiculos na Base: #ff0000"..currentAutos.." / "..maxAutos,playerr, 255,255,255, true)
      end
    end
  end
end

function ExitPlace(theElement)
  if GodMode == true then
    setElementData(theElement,"blood",12000)
  end
  if NaoAtirar == true then
  toggleControl(theElement,"fire",true)
  toggleControl(theElement,"vehicle_fire",true)
  toggleControl(theElement,"vehicle_secondary_fire",true)
  toggleControl(theElement,"aim_weapon",true)
  end
  if getElementType(theElement)== "vehicle" then
    SetVehicleGodMode(theElement,false)
  end
end

function PlayerHaveLevel(PlayerID)
  if GroupNameBy == 1 then
    if(getElementData(PlayerID ,"gang")== GroupName)then
      if GodMode == true then
        setElementData(PlayerID,"blood",999999999999999)
      end
      if NaoAtirar == true then
        toggleControl(PlayerID,"fire",false)
        toggleControl(PlayerID,"vehicle_fire",false)
        toggleControl(PlayerID,"vehicle_secondary_fire",false)
        toggleControl(PlayerID,"aim_weapon",false)
      end
      return true
    else
      return false
    end
  else
    local accName = getAccountName(getPlayerAccount(PlayerID))
    if(isObjectInACLGroup("user."..accName,aclGetGroup(GroupName)))then
      if GodMode == true then
        setElementData(PlayerID,"blood",999999999999999)
      end
      if NaoAtirar == true then
        toggleControl(PlayerID,"fire",false)
        toggleControl(PlayerID,"vehicle_fire",false)
        toggleControl(PlayerID,"vehicle_secondary_fire",false)
        toggleControl(PlayerID,"aim_weapon",false)
      end
      return true
    else
      return false
    end
  end
end

function ResourceStart()
  LoadLocations()
  CreateCollision()
end
addEventHandler("onResourceStart",getResourceRootElement(getThisResource()),ResourceStart)

function LoadLocations()
  local RX,RY,RZ,WRX,WRX,WRX
  if(RestricLocation["location1"][1] > RestricLocation["location2"][1])then
    RestricLocation["maxx"] = RestricLocation["location1"][1]
    RestricLocation["minx"] = RestricLocation["location2"][1]
  else
    RestricLocation["maxx"] = RestricLocation["location2"][1]
    RestricLocation["minx"] = RestricLocation["location1"][1]
  end
  if(RestricLocation["location1"][2] > RestricLocation["location2"][2])then
    RestricLocation["maxy"] = RestricLocation["location1"][2]
    RestricLocation["miny"] = RestricLocation["location2"][2]
  else
    RestricLocation["maxy"] = RestricLocation["location2"][2]
    RestricLocation["miny"] = RestricLocation["location1"][2]
  end
  if(RestricLocation["location1"][3] > RestricLocation["location2"][3])then
    RestricLocation["maxz"] = RestricLocation["location1"][3]
    RestricLocation["minz"] = RestricLocation["location2"][3]
  else
    RestricLocation["maxz"] = RestricLocation["location2"][3]
    RestricLocation["minz"] = RestricLocation["location1"][3]
  end
end

function CreateCollision()
  RX = RestricLocation["minx"]
  WRX = RestricLocation["maxx"] - RestricLocation["minx"]
  RY = RestricLocation["miny"]
  WRY = RestricLocation["maxy"] - RestricLocation["miny"]
  RZ = RestricLocation["minz"]
  WRZ = RestricLocation["maxz"] - RestricLocation["minz"]
  ColCuboid = createColCuboid(RX,RY,RZ,WRX,WRY,WRZ)
  if ColCuboid then
    addEventHandler("onColShapeHit",ColCuboid,EnterPlace)
    addEventHandler("onColShapeLeave",ColCuboid,ExitPlace)
  else
    outputDebugString("Erro,verifique: location1 e location2")
  end
end

function ResourceStop()
  destroyElement(ColCuboid)
end
addEventHandler("onResourceStop",getResourceRootElement(getThisResource()),ResourceStop)

function sendMsgOwners(PlayerID)
  local connectedPlayers = getElementsByType("player")
  for i,aPlayer in ipairs(connectedPlayers)do
    if(PlayerHaveLevel(aPlayer)== true)then
      sendMsg(aPlayer,"O Jogador #ff0000" ..getPlayerName(PlayerID).." #FFFFFFesta tentando invadir a #FF0000BASE 4!")
    end
  end
end

function SetVehicleGodMode(VehicleID,godEoD)
  if EnableVehicleGodMode == true then
     setElementData(VehicleID, "godmode", godEoD)
    setVehicleDamageProof(VehicleID,godEoD)
  end
end

 

Edited November 5, 2022 by xLive
format

[xLive]

Welcome to the forums @HirlanPacheco. Your thread has been moved to the Portuguese section. Please use this section in the future.