gahenna

HTTP://BAIAK-SPECIAL.SERVEGAME.COM
 
Rates:
Exp inicial: 500x
Skills: 5x
Ml: 3x
Loot: 10x
 
 •      Servidor br low ping
 •     Munições/runas infinitas
•     Fast-attack
 •     Exp/rates elevadas
 •     Vocações balanceadas
 •     Itens e criaturas atualizados da versão 13.20
 •     Diversos sistemas novos
 •     Mapa com + de 1 ano de desenvolvimento
 •     Task item upgrade
 •     Diversos castelos para dominar
 •     Montarias
 •     War system, war private
 •     Eventos automaticos: zumbi, battlefield, resta um..
 •     Servidor sem bugs
 •     Staff presente e com experiência
 •    +100 tps de hunts
 •    + de 35 quests
 •    + de 200 outfits
 •    + de 1500 criaturas
 
Venha se divertir no Baiak-Special!

ja arrumei, na source, Quem tiver o mesmo problema, só me mandar PM. 

Só seguir os passos padrão.

Tente baixar.
Link : http://www.tibiaking.com/forum/topic/27798-new-gesior-a-evolu%C3%A7%C3%A3o/ Creditos: LuanLuciano93

@gahenna, http://www.4shared.com/rar/wMHcqwlGce/WEBSITE_VictorWEBMaster_008.html?

config.php adiciona isso aq:

$config['site']['access_tickers'] = 3;

pode deixa se achar solução eu te envio sim, aliás pra isso serve os forum pra ajudarmos uns aos outros.
 
Solução:
 
vá em CONFIG.LUA e coloque assim.
Se tiver TRUE altere pra FALSE.

ingameGuildManagement = false
 
 
Resolvido

Não sei, pq a quantidade q a pot heala é um animated text tbm, dai acho q n da pra aparecer os dois de uma vez...

Tem que usar essa função:
doSendAnimatedText(fromPosition, "Aaaah...", COLOR_BLUE)

Pra resolver é simples, basta ir até a sua pasta Talkactions, procurar por war.lua, abra este arquivo, apague tudo lá e troque por este! AJUDEI? +REP por favor.
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

Nome: Heal Changing Colors
Versão: 1.0
Testado: TFS 0.3.5 Pl1 e 0.4 (Deve funcionar em todos)
Descrição: Você pode decidir mudar a cor para o que você gostaria de ser mostrado para o texto animado quando você se curar.
 
 
Vamos la:
 
game.cpp:
Procure na função:


bool Game::combatChangeHealth Por isso:
addAnimatedText(list, targetPos, TEXTCOLOR_GREEN, buffer);Substitua por:
addAnimatedText(list, targetPos, g_config.getNumber(ConfigManager::HEALTH_HEALING_COLOR), buffer);Procure na função:
bool Game::combatChangeManaPor isso:
addAnimatedText(list, targetPos, TEXTCOLOR_DARKPURPLE, buffer);Substitua por:
addAnimatedText(list, targetPos, g_config.getNumber(ConfigManager::MANA_HEALING_COLOR), buffer); configmanager.cpp:Procure por:


m_confBool[SHOW_HEALING_DAMAGE_MONSTER] = getGlobalBool("showHealingDamageForMonsters", false);Adicione abaixo:
m_confNumber[HEALTH_HEALING_COLOR] = getGlobalNumber("healthHealingColor", TEXTCOLOR_GREEN); m_confNumber[MANA_HEALING_COLOR] = getGlobalNumber("manaHealingColor", TEXTCOLOR_DARKPURPLE); configmanager.h:Procure por:


NAME_REPORT_TYPE,Adicione abaixo:
HEALTH_HEALING_COLOR, MANA_HEALING_COLOR,Save a copile.
config.lua:
Adicione ao config

healthHealingColor = TEXTCOLOR_GREEN manaHealingColor = TEXTCOLOR_DARKPURPLECréditos:Evil Hero - OTLand

Serve pra deixar a senha mais segura

posta a source ai q tiro o salt

Testa ai: https://www.mediafire.com/?2lzv63335uwt5pj

Tem sim... 1 minuto.
 
#Edit:

local storagedodge = 98798644 -- Storage do Dodge function onPrepareDeath(cid, lastHitKiller, mostDamageKiller)     if getPlayerStorageValue(cid, storagedodge) >= 1 then         if (getCreatureSkullType(cid) == 3) or (getCreatureSkullType(cid) == 4) or (getCreatureSkullType(cid) == 5) then             setPlayerStorageValue(cid, storagedodge, (getPlayerStorageValue(cid, storagedodge) - 1))             return true         end     end return true end  
Boa sorte.

Sei sim, foi falha minha.
 
Teste assim:

local storagedodge = 98798644 -- Storage do Dodge function onPrepareDeath(cid, lastHitKiller, mostDamageKiller)     if getPlayerStorageValue(cid, storagedodge) >= 1 then         setPlayerStorageValue(cid, storagedodge, (getPlayerStorageValue(cid, storagedodge) - 1))         return true     end return true end  
Boa sorte.

Mude desse:
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PARAM_AGGRESSIVE) Para esse:
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DROWNDAMAGE)