GTAONLINE.PL :: Pieniądze na minusie

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

GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Poprzedni temat Następny temat

Wysłany: 2019-03-13, 20:25

NotPaladyn

Wiek: 23
Na forum: 2790 dni
Posty: 866
Nick w MP: NotPaladyn

Piwa: 3135

Respekt: 690
Respekt: 690

Vice Admin: Jeśli potrzebujesz pomocy w sprawach organizacyjnych lub technicznych - skontaktuj się ze mną.

Siema
Ot?? mam skrypt na gre "kostka", i chcia?bym zrobi? aby gracz kt?ry nie mia? tylu pieni?dzy nie mog? ich wystawi?. Bo narazie jest tak ze nawet jak masz 10$ to mozesz zagrac o 500k.
Wie kto? jak to naprawi??
Kod po stronie serwera:



addEvent("kostkaGra", true)
addEventHandler("kostkaGra", getResourceRootElement(), function(gracz1, gracz2, kwota)

 
    zabierzHajs(gracz1, kwota)
    zabierzHajs(gracz2, kwota)
    local liczba = math.random(1,3)
    if liczba == 1 then 
    outputChatBox("((Wygra?e?!))",gracz1)
    givePlayerMoney(gracz1,kwota*2)
    outputChatBox("((Przegra?e?!))",gracz2)
    
    end if liczba == 2 then
    outputChatBox("((Remis!))",gracz1)
    givePlayerMoney(gracz1,kwota)
    givePlayerMoney(gracz2,kwota)
    outputChatBox("((Remis!))",gracz2)
    
    end if liczba == 3 then
    outputChatBox("(( Przegra?e? ))",gracz1)
    outputChatBox("(( Wygra?e? ))",gracz2)
    givePlayerMoney(gracz2,kwota*2)
    end
 

end)







addCommandHandler("wyzwij",  function(ktoNapisalKomende, _ , NICK, KWOTA)
    local przeciwnik = findPlayer(NICK)
    if not przeciwnik or przeciwnik == ktoNapisalKomende  then outputChatBox("(( Nie ma przeciwnika/Jeste? nim ty! ))", ktoNapisalKomende)
        return
    end 
    
local x,y,z = getElementPosition( przeciwnik )
if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Przeciwnik nie jest na terenie kostki! ))", ktoNapisalKomende) return end
local x,y,z = getElementPosition( ktoNapisalKomende)
if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Nie ma cie na terenie kostki! ))", ktoNapisalKomende) return end

    triggerClientEvent(przeciwnik,"kostka", przeciwnik, KWOTA, ktoNapisalKomende)
outputChatBox("(( Wyzwano! ))", ktoNapisalKomende)
end )

function zabierzHajs(plr,ilosc) 

    local m = getPlayerMoney(plr) 
    setPlayerMoney(plr , m - ilosc)


end




function findPlayer(cel)
    local target=nil
    if (tonumber(cel) ~= nil) then
        target=getElementByID("p"..cel)
    else -- podano fragment nicku
        for _,thePlayer in ipairs(getElementsByType("player")) do
            if string.find(string.gsub(getPlayerName(thePlayer):lower(),"#%x%x%x%x%x%x", ""), cel:lower(), 1, true) then
                if (target) then
                    return nil
                end
                target=thePlayer
            end
        end
    end
    return target

end

Podpis

Zarejestrowany - 14.10.2018r.
Support-Team - 01.06.2019r. - 01.11.2019r.
Test-Mod - 01.11.2019r. - 31.12.2019r.
Moderator - 31.12.2019r. - 01.11.2020r.
Mod-Team - 01.11.2020r. - 03.05.2022r.
Vice Admin - 03.05.2022r. -

-------------------------------------------------------

Tworzę skrypty i modele na zamówienie
W razie pytań zapraszam do kontaktu

--------------Kontakt--------------
Discord: NotPaladyn#2943 / notpaladyn

Wysłany: 2019-03-13, 20:33

BoomEq

Wiek: 35
Na forum: 3522 dni
Posty: 101
Nick w MP: BoomEqqq

Piwa: 20

Respekt: 70

Sprawdz

 
addEvent("kostkaGra", true)
addEventHandler("kostkaGra", getResourceRootElement(), function(gracz1, gracz2, kwota)

 
    zabierzHajs(gracz1, kwota)
    zabierzHajs(gracz2, kwota)
    local liczba = math.random(1,3)
    if liczba == 1 then 
    outputChatBox("((Wygra?e?!))",gracz1)
    givePlayerMoney(gracz1,kwota*2)
    outputChatBox("((Przegra?e?!))",gracz2)
    
    end if liczba == 2 then
    outputChatBox("((Remis!))",gracz1)
    givePlayerMoney(gracz1,kwota)
    givePlayerMoney(gracz2,kwota)
    outputChatBox("((Remis!))",gracz2)
    
    end if liczba == 3 then
    outputChatBox("(( Przegra?e? ))",gracz1)
    outputChatBox("(( Wygra?e? ))",gracz2)
    givePlayerMoney(gracz2,kwota*2)
    end
 

end)







