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

Wysłany: 2016-07-04, 12:50


Janusz_GRA

NO NAME






Wiek: 26
Na forum: 3857 dni
Posty: 223
Nick w MP: michalMonster

Piwa: 175

Respekt: 85,8

Witam mam problem z prac? kuriera, gdy do jedziemy do punktu to na chacie pisze ?e Zarobi?e? 35 ale nie daje nam pieni?dzy. Za pomoc stawiam :piwo: i R*

Link do pracy: http://www113.zippyshare.com/v/5WWHkert/file.html

zone = {}
table.insert(zone,1,createColSphere(-2170,-213,35.2,2))
table.insert(zone,2,createColSphere(-2170.89,-219.99,34.84,2))


miejscarozladunku = {
{2101.75,2671.19,10.81},  ---- tu dodajemy miejsca poprostu skopiuj linijke i wstaw podmieniajac kordy x,y,z ;) 
{2264.12,2738.32,10.82},
{2483.38,1946.33,10.17},
{1705.82,997.99,10.82},
{777.88,1879.80,4.96},
}

controlTable = {  "forwards", "backwards", "left", "right", "jump", "sprint", "enter_exit", } --- blokada przyciskow ze wzgledu i? setElementFrozen buguje przy attachu :3

money = 35  --- ilosc pieniedzy jakie dostajemy za 1 paczke





--Auto ma byc 1
vehiclePos = {
{499,1461.88, 979.09, 10.65, 4.2, 0.1, 358.5},
}


