Pesquisar na Comunidade

Últimas atualizações: 16/12/2013: [ATUALIZADO 12/04/2014] Introdução: Eai gente, vcs conhecem o evento Blood Castle que tem no jogo MU? Então, eu resolvi criar esse evento para OpenTibia e ficou bem legal Informações: OBS: NÃO é obrigatório o uso do mapa que vou por aqui, ele serve somente para exemplo. #Dica: Acho que fica legal o premio do evento ser um item que da double exp por um tempo. Atualização: Resolvi refazer o código, para facilitar a instalação e melhorar o funcionamento do evento. O que mudou? Instalando o evento: Lib: Movements: Creaturescripts: Monsters: O evento pode acontecer de duas maneiras: automática ou manualmente. Vou por as duas possibilidades: Automático: Manual: Como Configurar: * Se você for colocar, dentro do evento, um teleporte para as pessoas que não quiserem mais participar, coloque o Action ID 9371 nele. * Lembre-se de por NO-LOGOUT tool e NO-PVP tool em toda área do evento!! Todas as demais explicações estão na lib, mas vou demonstrar como configurar os mais "confusos". No modo automático, você configura de quanto em quanto o tempo o evento vai acontecer. Nessa tag: <globalevent name="Blood Castle" interval="3600" event="script" value="BloodGlobalEvent.lua"/> Aqui está 3600 segundos, ou seja, 1 hora. * Se seu servidor for em milisegundos, multiplique o número por 1000, assim: 3600 segundos * 1000 = 3600000 milisegundos = 1 hora. No modo manual, para iniciar o evento, basta usar a talkaction /blood-start com seu god. Em posGuarda, vc deve colocar a posicao do Guarda do Portao, como mostrado abaixo: As posPedras são onde ficam as pedras que tampam a passagem enquanto o evento não esta aberto, conforme na imagem abaixo: Em estátua, vc deve colocar a posição em que o arcanjo vai ser criado, conforme na imagem abaixo: Nas posParedes, vc deve por a posição das paredes que bloqueiam a entrada do castelo e que são removidas quando o guarda morre, conforme abaixo: Em fromPos e toPos, você vai por o canto superior esquerdo e o canto inferior direito do mapa do seu evento, respectivamente. Dessa maneira: As outras configurações eu acredito que já estejam bem explicadas. Espero que gostem dessa nova versão. Recomendo a todos que já usam o evento, reinstalar com essa nova versão. Qualquer dúvida ou bug, postem que irei responder. Download do mapa exemplo: Blood Castle.rar

Fala galera, blz ? Então seguinte, to editando um ot, e percebi que quando mata um monstro ele fica tipo muuuito tempo morto sem desaparecer o corpo do chão... Consegui alterar o tempo que eles ficam aparecendo la no chao, mas nao de todos somente alguns. Parece que não consigo configurar para todos os monstros pelo arquivo items.xml, lá eu troco o duration para o valor que quero. Até ai blz, mas o sangue ainda continua no chão por muito tempo, como faço pra ele sumir junto com o corpo ? Não sei se deu pra entender kkk, mas valeu Obrigado

Resposta ao tópico http://www.xtibia.com/forum/topic/218216-pedido-evento-fraghora/ Informações É um evento simples: quem mata mais durante a duração do evento, ganha os prêmios Intervalo entre uma execução e outra configurável Duração configurável Feito em mod (porque é mais fácil de instalar) Vem com comando informativo sobre o evento Testado em 8.6 Código Crie um arquivo chamado Blood Festival.xml na sua pasta de mods com o seguinte código: Configurações Configuração padrão: 1 hora de duração e 4 horas entre o início de cada evento A duração, os prêmios e a opção de contar somente frags unjust são feitas na primeira parte do código, chamada blood_config O intervalo de execução entre os eventos vem como padrão 4hs (14400000 milissegundos). Esse intervalo pode ser modificado nessa parte: Screenshot OBS.: Sim, eu uso muito mal o paint. Mas o script funciona.