addCommandHandler("wyzwij",  function(ktoNapisalKomende, _ , NICK, KWOTA)
    local przeciwnik = findPlayer(NICK)
    if not przeciwnik or przeciwnik == ktoNapisalKomende  then outputChatBox("(( Nie ma przeciwnika/Jeste? nim ty! ))", ktoNapisalKomende)
        return
    end 
    
local x,y,z = getElementPosition( przeciwnik )
if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Przeciwnik nie jest na terenie kostki! ))", ktoNapisalKomende) return end
local x,y,z = getElementPosition( ktoNapisalKomende)
if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Nie ma cie na terenie kostki! ))", ktoNapisalKomende) return end

    
if getPlayerMoney(ktoNapisalKomende) < kwota then outputChatBox("* Nie masz takiej kwoty",ktoNapisalKomende) return end
    triggerClientEvent(przeciwnik,"kostka", przeciwnik, KWOTA, ktoNapisalKomende)
outputChatBox("(( Wyzwano! ))", ktoNapisalKomende)
end )

function zabierzHajs(plr,ilosc) 

    local m = getPlayerMoney(plr) 
    setPlayerMoney(plr , m - ilosc)


end




function findPlayer(cel)
    local target=nil
    if (tonumber(cel) ~= nil) then
        target=getElementByID("p"..cel)
    else -- podano fragment nicku
        for _,thePlayer in ipairs(getElementsByType("player")) do
            if string.find(string.gsub(getPlayerName(thePlayer):lower(),"#%x%x%x%x%x%x", ""), cel:lower(), 1, true) then
                if (target) then
                    return nil
                end
                target=thePlayer
            end
        end
    end
    return target

end

Wysłany: 2019-03-13, 21:36

NotPaladyn

Wiek: 23
Na forum: 2790 dni
Posty: 866
Nick w MP: NotPaladyn

Piwa: 3135

Respekt: 690
Respekt: 690

*Vice Admin: Jeśli potrzebujesz pomocy w sprawach organizacyjnych lub technicznych - skontaktuj się ze mną*.
Niestety dalej nie dzia?a [ Dodano: 2019-03-13, 21:36 ] B??d w DB w linijce 50

Wysłany: 2019-03-14, 00:28

Hades.
Łiiiiiiiiii

Wiek: 22
Na forum: 4699 dni
Posty: 372
Nick w MP: Hades

Piwa: 3214

Respekt: 337,8
Respekt: 337,8

Podmie? tylko t? komende /wyzwij :


addCommandHandler("wyzwij", function(ktoNapisalKomende, _, NICK, KWOTA)
    local przeciwnik = findPlayer(NICK)
    if not przeciwnik or przeciwnik == ktoNapisalKomende  then outputChatBox("(( Nie ma przeciwnika/Jeste? nim ty! ))", ktoNapisalKomende)
        return
    end 
    local x,y,z = getElementPosition( przeciwnik )
    if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Przeciwnik nie jest na terenie kostki! ))", ktoNapisalKomende) return end
    local x,y,z = getElementPosition( ktoNapisalKomende)
    if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Nie ma cie na terenie kostki! ))", ktoNapisalKomende) return end
    
    if getPlayerMoney(ktoNapisalKomende) < tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end
    triggerClientEvent(przeciwnik,"kostka", przeciwnik, KWOTA, ktoNapisalKomende)
    outputChatBox("(( Wyzwano! ))", ktoNapisalKomende)
end )

Wysłany: 2019-03-15, 09:33

NotPaladyn

Wiek: 23
Na forum: 2790 dni
Posty: 866
Nick w MP: NotPaladyn

Piwa: 3135

Respekt: 690
Respekt: 690

*Vice Admin: Jeśli potrzebujesz pomocy w sprawach organizacyjnych lub technicznych - skontaktuj się ze mną*.
Dzia?a tylko gdy ja chce kogo? wyzwa? a nie mam tyls pieni?dzy Ale jak kto? inny ma to mo?e mnie wyzwa? za wi?cej ni? mam Wie kto? jak to jeszcze naprawi?

Wysłany: 2019-03-15, 18:17

Adaskokieblasko

Wiek: 23
Na forum: 2954 dni
Posty: 101

Piwa: 18

Respekt: 100
Respekt: 100

zmie? to:

   if getPlayerMoney(ktoNapisalKomende) < tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end

