Ir para conteúdo

matheuskc

Membro
  • Registro em

  • Última visita

  1. matheuskc postou uma resposta no tópico em Suporte Tibia OTServer
    Pessoal estou procurando uma proteçao para meu otserve pois n estou conseguindo encontra uma anti ddos bom vcs podem me ajuda com algum link de para proteçao ddos?
  2. Eu to com esse erro no meu sait quando vo adicionar pontos eu coloco o total de pontos clico em executar mais n vai auguem sabe resolve esse erro
  3. [28/02/2015 10:06:17] [Error - TalkAction Interface] [28/02/2015 10:06:17] data/talkactions/scripts/war.lua:onSay [28/02/2015 10:06:17] Description: [28/02/2015 10:06:17] data/lib/004-database.lua:100: [Result:free] Result not set! [28/02/2015 10:06:17] stack traceback: [28/02/2015 10:06:17] [C]: in function 'error' [28/02/2015 10:06:17] data/lib/004-database.lua:100: in function 'free' [28/02/2015 10:06:17] data/talkactions/scripts/war.lua:47: in function <data/talkactions/scripts/war.lua:1>
  4. O erro que deu agora. @edit imagem completa
  5. aqui o 004-database 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
  6. aqui esta 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
  7. Bom eu editei meu serv pra Guild War System com escudos mais quando eu mando o comando pra invita uma guild vai belezinha mais na hora de aceitar a war não consegue da um erro. Aqui o erro: up
  8. Já olhei esta tudo certo. #PAGSEGURO SISTEMA AUTOMATICO $config['pagseguro']['email'] = '[email protected]'; //E-mail da sua conta PagSeguro $config['pagseguro']['produtoNome'] = 'Premium Points'; //Identificação do Pontos $config['pagseguro']['produtoValor'] = '100'; //100 = R$ 1,00 - 250 = R$ 2,50 @edit Eu consegui arruma o erro com outro scrip mais so que agora esta indo pra conta do pagseguro errada não esta indo para a minha eu encontrei a onde estava o email desse cara e mudei para o meu e o token mais ainda cotinua indo para a dele @edit Consegui ajeita era o email que eu tava colocando errado.
  9. Bom eu fiz tudo igual a o do tópico de Natanael Beckman:http://www.tibiaking.com/forum/topic/43186-gesior-pagseguro-automático-100-funcional/ mais quando vou compra os pontos pelo sait da um erro de email no formato incorreto auguem poderia me ajudar. Esta ai um print de como fica.
  10. Vlw Cara deu certo! Era apenas excluir o db.executeQuery = db.query muito abrigador mesmo cara 3 dia tentando resolve sor vc mesmo pra conseguir vlw abraços tudo de bom para vc cara.
  11. usei sim ta dando esse do print : No ot fica assim:
  12. Cara ñ Pego Ta ae o 100-compat.lua!!!! --[[ * File containing deprecated functions and constants used by alot of scripts and other engines ]]-- --bit = require("bit") TRUE = true FALSE = false LUA_ERROR = false LUA_NO_ERROR = true LUA_NULL = nil TALKTYPE_CHANNEL_R1 = TALKTYPE_CHANNEL_RN TALKTYPE_CHANNEL_R2 = TALKTYPE_CHANNEL_RA TALKTYPE_ORANGE_1 = TALKTYPE_MONSTER TALKTYPE_ORANGE_2 = TALKTYPE_MONSTER_YELL TEXTCOLOR_BLACK = 0 TEXTCOLOR_BLUE = 5 TEXTCOLOR_GREEN = 18 TEXTCOLOR_TEAL = 35 TEXTCOLOR_LIGHTGREEN = 66 TEXTCOLOR_DARKBROWN = 78 TEXTCOLOR_LIGHTBLUE = 89 TEXTCOLOR_DARKPURPLE = 112 TEXTCOLOR_BROWN = 120 TEXTCOLOR_GREY = 129 TEXTCOLOR_DARKRED = 144 TEXTCOLOR_DARKPINK = 152 TEXTCOLOR_PURPLE = 154 TEXTCOLOR_DARKORANGE = 156 TEXTCOLOR_RED = 180 TEXTCOLOR_PINK = 190 TEXTCOLOR_ORANGE = 192 TEXTCOLOR_DARKYELLOW = 205 TEXTCOLOR_YELLOW = 210 TEXTCOLOR_WHITE = 215 TEXTCOLOR_NONE = 255 CONDITION_PARAM_STAT_MAXHITPOINTS = CONDITION_PARAM_STAT_MAXHEALTH CONDITION_PARAM_STAT_MAXMANAPOINTS = CONDITION_PARAM_STAT_MAXMANA CONDITION_PARAM_STAT_SOULPOINTS = CONDITION_PARAM_STAT_SOUL CONDITION_PARAM_STAT_MAGICPOINTS = CONDITION_PARAM_STAT_MAGICLEVEL CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT = CONDITION_PARAM_STAT_MAXHEALTHPERCENT CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT = CONDITION_PARAM_STAT_MAXMANAPERCENT CONDITION_PARAM_STAT_SOULPOINTSPERCENT = CONDITION_PARAM_STAT_SOULPERCENT CONDITION_PARAM_STAT_MAGICPOINTSPERCENT = CONDITION_PARAM_STAT_MAGICLEVELPERCENT STACKPOS_FIRST_ITEM_ABOVE_GROUNDTILE = 1 STACKPOS_SECOND_ITEM_ABOVE_GROUNDTILE = 2 STACKPOS_THIRD_ITEM_ABOVE_GROUNDTILE = 3 STACKPOS_FOURTH_ITEM_ABOVE_GROUNDTILE = 4 STACKPOS_FIFTH_ITEM_ABOVE_GROUNDTILE = 5 WORLD_TYPE_NO_PVP = 1 WORLD_TYPE_PVP = 2 WORLD_TYPE_PVP_ENFORCED = 3 WORLDTYPE_NO_PVP = 1 WORLDTYPE_PVP = 2 WORLDTYPE_PVP_ENFORCED = 3 CHANNEL_STAFF = 2 CHANNEL_COUNSELOR = 4 CHANNEL_GAMECHAT = 5 CHANNEL_TRADE = 6 CHANNEL_TRADEROOK = 7 CHANNEL_RLCHAT = 8 BANTYPE_IP_BANISHMENT = 1 BANTYPE_NAMELOCK = 2 BANTYPE_BANISHMENT = 3 BANTYPE_NOTATION = 4 BANTYPE_DELETION = 3 SKILLS = SKILL_NAMES table.getPos = table.find doSetCreatureDropLoot = doCreatureSetDropLoot doPlayerSay = doCreatureSay doPlayerAddMana = doCreatureAddMana playerLearnInstantSpell = doPlayerLearnInstantSpell doPlayerRemOutfit = doPlayerRemoveOutfit pay = doPlayerRemoveMoney broadcastMessage = doBroadcastMessage getPlayerName = getCreatureName getCreaturePosition = getThingPosition getPlayerPosition = getCreaturePosition getCreaturePos = getCreaturePosition creatureGetPosition = getCreaturePosition getPlayerMana = getCreatureMana getPlayerMaxMana = getCreatureMaxMana hasCondition = getCreatureCondition isMoveable = isMovable isItemMoveable = isItemMovable saveData = saveServer savePlayers = saveServer getPlayerSkill = getPlayerSkillLevel getPlayerSkullType = getCreatureSkullType getCreatureSkull = getCreatureSkullType getAccountNumberByName = getAccountIdByName getIPByName = getIpByName getPlayersByIP = getPlayersByIp getThingfromPos = getThingFromPos getPlayersByAccountNumber = getPlayersByAccountId getIPByPlayerName = getIpByName getPlayersByIPNumber = getPlayersByIp getAccountNumberByPlayerName = getAccountIdByName convertIntToIP = doConvertIntegerToIp convertIPToInt = doConvertIpToInteger queryTileAddThing = doTileQueryAdd getTileHouseInfo = getHouseFromPos executeRaid = doExecuteRaid saveServer = doSaveServer cleanHouse = doCleanHouse cleanMap = doCleanMap shutdown = doShutdown mayNotMove = doCreatureSetNoMove doPlayerSetNoMove = doCreatureSetNoMove getPlayerNoMove = getCreatureNoMove getConfigInfo = getConfigValue doPlayerAddExp = doPlayerAddExperience isInArea = isInRange doPlayerSetSkillRate = doPlayerSetRate getCreatureLookDir = getCreatureLookDirection getPlayerLookDir = getCreatureLookDirection getPlayerLookDirection = getCreatureLookDirection doCreatureSetLookDir = doCreatureSetLookDirection getPlayerLookPos = getCreatureLookPosition setPlayerStamina = doPlayerSetStamina setPlayerPromotionLevel = doPlayerSetPromotionLevel setPlayerGroupId = doPlayerSetGroupId setPlayerPartner = doPlayerSetPartner doPlayerSetStorageValue = doCreatureSetStorage setPlayerStorageValue = doPlayerSetStorageValue getPlayerStorageValue = getCreatureStorage getGlobalStorageValue = getStorage setGlobalStorageValue = doSetStorage setPlayerBalance = doPlayerSetBalance doAddMapMark = doPlayerAddMapMark doSendTutorial = doPlayerSendTutorial getWaypointsList = getWaypointList getPlayerLastLoginSaved = getPlayerLastLogin getThingPos = getThingPosition doAreaCombatHealth = doCombatAreaHealth doAreaCombatMana = doCombatAreaMana doAreaCombatCondition = doCombatAreaCondition doAreaCombatDispel = doCombatAreaDispel getItemDescriptionsById = getItemInfo hasProperty = hasItemProperty hasClient = hasPlayerClient print = std.cout getPosByDir = getPositionByDirection db.updateQueryLimitOperator = db.updateLimiter db.stringComparisonOperator = db.stringComparer db.stringComparison = db.stringComparer db.executeQuery = db.query isNumber = isNumeric PlayerFlag_CannotUseCombat = 0 PlayerFlag_CannotAttackPlayer = 1 PlayerFlag_CannotAttackMonster = 2 PlayerFlag_CannotBeAttacked = 3 PlayerFlag_CanConvinceAll = 4 PlayerFlag_CanSummonAll = 5 PlayerFlag_CanIllusionAll = 6 PlayerFlag_CanSenseInvisibility = 7 PlayerFlag_IgnoredByMonsters = 8 PlayerFlag_NotGainInFight = 9 PlayerFlag_HasInfiniteMana = 10 PlayerFlag_HasInfiniteSoul = 11 PlayerFlag_HasNoExhaustion = 12 PlayerFlag_CannotUseSpells = 13 PlayerFlag_CannotPickupItem = 14 PlayerFlag_CanAlwaysLogin = 15 PlayerFlag_CanBroadcast = 16 PlayerFlag_CanEditHouses = 17 PlayerFlag_CannotBeBanned = 18 PlayerFlag_CannotBePushed = 19 PlayerFlag_HasInfiniteCapacity = 20 PlayerFlag_CanPushAllCreatures = 21 PlayerFlag_CanTalkRedPrivate = 22 PlayerFlag_CanTalkRedChannel = 23 PlayerFlag_TalkOrangeHelpChannel = 24 PlayerFlag_NotGainExperience = 25 PlayerFlag_NotGainMana = 26 PlayerFlag_NotGainHealth = 27 PlayerFlag_NotGainSkill = 28 PlayerFlag_SetMaxSpeed = 29 PlayerFlag_SpecialVIP = 30 PlayerFlag_NotGenerateLoot = 31 PlayerFlag_CanTalkRedChannelAnonymous = 32 PlayerFlag_IgnoreProtectionZone = 33 PlayerFlag_IgnoreSpellCheck = 34 PlayerFlag_IgnoreWeaponCheck = 35 PlayerFlag_CannotBeMuted = 36 PlayerFlag_IsAlwaysPremium = 37 PlayerFlag_CanAnswerRuleViolations = 38 PlayerFlag_39 = 39 -- ignore PlayerFlag_ShowGroupNameInsteadOfVocation = 40 PlayerFlag_HasInfiniteStamina = 41 PlayerFlag_CannotMoveItems = 42 PlayerFlag_CannotMoveCreatures = 43 PlayerFlag_CanReportBugs = 44 PlayerFlag_45 = 45 -- ignore PlayerFlag_CannotBeSeen = 46 PlayerFlag_HideHealth = 47 PlayerCustomFlag_AllowIdle = 0 PlayerCustomFlag_CanSeePosition = 1 PlayerCustomFlag_CanSeeItemDetails = 2 PlayerCustomFlag_CanSeeCreatureDetails = 3 PlayerCustomFlag_NotSearchable = 4 PlayerCustomFlag_GamemasterPrivileges = 5 PlayerCustomFlag_CanThrowAnywhere = 6 PlayerCustomFlag_CanPushAllItems = 7 PlayerCustomFlag_CanMoveAnywhere = 8 PlayerCustomFlag_CanMoveFromFar = 9 PlayerCustomFlag_CanLoginMultipleCharacters = 10 PlayerCustomFlag_HasFullLight = 11 PlayerCustomFlag_CanLogoutAnytime = 12 PlayerCustomFlag_HideLevel = 13 PlayerCustomFlag_IsProtected = 14 PlayerCustomFlag_IsImmune = 15 PlayerCustomFlag_NotGainSkull = 16 PlayerCustomFlag_NotGainUnjustified = 17 PlayerCustomFlag_IgnorePacification = 18 PlayerCustomFlag_IgnoreLoginDelay = 19 PlayerCustomFlag_CanStairhop = 20 PlayerCustomFlag_CanTurnhop = 21 PlayerCustomFlag_IgnoreHouseRent = 22
  13. Eu tentei esse outro que você mando da o erro mais o item n chega.
  14. Esse script que Você mando o item não chega na conta. @EDIT Eu ja tenho essa table criada na minha database:z_ots_comunication
  15. Não resolveu erro ainda continua.

Informação Importante

Confirmação de Termo