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

Wysłany: 2018-10-14, 14:30


rresz







Wiek: 25
Na forum: 3028 dni
Posty: 16
Nick w MP: Domiinoo



Respekt: 50

Witam mam oto taki skrypt na kajdanki dla frakcji SAPD

Kod:

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(), 0, true) then
if (target) then
triggerClientEvent(plr, 'onClientCaseShowing', root, 1,'Znaleziono Wi?cej U?ytkownik?w O Podobnym Nicku')
return nil
end
target=thePlayer
end
end
end
if target and getElementData(target,"p:inv") then return nil end
return target
end



kaj = {}

function zalozkaj(plr, cmd, target)
if not target then
triggerClientEvent(plr, 'onClientCaseShowingsse', root, 1,'U?yj Komendy: /Zakuj [Id U?ytkownika]')
return
end
local gracz = findPlayer(plr, target)
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then
if getElementData(plr, "kajdanki") == false then

local gracz = getPlayerName(gracz)
local gracz = getPlayerFromName(gracz)
local x2,y2,z2 = getElementPosition(gracz)
local x,y,z = getElementPosition(plr)
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20) then
toggleControl(gracz, "enter_exit", false)
toggleControl(gracz, "enter_passenger", false)
toggleControl(plr, "jump", false)
toggleControl(plr, "sprint", false)
setElementPosition(gracz, x,y,z)
local graczz = getPlayerName(gracz)
kaj[plr] = {}
kaj[plr] = {graczz}
setElementData(plr,"kajdanki", true)
setPedAnimation ( gracz, "FAT", "IDLE_tired", -180, true, false )
outputChatBox(""..getPlayerName(plr).." zakuwa ci? w kajdanki.",gracz, 255,255,255,true)
outputChatBox("Zak?adasz kajdanki graczowi "..graczz..".",plr,255,255,255,true)
end
else
outputChatBox("Nie mo?esz za?o?y? kajdanek dw?m osobom na raz.",plr,255,255,255, true)
end
end
end
addCommandHandler("zakuj",zalozkaj)

