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

Wysłany: 2019-08-24, 07:42


DaVeCS

Mapper






Wiek: 31
Na forum: 3386 dni
Posty: 193
Nick w MP: DaVe

Piwa: 59

Respekt: 70,5

Witam, ot?? chcia?em przerobi? bankomaty z psrpg 2.0 zmieniaj?c element daty z pystories na ogrpg tak aby dzia?a?o i wszystko dzia?a poza jednym. Nie dzia?a przelewanie got?wki z konta gracza X na konto gracza Y

Tutaj daj? kod:

s.lua
local banks={
    {pozATM={2206.87,2761.86,10.82,90},typ="bankomat"},
    {pozATM={2864.46,2224.00,10.89,-90},typ="bankomat"},
    {pozATM={2551.38,1971.98,10.82,-535},typ="bankomat"},
    {pozATM={2477.04,1326.34,10.83,0},typ="bankomat"},
    {pozATM={1019.61,1353.81,10.82,90},typ="bankomat"},
    {pozATM={2191.27,2010.34,10.83,0},typ="bankomat"},
    {pozATM={2137.43,2362.19,10.82,0},typ="bankomat"},
    {pozATM={2173.911401.8110.86,-535},typ="bankomat"},
    {pozATM={1966.952476.6810.88,90},typ="bankomat"},
    {pozATM={1650.472187.7110.82,-90},typ="bankomat"},
    {pozATM={2007.76, -2226.5913.55,-50},typ="bankomat"},
    {pozATM={463.10, -1327.4615.47,-88},typ="bankomat"},
    {pozATM={1467.94, -1766.2918.90,88},typ="bankomat"},
    {pozATM={2568.61951.0110.95,127},typ="bankomat"},
    {pozATM={1918.57,2124.75,10.92,135},typ="bankomat"},
    {pozATM={-2381.23,-144.72,34.92,45},typ="bankomat"},
    {pozATM={-2043.66,173.89,28.70,270},typ="bankomat"},
    {pozATM={-2016.30,474.54,34.97,360},typ="bankomat"},
    {pozATM={-1967.19,291.77,34.96,360},typ="bankomat"},
    {pozATM={-2210.54,1028.09,79.81,470},typ="bankomat"},
    {pozATM={-1764.46,1200.65,24.82,-420},typ="bankomat"},
    {pozATM={-1648.64,1202.50,6.95,90},typ="bankomat"},
    {pozATM={2819.33,973.46,10.85,90},typ="bankomat"},
    {pozATM={-1683.24,689.33,24.69,90},typ="bankomat"},
    {pozATM={-1532.94,2649.29,55.64,230},typ="bankomat"},
    {pozATM={412.73,2539.60,16.23,90},typ="bankomat"},
    {pozATM={213.63,87.65,4.75,90},typ="bankomat"},
    {pozATM={116.47,-181.38,1.29,90},typ="bankomat"},
    {pozATM={-1305.31,-621.69,13.94,90},typ="bankomat"},
    {pozATM={1054.82,2095.04,10.52,90},typ="bankomat"},
    {pozATM={871.71,-28.06,62.50,90},typ="bankomat"},
    {pozATM={775.66,1882.83,4.68,90},typ="bankomat"},
    {pozATM={1619.69,1819.95,10.52,90},typ="bankomat"},
    {pozATM={2284.47,2431.40,10.52,90},typ="bankomat"},
    {pozATM={2873.13,2442.29,10.77,90},typ="bankomat"},
    {pozATM={2299.96,1002.66,10.59,90},typ="bankomat"},
    {pozATM={1508.40,2364.20,10.52,90},typ="bankomat"},


    
    {poz={46.83,-75.77,-13.20},typ="bank",int=1,dim=0},
    
    
}

