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

Wysłany: 2016-03-14, 03:29


demoniskoxd







Wiek: 30
Na forum: 4130 dni
Posty: 79
Nick w MP: Francesco

Piwa: 1

Respekt: 50

Ot?? mam pewien problem,gdy tankuje pojazd wszystko jest pi?knie tankuje go pi?knie,ale nie pobiera kasy ;/
Mo?na jak?? porad? jak to zrobi? ?


sx,sy = guiGetScreenSize()

local punktyTankowania = {
    {-2029.52, 156.77, 28.84},
    {-2023.89, 156.69, 28.84},
    {-2405.73, 975.74, 45.30},
    {-2416.30, 974.97, 45.30},
    {-2640.45, 1375.09, 7.15},
    {-1675.46,413.69,7.21},
    {-1328.36,2677.03,50.09},
    {612.50,1694.81,7.03},
    {2115.18,919.53,10.85},
    {1383.09,460.70,20.12},
    {1004.86,-939.32,42.22},
}

for i,v in ipairs(punktyTankowania) do
    zpwp_marker = createMarker(v[1], v[2], v[3]-1.0, "cylinder", 4, 255, 255, 255, 0)
    setElementData(zpwp_marker, "stacja_benzynowa", true)
end

zpwp_okno = guiCreateWindow(199/1280*sx, 191/720*sy, 872/1280*sx, 294/720*sy, "Stacja benzynowa", false)
guiWindowSetSizable(zpwp_okno, false)
guiSetVisible(zpwp_okno, false)

zpwp_warning = guiCreateLabel(17/1280*sx, 18/720*sy, 845/1280*sx, 16/720*sy, "", false, zpwp_okno)
guiLabelSetColor(zpwp_warning, 183, 0, 0)
guiLabelSetHorizontalAlign(zpwp_warning, "center", false)    
        
zpwp_info = guiCreateLabel(211/1280*sx, 81/720*sy, 477/1280*sx, 15/720*sy, "Witaj na stacji,poni?ej jest przedstawiony cennik paliwa, cennik mo?e ulec zmianie !", false, zpwp_okno)
guiSetFont(zpwp_info, "default-bold-small")

zpwp_stan_l = guiCreateLabel(17/1280*sx, 48/720*sy, 111/1280*sx, 15/720*sy, "Obecny stan paliwa:", false, zpwp_okno)
guiSetFont(zpwp_stan_l, "default-bold-small")

zpwp_stan = guiCreateProgressBar(154/1280*sx, 38/720*sy, 708/1280*sx, 30/720*sy, false, zpwp_okno)
guiProgressBarSetProgress(zpwp_stan, 0)

zpwp_cena = guiCreateLabel(365/1280*sx, 106/720*sy, 143/1280*sx, 16/720*sy, "Cena za jeden litr: 3 Z?", false, zpwp_okno)

zpwp_ilosc = guiCreateLabel(318/1280*sx, 132/720*sy, 208/1280*sx, 15/720*sy, "Wpisz ile litr?w paliwa, chcesz zakupi?:", false, zpwp_okno)
zpwp_ilosc_e = guiCreateEdit(536/1280*sx, 127/720*sy, 40/1280*sx, 26/720*sy, "", false, zpwp_okno)

zpwp_zakup = guiCreateButton(27/1280*sx, 171/720*sy, 820/1280*sx, 113/720*sy, "ZATANKUJ", false, zpwp_okno)

addEventHandler("onClientMarkerHit", resourceRoot, function(el, md)
    if not getElementData(source, "stacja_benzynowa") then return end
    if el ~= localPlayer then return end
    if guiGetVisible(zpwp_okno) == false then
        local pojazd = getPedOccupiedVehicle(el)
        if not pojazd then return end
        
        local paliwo = getElementData(pojazd, "pojazd_paliwo" )
        
        showCursor(true, false)
        guiSetVisible(zpwp_okno, true)
        guiProgressBarSetProgress(zpwp_stan, paliwo)
    end
end)

addEventHandler("onClientMarkerLeave", resourceRoot, function(el, md)
    if not getElementData(source, "stacja_benzynowa") then return end
    if el ~= localPlayer then return end
    if guiGetVisible(zpwp_okno) == true then
        showCursor(false)
        guiSetVisible(zpwp_okno, false)
    end
end)

