Ir para conteúdo

Me ajudem pessoal com este erro

Por Keidann
em Suporte Tibia OTServer

Featured Replies

Postado

Poste 004-database , da sua pasta lib e o war.lua da pasta talkactions

Se quiser sua dúvida tirada, mande PM com os links, e não com a dúvida (outros podem ter a mesma dúvida, e o fórum serve para ser usado).

 

Tópicos:

 

yNlhRVC.png

 

55px-Judo_yellow_belt.svg.png

  • Citar
  • Mention
    • Postado

    O tópico foi movido para a área correta, preste mais atenção da próxima vez!

    Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680

    Este tópico foi movido:

    De: "OTServ → OTServ Geral"

    Para: "OTServ → Suporte OTServ → Suporte de Scripts"

    Te ajudei?? REP + e ficamos quites... <ahttp://www.tibiaking.com/forum/uploads/emoticons/default_happyy.png' alt=';D'>

    Atenciosamente,

    Daniel.

    Abraços!

  • Citar
  • Mention
    • Postado
    • Autor
    war.lua
    function onSay(cid, words, param, channel)
            local guild = getPlayerGuildId(cid)
            if(not guild or getPlayerGuildLevel(cid) < GUILDLEVEL_LEADER) then
                    doPlayerSendChannelMessage(cid, "", "You cannot execute this talkaction.", TALKTYPE_CHANNEL_W, 0)
                    return true
            end
     
            local t = string.explode(param, ",")
            if(not t[2]) then
                    doPlayerSendChannelMessage(cid, "", "Not enough param(s).", TALKTYPE_CHANNEL_W, 0)
                    return true
            end
     
            local enemy = getGuildId(t[2])
            if(not enemy) then
                    doPlayerSendChannelMessage(cid, "", "Guild \"" .. t[2] .. "\" does not exists.", TALKTYPE_CHANNEL_W, 0)
                    return true
            end
     
            if(enemy == guild) then
                    doPlayerSendChannelMessage(cid, "", "You cannot perform war action on your own guild.", TALKTYPE_CHANNEL_W, 0)
                    return true
            end
     
            local enemyName, tmp = "", db.getResult("SELECT `name` FROM `guilds` WHERE `id` = " .. enemy)
            if(tmp:getID() ~= -1) then
                    enemyName = tmp:getDataString("name")
                    tmp:free()
            end
     
            if(isInArray({"accept", "reject", "cancel"}, t[1])) then
                    local query = "`guild_id` = " .. enemy .. " AND `enemy_id` = " .. guild
                    if(t[1] == "cancel") then
                            query = "`guild_id` = " .. guild .. " AND `enemy_id` = " .. enemy
                    end
     
                    tmp = db.getResult("SELECT `id`, `begin`, `end`, `payment` FROM `guild_wars` WHERE " .. query .. " AND `status` = 0")
                    if(tmp:getID() == -1) then
                            doPlayerSendChannelMessage(cid, "", "Currently there's no pending invitation for a war with " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
                            return true
                    end
     
                    if(t[1] == "accept") then
                            local _tmp = db.getResult("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
                            local state = _tmp:getID() < 0 or _tmp:getDataInt("balance") < tmp:getDataInt("payment")
     
                            _tmp:free()
                            if(state) then
                                    doPlayerSendChannelMessage(cid, "", "Your guild balance is too low to accept this invitation.", TALKTYPE_CHANNEL_W, 0)
                                    return true
                            end
     
                            db.query("UPDATE `guilds` SET `balance` = `balance` - " .. tmp:getDataInt("payment") .. " WHERE `id` = " .. guild)
                    end
     
                    query = "UPDATE `guild_wars` SET "
                    local msg = "accepted " .. enemyName .. " invitation to war."
                    if(t[1] == "reject") then
                            query = query .. "`end` = " .. os.time() .. ", `status` = 2"
                            msg = "rejected " .. enemyName .. " invitation to war."
                    elseif(t[1] == "cancel") then
                            query = query .. "`end` = " .. os.time() .. ", `status` = 3"
                            msg = "canceled invitation to a war with " .. enemyName .. "."
                    else
                            query = query .. "`begin` = " .. os.time() .. ", `end` = " .. (tmp:getDataInt("end") > 0 and (os.time() + ((tmp:getDataInt("begin") - tmp:getDataInt("end")) / 86400)) or 0) .. ", `status` = 1"
                    end
     
                    query = query .. " WHERE `id` = " .. tmp:getDataInt("id")
                    if(t[1] == "accept") then
                            doGuildAddEnemy(guild, enemy, tmp:getDataInt("id"), WAR_GUILD)
                            doGuildAddEnemy(enemy, guild, tmp:getDataInt("id"), WAR_ENEMY)
                    end
     
                    tmp:free()
                    db.query(query)
                    doBroadcastMessage(getPlayerGuildName(cid) .. " has " .. msg, MESSAGE_EVENT_ADVANCE)
                    return true
            end
     
            if(t[1] == "invite") then
                    local str = ""
                    tmp = db.getResult("SELECT `guild_id`, `status` FROM `guild_wars` WHERE `guild_id` IN (" .. guild .. "," .. enemy .. ") AND `enemy_id` IN (" .. enemy .. "," .. guild .. ") AND `status` IN (0, 1)")
                    if(tmp:getID() ~= -1) then
                            if(tmp:getDataInt("status") == 0) then
                                    if(tmp:getDataInt("guild_id") == guild) then
                                            str = "You have already invited " .. enemyName .. " to war."
                                    else
                                            str = enemyName .. " have already invited you to war."
                                    end
                            else
                                    str = "You are already on a war with " .. enemyName .. "."
                            end
     
                            tmp:free()
                    end
     
                    if(str ~= "") then
                            doPlayerSendChannelMessage(cid, "", str, TALKTYPE_CHANNEL_W, 0)
                            return true
                    end
     
                    local frags = tonumber(t[3])
                    if(frags ~= nil) then
                            frags = math.max(10, math.min(1000, frags))
                    else
                            frags = 100
                    end
     
                    local payment = tonumber(t[4])
                    if(payment ~= nil) then
                            payment = math.max(100000, math.min(1000000000, payment))
                            tmp = db.getResult("SELECT `balance` FROM `guilds` WHERE `id` = " .. guild)
     
                            local state = tmp:getID() < 0 or tmp:getDataInt("balance") < payment
                            tmp:free()
                            if(state) then
                                    doPlayerSendChannelMessage(cid, "", "Your guild balance is too low for such payment.", TALKTYPE_CHANNEL_W, 0)
                                    return true
                            end
     
                            db.query("UPDATE `guilds` SET `balance` = `balance` - " .. payment .. " WHERE `id` = " .. guild)
                    else
                            payment = 0
                    end
     
                    local begining, ending = os.time(), tonumber(t[5])
                    if(ending ~= nil and ending ~= 0) then
                            ending = begining + (ending * 86400)
                    else
                            ending = 0
                    end
     
                    db.query("INSERT INTO `guild_wars` (`guild_id`, `enemy_id`, `begin`, `end`, `frags`, `payment`) VALUES (" .. guild .. ", " .. enemy .. ", " .. begining .. ", " .. ending .. ", " .. frags .. ", " .. payment .. ");")
                    doBroadcastMessage(getPlayerGuildName(cid) .. " has invited " .. enemyName .. " to war till " .. frags .. " frags.", MESSAGE_EVENT_ADVANCE)
                    return true
            end
     
            if(not isInArray({"end", "finish"}, t[1])) then
                    return false
            end
     
            local status = (t[1] == "end" and 1 or 4)
            tmp = db.getResult("SELECT `id` FROM `guild_wars` WHERE `guild_id` = " .. guild .. " AND `enemy_id` = " .. enemy .. " AND `status` = " .. status)
            if(tmp:getID() ~= -1) then
                    local query = "UPDATE `guild_wars` SET `end` = " .. os.time() .. ", `status` = 5 WHERE `id` = " .. tmp:getDataInt("id")
                    tmp:free()
                    doGuildRemoveEnemy(guild, enemy)
                    doGuildRemoveEnemy(enemy, guild)
     
                    db.query(query)
                    doBroadcastMessage(getPlayerGuildName(cid) .. " has " .. (status == 4 and "mend fences" or "ended up a war") .. " with " .. enemyName .. ".", MESSAGE_EVENT_ADVANCE)
                    return true
            end
     
            if(status == 4) then
                    doPlayerSendChannelMessage(cid, "", "Currently there's no pending war truce from " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
                    return true
            end
     
            tmp = db.getResult("SELECT `id`, `end` FROM `guild_wars` WHERE `guild_id` = " .. enemy .. " AND `enemy_id` = " .. guild .. " AND `status` = 1")
            if(tmp:getID() ~= -1) then
                    if(tmp:getDataInt("end") > 0) then
                            tmp:free()
                            doPlayerSendChannelMessage(cid, "", "You cannot request ending for war with " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
                            return true
                    end
     
                    local query = "UPDATE `guild_wars` SET `status` = 4, `end` = " .. os.time() .. " WHERE `id` = " .. tmp:getDataInt("id")
                    tmp:free()
     
                    db.query(query)
                    doBroadcastMessage(getPlayerGuildName(cid) .. " has signed an armstice declaration on a war with " .. enemyName .. ".", MESSAGE_EVENT_ADVANCE)
                    return true
            end
     
            doPlayerSendChannelMessage(cid, "", "Currently there's no active war with " .. enemyName .. ".", TALKTYPE_CHANNEL_W, 0)
            return true
    end
     
    004-database.lua
     
    if(result == nil) then
    print("> WARNING: Couldn't load database lib.")
    return
    end
     
    Result = createClass(nil)
    Result:setAttributes({
    id = -1,
    query = ""
    })
     
    function Result:getID()
    return self.id
    end
     
    function Result:setID(_id)
    self.id = _id
    end
     
    function Result:getQuery()
    return self.query
    end
     
    function Result:setQuery(_query)
    self.query = _query
    end
     
    function Result:create(_query)
    self:setQuery(_query)
    local _id = db.storeQuery(self:getQuery())
    if(_id) then
    self:setID(_id)
    end
     
    return self:getID()
    end
     
    function Result:getRows(free)
    local free = free or false
    if(self:getID() == -1) then
    error("[Result:getRows] Result not set!")
    end
     
    local c = 0
    repeat
    c = c + 1
    until not self:next()
     
    local _query = self:getQuery()
    self:free()
    if(not free) then
    self:create(_query)
    end
     
    return c
    end
     
    function Result:getDataInt(s)
    if(self:getID() == -1) then
    error("[Result:getDataInt] Result not set!")
    end
     
    return result.getDataInt(self:getID(), s)
    end
     
    function Result:getDataLong(s)
    if(self:getID() == -1) then
    error("[Result:getDataLong] Result not set!")
    end
     
    return result.getDataLong(self:getID(), s)
    end
     
    function Result:getDataString(s)
    if(self:getID() == -1) then
    error("[Result:getDataString] Result not set!")
    end
     
    return result.getDataString(self:getID(), s)
    end
     
    function Result:getDataStream(s)
    if(self:getID() == -1) then
    error("[Result:getDataStream] Result not set!")
    end
     
    return result.getDataStream(self:getID(), s)
    end
     
    function Result:next()
    if(self:getID() == -1) then
    error("[Result:next] Result not set!")
    end
     
    return result.next(self:getID())
    end
     
    function Result:free()
    if(self:getID() == -1) then
    error("[Result:free] Result not set!")
    end
     
    self:setQuery("")
    local ret = result.free(self:getID())
    self:setID(-1)
    return ret
    end
     
    Result.numRows = Result.getRows
    function db.getResult(query)
    if(type(query) ~= 'string') then
    return nil
    end
     
    local ret = Result:new()
    ret:create(query)
    return ret
    end
     

    Editado por Keidann (veja o histórico de edições)

  • Citar
  • Mention

    • Participe da conversa

    Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

    Visitante
    Responder
    Ir para a lista de tópicos

    Quem Está Navegando 0

    • Nenhum usuário registrado visualizando esta página.

    Estatísticas dos Fóruns

    • Tópicos 96.9k
    • Posts 519.6k

    Informação Importante

    Confirmação de Termo

    I accept