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

Wysłany: 2017-06-21, 22:30


SamsungPLL

Programista lodówek






Wiek: 23
Na forum: 3805 dni
Posty: 123
Nick w MP: SamsungPLL

Piwa: 135

Respekt: 55,3

Witam spo?eczno?? GTAO.pl!
Zwracam si? do was poniewa? mam pewien problem.
Natomiast wszystkie prace jakie wgrywam dodaj? pieniedze do bankomatu gracza oraz na konto gracza.
np. Jest cel w autobusie i dostaje sie 56PLN i jak sie wjedzie w ten jeden punkt to dodaje pieniadze do konta gracza +56PLN oraz +56PLN do bankomatu gracza, nie wiem co robi?.
DODAM ZE JEZELI WYLACZE SKRYPT "ogrpg-prace-settings" TO NIE DAJE PIENIEDZY Z KAZDEJ PRACY NA KONTO GRACZA TYLKO DO BANKOMATU
(Chce aby dawa?o pieni?dze na konto gracza a nie do bankomatu)
Prosze o pomoc, oczywi?cie :piwo: za udzielenie pomocy.

Kod z jednej z prac:

praca_c.lua:
local praca createMarker(-1708.24,188.50,32.99-0.8"cylinder"2.00100100135)
local t=createElement("text")
setElementData(t,"name""Skoki do wody")
setElementPosition(t,-1708.24,188.50,32.99)
setElementDimension(t0)
setElementInterior(t0)


local miejscasplash = {
    {-1678.53,176.39,-0.36},
    {-1665.80,189.88,0.96},
    {-1675.87,183.62,0.07},
    {-1681.15,187.56,0.89},
    {-1699.83,207.05,-0.40},
}

addEventHandler("onClientMarkerHit"praca, function(elmd)
    if not md or getElementType(el) ~= "player" then return end
    if el ~= localPlayer then return end
    outputChatBox("* Zarobki pracy: 150 PLN za wskoczenie do punktu.")
    outputChatBox("* Aby rozpocz?? prac? wci?nij 'E'")
end)