for i,v in ipairs(banks) do
    if v.typ=="bankomat" then
        v.atm=createObject(2942,v.pozATM[1],v.pozATM[2],v.pozATM[3]-0.4,0,0,v.pozATM[4])
        setElementDimension(v.atm,v.dim or 0)
        setElementInterior(v.atm,v.int or 0)
        
        local x,y,z=getElementPosition(v.atm)
        local _,_,rz=getElementRotation(v.atm)
        local rrz=math.rad(rz)
        local px=x-(0.8*math.sin(-rrz))
        local py=y-(0.8*math.cos(-rrz))

        v.marker=createMarker(px,py,v.pozATM[3]-1,'cylinder',2.1,01222550)
        v.mapicon=createBlip(px,py,v.pozATM[3], 5215,255,5,255, -10000150)
        setElementDimension(v.marker,v.dim or 0)
        setElementInterior(v.marker,v.int or 0)
        local t=createElement("text")
        setElementPosition(t,v.pozATM[1],v.pozATM[2],v.pozATM[3]-0.05)
        setElementData(t,"name","Bankomat 24/7")
        setElementDimension(t,v.dim or 0)
        setElementInterior(t,v.int or 0)
    else
        v.marker=createMarker(v.poz[1],v.poz[2],v.poz[3]-1,'cylinder',1.1,0122255255)
        setElementDimension(v.marker,v.dim or 0)
        setElementInterior(v.marker,v.int or 0)
        local t=createElement("text")
        setElementPosition(t,v.poz[1],v.poz[2],v.poz[3]-0.05)
        setElementData(t,"name","MAZEBANK\nYRW")
        setElementDimension(t,v.dim or 0)
        setElementInterior(t,v.int or 0)
    end
end



