GTAONLINE.PL :: Tagi • torba

Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Tematy otagowane jako: torba

Siema, potrzebuje pomocy. mam tutaj kod na wyci?ganie torby R1 ale chce te? aby osoby ze grupy ACL "SAMD" mogli k?a?? torb? na ziemi. Tak wiem jest funkcja DestroyElement oraz createObject lecz nie ogarniam tego.
prosi?bym o gotowy kodzik

KOD:
[code]

function weztorba (plr)

local login = getAccountName(getPlayerAccount(plr))

if isObjectInACLGroup("user."..login,aclGetGroup("SAMD", plr)) then

local auto = getPedOccupiedVehicle(plr)

if isPedInVehicle(plr) then

if (getElementModel(auto) == 489) or (getElementModel(auto) == 407) or (getElementModel(auto) == 416) then

local torba = createObject(1248, 0, 0, 0, 0, 0, 0)

setElementData ( plr, "torba", torba)

exports.bone_attach:attachElementToBone(torba,plr,12,0,0.1,0.3,0,180,0)

outputChatBox("Bierzesz torb? r1 z karetki.", plr)

end

end

end

end

addCommandHandler("r1", weztorba)

-------------------------------------------------

function odloztorbe(plr)

local login = getAccountName(getPlayerAccount(plr))

if isObjectInACLGroup("user."..login,aclGetGroup("SAMD", plr)) then

local auto = getPedOccupiedVehicle(plr)

if isPedInVehicle(plr) then

if (getElementModel(auto) == 489) or (getElementModel(auto) == 416) then

local torba = getElementData ( plr, "torba")

destroyElement(torba)

