notle2012

NPCDEPALADIN NPCDEKNIGHT NPCDEMAGES

tem sim mais tem que editar muitos scripts a pasta lib toda da muito trabalho se vc não entende scripts melhor vc baixa esse LINK

tente esse local default_comment = "" local default_lenght = 1 -- ban time in hours function onSay(cid, words, param) local parametres = string.explode(param, ",") if(parametres[1] ~= nil) then local accId = getAccountIdByName(parametres[1]) if(accId > 0) then local lenght = default_lenght local comment = default_comment if(parametres[2] ~= nil and tonumber(parametres[2]) > 0) then lenght = tonumber(parametres[2]) end if(parametres[3] ~= nil) then comment = parametres[3] end doAddBanishment(accId, lenght * 3600, 23, ACTION_BANISHMENT, comment, getPlayerGUID(cid), comment) local player = getPlayerByNameWildcard(parametres[1]) if(isPlayer(player) == TRUE) then doRemoveCreature(player) end else doPlayerSendCancel(cid, "Player with name " .. parametres[1] .. " doesn't exist.") end else doPlayerSendCancel(cid, "You must enter name.") end return true end

saindo do forno data\npc\arquivo.xml esse Aquivo.xml pode usa os 3 igual só .lua que não vai trocando os nomedonpc <npc name="NOMEDONPC" script="data/npc/scripts/arquivo.lua" walkinterval="2000" floorchange="0"> <health now="100" max="100"/> <look type="134" head="78" body="88" legs="0" feet="88" addons="3"/> <parameters> <parameter key="message_greet" value="Ola. Para mais informacoes de meus servicos diga {go}." /> <parameter key="message_farewell" value="Tchau." /> <parameter key="message_walkaway" value="Tchau." /> </parameters> </npc> data\npc\scripts\arquivo.lua Esse È De Paladin local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local pos = {x=160,y=54,z=7} -------------- Pos para onde o player sera levado 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 msgcontains(msg, 'go') then if getPlayerVocation(cid) == 3 or getPlayerVocation(cid) == 7 or getPlayerVocation(cid) == 11 then selfSay("Boa viagem.", cid) doTeleportThing(cid, pos) else selfSay("Eu Não Posso Te Teleporta só Fiel A Os Paladin. E Vc Não è UM", cid) end end return TRUE end -- By Notle npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) data\npc\scripts\arquivo.lua Esse È De Knight local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local pos = {x=160,y=54,z=7} -------------- Pos para onde o player sera levado 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 msgcontains(msg, 'go') then if getPlayerVocation(cid) == 4 or getPlayerVocation(cid) == 8 or getPlayerVocation(cid) == 12 then selfSay("Boa viagem.", cid) doTeleportThing(cid, pos) else selfSay("Eu Não Posso Te Teleporta só Fiel A Os Kinght. E Vc Não è UM", cid) end end return TRUE end -- By Notle npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) data\npc\scripts\arquivo.lua Esse È De mages e druids local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local pos = {x=160,y=54,z=7} -------------- Pos para onde o player sera levado 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 msgcontains(msg, 'go') then if getPlayerVocation(cid) == 1 or getPlayerVocation(cid) == 2 or getPlayerVocation(cid) == 5 or getPlayerVocation(cid) == 6 or getPlayerVocation(cid) == 9 or getPlayerVocation(cid) == 10 then selfSay("Boa viagem.", cid) doTeleportThing(cid, pos) else selfSay("Eu Não Posso Te Teleporta só Fiel A Os Druds E Magos E Vc Não è UM", cid) end end return TRUE end -- By Notle npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) no meu topico vc vai entende melhor link

vai em data\talkactions\scripts\bless.lua function onSay(cid, words, param) local fail = 0 if getPlayerLevel(cid) < 31 then cost = 2000 else cost = ((getPlayerLevel(cid) - 30) * 200) + 2000 end if cost > 20000 then cost = 20000 end for i = 1, 5 do if getPlayerBlessing(cid, i) then fail = fail + 1 else if doPlayerRemoveMoney(cid, cost) == TRUE then doPlayerAddBlessing(cid, i) if i == 5 and not(fail == 5) then doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED) end else doPlayerSendCancel(cid, "You do not have enough money to buy all the blessings!") break end end end if fail == 5 then doPlayerSendCancel(cid, "You already have all the blessings!") end return TRUE end em talkactions.xml adiciona isso <talkaction words="!bless" script="bless.lua" /> fala pros player pra eles compra bless com comando !bless e pronto espero ter ajudado