addEventHandler("onMarkerHit",resourceRoot,function(plr,dim)
    if not dim then return end
    if getElementType(plr)=="player" then
        if isPedInVehicle(plrthen return end
        local z_m=nil
        for i,v in ipairs(banks) do
            if v.marker==source then z_m=v end
        end
        if not z_m then return end
        
        for i,v in ipairs(banks) do
            if v.marker==source then
                if v.typ=="bankomat" then
                    if not getElementData(plr,"bank:karta"then
                         outputChatBox("Nie posiadasz karty bankomatowo-p?atniczej!",plr)
                         outputChatBox("Udaj si? do najbli?szej plac?wki banku, aby j? naby?.",plr)
                        return
                    end
                end
                local zap=exports["DB2"]:pobierzWyniki("SELECT bank_money FROM ogrpg_users WHERE id=?",getElementData(plr,"player:uid"))
                if not zap then return end
                triggerClientEvent(plr,"panelBanku_c",resourceRoot,"showWindow",true,tostring(tonumber(zap.bank_money)),v.typ)
            end
        end
    end
end)

addEvent("panelBanku",true)
addEventHandler("panelBanku",resourceRoot,function(cmd,d,d2,d3,d4)
    if cmd=="wplacaniePieniedzy" then
            if(d>0then
                if (d)<=getPlayerMoney(clientthen
                    local kwota=tostring(d)
                    kwota=(kwota)
                    kwota=kwota
                    takePlayerMoney(client,kwota)
                    exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money+? WHERE id=? LIMIT 1",kwota,getElementData(client,"player:uid"))
                    exports["ogrpg-db"]:dbSet("INSERT INTO psrpg_przelewy_bank SET typ=?,dbid_n=?,nadawca=?,kwota=?, data=NOW()","wplata",getElementData(client,"player:uid"),getPlayerName(client),kwota)
                    local zap=exports["DB2"]:pobierzWyniki("SELECT bank_money FROM ogrpg_users WHERE id=? LIMIT 1",getElementData(client,"player:uid"))
                    if not zap then return end
                    triggerClientEvent(client,"panelBanku_c",resourceRoot,"odswiezPanel",tonumber(zap.bank_money))
                    if d2=="bank" then --exports["es-logi"]:outputUcho("BANK WPLATA: "..getPlayerName(client).." kwota: "..string.format("%.2f",kwota/100).." PLN")
                    else --exports["es-logi"]:outputUcho("BANKOMAT WPLATA: "..getPlayerName(client).." kwota: "..string.format("%.2f",kwota/100).." PLN"end
                    end
                    outputChatBox("Wp?ata zosta?a wykonana pomy?lnie.",client)
                else outputChatBox("Nie posiadasz tyle got?wki.",clientend
            else outputChatBox("Kwota musi by? wi?ksza ni? 0 PLN.",clientend
    elseif cmd=="wyplacaniePieniedzy" then
            if(d>0then
                local zap=exports["DB2"]:pobierzWyniki("SELECT bank_money FROM ogrpg_users WHERE id=? LIMIT 1",getElementData(client,"player:uid"))
                if not zap then return end
                local kwota=d
                kwota=(kwota)
                if(zap.bank_money>=kwotathen
                    if (getPlayerMoney(client)+kwota>99999999then    outputChatBox("Mo?esz mie? przy sobie maksymalnie 999 ty? PLN.",client)
                    else
                        givePlayerMoney(client,kwota)
                        exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money-? WHERE id=? LIMIT 1",kwota,getElementData(client,"player:uid"))
                        exports["ogrpg-db"]:dbSet("INSERT INTO psrpg_przelewy_bank SET typ=?,dbid_n=?,nadawca=?,kwota=?, data=NOW()","wyplata",getElementData(client,"player:uid"),getPlayerName(client),kwota)
                        triggerClientEvent(client,"panelBanku_c",resourceRoot,"odswiezPanel",tonumber((zap.bank_money-kwota)))
                        outputChatBox("Wyp?ata zosta?a wykonana pomy?lnie.",client)
                        if d2=="bank" then --exports["es-logi"]:outputUcho("BANK WYPLATA: "..getPlayerName(client).." kwota: "..string.format("%.2f",kwota/100).." PLN")
                        else --exports["es-logi"]:outputUcho("BANKOMAT WYPLATA: "..getPlayerName(client).." kwota: "..string.format("%.2f",kwota/100).." PLN"end
                        end
                    end
                else outputChatBox("Nie posiadasz takiej ilo?ci ?rodk?w na koncie.",clientend
            else outputChatBox("Kwota musi by? wi?ksza ni? 0PLN.",clientend
            zap=nil
    elseif cmd=="wyrabianieKarty" then
        if not getElementData(client,"bank:karta"then
            if getPlayerMoney(client)<(2500000then 
                outputChatBox("Nie posiadasz tyle got?wki - 2,500,000PLN.",client) 
                triggerClientEvent(client,"panelBanku_c",resourceRoot,"unlock")
                return 
            end
            takePlayerMoney(client,(2500000))
            setElementData(client,"bank:karta",true)
            exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET karta_bank='tak' WHERE id=?",getElementData(client,"player:uid"))
            outputChatBox("Wyrobiono kart? bankomatowo-p?atnicz?.",client)
            outputChatBox("Od teraz mo?esz wp?aca? i wyp?aca? got?wk? w bankomatach.",client)
            --exports["es-logi"]:outputUcho("BANK KARTA: "..getPlayerName(client).." aktywuje now? kart? bankomatowo-p?atnicz? za 150PLN.")
            zap=nil
        else
            removeElementData(client,"bank:karta")
            exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET karta_bank=NULL WHERE id=?",getElementData(client,"player:uid"))
            outputChatBox("Dezaktywowano kart? bankomatowo-p?atnicz?.",client)
            outputChatBox("Nie mo?esz ju? wp?aca? i wyp?aca? got?wki poprzez bankomaty.",client)
            --exports["es-logi"]:outputUcho("BANK KARTA: "..getPlayerName(client).." dezaktywuje swoj? kart? bankomatowo-p?atnicz?.")
            zap=nil
        end
        triggerClientEvent(client,"panelBanku_c",resourceRoot,"odswiezPanel",getElementData(client,"bank:karta"))
    elseif cmd=="przelewaniePieniedzy" then
        local odbiorca=exports["DB2"]:pobierzWyniki("SELECT login FROM ogrpg_users WHERE id=? LIMIT 1",d)
        if odbiorca then
            local kwota=d2
            kwota=(kwota)
            triggerClientEvent(client,"panelBanku_c",resourceRoot,"przelewaniePieniedzy_2",odbiorca.login,kwota,d)
        else outputChatBox("Nie znaleziono gracza w bazie danych o takim ID.",clientend
    elseif cmd=="przelewaniePieniedzy_2" then
        local kwota=d3
        local zap=exports["DB2"]:pobierzWyniki("SELECT bank_money FROM ogrpg_users WHERE id=?",getElementData(client,"player:uid"))
        if zap.bank_money>=kwota then
                exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money-? WHERE id=? LIMIT 1",kwota,getElementData(client,"player:uid"))
                exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money+? WHERE id=? LIMIT 1",kwota,d)
                --exports["es-logi"]:outputUcho("BANK PRZELEW: "..getPlayerName(client).." do DBIDu: "..d.." kwota: "..string.format("%.2f",kwota/100).." PLN")
                if kwota then exports["ogrpg-db"]:dbSet("INSERT INTO psrpg_przelewy_bank SET typ=?,dbid_o=?,nadawca=?,dbid_n=?,odbiorca=?,kwota=?, data=NOW()","przelew",getElementData(client,"player:uid"),getPlayerName(client),d,d2,kwotaend
                outputChatBox("Przelew wykonany pomy?lnie.",client)
            else outputChatBox("Bank wstrzyma? tw?j przelew, poniewa? masz nieop?acone mandaty.",clientend
        else outputChatBox("Brak wystarczaj?cej ilo?ci ?rodk?w na koncie.",clientend
        local zap=exports["DB2"]:pobierzWyniki("SELECT bank_money FROM ogrpg_users WHERE id=?",getElementData(client,"player:uid"))
        triggerClientEvent(client,"panelBanku_c",resourceRoot,"odswiezPanel",zap.bank_money)
    elseif cmd=="przelewaniePieniedzy_3" then
        local odbiorca=exports["DB2"]:pobierzWyniki("SELECT nazwa FROM es_biznesy_stacje_paliw WHERE id=? LIMIT 1",d)
        if odbiorca then
            local kwota=d2
            kwota=(kwota)
            triggerClientEvent(client,"panelBanku_c",resourceRoot,"przelewaniePieniedzy_4",odbiorca.nazwa,kwota,d)
        else outputChatBox("Nie znaleziono biznesu w bazie danych o takim ID.",clientend
    elseif cmd=="przelewaniePieniedzy_4" then
        local kwota=d3
        local zap=exports["DB2"]:pobierzWyniki("SELECT bank_money FROM ogrpg_users WHERE id=?",getElementData(client,"player:uid"))
        if zap.kasa_bank>=kwota then
                exports["ogrpg-db"]:dbSet("UPDATE ogrpg_users SET bank_money=bank_money-? WHERE id=? LIMIT 1",kwota,getElementData(client,"player:uid"))
                exports["ogrpg-db"]:dbSet("UPDATE es_biznesy_stacje_paliw SET kasa=kasa+? WHERE id=? LIMIT 1",kwota,d)
                exports["ogrpg-db"]:dbSet("INSERT INTO es_biznesy_stacje_paliw_historia SET bid=?,typ=?,data=NOW(),operacja=?",d,"zarobek",kwota,getPlayerName(client))
                --exports["es-logi"]:outputUcho("BANK PRZELEW BIZNES: "..getPlayerName(client).." do biznesu: "..d2.."[ID:"..d.."] kwota: "..string.format("%.2f",kwota/100).." PLN")
                if kwota>=10000 then exports["ogrpg-db"]:dbSet("INSERT INTO psrpg_przelewy_bank SET typ=?,dbid_o=?,nadawca=?,dbid_n=?,odbiorca=?,kwota=?","przelew",getElementData(client,"player:uid"),getPlayerName(client),d,d2,kwotaend
                exports["es-komunikaty"]:komunikat("Przelew wykonany pomy?lnie.",client)
            else exports["es-komunikaty"]:komunikat("Bank wstrzyma? tw?j przelew, poniewa? masz nieop?acone mandaty.",clientend
        else exports["es-komunikaty"]:komunikat("Brak wystarczaj?cej ilo?ci ?rodk?w na koncie.",clientend
        local zap=exports["ogrpg-db"]:dbSet("SELECT bank_money FROM ogrpg_users WHERE id=?",getElementData(client,"player:uid"))
        triggerClientEvent(client,"panelBanku_c",resourceRoot,"odswiezPanel",zap.kasa_ban)
    elseif cmd=="pobierzHistorie" then
        local zap=exports["ogrpg-db"]:dbSet("SELECT * FROM psrpg_przelewy_bank WHERE dbid_n=? OR dbid_o=? ORDER BY data DESC",getElementData(client,"player:uid"),getElementData(client,"player:uid"))
        if not zap then return end
        triggerClientEvent(client,"panelBanku_c",resourceRoot,"pobierzHistorie",zap)
        zap=nil
    end


Bardzo prosz? o pomoc :(

Postaw piwo autorowi tego posta
 

 
Więcej szczegółów
Wystawiono 1 piw(a):
KingSteR
Wysłany: 2019-08-24, 13:31


NorbiTTT

Nbi#1824






Wiek: 27
Na forum: 3207 dni
Posty: 193
Nick w MP: Nbi

Piwa: 698

Respekt: 60

Co wyskakuje w db3

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-08-24, 14:42


DaVeCS

Mapper






Wiek: 31
Na forum: 3386 dni
Posty: 193
Nick w MP: DaVe

Piwa: 59

Respekt: 70,5

Brak b??d?w, gdy klikam w potwierdzeniu przelewu to 0 reakcji

Postaw piwo autorowi tego posta
 

 
Wysłany: 2019-08-29, 05:30


Adaskokieblasko







Wiek: 23
Na forum: 2954 dni
Posty: 101

Piwa: 18

Respekt: 100
Respekt: 100

Reszta dobrze dzia?a?
Wyskakuje ci komunikat na chacie o pomy?lnie uko?czonej transakcji?

Postaw piwo autorowi tego posta
 

 
Tagi: bankomaty :: psrpg
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Odpowiedz do tematu

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