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

Wysłany: 2015-09-14, 16:14


mlodasnygo







Wiek: 16
Na forum: 3972 dni
Posty: 205

Piwa: 518

Respekt: 161,8
Respekt: 161,8Respekt: 161,8

Witam dzi? mam problem z prac? pewn?... Chcia?bym si? spyta? jak doda? aby ta praca by?a tylko dla graczy kt?rzy s? w acl Taxi... Wiem ze pe?no jest odpowidzi na forum na ten temat , ale nie ogarniam gdzie to doda?. Praca jest wykonana przez bodaj?e Shuffle a edyytowana przez xMaximerr'a. I jeszcze po jakiej stronie to da?? Servera czy Clienta?
Oto Kod:




local allow_vehs={
    [420]=true,
}

local vehs={
    {-166.73339843751013.02929687519.52188873291},
    {-178.0644531251013.118164062519.522001266479},
    {-166.7949218751019.00585937519.521606445312},
    {-178.04785156251019.041992187519.521175384521},
}

taxi={}

for k,v in ipairs(vehs)do
    taxi[k]=createVehicle(420,v[1],v[2],v[3])
    setElementRotation taxi[k], 0089.538452148438 )
    setElementData(taxi[k],"vehicle:taxi",true)
end

addEventHandler("onPlayerVehicleEnter",root,function(veh,seat)
    if seat==0 then
        if allow_vehs[getElementModel(veh)] then
            if getElementData(veh,"vehicle:taxi"then
                outputChatBox("*Zosta?e?(a?) taks?wkarzem. Dostaniesz informacj? o po?o?eniu klienta po wezwaniu us?ugi.",source,255,255,255)
                setElementData(source,"player:taxi",true)
            end
        end
    end
    if allow_vehs[getElementModel(veh)] then
        if getElementData(veh,"vehicle:taxi"then
            setElementData(source,"taxi",false)
        end
    end
end)

addEventHandler("onPlayerVehicleExit",root,function(veh,seat)
    if seat==0 then
        if allow_vehs[getElementModel(veh)] then
            if getElementData(veh,"vehicle:taxi"then
                respawnVehicle(veh)
                setElementData(source,"player:taxi",false)
            end
        end
    end
end)



addCommandHandler("taxi",function(plr)
    if getElementData(plr,"taxi"then
        return outputChatBox("*Zam?wi?e?(a?) ju? us?ug?. Poczekaj cierpliwie na taks?wk?",plr,255,255,0)
    end
    count={}
    for _,v in ipairs(getElementsByType("player"))do
        if getPedOccupiedVehicle(vthen
            if getElementData(getPedOccupiedVehicle(v),"vehicle:taxi"then
                if allow_vehs[getElementModel(getPedOccupiedVehicle(v))] then
                    table.insert(count,v)
                end
            end
        end
    end
    if #count==0 then
        return outputChatBox("*Brak taks?wkarzy na s?u?bie.",plr,255,255,0)
    end
    local x,y,z=getElementPosition(plr)
    for _,v in ipairs(getElementsByType("player"))do
        if getPedOccupiedVehicle(vthen
            if getElementData(getPedOccupiedVehicle(v),"vehicle:taxi"then
                if allow_vehs[getElementModel(getPedOccupiedVehicle(v))] then
                    outputChatBox("--NOWE ZLECENIE--",v,255,255,0)
                    outputChatBox("*Gracz "..getPlayerName(plr).." zam?wi?(a) us?ug? taxi.",v,255,255,0)
                    local miasto=getZoneName(x,y,z)
                    local strefa=getZoneName(x,y,z,true)
                    outputChatBox("*Po?o?enie : "..miasto..", "..strefa,v,255,255,0)
                end
            end
        end
    end
    outputChatBox("*Zam?wi?e?(a?) us?ug? taxi. Czekaj cierpliwie w tym miejscu, taks?wkarz nie b?dzie cie szuka?.",plr,255,255,0)
    setElementData(plr,"taxi",true)
end)


addCommandHandler("oplata",function(plr,cmd,gracz,ilosc)
    if getElementData(plr,"player:taxi"then
        local cel=getPlayerFromName(gracz)
        if cel then
            setElementData(cel,"TaxiInfo",{plr,ilosc})
            outputChatBox("*Gracz "..getPlayerName(plr).." poda?(a) Ci kwitek do zap?aty "..ilosc.." $. Aby podpisa? wpisz /akceptuj",cel,255,255,255)
            outputChatBox("*Poda?e?(a?) kwitek klientowi do zap?aty.",plr,255,255,255)
        end
    end
end)

addCommandHandler("akceptuj",function(plr)
    if getElementData(plr,"TaxiInfo"then
        local taksowkarz,ilosc=unpack(getElementData(plr,"TaxiInfo"))
        local taksowkarz=getPlayerFromName(getPlayerName(taksowkarz))
        if not taksowkarz then
            return outputChatBox("*Taks?wkarz nie jest ju? online",plr,255,255,255)
        end
        if tonumber(getPlayerMoney(plr))<tonumber(iloscthen
            return outputChatBox("*Nie posiadasz pieni?dzy aby podpisa? kwitek z kwot? "..ilosc.." $",plr,255,255,255)
        end
        givePlayerMoney(taksowkarz,tonumber(ilosc))
        takePlayerMoney(plr,tonumber(ilosc))
        outputChatBox("*Podpisa?e? kwitek. Zabrano Ci "..ilosc.." $",plr,255,255,255)
        outputChatBox("*Gracz "..getPlayerName(plr).." podpisa? kwitek. Otrzymujesz "..ilosc.." $",taksowkarz,255,255,255)
    end
end)






Prosz? o pomoc!
Pozdrawiam,
mlodasnygo

Podpis
600 dni - 10 marca 2017
:piwo: 500 piw :piwo: - 10 marca 2017
Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-09-14, 16:28


Fanciak

BOT






Wiek: 25
Na forum: 4446 dni
Posty: 728
Nick w MP: Fanciak

Piwa: 1572

Respekt: 500
Respekt: 500

Strona servera



Więcej informacji znajdziesz w Wikipedii MTA:

isObjectInACLGroup


Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-09-14, 17:03


mlodasnygo







Wiek: 16
Na forum: 3972 dni
Posty: 205

Piwa: 518

Respekt: 161,8
Respekt: 161,8Respekt: 161,8

No dobra mam takie co?...



local allow_vehs={
    [420]=true,
}

local vehs={
    {-166.73339843751013.02929687519.52188873291},
    {-178.0644531251013.118164062519.522001266479},
    {-166.7949218751019.00585937519.521606445312},
    {-178.04785156251019.041992187519.521175384521},
}

taxi={}

for k,v in ipairs(vehs)do
    taxi[k]=createVehicle(420,v[1],v[2],v[3])
    setElementRotation taxi[k], 0089.538452148438 )
    setElementData(taxi[k],"vehicle:taxi",true)
end

if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(player)), aclGetGroup("Taxi")) then

addEventHandler("onPlayerVehicleEnter",root,function(veh,seat)
    if seat==0 then
        if allow_vehs[getElementModel(veh)] then
            if getElementData(veh,"vehicle:taxi"then
                outputChatBox("*Zosta?e?(a?) taks?wkarzem. Dostaniesz informacj? o po?o?eniu klienta po wezwaniu us?ugi.",source,255,255,255)
                setElementData(source,"player:taxi",true)
            end
        end
    end
    if allow_vehs[getElementModel(veh)] then
        if getElementData(veh,"vehicle:taxi"then
            setElementData(source,"taxi",false)
        end
    end
end)

addEventHandler("onPlayerVehicleExit",root,function(veh,seat)
    if seat==0 then
        if allow_vehs[getElementModel(veh)] then
            if getElementData(veh,"vehicle:taxi"then
                respawnVehicle(veh)
                setElementData(source,"player:taxi",false)
            end
        end
    end
end)



addCommandHandler("taxi",function(plr)
    if getElementData(plr,"taxi"then
        return outputChatBox("*Zam?wi?e?(a?) ju? us?ug?. Poczekaj cierpliwie na taks?wk?",plr,255,255,0)
    end
    count={}
    for _,v in ipairs(getElementsByType("player"))do
        if getPedOccupiedVehicle(vthen
            if getElementData(getPedOccupiedVehicle(v),"vehicle:taxi"then
                if allow_vehs[getElementModel(getPedOccupiedVehicle(v))] then
                    table.insert(count,v)
                end
            end
        end
    end
    if #count==0 then
        return outputChatBox("*Brak taks?wkarzy na s?u?bie.",plr,255,255,0)
    end
    local x,y,z=getElementPosition(plr)
    for _,v in ipairs(getElementsByType("player"))do
        if getPedOccupiedVehicle(vthen
            if getElementData(getPedOccupiedVehicle(v),"vehicle:taxi"then
                if allow_vehs[getElementModel(getPedOccupiedVehicle(v))] then
                    outputChatBox("--NOWE ZLECENIE--",v,255,255,0)
                    outputChatBox("*Gracz "..getPlayerName(plr).." zam?wi?(a) us?ug? taxi.",v,255,255,0)
                    local miasto=getZoneName(x,y,z)
                    local strefa=getZoneName(x,y,z,true)
                    outputChatBox("*Po?o?enie : "..miasto..", "..strefa,v,255,255,0)
                end
            end
        end
    end
    outputChatBox("*Zam?wi?e?(a?) us?ug? taxi. Czekaj cierpliwie w tym miejscu, taks?wkarz nie b?dzie cie szuka?.",plr,255,255,0)
    setElementData(plr,"taxi",true)
end)


addCommandHandler("oplata",function(plr,cmd,gracz,ilosc)
    if getElementData(plr,"player:taxi"then
        local cel=getPlayerFromName(gracz)
        if cel then
            setElementData(cel,"TaxiInfo",{plr,ilosc})
            outputChatBox("*Gracz "..getPlayerName(plr).." poda?(a) Ci kwitek do zap?aty "..ilosc.." $. Aby podpisa? wpisz /akceptuj",cel,255,255,255)
            outputChatBox("*Poda?e?(a?) kwitek klientowi do zap?aty.",plr,255,255,255)
        end
    end
end)

addCommandHandler("akceptuj",function(plr)
    if getElementData(plr,"TaxiInfo"then
        local taksowkarz,ilosc=unpack(getElementData(plr,"TaxiInfo"))
        local taksowkarz=getPlayerFromName(getPlayerName(taksowkarz))
        if not taksowkarz then
            return outputChatBox("*Taks?wkarz nie jest ju? online",plr,255,255,255)
        end
        if tonumber(getPlayerMoney(plr))<tonumber(iloscthen
            return outputChatBox("*Nie posiadasz pieni?dzy aby podpisa? kwitek z kwot? "..ilosc.." $",plr,255,255,255)
        end
        givePlayerMoney(taksowkarz,tonumber(ilosc))
        takePlayerMoney(plr,tonumber(ilosc))
        outputChatBox("*Podpisa?e? kwitek. Zabrano Ci "..ilosc.." $",plr,255,255,255)
        outputChatBox("*Gracz "..getPlayerName(plr).." podpisa? kwitek. Otrzymujesz "..ilosc.." $",taksowkarz,255,255,255)
    end
end)







Dobrze wstawi?em to z tym Taxi?

Podpis
600 dni - 10 marca 2017
:piwo: 500 piw :piwo: - 10 marca 2017
Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-09-14, 17:19


#404







Wiek: 26
Na forum: 4771 dni
Posty: 1438

Piwa: 2512

Respekt: 833,5
Respekt: 833,5Respekt: 833,5

Ostrzeżeń: 60%

addEventHandler("onPlayerVehicleEnter",root,function(veh,seat)
if isObjectInACLGroup("user."..getAccountName(getPlayerAccount(source)), aclGetGroup("Taxi")) then
    if seat==0 then
        if allow_vehs[getElementModel(veh)] then
            if getElementData(veh,"vehicle:taxi"then
                outputChatBox("*Zosta?e?(a?) taks?wkarzem. Dostaniesz informacj? o po?o?eniu klienta po wezwaniu us?ugi.",source,255,255,255)
                setElementData(source,"player:taxi",true)
            end
        end
    end
    if allow_vehs[getElementModel(veh)] then
        if getElementData(veh,"vehicle:taxi"then
            setElementData(source,"taxi",false)
        end
    end
end
end)


Warunek dodajesz po jakim? evencie (zdarzeniu), a p??niej musisz doda? jeszcze jeden end.

Postaw piwo autorowi tego posta
 

 
Tagi: lekkie :: zmiany.
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