rDs7008

@Foxkbt Sem querer ofender, mas eu diria que ninguém vai postar as source pra você, só por dois motivos: 1 - Poucas pessoas a tem; 2- Você só vem ao tópico quando precisa de ajuda, nunca vi você postando um desses sistemas do seu servidor. É só minha opinião, mas fica a dica. O script da shiny stone que tinham pedido, eu ja tinha feito, vou ver se acho aqui. Se achar jaja edito pra postar.

@all posso pedir pra vocês, quando forem usar Quote usarem SPOILER antes ? obrigado, o tópico agradece.

edited.

@stylo é só vc trocar os ids das shining balls no catch --' e sim, é claro que precisa ter a hyper ball e saffari ball shiny no cliente --'

Tabelas são estruturas, que podem facilitar muito a vida de um scripter, e podem ser usadas para diversas finalidades, fica a gosto de cada um como usar. Achei esse tutorial na internet, e gostei bastante dele, por isso trago para vocês do Xtibia Vamos ao tutorial: Tables Tables são estruturas multidimensionais que permitem o armazenamento de dados diversos. Sua declaração é semelhante a de variáveis. local tabela = { } O acesso a estes valores na table é feito a partir da utilização de colchetes. local tabela = { } tabela[1] = ‘Carro’ tabela[2] = ‘Moto’ local variavel = tabela[1] print(variavel) Uma outra forma de atribuir valores a uma table é durante a sua declaração. local tabela = {‘Carro’ , ’Moto’ , 3.14} Funções Básicas table.concat() Concatena os ítens da tabela local tabela = {'amarelo','azul','vermelho'} local var = table.concat(tabela) print(var) table.insert() Insere um valor na tabela. local tabela = {'amarelo','azul','vermelho'} table.insert(tabela,'verde') print(tabela[4]) É possível ainda, incluir o valor em uma posição determinada da tabela. local tabela = {'amarelo','azul','vermelho'} print(tabela[1]) table.insert(tabela,1,'laranja') print(tabela[1]) print(tabela[2]) Você pode ver que um novo texto foi incluído na primeira posição da table. O texto que originalmente estava na primeira posição passou a segunda posição. table.maxn() Retorna o maior índice numérico positivo da tabela. Caso a tabela não possua índice positivo, será retornado zero. local tabela = {'amarelo','azul','vermelho'} print(table.maxn(tabela)) table.remove() Revome da table o último elemento. local tabela = {'amarelo','azul','vermelho'} table.remove(tabela) for i=1, table.maxn(tabela) do print(tabela) end É possível ainda informar qual o índice do elemento que deverá ser removido local tabela = {'amarelo','azul','vermelho'} table.remove(tabela,2) for i=1, table.maxn(tabela) do print(tabela) end No exemplo anterior, removemos o segundo elemento da table. table.sort() Ordena os elementos da table local tabela = {'verde','amarelo','azul','vermelho'} table.sort(tabela) for i=1, table.maxn(tabela) do print(tabela) end Algumas destas funções permitem a inclusão de outros parâmetros, aumentando a gama de opções, no entanto, iremos nos restringir ao básico para desenvolvimento. Créditos: Versao Digital

@dz2 não era pra você, era pra todos em geral. mas se a carapuça serviu... é o seguinte, vc nao pode criticar os scripts, pelo simples fato, de que você não fez melhor, e não, não tinha nenhum deles em outro fórum. Se achou, manda o link pra mim por pm é por causa de gente como você que desanimo de sair postando todos os meus scripts. E a respeito do sistema de tm, eu ainda estava mechendo e sim, já arrumei ele todo agora, aparecendo na dex, nao aprendendo moves que nao são do seu tipo, e não deixando repetir moves originais. entao só te digo uma coisa: XIU. Ah, ia esquecendo, não vo discutir aqui, se quiser, me manda pm , se não, fica quetinho.