addEventHandler("onVehicleEnter",root,
function(plr)
if getElementData(plr, "kajdanki") then
local peds = kaj[plr][1]
local ped = getPlayerFromName(peds)
local veh = getPedOccupiedVehicle(plr)
local atta = getAttachedElements(plr)
for i,v in pairs(atta)do
end
warpPedIntoVehicle(ped, veh, 1)
outputChatBox(""..getPlayerName(plr).." wsadza ci? do radiowozu.",ped, 255,255,255,true)
outputChatBox("Wsadzasz do radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,true)
end
end)

addEventHandler("onVehicleStartExit",root,
function(plr)
if getElementData(plr, "kajdanki") then
local ped = kaj[plr][1]
local ped = getPlayerFromName(ped)
local x,y,z = getElementPosition(plr)
removePedFromVehicle(ped)
outputChatBox(""..getPlayerName(plr).." wyci?ga ci? z radiowozu.",ped, 255,255,255,true)
outputChatBox("Wyci?gasz z radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,true)
end
end)

function sciagnijkaj(plr, cmd, target)
if not target then
triggerClientEvent(plr, 'onClientCaseShowingsse', root, 1,'U?yj Komendy: /Zakuj [Id U?ytkownika]')
return
end
local gracz = findPlayer(plr, target)
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then
if getElementData(plr, "kajdanki") then
local gracz = getPlayerName(gracz)
local gracz = getPlayerFromName(gracz)
local x2,y2,z2 = getElementPosition(gracz)
local x,y,z = getElementPosition(plr)
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20) then
local atta = getAttachedElements(plr)
toggleControl(gracz, "enter_exit", true)
toggleControl(gracz, "enter_passenger", true)
toggleControl(plr, "jump", true)
toggleControl(plr, "sprint", true)
for i,v in pairs(atta)do
end
setElementPosition(gracz, x+2,y,z)
setElementData(plr,"kajdanki", false)
kaj[plr] = {}
outputChatBox(""..getPlayerName(plr).." odkuwa ci?.",gracz, 255,255,255,true)
outputChatBox("?ci?gasz kajdanki graczowi "..getPlayerName(gracz)..".",plr,255,255,255,true)
end
else
outputChatBox("Nie za?ozy?e? nikomu kajdanek.",plr,255,255,255, true)
end
end
end
addCommandHandler("odkuj",sciagnijkaj)





I Chcia?bym uzyskac cos takiego ze jezeli gracz zakuty wejdzie z funkcjonariuszem do danego cylindra i zmieni dimension i interior funkcjonariuszowi to temu attech elementowi tez jako? zmieni?o dimension i interior na taki sam jak ma funkcjonariusz. Jest mi to potrzebne poniewa? bazuje na kilku miastach przez co mam podzial na dimensiony i interiory i oddzielne punkty wyjscia w kazdym miescie poprzes sprawdzanie obecnego dimensionu uzytkownika ;p [/code]

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-10-14, 23:04


OchIAch







Wiek: 26
Na forum: 3114 dni
Posty: 144
Nick w MP: OchIAch

Piwa: 1311

Respekt: 105,3
Respekt: 105,3

Ostrzeżeń: 100%
function findPlayer(plr,cellocal target=nil 


if (tonumber(cel) ~= nilthen 
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(), 0truethen 
if (targetthen 
triggerClientEvent(plr'onClientCaseShowing'root1,'Znaleziono Wi?cej U?ytkownik?w O Podobnym Nicku') 
return nil 
end 
target=thePlayer 
end 
end 
end 
if target and getElementData(target,"p:inv"then return nil end 
return target 
end 



kaj = {} 

function zalozkaj(plrcmdtarget) 
if not target then 
triggerClientEvent(plr'onClientCaseShowingsse'root1,'U?yj Komendy: /Zakuj [Id U?ytkownika]') 
return 
end 
local gracz findPlayer(plrtarget) 
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then 
if getElementData(plr"kajdanki") == false then 

local gracz getPlayerName(graczlocal gracz getPlayerFromName(graczlocal x2,y2,z2 getElementPosition(graczlocal x,y,getElementPosition(plr) 
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20then 
toggleControl(gracz"enter_exit"falsetoggleControl(gracz"enter_passenger"falsetoggleControl(plr"jump"falsetoggleControl(plr"sprint"falsesetElementPosition(graczx,y,zlocal graczz getPlayerName(graczkaj[plr] = {} 
kaj[plr] = {graczzsetElementData(plr,"kajdanki"truesetPedAnimation gracz"FAT""IDLE_tired", -180truefalse outputChatBox(""..getPlayerName(plr).." zakuwa ci? w kajdanki.",gracz255,255,255,trueoutputChatBox("Zak?adasz kajdanki graczowi "..graczz..".",plr,255,255,255,trueend 
else 
outputChatBox("Nie mo?esz za?o?y? kajdanek dw?m osobom na raz.",plr,255,255,255trueend 
end 
end 
addCommandHandler("zakuj",zalozkajsetTimer(function()
    for k,player in ipairs getElementsByType "player" )) do
        przykuty false
        local atta getAttachedElements(player) 
        for i,v in pairs(atta)do
            if getElementType(v) == "ped" or getElementType) == "player" then
                przykuty v
                break
            end
        end
        int getElementInteriorplayer )
        dim getElementDimensionplayer )
        setElementInteriorprzykutyint )
        setElementDimensionprzykutydim )
    end
end10000)

addEventHandler("onClientRender"root, function()
    local atta getAttachedElements(plr) 
    przykuty false
    for i,v in pairs(atta)do 
        if getElementType(v) == "ped" or getElementType) == "player" then
            przykuty 
        end
    end 
end)

addEventHandler("onVehicleEnter",root, 
function(plr) 
if getElementData(plr"kajdanki"then 
local peds kaj[plr][1local ped getPlayerFromName(pedslocal veh getPedOccupiedVehicle(plrlocal atta getAttachedElements(plr) 
for i,v in pairs(atta)do 
end 
warpPedIntoVehicle(pedveh1outputChatBox(""..getPlayerName(plr).." wsadza ci? do radiowozu.",ped255,255,255,trueoutputChatBox("Wsadzasz do radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,trueend 
endaddEventHandler("onVehicleStartExit",root, 
function(plr) 
if getElementData(plr"kajdanki"then 
local ped kaj[plr][1local ped getPlayerFromName(pedlocal x,y,getElementPosition(plrremovePedFromVehicle(pedoutputChatBox(""..getPlayerName(plr).." wyci?ga ci? z radiowozu.",ped255,255,255,trueoutputChatBox("Wyci?gasz z radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,trueend 
end) 

function sciagnijkaj(plrcmdtarget) 
if not target then 
triggerClientEvent(plr'onClientCaseShowingsse'root1,'U?yj Komendy: /Zakuj [Id U?ytkownika]') 
return 
end 
local gracz findPlayer(plrtarget) 
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then 
if getElementData(plr"kajdanki"then 
local gracz getPlayerName(graczlocal gracz getPlayerFromName(graczlocal x2,y2,z2 getElementPosition(graczlocal x,y,getElementPosition(plr) 
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20then 
local atta getAttachedElements(plrtoggleControl(gracz"enter_exit"truetoggleControl(gracz"enter_passenger"truetoggleControl(plr"jump"truetoggleControl(plr"sprint"true) 
for i,v in pairs(atta)do 
end 
setElementPosition(graczx+2,y,zsetElementData(plr,"kajdanki"falsekaj[plr] = {} 
outputChatBox(""..getPlayerName(plr).." odkuwa ci?.",gracz255,255,255,trueoutputChatBox("?ci?gasz kajdanki graczowi "..getPlayerName(gracz)..".",plr,255,255,255,trueend 
else 
outputChatBox("Nie za?ozy?e? nikomu kajdanek.",plr,255,255,255trueend 
end 
end 
addCommandHandler("odkuj",sciagnijkaj


Podpis
Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-10-15, 13:49


rresz







Wiek: 25
Na forum: 3028 dni
Posty: 16
Nick w MP: Domiinoo



Respekt: 50

OchIAch, Niestety nie dzia?a sypie warningami jak usune linijke

        if getElementType(v) == "ped" or getElementType) == "player" then
            przykuty 
        end

Bo jak to zostawiam to nie moze zaladowac skryptu wyskakuje komunikat w debugscripcie
oto co pisze ;p



Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-10-15, 20:22


OchIAch







Wiek: 26
Na forum: 3114 dni
Posty: 144
Nick w MP: OchIAch

Piwa: 1311

Respekt: 105,3
Respekt: 105,3

Ostrzeżeń: 100%
Sory, m?j b??d:


function findPlayer(plr,cellocal target=nil 


if (tonumber(cel) ~= nilthen 
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(), 0truethen 
if (targetthen 
triggerClientEvent(plr'onClientCaseShowing'root1,'Znaleziono Wi?cej U?ytkownik?w O Podobnym Nicku') 
return nil 
end 
target=thePlayer 
end 
end 
end 
if target and getElementData(target,"p:inv"then return nil end 
return target 
end 



kaj = {} 

function zalozkaj(plrcmdtarget) 
if not target then 
triggerClientEvent(plr'onClientCaseShowingsse'root1,'U?yj Komendy: /Zakuj [Id U?ytkownika]') 
return 
end 
local gracz findPlayer(plrtarget) 
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then 
if getElementData(plr"kajdanki") == false then 

local gracz getPlayerName(graczlocal gracz getPlayerFromName(graczlocal x2,y2,z2 getElementPosition(graczlocal x,y,getElementPosition(plr) 
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20then 
toggleControl(gracz"enter_exit"falsetoggleControl(gracz"enter_passenger"falsetoggleControl(plr"jump"falsetoggleControl(plr"sprint"falsesetElementPosition(graczx,y,zlocal graczz getPlayerName(graczkaj[plr] = {} 
kaj[plr] = {graczzsetElementData(plr,"kajdanki"truesetPedAnimation gracz"FAT""IDLE_tired", -180truefalse outputChatBox(""..getPlayerName(plr).." zakuwa ci? w kajdanki.",gracz255,255,255,trueoutputChatBox("Zak?adasz kajdanki graczowi "..graczz..".",plr,255,255,255,trueend 
else 
outputChatBox("Nie mo?esz za?o?y? kajdanek dw?m osobom na raz.",plr,255,255,255trueend 
end 
end 
addCommandHandler("zakuj",zalozkajsetTimer(function()
    for k,player in ipairs getElementsByType "player" )) do
        przykuty false
        local atta getAttachedElements(player) 
        for i,v in pairs(atta)do
            if getElementType(v) == "ped" or getElementType) == "player" then
                przykuty v
                break
            end
        end
        int getElementInteriorplayer )
        dim getElementDimensionplayer )
        setElementInteriorprzykutyint )
        setElementDimensionprzykutydim )
    end
end10000)

addEventHandler("onVehicleEnter",root, 
function(plr) 
if getElementData(plr"kajdanki"then 
local peds kaj[plr][1local ped getPlayerFromName(pedslocal veh getPedOccupiedVehicle(plrlocal atta getAttachedElements(plr) 
for i,v in pairs(atta)do 
end 
warpPedIntoVehicle(pedveh1outputChatBox(""..getPlayerName(plr).." wsadza ci? do radiowozu.",ped255,255,255,trueoutputChatBox("Wsadzasz do radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,trueend 
endaddEventHandler("onVehicleStartExit",root, 
function(plr) 
if getElementData(plr"kajdanki"then 
local ped kaj[plr][1local ped getPlayerFromName(pedlocal x,y,getElementPosition(plrremovePedFromVehicle(pedoutputChatBox(""..getPlayerName(plr).." wyci?ga ci? z radiowozu.",ped255,255,255,trueoutputChatBox("Wyci?gasz z radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,trueend 
end) 

function sciagnijkaj(plrcmdtarget) 
if not target then 
triggerClientEvent(plr'onClientCaseShowingsse'root1,'U?yj Komendy: /Zakuj [Id U?ytkownika]') 
return 
end 
local gracz findPlayer(plrtarget) 
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then 
if getElementData(plr"kajdanki"then 
local gracz getPlayerName(graczlocal gracz getPlayerFromName(graczlocal x2,y2,z2 getElementPosition(graczlocal x,y,getElementPosition(plr) 
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20then 
local atta getAttachedElements(plrtoggleControl(gracz"enter_exit"truetoggleControl(gracz"enter_passenger"truetoggleControl(plr"jump"truetoggleControl(plr"sprint"true) 
for i,v in pairs(atta)do 
end 
setElementPosition(graczx+2,y,zsetElementData(plr,"kajdanki"falsekaj[plr] = {} 
outputChatBox(""..getPlayerName(plr).." odkuwa ci?.",gracz255,255,255,trueoutputChatBox("?ci?gasz kajdanki graczowi "..getPlayerName(gracz)..".",plr,255,255,255,trueend 
else 
outputChatBox("Nie za?ozy?e? nikomu kajdanek.",plr,255,255,255trueend 
end 
end 
addCommandHandler("odkuj",sciagnijkaj


Podpis
Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-10-16, 16:32


rresz







Wiek: 25
Na forum: 3028 dni
Posty: 16
Nick w MP: Domiinoo



Respekt: 50

OchIAch, Obecnie mam taki kod
function findPlayer(plr,cellocal target=nil 


if (tonumber(cel) ~= nilthen 
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(), 0truethen 
if (targetthen 
triggerClientEvent(plr'onClientCaseShowing'root1,'Znaleziono Wi?cej U?ytkownik?w O Podobnym Nicku') 
return nil 
end 
target=thePlayer 
end 
end 
end 
if target and getElementData(target,"p:inv"then return nil end 
return target 
end 



kaj = {} 

function zalozkaj(plrcmdtarget) 
if not target then 
triggerClientEvent(plr'onClientCaseShowingsse'root1,'U?yj Komendy: /Zakuj [Id U?ytkownika]') 
return 
end 
local gracz findPlayer(plrtarget) 
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then 
if getElementData(plr"kajdanki") == false then 

local gracz getPlayerName(graczlocal gracz getPlayerFromName(graczlocal x2,y2,z2 getElementPosition(graczlocal x,y,getElementPosition(plr) 
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20then 
toggleControl(gracz"enter_exit"falsetoggleControl(gracz"enter_passenger"falsetoggleControl(plr"jump"falsetoggleControl(plr"sprint"falsesetElementPosition(graczx,y,zlocal graczz getPlayerName(graczkaj[plr] = {} 
kaj[plr] = {graczzsetElementData(plr,"kajdanki"truesetPedAnimation gracz"FAT""IDLE_tired", -180truefalse outputChatBox(""..getPlayerName(plr).." zakuwa ci? w kajdanki.",gracz255,255,255,trueoutputChatBox("Zak?adasz kajdanki graczowi "..graczz..".",plr,255,255,255,trueend 
else 
outputChatBox("Nie mo?esz za?o?y? kajdanek dw?m osobom na raz.",plr,255,255,255trueend 
end 
end 
addCommandHandler("zakuj",zalozkajsetTimer(function()
    for k,player in ipairs getElementsByType "player" )) do
        przykuty false
        local atta getAttachedElements(player) 
        for i,v in pairs(atta)do
            if getElementType(v) == "ped" or getElementType) == "player" then
                przykuty v
                break
            end
        end
        int getElementInteriorplayer )
        dim getElementDimensionplayer )
        setElementInteriorprzykutyint )
        setElementDimensionprzykutydim )
    end
end10000)

addEventHandler("onClientRender"root, function()
    local atta getAttachedElements(plr) 
    przykuty false
    for i,v in pairs(atta)do 
        if getElementType(v) == "ped" or getElementType) == "player" then
            przykuty 
        end
    end 
end)

addEventHandler("onVehicleEnter",root, 
function(plr) 
if getElementData(plr"kajdanki"then 
local peds kaj[plr][1local ped getPlayerFromName(pedslocal veh getPedOccupiedVehicle(plrlocal atta getAttachedElements(plr) 
for i,v in pairs(atta)do 
end 
warpPedIntoVehicle(pedveh1outputChatBox(""..getPlayerName(plr).." wsadza ci? do radiowozu.",ped255,255,255,trueoutputChatBox("Wsadzasz do radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,trueend 
endaddEventHandler("onVehicleStartExit",root, 
function(plr) 
if getElementData(plr"kajdanki"then 
local ped kaj[plr][1local ped getPlayerFromName(pedlocal x,y,getElementPosition(plrremovePedFromVehicle(pedoutputChatBox(""..getPlayerName(plr).." wyci?ga ci? z radiowozu.",ped255,255,255,trueoutputChatBox("Wyci?gasz z radiowozu gracza "..getPlayerName(ped)..".",plr,255,255,255,trueend 
end) 

function sciagnijkaj(plrcmdtarget) 
if not target then 
triggerClientEvent(plr'onClientCaseShowingsse'root1,'U?yj Komendy: /Zakuj [Id U?ytkownika]') 
return 
end 
local gracz findPlayer(plrtarget) 
if getElementData(plr,"player:faction") and getElementData(plr,"player:faction") == "SAPD" then 
if getElementData(plr"kajdanki"then 
local gracz getPlayerName(graczlocal gracz getPlayerFromName(graczlocal x2,y2,z2 getElementPosition(graczlocal x,y,getElementPosition(plr) 
if (getDistanceBetweenPoints3D(x,y,z,x2,y2,z2)<20then 
local atta getAttachedElements(plrtoggleControl(gracz"enter_exit"truetoggleControl(gracz"enter_passenger"truetoggleControl(plr"jump"truetoggleControl(plr"sprint"true) 
for i,v in pairs(atta)do 
end 
setElementPosition(graczx+2,y,zsetElementData(plr,"kajdanki"falsekaj[plr] = {} 
outputChatBox(""..getPlayerName(plr).." odkuwa ci?.",gracz255,255,255,trueoutputChatBox("?ci?gasz kajdanki graczowi "..getPlayerName(gracz)..".",plr,255,255,255,trueend 
else 
outputChatBox("Nie za?ozy?e? nikomu kajdanek.",plr,255,255,255trueend 
end 
end 
addCommandHandler("odkuj",sciagnijkaj)

Gdzies dodalem zmienna zeby nie sypalo tymi warningami ktora sprawdza czy jest element "v" ale w tym kodzie tkwi taki problem iz jak przypne uzytkownika do kajdanek to zamiast przypinac attechem do nas i przemieszczac sie z nami to on zostaje w tym miejscu co go przypielismy, my mozemy chodzic a on nie. po prostu zostaje w miejscu ;/

[ Dodano: 2018-10-18, 13:04 ]
ref

[ Dodano: 2018-10-20, 11:14 ]
ref

Postaw piwo autorowi tego posta
 

 
Tagi: uzyskanie :: takiego :: samego :: dimensionu :: interioru
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku