GTAONLINE.PL :: System Przelewów

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

Chcia?bym zrobi? system przelew?w na moim serwerze tylko gdy s? 2 przelewy w bazie danych oczekuj?ce na realizacje przez gracza do ktorego zosta? wys?any to sie buguje i pisze ze nia ma oczekujacych przelewow. A gdy jest 1 przelew to wszystko dziala bardzo dobrze. Dlatego szukam pomocy z tym b??dem i prosi?bym do?wiadczonych o pomoc. Tutaj jest kod:
ServerSide

function getKwotaFromBank(plr)
    local result=exports["gl-db"]:dbGet("SELECT * FROM gl_przelewy WHERE do=?", plr)
    if result and #result > 0 then
        return result[1].ile
    end
    return 0
end

function getKtoWyslalPrzelew(plr)
    local result=exports["gl-db"]:dbGet("SELECT * FROM gl_przelewy WHERE kto=?", plr)
    if result and #result > 0 then
        return result[1].kto
    end
    return 0
end

function getNickKtoWyslalPrzelew(plr)
    local uid = getKtoWyslalPrzelew(plr)
    local result=exports["gl-db"]:dbGet("SELECT * FROM gl_users WHERE id=?", uid)
    if result and #result > 0 then
        return result[1].login
    end
    return 0
end

function onBankTransfer(plr, cmd)
    local uid = getElementData(plr, "player:sid")
    local bank = getElementData(plr, "player:bank")
    local sender = exports["gl-db"]:dbGet("SELECT * FROM gl_przelewy WHERE do=?", uid)
    if #sender == uid then
        local kwota = getKwotaFromBank(uid)
        local odkogo = getNickKtoWyslalPrzelew(uid)
        outputChatBox("#008000[PRZELEWY] #ffffffOtrzyma?e?(a?) przelew o warto?ci: "..kwota.." #7FFF00PLN".." #ffffffod #FFFF00"..odkogo.."#ffffff!", plr,  225, 199, 0, true)
        exports["gl-db"]:dbSet("UPDATE gl_users SET bank_money=bank_money+? WHERE id=?", kwota, uid)
        exports["gl-db"]:dbSet("DELETE FROM gl_przelewy WHERE do=?", uid)
        setElementData(plr, "player:bank",bank+kwota)
    else
        outputChatBox("#008000[PRZELEWY] #ffffffNie posiadasz oczekuj?cych przelew?w!", plr, 225, 199, 0, true)
    return end
end

Zastanawiaj?ce jest to, ?e w bazie MySQL szukasz rekordu po zmiennej gracza (gracz, element z MTA jako element w bazie danych). Mo?e zmie? to na jaki? numer identyfikacyjny gracza (uid).

Domy?lam si? te?, ?e te przelewy p??niej si??nadpisuj?, kiedy dodasz 2 i pobiera Ci wszystkie przelewy oczekuj?ce. Wtedy te? musisz wykorzysta? odpowiedni JEDEN przelew. Sortujesz wtedy po kwocie lub odbiorcy przelewu.

Tylko, ?e wlasnie nie wiem jak zrobic tak, aby te przelewy wszystkie sie wykonaly po koleji. Szukalem pomocy u roznych ludzi, ale nie zabardzo potrafi? pom?c.

Więcej informacji znajdziesz w Wikipedii MTA:

getPlayerName

Chcia?bym, ?eby odbiera?o tylko ostani przelew. Nie wszystkie na raz.
Edit: Juz zrobilem. (po dacie szuka tera)
I potrzebuje ifa, ze jak nie ma zadnego przelewu to pisze nie masz oczekujacych przelew?w. Prosze o pomoc.

function onBankTransfer(plr, cmd)
    local uid = getElementData(plr, "player:sid")
    local bank = getElementData(plr, "player:bank")
    local sender = exports["gl-db"]:dbGet("SELECT * FROM gl_przelewy WHERE do=?", uid)
    local ostatni = exports["gl-db"]:dbGet("SELECT do, kiedy FROM gl_przelewy WHERE do=? AND kiedy IN (SELECT max(kiedy) FROM gl_przelewy)", uid)
    if ostatni and sender then
        local kwota = getKwotaFromBank(uid)
        local odkogo = getNickKtoWyslalPrzelew(uid)
        outputChatBox("#008000[PRZELEWY] #ffffffOtrzyma?e?(a?) przelew o warto?ci: "..kwota.." #7FFF00PLN".." #ffffffod #FFFF00"..odkogo.."#ffffff!", plr,  225, 199, 0, true)
        exports["gl-db"]:dbSet("UPDATE gl_users SET bank_money=bank_money+? WHERE id=?", kwota, uid)
        exports["gl-db"]:dbSet("DELETE FROM gl_przelewy WHERE do=? AND ile=?", uid, kwota)
        setElementData(plr, "player:bank",bank+kwota)
    else
        outputChatBox("#008000[PRZELEWY] #ffffffNie posiadasz oczekuj?cych przelew?w!", plr, 225, 199, 0, true)
    return end
end