[BUG] War System

LiveWarSoft · Junho 11, 2015

Olá amigos, estou com 1 bug no meu war system.
Uso a Seguinte TFS
TFS 0.4 CAST [version 7]

Tudo funciona como deveria, Unica coisa que está errado é quando eu deslogo é logo novamente os escudos somem mais a war continua rolando. mais dai pega pk é etc.

Gostaria de saber se alguma alma bondosa poderia me ajudar sem me cobrar pilhas de dilmas.
Grato. att.

Aqui está todos meus codigos.

Init.lua

local config = {

creationTime = 7 * 86400,

checkTime = 7 * 86400,

viceCount = 4,

memberCount = 10

}

function onStartup()

local data, time, result = {}, os.time(), db.getResult("SELECT `id`, `ownerid`, `creationdata`, `checkdata` FROM `guilds` WHERE `world_id` = " .. getConfigValue('worldId') .. ";")

if(result:getID() ~= -1) then

repeat

data[result:getDataInt("id")] = {result:getDataInt("ownerid"), result:getDataInt("creationdata"), result:getDataInt("checkdata")}

until not(result:next())

result:free()

end

for id, v in ipairs(data) do

local owner, created, check = v[1], v[2], v[3]

if(created < (time - config.creationTime)) then

result = db.getResult("SELECT `id`, `level` FROM `guild_ranks` WHERE `guild_id` = " .. id .. ";")

if(result:getID() ~= -1) then

local rank, ranks = 0, {}

repeat

ranks[result:getDataInt("id")] = result:getDataInt("level")

if(result:getDataInt("level") == 1) then

rank = result:getDataInt("id")

end

until not(result:next())

result:free()

local members = {0, 0, 0, 0}

for k, v in ipairs(ranks) do

result = db.getResult("SELECT COUNT(`id`) AS `count` FROM `players` WHERE `rank_id` = " .. k .. ";")

if(result:getID() ~= -1) then

members[v] = members[v] + result:getDataInt("count")

result:free()

end

if(v == 2) then

result = db.getResult("SELECT `p`.`id` FROM `players` p LEFT JOIN `accounts` a ON `p`.`account_id` = `a`.`id` WHERE `p`.`rank_id` = " .. k .. " AND (`a`.`premdays` = 0 OR (`a`.`lastday` + (`a`.`premdays` * 86400) <= 0));")

if(result:getID() ~= -1) then

local demote = ""

repeat

demote = demote .. result:getDataInt("id") .. ","

members[2] = members[2] - 1

members[1] = members[1] + 1

until not(result:next())

result:free()

if(demote ~= "" and rank ~= 0) then

db.executeQuery("UPDATE `players` SET `rank_id` = " .. rank .. " WHERE `id` IN (" .. demote:sub(1, -2) .. ");")

end

end

end

end

for i = 1, 3 do

members[4] = members[4] + members

end

if(members[2] < config.viceCount or members[4] < config.memberCount) then

if(check == 0) then

db.executeQuery("UPDATE `guilds` SET `checkdata` = " .. (time + config.checkTime) .. " WHERE `id` = " .. id .. ";")

elseif(check < time) then

local tmp = ""

for rank, _ in ipairs(ranks) do

tmp = tmp .. rank .. ","

end

db.executeQuery("UPDATE `players` SET `rank_id` = 0, `guildnick` = '', `guildjoin` = 0 WHERE `rank_id` IN (" .. tmp:sub(1, -2) .. ");")

db.executeQuery("DELETE FROM `guilds` WHERE `id` = " .. id .. ";")

end

end

end

end

end

db.executeQuery("UPDATE `players` SET `online` = 0 WHERE `world_id` = " .. getConfigValue('worldId') .. " AND `online` > 0;")

db.executeQuery("UPDATE `bans` SET `active` = 0 WHERE `expires` <= " .. time .. " AND `expires` >= 0 AND `active` = 1")

db.executeQuery("DELETE FROM `guild_wars` WHERE `status` = 0 AND `begin` < " .. (os.time() - 2 * 86400) .. ";")

db.executeQuery("UPDATE `guild_wars` SET `status` = 5, `end` = " .. os.time() .. " WHERE `status` = 1 AND `end` > 0 AND `end` < " .. os.time() .. ";")

