Qz.Diablos

Olá bom Dia
 
Criei um monstro  ela da tipo "exevo mas dead" ou seja (mortarea) ele quando executa esse areaeffect ele acaba afetando os monstros iguais a ele queria deixar ele não toem dano com death!
 
 
A script é essa
 

-- My Fat Doll improvisando nos otserver ;~-- Fishing v 1.0 05/04/2013 function onUse(cid, item, fromPosition, itemEx, toPosition) --Config-- local Bait = 3976 -- ID da isca local needBait = TRUE -- Precisa de isca? TRUE/FALSE local FishRate = 1.0 -- Rate de fish local time = 1 -- Tempo pra pescar denovo (em segundos) local NeedLevel = 50000 -- Level pra pescar local fishable = {"Danger blood crab", "Danger massive water elemental", "Danger quara constrictor scout", "Danger quara constrictor", "Danger quara hydromancer scout", "Danger quara hydromancer", "Danger quara mantassin scout", "Danger quara mantassin", "Danger quara pincher scout", "Danger quara pincher", "Danger quara predator scout", "DDanger quara predator", "Danger ice", "Danger water elemental", "Danger quara squicher"} --Pescados local message1 = " você precisa "..getItemNameById(Bait).."de minhocas para pescar!" -- Mensagem se não tiver iscas! local message2 = "Você deve esperar alguns segundos!"  --Mensagem se tiver pescando muito rapido local message3 = "Você não pode pescar no protection zone!" local message4 = "Você precisa ter level "..NeedLevel.." para pescar!"  --Mensagem se não tiver level --Config End-- -- Não mecha -- local storage = 5560 local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625} if (getPlayerLevel(cid) >= NeedLevel) then if not getTilePzInfo(getCreaturePosition(cid)) then if needBait == TRUE then if getPlayerItemCount(cid, Bait) > 0 then if exhaustion.get(cid, storage) == FALSE then exhaustion.set(cid, storage, time) doPlayerAddSkillTry(cid, SKILL_FISHING, 1) if isInArray(waterIds, itemEx.itemid) == TRUE then doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) if itemEx.itemid ~= 493 then if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= (getPlayerSkill(cid, SKILL_FISHING)*FishRate) then doPlayerRemoveItem(cid, Bait, 1) doCreateMonster(fishable[math.random(#fishable)], getPlayerPosition(cid)) end end end return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message2) end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message1) end return FALSE end if needBait == FALSE then if exhaustion.get(cid, storage) == FALSE then exhaustion.set(cid, storage, time) doPlayerAddSkillTry(cid, SKILL_FISHING, 1) if isInArray(waterIds, itemEx.itemid) == TRUE then doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) if itemEx.itemid ~= 493 then if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= (getPlayerSkill(cid, SKILL_FISHING)*FishRate) then doCreateMonster(fishable[math.random(#fishable)], getPlayerPosition(cid)) end end end return TRUE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message2) end end return FALSE else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message3) end else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, message4) end end

O de pesca sei que deu certo, kk foi eu qm fez haha
O de mineração, ao meu ver não tem nada de errado nele
E o de desenterrar, talvez seja porque está duplicando (com o script da shovel de abrir buracos)
 
Vê se isso aqui da certo:
actions/scripts/tools/shovel.lua


  E no actions.xml tira essa tag: <action itemid="10515;10511;10513;5710;2554" event="script" value="mortos.lua"/> Deixe só a normal do shovel.lua   Creio eu que dará certo.

Tenho um aqui que vc só minera com level vou posta ele ta aqui caso vc queira
 
Va em data/Actions/scripts
 
 
  Explicando agora Oque estão em vermelho são as coisa que ira dopar quando vc click no item da sua escolha Agora de Azul é o id da pedra caso vc queira mudar pode botar qualquer um O de Verde é o level necessário para minerar Esses nome Minerando vc pode troca ,esses nome é quando ele click na pedra ai vai aparecer esses nome em cima da pedra     Depois abra o actions.xml e cole essa tag   Esse itemid é o id do item que sera necessário para minerar na pedra.
 
 
 
Agora va la denovo na pasta data/actions/script/tools crie um arquivo chamado pick ou se tiver faça só substituir 
 
 
 
 
 
Pronto só isso se ajudei Rep+   
   

a melhor forma de fazer isso seria colocando um creaturescript onKill pra esse monstro mas isso ia fazer com que qualquer monstro q vc matasse com esse nome te desse o storage da quest, dessa forma q e eu coloquei mesmo se o cara morrer ou não matar o monstro ele consegue o premio depois 
local nomeMonst = "Danger ice" -- Nome do mosntro que ele vai sumonarlocal itemid = 2160 local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid if getPlayerStorageValue(cid, 9755) == -1 then if(msgcontains(msg, 'yes')) then selfSay('Mate este monstro para completar sua tarefa.', cid) doCreateMonster(nomeMonst,getThingPos(cid)) setPlayerStorageValue(cid, 9755,1) talkState[talkUser] = 1 end return true end if getPlayerStorageValue(cid, 9755) == 1 then selfSay('Você matou o monstro e ganhou um item.', cid) doPlayerAddItem(cid, itemid,1) setPlayerStorageValue(cid, 9755,2) talkState[talkUser] = 0 return true end if getPlayerStorageValue(cid, 9755) == 2 then selfSay('Você já fez esta tarefa.', cid) talkState[talkUser] = 0 return true end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Prontinho
-- script by Marcryzius D'evil. function onSay(cid, words, param) config = { level=100000, -- level necessario pra reseta. RemainingLvl=100, -- level que ficará depois de ser resetado. exper=4200, -- experiencia que ficará depois de ser resetado. pid=getPlayerGUID(cid), -- não mecha skull="yes", -- players com white skull podem resetar? ("yes" or "no"). redskull="yes", -- players com red skull podem resetar? ("yes" or "no"). prot="yes", -- players precisam estar em protection zone pra resetar? ("yes" or "no"). bat="yes" --players precisam estar sem fight pra resetarem? ("yes" or "no"). } function getResets(cid) reset = getPlayerStorageValue(cid,1020) if reset < 0 then reset = 0 end return reset end if(config.skull == "no") and (getCreatureSkullType(cid) == 3) then doPlayerSendTextMessage(cid,22,"apenas players sem white skull podem resetar.") return TRUE end if(config.redskull == "no") and (getCreatureSkullType(cid) == 4) then doPlayerSendTextMessage(cid,22,"apenas player sem red skull podem resetar.") return TRUE end if(config.prot == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then doPlayerSendTextMessage(cid,22,"você precisa estar em protection zone pra poder resetar.") return TRUE end if(config.bat == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then doPlayerSendTextMessage(cid,22,"você precisa estar sem battler pra poder resetar.") return TRUE end if getPlayerLevel(cid) >= config.level then setPlayerStorageValue(cid,1020,getResets(cid)+1) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid)+(1).." reset\'s.") doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doRemoveCreature(cid) db.executeQuery("UPDATE `players` SET `description` = ' [Reset: "..getResets(cid)+(1).."]' WHERE `players`.`id` = "..config.pid) db.executeQuery("UPDATE `players` SET `level` = "..config.RemainingLvl..", `experience` = "..config.exper.." WHERE `id` = "..config.pid) else doPlayerSendCancel(cid, "You need to have level "..config.level.." or more you may be reset.") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) end return TRUE end

Olá pessoal, fiz esse simples (muito simples) script, para o seu servidor ficar com mais graça.
- Oque ele faz?
Creio que o titulo ja explica tudo, ele vai desenterrar mortos, ao usar items no tumulo.
- Para oque esse script serve?
Simplesmente para nada, é só para diversão.
Crie um arquivo lua chamado mortos.lua em \data\actions\scripts e coloque isso:
  function onUse(cid, item, fromPosition, itemEx, toPosition) local monsters = {"Skeleton", "Ghoul", "Ghost", "Mummy", "Demon Skeleton", "Skeleton Warrior"} if (itemEx.itemid == 1406) then doCreateMonster(monsters[math.random(#monsters)], getPlayerPosition(cid)) return TRUE end return true end Em \data\actions\actions.xml adicione a seguinte tag
  <action itemid="10515;10511;10513;5710;2554" event="script" value="mortos.lua"/> - Explicação:
Ao usar os seguintes items whacking driller of fate, squeezing gear of girlpower, sneaky stabber of eliteness, light shovel e shovel em um tumulo (grave) ira criar um monstro randomico, configuravel na tabela monsters
Abraços.

Hoje eu tava jogando um PokeTibia, e pensei: "Porque não pescar monstros no tibia também?" e fiz esse script!
Vamos logo ao que interessa kkk
 
Em actions\actions.xml procure essa tag:
(Caso não tenha, adicione-a)
<action itemid="10223" event="script" value="tools/mechanical_fishing.lua" allowfaruse="1"/> Depois vá até actions\scripts\tools\mechanical_fishing.lua apague tudo que tem dentro e cole:
 


    Para configurar é fácil, só precisa ler no script, deixei tudo bem explicado lá.
Caso tenha gostado dê +Rep, e caso tenha alguma dúvida ou sugestão, comente ai
 
        Att My Fat Doll ;~

cria essa talkaction e coloca o npc pra executar ela http://www.tibiaking.com/forum/topic/16596-talkaction-comando-name-mudar-nome-de-char/ boa sorte

na magia do heal troque:
setHealingFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 000, 6000, 000, 6000) por 
doCreatureAddHealth(cid, 6000) e na magia de mana troque:
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 000, 6000, 000, 6000) por 
doCreatureAddMana(cid, 6000)

usa doCreatureAddHealth(cid, 6000) e doCreatureAddMana(cid, 6000). É bem mais fácil doque criar combat, a menos que vc utilize uma fórmula e chame um callback pra essa fórmula

<immunity Death="100"/> mude pra <immunity Death="1"/>
E aproveitando, lá nos ataques, mude min="20000" pra min="-20000"
Porque sem o - ele faz é curar, e não hitar.

você coloca na pasta Mods que tem antes da pasta data xD

Automatic Raids.xml

<?xml version="1.0" encoding="UTF-8"?> <mod name="Automatic Raids" version="1.0" author="Vodkart And xotservx" contact="tibiaking.com" enabled="yes"> <config name="raids_func"><![CDATA[ days = { ["Monday"] = { ["21:30"] = {nome = "Orshabaal", pos = {fromPosition = {x=184, y=55, z=7},toPosition = {x=188, y=58, z=7}},m = {"5 Fire Devil", "2 Orshabaal"}, Time = 15}, ["21:33"] = {nome = "Dragon", pos = {fromPosition = {x=197, y=57, z=7},toPosition = {x=203, y=60, z=7}},m = {"100 Dragon"}, Time = 20} }, ["Sunday"] = { ["10:08"] = {nome = "Demon", pos = {fromPosition = {x=202, y=11, z=7},toPosition = {x=204, y=12, z=7}}, m = {"1 Demon"}, Time = 15}, ["10:46"] = {nome = "Hydra", pos = {fromPosition = {x=197, y=57, z=7},toPosition = {x=203, y=60, z=7}}, m = {"7 Hydra", "4 Cyclops"}, Time = 20} } } ]]></config> <globalevent name="AutomaticRaids" interval="60" event="script"><![CDATA[ domodlib('raids_func') function onThink(interval, lastExecution) if days[os.date("%A")] then hours = tostring(os.date("%X")):sub(1, 5) tb = days[os.date("%A")][hours] if tb then function removeCreature(tb) for x = ((tb.pos.fromPosition.x)-10), ((tb.pos.toPosition.x)+10) do for y = ((tb.pos.fromPosition.y)-10), ((tb.pos.toPosition.y)+10) do local m = getTopCreature({x=x, y=y, z= tb.pos.fromPosition.z}).uid if m ~= 0 and isMonster(m) then doRemoveCreature(m) end end end end doBroadcastMessage("The invasion of " .. tb.nome .. " started") for _,x in pairs(tb.m) do for s = 1, tonumber(x:match("%d+")) do pos = {x = math.random(tb.pos.fromPosition.x, tb.pos.toPosition.x), y = math.random(tb.pos.fromPosition.y, tb.pos.toPosition.y), z = tb.pos.fromPosition.z} doSummonCreature(x:match("%s(.+)"), pos) end end addEvent(removeCreature, tb.Time*60*1000, tb) end end return true end ]]></globalevent> </mod> Configuração: days = { ["Monday"] = { ["21:30"] = {nome = "Orshabaal", pos = {fromPosition = {x=184, y=55, z=7},toPosition = {x=188, y=58, z=7}},m = {"5 Fire Devil", "2 Orshabaal"}, Time = 1}, ["21:33"] = {nome = "Dragon", pos = {fromPosition = {x=197, y=57, z=7},toPosition = {x=203, y=60, z=7}},m = {"100 Dragon"}, Time = 2} }, ["Tuesday"] = { ["10:44"] = {nome = "Demon", pos = {fromPosition = {x=184, y=55, z=7},toPosition = {x=188, y=58, z=7}}, m = {"5 Demon", "8 Fire Devil"}, Time = 1}, ["10:46"] = {nome = "Hydra", pos = {fromPosition = {x=197, y=57, z=7},toPosition = {x=203, y=60, z=7}}, m = {"7 Hydra", "4 Cyclops"}, Time = 2} } } ["DIA"] = { ["HORA DA INVASÃO"] = {nome = "NOME DA INVASÃO", pos = {começo e final da área}, monster = {"MONSTROS"}, Time = para remover os monstro} } O dia da invasão é colocada entre " " e somente dia em inglês e a primeira letra maiúscula, exemplo: "Saturday" Depois são as hora da invasão, que é colocada entre " " e somente a hora e minuto, segundos não precisa exemplo: "15:00" As Posições estão entre { } adicionando as posições x, y e z, é o começo e final da área exemplo: pos = {fromPosition = {x=197, y=57, z=7},toPosition = {x=203, y=60, z=7}} fromPosition -- começo da área onde vai acontecer a raid toPosition -- final da área onde vai acontecer a raid Os monters tem um modo especial de configurar, vc coloca entre { }, e cada monstro entre " ", e entre as " " vc adiciona "QUANTIDADE MONSTRO", e para adicionar mais tipos de monstro se separa por virgulas, exemplo: {"40 Water Elemental", "5 Cyclops"} Time é uma função extra, é para caso ninguém participe do evento os monstros não fiquem pelo mapa, e é em minutos, exemplo: Time = 15

Falaaa galerinha, tudo certinho? Então, hoje eu venho aqui para lançar o mais novo aplicativo do TibiaKing.com e dessa vez tenho certeza que ele será de grande utilidade para muitos, pois ele é super inovador, útil e bonitinho.
 
Este é o TibiaKing Helper, ele servirá com um "centro de atalhos" para você diretamente do seu navegador Google Chorme, basta você instalar o aplicativo em seu Chorme e passar a utilizar, é super simples!
 

 
Tenho certeza que você irá curtir bastante, isso facilitará a vida de muitos Tibia Kingianos! 
 
TibiaKing Helper v1.1
via Chrome Store.
 
É nóis que tá meu povo.
Abração à todos!

Olá, boa noite.
 
Sabe o Arquivo que você executa pra abrir o server? Então, aquele arquivo é um compactado com todas as "sources" (fontes).
 
Pra você usar este tutorial você teria que baixar a "Source" e usar um programa para "compilar" tudo. Não é algo muito simples de ser feito.
 
Se tiver intuito de aprender como aprender a compilar posso te passar um tutorial.
 
Abraço.

 

Se você já teve um servidor, já sabe como que é isso. Por falha humana, em todos npcs esquecerem de definir um valor minimo para os itens agrupáveis ser vendido, com isso se você coloca-se no elfbot auto buyitems IDdoITEM 0 ele iria comprar e não pagar nada. Para os que não corrigiram pelos NPCS tambem há como corrigir pelas sources.

npc.cpp

if(NpcState* npcState = getState(player, true)) { npcState->amount = amount; npcState->subType = count; npcState->itemId = itemId; npcState->buyPrice = getListItemPrice(itemId, SHOPEVENT_BUY); npcState->ignoreCap = ignoreCap; npcState->inBackpacks = inBackpacks; const NpcResponse* response = getResponse(player, npcState, EVENT_PLAYER_SHOPBUY); executeResponse(player, npcState, response); } substitua por if(NpcState* npcState = getState(player, true)) { if(amount <= 0){ amount = 1; } npcState->amount = amount; npcState->subType = count; npcState->itemId = itemId; npcState->buyPrice = getListItemPrice(itemId, SHOPEVENT_BUY); npcState->ignoreCap = ignoreCap; npcState->inBackpacks = inBackpacks; const NpcResponse* response = getResponse(player, npcState, EVENT_PLAYER_SHOPBUY); executeResponse(player, npcState, response); }

Créditos: Matheus Mkalo

Você tem que mudar o nome de compra,por exemplo no tibia global : utevo lux = Light..
No caso o nome de compra tem que ser diferente da spell.