So volto tarde

-- Creditos: Breno Neves (KotZletY) = Criador do Script! function onStepIn(cid, item, position, fromPosition) if (not isPlayer(cid)) then return true end if getPlayerPremiumDays(cid) >= 1 then doSendMagicEffect(getThingPos(cid), 12) doPlayerSendTextMessage(cid, 25, "Seja Bem-vindo ".. getPlayerName(cid) .." !") else doTeleportThing(cid, fromPosition, true) doSendMagicEffect(getThingPos(cid), 2) doPlayerSendTextMessage(cid, 25, "Apenas Players Vip's podem passa.") end return true end  

tenta mudar teu action pra esse:
 
 
na verdade, em lua, é possível instanciar as funções através das locais, e os paramêtros só são passados quando vc chama a função instanciada, como por exemplo:
 
local rem = doRemoveCreature rem(cid)  

tenta verificar se não é uma simples situação de case sensitive, coloca "Shiny chsrmander " na tabela e tenta vender o pokemon também com a primeira letra da segunda palavra em minúsculo 

só um adendo, a chance de ganho está 100%, e a quantidade de itens, está fixa em 1, enfim:
 
function onUse(cid, item, fromPosition, itemEx, toPosition)   local chance = math.random(1, 1) if chance == 1 then   local count = math.random(1,1)   doPlayerAddItem(cid, 11296, count)   doRemoveItem(item.uid, 1)   doSendMagicEffect(getCreaturePosition(cid), CONST_ME_STUN) doPlayerSendTextMessage(cid, 19, "Voce ganhou "..count.." "..getItemNameById(11296)..".") end return true end  

local msg = { ["Sunday"] = { --segunda ['20:20'] = {text = 'Evento Up Aberto No Segundo Andar Do Temple', type = 21}, }, ["Tuesday"] = { --terça ['20:25'] = {text = 'Evento Up Aberto No Segundo Andar Do Temple', type = 21}, }, ["Thursday"] = { --quinta ['20:30'] = {text = 'Evento Up Aberto No Segundo Andar Do Temple', type = 21}, }, ["Saturday"] = { --sexta ['20:35'] = {text = 'Evento Up Aberto No Segundo Andar Do Temple', type = 21}, }, } function onThink(interval, lastExecution) local day = os.date("%A") local hours = os.date('%X'):sub(1, 5) if (msg[day][hours]) then local tab_val = msg[day][hours] return tab_val and doBroadcastMessage(tab_val.text, tab_val.type) or true end end  

executa no seu banco de dados:
 
CREATE TABLE monster_boost (
monster TEXT PRIMARY KEY,
loot INTEGER,
exp INTEGER
);

lembrando que esse erro pode voltar mais tarde, e, que se você for trocar para mysql, a sintaxe dessa query também terá de ser trocada

nessa parte abaixo, você pode reparar que ele está puxando a posição x do player e logo após, adicionando mais 1:
 
doSendMagicEffect({x=getCreaturePosition(cid).x+1, y=getCreaturePosition(cid).y, z=getCreaturePosition(cid).z, stackpos=255}, 267) você pode muito bem alterar esses valores para definir onde a sprite vai ser desenhada, podendo negativar ou aumentar este valor, como por exemplo:
{x = getCreaturePosition(cid).x + 10, y = getCreaturePosition(cid),y - 3, z = getCreaturePosition(cid).z}

se nao me engano, as contas criadas são cópias do account manager, então se você passar a cap do próprio account manager pra 0/1, creio que os novos players também serão criados com esta cap

na minha citacao tem instruções do que fazer, o problema nao e no xml, se você apenas abrir o google tradutor vai saber do que se trata o erro
basta voce identificar onde está o erro (ja te ajudei com isso) para que a comunidade possa ajudar

no monstro não adicionei nada sobre efeitos, no código você pode encontrar uma tabela "local effects", altere o "CONST_ME_POFF" para o efeito que quiser, ou, caso queira, pode deletar a tabela e alterar nas próprias linhas (17 e 18), ficando "doSendMagicEffect(getThingPos(cid), 11)". sendo 11 o id do effect
//na real, vamos alterar, altere as linhas 17 e 18 para:
 
ficando:
 
 

voce também pode capturar os npcs no evento "onTarget", como no exemplo abaixo:
 
sendo assim, apenas alterando o escopo do código, fazemos seu pedido acontecer, gif:
código:
 
function onTarget(cid, target) if (isPlayer(cid) and isNpc(target) and getCreatureName(target) == "Alice") then doSendMagicEffect(getThingPos(target), CONST_ME_MAGIC_BLUE) doRemoveCreature(target) doPlayerAddItem(cid, 6570, 1) end return true end basta registrar no login.lua e creaturescripts
 
servidor de testes:
protocolo 8.60
tfs 0.3.6