na:

   if getPlayerMoney(ktoNapisalKomende) > tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end

Wysłany: 2019-03-15, 20:55

Hades.
Łiiiiiiiiii

Wiek: 22
Na forum: 4699 dni
Posty: 372
Nick w MP: Hades

Piwa: 3214

Respekt: 337,8
Respekt: 337,8

"Adaskokieblasko" napisał/a:

zmie? to:

   if getPlayerMoney(ktoNapisalKomende) < tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end

na:

   if getPlayerMoney(ktoNapisalKomende) > tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end

Co ty gadasz, przet?umacze Ci ten kod, "Je?li pobrane pieni?dze wpisuj?cego s? wi?ksze od podanej w argumencie to nie przepu?ci dalej kodu i powie ?e nie ma tyle pieni?dzy."

Wystarczy doda? kolejny warunek


if getPlayerMoney(przeciwnik) < tonumber(KWOTA) then outputChatBox("Przeciwnik nie posiadal tyle pieni?dzy.", ktoNapisalKomende) return end

Wstawi? go do komendy i po sprawie.

Gotowa komenda

 
addCommandHandler("wyzwij", function(ktoNapisalKomende, _, NICK, KWOTA)
    local przeciwnik = findPlayer(NICK)
    if not przeciwnik or przeciwnik == ktoNapisalKomende  then outputChatBox("(( Nie ma przeciwnika/Jeste? nim ty! ))", ktoNapisalKomende)
        return
    end 
    local x,y,z = getElementPosition( przeciwnik )
    if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Przeciwnik nie jest na terenie kostki! ))", ktoNapisalKomende) return end
    local x,y,z = getElementPosition( ktoNapisalKomende)
    if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Nie ma cie na terenie kostki! ))", ktoNapisalKomende) return end
    
    if getPlayerMoney(ktoNapisalKomende) < tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end
    if getPlayerMoney(przeciwnik) < tonumber(KWOTA) then outputChatBox("Przeciwnik nie posiadal tyle pieni?dzy.", ktoNapisalKomende) return end
    triggerClientEvent(przeciwnik,"kostka", przeciwnik, KWOTA, ktoNapisalKomende)
    outputChatBox("(( Wyzwano! ))", ktoNapisalKomende)
end )

Wysłany: 2019-03-16, 21:59

Adaskokieblasko

Wiek: 23
Na forum: 2954 dni
Posty: 101

Piwa: 18

Respekt: 100
Respekt: 100

"Quick" napisał/a:

"Adaskokieblasko" napisał/a:

zmie? to:

   if getPlayerMoney(ktoNapisalKomende) < tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end

na:

   if getPlayerMoney(ktoNapisalKomende) > tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end


if getPlayerMoney(przeciwnik) < tonumber(KWOTA) then outputChatBox("Przeciwnik nie posiadal tyle pieni?dzy.", ktoNapisalKomende) return end

Wstawi? go do komendy i po sprawie.

Gotowa komenda

 
addCommandHandler("wyzwij", function(ktoNapisalKomende, _, NICK, KWOTA)
    local przeciwnik = findPlayer(NICK)
    if not przeciwnik or przeciwnik == ktoNapisalKomende  then outputChatBox("(( Nie ma przeciwnika/Jeste? nim ty! ))", ktoNapisalKomende)
        return
    end 
    local x,y,z = getElementPosition( przeciwnik )
    if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Przeciwnik nie jest na terenie kostki! ))", ktoNapisalKomende) return end
    local x,y,z = getElementPosition( ktoNapisalKomende)
    if getDistanceBetweenPoints3D(x,y,z,1954.09,1040.22,993.86) > 20 then outputChatBox("(( Nie ma cie na terenie kostki! ))", ktoNapisalKomende) return end
    
    if getPlayerMoney(ktoNapisalKomende) < tonumber(KWOTA) then outputChatBox("Nie posiadasz wystarczaj?co pieni?dzy", ktoNapisalKomende) return end
    if getPlayerMoney(przeciwnik) < tonumber(KWOTA) then outputChatBox("Przeciwnik nie posiadal tyle pieni?dzy.", ktoNapisalKomende) return end
    triggerClientEvent(przeciwnik,"kostka", przeciwnik, KWOTA, ktoNapisalKomende)
    outputChatBox("(( Wyzwano! ))", ktoNapisalKomende)
end )

Nie doczyta?em outputChatBoxa moja wina.

Tagi: pieniądze :: minusie

Anonymous

Na forum: 245 dni
Posty: 1

Anonymous Koniecznie zajrzyj na:

Skocz do:

Wyświetl posty z ostatnich:

GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA

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

Zaloguj Zarejestruj