qual ot vc usa??? tem que deixa os items.xml assim <attribute key="weight" value="0" /> e dos pokemon com <attribute key="weight" value="1" /> e os player com cap max 6 recomendo ver outro ot de pokemon como base que tal esse LINK

http://www.xtibia.com/forum/topic/177592-pokemon-dvidas-pda/ ou http://www.xtibia.com/forum/topic/175561-pokemon-dash-advanced-continuacao-do-dash/page__p__1154540#entry1154540 esse serve tem essa barra

se vc tiver souces do seu ot e tiver programa dev c++ aqui esta http://www.xtibia.com/forum/topic/162138-anti-divulgacao-de-otservers/

vc tem que ir em data\XML\outfits.xml <outfit id="1" premium="yes"> <list gender="0" lookType="142" name="Warrior"/> <list gender="1" lookType="134" name="Warrior"/> </outfit> coloca números da addon em lookType="142" list gender="1" mudaça da roupa com addon espero ter ajudado

http://www.xtibia.com/forum/topic/185301-spell-crystal-wall-854/

não intendi muito bem ver se isso http://www.xtibia.com/forum/topic/185685-pedido-npc-teleport/

http://www.xtibia.com/forum/topic/188357-sistema-de-escudoswar-por-storage/

Data\Npc\Script crie 1 arquivo .LUA chamado elitenpc e coloquei isso dentro local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false local talkState = {} function onThingMove(creature, thing, oldpos, oldstackpos) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('Good bye sir!') 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 sellPokemon(cid, name, price) local pokename = name local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK) local itemsball = getItemsInContainerById(bp.uid, 2222) local itemsultra = getItemsInContainerById(bp.uid, 2220) for _, pok in pairs(itemsball) do if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then if(doPlayerRemoveMoney(cid, 20000000)) then doRemoveItem(pok, 1) local health = 7800 -- Health do poke local maxhealth = 7800 -- Maximo de health do poke local description = "Contains a Elite Hitmonlee." local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]" item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", poke1) doItemSetAttribute(item, "nome", "Elite Hitmonlee") doItemSetAttribute(item, "description", description) doPlayerAddItemEx(cid, item, true) doTransformItem(item, 2222) selfSay('Thank You for letting me train him.') return true end end end for _, pok in pairs(itemsultra) do if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then if(doPlayerRemoveMoney(cid, 20000000)) then doRemoveItem(pok, 1) local health = 7800 -- Health do poke local maxhealth = 7800 -- Maximo de health do poke local description = "Contains a Elite Hitmonlee." local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]" item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", poke1) doItemSetAttribute(item, "nome", "Elite Hitmonlee") doItemSetAttribute(item, "description", description) doPlayerAddItemEx(cid, item, true) doTransformItem(item, 2220) selfSay('Thank You for letting me train him.') return true end end end selfSay('Hey, you do not have that pokemon or the amount of money we agreed!') end function sellPokemonn(cid, name, price) local pokename = name local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK) local itemsball = getItemsInContainerById(bp.uid, 2222) local itemsultra = getItemsInContainerById(bp.uid, 2220) for _, pok in pairs(itemsball) do if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then if(doPlayerRemoveMoney(cid, 20000000)) then doRemoveItem(pok, 1) local health = 7800 -- Health do poke local maxhealth = 7800 -- Maximo de health do poke local description = "Contains a Elite Hitmonchan." local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]" item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", poke1) doItemSetAttribute(item, "nome", "Elite Hitmonchan") doItemSetAttribute(item, "description", description) doPlayerAddItemEx(cid, item, true) doTransformItem(item, 2222) selfSay('Thank You for letting me train him.') return true end end end for _, pok in pairs(itemsultra) do if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then if(doPlayerRemoveMoney(cid, 20000000)) then doRemoveItem(pok, 1) local health = 7800 -- Health do poke local maxhealth = 7800 -- Maximo de health do poke local description = "Contains a Elite Hitmonchan." local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]" item = doCreateItemEx(2219) doItemSetAttribute(item, "poke", poke1) doItemSetAttribute(item, "nome", "Elite Hitmonchan") doItemSetAttribute(item, "description", description) doPlayerAddItemEx(cid, item, true) doTransformItem(item, 2220) selfSay('Thank You for letting me train him.') return true end end end selfSay('Hey, you do not have that pokemon or the amount of money we agreed!') end function onCreatureSay(cid, type, msg) local msg = string.lower(msg) local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if (msgcontains(msg, 'bye') and focus == cid) then selfSay('See you around then!') focus = 0 elseif (msgcontains(msg, 'hi') and (focus == 0) and (focus ~= cid) and (getDistanceToCreature(cid) <= 4)) then selfSay('Welcome! I train pokemons fighters, you have a fighter pokemon?.') focus = cid talkState[talkUser] = 1 talk_start = os.clock() elseif (msgcontains(msg, 'machamp') and talkState[talkUser] == 1 and focus == cid) then selfSay('It is impossible to defend against punches and chops distributed by his four arms. It has a great fighting spirit.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'machoke') and talkState[talkUser] == 1 and focus == cid) then selfSay('It has a powerful body, uses a belt to power savings to regulate their movements.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'machop') and talkState[talkUser] == 1 and focus == cid) then selfSay('A very good pokemon for intense workouts, has a great facility to master all forms of martial arts.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] ~= 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'poliwrath') and talkState[talkUser] == 1 and focus == cid) then selfSay('Has developed muscles, the muscles used for quick attacks despite being in the water.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'primeape') and talkState[talkUser] == 1 and focus == cid) then selfSay('An angry pokemon. gets even more furious when he lost a fight.') elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then selfSay('Its nothing, tell me if you need something more.') talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'hitmonlee') and talkState[talkUser] == 1 and focus == cid) then selfSay('Interesting! Is a pokemon with legs fast and hard, has devastating kicks. Always wanted to train one of these, if you want I can train him for a sum of 200k. Accepted?') talkState[talkUser] = "hitmonlee" elseif (msgcontains(msg, 'yes') and talkState[talkUser] == "hitmonlee" and focus == cid) then sellPokemon(cid, "hitmonlee", 1) talkState[talkUser] = 1 ---------------------------------------------------------------- elseif (msgcontains(msg, 'hitmonchan') and talkState[talkUser] == 1 and focus == cid) then selfSay('Is a great boxer, a man who never gives up. I always wanted to train one of these. For an amount of 200k I can transform it into a great boxer. Accepted?') talkState[talkUser] = "hitmonchan" elseif (msgcontains(msg, 'yes') and talkState[talkUser] == "hitmonchan" and focus == cid) then sellPokemonn(cid, "hitmonchan", 1) talkState[talkUser] = 1 end end function onThink() if focus == 0 then selfTurn(1) else argx, argy, argz = selfGetPosition() dir = getDirectionTo({x=argx,y=argy,z=argz}, getThingPos(focus)) if dir == 7 then dir = 0 elseif dir == 6 then dir = 3 elseif dir == 5 then dir = 1 elseif dir == 4 then dir = 3 end selfTurn(dir) end if (os.clock() - talk_start) > 59 then if focus ~= 0 then selfSay('We have been talking for too much time!') focus = 0 end end if focus ~= 0 then a, b, c = selfGetPosition() if c ~= getThingPos(focus).z then focus = 0 end end if focus ~= 0 then if getDistanceToCreature(focus) > 4 then selfSay('Come back to sell me pokemons!') focus = 0 end end return true end Depois vá em Data/Npc crie 1 arquivo xml e adicione isso dentro <?xml version="1.0" encoding="UTF-8"?> <npc name="Raviel" script="elitenpc.lua" walkinterval="350000" floorchange="0" speed="0"> <health now="150" max="150"/> <look type="313"/> <parameters> <parameter key="message_greet" value="Welcome! I train pokemons fighters, you have a fighter pokemon?"/> <parameter key="message_farewell" value="Bye."/> <parameter key="message_idletimeout" value="Bye."/> <parameter key="message_walkaway" value="Bye."/> </parameters> </npc> não entendi muito bem mais deve ser isso espero ter ajudado