bindKey("e""down", function()
    if not isElementWithinMarker(localPlayerpracathen return end
    if not getElementData(localPlayer"gracz_praca"then
        local losuj math.random(2#miejscasplash)
        setElementData(localPlayer"gracz_praca"true)
        outputChatBox("* Masz 10 sekund!."25500)
        outputChatBox("* Doskocz do celu!.")
        local cel createMarker(miejscasplash[losuj][1], miejscasplash[losuj][2], miejscasplash[losuj][3]+1.0"checkpoint"4.025500)
        local blip createBlipAttachedTo(cel41)
        local czas setTimer(function()
                destroyElement(cel)
                destroyElement(blip)
                setElementData(localPlayer"gracz_praca"false)
                outputChatBox("* Nie doskoczy?e?/a?!"25500)
            end100001)

        addEventHandler("onClientMarkerHit"cel, function(elmd)
            if not md or getElementType(el) ~= "player" then return end
            if el ~= localPlayer then return end
            if isElementInWater(elthen
               outputChatBox("* Nie doskoczy?e?!"25500)
               setElementPosition(el, -1708.24,188.50,32.99)
            setElementData(el"gracz_praca"false)
            destroyElement(blip)
            destroyElement(cel)
            if isTimer czas then killTimer (czasend
            return end
            if getPedOccupiedVehicle(elthen
            outputChatBox("* Nie mo?esz tego robi? b?d?c w poje?dzie!")
                return
            end
            setElementFrozen(eltrue)
            destroyElement(blip)
            if isTimer czas then killTimer (czasend
            outputChatBox("* Gratulacje doskoczy?e? do punktu!")
            setTimer(function()
                destroyElement(cel)
                setElementFrozen(elfalse)
                setElementData(el"gracz_praca"false)
                triggerServerEvent("givePlayerMoney"el99)
                outputChatBox("* Zarobi?e?/a? 99 PLN!")
                setElementPosition(el, -1708.24,188.50,32.99)
            end15001)
        end)
    else
        outputChatBox("* Posiadasz aktywn? prac?.")
    end
end)


addEventHandler("onClientResourceStop"resourceRoot, function()
 setElementData(localPlayer"gracz_praca"false)
end,false,"high")

fileDelete("praca_c.lua")


praca_s.lua:
pracwejscie createMarker (-1722.64,200.85,3.55+1"arrow"22552550)
wyjscie createMarker (-1720.38,188.68,32.99+1"arrow"22552550)
setElementDimension(wyjscie0)
addEventHandler("onMarkerHit"wejscie, function(hitElementmd)
if not md then return end
if getElementType(hitElement) == "player" then
if not isPedInVehicle(hitElementthen
    setElementDimension(hitElement0)
    setElementPosition(hitElement, -1712.17,188.46,32.99)
    end
    end
end)

addEventHandler("onMarkerHit"wyjscie, function(hitElementmd)
if not md then return end
if getElementType(hitElement) == "player" then
if not isPedInVehicle(hitElementthen
    setElementDimension(hitElement0)
    setElementPosition(hitElement, -1729.55,199.88,3.55)
    end
    end
end)


Kod z skryptu: ogrpg-prace-settings


c_settings.lua
local sx,sy=guiGetScreenSize()

local data={
    value=nil,
    showed=false,
    text=nil,
}

local randomText={
    "Pracuj dobrze a co? zyskasz",
    "Nie ma to jak praca na serwerze",
    "Graj dalej jak Ci si? podoba",
}

function renderInformation()
    local sin=math.sin(getTickCount()/500)*20
    dxDrawRectangle(sx*288/1024sy*512/768sx*471/1024sy*101/768tocolor(25525525596), false)
    dxDrawImage(sx*288/1024sy*512/768sx*103/1024sy*101/768"img/corona.png"sin00whitefalse)
    dxDrawText("Otrzyma?e?(a?) dodatkow? reputacj?..."sx*(393+1)/1024sy*(513+1)/768sx*(759+1)/1024sy*(549+1)/768tocolor(000255), 1.11"default-bold""center""center"falsetrue)
    dxDrawText("Otrzyma?e?(a?) dodatkow? reputacj?..."sx*393/1024sy*(513)/768sx*759/1024sy*549/768white1.11"default-bold""center""center"falsetrue)
    dxDrawText(data.text.." ("..data.value.." REP)"sx*(393+1)/1024sy*(549+1)/768sx*(759+1)/1024sy*(603+1)/768tocolor(000255), 1.00"clear""center""center"falsetrue)
    dxDrawText(data.text.." ("..data.value.." REP)"sx*393/1024sy*549/768sx*759/1024sy*603/768white1.00"clear""center""center"falsetrue)
end

addEvent("reputation:show"true)
addEventHandler("reputation:show"resourceRoot, function(rnd)
    data.value=rnd[2]
    data.text=randomText[math.random(#randomText)]
    addEventHandler("onClientRender"rootrenderInformation)
    setTimer(function()
        removeEventHandler("onClientRender"rootrenderInformation)
        data.value=nil
        data.text=nil
    end60001)
end)


s_settings.lua:
local obiekt={}

-- Kod s?u??cy od sprawdzania prawa jazdy
function getVehicleLicense(plr,type)
    if getElementData(plr,"player:license:pj"..type.."") ~= 1 then
        outputChatBox("***Prawo jazdy mo?esz zda? w urz?dzie***"plr25500)
        return
    end
    local result=exports["ogrpg-db"]:dbGet("SELECT * FROM ogrpg_punish WHERE serial=? AND type=? AND active=1 AND time>NOW()"getPlayerSerial(plr), tostring(type))
    if result and #result > 0 then
        v=result[1]
        outputChatBox("* Posiadasz zawieszone prawo jazdy do "..v.time.." za "..v.reasonplr)
        return true
    else
        exports["ogrpg-db"]:dbSet("DELETE FROM ogrpg_punish WHERE serial=? AND type=? AND active=1 AND time<NOW()"getPlayerSerial(plr), tostring(type))
        return false
    end
end

-- Kod s?u??cy od dawania wynagrodzenia
addEvent("givePlayerMoney"true)
addEventHandler("givePlayerMoney"root, function(value,value2)
    -- nie zalogowana osoba a fuj
    if not tonumber(valuethen return end
    if not getElementData(source,"player:logged"then return end
    givePlayerMoney(source,value)
    -- Kod od reputacji
    if not value2 then
        local rnd={math.random(1,10),math.random(1,3)}
        local rep=getElementData(source,"player:reputation") or 0
        local xd=rep+rnd[2]
        setElementData(source,"player:reputation",xd)
        if rnd[1] == or rnd[1] == or rnd[1] == 9 then
            triggerClientEvent(source"reputation:show"resourceRootrnd)
        end
    end
end)

addEvent("takePlayerMoney"true)
addEventHandler("takePlayerMoney"root, function(how)
    if not getElementData(source,"player:logged"then return end
    if not tonumber(howthen return end
    takePlayerMoney(source,how);
end)

-- Kod s?u??cy od usuwania danego pojazdu
addEvent("destroyVehicle"true)
addEventHandler("destroyVehicle"root, function(veh)
    if not veh then return end
    destroyElement(veh)
    if obiekt[vehthen 
        destroyElement(obiekt[veh])
    end
end)

-- Kod s?u??cy od usuwania obiekt?w z pojazdu
addEvent("removeObject"true)
addEventHandler("removeObject"root, function(veh,code)
    if obiekt[vehthen
        destroyElement(obiekt[veh])
    end
end)

-- Kod s?u?acy do dodawania obiekt?do prac
addEvent("addObject"true)
addEventHandler("addObject"root, function(veh,code)
    if code == "kamieniolom" then
        obiekt[veh]=createObject(3929000)
        setObjectScale(obiekt[veh], 3.5)
        attachElements(obiekt[veh], veh0, -2190)
    end
end)
[/list]

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-21, 23:02


amited







Wiek: 26
Na forum: 3714 dni
Posty: 1233
Nick w MP: Amited

Piwa: 512

Respekt: 466
Respekt: 466

daj kod tych bankomat?w

Podpis
"amited" napisał/a:
Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-21, 23:26


SamsungPLL

Programista lodówek






Wiek: 23
Na forum: 3805 dni
Posty: 123
Nick w MP: SamsungPLL

Piwa: 135

Respekt: 55,3

bankomaty.lua
--[[
@author Lukasz Biegaj <wielebny@bestplay.pl>
@copyright 2011-2013 Lukasz Biegaj <wielebny@bestplay.pl>
@license Dual GPLv2/MIT
@todo przerobic z zasobu DB na DB2
]]--




addEvent("onPlayerRequestATMInfo"true)
addEventHandler("onPlayerRequestATMInfo"resourceRoot, function()
    local dbid=getElementData(client,"player:uid")
    if not dbid then
        triggerClientEvent(client,"doFillATMInfo"resourceRootfalse)
        return
    end
    local sr=exports["ogrpg-db"]:dbGet("SELECT bank_money FROM ogrpg_users WHERE id=? LIMIT 1",dbid)
    if not sr or #sr < 1 then
        triggerClientEvent(client,"doFillATMInfo"resourceRootfalse)
        return
    end
    local sr=sr[1]
    triggerClientEvent(client,"doFillATMInfo"resourceRoottruetonumber(sr.bank_money))
end)

addEvent("doATMOperation"true)
addEventHandler("doATMOperation"resourceRoot, function(kwota)
    -- kwota dodatnia wplata
    -- kwota ujemna wyplata
    if type(kwota) ~= "number" then outputDebugString("Blad bankomatu xDDDDD") return end
    if kwota>and kwota>getPlayerMoney(clientthen return end -- komunikat bledu po stronie klienta
    local dbid=getElementData(client,"player:uid")
    local sr=exports["ogrpg-db"]:dbGet("SELECT `bank_money` FROM `ogrpg_users` WHERE id=? LIMIT 1",dbid)
    if not sr or #sr < 1 then return end
    sr=tonumber(sr[1].bank_money)
    if not dbid then return end -- nie powinno sie zdarzyc
    if kwota>0 then
        if getPlayerMoney(client)<kwota then return end
        takePlayerMoney(clientkwota)
        exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money+?? WHERE id=? LIMIT 1",tonumber(kwota),dbid)
        local sr=exports["ogrpg-db"]:dbGet("SELECT `bank_money` FROM `ogrpg_users` WHERE id=? LIMIT 1",dbid)
        if not sr or #sr < 1 then return end
        sr=tonumber(sr[1].bank_money)
        triggerEvent("admin:logs"rootstring.format("WPLATA %d DO bankomatu (UID : %d) STAN KONTA %d",math.abs(tonumber(kwota)),dbid,sr))
        --triggerEvent("broadcastCaptionedEvent"clientgetPlayerName(client).." wp?aca pieni?dze do bankomatu"320true)
        outputChatBox("BANKOMAT: Wplaciles pieni?dze na swoje konto bankowe!"client0,255,0)
    elseif kwota<0 then
        if (sr<math.abs(kwota)) then
            outputChatBox("Nie masz tyle ?rodk?w na koncie!"client255,0,0)
--            triggerClientEvent(client,"onAnnouncement3"root"Nie masz tyle ?rodk?w na koncie!"5)
            return
        end
        exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money-?? WHERE id=? LIMIT 1",math.abs(tonumber(kwota)),dbid)
        local sr=exports["ogrpg-db"]:dbGet("SELECT `bank_money` FROM `ogrpg_users` WHERE id=? LIMIT 1",dbid)
        if not sr or #sr < 1 then return end
        sr=tonumber(sr[1].bank_money)
        triggerEvent("admin:logs"rootstring.format("WYPLATA %d z bankomatu (UID : %d) STAN KONTA %d",math.abs(tonumber(kwota)),dbid,sr))
        outputChatBox("BANKOMAT: Wyplaciles pieni?dze z swojego konta bankowego!"client0,255,0)
        givePlayerMoney(clientmath.abs(kwota))
    end
    

end)



bankomaty_c.lua
--[[
@author Lukasz Biegaj <wielebny@bestplay.pl>
@copyright 2011-2013 Lukasz Biegaj <wielebny@bestplay.pl>
@license Dual GPLv2/MIT
]]--


local bankomaty={
--x,y,zrxryrzINTDIM,
{-1914.99872.8834.80-0.35, -0.000.00270.1600}, -- Spawn.
{-1915.00893.8834.80-0.35, -0.000.00268.9600}, -- Spawn.
{-1859.65, -145.7611.91-0.35, -0.000.00180.4900}, -- Praca Sweepery.
{-2032.97162.6528.40-0.35, -0.000.0090.5000}, -- Mechanik Doherty.
{-1964.86291.7234.75-0.35, -0.000.0089.1300}, -- Salon Doherty.
{-1712.48399.237.42-0.35, -0.000.00223.7800}, -- Praca Cysterny.
{-1648.901202.506.69-0.35, -0.000.00180.4700}, -- Salon Downtown.
{-1603.62710.2713.87-0.35, -0.000.00178.8600}, -- Komenda G??wna Policji.
{-1971.48620.4734.50-0.35, -0.000.000.4000}, -- Przechowalnia Pojazd?w.
{-2102.420.5235.32-0.35, -0.000.00179.2600}, -- Pa?stwowa StraPo?arna.
{-2271.49, -132.4534.65-0.35, -0.000.00359.5500}, -- Tuner Garcia.
{-2420.15983.4445.30-0.35, -0.000.0090.5600}, -- Stacja Juniper Hollow.
{-1874.00, -219.9818.38-0.35, -0.000.0088.4200}, -- Parking Policyjny Doherty.
{-2637.05632.1514.45-0.35, -0.000.00269.9600}, -- Pogotowie Ratunkowe
}

for i,v in ipairs(bankomaty) do

    v.obiekt=createObject(1515,v[1],v[2],v[3],v[4],v[5],v[6])
    setElementInterior(v.obiekt,v[7] or 0)
    setElementDimension(v.obiekt,v[8] or 0)
    setElementFrozen(v.obiekt,true)
    setObjectBreakable v.obiektfalse )

--    v.mapicon=createBlip(v[1],v[2],v[3], 522255,255,255,255, -1000300)
    v.mapicon=createBlip(v[1],v[2],v[3], 5215,255,5,255, -10000150)
    setElementInterior(v.mapicon,v[7] or 0)
    setElementDimension(v.mapicon,v[8] or 0)

    v.cs=createColSphere(v[1],v[2],v[3]+11)
    setElementInterior(v.cs,v[7] or 0)
    setElementDimension(v.cs,v[8] or 0)
    v.text=createElement('text')
    setElementData(v.text,"name","Bankomat")
    setElementPosition(v.text,v[1],v[2],v[3])
    setElementInterior(v.text,v[7] or 0)
    setElementDimension(v.text,v[8] or 0)
end


local bw={}
bw.win guiCreateWindow(0.7236,0.3398,0.2314,0.5,"Bankomat",true)
guiWindowSetMovable(bw.win,false)
guiWindowSetSizable(bw.win,false)
bw.lbl1 guiCreateLabel(0.0633,0.0997,0.903,0.1571,"Stan konta:\n0PLN",true,bw.win)
local font0_money guiCreateFont(":ogrpg-gui/fonts/money.ttf"14)
guiSetFont(bw.lbl1font0_money)
guiLabelSetVerticalAlign(bw.lbl1,"center")
guiLabelSetHorizontalAlign(bw.lbl1,"center",false)
local font1_money guiCreateFont(":ogrpg-gui/droid-sans.ttf"7)

bw.lbl2 guiCreateLabel(0.0759,0.2734,0.8861,0.0695,"Wp?ata &#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;",true,bw.win)


bw.edt1 guiCreateEdit(0.0675,0.3385,0.8608,0.0859,"0",true,bw.win)
bw.btn_wplac guiCreateButton(0.0717,0.4427,0.8608,0.0911,"Wp?a?",true,bw.win)

bw.lbl3 guiCreateLabel(0.0759,0.5626,0.8861,0.0695,"Wyp?ata ".."&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;",true,bw.win)
bw.edt2 guiCreateEdit(0.0675,0.6276,0.8608,0.0859,"0",true,bw.win)
bw.btn_wyplac guiCreateButton(0.0717,0.7344,0.8608,0.0911,"Wyp?a?",true,bw.win)

bw.btn_zamknij guiCreateButton(0.0717,0.888,0.8608,0.0859,"Zamknij",true,bw.win)
guiSetFont(bw.winfont1_money)
guiSetFont(bw.lbl2font1_money)
guiSetFont(bw.edt1font1_money)
guiSetFont(bw.btn_wplacfont1_money)
guiSetFont(bw.lbl3font1_money)
guiSetFont(bw.edt2font1_money)
guiSetFont(bw.btn_wyplacfont1_money)
guiSetFont(bw.btn_zamknijfont1_money)


guiSetVisible(bw.winfalse)



addEventHandler("onClientColShapeHit"resourceRoot, function(el,md)
    if not md or el~=localPlayer then return end
--    outputChatBox("Bankomat pokazuje napis: AWARIA.")
--    if getPlayerName(localPlayer)=="Carolynn_Trench" or getPlayerName(localPlayer)=="Bob_Euler" then


        guiSetVisible(bw.wintrue)
        guiSetEnabled(bw.btn_wyplacfalse)
        guiSetEnabled(bw.btn_wplacfalse)
        guiSetText(bw.lbl1,"Trwa otwieranie konta bankowego...")
        triggerServerEvent("onPlayerRequestATMInfo"resourceRoot)
--showCursor(true,true)
        guiSetInputMode("no_binds_when_editing")
            guiSetText(bw.winstring.format("Bankomat ( UID: %d )",getElementData(el,"player:uid")))
            guiSetText(bw.lbl2"Wp?ata &#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;")
            guiSetText(bw.lbl3"Wyp?ata &#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;&#9472;")
            guiSetVisible(bw.btn_wyplactrue)
            guiSetPosition(bw.btn_wplac0.0717,0.4427true)
--    end
end)

local function closeATMWin()
    if guiGetVisible(bw.winthen
        guiSetVisible(bw.winfalse)
--showCursor(false)
    end
end

addEventHandler("onClientGUIClick"bw.btn_zamknijcloseATMWinfalse)
addEventHandler("onClientColShapeLeave"resourceRoot, function(el,md)
    if el~=localPlayer then return end
    closeATMWin()
end)

-- triggerClientEvent(client,"doFillATMInfo"resourceRoottruesr.bank_money)
addEvent("doFillATMInfo"true)
addEventHandler("doFillATMInfo"resourceRoot, function(successbalance)
    if not success then
        guiSetText(bw.lbl1,"Testowany.")   --Musisz byzarejestrowanym graczem aby skorzystaz bankomatu.
        return
    end
    guiSetText(bw.lbl1,"Wlacz kursor wciskajac F3\nStan Twojego konta:".."\n".. balance.." PLN")
    setElementData(bw.win"balance"tonumber(balance))
    guiSetText(bw.edt2,100 balance and balance or 100)
    if balance>0 then
        guiSetEnabled(bw.btn_wyplactrue)
    end

    guiSetText(bw.edt1,balance)
    guiSetEnabled(bw.btn_wplactrue)
end)

addEventHandler("onClientPlayerSpawn"localPlayercloseATMWin)


addEventHandler("onClientGUIClick"bw.btn_wplac, function()
    local kwotae=tonumber(guiGetText(bw.edt1))
    if not kwotae then return end
    local kwota=math.floor(kwotae)
    if not kwota or kwota<1 then
--        triggerEvent("onAnnouncement3"root"Nieprawid?owa kwota wp?aty."4)
        outputChatBox("Nieprawid?owa kwota wp?aty!"255,0,0)
        return
    end

    if guiGetVisible(bw.btn_wyplacthen --normalna wplata

        if kwota>getPlayerMoney() then
            outputChatBox("Nie masz tyle got?wki!"255,0,0)
            return
        end

        closeATMWin()
        triggerServerEvent("doATMOperation"resourceRootkwota)
    end

endfalse)

addEventHandler("onClientGUIClick"bw.btn_wyplac, function()
    if not tonumber(guiGetText(bw.edt2)) then return end
    local kwotae=tonumber(guiGetText(bw.edt2))
    if not kwotae then return end
    local kwota=math.floor(kwotae)
    if not kwota or kwota<1 then
--        triggerEvent("onAnnouncement3"root"Nieprawid?owa kwota wyp?aty."4)
        outputChatBox("Nieprawid?owa kwota wp?aty!"255,0,0)
        return
    end
    if getPlayerMoney()+kwota>99999999 then
--        triggerEvent("onAnnouncement3"root"Nie mo?esz mie? tyle got?wki przy sobie."4)
        outputChatBox("Maksymalna ilo?? got?wki kt?r? mo?esz mie? przy sobie to 999999.99 PLN"255,0,0)
        return
    end
    closeATMWin()
    triggerServerEvent("doATMOperation"resourceRoot, -kwota)

endfalse)


Prosz? bardzo.

Podpis

1000 DNI NA FORUM: 28.09.2018r.
100 POSTÓW NA FORUM: 01.12.2017r.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-21, 23:48


amited







Wiek: 26
Na forum: 3714 dni
Posty: 1233
Nick w MP: Amited

Piwa: 512

Respekt: 466
Respekt: 466

dobra ja tutaj nie widz? nigdzie kodu kt?ry daje ci kasy do bankomatu + za prac? dostajesz 99 pln a nie 56. dales prace skoki do wody a nie autobus?w

Podpis
"amited" napisał/a:
Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 12:47


SamsungPLL

Programista lodówek






Wiek: 23
Na forum: 3805 dni
Posty: 123
Nick w MP: SamsungPLL

Piwa: 135

Respekt: 55,3

"amited" napisał/a:

dobra ja tutaj nie widz? nigdzie kodu kt?ry daje ci kasy do bankomatu + za prac? dostajesz 99 pln a nie 56. dales prace skoki do wody a nie autobus?w


Szczeg??...
Owszem da?em kod na prace skoki bo na pracach skoki dostaje sie pieni?dze do bankomatu gracza i do konta gracza i przy wy??czeniu skryptu "ogrpg-prace-settings" dostaje si? tylko do bankomatu, a na pracach autobusu dostaje sie znowu pieni?dze tylko do bankomatu nawet czy przy w??czonym skrypcie "ogrpg-prace-settings" czy przy wy??czonym.

Prosz? o pomoc! :piwo:

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 12:54


neku^







Wiek: 24
Na forum: 3521 dni
Posty: 461
Nick w MP: neku^

Piwa: 1186

Respekt: 320,5
Respekt: 320,5Respekt: 320,5Respekt: 320,5

W takim razie podaj kod autobus?w.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 13:29


SamsungPLL

Programista lodówek






Wiek: 23
Na forum: 3805 dni
Posty: 123
Nick w MP: SamsungPLL

Piwa: 135

Respekt: 55,3

Przepraszam za kolejn? pomy?k?, chodzi?o mi o prace kosiarki ale teraz patrze i te? daje pieni?dze do bankomatu gracza i do konta gracza. Przypominam ?e gdy wy??cz? skrypt "ogrpg-prace-settings" ka?da praca daje pieni?dze do bankomatu a po w??czeniu skryptu "ogrpg-prace-settings" daje do konta gracza i do bankomatu.
Mo?e co? z triggerServerEvent("givePlayerMoney", el, 46, 0)
Nie wiem nie znam si?... :(

Podpis

1000 DNI NA FORUM: 28.09.2018r.
100 POSTÓW NA FORUM: 01.12.2017r.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 13:36


neku^







Wiek: 24
Na forum: 3521 dni
Posty: 461
Nick w MP: neku^

Piwa: 1186

Respekt: 320,5
Respekt: 320,5Respekt: 320,5Respekt: 320,5

No to m?wi? daj ten kod :/

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 13:58


SamsungPLL

Programista lodówek






Wiek: 23
Na forum: 3805 dni
Posty: 123
Nick w MP: SamsungPLL

Piwa: 135

Respekt: 55,3

Praca skoki do wody wy?ej

na prace kosiarki:

c_job.lua
local missionPed
local missionBlip
local missionMarker
local missionVehicle
local screenWscreenH guiGetScreenSize()

local code="Koszenie trawy!"

local miejscakosiara2 = {
{-2526.69,-274.91,38.87},
{-2520.53,-256.20,39.45},
{-2520.53,-256.20,39.45},
{-2482.92,-248.74,39.68},
{-2481.70,-294.29,40.81},
{-2472.90,-264.89,39.49},
{-2490.30,-267.29,39.41},
{-2368.76,-242.26,42.80},
   
}
--local missionZaladunek=createMarker(-2382.81,-59.88,35.32-0.90,"cylinder",5,0,128,128)

local jobText=createElement("text")
setElementPosition(jobText1880.13,-1152.49,23.96)
setElementData(jobText"name""Koszenie trawy!")

addEvent("startJobek"true)
addEventHandler("startJobek"resourceRoot, function(veh)
    if getElementData(localPlayer,"player:job") ~= code then return end
    missionVehicle=veh
    showMarker()
    addEventHandler("onClientRender",root,render3)
        setTimer(renderstop3,1000,1)
end)

function render1()
dxDrawText("Rozpoczeles prace."screenW 0.3656screenH 0.1553screenW 0.6273screenH 0.3193tocolor(0155255255), 2.50"default-bold""center""center"falsefalsefalsefalsefalse)
end



function finishJob(plr,value1,value2)
    if plr ~= getLocalPlayer() then return end
    if getElementData(localPlayer,"player:job") ~= code then return end
    if value1 == true then
        if isElement(missionMarker) and missionMarker then
            destroyElement(missionMarker)
            missionMarker=nil
        end
        if isElement(missionBlip) and missionBlip then
            destroyElement(missionBlip)
            missionBlip=nil
        end
    end
    if value2 == true then
        if isElement(missionVehicle) and missionVehicle then
            triggerServerEvent("destroyVehicle"rootmissionVehicle)
            missionVehicle=nil
        end
    end
end

addEvent("onFinish"true)
addEventHandler("onFinish"resourceRoot, function(plr)
    if plr~=localPlayer then return end
    finishJob(plrtrue,true)
end)

function showNextPoint(el,md)
    if not md or el~=localPlayer then return end
    local veh=getPedOccupiedVehicle(el)
    if not veh then return end
    if getVehicleController(veh) ~= localPlayer then return end
    finishJob(el,true,false)
    setTimer(function()
        --playSound(":ogrpg-misc/misc/success.flac")
        finishJob(true,false)
        if getElementData(veh,"praca:punkt") == 5 then
            triggerServerEvent("givePlayerMoney"el460)
            setElementData(veh,"praca:punkt"0)
        else
            local xd getElementData(veh"praca:punkt") or 0
            setElementData(veh,"praca:punkt"xd+1)
            triggerServerEvent("givePlayerMoney"el460)
        end
        addEventHandler("onClientRender",root,render4)
        setTimer(renderstop4,1500,1)
        showMarker()
    end1001)
end

function showMarker()
    local losuj math.random(2#miejscakosiara2)
    rnd=miejscakosiara2
    missionMarker=createMarker(rnd[losuj][1], rnd[losuj][2], rnd[losuj][3]-1"checkpoint"5255255255)
    missionBlip=createBlipAttachedTo(missionMarker12)
    addEventHandler("onClientMarkerHit"missionMarkershowNextPoint)
end


addEventHandler("onClientVehicleExit"resourceRoot, function(plr,seat)
    if seat~=0 then return end
    if plr~=localPlayer then return end
    finishJob(plrtrue,true)
    setElementData(plr,"player:job",false)
    --outputChatBox("* Zakonczyles prace"25500)
    addEventHandler("onClientRender",root,render1)
        setTimer(renderstop1,500,1)
end)

local zone createColCuboid(1858.80,-1253.60,11.56203.20849609375104.5755767822351.500002288818)
function ucieczkatheElementmatchingDimension )
    if ( theElement == getLocalPlayer() ) then 
        if getElementData(theElement,"player:job") ~= code then return end
        finishJob(theElementtrue,true)
        setElementData(theElement,"player:job",false)
    end
end
addEventHandler("onClientColShapeLeave",zone,ucieczka)


addEventHandler("onClientVehicleExplode"resourceRoot, function()
    if getElementModel(source) ~= 572 then return end
    local plr=getVehicleController(source)
    if plr~=localPlayer then return end
    finishJob(plrtrue,true)
    setElementData(plr,"player:job",false)
    --outputChatBox("* Zakonczyles prace"25500)
    addEventHandler("onClientRender",root,render1)
        setTimer(renderstop1,2500,1)
end)


addEventHandler("onClientResourceStop"resourceRoot, function()
    if getElementData(localPlayer"player:job")==code then
        setElementFrozen(localPlayerfalse)
        setElementData(localPlayer"player:job"false)
    end
end,false,"high")



local jobOnline=true -- czy praca w??czona
local jobMarker=createMarker(-2462.81,-318.77,41.83-0.9"cylinder"1.5969696) -- marker
createBlip(1880.13,-1152.49,23.9646,2,0,0,0,0,0,275)


addCommandHandler("rozpocznij", function(cmd)
    plr=localPlayer
    if isPedInVehicle(plrthen return end
    if not isElementWithinMarker(plr,jobMarkerthen return end
    if jobOnline == false then
        outputChatBox("* Praca jest wy??czona."25500)
        return
    end
    if getElementData(plr,"player:job"then
        outputChatBox("* Ju? posiadasz aktywn? prac?."25500)
        return
    end
    setElementData(plr,"player:job"code)
    triggerServerEvent("startJobS"root,localPlayer)
end)

addEventHandler("onClientMarkerHit"jobMarker, function(el,md)
    if el~=localPlayer then return end
    if getElementType(el) == "player" then
        if isPedInVehicle(elthen return end
        addEventHandler("onClientRender",root,render2)
        setTimer(renderstop2,1500,1)
    end
end)


function render1()
dxDrawText("Zakonczyles prace."screenW 0.3656screenH 0.1553screenW 0.6273screenH 0.3193tocolor(25500255), 1.50"pricedown""center""center"falsefalsefalsefalsefalse)
end



function renderstop1()
removeEventHandler("onClientRender",root,render1)
end





function render2()
dxDrawText("* Aby rozpocz?? prac? wpisz /rozpocznij\n* Zarobek 46 PLN za 1 koszenie."screenW 0.3656screenH 0.1553screenW 0.6273screenH 0.3193tocolor(0155255255), 1.50"pricedown""center""center"falsefalsefalsefalsefalse)
end

function render3()
dxDrawText("Rozpoczeles prace."screenW 0.3656screenH 0.1553screenW 0.6273screenH 0.3193tocolor(0155255255), 1.50"pricedown""center""center"falsefalsefalsefalsefalse)
end

function render4()
dxDrawText("Za godne koszenie otrzymujesz 46 PLN"screenW 0.3656screenH 0.1553screenW 0.6273screenH 0.3193tocolor(0155255255), 1.50"pricedown""center""center"falsefalsefalsefalsefalse)
end







function renderstop2()
removeEventHandler("onClientRender",root,render2)
end
function renderstop3()
removeEventHandler("onClientRender",root,render3)
end
function renderstop4()
removeEventHandler("onClientRender",root,render4)
end
function renderstop5()
removeEventHandler("onClientRender",root,render5)
end


s_job.lua
createBlip(-2465.37,-318.57,41.7746,2,0,0,0,0,0,275local code="Koszenie trawy!"
local jobVehicle={572, -2481.69,-320.58,41.26,0.2,358.0,299.0} -- gdzie ma byspawnowany pojazd 
addEvent("startJobS"true)
addEventHandler("startJobS"resourceRoot, function(plr)
    if getElementData(plr,"player:job") ~= code then return end
    local veh=createVehicle(jobVehicle[1], jobVehicle[2], jobVehicle[3], jobVehicle[4], jobVehicle[5], jobVehicle[6], jobVehicle[7])
    setElementData(veh,"vehicle:desc",code)
    setElementData(veh,"vehicle:mileage"1500)
    setElementData(veh,"vehicle:fuel",100)
    warpPedIntoVehicle(plr,veh)
    triggerClientEvent(plr,"startJobek",root,veh)
end)

addEventHandler("onVehicleExplode"resourceRoot, function()
    if getElementModel(source) ~= 572 then return end
    destroyElement(source)
end)


Podpis

1000 DNI NA FORUM: 28.09.2018r.
100 POSTÓW NA FORUM: 01.12.2017r.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 14:22


amited







Wiek: 26
Na forum: 3714 dni
Posty: 1233
Nick w MP: Amited

Piwa: 512

Respekt: 466
Respekt: 466

nigdzie nie widz? dawania kasy do bankomatu. Sprawd? sobie wszystkie pliki i poszukaj jeszcze eventu "givePlayerMoney"

Podpis
"amited" napisał/a:
Postaw piwo autorowi tego posta
 

 
Wysłany: 2017-06-22, 14:41


SamsungPLL

Programista lodówek






Wiek: 23
Na forum: 3805 dni
Posty: 123
Nick w MP: SamsungPLL

Piwa: 135

Respekt: 55,3

A co mam szuka? w tych wszystkich plikach?
Jak powinno mniej wi?cej wygl?da? ten kod na dodawanie pieniedzy do bankomatu.


Tutaj znalaz?em co? takiego: http://gtao.pl/104287.htm
Koledze dodawa?o pieni?dze do bankomatu, a mi te? dodaje tylko do bankomatu gdy wy??cz? skrypt "ogrpg-prace-settings"

Podpis

1000 DNI NA FORUM: 28.09.2018r.
100 POSTÓW NA FORUM: 01.12.2017r.

Postaw piwo autorowi tego posta
 

 
Tagi: dodawanie :: pieniedzy
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