addEvent("kurier:start",true)
addEventHandler("kurier:start",resourceRoot,function(plr)
if not plr then return end
if not getElementData(plr,"job:vehicle") then

  
outputChatBox("*Zaczales prace kuriera",plr)
setElementData(plr,"player:job",true)

--auto
local v = vehiclePos
local rol = math.random(1,#vehiclePos)
local checkzone = getElementsWithinColShape ( zone[rol], "vehicle" )
if #checkzone ~= 0 then outputChatBox("*Parking zajety poczekaj!",plr,255,0,0) return end
car = createVehicle(v[rol][1], v[rol][2], v[rol][3], v[rol][4], v[rol][5], v[rol][6],v[rol][7])
setElementFrozen(car, true)
setElementData(car, "vehicle:fuel", 100)
setElementData(car, "vehicle:mileage", math.random(10000, 90000))
setElementData(car,"vehicle:pack",0)
setElementData(car, "vehicle:desc","Za?adowano [0/5] skrzy?")
setElementData(car,"vehicle:destination",false)
setElementData(plr,"job:vehicle",car)
setElementData(car,"job:vehicle",plr)
setVehicleEngineState(car, false)
addEventHandler ( "onPlayerQuit", plr, function() if isElement(car) then destroyElement(car) end end)
addEventHandler("onVehicleStartEnter",car,function(g,s,j) if g ~= plr then cancelEvent() end end)
end
if getElementData(plr,"job:object") then outputChatBox("Posiadasz juz skrzynke",plr,255,0,0) return end
setElementData(plr,"job:anim",setPedAnimation ( plr, "CARRY", "crry_prtial", 1,true ))
setElementData(plr,"job:object",createObject(1271, 0, 0, 0))
skrzynia = getElementData(plr,"job:object")
attachElements ( skrzynia, plr, 0, 0.8, 0.5)
local veh = getElementData(plr,"job:vehicle")
local x,y,z = getElementPosition(veh)
local cel = createMarker(x-5, y, z, "checkpoint", 1.4, 255, 0, 0,255,plr)
attachElements(cel,veh,0,-5,0)
addEventHandler ( "onPlayerQuit", plr, function() if isElement(skrzynia) then destroyElement(skrzynia) end end)
    addEventHandler("onMarkerHit", cel, function(el, md)
    if not md or getElementType(el) ~= "player" then return end

            if getPedOccupiedVehicle(el) then
            outputChatBox("* Nie mo?esz tego od?o?y? b?d?c w poje?dzie!",el)
                return
            end
            local vehe = getElementData(el,"job:vehicle")
            if not vehe then return end
            if getElementData(vehe,"vehicle:pack") > 4 then
                setElementFrozen(el, false)
                outputChatBox("* Za malo miejsca.",el,255,0,0)
                setElementData(el,"job:anim",false)
                destroyElement(getElementData(el,"job:object"))
                destroyElement(cel)
                return
            end
            for u,s in ipairs(controlTable) do
             toggleControl(el,s,false)
            end
            outputChatBox("* K?adziesz Skrzynie Poczekaj (5 sekund)",el)
            setTimer(function()
                for u,s in ipairs(controlTable) do
                toggleControl(el,s,true)
                end
                outputChatBox("* Wlozyles skrzynk?.",el)
                destroyElement(getElementData(el,"job:object"))
                setElementData(el,"job:object",false)
                destroyElement(cel)
                setElementData(vehe, "vehicle:pack", tonumber(getElementData(vehe,"vehicle:pack"))+1)
                setElementData(vehe, "vehicle:desc","Za?adowano ["..tonumber(getElementData(vehe,"vehicle:pack")).."/5] skrzy?")
                setTimer(setPedAnimation,5000,1,el)
            end, 5000, 1)
        end)
end)

addEventHandler("onVehicleStartEnter",resourceRoot,function(gracz,s,j)
if getElementData(gracz,"job:object") then outputChatBox("*Nie mozesz wej?? z skrzynk?!",gracz,255,0,0); cancelEvent() return end
if getElementData(source,"vehicle:destination") then return end
local losuj = math.random(2, #miejscarozladunku)
local miejsce = createMarker(miejscarozladunku[losuj][1], miejscarozladunku[losuj][2], miejscarozladunku[losuj][3]-1, "checkpoint", 3.0, 0, 255, 0,255,gracz)
local blip = createBlip(miejscarozladunku[losuj][1], miejscarozladunku[losuj][2], miejscarozladunku[losuj][3], 41,2,255,0,0,255,1,9999,gracz)
setElementData(source,"vehicle:destination",{miejsce,blip})
addEventHandler("onMarkerHit", miejsce, function(el, md)
    if not md or getElementType(el) ~= "vehicle" then return end
    local plr = getVehicleOccupant(el,0)
    if getElementData(el,"vehicle:pack") == false then outputChatBox("*Brak Paczek!",plr) return end
    local paczki = getElementData(el,"vehicle:pack")
    setElementData(el,"vehicle:pack",false)
    local pieniadze = paczki*money
    triggerEvent("givePlayerMoney",plr,pieniadze/2)
    outputChatBox("* Zarobiles "..pieniadze.." za rozwiezienie "..paczki.." paczek",plr)
    destroyElement(blip)
    destroyElement(miejsce)
    setElementData(el,"vehicle:destination",false)
    setElementData(el, "vehicle:desc",false)
end)
end)

addEventHandler("onVehicleExit",resourceRoot,function(gracz,s,j)
if getElementData(source,"vehicle:destination") then
 for u,s in ipairs(getElementData(source,"vehicle:destination")) do
destroyElement(s)
end
end
destroyElement(source)
setElementData(gracz,"job:vehicle",false)
end)


addEventHandler("onResourceStop",resourceRoot,function() 
local players = getElementsByType ( "player" ) 
for theKey,thePlayer in ipairs(players) do
setElementData(thePlayer,"job:object",false)
setElementData(thePlayer,"job:vehicle",false)
end
end)


local praca = createMarker(1466.08,969.54,10.82-1, "cylinder", 2, 255, 0, 0,150)
local t = createElement('text')
setElementPosition(t,1466.08,969.54,10.82)
setElementData(t,'name',"Praca Dorywcza kurier")
createBlip(1466.08,969.54,10.82, 46,2,0,0,0,0,0,275)

local t = createElement('text')
setElementPosition(t,1461.58,981.05,10.82)
setElementData(t,'name',"Nie parkowa?, respi sie pojazd kuriera!")


addEventHandler("onClientMarkerHit", praca, function(el, md)
    if not md or getElementType(el) ~= "player" then return end
    if el ~= localPlayer then return end
    outputChatBox("* Aby rozpocz?? prac? wci?nij 'E'")
end)

bindKey("e", "down", function()
    if not isElementWithinMarker(localPlayer, praca) then return end
    
    triggerServerEvent("kurier:start", resourceRoot,localPlayer)
end) 


Ostatnio zmieniony przez Janusz_GRA 2016-07-04, 13:21, w całości zmieniany 2 razy  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-04, 13:15


marcin778

Krytyk serwerów MTA






Wiek: 24
Na forum: 4290 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4661

Respekt: 1436,8
Respekt: 1436,8

Wstaw kod a nie dajesz link do tej pracy.

Podpis
Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw

-- obecnie
-- obecnie
-- dawniej
-- dawniej
-- dawniej
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-04, 13:20


Dexnes_

Tiger






Wiek: 26
Na forum: 4542 dni
Posty: 620
Nick w MP: Dexnes

Piwa: 1394

Respekt: 390
Respekt: 390Respekt: 390Respekt: 390Respekt: 390

Teraz b?dziesz dostawa? nale?ne pieni?dze :

Server.lua


addEvent("kurier:start",true)
addEventHandler("kurier:start",resourceRoot,function(plr)
if not plr then return end
if not getElementData(plr,"job:vehicle") then

  
outputChatBox("*Zaczales prace kuriera",plr)
setElementData(plr,"player:job",true)

--auto
local v = vehiclePos
local rol = math.random(1,#vehiclePos)
local checkzone = getElementsWithinColShape ( zone[rol], "vehicle" )
if #checkzone ~= 0 then outputChatBox("*Parking zajety poczekaj!",plr,255,0,0) return end
car = createVehicle(v[rol][1], v[rol][2], v[rol][3], v[rol][4], v[rol][5], v[rol][6],v[rol][7])
setElementFrozen(car, true)
setElementData(car, "vehicle:fuel", 100)
setElementData(car, "vehicle:mileage", math.random(10000, 90000))
setElementData(car,"vehicle:pack",0)
setElementData(car, "vehicle:desc","Za?adowano [0/5] skrzy?")
setElementData(car,"vehicle:destination",false)
setElementData(plr,"job:vehicle",car)
setElementData(car,"job:vehicle",plr)
setVehicleEngineState(car, false)
addEventHandler ( "onPlayerQuit", plr, function() if isElement(car) then destroyElement(car) end end)
addEventHandler("onVehicleStartEnter",car,function(g,s,j) if g ~= plr then cancelEvent() end end)
end
if getElementData(plr,"job:object") then outputChatBox("Posiadasz juz skrzynke",plr,255,0,0) return end
setElementData(plr,"job:anim",setPedAnimation ( plr, "CARRY", "crry_prtial", 1,true ))
setElementData(plr,"job:object",createObject(1271, 0, 0, 0))
skrzynia = getElementData(plr,"job:object")
attachElements ( skrzynia, plr, 0, 0.8, 0.5)
local veh = getElementData(plr,"job:vehicle")
local x,y,z = getElementPosition(veh)
local cel = createMarker(x-5, y, z, "checkpoint", 1.4, 255, 0, 0,255,plr)
attachElements(cel,veh,0,-5,0)
addEventHandler ( "onPlayerQuit", plr, function() if isElement(skrzynia) then destroyElement(skrzynia) end end)
    addEventHandler("onMarkerHit", cel, function(el, md)
    if not md or getElementType(el) ~= "player" then return end

            if getPedOccupiedVehicle(el) then
            outputChatBox("* Nie mo?esz tego od?o?y? b?d?c w poje?dzie!",el)
                return
            end
            local vehe = getElementData(el,"job:vehicle")
            if not vehe then return end
            if getElementData(vehe,"vehicle:pack") > 4 then
                setElementFrozen(el, false)
                outputChatBox("* Za malo miejsca.",el,255,0,0)
                setElementData(el,"job:anim",false)
                destroyElement(getElementData(el,"job:object"))
                destroyElement(cel)
                return
            end
            for u,s in ipairs(controlTable) do
             toggleControl(el,s,false)
            end
            outputChatBox("* K?adziesz Skrzynie Poczekaj (5 sekund)",el)
            setTimer(function()
                for u,s in ipairs(controlTable) do
                toggleControl(el,s,true)
                end
                outputChatBox("* Wlozyles skrzynk?.",el)
                destroyElement(getElementData(el,"job:object"))
                setElementData(el,"job:object",false)
                destroyElement(cel)
                setElementData(vehe, "vehicle:pack", tonumber(getElementData(vehe,"vehicle:pack"))+1)
                setElementData(vehe, "vehicle:desc","Za?adowano ["..tonumber(getElementData(vehe,"vehicle:pack")).."/5] skrzy?")
                setTimer(setPedAnimation,5000,1,el)
            end, 5000, 1)
        end)
end)

addEventHandler("onVehicleStartEnter",resourceRoot,function(gracz,s,j)
if getElementData(gracz,"job:object") then outputChatBox("*Nie mozesz wej?? z skrzynk?!",gracz,255,0,0); cancelEvent() return end
if getElementData(source,"vehicle:destination") then return end
local losuj = math.random(2, #miejscarozladunku)
local miejsce = createMarker(miejscarozladunku[losuj][1], miejscarozladunku[losuj][2], miejscarozladunku[losuj][3]-1, "checkpoint", 3.0, 0, 255, 0,255,gracz)
local blip = createBlip(miejscarozladunku[losuj][1], miejscarozladunku[losuj][2], miejscarozladunku[losuj][3], 41,2,255,0,0,255,1,9999,gracz)
setElementData(source,"vehicle:destination",{miejsce,blip})
addEventHandler("onMarkerHit", miejsce, function(el, md)
    if not md or getElementType(el) ~= "vehicle" then return end
    local plr = getVehicleOccupant(el,0)
    if getElementData(el,"vehicle:pack") == false then outputChatBox("*Brak Paczek!",plr) return end
    local paczki = getElementData(el,"vehicle:pack")
    setElementData(el,"vehicle:pack",false)
    local pieniadze = paczki*money
    givePlayerMoney ( plr, pieniadze) 
    outputChatBox("* Zarobiles "..pieniadze.." za rozwiezienie "..paczki.." paczek",plr)
    destroyElement(blip)
    destroyElement(miejsce)
    setElementData(el,"vehicle:destination",false)
    setElementData(el, "vehicle:desc",false)
end)
end)

addEventHandler("onVehicleExit",resourceRoot,function(gracz,s,j)
if getElementData(source,"vehicle:destination") then
 for u,s in ipairs(getElementData(source,"vehicle:destination")) do
destroyElement(s)
end
end
destroyElement(source)
setElementData(gracz,"job:vehicle",false)
end)


addEventHandler("onResourceStop",resourceRoot,function() 
local players = getElementsByType ( "player" ) 
for theKey,thePlayer in ipairs(players) do
setElementData(thePlayer,"job:object",false)
setElementData(thePlayer,"job:vehicle",false)
end
end)


Podmie? tylko plik server.lua

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-04, 13:32


Janusz_GRA

NO NAME






Wiek: 26
Na forum: 3857 dni
Posty: 223
Nick w MP: michalMonster

Piwa: 175

Respekt: 85,8

BlackGamePL, Dzi?ki dzia?a

Podpis
Jeśli nie możesz czegoś zrobić dobrze, przynajmniej spraw, żeby wyglądało dobrze.
Postaw piwo autorowi tego posta
 

 
Tagi: praca
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