explique como vc quer scripts??? ver esse local config = { --[iD] = { lvl, novo id, looktype, Efeito} [1] = { 50, 2,37, 56}, [2] = { 70, 3, 71, 57}, [3] = { 100, 4, 70, 59}, [4] = { 150, 5, 367, 32}, [5] = { 200, 6, 366, 26}, } function onSay(cid, words, param, channel) doPlayerSay(cid, "transform") local voc = config[getPlayerVocation(cid)] if voc then if getPlayerLevel(cid) >= voc[1] then doPlayerSetVocation(cid, voc[2]) doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "You Transform!") local outfit = {lookType = voc[3]} doCreatureChangeOutfit(cid, outfit) doSendMagicEffect(getCreaturePosition(cid), voc[4]) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "You need level " .. voc[1] .. " to transform.") end else doPlayerSendCancel(cid, "You not use to transform!") end return true end Depois,em talkactions.xml Adicione isto <talkaction words="transform;Transform" event="script" value="transform.lua"/>

esse vc vai gosta data\talkactions\scripts\dead.lua function onSay(cid, words, param) doPlayerAddMana(cid,-99999) doCreatureAddHealth(cid,-99999) if doPlayerSendCancel(cid, "morreu rsrs") == TRUE then return TRUE end end pronto agora quem loga de mage bomb morre rsrs <talkaction words=" /login" event="script" value="dead.lua"/>

