MaGoDaNeT

nao sei si tem como n achei nemhum geito de arruma isso ;x

nao funciona só com pokeball e ultra no script eu coloquei só essas 2 mais vc pode adicionar quantas vc quiser

aki olha esse aki é uma spell que Sumona 2 bixos de uma veis só e tem maxSummon e quando o summon morre nao cai o corpo estou usando ela em versao 8.54 nao sei se funciona em otra Começando va em data/creaturescripts.XML e adicione essa tag <event type="death" name="DieClone" event="script" value="DieClone.lua"/> depois abra a pasta scripts crie um arquivo.LUA com o nome de DieClone e coloque isso dentro function onDeath(cid, deathList) doRemoveCreature(cid) return FALSE end agora va na pasta spells abra o spells.XML e adicione essa tag <instant name="Shredder Team" words="shredder team" lvl="50000" mana="0" prem="1" selftarget="1" exhaustion="3000" needlearn="0" script="attack/Shredder Team.lua"> <vocation id="0"/> </instant> agora va na pasta scripts/attack e crie um arquivo.LUA com o nome de Shredder Team e coloque isso dentro function onCastSpell(cid, var) local playerpos = getPlayerPosition(cid) local health = getCreatureHealth(cid) local maxhealth = getCreatureMaxHealth(cid) local MaximoSummon = 2 local summons = getCreatureSummons(cid) if(table.maxn(summons) < MaximoSummon) then local clone = doSummonCreature("Scyther", getCreaturePosition(cid)) doConvinceCreature(cid, clone) setCreatureMaxHealth(clone, maxhealth) doCreatureAddHealth(clone, health) doCreatureSay(cid, 'Shredder Team', TALKTYPE_ORANGE_1) registerCreatureEvent(clone, "DieClone") local clone2 = doSummonCreature("Scyther", getCreaturePosition(cid)) doConvinceCreature(cid, clone2) setCreatureMaxHealth(clone2, maxhealth) doCreatureAddHealth(clone2, health) registerCreatureEvent(clone2, "DieClone") return TRUE end end

ta tudo certo as vocation mais quando o player reloga perde a promotion Por exemplo: o player ja tem promotion elite knight ai ele vai la e compra otra promotion vira epic elite knight até ai tudo bem mais quando o player desloga ele volta a se elite knight como eu arrumo isso? ~~~~~~~~~~~ Edit ~~~~~~~~~~~~ ja resolvi isso estou usando um script por action doPlayerSetVocation(cid, 4) doPlayerSetPromotionLevel(cid, 2) coloquei pra tira a promotion 1 do player e adiciona promotion+2 ai é só o player reloga e pronto

ai mano explica melhor oq vc qué pelo oq eu intendi é qui vc eskeçeu de arruma o tile vip em movements? i mana rune vc qué só para vips poderem usar?

eu tirei o npc que eu tinha feito para o server da thalia pq estava com bugs tipo ele só healava o player e transformava a ball mais nao healava o poke... seria mais facil editar o catch do server da thalia para funcionar com o primero npc qui eu postei

vc precisa ter as funçoes qui o MatheusMkalo postou junto com os scripts dele

-SuperTnT o npc lider de gym eu ja estou fazendo mais ainda estou em duvida se vou postar quando estiver pronto. -RoyalFlash Esse npc nurse joy funciona sim com o server da thalia só qui teria qui editar o catch e o go/back...

usa o sqlite qui vem na pasta do ot abre ele dps com ele abra a database do seu ot vai em accounts e ve la a senha e vc tbm pode muda pra qual vc quiser

~~ Resolvido ~~ vlw por mi lembra eu tinha esqueçido disso la no firewall do windows só tava selecionado a port 7171 a 7172 n tava selecionado

essa spell que vc fico boa

pois é esse treiner é ruim para leveis baixos e tem otra nao evita o bot se o cara tive de bot é só ele por pra heala qui ele nao vai morre pro treiner ;x

Lista De Npcs Por enquanto é só mais vou por mais npcs na lista Página 1

Ja arrumei

Sim até agora esse foi o segundo npc qui eu fis e eu estou sem ideia doque postar se alguem tive alguma ideia qui eu conssiga fazer fale