outputChatBox("Chowasz torb? r1 do ka...

2. TORBA R1

Siemka, pom?g?by mi kto??

chce aby podmianka torby R1, by?a podmieniona na bro? o id: 32 (tec-9)
jak by da?o si? to zrobi?. Prosz? o podanie kodu i mety, pomoc = piwko.

TORBA R1: https://www.mediafire.com...rar/file[/hide]

3. Torba r1

Witam mam skrypt na torbe r1 lecz nwm jak zrobic by jak wyciagnol ktos torbe z schowka to mogl takze uzywac tych komend w sensie /postawr1 itp

[lua]
local torby = {}

addCommandHandler("torbar1",function(plr,cmd)
if torby[plr] then return end
if not getElementData(plr,"player:faction") then outputChatBox("Aby u?y? tej torby musisz by? aktywny w jakiejkolwiek frakcji",plr,255,0,0) return end
local x,y,z = getElementPosition(plr)
local torba = createObject(1550,x,y,z)
torby[plr] = torba
outputChatBox("**Wyci?gn??e? torb?r1 z karetki!",plr,255,0,0)
setElementCollisionsEnabled (torba, false)
exports["bone_attach"]:attachElementToBone(torba,plr,12,-0.05,0.1,0.28,0,170,0)
end)

function stworztorbe(plr)
if not plr then return end
local x,y,z = getElementPosition(plr)
local torba = createObject(1550,x,y,z)
torby[plr] = torba
setElementCollisionsEnabled (torba, false)
exports["bone_attach"]:attachElementToBone(torba,plr,12,0,-0.09,0.3,0,180,0)
setObjectScale(torba,5)
end

function usuntorbe(plr)
if not plr then return end
local torba = torby[plr]
if torba then
if isElement(torba) then
if exports["bone_attach"]:isElementAttachedToBone(torba) then exports["bone_attach"]:detachElementFromBone(torba) end
destroyElement(torba)
end
torby[plr] = nil
end
end

addEventHandler ( "onPlayerQuit", root, function()
local torba = torby[source]
if torba then
if i...

4. Torba R1 Wyciąganie z karetki

Gdy wyci?gam torbe R1 z karetki to bierze mi j? i odrazu chowa pom?g? by mi kto? z tym z g?ry dzi?kuje. Za pomoc stawiam zimne piwko :piwo:

Tutaj daje kod:
[code]local torbysamc = {}

addEvent("onTryTakeSAMCItem1",true)
addEventHandler("onTryTakeSAMCItem1",root,function ()
if not getElementData(client,"SAMC:item:r1") then
stworztorbe(client)
setElementData(client,"SAMC:item:r1",true)
toggleControl(client,"sprint", false )
else
usuntorbe(client)
setElementData(client,"SAMC:item:r1",nil)
toggleControl(client,"sprint", true )
end
end)

function stworztorbe(plr)
if not plr then return end
local x,y,z = getElementPosition(plr)
local torba = createObject(323,x,y,z)
torbysamc[plr] = torba
setElementCollisionsEnabled (torba, false)
exports["bone_attach"]:attachElementToBone(torba,plr,12,0.02,0.1,0.3,0,180,0)
setObjectScale(torba,1.0)
end

function usuntorbe(plr)
if not plr then return end
local torba = torbysamc[plr]
if torba then
if isElement(torba) then
if exports["bone_attach"]:isElementAttachedToBone(torba) then exports["bone_attach"]:detachElementFromBone(torba) end
destroyElement(torba)
end
torbysamc[plr] = nil
end
end

addEventHandler ( "onPlayerQuit", root, function()
local torba = torbysamc[source]
if torba then
if isElement(torba) then
if exports["bone_attach"]:isElementAttachedToBone(torba) then export...

5. TORBA R1

Da ktos skrypta na torbe r1 bo mam taki slaby i nie wiem jak zrovbic zeby mogli tom torbe brac tylko Dana Frakcja W moim przypadku SAMC

local cases = {}



for i,v in ipairs(getElementsByType("player"))do

setElementData(v, "bcase", 0)

end



addCommandHandler("torba",

    function(player)

        if(getResourceState(getResourceFromName("bone_attach")) == "running")then

            if(getElementType(player) == "player")then

                if(getElementData(player, "bcase") ~= 1)then

                    setElementData(player, "bcase", 1)

                    case = createObject(1210,0,0,0)

                    exports.bone_attach:attachElementToBone(case,player,12,0,0.05,0.27,0,180,0)

                    cases[player] = case

                elseif(getElementData(player, "bcase") == 1)then

                    setElementData(player, "bcase", 0)

                    exports.bone_attach:detachElementFromBone(cases[player])

                    destroyElement(cases[player])

                end

            end

        else

            outputChatBox("ERROR #1", player, 255, 50, 0)

        end

    end

)

Dokladnie taki i jak dodac mozecie mi napisac bo sie wogole nie znam na skryptach HELP

6. Torba R1

Witam chcia? bym przerobi? torbe r1 u psp . Wyglada? to ma tak ze mo?na wyci?gna? torbe przez schowek i mozna polo?y? j? na ziemi

skrypt na wyci?ganie mam lecz nie potrafie doda? funkcji k?adzenia i podnoszenia

ZA POMOC DAJE :piwo:

Skrypt na schowek

 







addEvent("PSPtorba",true)

addEventHandler("PSPtorba",root,function(el)

        if not getElementData(el,"psp:item:torba") then

        local x,y,z = getElementPosition( el )

        local object = createObject(1248,x,y,z)

        exports.bone_attach:attachElementToBone(object,el,12,0.02,0.1,0.3,0,180,180)

        setElementData(el,"psp:item:torba",object)

        setElementData(el,"psp:item:torba2",true)

        --exports["noti"]:noti("Wyci?gasz torb? medyczn? z pojazdu.", el)

                triggerClientEvent( el,  "onClientAddNotification", el, "Pomy?lnie wyci?gni?to torb? medyczn?n z wozu stra?ackiego.", "success"  )

    else

        destroyElement(getElementData(el,"psp:item:torba"))

        --exports["noti"]:noti("Chowasz torb? medyczn? do pojazdu.", el)

                triggerClientEvent( el,  "onClientAddNotification", el, "Pomy?lnie schowano torb? medyczn?n do wozu stra?ackiego.", "success"  )

        setElementData(el,"psp:item:torba",nil)

        setElementData(el,"psp:item:torba2",nil)

    end

end)

7. Torba r1 Bug

Witam jak naprawi? takie co? ?e mam schowek pr jest to paczka new worda i gdy wyci?gam torb? to ona nie bierze si? do renki tylko zostaje i lata w miejscu

8. Torba PSP-R1

Witam chcia?bym si? spyta? jak zrobi? skrypt na k?adzenie torby r1 na ziemi

mam skrypt na schowek gdzie wyci?gam torbe r1 lecz nie ma tam k?adzenia :?

oto kod na schowek :
frakcja-samd >> s_schowek
[lua]function findPlayer(plr,cel)
local target=nil
if (tonumber(cel) ~= nil) then
target=getElementByID("p"..cel)
else -- podano fragment nicku
for _,thePlayer in ipairs(getElementsByType("player")) do
if string.find(string.gsub(getPlayerName(thePlayer):lower(),"#%x%x%x%x%x%x", ""), cel:lower(), 1, true) then
if (target) then
outputChatBox("Znaleziono wiecej niz jednego gracza o pasujacym nicku, podaj wiecej liter.", plr)
return nil
end
target=thePlayer
end
end
end
return target
end

addEvent("PRszyny",true)
addEventHandler("PRszyny",root,function(el)
if not getElementData(el,"prm:item:szyny") then
local x,y,z = getElementPosition( el )
local object = createObject(3911,x,y,z)
exports.bone_attach:attachElementToBone(object,el,12,0,0,0.22,180,0)
setElementData(el,"prm:item:szyny",object)
exports["noti2"]:noti("Wyci?gasz szyny kramera z ambulansu.", el)
else
destroyElement(getElementData(el,"prm:item:szyny"))
exports["noti2"]:noti("Chowasz ...

9. Torba która zle znika

Witam all . Mam pytanie odno?nie tego ?e jak kto? wyjdzie z graczy to torba znika , nie wiem dlaczego , naprawicie mi to ?



function pacholek(localPlayer)

if getElementData (localPlayer,"frakcja") == "PR" then

        pacholekk = createObject(1210, 0,0,0,0,0,0)

        attachElements(pacholekk, localPlayer, 0.2,-0.09,-0.3,0,0,90)

        end

    end

addCommandHandler("torba",pacholek)



function usuntorbe(localPlayer)

    destroyElement(pacholekk,localPlayer)

end

addCommandHandler("usuntorbe",usuntorbe)



function postaw (localPlayer)

        detachElements(pacholekk, localPlayer)

end

addCommandHandler("postawtorbe",postaw)



addEventHandler ( "onPlayerQuit",getRootElement(), function(source)

        destroyElement(pacholekk,source)

end)

10. Torba R-1

Jak tutaj doda? aby animacja by?a przy k?adzieniu torby i podnoszeniu? (Po wpisaniu tej samej komendy ma wykona? animacj? i wzi?? j? w r?ke)
Kod:

addCommandHandler("polozr1",function(plr,cmd)



local veh = getPedOccupiedVehicle(plr)

if veh then return end

local torba = torby[plr]

exports["LR-notyfikacje"]:addNotification(plr,"* K?adziesz/Podnosisz torb? R-1.")

setPedAnimation(plr, "BOMBER", "BOM_Plant")

setTimer (function(plr) setPedAnimation(plr) end, 2000, 1, plr)

if exports["bone_attach"]:isElementAttachedToBone(torba) then 

exports["bone_attach"]:detachElementFromBone(torba) 

setElementCollisionsEnabled (torba, false)

local x,y,z = getElementPosition(plr)

setElementPosition(torba,x+0.80,y-0.03,z-0.82)

local rz = getElementRotation(torba)

setElementRotation(torba,0,0,rz-90)

end

end)

11. Torba medyczna R1

Witam posiadam kod na R1 a wi?c problem polega na tym ze jak podejde do karetki i wpisze /torba to nie dzia?a.... mam bone_attach aha i jak ma ktos textury to prosze o podes?anie
Kod:[lua]
function weztorba (plr)
local login = getAccountName(getPlayerAccount(plr))
if isObjectInACLGroup("user."..login,aclGetGroup("Pogotowie", plr)) then
local auto = getPedOccupiedVehicle(plr)
if isPedInVehicle(plr) then
if (getElementModel(auto) == 489) or (getElementModel(auto) == 407) or (getElementModel(auto) == 416) then
local torba = createObject(1210, 0, 0, 0, 0, 0, 0)
setElementData ( plr, "torba", torba)
exports.bone_attach:attachElementToBone(torba,plr,12,0,0.1,0.3,0,180,0)
outputChatBox("** Bierzesz torb? medyczn?", plr)
outputChatBox("** "..login.." wyci?ga torb? medyczn? z pojazdu", root)
end
end
end
end
addCommandHandler("torba", weztorba)
-------------------------------------------------
function odloztorbe(plr)
local login = getAccountName(getPlayerAccount(plr))
if isObiectInACLGroup("user."..login,aclGetGroup("grupa_acl", plr)) then
local auto = getPedOccupiedVehicle(plr)
if isPedInVehicle(plr) then
if (getElementModel(auto) == 407) or (getElementModel(auto) == 489) or (getElementModel(auto) == 416) then
local torba = getElementData ( plr, "torba")
destroyElement(torba)
outputChatBox("** Chowasz torb? medyczn?", plr)
outputChatBox("**...

12. Torba

mam owy kod na odk?adanie torby R1 gdy siedz? w aucie ale nie wiem dlaczego gdy wpisuje komend? to torba si? nie odk?ada

function otorba(plr)

local login = getAccountName(getPlayerAccount(plr))

if isObiectInACLGroup("user."..login,aclGetGroup("PSP", plr)) then

local auto = getPedOccupiedVehicle(plr)

if isPedInVehicle(plr) then

if (getElementModel(auto) == 546) or (getElementModel(auto) == 579) or (getElementModel(auto) == 416) or (getElementModel(auto) == 407) then

local torba = getElementData ( plr, "torba")

destroyElement(torba)

outputChatBox("** Chowasz torb? medyczn?", plr)

outputChatBox("** "..login.." chowa torb? medyczn? do pojazdu", root)

end

end

end

end

addCommandHandler("otorba", otorba)

Pisz? ?e co? z 20 Linijk? .