bacana, agora que vi, parece estar faltando o arquivo "zaiko.lua" no diretório que mencionei acima, mas mesmo assim, creio que nao seja algo que chegue ao ponto de não conseguir abrir o servidor

//solução:
 
local SKILL_NAME = "Lava Plume" local SKILL_AREAS = { createCombatArea(AREA_CROSS6X6) } local combats = {} for i, skillArea in ipairs(SKILL_AREAS) do combats[i] = createCombatObject() onTargetCreature_LavaPlume = function(cid, target) doSkillDamage(cid, target, SKILL_NAME) if (not isCreature(target)) then return end -- Defeated if (not doPokemonSpecialAbilityCheck(target, POKEMON_SPECIAL_ABILITY_IDS.SHIELD_DUST, nil) and getRandom(0, 100) <= (doPokemonSpecialAbilityCheck(cid, POKEMON_SPECIAL_ABILITY_IDS.SERENA_GRACE, nil) and 60 or 30)) then doCreatureAddStatus(target, CREATURE_STATUS_BURN, getMonsterLevel(cid), cid) end end setCombatCallback(combats[i], CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature_LavaPlume") setCombatArea(combats[i], skillArea) end local function doSpell(cid, combat, var) if (isCreature(cid)) then doCombat(cid, combat, var) end end local function fallProjectile(cid, pos) if not isCreature(cid) then return true end local apos = pos local frompos = {x=apos.x-7,y=apos.y-6,z=apos.z} doSendDistanceShoot(frompos, pos, 7) end local function sendEff(cid, pos) if not isCreature(cid) then return true end local apos = pos doSendMagicEffect(apos, CONST_ME_ICEATTACK) end function onCastSpell(cid, var) local t = {} local posic = getThingPos(cid) for x = -6, 6 do for y = -7, 8 do local posi = {x = posic.x + x, y = posic.y-5 + y, z = posic.z, stackpos = 0} table.insert(t, posi) end end for v = 1, #t do if (#t >= 1) then local random = math.random(1, #t) addEvent(fallProjectile, v * 12, cid, t[random]) addEvent(sendEff, v * 14, cid, t[random]) end end for i, combat in ipairs(combats) do addEvent(doSpell, 500 * (i - 1) + 1, cid, combat, var) end return true end  

dá pra alterar, abra o arquivo "items.xml" no diretório serverpack/data/items
após isso, procure o item desejado, vou usar o dead troll como exemplo, segue:
 
<item id="2806" article="a" name="dead troll"> <attribute key="weight" value="60000" /> <attribute key="containerSize" value="10" /> <attribute key="decayTo" value="2810" /> <attribute key="duration" value="600" /> <attribute key="corpseType" value="blood" /> <attribute key="fluidSource" value="blood" /> </item> na primeira linha, declaramos o id e o nome do item
na segunda, declaramos que o peso do item será de 60000
na terceira, que é onde te interessa, declaramos que o container terá 10 espaços, para alterar, basta trocar de 10 para a quantidade desejada, ficando:
<attribute key="containerSize" value="valor desejado" />

local lvl = 1 local stor_time = 68741 local hours = 24 local t = { {Pos = {{x=906, y=625, z=5},{x=917, y=586, z=7}}}, -- TANK OR DRUNK {Pos = {{x=907, y=625, z=5},{x=916, y=587, z=7}}}, -- TANK OR DRUNK {Pos = {{x=908, y=624, z=5},{x=915, y=588, z=7}}}, -- TANK OR DRUNK {Pos = {{x=908, y=623, z=5},{x=915, y=576, z=7}}}, -- TANK OR DRUNK {Pos = {{x=907, y=622, z=5},{x=914, y=575, z=7}}}, -- TANK OR DRUNK {Pos = {{x=906, y=622, z=5},{x=913, y=574, z=7}}} -- TANK OR DRUNK } function onUse(cid, item, fromPosition, itemEx, toPosition) local check = {} for _, k in ipairs(t) do local x = getTopCreature(k.Pos[1]).uid if x == 0 or not isPlayer(x) or getPlayerLevel(x) < lvl or getPlayerStorageValue(x, stor_time) - os.time() > 0 then doPlayerSendCancel(cid, 'Está faltando player, alguém não possui level '..lvl..' , não está transformado no maximo ou você já fez a quest em menos de 24 horas.') return true end table.insert(check, x) end for k, tid in ipairs(check) do doSendMagicEffect(getCreaturePosition(tid), CONST_ME_POFF) if tid ~= sort then doTeleportThing(tid, t[k].Pos[2]) end doSendMagicEffect(getCreaturePosition(tid), CONST_ME_TELEPORT) setPlayerStorageValue(tid, stor_time, os.time()+hours*1440) end return true end  

Se dessa vez não der, vou baixar um ats e testar até encontrar a solução para evitar o spam aqui, tenta ai.