Nogard

function onAdvance(cid, skill, oldlevel, newlevel) if skill == SKILL__LEVEL then if getCreatureCondition(cid, CONDITION_PACIFIED) then local maxh = getCreatureMaxHealth(cid) local maxm = getCreatureMaxMana(cid) doCreatureAddHealth(cid, maxh) doCreatureAddMana(cid, maxm) end end return true end  

function onEquip(cid, item, slot) local cfg = { [128] = 324, [20] = 12, [33] = 5 } --[[ [10] = 51 [looktype current outfit] = looktype new outfit ]] if getTilePzInfo(getPlayerPosition(cid)) then print('pz') doPlayerSendCancel(cid, "Você não pode equipar esse item no PZ.") return end local p = getCreatureOutfit(cid) local looktype = {lookType = cfg[p.lookType], lookHead = p.lookHead, lookBody = p.lookBody, lookLegs = p.lookLegs, lookFeet = p.lookFeet} if cfg[p.lookType] ~= nil then doSetCreatureOutfit(cid, looktype, -1) end return true end function onDeEquip(cid, item, slot) doRemoveCondition(cid, CONDITION_OUTFIT) return true end  

Se não me engano já tem algo do tipo no fórum, de qualquer forma:
function onUse(cid, item, fromPos, itemEx, toPos) local p = {x = 1, y = 2, z = 3} doTeleportThing(cid, p) return true end

local items = { {2174, 50}, {2174, 50}, {2134, 35}, {2159, 100} } function onStepIn(cid, item, position, fromPosition) if not isPlayer(cid) then return true end for i = 1, #items do if getPlayerItemCount(cid, items[i][1]) < items[i][2] then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "left ".. items[i][2] - getPlayerItemCount(cid, items[i][1]).." "..getItemNameById(items[i][1])..".") doTeleportThing(cid, fromPosition) return true end end for i = 1, #items do doPlayerRemoveItem(cid, items[i][1], items[i][2]) end return true end

http://www.tibiaking.com/forum/topic/9350-86x-tfs-04-dev-rev3884/

Bastaria adicionar os atributos nos itens.
<attribute key="maxhealthpoints" value="35000"/> <attribute key="maxmanapoints" value="35000"/>

http://www.tibiaking.com/forum/topic/44601-correr-poketibia/     Na próxima, use a ferramenta de pesquisa do fórum.

Bom, você mesmo reportou o tópico como resolvido, então adicionarei a tag.
 
Na próxima coloque os códigos em spoiler, se possível.

Abra a pasta do seu servidor, Data/Talkactions/Talkactions.xml, pesquise pelo comando que deseja retirar, basta apagar a linha.
 
Quanto ao pedido: http://www.tibiaking.com/forum/topic/44601-correr-poketibia/?hl=correr
 
 
 
O tópico foi movido para a área correta, preste mais atenção da próxima vez!
Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680

Este tópico foi movido:
De: "OTServ → Downloads → Servidores Derivados"
Para: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

Provavelmente está usando o tom incorreto.
 
 
 

function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerStorageValue(cid, 646432) == 1 then doPlayerSendCancel(cid, 'Você já utilizou o item.') return true end if getPlayerLevel(cid) >= 200 then doPlayerAddExp(cid, 500000, true, true) doPlayerSendTextMessage(cid, 19, "voce ganhou seu bonus.") doSendMagicEffect(getCreaturePosition(cid), 28) doRemoveItem(item.uid,1) setPlayerStorageValue(cid, 646432, 1) else doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE,"Você precisa de level 200 para usar este item.") end return TRUE end

Seria no xml do monster.
<loot> <item id="ItemID do item" countmax="Quantidade máxima que poderá vir" chance="Chance de dropar"/> </loot>

function onSay(cid, words, param) local text = 'Critical System: O sistema consiste em Hitar 50% a mais em seus ataques. Por Exemplo: Com 10 de critical, voce vai hitar 50% de dano de 3 entre 100 ataques desferidos ao seu oponente. Com 100 de critical (o maximo) voce vai hitar 50% de dano de 30 entre 100 ataques desferidos ao oponente. Cada pedra que voce usar, sua skill de critical aumenta em 1 ponto. Podendo no maximo ter 100 pontos. Para obter a pedra voce precisa comprar no Npc Dodge/critical Seller.' doShowTextDialog(cid, 2160, text) return true end

http://www.tibiaking.com/forum/forum/190-tutoriais-pixel-art/

Bom cara, eu caguei um pouco na tipografia, porém quanto mais tentava melhorar, piorava.
Enfim, ta aí.

Provavelmente eles usam um mesmo Action ID.
Abra seu mapa em algum map editor, e procure por algum 'TC' que já houvesse sido adicionado, verifique o Action ID que há nele.