Ola pessoal fui implementar um script que foi feito aqui mesmo no xtibia porem deu um bug nele um bug no doCreatureSetOutfit ae o script. local Muted = createConditionObject(CONDITION_MUTED) setConditionParam(Muted , CONDITION_PARAM_TICKS, 30 * 1000) local Speed = createConditionObject(CONDITION_HASTE) setConditionParam(Speed, CONDITION_PARAM_TICKS, 30000) setConditionFormula(Speed, 0, 3000, 0, 3000) local Health = createConditionObject(CONDITION_REGENERATION) setConditionParam(Health, CONDITION_PARAM_TICKS, 30000) setConditionParam(Health, CONDITION_PARAM_HEALTHGAIN, 1000) setConditionParam(Health, CONDITION_PARAM_HEALTHTICKS, 1) setConditionParam(Health, CONDITION_PARAM_MANAGAIN, 1000) setConditionParam(Health, CONDITION_PARAM_MANATICKS, 1) local function Blood(p) if isPlayer(p.cid) then if p.times > 0 then doSendMagicEffect(getThingPosition(p.cid), 51) addEvent(Blood, 1 * 1000, {cid = p.cid, times = p.times - 1}) end end end local types = { [1] = {name = "Chronos", {lookType = 251, lookHead = 114, lookBody = 114, lookLegs = 114, lookFeet = 114}, soul = 0}, [2] = {name = "Kazard", {lookType = 262, lookHead = 114, lookBody = 114, lookLegs = 114, lookFeet = 114}, soul = 0}, [3] = {name = "Hazus", {lookType = 194, lookHead = 114, lookBody = 114, lookLegs = 114, lookFeet = 114}, soul = 50} } function onUse(cid, item, fromPosition, itemEx, toPosition) local blood = types[math.random(1, #types)] local HP = math.random(4000, 10000) local MP = math.random(4000, 10000) if getPlayerSoul(cid) >= 0 then doCreatureAddHealth(cid, HP) doCreatureAddMana(cid, MP) doAddCondition(cid, Health) doCreatureSetOutfit(cid, blood[1], 30 * 1000) doSendMagicEffect(fromPosition, 51) if blood.name == "Kazard" then doAddCondition(cid, Speed) elseif blood.name == "Hazus" then doAddCondition(cid, Muted) end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Você me invocou! Agora você é um ".. blood.name) doCreatureSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid, -blood.soul) doRemoveItem(item.uid, 1) addEvent(Blood, 1 * 1000, {cid = cid, times = 30}) else doPlayerSendCancel(cid, "Desculpe, você não possui 50 almas para usar esse Blood of Gods.") end return true end E ae script antigo: local function Blood30(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) end end local function Blood29(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood30, 1 * 1000, cid) end end local function Blood28(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood29, 1 * 1000, cid) end end local function Blood27(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood28, 1 * 1000, cid) end end local function Blood26(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood27, 1 * 1000, cid) end end local function Blood25(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood26, 1 * 1000, cid) end end local function Blood24(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood25, 1 * 1000, cid) end end local function Blood23(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood24, 1 * 1000, cid) end end local function Blood22(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood23, 1 * 1000, cid) end end local function Blood21(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood22, 1 * 1000, cid) end end local function Blood20(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood21, 1 * 1000, cid) end end local function Blood19(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood20, 1 * 1000, cid) end end local function Blood18(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood19, 1 * 1000, cid) end end local function Blood17(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood18, 1 * 1000, cid) end end local function Blood16(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood17, 1 * 1000, cid) end end local function Blood15(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood16, 1 * 1000, cid) end end local function Blood14(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood15, 1 * 1000, cid) end end local function Blood13(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood14, 1 * 1000, cid) end end local function Blood12(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood13, 1 * 1000, cid) end end local function Blood11(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood12, 1 * 1000, cid) end end local function Blood10(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood11, 1 * 1000, cid) end end local function Blood9(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood10, 1 * 1000, cid) end end local function Blood8(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood9, 1 * 1000, cid) end end local function Blood7(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood8, 1 * 1000, cid) end end local function Blood6(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood7, 1 * 1000, cid) end end local function Blood5(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood6, 1 * 1000, cid) end end local function Blood4(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood5, 1 * 1000, cid) end end local function Blood3(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood4, 1 * 1000, cid) end end local function Blood2(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood3, 1 * 1000, cid) end end local function Blood1(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood2, 1 * 1000, cid) end end local Chronos = createConditionObject(CONDITION_OUTFIT) setConditionParam(Chronos, CONDITION_PARAM_TICKS, 30000) addOutfitCondition(Chronos, 0, 251, 114, 114, 114, 114) local Kazard = createConditionObject(CONDITION_OUTFIT) setConditionParam(Kazard, CONDITION_PARAM_TICKS, 30000) addOutfitCondition(Kazard, 0, 262, 114, 114, 114, 114) local Hazus = createConditionObject(CONDITION_OUTFIT) setConditionParam(Hazus, CONDITION_PARAM_TICKS, 30000) addOutfitCondition(Hazus, 0, 194, 114, 114, 114, 114) local Muted = createConditionObject(CONDITION_MUTED) setConditionParam(Muted , CONDITION_PARAM_TICKS, 30000 * 10000) local Speed = createConditionObject(CONDITION_HASTE) setConditionParam(Speed, CONDITION_PARAM_TICKS, 30000) setConditionFormula(Speed, 0, 3000, 0, 3000) local Health = createConditionObject(CONDITION_REGENERATION) setConditionParam(Health, CONDITION_PARAM_TICKS, 30000) setConditionParam(Health, CONDITION_PARAM_HEALTHGAIN, 1000) setConditionParam(Health, CONDITION_PARAM_HEALTHTICKS, 1) setConditionParam(Health, CONDITION_PARAM_MANAGAIN, 1000) setConditionParam(Health, CONDITION_PARAM_MANATICKS, 1) function onUse(cid, item, frompos, item2, topos) Blood = math.random(1,3) HP = math.random(4000,10000) MP = math.random(4000,10000) if getPlayerSoul(cid) >= 0 then if Blood == 1 then doPlayerAddHealth(cid,HP) doPlayerAddMana(cid,MP) doTargetCombatCondition(0, cid, Chronos, 51) doTargetCombatCondition(0, cid, Health, 51) doPlayerSendTextMessage(cid,20,"Você Me Invocou, Agora Você é Um Chronos.") doPlayerSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid,-0) doRemoveItem(item.uid,1) addEvent(Blood1, 1*1000,cid) elseif Blood == 2 then doPlayerAddHealth(cid,HP) doPlayerAddMana(cid,MP) doTargetCombatCondition(0, cid, Kazard, 51) doTargetCombatCondition(0, cid, Health, 51) doTargetCombatCondition(0, cid, Speed, 51) doPlayerSendTextMessage(cid,20,"Você Me Invocou, Agora Você é Um Kazard.") doPlayerSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid,-0) doRemoveItem(item.uid,1) addEvent(Blood1, 1*1000,cid) elseif Blood == 3 then doPlayerAddHealth(cid,HP) doPlayerAddMana(cid,MP) doTargetCombatCondition(0, cid, Hazus, 51) doTargetCombatCondition(0, cid, Health, 51) doTargetCombatCondition(0, cid, Muted, 51) doPlayerSendTextMessage(cid,20,"Você Me Invocou, Agora Você é Um Hazus.") doPlayerSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid,-0) doRemoveItem(item.uid,1) addEvent(Blood1, 1*1000,cid) end else doPlayerSendTextMessage(cid,20,"Desculpe, vocé não tem 50 almas para usa esse Blood Of God\'s.") end end Se alguem poder me ajudar eu agradeço muito!

Ola pessoal do xtibia Então eu tenho um script que ele meio que não funciona gostaria de saber se algo pode-se me ajudar :S local function Blood30(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) end end local function Blood29(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood30, 1 * 1000, cid) end end local function Blood28(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood29, 1 * 1000, cid) end end local function Blood27(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood28, 1 * 1000, cid) end end local function Blood26(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood27, 1 * 1000, cid) end end local function Blood25(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood26, 1 * 1000, cid) end end local function Blood24(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood25, 1 * 1000, cid) end end local function Blood23(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood24, 1 * 1000, cid) end end local function Blood22(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood23, 1 * 1000, cid) end end local function Blood21(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood22, 1 * 1000, cid) end end local function Blood20(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood21, 1 * 1000, cid) end end local function Blood19(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood20, 1 * 1000, cid) end end local function Blood18(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood19, 1 * 1000, cid) end end local function Blood17(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood18, 1 * 1000, cid) end end local function Blood16(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood17, 1 * 1000, cid) end end local function Blood15(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood16, 1 * 1000, cid) end end local function Blood14(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood15, 1 * 1000, cid) end end local function Blood13(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood14, 1 * 1000, cid) end end local function Blood12(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood13, 1 * 1000, cid) end end local function Blood11(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood12, 1 * 1000, cid) end end local function Blood10(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood11, 1 * 1000, cid) end end local function Blood9(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood10, 1 * 1000, cid) end end local function Blood8(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood9, 1 * 1000, cid) end end local function Blood7(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood8, 1 * 1000, cid) end end local function Blood6(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood7, 1 * 1000, cid) end end local function Blood5(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood6, 1 * 1000, cid) end end local function Blood4(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood5, 1 * 1000, cid) end end local function Blood3(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood4, 1 * 1000, cid) end end local function Blood2(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood3, 1 * 1000, cid) end end local function Blood1(cid) if isPlayer(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), 51) addEvent(Blood2, 1 * 1000, cid) end end local Chronos = createConditionObject(CONDITION_OUTFIT) setConditionParam(Chronos, CONDITION_PARAM_TICKS, 30000) addOutfitCondition(Chronos, 0, 251, 114, 114, 114, 114) local Kazard = createConditionObject(CONDITION_OUTFIT) setConditionParam(Kazard, CONDITION_PARAM_TICKS, 30000) addOutfitCondition(Kazard, 0, 262, 114, 114, 114, 114) local Hazus = createConditionObject(CONDITION_OUTFIT) setConditionParam(Hazus, CONDITION_PARAM_TICKS, 30000) addOutfitCondition(Hazus, 0, 194, 114, 114, 114, 114) local Muted = createConditionObject(CONDITION_MUTED) setConditionParam(Muted , CONDITION_PARAM_TICKS, 30000 * 10000) local Speed = createConditionObject(CONDITION_HASTE) setConditionParam(Speed, CONDITION_PARAM_TICKS, 30000) setConditionFormula(Speed, 0, 3000, 0, 3000) local Health = createConditionObject(CONDITION_REGENERATION) setConditionParam(Health, CONDITION_PARAM_TICKS, 30000) setConditionParam(Health, CONDITION_PARAM_HEALTHGAIN, 1000) setConditionParam(Health, CONDITION_PARAM_HEALTHTICKS, 1) setConditionParam(Health, CONDITION_PARAM_MANAGAIN, 1000) setConditionParam(Health, CONDITION_PARAM_MANATICKS, 1) function onUse(cid, item, frompos, item2, topos) Blood = math.random(1,3) HP = math.random(4000,10000) MP = math.random(4000,10000) if getPlayerSoul(cid) >= 0 then if Blood == 1 then doPlayerAddHealth(cid,HP) doPlayerAddMana(cid,MP) doTargetCombatCondition(0, cid, Chronos, 51) doTargetCombatCondition(0, cid, Health, 51) doPlayerSendTextMessage(cid,20,"Você Me Invocou, Agora Você é Um Chronos.") doPlayerSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid,-0) doRemoveItem(item.uid,1) addEvent(Blood1, 1*1000,cid) elseif Blood == 2 then doPlayerAddHealth(cid,HP) doPlayerAddMana(cid,MP) doTargetCombatCondition(0, cid, Kazard, 51) doTargetCombatCondition(0, cid, Health, 51) doTargetCombatCondition(0, cid, Speed, 51) doPlayerSendTextMessage(cid,20,"Você Me Invocou, Agora Você é Um Kazard.") doPlayerSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid,-0) doRemoveItem(item.uid,1) addEvent(Blood1, 1*1000,cid) elseif Blood == 3 then doPlayerAddHealth(cid,HP) doPlayerAddMana(cid,MP) doTargetCombatCondition(0, cid, Hazus, 51) doTargetCombatCondition(0, cid, Health, 51) doTargetCombatCondition(0, cid, Muted, 51) doPlayerSendTextMessage(cid,20,"Você Me Invocou, Agora Você é Um Hazus.") doPlayerSay(cid, "MUAHAHAHA!", TALKTYPE_ORANGE_1) doPlayerAddSoul(cid,-50) doRemoveItem(item.uid,1) addEvent(Blood1, 1*1000,cid) end else doPlayerSendTextMessage(cid,20,"Desculpe, vocé não tem 50 almas para usa esse Blood Of God\'s.") end end