Funciona em 8.54 ou maior Ola nesse npc foi usado o script go/back do MatheusMkalo. O npc esta quase identico ao do PO é só fala hi e pronto heala vc e todos os seus pokemons... E as falas tbm estão iguais. E como podem ver eu fis com a poke ball e ultra ball. Bom vamos ao script Va na pasta data/npc copie qualquer npc e renomeie para Nurse Joy feito isso abra o arquivo XML qui vc pois o nome de Nurse Joy apague tudo de dentro e ponha isso. <?xml version="1.0" encoding="UTF-8"?> <npc name="Nurse Joy" script="Nurse Joy.lua" walkinterval="0" speed="0" floorchange="0"> <health now="100" max="100"/> <look type="318" head="0" body="0" legs="0" feet="0" addons="0"/> <parameters> </parameters> </npc> Agora salve e fexe Depois disso abra a pasta Scripts copie qualque arquivo LUA e renomeie para Nurse Joy agora abra ele apague tudo e ponha isso local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false function onThingMove(creature, thing, oldpos, oldstackpos, item, itemEx) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('Good bye then.') focus = 0 talk_start = 0 end end function onCreatureTurn(creature) end function msgcontains(txt, str) return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)')) end function onCreatureSay(cid, type, msg) msg = string.lower(msg) if (msgcontains(msg, 'hi')) and getDistanceToCreature(cid) < 4 then if getPlayerStorageValue(cid, 59987) == 1 then return selfSay('You Are riding.') end if getPlayerStorageValue(cid, 62314) == 1 then return selfSay('You are flying.') end if #getCreatureSummons(cid) >= 1 then selfSay('Please back your Pokemon to the pokeball...') focus = 0 talk_start = 0 return TRUE end if not getTilePzInfo(getCreaturePosition(cid)) then return selfSay('Please enter in the Pokemon Center...') end -- Poke Ball for slo = CONST_SLOT_FIRST, CONST_SLOT_LAST do local item = getPlayerSlotItem(cid, slo) if isContainer(item.uid) then local items = getItemsInContainerById(item.uid, pokeout) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokein) end local items2 = getItemsInContainerById(item.uid, pokein) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeout or item.itemid == pokein then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokein) end end local items = getItemsInContainerById(item.uid, pokeout) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokein) end local items2 = getItemsInContainerById(item.uid, pokein) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeout or item.itemid == pokein then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokein) end -- Ultra Ball local items = getItemsInContainerById(item.uid, pokeoutultra) for i,x in pairs(items) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(x, pokeinultra) end local items2 = getItemsInContainerById(item.uid, pokeinultra) for i,x in pairs(items2) do local maxh = tonumber(getItemAttribute(x, "poke"):match("/(.+)]")) doItemSetAttribute(x, "poke", getItemAttribute(x, "poke"):sub(1, findLetter(getItemAttribute(x, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") end if item.itemid == pokeoutultra or item.itemid == pokeinultra then local maxh = tonumber(getItemAttribute(item.uid, "poke"):match("/(.+)]")) doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..maxh.."/"..maxh.."]") doTransformItem(item.uid, pokeinultra) end end selfSay("Hello! We've restored your Pokemon to full health. We hope to see you again!") local hp = getCreatureMaxHealth(cid) doCreatureAddHealth(cid, hp) doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_GREEN) focus = 0 talk_start = 0 end end function onCreatureChangeOutfit(creature) end Salve e fexe Agora As Functions va na pasta LIB e crie um arquivo lua chamado PokeLib e coloque isso dentro pokein, pokeout = 2646,2457 pokeinultra, pokeoutultra = 2654,2537 function doRemoveTile(pos)-- Script by mock pos.stackpos = 0 local sqm = getTileThingByPos(pos) doRemoveItem(sqm.uid,1) end function doCreateTile(id,pos) -- By mock doAreaCombatHealth(0,0,pos,0,0,0,CONST_ME_NONE) doCreateItem(id,1,pos) end function getPosDirs(p, dir) -- By MatheusMkalo return dir == 1 and {x=p.x-1, y=p.y, z=p.z} or dir == 2 and {x=p.x-1, y=p.y+1, z=p.z} or dir == 3 and {x=p.x, y=p.y+1, z=p.z} or dir == 4 and {x=p.x+1, y=p.y+1, z=p.z} or dir == 5 and {x=p.x+1, y=p.y, z=p.z} or dir == 6 and {x=p.x+1, y=p.y-1, z=p.z} or dir == 7 and {x=p.x, y=p.y-1, z=p.z} or dir == 8 and {x=p.x-1, y=p.y-1, z=p.z} end function doItem(pos,a,d)-- Script by mock doCreateTile(460,pos) pos.stackpos = 0 local c = getTileThingByPos(pos) doItemSetAttribute(c.uid, "aid", a) end function getDescription(uid) for i,x in pairs(getItemDescriptions(uid)) do if i == "special" then return x end end end function findLetter(string, letter) for i = 1, #string do if string:sub(i, i) == letter then return i end end end function isWalkable(pos, creature, proj, pz)-- by Nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end if getTileInfo(pos).protection and pz then return false, true end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return true end function getPosDirs(p, dir) return dir == 1 and {x=p.x-1, y=p.y, z=p.z} or dir == 2 and {x=p.x-1, y=p.y+1, z=p.z} or dir == 3 and {x=p.x, y=p.y+1, z=p.z} or dir == 4 and {x=p.x+1, y=p.y+1, z=p.z} or dir == 5 and {x=p.x+1, y=p.y, z=p.z} or dir == 6 and {x=p.x+1, y=p.y-1, z=p.z} or dir == 7 and {x=p.x, y=p.y-1, z=p.z} or dir == 8 and {x=p.x-1, y=p.y-1, z=p.z} end function canSummon(cid) local pos = getCreaturePosition(cid) local state = false for i = 1, 8 do if isWalkable(getPosDirs(getCreaturePosition(cid), i)) then state = true end end return state end function isPlayerSummon(cid, uid) if getCreatureMaster(uid) == cid then return TRUE end return FALSE end function getSummonLifes(cid) for _,x in pairs(getCreatureSummons(cid)) do return getCreatureHealth(x), getCreatureMaxHealth(x) end end function getItemsInContainerById(container, itemid) -- Function By Kydrai local items = {} if isContainer(container) and getContainerSize(container) > 0 then for slot=0, (getContainerSize(container)-1) do local item = getContainerItem(container, slot) if isContainer(item.uid) then local itemsbag = getItemsInContainerById(item.uid, itemid) for i=0, #itemsbag do table.insert(items, itemsbag[i]) end else if itemid == item.itemid then table.insert(items, item.uid) end end end end return items end function addPokeball(cid, pokename, maxh) local s = doPlayerAddItem(cid, pokein) local s = doPlayerAddItem(cid, pokeinultra) doItemSetAttribute(s, "poke", "This is "..pokename.."'s pokeball. HP = ["..maxh.."/"..maxh.."]") doItemSetAttribute(s, "name", "" .. pokename .. " Poke Ball") end function getPokeOutLive(cid) dat = {} for slot = CONST_SLOT_FIRST, CONST_SLOT_LAST do local item = getPlayerSlotItem(cid, slot) if isContainer(item.uid) then local items = getItemsInContainerById(item.uid, pokeout) local items = getItemsInContainerById(item.uid, pokeoutultra) for _, ui in pairs(items) do if getItemAttribute(ui, "poke"):sub(#getItemAttribute(ui, "poke")) == "." then table.insert(dat, ui) end end end if item.itemid == pokeout then if getItemAttribute(item.uid, "poke"):sub(#getItemAttribute(item.uid, "poke")) == "." then table.insert(dat, item.uid) end end if item.itemid == pokeoutultra then if getItemAttribute(item.uid, "poke"):sub(#getItemAttribute(item.uid, "poke")) == "." then table.insert(dat, item.uid) end end end return dat end

