SHADOWBREACK

veja se ajuda é tfs 0.3.6 deve funcionar

tenta essa ai essa funciona 
 
function onThink(interval, lastExecution, thinkInterval)   local result = db.getResult("SELECT * FROM shop_history WHERE `processed` = 0;")   if(result:getID() ~= -1) then while(true) do cid = getCreatureByName(tostring(result:getDataString("player"))) product = tonumber(result:getDataInt("product")) itemr = db.getResult("SELECT * FROM shop_offer WHERE `id` = "..product..";") if isPlayer(cid) then local id = tonumber(itemr:getDataInt("item")) local tid = tonumber(result:getDataInt("id")) local count = tonumber(itemr:getDataInt("count")) local tipe = tonumber(itemr:getDataInt("type")) local productn = tostring(itemr:getDataString("name")) if isInArray({5,8},tipe) then if getPlayerFreeCap(cid) >= getItemWeightById(id, count) then if isContainer(getPlayerSlotItem(cid, 3).uid) then received = doAddContainerItem(getPlayerSlotItem(cid, 3).uid, id,count) if received then doPlayerSendTextMessage(cid,19, "Você recebeu >> "..productn.." << da nossa loja") db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";") else doPlayerSendTextMessage(cid,19, "Desculpe, você não tem espaço suficiente no recipiente para receber >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Desculpe, você não tem um recipiente para receber >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Desculpe, você não tem capacidade suficiente para receber >> "..productn.." << (You need: "..getItemWeightById(id, count).." Capacity)") end elseif isInArray({6,7},tipe) then if tipe == 6 then bcap = 8 bid = 1987 elseif tipe == 7 then bcap = 20 bid = 1988 end if isItemRune(id) then count = 1 end if getPlayerFreeCap(cid) >= (getItemWeightById(1987, 1) + getItemWeightById(id,count * bcap)) then local bag = doCreateItemEx(bid, 1) for i = 1,bcap do doAddContainerItem(bag, id, count) end received = doPlayerAddItemEx(getPlayerSlotItem(cid, 3).uid, bag) if received == RETURNVALUE_NOERROR then doPlayerSendTextMessage(cid,19, "Você recebeu >> "..productn.." << da nossa loja") db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";") else doPlayerSendTextMessage(cid,19, "Desculpe, você não tem espaço suficiente para receber >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Desculpe, você não tem capacidade suficiente para receber >> "..productn.." << (You need: "..getItemWeightById(id, count).." Capacity)") end end end itemr:free() if not(result:next()) then break end end result:free() end return true end
se conseguir da um rep ai

Vá em config.lua e procure por:
stairhopDelay e deixe-o no valor 0:
stairhopDelay = 0

ai vei e com qual raça socer,paladin,druid ou kina?
 
se for paladin
 
vai em weapons.xml nas muniçoes de paladin e add: swing="true" ficando assim + ou -
 
<distance id="3965" level="20" swing="true" event="function" value="default"/> <!-- Hunting Spear --> <distance id="7378" level="25" swing="true" event="function" value="default"/> <!-- Royal Spear --> <distance id="7367" level="42" swing="true" event="function" value="default"/> <!-- Enchanted Spear --> <distance id="7368" level="80" swing="true" event="function" value="default"/> <!-- Assassin Star --> <distance id="7364" level="20" swing="true" event="function" value="default"/> <!-- Sniper Arrow --> <distance id="7365" level="40" swing="true" event="function" value="default"/> <!-- Onyx Arrow --> <distance id="7363" level="30" swing="true" event="function" value="default"/> <!-- Piercing Bolt --> <distance id="2547" level="55" swing="true" event="function" value="default"/> <!-- Power Bolt --> <distance id="6529" level="70" swing="true" event="function" value="default"/> <!-- Infernal Bolt -->     se te ajudei mi ajuda minda um like

Vá no arquivo config_and_functions e depois de:
session_start();   Coloque: date_default_timezone_set("America/Sao_Paulo");

Testado e funcionando ambos agora :
 