addEventHandler("onClientGUIClick", zpwp_zakup, function()
    local pojazd = getPedOccupiedVehicle(localPlayer)
    if not pojazd then return end -- nie powinno si? wydarzy?
    local stan = getElementData(pojazd, "pojazd_paliwo")
    if not stan then return end -- nie powinno si? wydarzy?
    if not tonumber(guiGetText(zpwp_ilosc_e)) then return end
    local ile = stan + guiGetText(zpwp_ilosc_e)
    local koszt = guiGetText(zpwp_ilosc_e) * 3
    if ile < stan then
        setTimer(guiSetText, 2000, 1, zpwp_warning, "")
        guiSetText(zpwp_warning, "Poda?e? z?? warto?? paliwa.")
        return
    end
    if ile < 101 then
        if getPlayerMoney(localPlayer) > koszt then
            showCursor(false)
            guiSetVisible(zpwp_okno, false)
            outputChatBox("* Pojazd zosta? zatankowany...")
            setElementData(pojazd, "pojazd_paliwo", tonumber(ile))
            triggerServerEvent("takePlayerMoney", localPlayer, koszt)
        else
            setTimer(guiSetText, 2000, 1, zpwp_warning, "")
            guiSetText(zpwp_warning, "Nie posiadasz wystarczaj?cej ilo?ci pieni?dzy.")
        end
    else
        setTimer(guiSetText, 2000, 1, zpwp_warning, "")
        guiSetText(zpwp_warning, "Maxymalnie pojazd mo?e mie? 100% litr?w paliwa")
    end
end)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-03-14, 15:10


Emm

***** ***






Wiek: 32
Na forum: 4021 dni
Posty: 3191
Nick w MP: Emm

Piwa: 6171

Respekt: 1580
Respekt: 1580Respekt: 1580


   Administrator: Admin ma zawsze rację | REGULAMIN FORUM | REKLAMA/VIP | .
Dodaj to po stronie serwera:
addEvent("takePlayerMoney", true)
addEventHandler("takePlayerMoney", resourceRoot, function(ile)
takePlayerMoney(source, ile)
end)


Podpis

Użytkownik: 20.10.2015r
GTAO Member: 06.03.2016r
Support-Team: 20.01.2016r
Moderator: 30.03.2016r
Mod-Team: 08.10.2016r
Vice Admin: 04.05.2018r
Administrator: 03.05.2022r


! Koniecznie zapoznaj się z regulaminem forum.
Pamiętaj, aby zawsze go przestrzegać, nie mniej ważne są również regulaminy działów, w których się wypowiadasz!
Zamiast zakładać temat po kilka razy, bo jest usuwany przez Administrację, przejrzyj regulamin i napisz poprawnie temat!
Sprawy z administracją możesz załatwiać anonimowo w tym dziale.
Najważniejsze informacje od Administracji możesz przeczytać tutaj oraz tutaj.
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-03-14, 15:46


Offensywny







Wiek: 25
Na forum: 3876 dni
Posty: 1
Nick w MP: Offensywny

Piwa: 53

Respekt: 50

Ostrzeżeń: 100%
Je?li to co kolega @UP, Nie pomo?e a raczej nie

To po stronie serwera daj :

function stakePlayerMoney(localPlayer, koszt)
takePlayerMoney(localPlayer, koszt)
end
addEvent("takePlayerMoney", true)
addEventHandler("takePlayerMoney", getRootElement(), stakePlayerMoney)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-03-14, 15:50


_Wicek_

Majstersztyk






Wiek: 26
Na forum: 4401 dni
Posty: 747
Nick w MP: Wicek

Piwa: 1842

Respekt: 360,5
Respekt: 360,5Respekt: 360,5Respekt: 360,5Respekt: 360,5

Ostrzeżeń: 40%
Offensywny, Ehhhh to jest to samo i jeszcze z b??dem...
Po stronie serwera gdy triggerowali?my z client`a nie ma elementu gracza "localPlayer" tylko "source" lub "client" .

Podpis

Support-Team: 25.01.2016
Moderator: 10.07.2016




GG: 51274621
Skype : kuba_wicinski
Postaw piwo autorowi tego posta
 

 
Tagi: nie :: zabiera :: 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