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

Wysłany: 2018-09-30, 17:44


Pyrek24







Wiek: 26
Na forum: 3579 dni
Posty: 546
Nick w MP: Pyrek

Piwa: 10

Respekt: 50

Witam ot?? owa praca g?rnika nie daj? pieni?dzy pomo?e ktos?
KOD
local weapon_id = 7
local category_animation = "BASEBALL"
local digging_animation = "bat_4"

str=""
local t=createElement("text")
setElementData(t,"name",str)
setElementPosition(t,-981.93, -1361.30, 116.80+4)

function aktualizujText()
local q=exports["ogrpg-db"]:dbGet("select * from job_top_gornik order by ilosc desc limit 10")
str=""
for i,v in ipairs(q) do
iii=i
local nick=exports["ogrpg-db"]:dbGet("select login,login2 from ogrpg_users where id=?", v["uid"])
for i2,v2 in ipairs(nick) do
if i2 < 1 then return end
if v2["login2"] == false then
str=""..str.."\n"..iii..". "..v2["login"].." - "..v["ilosc"].." wydobytych surowc?w"
else
str=""..str.."\n"..iii..". "..v2["login2"].." - "..v["ilosc"].." wydobytych surowc?w"
end
end
end
setElementData(t, "name", str)
end
setTimer(aktualizujText, 10000, 0)

function give_weapon()
giveWeapon(source, weapon_id, 1)
setPedWeaponSlot(source, 1)
end
addEvent("kilof", true) 
addEventHandler("kilof", getRootElement(), give_weapon)

function animation()
setPedAnimation(source, "BASEBALL", "Bat_4")
end
addEvent("animation", true) 
addEventHandler("animation", getRootElement(), animation)

function end_job()
setPedAnimation(source, false)
takeWeapon(source, weapon_id)
end
addEvent("end_job", true) 
addEventHandler("end_job", getRootElement(), end_job)

function koniec_animka()
setPedAnimation(source, false)
end
addEvent("end_animation", true) 
addEventHandler("end_animation", getRootElement(), koniec_animka)


addEvent("hajsikkopalnia",true)
addEventHandler("hajsikkopalnia",root,function(kwota)
givePlayerMoney(source, kwota)
end)

local t=createElement("text")
setElementData(t,"scale",1.7)
setElementData(t,"name","Wejscie Do Kopalni")
setElementInterior(t,0)
setElementDimension(t,0)
setElementPosition(t,-989.07, -1380.37, 130.63)
createBlipAttachedTo (t, 46)

local t=createElement("text")
setElementData(t,"scale",1.7)
setElementData(t,"name","Wyjscie Z Kopalni")
setElementInterior(t,0)
setElementDimension(t,0)
setElementPosition(t,-981.63, -1361.31, 116.80)

door = createMarker (-989.07, -1380.37, 130.63-1, "cylinder", 1.3, 255, 255, 255,0)
        setElementData(door, "markery7", true)
setElementDimension(door, 0)
setElementInterior(door, 0)


addEventHandler("onMarkerHit", door, function(el, md)
    if getElementType(el) ~= "player" then return end
    if isPedInVehicle(el) then return end
    setElementDimension(el, 0)
    setElementInterior(el, 0)
    setElementPosition(el,  -978.13, -1361.11, 116.80)
end)


local job_marker = createMarker(-997.14, -1375.71, 103.03-1, "cylinder", 1.3, 255, 255, 255, 0)
        setElementData(job_marker, "markery6", true)
local job_marker_cancel = createMarker(-993.98, -1377.85, 130.67-1, "cylinder", 1.3, 255, 255, 255, 0)
        setElementData(job_marker_cancel, "markery3", true)
local time_freeze = math.random(6000,9000)
local name_job = "wydobywania surowc?w mineralnych"
local button_job = "r"
local button_state = "down"
local digging_animation = "bat_4"
local sw, sh = guiGetScreenSize()


local rozpoczecie = createElement("text")
setElementData(rozpoczecie, "name", "Praca G?rnika\nAby rozpocz?c prace kliknij 'R'")
setElementPosition(rozpoczecie, -997.14, -1375.71, 103.03)

local anulowanie = createElement("text")
setElementData(anulowanie, "name", "Aby zako?czy? prace, wci?nij 'R'!")
setElementPosition(anulowanie, -993.98, -1377.85, 130.67)