1º Pokemon Passivo: Pokemon que fica la andando como si fosse um npc e só ataca o player se o player ataca ele 2º Pokemon Teleportado Até O Player: O pokemon do player é teleportado até ele quando ele sóbe ou desce algum buraco ou escada. Agradeço deis de ja para quem mi ajudar e dou rep+

aew man agora so falta por pra le a description do item fora isso n tem nemhum erro ^^ brunin86 vou dar Rep+ por estar mi ajudando

isso cara eu sei bem poco de scripts por isso as vezes eu pesso ajuda aqui no xtibia ^^

MatheusMkalo a minha ideia era faze um script de portrait para usar com o script de pokeball qui vc postou mais eu acho qui eu nao fis certo ;/ eu agradeçeria se vc pudece faze o script funciona ^^ ai vai o script intero da uma olhada e ve como ta

tipo eu resolvi faze um portrait e ta dando esse erro o erro ta nessa parte aqui tipo o item2 e o id do portrait sem pokemon akele em branco ai era pra quando eu coloco a pokebola no slot ele virava o item de acordo com o pokemon... mais ta dando erro ai nessa parte OBS: nao postei o script intero so postei a parte do erro alguem da uma ajuda ae ^^

Rep+ Bom trabalho thalia mais poderia melhorar colocando mais scripts ^^ OBS:o ot tem todos os outifits e todos os magic effects Sim Muito simples va ate a pasta data/talkactions/scripts do seu ot Procure pelo arquivo chamado newtype abra o arquivo apague tudo que esta dentro e coloque isso Salve e fexe Feito isso na mesma pasta procure otro arquivo chamado magiceffect abra ele apague tudo de dentro e coloque isso Fexe e salve Pronto agora va no seu ot e teste diga /newtype "1 ate 530" e /z "0 ate 220"

ola, estou precisando de um script de portrait e um de pokedex alguem mi da uma ajudinha ae =] Meu ot e 8.54 e se for mi ajuda porfavor mi ajude com um script que funcione... ja tem um script de pokedex aqui no xtibia mais ta dando erro.

Saymon14 meu ot e 8.54 - 0.3.6 si eu coloca essas funçoes buga o meu ot intero ;s

po mano intao pq n mi ajuda eu fis tudo certo e deu akele erro qui eu puis ali em cima /\