Pode parecer meio rude, mas sinceramente, a maioria aqui só vem assim : "Alguem faz tal script !" Como se o pessoal fosse fazer sistemas complicados, difíceis e simplesmente postar aqui, pra depois ainda encherem o saco, pedindo pra configurar --' O cara não sabe nem o que é abrir um script, tu dá as coisas prontas e o cara ainda não consegue usar! Sério, é muita cara de pau de muita gente ai. Fica a dica: Se tu nem ao menos compreende o script, não tenta sair fazendo otserv sem antes aprender pelo menos o básico --' @o que me perguntaram Não, não vou fazer, por que não tô afim. Só faço scripts que eu ache legal, e talvez vá usar. __ aproveitando o post @zeref entra no msn --'

Agora eu lembrei pq nao postava nada, eu que fiz esse script do rare candy ali com boost, e postei e o pessoal assume como se fosse deles enfim, bom proveito kk

Arrumei o sistema de tm, agora o pokemon só pode aprender os moves do seu tipo. Ex: blastoise só aprende moves de água. edit: 14:15 Daniel: Sorry, but this pokemon (type: dark/fire) cannot learn Technical Machine from this type (type: rock).

@off olha como ta ficando sistema de tm ai haha 20:03 Daniel: Hello Ricardo,! I see that your pokemon in your slot have actually: 1 moves. Do you wanna make it learn more? 20:04 Ricardo: yes 20:04 Daniel: To make your pokemon learn new moves, you must give me a Technical Machine ™. If you already have, tell me the number of T.M. you want your pokemon to learn. 20:04 Ricardo : 01 20:04 Daniel: Congratulations! Your pokemon learn the move 'Mega Punch' assigned as the Move 2! 20:05 Ricardo: Let's do it, Magikarp! 20:05 Ricardo: Magikarp, Mega Punch! __ edit : Terminado Funciona assim: Se o pokemon tem menos de 12 moves, ele coloca como o próximo move. Por exemplo: Magikarp, tem 1 move apenas, portanto se usar tm ele vai no lugar do move 2. E assim por diante. Agora se o pokemon tiver 12 Moves, o npc pede pra você escolher qual move quer trocar pelo T.M. Funcionando \o/

fala hitmonchan / hitmonlee depois yes

@pokemon aquele não funciona no server mesmo, fiz outro.

@pokemon o zeref é meu amigo sim, e a gente se ajuda de vez em quando haha haha antes meu tm system era tipo, adicionava mais ataques ao pokemon, agora coloquei pra substituir edit: aproveitando o post, acho que vou fazer o sistema de tms denovo, agora por npc. Tipo, você pega o item do tm, leva pro npc, ai o npc pergunta pra vc se vc quer substituir por algum dos 12 moves do seu pokemon, a nao ser que ele tenha menos de 12 moves, voce precisará substituir. O que acham ?

Eu já nao gosto de ficar editando ASKPEOASEK Tá feito tá feito, n precisa mecher haha e sim, tm é muitos arquivos T.T

Eu já tenho o sistema de tm's , fiz há muito tempo atrás, só não sei se vou postar

@fstatk i will think about it.

@cacaiu pra editar o level que os pokemons aparecem, vai no xml do pokemon e meche nessa parte: head="10" body="30" o Head é o level minimo e o Body é o level máximo

@Stylomaldoso ja arrumei, pediram ai um script de um item que aumentava os status de um pokemon... ta ai Segue o script, abaixo explico como configurar. Em actions.xml adicione: <action itemid="wwww;xxxx;yyyy;aaaa;zzzz" event="script" value="vitaminas.lua"/> Sendo: www = id do item que vai dar offense xxxx = id do item que vai dar defense yyyy= id do item que vai dar agility aaaa= id do item que vai dar vitality zzzz = id do item que vai dar specialattack vitaminas.lua function onUse(cid, item, frompos, item2, topos) tabela_status = { [wwww] = {name="offense", value = 10}, [xxxx] = {name="defense", value = 10}, [yyyy] = {name="agility", value = 10}, [aaaa] = {name="vitality", value = 10}, [zzzz] = {name="specialattack", value = 10}, } if #getCreatureSummons(cid) > 0 then doPlayerSendCancel(cid, "Please back your pokemon.") return false end local pb = getPlayerSlotItem(cid, 8) local pokename = getItemAttribute(pb.uid, "poke") doRemoveItem(item.uid, 1) local status = tabela_status[item.itemid] local pbstat= getItemAttribute(pb.uid, status.name) local st = pbstat + tabela_status[item.itemid].value doItemSetAttribute(pb.uid, status.name , st) doPlayerSendTextMessage((cid), 27, "Your "..pokename.." has eaned "..status.value.." "..status.name.." points!") doSendFlareEffect(getThingPos(cid)) return true end Lembrando de trocar as letras pelos mesmos ids que colocou no actions.xml Onde tem o value, em cada linha, vc troca por quanto de status ele vai ganhar. por exemplo, se o value da linha de offense for 100, o pokemon vai ganhar 100 de ofense quando usar o item wwww.

@henrique nao testei ainda, mas ta aí a action do rarecandy dando boost: rarecandy.lua function onUse(cid, item, frompos, item2, topos) if not isCreature(item2.uid) or not isSummon(item2.uid) then doPlayerSendCancel(cid, "You can only give this candy to trainers' pokemons.") return true end if getCreatureHealth(item2.uid) == 0 then return true end local pb = getPlayerSlotItem(getCreatureMaster(item2.uid), 8) doPlayerSendTextMessage(cid, 27, "You gave a rare candy to "..getPokeName(item2.uid)..".") doCreatureSay(cid, getPokeName(item2.uid)..", take this candy!", TALKTYPE_SAY) doRemoveItem(item.uid, 1) local boost = getItemAttribute(pb.uid, "boost") or 0 if boost >= 50 then doPlayerSendCancel(cid, "Your pokemon is already at maximum boost.") return true end local pokemon = getItemAttribute(pb.uid, "poke") local off = pokes[pokemon].offense * boost_rate local def = pokes[pokemon].defense * boost_rate local agi = pokes[pokemon].agility * boost_rate local spatk = pokes[pokemon].specialattack * boost_rate local vit = pokes[pokemon].vitality * boost_rate doItemSetAttribute(pb.uid, "offense", getItemAttribute(pb.uid, "offense") + off) doItemSetAttribute(pb.uid, "defense", getItemAttribute(pb.uid, "defense") + def) doItemSetAttribute(pb.uid, "speed", getItemAttribute(pb.uid, "speed") + agi) doItemSetAttribute(pb.uid, "specialattack", getItemAttribute(pb.uid, "specialattack") + spatk) doItemSetAttribute(pb.uid, "vitality", getItemAttribute(pb.uid, "vitality") + vit) doCreatureSay(item2.uid, "Yum.", TALKTYPE_ORANGE_1) doItemSetAttribute(pb.uid, "boost", boost + 1) doPlayerSendTextMessage(getCreatureMaster(item2.uid), 27, "Your "..getPokeName(item2.uid).." has eaten a rare candy!") local msg = "Your "..getPokeballName(pb.uid).." ["..getItemAttribute(pb.uid, "level").."] has been boosted!" local msg2 = "• Boost: "..(boost).." (+1) • Offense: +"..doMathDecimal(off).." • Defense: +"..doMathDecimal(def).." • Spc. Atk: +"..doMathDecimal(spatk).." • Agility: +"..doMathDecimal(agi).." • Vitality: +"..doMathDecimal(vit).."" doPlayerSendTextMessage(cid, 27, msg) doPlayerSendTextMessage(cid, 27, msg2) doSendFlareEffect(getThingPos(item2.uid)) doSendAnimatedText(getThingPos(item2.uid), "Boost!", 215) return true end Edit: Ja arrumei agora ta funcionando

@henrique vlw, esse script do rare candy dando boost vc quer como? dar level e boost ou só boost ?

@Brunnoo Troca Hitmonchan ou Hitmonlee +20 por elite hitmochan/elite hitmonlee

Vou pensar nisso, se eu fizer eu posto aqui.

@maguito, sim ja fiz isso uma vez mas cara, envolve muitos arquivos ;S

@zeref Então, eles tinham pedido uma base, acho que nao precisaria mais do que isso para ser um script - base. kkk Fiz rapidinho, só testei 1x e postei haha haha pelo visto tu ainda ta se empenhando pra caramba desenvolvendo funcao pra tudo... isso é ótimo na real, melhora 100% o script Continue assim emo Fiz o npc de elite chan / lee, segue abaixo Xml do npc <?xml version="1.0" encoding="UTF-8"?> <npc name="Ricardo" script="elite.lua" walkinterval="350000" floorchange="0" speed="0" lookdir="2"> <health now="150" max="150"/> <look type="614" head="80" body="104" legs="86" feet="0"/> <parameters> </parameters> </npc> elite.lua local focus = 0 local max_distance = 8 local talk_start = 0 local conv = 0 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) end function onThink() npcHandler:onThink() end function onCreatureSay(cid, type, msg) local msg = string.lower(msg) if focus == cid then talk_start = os.clock() end if (msgcontains(msg, 'hi') and focus == 0) then selfSay("Hello "..getCreatureName(cid)..",! I can change your {Hitmonlee +20} for {Elite Hitmonlee} and {Hitmonchan +20} for {Elite Hitmonchan}. ",cid) conv = 1 end if (msgcontains(msg, 'hitmonchan') and conv == 1) then selfSay("Do you wanna change your {Hitmonchan +20} + 200k for {Elite Hitmonchan} ?",cid) conv = 2 elseif (msgcontains(msg, 'hitmonlee') and conv == 1) then selfSay("Do you wanna change your {Hitmonlee +20} + 200k for {Elite Hitmonlee} ?",cid) conv = 2 elseif (msgcontains(msg, 'yes')) then if #getCreatureSummons(cid) > 0 then doPlayerSendCancel(cid, "Please back your pokemon.") return false end if conv == 2 then pb = getPlayerSlotItem(cid,8).uid local poke = getItemAttribute(pb, "poke") local level = getItemAttribute(pb, "level") local novopoke = "Elite "..poke.."" if poke == "Hitmonchan" or poke == "Hitmonlee" then local boost = getItemAttribute(pb, "boost") if not boost then selfSay("Your pokemon did not have required boost level (+20).",cid) conv = 0 return false end if boost >= 20 then if (doPlayerRemoveMoney(cid,2000000) == true) then doItemSetAttribute(pb, "poke", novopoke) doItemSetAttribute(pb, "boost", 0) doItemSetAttribute(pb, "offense", pokes[novopoke].offense * level) doItemSetAttribute(pb, "defense", pokes[novopoke].defense * level) doItemSetAttribute(pb, "speed", pokes[novopoke].agility * level) doItemSetAttribute(pb, "vitality", pokes[novopoke].vitality * level) doItemSetAttribute(pb, "specialattack", pokes[novopoke].specialattack * level) selfSay("Take it.",cid) conv = 0 else selfSay('Sorry '.. getCreatureName(cid) ..', but you dont have enough gold', cid) conv = 0 end else selfSay("Your pokemon did not have required boost level (+20).",cid) conv = 0 end else selfSay("What?!",cid) conv = 0 end else selfSay("What?!",cid) conv = 0 end end --negation messages if msgcontains(msg,'no') and focus == cid and conv > 0 then selfSay('Ok, bye.',cid) conv = 0 return true end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Eu já resolvi no meu servidor, só que faz tempo, e não lembro mais :S __ Saindo aqui agora, tenho que sair cedo amanha... a tarde eu volto pra resolver possíveis bugs se deixarem idéias boas eu faço uns sistemas novos.