local points = {
    {-995.07, -1383.59, 103.03},  
    {-992.98, -1395.03, 103.03},
    {-1008.60, -1398.61, 103.10},
    {-1013.05, -1380.09, 103.10},
    {-1008.98, -1359.87, 103.10},
    {-1018.05, -1349.34, 103.10},
    {-1013.35, -1342.76, 103.11},
}

local nazwy = {
    "rudy ?elaza",
    "sztabki w?gla brunatnego",
    "sztabki w?gla kamiennego",
    "rudy z?ota",
    "rudy diamentu",
    "rudy szmaragdu",
    "rudy miedzi",
    "sztabki soli kamiennej",
    "sztabki granitu",
}

local objective
local draw
local draw = 0
local element_type = "player"

function isEventHandlerAdded( sEventName, pElementAttachedTo, func )
    if type( sEventName ) == 'string' and isElement( pElementAttachedTo ) and type( func ) == 'function' then
        local aAttachedFunctions = getEventHandlers( sEventName, pElementAttachedTo )
        if type( aAttachedFunctions ) == 'table' and #aAttachedFunctions > 0 then
            for i, v in ipairs( aAttachedFunctions ) do
                if v == func then
                    return true
                end
            end
        end
    end
    return false
end

local function postep()
    local pasek = interpolateBetween(0, 0, 0, sw * 0.4297, 0, 0, (getTickCount()-time)/time_freeze, "InOutQuad")
    dxDrawText("Wykopujesz Rude...", sw * 0.4480, sh * 0.7522, sw * 0.4407, sh * 0.2799, tocolor(255, 255, 255, 255), 1.80, "normalFont", "left", "top", false, false, false, true, false)
    dxDrawRectangle(sw * 0.2855, sh * 0.8060, sw * 0.4297, sh * 0.0600, tocolor(0, 0, 0, 170), false)
    dxDrawRectangle(sw * 0.2855, sh * 0.8060, pasek, sh * 0.0600, tocolor(255, 0, 100, 255), false)
end

local function hitmarker(player, md)
    if not md or getElementType(player) ~= element_type then return end
    if player ~= localPlayer then return end
    outputChatBox("Aby rozpoczac w kopalni, wci?nij klawisz '"..button_job.."'.")
end
addEventHandler("onClientMarkerHit", job_marker, hitmarker)

local function startjob()
    if not isElementWithinMarker(localPlayer, job_marker) then return end
    if getElementData(localPlayer, "player:miner") == true then exports["noti"]:noti("* Posiadasz aktywn? prac?!", 255, 0, 0, true) return end
    if getPedOccupiedVehicle(localPlayer) == true then exports["noti"]:noti("* Nie mo?esz by? w poje?dzie!", 255, 0, 0, false) return end
    setElementData(localPlayer, "player:miner", true)
    outputChatBox("Rozpocz??e?[a?] Prace w kopalni udaj sie do punktu zaznaczonego na mapie i zniszcz ska?e")
    toggleControl("sprint", false) toggleControl("jump", false) toggleControl("crouch", false) toggleControl("next_weapon", false) toggleControl("previous_weapon", false) toggleControl("fire", false)
    triggerServerEvent("kilof", localPlayer)
    job_stage(localPlayer)
end
bindKey(button_job, button_state, startjob)

local function canceljob()
    if not isElementWithinMarker(localPlayer, job_marker_cancel) then return end
    if getElementData(localPlayer, "player:miner") == false then outputChatBox("Nie posiadasz aktywnej pracy!") return end
    if getPedOccupiedVehicle(localPlayer) == true then outputChatBox("Nie mo?esz by? w poje?dzie!") return end
    outputChatBox("Zako?czy?e?[a?] prace w kopalni teraz mozesz uda? si? do wyj?cia :D")
    toggleControl("sprint", true) toggleControl("jump", true) toggleControl("crouch", true) toggleControl("next_weapon", true) toggleControl("previous_weapon", true)
    if isElement(objective) and isElement(blip) and isElement(rocks) and isElement(text) then
    destroyElement(objective)
    destroyElement(blip)
    destroyElement(rocks)
    destroyElement(text)
    end
    if isEventHandlerAdded("onClientRender", root, postep) then
    removeEventHandler("onClientRender", root, postep)
    end
    triggerServerEvent("end_job", localPlayer)
    setElementData(localPlayer, "player:miner", false)
