
Pacheco465
Members-
Posts
7 -
Joined
-
Last visited
Recent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
Pacheco465's Achievements

Newbie (4/54)
0
Reputation
-
Existe algum tipo de script que possa iniciar resources quando o servidor abrir? tipo, automaticamente.
-
Como eu poderia adicionar delay ao comando neste script? function repararveiculo ( source ) local accName = getAccountName ( getPlayerAccount ( source ) ) if isObjectInACLGroup("user." .. accName, aclGetGroup("Staff")) then if isPedInVehicle ( source ) then return end local x, y, z = getElementPosition(source) local colcarros = createColSphere ( x, y, z, 2) local vehicle = getElementsWithinColShape ( colcarros, "vehicle" ) destroyElement(colcarros) setPedAnimation( source, "CAR", "Fixn_Car_Loop", 4500, true, false, false, false) for theKey, veh in ipairs(vehicle) do setTimer ( function() fixVehicle(veh) end, 4500, 1 ) end end end addCommandHandler ( "fix", repararveiculo ) function displayVehicleLoss(loss) if getElementHealth(source) <= 255 then setElementHealth(source, 255.5) setVehicleEngineState(source, false) setVehicleDamageProof(source, true) else if isVehicleDamageProof(source) then setVehicleDamageProof(source, false) end end end addEventHandler("onVehicleDamage", getRootElement(), displayVehicleLoss) function displayVehicleLoss2() if getElementHealth(source) <= 255 then setVehicleEngineState(source, false) else if isVehicleDamageProof(source) then setVehicleDamageProof(source, false) end end end addEventHandler("onVehicleEnter", getRootElement(), displayVehicleLoss2) function DestroyVeiculo () destroyElement (veh[source]) end addEventHandler ("onPlayerLogout", root, DestroyVeiculo) addEventHandler ("onPlayerQuit", root, DestroyVeiculo) Tentei usar o setTimer mas não consegui muito bem, alguém poderia colocar este script com o delay já ou poderia dar um exemplo por favor?
-
Alguém poderia me ajudar? como eu poderia adicionar este script para dropar uma quantia que seria digitada no comando? Server local function createGroundWeapon(weaponid, ammo, clip, posX, posY, posZ, rotX, rotY, rotZ, interior, dimension) local temp = createElement("groundweapon") for i,p in ipairs(getElementsByType("player")) do triggerClientEvent(p,"GroundPickups:createGroundWeapon",p,temp,weaponid,ammo,clip,posX,posY,posZ,rotX,rotY,rotZ,interior,dimension) end return temp end local function destroyWeapons() for i,p in ipairs(getElementsByType("groundweapon")) do destroyElement(p) end end local function pickupWeapon(groundweapon,weaponid,ammo,clip) if client~=source then return end destroyElement(groundweapon) giveWeapon(client,weaponid,ammo,true) end local function dropWeapon(weaponid, ammo, clip, posX, posY, posZ, rotX, rotY, rotZ, interior, dimension) if client~=source then return end createGroundWeapon(weaponid, ammo, clip, posX, posY, posZ, rotX, rotY, rotZ, interior, dimension) takeWeapon(client,weaponid) end local function initScript() addEvent("GroundPickups:pickupWeapon", true) addEvent("GroundPickups:dropWeapon", true) addEventHandler("GroundPickups:pickupWeapon",root,pickupWeapon) addEventHandler("GroundPickups:dropWeapon",root,dropWeapon) addEventHandler("onResourceStop",resourceRoot,destroyWeapons) end addEventHandler("onResourceStart",resourceRoot,initScript) Client local screenWidth, screenHeight = guiGetScreenSize() -- Get the screen resolution local currentGround = nil local elementgg = {} local bannedTeamsEnabled = true local bannedTeams = { -- Useful if you got an RPG server and want to prevent abuse with weapon-spawning classes, then use above variable to toggle using below table and add your server's team names that wont be able to use drop gun ["Official Squads"] = true, ["Gangs"] = true, } weaponmarkercolors = { [0] = {255,255,255}, [1] = {100,100,255}, [2] = {0,230,0}, [3] = {0,150,0}, [4] = {255,255,0}, [5] = {255,204,0}, [6] = {150,0,150}, [7] = {255,0,255}, [8] = {0,0,255}, [9] = {204,255,255}, [10] = {255,100,100}, [11] = {255,255,255}, [12] = {255,255,255} } weaponsIDS = { --0 [1] = 331, --1 [2] = 333, [3] = 334, [4] = 335, [5] = 336, [6] = 337, [7] = 338, [8] = 339, [9] = 341, --2 [22] = 346, [23] = 347, [24] = 348, --3 [25] = 349, [26] = 350, [27] = 351, --4 [28] = 352, [29] = 353, [32] = 372, --5 [30] = 355, [31] = 356, --6 [33] = 357, [34] = 358, --7 [35] = 359, [36] = 360, [37] = 361, [38] = 362, --8 [16] = 342, [17] = 343, [18] = 344, [39] = 363, --9 [41] = 365, [42] = 366, [43] = 367, --10 [10] = 321, [11] = 322, [12] = 323, [13] = 324, [14] = 325, [15] = 326, --11 [44] = 368, [45] = 369, [46] = 371, --12 [40] = 364 } colshapes = {} function createGroundWeapon(groundweapon,weaponid, ammo, clip, posX, posY, posZ, rotX, rotY, rotZ, interior, dimension) if(elementgg[groundweapon] == nil) then local temp = createColSphere(posX,posY,posZ+0.5, 1) colshapes[temp] = {} colshapes[temp].groundweapon = groundweapon colshapes[temp].weaponid = weaponid colshapes[temp].ammo = ammo colshapes[temp].clip = clip elementgg[groundweapon] = temp local slot = getSlotFromWeapon(weaponid) --createObject local object = createObject(weaponsIDS[weaponid],posX,posY,posZ,rotX,rotY,rotZ) setElementFrozen(object, true) setElementCollisionsEnabled(object, false) setElementInterior(object,interior) setElementDimension(object,dimension) colshapes[temp].object = object --createMarker local marker = createMarker(posX,posY,posZ+0.05,"corona", 0.5,weaponmarkercolors[slot][1],weaponmarkercolors[slot][2], weaponmarkercolors[slot][3], 20) setElementInterior(marker,interior) setElementDimension(marker,dimension) colshapes[temp].marker = marker local x,y,z = getElementPosition(localPlayer) if getDistanceBetweenPoints2D(x,y,posX,posY) < 0.25 then local_activate(temp, localPlayer,true) end end end function destroyGroundWeapon(groundweapon) local col = elementgg[groundweapon] local object = colshapes[col].object local marker = colshapes[col].marker colshapes[col] = nil if(isElement(object)) then destroyElement(object) end if(isElement(marker)) then destroyElement(marker) end if(isElement(col)) then destroyElement(col) end elementgg[groundweapon] = nil end function pickupWeapon(cmd,state) if (cmd == "pickup" or state=="down") and isTimer(spamTimer) then return end spamTimer=setTimer(function() end,500,1) if(isElement(currentGround)) then local weaponid = colshapes[currentGround].weaponid local ammo = colshapes[currentGround].ammo local clip = colshapes[currentGround].clip local slot = getPedWeaponSlot(localPlayer) if slot == getSlotFromWeapon(weaponid) and getPedWeapon(localPlayer,slot) ~= weaponid and getPedTotalAmmo(localPlayer,slot) > 0 then dropWeapon() end if ammo then local groundweapon = colshapes[currentGround].groundweapon triggerServerEvent("GroundPickups:pickupWeapon",localPlayer,groundweapon,weaponid,ammo,clip) for i,p in ipairs(getElementsByType("colshape")) do if isElementWithinColShape(localPlayer, p) then local_activate(p, localPlayer,true) break end end end end end function dropWeapon(cmd,state) if (cmd == "drop" or state=="down") and isTimer(spamTimer) then return end spamTimer=setTimer(function() end,500,1) local team = getPlayerTeam(localPlayer) if team and bannedTeams[getTeamName(team)] and bannedTeamsEnabled then outputChatBox("You cannot drop weapons while in a gang/squad",255,0,0) return end local slot = getPedWeaponSlot(localPlayer) if slot > 0 then local weaponid = getPedWeapon(localPlayer, slot) if weaponid ~= 0 then local x,y,z = getElementPosition(localPlayer) local hit, hitX, hitY, hitZ, as = processLineOfSight(x, y, z, x, y, -3000, true, false, false, true, false, false, false, false) z = hit and hitZ or z-0.95 triggerServerEvent("GroundPickups:dropWeapon",localPlayer,weaponid, getPedTotalAmmo(localPlayer), getPedAmmoInClip(localPlayer), x,y,z, 97.3,120,math.random(0,359),getElementInterior(localPlayer),getElementDimension(localPlayer)) end end end function local_activate(shape, element,dimension) local playersInCol = getElementsWithinColShape(shape,"player") if #playersInCol == 1 and playersInCol[1] ~= localPlayer then return end if element == localPlayer and #playersInCol <= 1 then currentGround = shape end end addEventHandler("onClientResourceStart", getRootElement(), function(startedRes) if(startedRes == getThisResource()) then addCommandHandler("pickup",pickupWeapon) addCommandHandler("dropararma",dropWeapon) bindKey("6","down","pickup") else for i,p in pairs(getElementsByType("groundweapon")) do createGroundWeapon(p) end end end ) addEventHandler("onClientResourceStop", resourceRoot, function(startedRes) for i,p in ipairs(getElementsByType("groundweapon")) do destroyGroundWeapon(p) end end ) addEventHandler("onClientRender", getRootElement(), function() if isElement(currentGround) and colshapes[currentGround] then local weaponid = colshapes[currentGround].weaponid local ammo = colshapes[currentGround].ammo sx,sy = screenWidth/2, screenHeight/2 local str = getPedWeaponSlot(localPlayer) == getSlotFromWeapon(weaponid) and "swap weapons" or "pickup weapon" dxDrawRectangle(sx-80, sy-20, 160, 85, tocolor(0, 0, 0, 128)) if getPedWeaponSlot(localPlayer) == getSlotFromWeapon(weaponid) and weaponid ~= getPedWeapon(localPlayer) then dxDrawImage(sx-13, sy+13, 26, 26, "img/swap.png") dxDrawImage(sx+20, sy-2, 50, 50, "img/" .. weaponid .. ".png") dxDrawImage(sx-70, sy-2, 50, 50, "img/" .. getPedWeapon(localPlayer, getSlotFromWeapon(weaponid)) .. ".png") dxDrawText(tostring(ammo),sx+45, sy+53, sx+45, sy+53,tocolor(255,255,255,255), 1, "default-bold", "center", "center") dxDrawText(tostring(getPedTotalAmmo(localPlayer, getSlotFromWeapon(weaponid))) .. " (you)",sx-45, sy+53, sx-45, sy+53,tocolor(255,255,255,255), 1, "default-bold", "center", "center") else dxDrawImage(sx-25, sy-2, 50, 50, "img/" .. tonumber(weaponid) .. ".png") dxDrawText(tostring(ammo),sx, sy+53, sx, sy+53,tocolor(255,255,255,255), 1, "default-bold", "center", "center") end dxDrawText("Use '6' to " .. str,sx, sy-18, sx, sy-18,tocolor(255,255,50,255), 1, "default-bold", "center") end end ) addEventHandler("onClientElementDestroy", getRootElement(), function() if(getElementType(source) == "groundweapon") then destroyGroundWeapon(source) end end ) addEventHandler("onClientColShapeHit", getResourceRootElement(), function(element,dimension) local_activate(source, element,dimension) end ) addEventHandler("onClientColShapeLeave", getResourceRootElement(), function(element,dimension) if(element == localPlayer) then currentGround = nil for i,p in ipairs(getElementsByType("colshape")) do if isElementWithinColShape(localPlayer, p) then local_activate(p, localPlayer,true) break end end end end ) addEvent("GroundPickups:createGroundWeapon", true) addEventHandler("GroundPickups:createGroundWeapon",localPlayer,createGroundWeapon)
-
Olá, queria saber como eu poderia colocar um delay para um comando. EX: A cada 5 segundos poder utilizar o bind.
-
Olá, queria saber qual a função para que eu possa colocar meu script em uma função de limites de distâncias. ( Distância do ID. ) Script: