Vodkart

acho que está faltando parte do script,porque não deu para entender nada... addEvent(trans7,ext,cid) parâmetros "trans7" e "ext" não tem ai... ou você só quer saber a função que é usada para aumentar o HP/MANA? ---EDITED aff cara tu reviveu um tópico de julho de 2010 -.-

vai em items.xml e procura o id do fire field ve se tem essa linha: <attribute key="duration" value="120" />

eu tenho o script aqui traper.lua function onStepIn(cid, item, pos) if(not isPlayer(cid)) then doTargetCombatHealth(0, cid, COMBAT_PHYSICALDAMAGE, -15, -30, CONST_ME_NONE) else doTargetCombatHealth(0, cid, COMBAT_PHYSICALDAMAGE, -50, -100, CONST_ME_NONE) end doTransformItem(item.uid, item.itemid - 1) doRemoveItem(item.uid) return true end movements.xml <movevent type="StepIn" itemid="2579" event="script" value="traper.lua"/>

ignorou o aviso da autoridade da seção? quer insistir em discutir então né,pois bem...reportado!

Postou 12 julho 2010 uishuihUIHSUIHSIUHiuhsuIHSui qndo eu tava começando scripting

... NPC NOME DO SEU NPC.XML <?xml version="1.0"?> <npc name="NOME DO SEU NPC" script="data/npc/scripts/NOME DO SEU SCRIPT.lua" walkinterval="5000" 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="Hello |PLAYERNAME|. want to buy some {items} ?" /> </parameters> </npc>

é pode ser tbm, iuhUIhsuiSHUsuiS só que o meu ta mais completinho e maior

/\ não vai funcionar,os locais estão faltando "," e um tem uma a mais function onUse(cid, item, frompos, item2, topos) local x = 62211 -- n mexa local h = 24 -- horas para voltar a usar alavanca local old = { [1] = getThingfromPos({x=155, y=52, z=7, stackpos=253}), [2] = getThingfromPos({x=155, y=53, z=7, stackpos=253}), [3] = getThingfromPos({x=156, y=52, z=7, stackpos=253}), [4] = getThingfromPos({x=157, y=53, z=7, stackpos=253}) } local new = { [1] = {x=160, y=54, z=7}, -- new pos player 1 [2] = {x=161, y=53, z=7}, -- new pos player 2 [3] = {x=163, y=54, z=7}, -- new pos player 3 [4] = {x=164, y=53, z=7} -- new pos player 4 } if getGlobalStorageValue(x) <= os.time() then for i = 1, #old do if not isCreature(old[i].uid) then return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você precisa de ".. #old .. " jogadores para fazer esta quest.") end end for i = 1, #old do doTeleportThing(old[i].uid, new[i]) doSendMagicEffect(new[i], 6) setGlobalStorageValue(x,os.time()+3600*h) end else horas = math.floor((getGlobalStorageValue(x) - os.time())/(3600)) minutos = math.floor((getGlobalStorageValue(x) - os.time())/(60)) if horas >= 1 then return doPlayerSendCancel(cid, "Você deve esperar ".. (horas < 0 and 0 or horas) .." horas para entrar na quest.") else return doPlayerSendCancel(cid, "Você deve esperar ".. (minutos < 0 and 0 or minutos) .." minutos para entrar na quest.") end end end

fiz aqui,só saber editar cara local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 SellItemVip(cid, message, keywords, parameters, node) if(not npcHandler:isFocused(cid)) then return false end if doPlayerRemoveItem(cid,parameters.item,parameters.count) then doPlayerAddItem(cid,parameters.reward,1) npcHandler:say('Thanks for buy ' .. getItemNameById(parameters.reward) .. '!', cid) else npcHandler:say('Sorry, you don\'t have ' .. parameters.count .. ' ' .. getItemNameById(parameters.item) .. '!', cid) end npcHandler:resetNpc() return true end local coin = 8300 -- id da sua coin keywordHandler:addKeyword({'items'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'I can sell {demon armor} and {demon helmet} for ' .. getItemNameById(coin) .. 's.'}) local node1 = keywordHandler:addKeyword({'demon armor'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you want buy demon armor for 30 ' .. getItemNameById(coin) .. 's ?'}) node1:addChildKeyword({'yes'}, SellItemVip, {item = coin,count = 30,reward = 2494}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Ok, then.', reset = true}) local node2 = keywordHandler:addKeyword({'demon helmet'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you want buy demon helmet for 50 ' .. getItemNameById(coin) .. 's ?'}) node2:addChildKeyword({'yes'}, SellItemVip, {item = coin,count = 50,reward = 2493}) node2:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Ok, then.', reset = true}) npcHandler:addModule(FocusModule:new()) vou explicar o básico,o resto vc edita local coin = 8300 -- id da sua coin count = 50 -- quanto irá custar o item reward = 2493 -- o item que o npc vai dar(vender) se o jogador tiver as coins.

Tem que colocar o nome dos pokemons entre [] e não {} certo: ["Bulbasaur"] = {price = 30000}, errado: {"Bulbasaur"} = {price = 30000},

você está testando com o god? tem que testar com jogador normal... e é só adicionar o nome e o preço do pokemon na lista =]

posta o seu script

@UP iSHUISHIUhIUhsiuhsuiHUISHuui nem sabia dessa,se entrego... e eu recebi rep- pq eu te denunciei,disse q vc tava criando conta fake para me banir ... deve ser porque meus codigos não funcionam que vem uma pá de gente me pedir script pelo msn/mp/e me chamar para equipe mente mais ;*

vlw obrigado galere

1° http://www.xtibia.com/forum/topic/142014-movements-summon-tile/

nem precisa criar função para isso é só usar else,e claro uma nova tabela de pokemons faceis rs

Opa valeu amigo tico e teco é bom ver que seu trabalho pode estar ajudando alguém :] abraços por trás

Sobre Obs: Primeiro aqui não é seção de mapping,fique bem ciente disto,aqui a área é dedicada a postar códigos,ou seja em todo tópico que você entrar raramente não irá ter um que não tenha linguagem LUA,área de mapping por sua vez é para postar show off,dúvidas sobre mapas,download de mapas,etc... lá você pode criticar ou dar conselhos o quanto quiser,agora vim para uma área chamada "pedidos de script" e vim com esses post que não levam a nada é com certeza flood,se eu bem me lembro você já foi banido algumas vezes,se eu fosse você ficava de olho bem aberto. Sobre Obs 1: Ah é?? Se você não tem nem capacidade para entender o pedido do usuário como irá fazer oque pede o mesmo? deve ser por isso que fica nesse discurso inútil.

tenta 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 -- Poke Master local items = getItemsInContainerById(item.uid, pokeoutmaster) 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, pokeinmaster) end local items2 = getItemsInContainerById(item.uid, pokeinmaster) 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 == pokeoutmaster or item.itemid == pokeinmaster 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, pokeinmaster) end end local items = getItemsInContainerById(item.uid, pokeoutmaster) 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, pokeinmaster) end local items2 = getItemsInContainerById(item.uid, pokeinmaster) 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 == pokeoutmaster or item.itemid == pokeinmaster 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, pokeinmaster) end -- Super Ball local items = getItemsInContainerById(item.uid, pokeoutsuper) 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, pokeinmsuper) end local items2 = getItemsInContainerById(item.uid, pokeinsuper) 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 == pokeoutsuper or item.itemid == pokeinsuper 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, pokeinsuper) end end local items = getItemsInContainerById(item.uid, pokeoutsuper) 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, pokeinsuper) end local items2 = getItemsInContainerById(item.uid, pokeinsuper) 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 == pokeoutsuper or item.itemid == pokeinsuper 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, pokeinsuper) end -- Great Ball local items = getItemsInContainerById(item.uid, pokeoutgreat) 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, pokeinmgreat) end local items2 = getItemsInContainerById(item.uid, pokeingreat) 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 == pokeoutgreat or item.itemid == pokeingreat 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, pokeingreat) end end local items = getItemsInContainerById(item.uid, pokeoutgreat) 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, pokeingreat) end local items2 = getItemsInContainerById(item.uid, pokeingreat) 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 == pokeoutgreat or item.itemid == pokeingreat 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, pokeingreat) 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 function onCreatureChangeOutfit(creature) end

magina vc lá de boa,compra o item da sorte no npc,ai chega ali na frente do dp,opa vamo ve que item eu vo ganha vamos ver... PORRA UM GHAZBARAN,AI SE ELE TIVER SEM AOL PERDE OS ITEMS e além disso mata todos os amigo/pessoas low level que tiver ali pela cidade uiHSUIHUISHiuHSUIhsUIHuishsuishUIUI sinitro irmao

porque em vez de criar um script gigantesco você não coloca chance de vim pokemon? chance em porcentagem tipo Pikachu = 40% Dewgong = 70% ....

essa action é para que servidor pokemon? Poke dash certo??

@UP function onUse(cid, item, frompos, item2, topos) config = { rmvitem = true, -- remover item ao usar? battle = true, -- precisa estar sem battle para teleportar? townp = true, -- teleportar para a cidade do jogador? pos = {x=151, y=54, z=7}, -- edite para usar só se townp é false pz = false, -- precisa estar em PZ? time_exausted = 10, -- em minutos storage = 95648 -- n mexa } if (config.battle == true) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then return doPlayerSendCancel(cid, "Você precisa estar sem o batlle.") elseif (config.pz == true) and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then return doPlayerSendCancel(cid, "Você precisa estar em Protection Zone.") elseif (getPlayerStorageValue(cid, config.storage) >= os.time()) then return doPlayerSendCancel(cid, "Espere alguns minutos para teleportar novamente.") elseif(config.rmvitem == true) then doRemoveItem(item.uid, 1) end if(config.townp == true) then doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) else doTeleportThing(cid,config.pos) end doCreatureSay(cid, "~ "..getPlayerName(cid).." Foi Teleportado. ~", TALKTYPE_ORANGE_1) doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED) setPlayerStorageValue(cid,config.storage,os.time()+config.time_exausted*60) return TRUE end

unica coisa que não curti foi os foguinhos ficarem ali no chão o resto ta foda '-' e spells tem que ter paciência pra cria vei pqp,por isso nem curto mto meche com spells acho chato uhsIUSHuisHSUIhusuiS abraços