if(getConfigValue("sqlType") ~= "sqlite") then

db.executeQuery("TRUNCATE TABLE `player_statements`;")

else

db.executeQuery("DELETE FROM `player_statements`;")

end

return true

end

function onGlobalSave()

if(getGameState() ~= GAMESTATE_CLOSING) then

return onStartup()

end

return true

end

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

OBS : Quando eu mudo de TFS por exemplo 3888/OTX , funciona perfeitamente.

Deslogo e logo é está tudo certo, mais eu gostaria de usar essa TFS,

Se possivel a pessoa que editou e atualizou responder esse topic,

Ficarei extremamente grato, acho que não sou o unico com esse bug.

Editado Junho 11, 2015 por LiveWarSoft (veja o histórico de edições)

patricia · Junho 11, 2015

Editado Junho 11, 2015 por patricia (veja o histórico de edições)

WooX · Junho 23, 2015

Estou com o mesmo problema do rapaz, procurei pelo fórum e encontrei outro tópico com o mesmo assunto, como este é mais recente, vou postar aqui para não ter que criar um tópico. Alguém sabe como resolver o problema descrito?

Yeex · Junho 23, 2015

Alguém conseguiu resolver o problema? Estou passando pela mesma situação, mas tudo que eu faço continua do mesmo jeito!

Bruno Carvalho · Junho 23, 2015

Quais os arquivos em creaturescripts/scripts?

Yeex · Junho 23, 2015

O meu está assim:

Bruno Carvalho · Junho 23, 2015

Manda o skullcheck e o idle...

Mas aparentemente ta faltando um check ou algum storage que mantém a skull e a função do ataque.

Mas por ser um problema que ao atacar o player ganha skull é provavelmente na source...

Yeex · Junho 23, 2015

Skullcheck

function onThink(cid, interval)


if(not isCreature(cid)) then

return

end


local skull, skullEnd = getCreatureSkull(cid), getPlayerSkullEnd(cid)

if(skullEnd > 0 and skull > SKULL_WHITE and os.time() > skullEnd and not getCreatureCondition(cid, CONDITION_INFIGHT)) then

doPlayerSetSkullEnd(cid, 0, skull)

end

end

Idle

local config = {


idleWarning = getConfigValue('idleWarningTime'),

idleKick = getConfigValue('idleKickTime')
}

function onThink(cid, interval)

if(getTileInfo(getCreaturePosition(cid)).nologout or getCreatureNoMove(cid) or
       getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_ALLOWIDLE)) then

return true

end


local idleTime = getPlayerIdleTime(cid) + interval

doPlayerSetIdleTime(cid, idleTime)

if(config.idleKick > 0 and idleTime > config.idleKick) then

doRemoveCreature(cid)

elseif(config.idleWarning > 0 and idleTime == config.idleWarning) then

local message = "You have been idle for " .. math.ceil(config.idleWarning / 60000) .. " minutes"

if(config.idleKick > 0) then

message = message .. ", you will be disconnected in "

local diff = math.ceil((config.idleWarning - config.idleKick) / 60000)

if(diff > 1) then

message = message .. diff .. " minutes"

else

message = message .. "one minute"

end


message = message .. " if you are still idle"

end


doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, message .. ".")

end


return true

end

WooX · Junho 23, 2015

É... provavelmente o problema é nas sources, alguém sabe em quais arquivos estão os codes do War System?

Yeex · Junho 25, 2015

Já procurei em tudo que é lugar e não acho!

WooX · Junho 27, 2015

UP

lrickes · Agosto 3, 2015

Ninguém conseguiu descobrir o erro ainda???

WooX · Agosto 5, 2015

Ninguém conseguiu descobrir o erro ainda???

Eu já resolvi o problema, e é mesmo na sources. Quando eu tiver tempo posto 1 tutorial ensinando como resolver.

eubrunomiguel · Agosto 5, 2015

O problema está no seu distro, precisa compilar com war system.

kualkerun · Agosto 19, 2015

nada?

NoCause · Novembro 1, 2015

@UP

Entrar

[BUG] War System

Posts Recomendados

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Informação Importante