Luucas017

local combat = createCombatObject()
local area = createCombatArea(AREA_CROSS5X5)
setCombatArea(combat, area)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)
local condition = createConditionObject(CONDITION_REGENERATION)
setConditionParam(condition, CONDITION_PARAM_SUBID, 1)
setConditionParam(condition, CONDITION_PARAM_BUFF, true)
setConditionParam(condition, CONDITION_PARAM_TICKS, 2 * 60 * 1000)
setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, 20)
setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 2000)
local baseMana = 120
function onCastSpell(cid, var)
    local pos = getCreaturePosition(cid)
    local membersList = getPartyMembers(cid)
    if(membersList == nil or type(membersList) ~= 'table' or table.maxn(membersList) <= 1) then
        doPlayerSendDefaultCancel(cid, RETURNVALUE_NOPARTYMEMBERSINRANGE)
        doSendMagicEffect(pos, CONST_ME_POFF)
        return false
    end
    local affectedList = {}
    for _, pid in ipairs(membersList) do
        if(getDistanceBetween(getCreaturePosition(pid), pos) <= 36) then
            table.insert(affectedList, pid)
        end
    end
    local tmp = table.maxn(affectedList)
    if(tmp <= 1) then
        doPlayerSendDefaultCancel(cid, RETURNVALUE_NOPARTYMEMBERSINRANGE)
        doSendMagicEffect(pos, CONST_ME_POFF)
        return false
    end
    local mana = math.ceil((0.9 ^ (tmp - 1) * baseMana) * tmp)
    if(getCreatureMana(cid) < mana) then
        doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTENOUGHMANA)
        doSendMagicEffect(pos, CONST_ME_POFF)
        return false
    end
    if(not doCombat(cid, combat, var)) then
        doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTPOSSIBLE)
        doSendMagicEffect(pos, CONST_ME_POFF)
        return false
    end
    doCreatureAddMana(cid, -(mana - baseMana), false)
    doPlayerAddSpentMana(cid, (mana - baseMana))
    for _, pid in ipairs(affectedList) do
        doAddCondition(pid, condition)
    end
    return true
end
 

Funcionou !! Rep+

Tente esse aqui.
 
function onSay(cid, words, param, channel) if(param == '') then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.") return true end local t = string.explode(param, ",") local ret = RETURNVALUE_NOERROR local pos = getCreaturePosition(cid) local id = tonumber(t[1]) if(not id) then errors(false) id = getItemIdByName(t[1]) errors(true) if(not id) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Item with such name does not exists.") return true end end local amount = 100 if(t[2]) then amount = t[2] end local item = doCreateItemEx(id, amount) if(t[3] and getBooleanFromString(t[3])) then if(t[4] and getBooleanFromString(t[4])) then pos = getCreatureLookPosition(cid) end ret = doTileAddItemEx(pos, item) else ret = doPlayerAddItemEx(cid, item, true) end if(ret ~= RETURNVALUE_NOERROR) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Couldn't add item: " .. t[1]) return true end doDecayItem(item) if(not isPlayerGhost(cid)) then doSendMagicEffect(pos, CONST_ME_MAGIC_RED) end return true end  
 
 
 

Me chama discord Black Rival#5512 e irei verificar e te ajudar.

Salve TIBIA KING!
Hoje trago pra vocês um sistema de skin.
Como funciona? ao clicar em um certo item, ele ganhará uma skin.
------------------------------------------------------
vou explicar direitinho tudo. espero que entenda. se não, comente ai que eu poderei da suporte.
Então vamos lá.
 

Em actions/scripts
Crie um arquvio chamado skin.lua -- ou o nome da skin/personagem.
Depois abra, e copie e cole isso aqui dentro da pasta
function onUse(cid, item, fromPosition, itemEx, toPosition)     if item.itemid == 7379 and (getPlayerStorageValue(cid, 8002) == EMPTY_STORAGE) then         doPlayerAddOutfitId(cid, 44, 3)         setPlayerStorageValue(cid, 8002, 1)         doSendMagicEffect(getCreaturePosition(cid), CONST_ME_HOLYDAMAGE)         doPlayerSendTextMessage(cid,22,"Parabéns, você recebeu a Outfit!")         doRemoveItem(item.uid, 1)     else         doPlayerSendCancel(cid,"Você já recebeu essa roupa!")     end end em item.itemid == 7379 mude para o id para o seu item. 
Em (getPlayerStorageValue(cid, 8002) -- mude de acordo se você for colocar mais SKINS. tipo tá 8002 ali, coloque 8003 8004 e por ai vai.
    mude também no setPlayerStorageValue(cid, 8002, 1) -- mude para outras skin também!
 
Feito isso, depois vá em actions.xml e adicione isso lá.
<action itemid="13646" script="skin.lua"/> Mude a id do item.
Depois de ter feito tudo isso, vamos agora em pasta do servidor/data/XML/outfit.xml
 abra ele e adicione isso aqui lá:   
<outfit id="44" premium="no" default="0">         <list gender="0-3" lookType="1250" name="NOME DA SKIN"/>     </outfit>     Antes disse. der espaço entrem o <outfits> e </outfits> e cole dentro!
    Mude o looktype para a roupa/skin que você deseja colocar para o personagem ganhar.
    outfit id="44" > Mude aqui. para 1. 2 3 4 5 6, vai até aonde tu achar bom.
    em List gender="0-3" mude para 0-1 ou para o que você quiser.

Pronto, feito tudo ISSO é sucesso meu bom. se eu errei algo, perdão ?
 
 
Créditos pelo esse sistema: DBOHP Eu (por postar.)

Você abriu uma string com um parametro que não era boolean e terminou com boolean. mas ja que resolveu, tudo certo.

você adicionou algo no servidor?
 
algo recente sei lá...?

@ITALOx Auto loot man , ja removi mais o erro continua 
Resolvido Troquei meu Global Events Obg