local posi = {x=1329, y=1158, z=7} -- Posicao pra onde vai o player local volta = {x=1095, y=1063, z=7} -- Posicao pra onde o player vai se teleportado caso nao tenha lvl ou seja maior function onStepIn(cid, item, position, lastPosition, fromPosition) if getPlayerLevel(cid) <= 140 then doTeleportThing(cid, posi) doSendMagicEffect(getThingPos(cid), 10) else doPlayerSendTextMessage(cid, 19, "Desculpe apenas níveis (120~140) podem acessar essa área.") doTeleportThing(cid, volta) doSendMagicEffect(getThingPos(cid), 10) end return true end

Bom, assim viria todos os items, mas o resultado do random serviria pra todos:
function onUse(cid, item, fromPosition, itemEx, toPosition) local config = { items = {6541, 6542, 6543, 6544, 6545} } for i = 1, (#config.items) do doPlayerAddItem(cid, config.items(i), math.random(30, 100)) doRemoveItem(item.uid, 1) end return true end  
 
 
 
Assim viria como seu exemplo, um resultado do random pra cada item:
function onUse(cid, item, fromPosition, itemEx, toPosition) local config = { items = {6541, 6542, 6543, 6544, 6545} } doPlayerAddItem(cid, config.items[1], math.random(30, 100)) doPlayerAddItem(cid, config.items[2], math.random(30, 100)) doPlayerAddItem(cid, config.items[3], math.random(30, 100)) doPlayerAddItem(cid, config.items[4], math.random(30, 100)) doPlayerAddItem(cid, config.items[5], math.random(30, 100)) doRemoveItem(item.uid, 1) return true end

Abre seu config.lua, e procura por isso:
 
 

 disableOutfitsForPrivilegedPlayers =    
 
coloque false, e veremos se resolve.

Bom, a quest funcionará através de um Action ID, o qual você adicionará no baú.
São usadas 'Storages' para fazer com quê o player somente pegue a recompensa uma vez, também é usada pra dar 'permissão' á algo.
 
 
 
No caso da quest:
function onUse (cid, item, fromPosition, itemEx, toPosition) if getPlayerStorageValue(cid, Storage que será usada) == 1 then doPlayerSendCancel(cid, 'Você já pegou seu prêmio') else setPlayerStorageValue(cid, Storage que será usada, 1) doPlayerAddItem(cid, 952, 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Você acaba de receber o documento!') end return true end Os 'tiles' irão verificar a storage do player, então ao dar use no document, deve ser setada a storage em questão.
function onUse (cid, item, fromPosition, itemEx, toPosition) if getPlayerStorageValue(cid, Storage que os tiles irão verificar) == 1 then doPlayerSendCancel(cid, 'Você já tem acesso full.') else setPlayerStorageValue(cid, Storage que os tiles irão verificar, 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Parabéns, você recebeu acesso full!') doRemoveItem(item.uid, 1) end return true end

function onSay(cid, words, param) local femaleOutfits = { ["citizen"]={136}, ["hunter"]={137}, ["mage"]={138}, ["knight"]={139}, ["nobleman"]={140}, ["summoner"]={141}, ["warrior"]={142}, ["barbarian"]={147}, ["druid"]={148}, ["wizard"]={149}, ["oriental"]={150}, ["pirate"]={155}, ["assassin"]={156}, ["beggar"]={157}, ["shaman"]={158}, ["norsewoman"]={252}, ["nightmare"]={269}, ["jester"]={270}, ["brotherhood"]={279}, ["demonhunter"]={288}, ["yalaharian"]={324} } local maleOutfits = { ["citizen"]={128}, ["hunter"]={129}, ["mage"]={130}, ["knight"]={131}, ["nobleman"]={132},["summoner"]={133}, ["warrior"]={134}, ["barbarian"]={143}, ["druid"]={144}, ["wizard"]={145}, ["oriental"]={146}, ["pirate"]={151}, ["assassin"]={152}, ["beggar"]={153}, ["shaman"]={154}, ["norsewoman"]={251}, ["nightmare"]={268}, ["jester"]={273}, ["brotherhood"]={278}, ["demonhunter"]={289}, ["yalaharian"]={325} } local msg = {"Digite o nome correto!", "Voce não possui Addon Doll!", "Bad param!", "Você recebeu seu addons!"} local param = string.lower(param) if(getPlayerItemCount(cid, 2112) > 0) then if(param ~= "" and maleOutfits[param] and femaleOutfits[param]) then doPlayerRemoveItem(cid, 2112, 1) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[4]) doSendMagicEffect(getCreaturePosition(cid), CONST_ME_GIFT_WRAPS) if(getPlayerSex(cid) == 0)then doPlayerAddOutfit(cid, femaleOutfits[param][1], 3) else doPlayerAddOutfit(cid, maleOutfits[param][1], 3) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[1]) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, msg[2]) end end

Abra o arquivo config.lua, de Ctrl+F e procure por :
newPlayerLevel =

function onStepIn(cid, item, pos, frompos) if getPlayerGroupId(cid) < 3 then doTeleportThing(cid, frompos) doPlayerSendCancel(cid, 'You dont have acess') doSendMagicEffect(frompos, CONST_ME_POFF) end return true end no outro, substitua a condição por essa:
if getPlayerPremiumDays(cid) < 1 then