EffectPos.lua
level = 300; -- LEVEL function effectPos(cid) local config = { effect = 2; -- EFFEITO } local tidpos = getCreaturePos(cid); local tableeffect = { [1] = {x=tidpos.x-1, y=tidpos.y-1, z=tidpos.z}; [2] = {x=tidpos.x, y=tidpos.y-1, z=tidpos.z}; [3] = {x=tidpos.x+1, y=tidpos.y-1, z=tidpos.z}; [4] = {x=tidpos.x+1, y=tidpos.y, z=tidpos.z}; [5] = {x=tidpos.x+1, y=tidpos.y+1, z=tidpos.z}; [6] = {x=tidpos.x, y=tidpos.y+1, z=tidpos.z}; [7] = {x=tidpos.x-1, y=tidpos.y+1, z=tidpos.z}; [8] = {x=tidpos.x-1, y=tidpos.y, z=tidpos.z}; } for x = 1, 8 do if not isPlayerPzLocked(cid) then addEvent(doSendMagicEffect, x * 2000, tableeffect[x], config.effect); addEvent(function () if isPlayer(cid) then effectPos(cid); end end , 1000); end end return 1; end function onAdvance(cid, skill, oldLevel, newLevel) skill = SKILL_LEVEL; if skill == level then effectPos(cid); doPlayerSendTextMessage(cid, 19, "Congratulations !!"); doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FIREWORK_YELLOW); end return 1; end function onLogin(cid) if getPlayerLevel(cid) >= level then effectPos(cid); end return 1; end EffectText.lua
local config = { ["1-5"] = 120; -- [VOCATION] = CORES; ["2-6"] = 130; ["3-7"] = 140; ["4-8"] = 150; } function effectText(cid) local texts = "´ . ,"; for vocations, color in pairs(config) do local v = vocations:explode("-"); if getPlayerVocation(cid) == (tonumber(v[1]) or tonumber(v[2])) then eff = color break end end if eff then doSendAnimatedText(getThingPos(cid), texts, eff); addEvent(function() if isPlayer(cid) then effectText(cid) end end, 800); end return 1; end function onLogin(cid) effectText(cid) return 1; end

EffectPos.lua
level = 300; -- LEVEL function effectPos(cid) local config = { tidpos = getCreaturePos(cid); effect = xxxx; -- EFFEITO } local tableeffect = { [1] = {x=tidpos.x-1, y=tidpos.y-1, z=tidpos.z}; [2] = {x=tidpos.x, y=tidpos.y-1, z=tidpos.z}; [3] = {x=tidpos.x+1, y=tidpos.y-1, z=tidpos.z}; [4] = {x=tidpos.x+1, y=tidpos.y, z=tidpos.z}; [5] = {x=tidpos.x+1, y=tidpos.y+1, z=tidpos.z}; [6] = {x=tidpos.x, y=tidpos.y+1, z=tidpos.z}; [7] = {x=tidpos.x-1, y=tidpos.y+1, z=tidpos.z}; [8] = {x=tidpos.x-1, y=tidpos.y, z=tidpos.z}; } for x = 1, 8 do addEvent(function () if isCreature(cid) and not getTileInfo(getThingPos(cid)).protection then doSendMagicEffect(tableeffect[x], config.effect); end end , 1000) end return 1; end function onAdvance(cid, skill, oldLevel, newLevel) skill = SKILL_LEVEL; if skill == level then effectPos(cid); doPlayerSendTextMessage(cid, 19, "Congratulations !!"); doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FIREWORK_YELLOW); end return 1; end function onLogin(cid) if getPlayerLevel(cid) >= level then effectPos(cid); end return 1; end Tag :
<event type="login" name="EffectPos" event="script" value="EffectPos.lua"/> <event type="advance" name="EffectPos" event="script" value="EffectPos.lua"/> Ps : registrar EffectPos em login.lua antes do ultimo return true
 
 
 
 
 
EffectText.lua
local config = { ["1-5"] = 120; -- [VOCATION] = CORES; ["2-6"] = 130; ["3-7"] = 140; ["4-8"] = 150; } function effectText(cid) local texts = "´ . ,"; for vocations, color in pairs(config) do local v = vocations:explode("-"); if getPlayerVocation(cid) == (tonumber(v[1]) or tonumber(v[2])) then eff = doSendAnimatedText(getThingPos(cid), texts, color); break end end if isPlayer(cid) then eff() addEvent(function() if isPlayer(cid) then effectText(cid); end end, 600) end return 1; end function onLogin(cid) effectText(cid) return 1; end Tag :
<event type="login" name="EffectText" event="script" value="EffectText.lua"/> Como é CALLBACK onLogin não precisa registrar...
 
 
 
 
 
Config do EffectPos.lua :
 
não sei o numero do effect que tu quer então deixei pra tu colocar :
local config = { tidpos = getCreaturePos(cid); effect = xxxx; -- EFFEITO } e o level :
level = 300; -- LEVEL Config do EffectText.lua :
 
como eu não sabia os id da cor deixei pra tu colocar hahaha
local config = { ["1-5"] = 120; -- [VOCATION] = CORES; ["2-6"] = 130; ["3-7"] = 140; ["4-8"] = 150; } não faço a miníma ideia de que cor são esses números .-.
 
 
Abrçs

Segui com forme o pedido Elf Yalahar.
qualquer coisa manda PM que eu arrumo ele.

Elf Yala.xml

Clica no gostei + reputação