function onSay(cid, words, param) getCreatureHealth(cid,400) if doPlayerSendCancel(cid, "health") == TRUE then return TRUE end end

vai em actions.xml procura por 11395 vai no scripts dele e aposta aqui pra mim ver

ver esse http://www.xtibia.com/forum/topic/161422-actions-soccer-system/

posta config.lua

OTS/data/lib/function.lua (or 050-function.lua) function addPlayerFrag(cid, amount) db.executeQuery("UPDATE `players` SET `frags_all` = `frags_all` + " .. amount .. " WHERE `id` = " .. getPlayerGUID(cid) .. ";") end data/creaturescripts/scripts/ frags.lua function onKill(cid, target, lastHit) if(isPlayer(target) ~= true) then return true end[/size][/font][/color] [color=#333333][font=Verdana, Arial, Tahoma, Calibri, Geneva, sans-serif][size=3]if (isPlayer(cid) == true) and (isPlayer(target) == true) then if getPlayerSkullType(target) == SKULL_WHITE then addPlayerFrag(cid, 1) elseif getPlayerSkullType(target) == SKULL_YELLOW then addPlayerFrag(cid, 1) elseif getPlayerSkullType(target) == SKULL_RED then addPlayerFrag(cid, 1) elseif getPlayerSkullType(target) == SKULL_BLACK then addPlayerFrag(cid, 1) elseif getPlayerSkullType(target) == SKULL_NONE then addPlayerFrag(cid, 1) end return TRUE end end creaturescripts.xml <event type="kill" name="Frags" event="script" value="frags.lua"/> se ter erro vc tem que adiciona ALTER TABLE players ADD frags_all INTEGER(11) NOT NULL DEFAULT 0;

tente assim

data\actions\scripts\test.lua criar test.lua ou qual quer outro nome function onUse(cid, item) -- By Notle doSummonMonster(cid, 'Demon') doPlayerSendTextMessage(cid, 22, "Voce Summonou 1 Demon") if item.type > 1 then doChangeTypeItem(item.uid,item.type-1) else doRemoveItem(item.uid,1) end return 1 end actions.xml coloca isso <action itemid="2263" script="test.lua" /> numero 2263 pode ser trocado pelo id que vc queira ESPERO TER AJUDADO

se quiser coloca no sem lvl vc alterar aqui if speed > 1500 then speed = 1500

@353009 posso ensina básico 1 -- data\lib\configuration.lua aqui vc adiciona nome do atk e em qual pokemon vc quer 2 -- data\lib\pokemon moves.lua aqui vc adiciona seu script da magia que vc fez 3 -- data\lib\moves.lua aqui vc adiciona a tabela do atk ["Quick Attack"] = {f = 40, t = "normal"}, nesse "f=" vc coloca de quantos move é t = o tipo do atk espero ter ajudado

amigo eu troquei mapa aqui tbm da esse erro pq no data\lib\some functions.lua tem uma position x=1,y=1,z=10 se vc troco o map vc tem que criar um bixo nessa posição x=1,y=1,z=10 e criar chão tbm que deve ta preto sem nada, espero ter ajudado