end
bindKey(button_job, button_state, canceljob)

function job_stage(player, md)
    if (objective) and isElement(objective) then
    destroyElement(objective)
    destroyElement(blip)
    destroyElement(rocks)
    objective = nil
    end
    toggleControl("sprint", false) toggleControl("jump", false) toggleControl("crouch", false) toggleControl("next_weapon", false) toggleControl("previous_weapon", false) toggleControl("fire", false)
    local losuj = math.random(2, #points)
    local miner = points
    objective = createMarker(miner[losuj][1], miner[losuj][2], miner[losuj][3]-0.95, "cylinder", 1.1, 255, 255, 255, 0)
        setElementData(objective, "markery3", true)
    rocks = createObject(math.random(3930,3931), miner[losuj][1]+math.random(0.4,0.5), miner[losuj][2]+math.random(0.2, 0.3), miner[losuj][3]-0.6, 0, 0, math.random(0,90))
    blip = createBlipAttachedTo(objective, 12)
    text = createElement("text")
    setElementData(text, "name", "Ska?a")
    setElementPosition(text, miner[losuj][1], miner[losuj][2], miner[losuj][3]+0.12)
    addEventHandler("onClientMarkerHit", objective, function(player, md)
    if not md or getElementType(player) ~= element_type then return end
    if player ~= localPlayer then return end
    if isPedInVehicle(player) then outputChatBox("Nie mo?esz by? w poje?dzie!") return end
    local data = setElementData(player, "player:miner", true)
    if data then outputDebugString("Nadano elementdat? g?rnika dla u?ytkownika o nicku: "..getPlayerName(player)..".") end
    setElementFrozen(player, true)
    toggleAllControls(false)
    addEventHandler("onClientRender", root, postep) 
    time = getTickCount()
    setTimer(function()
    removeEventHandler("onClientRender", root, postep)
    end, time_freeze, 1) 
    triggerServerEvent("animation", localPlayer)
    setTimer(function()
    setElementFrozen(player, false)
    toggleAllControls(true)
    setPedAnimation(player, digging_animation)
    destroyElement(objective)
    destroyElement(blip)
    destroyElement(rocks)
    destroyElement(text)
    triggerServerEvent("end_animation", localPlayer)
    job_stage(localPlayer)
    wyplata(localPlayer)
    end, time_freeze, 1)
    end)
end

function wyplata()
        local kwota = math.random(80,120)
        local premium = getElementData(localPlayer,"player:premium")
        local random = math.random(1, #nazwy)
        if premium then
        kwota = kwota
        triggerServerEvent("prace:wyplata:kopalnia",root,"kopalnia",kwota)
        exports["noti"]:noti("Za wydobycie "..nazwy[random].." otrzymujesz "..(kwota or "wyst?pi? b??d").." PLN.", client)
        else
        kwota = kwota
        triggerServerEvent("prace:wyplata:kopalnia",root,"kopalnia",kwota)
        exports["noti"]:noti("Za wydobycie "..nazwy[random].." otrzymujesz "..(kwota or "wyst?pi? b??d").." PLN.", client)
        end
end

function onresourcestop()
    if isEventHandlerAdded("onClientRender", root, postep) then
    removeEventHandler("onClientRender", root, postep)
    end
    setElementData(localPlayer, "player:miner", false)
    setElementFrozen(localPlayer, false)
    toggleControl("sprint", true)
    toggleControl("jump", true)
    toggleControl("crouch", true)
    toggleControl("next_weapon", true)
    toggleControl("previous_weapon", true)
    toggleControl("fire", true)
end
addEventHandler("onClientResourceStop", resourceRoot, onresourcestop)

dooroff = createMarker (-981.63, -1361.31, 116.80-1, "cylinder", 1.3, 255, 255, 255,0)
        setElementData(dooroff, "markery8", true)
local function hitmarker3(player, md)
    if not md or getElementType(player) ~= element_type then return end
    if player ~= localPlayer then return end
    if isPedInVehicle(player) then return end
    setElementDimension(player, 0)
    setElementInterior(player, 0)
    if isElement(objective) and isElement(blip) and isElement(rocks) and isElement(text) then
    destroyElement(objective)
    destroyElement(blip)
    destroyElement(rocks)
    destroyElement(text)
    end
    if isEventHandlerAdded("onClientRender", root, postep) then
    removeEventHandler("onClientRender", root, postep)
    end
    toggleControl("sprint", true) toggleControl("jump", true) toggleControl("crouch", true) toggleControl("next_weapon", true) toggleControl("previous_weapon", true)
    triggerServerEvent("end_job", localPlayer)
    setElementData(localPlayer, "player:miner", false)
    setElementPosition(player, -995.23, -1378.78, 130.60)
        Timer(fadeCamera, 2000, 1, hitElement, true, 1)
end
addEventHandler("onClientMarkerHit", dooroff, hitmarker3)

local function hitmarker2(player, md)
    if not md or getElementType(player) ~= element_type then return end
    if player ~= localPlayer then return end
    outputChatBox("Aby zako?czy? prac? w kopalnij wci?nij klawisz '"..button_job.."'", 255, 0, 0, true)
end
addEventHandler("onClientMarkerHit", job_marker_cancel, hitmarker2)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-09-30, 17:47


Avenged

Młodszy Szkrypter






Wiek: 24
Na forum: 3651 dni
Posty: 654
Nick w MP: Avenged

Piwa: 1572

Respekt: 326,3
Respekt: 326,3Respekt: 326,3Respekt: 326,3

Po stronie servera trigger nazywa si? 'hajsikkopalnia'


addEvent("hajsikkopalnia",true)
addEventHandler("hajsikkopalnia",root,function(kwota)
givePlayerMoney(source, kwota)
end)


Natomiast po stronie clienta trigger nazywa si? 'prace:wyplata:kopalnia'

        triggerServerEvent("prace:wyplata:kopalnia",root,"kopalnia",kwota)


Wi?c jak to ma dzia?a?.. ustaw nazwy trigger?w takie same

Podpis
LUA, JS, PHP



Zapraszam do skorzystania z moich usług: Klik

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-09-30, 21:55


DomineQ

lua mejster






Wiek: 22
Na forum: 4101 dni
Posty: 309
Nick w MP: EZ3N

Piwa: 5189

Respekt: 85,8

Powinno dzia?a?, mia?e? po prostu inn? nazwe triggera.


addEvent("prace:wyplata:kopalnia",true)
addEventHandler("prace:wyplata:kopalnia",root,function(kwota)
givePlayerMoney(source, kwota)
end)

local t=createElement("text")
setElementData(t,"scale",1.7)
setElementData(t,"name","Wejscie Do Kopalni")
setElementInterior(t,0)
setElementDimension(t,0)
setElementPosition(t,-989.07, -1380.37, 130.63)
createBlipAttachedTo (t, 46)

local t=createElement("text")
setElementData(t,"scale",1.7)
setElementData(t,"name","Wyjscie Z Kopalni")
setElementInterior(t,0)
setElementDimension(t,0)
setElementPosition(t,-981.63, -1361.31, 116.80)

door = createMarker (-989.07, -1380.37, 130.63-1, "cylinder", 1.3, 255, 255, 255,0)
        setElementData(door, "markery7", true)
setElementDimension(door, 0)
setElementInterior(door, 0)


addEventHandler("onMarkerHit", door, function(el, md)
    if getElementType(el) ~= "player" then return end
    if isPedInVehicle(el) then return end
    setElementDimension(el, 0)
    setElementInterior(el, 0)
    setElementPosition(el,  -978.13, -1361.11, 116.80)
end)


Podpis
Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-10-01, 18:33


DomineQ

lua mejster






Wiek: 22
Na forum: 4101 dni
Posty: 309
Nick w MP: EZ3N

Piwa: 5189

Respekt: 85,8

"Pyrek24" napisał/a:

Dzi?kuje ! Lecz daj? kase do banku a mo?na tak ?eby da?o do eq


Nie widz? tutaj nic co by robi?o, ?e got?wka wpada do banku, w triggerze wyra?nie jest givePlayerMoney u?yte, mo?e nie dowidz?.

Spr?buj zmieni? nazw? triggera z tej wyp?aty na inn? by? mo?e gdzie? indziej jest taki trigger.

Podpis
Postaw piwo autorowi tego posta
 

 
Tagi: praca :: nie :: daję :: pieniędzy
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Praca nie daję pieniędzy 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