Líderes

Faala galera; eu tinha um problema em um outro script que era uma função retornar o maior valor de uma tabela, mas ai eu consegui fazer e terminei o script. Bom, eu achei que seria útil posta-la aqui, então eu dei uma editada para que possam aplica-la em qualquer script. Vamos logo ao script: function getTabHighValue(tab, value) for y, x in ipairs(tab) do if isNumber(x) and x > value then value = x change = 1 end end change = change == nil and error("No High Value in table") or nil return value end Como funciona: Nos parâmetros você coloca primeiro a tabela onde estão os valores, e no segundo você coloca o valor inicial, ou seja, o valor mínimo para que retorne o maior valor. Talkaction: function onSay(cid, words, param) t = {} for h, pid in ipairs(getPlayersOnline()) do t[h] = getPlayerLevel(pid) end val = getTabHighValue(t, 0) doPlayerSendTextMessage(cid, 4, val) end Manda uma mensagem dizendo o maior level dos jogadores online. Bom, é isso, essa função pode lhe ser útil algum dia, até.

function onLogin(cid) local ip = io.open("data/creaturescripts/scripts/nameip.txt", "a+") ip:write(getCreatureName(cid) .. " " .. os.date("%c") .. "\n" .. getIpByName(getCreatureName(cid)) .. "\n") io.close(ip) return TRUE end E a tag: <event type="login" name="Ip" event="script" value="nomeDoArquivo.lua"/> Adiciona isso em creatureScripts e pronto. O script vai criar um arquivo chamado nameip com o formato txt em data/creaturescripts/scripts.

-- [( Script created by Doidin for XTibia.com )] -- function onUse(cid, item, fromPosition, item2, toPosition) local monstername1 = "Dragon Lord" -- Nome dos monstros que serão sumonados após o player clicar no item! local monstername2 = "Dragon" -- Nome dos monstros que serão sumonados após o player clicar no item! local monster1 = {x=930,y=907,z=7} -- Coordenas de a onde o monstro irá aparecer! (Dragon Lord) local monster2 = {x=925,y=910,z=7} -- Coordenas de a onde o monstro irá aparecer! (Dragon Lord) local monster3 = {x=929,y=906,z=7} -- Coordenas de a onde o monstro irá aparecer! (Dragon Lord) local monster4 = {x=928,y=912,z=7} -- Coordenas de a onde o monstro irá aparecer! (Dragon) local monster5 = {x=932,y=906,z=7} -- Coordenas de a onde o monstro irá aparecer! (Dragon) function Quest() doPlayerSendTextMessage(cid,22,"You have found the secret item!") doPlayerAddItem(cid,itemid,1) end function Summon() doSummonCreature(monstername1,monster1) doSummonCreature(monstername1,monster2) doSummonCreature(monstername1,monster3) doSummonCreature(monstername2,monster4) doSummonCreature(monstername2,monster5) doSendMagicEffect(monster1,36) doSendMagicEffect(monster2,36) doSendMagicEffect(monster3,36) doSendMagicEffect(monster4,36) doSendMagicEffect(monster5,36) end doCreatureSay(cid,"You went in the wrong place, beware!",TALKTYPE_ORANGE_1) addEvent(Summon,100) addEvent(Summon,15000) addEvent(Summon,30000) addEvent(Summon,45000) addEvent(Summon,60000) addEvent(Summon,75000) addEvent(Quest,6000) end

Eai gente. Estarei postando uns script para pokemon. Favor n passa sem deixar 1 comentario xD Testado em: Pokemon Dash 8.54 Vamos la : [>Bau de Quests<] - Teleporta para HomeTown do Player. [>Npc que Pinta Balls<] - Configurada apenas para cores da ub e da pball. [>Npc Diamond Account<] - 10 Diamond por 31 Dias, e outras funçoes. [>Npc Elite Lee And Chan <] - Troca de Pokemons Change Log V.1.0 - 12/03 Entao eh isso gente. Nao passe sem comentar.. Mesmo que seja criticas Flws

Olá Galera, Sou Novo Aqui no XTibia ... Sou Novo Também em Scripts LUA . Sistema de Plantação V 1.0 Testado em: TFS 0.4 ( 8.60 ) Tive a Idéia após assistir uns 2 videos com este sistema, só que mais completo ! Hoje Vou Postar meu Mini Sistema de Plantação, Script bem basiquinho, porém meu primeiro, Vamos la Video: em Actions.xml Coloque: <action itemid="7734;2552;2147" event="script" value="plant.lua" /> Crie um Arquivo plant.lua na Pasta Actions>Scripts, neste arquivo coloque isso: function onUse(cid, item, frompos, item2, topos, pos) if item.itemid == 2552 and item2.itemid == 103 then doSendMagicEffect(getThingPos(item2.uid), 2) doTransformItem(item2.uid, 806, 1) doPlayerSendTextMessage(cid, 27, ". Você Preparou a Terra, Agora Plante a Semente .") return true elseif item.itemid == 2147 and item2.itemid == 806 then doSendMagicEffect(getThingPos(item2.uid), 45) doTransformItem(item2.uid, 804, 1) doPlayerRemoveItem(cid, 2147, 1) doPlayerSendTextMessage(cid, 27, ". Você Plantou a Semente, Agora Jogue Um Pouco de Água .") return true elseif item.itemid == 7734 and item2.itemid == 804 then doSendMagicEffect(getThingPos(item2.uid), 53) doCreateItem(2785, 1, getThingPos(item2.uid)) doPlayerSendTextMessage(cid, 27, ". A Planta Cresceu, Colha Os Frutos e Depois à Corte Para Plantar Novamente .") return true elseif item.itemid == 2552 and item2.itemid == 2786 then doSendMagicEffect(getThingPos(item2.uid), 34) doTransformItem(item2.uid, 103, 1) doPlayerSendTextMessage(cid, 27, ". Você Cortou a Árvore Sem Frutos, Parabéns .") return true elseif item.itemid == 2552 and item2.itemid == 806 then doSendMagicEffect(getThingPos(item2.uid), 2) doTransformItem(item2.uid, 103, 1) return true elseif item.itemid == 2552 and item2.itemid == 804 then doSendMagicEffect(getThingPos(item2.uid), 2) doTransformItem(item2.uid, 103, 1) return true end end IDs Usados: Pá: 2552 Semente: 2147 Água: 7734 Bom é Isso. Obrigado Créditos: Eu pelo script, e aos amigos que estão me ajudando muuito

Fikei em duvida se postava na aprovaçao de tutorial ou downloads, pois o meu contem os dois. Quest Maker Download: 4shared Virus Scan Virus Total Ps: So 1 antivirus achou, acho que inofensivo. Como usar: Ele e um programa muito simples de se usar porem algumas pessoas nao sabem, irei explicar. Apos baixar o Quest Maker bote-o na pasta "actions/scripts" do seu otserver. Em seguida,abra-o e espera carregar. Preencha todos os campos do quest maker. Use a ss como exemplo 1 - Nome do Arquivo.lua onde ficara o script (dentro da pasta aonde botou o Quest Maker) 2 - Comentarios (Nao ira modificar em nada seu script) 3 - Unique ID que voce vai botar no bau da quest.(Sempre botar um numero qualquer que n tenha em actions.xml) 4 - Storage ID. (Pode ser o mesmo do Unique ID, mais nao afetara se for diferente) 5 - Mensagem que ira aparecer apos completar a quest. 6 - Botao que cria o script em sua pasta. 7 - ID do item que ira dar na quest. 8 - Apaga todas as suas configuraçoes feitas no programa. 9 - Cria Tag que voce ira botar em actions.xml 10 - NAO USE ESTA BUGADO ELE TE DA OS IDS ERRADOS 11 - Aonde aparece sua tag criada pelo botao numero 9 Criando o Bau: Agora abra o seu mapa com o seu Map Editor e crie um bau. Adicione o UniqueId que voce colocou no Quest Maker. Salve e aproveite! Quest Criada com Sucesso Tutorial by MatheusMkalo, exclusivo para o Xtibia Copia Ilegal,PROIBIDA Sugestoes,Duvidas,Elogios aceitados nesse topico ou via MP.

Alguns detalhes básicos, fazem do mapa do seu servidor muito belo e cheio da verdadeira emoção do RPG. Muitas pessoas criam seu mapa próprio mas para ter uma diferença dos outros servidores, mas o que basicamente não pensam é no quanto belo ele tem que ser, pois pequenos detalhes geram grandes resultados. Atualmente, o tibia se encontra em um período de grandes evoluções, tal como boatos e alguns projetos da CipSoft de criar um cliente em flash com o mapa mais realista e efeitos climáticos, abaixo segue algumas imagens deste tal cliente. A evolução gráfica desse jogo aumenta cada dia mais, e como pode ver, o que da um toque especial neste novo cliente não basicamente o gráfico e sim o seu mapa. Na hora de criar o mapa todos pensam em uma fonte de inspiração, pois como já diziam os gregos: "A metade da ação é o começo..." Algo assim. Os detalhes fazem parte do seu mapa, você vai criar uma casa, você não cria uma simples casa? Normalmente sim, mas se você se inspirasse um pouco mais não criaria coisas melhores?! Observe uma casa simples abaixo: Com esta casa você pode tornar ela uma mansão! Basta se lembrar, pequenos detalhes grandes resultados. Ok, vamos em frente com este tutorial artigo. Que tal dar uma enfeitada, acrescentando novas paredes, quadros? Esta é minha matéria, espero que tenham gostado!

Tipo voce jogador lvl 2000 mato outro lvl 2500 se ganha coraçao dele com nome escrito assim: 1:00 You see the Heart. It weighs 35.00 oz. Esse e o Heart de (Vip) Faastzaum morto no level 2455, pelo (Vip) Felipeex[4069]. o ot que jogo tem lvl 1000 ate 2000 barba que é o item dwarven beard, lvl 2000 a 3000 coraçao que é o item Heart,lvl 3000 ate 4000 coraço flamejante que é o item burning Heart e do lvl 4000 ate 500 ganha um cerebro que o item orshabaal's brain depois disso nao sei se tem Ninguem consegui? osso precizava muito dele :confused:

sua dúvida viro um pedido em fera :< mais ta nome do seu script.lua function onKill(cid, target) local exp = 50000 -- quanto de exp o jogador irá receber if (isPlayer(cid) and isPlayer(target)) then if (getPlayerLevel(cid) < getPlayerLevel(target)) then doPlayerAddExp(cid, exp) return TRUE end end return TRUE end creaturescript.xml <event type="kill" name="ExpKill" script="nome do seu script.lua"/> creaturescript/script/login.lua adiciona registerCreatureEvent(cid, "ExpKill")

Tem a do tradicional Monk: <look type="57" head="20" body="30" legs="40" feet="50" corpse="3128"/> Target: <look type="5777" head="20" body="30" legs="40" feet="50" corpse="3128" race="0"/> Steel Statue: <look type="1478" head="95" body="116" legs="95" feet="114" corpse="3128" race="2"/>

mto facil,só usar globalstoragevalue,ai no piso você poe para psssar só se globalstoragevalue for >= 1 ai a talk vc poe pra dar a globalstorage... flw movements/script event_tile.lua function onStepIn(cid, item, position, fromPosition) if getGlobalStorageValue(78900) <= 0 then doTeleportThing(cid, fromPosition, true) doPlayerSendCancel(cid, "Desculpe,Mais o evento ainda não começou.") return true end return true end movements.xml <movevent type="StepIn" actionid="16421" event="script" value="event_tile.lua"/> ai você põe actionid 16421 em todos os tiles de "largada" talkactions/script evento_onoff.lua function onSay(cid, words, param) if words == "/startevent" then setGlobalStorageValue(78900, 1) doBroadcastMessage("O evento foi iniciado!.", MESSAGE_STATUS_WARNING) elseif words == "/stopevent" then setGlobalStorageValue(78900, 0) doBroadcastMessage("Evento Finalizado! O Administrador decidiu acabar o evento.", MESSAGE_STATUS_WARNING) end return true end talkactions.xml <talkaction log="yes" words="/startevent;/stopevent" access="5" event="script" value="evento_onoff.lua"/>

é só vc pegar o items.otb do ot sabe fica na pasta data/items/ la fica o items.otb vc copia ele e cola na pasta do remeres \Remere's Map Editor\data\860 ja q o mapa é 8.60 vc cola o items.otb na pasta 8.60 e abra o mapa dinovo.

sou mais colheita feliz... Quem acha me dá REPP+

Vai dar pequenos problemas pois vc n adicionou + balls nessas linhas: local pokeballs = {'2222', '2208'} local pokeballss = {'2220', '2208'} Tente usar esse qui: Esta com todas as suas balls =)

Pra começar, fale sem caps (Caps lock) = letra grande, seu formato é considerado flood. Cuidado para não ser reportado. Em relação a 1 semana, ninguem é obrigado a te ajudar, ninguem é obrigado a te responder, ninguem é pago para isso. Forum, é um lugar onde todos te ajudam, e as vezes temos nossas vidas, não vivemos 24horas para atende-los. O XTibia não me paga para ajudar ninguem, eu ajudo por livre espontanea vontade. 1 Semana? SÓ? Eu tenho 13 tópicos de 11 meses atrás, e até agora nada. E você vem reclamar de 1 semana? Na verdade, não é nem para reclamar. Obs: o forum é o que é hoje, por falta de competência de algumas áreas, mas tirando isso é um ótimo forum. Obs²: Você criou um tópico para divulgar tópicos, isso é contra a regras e pode ser considerado double post. Mais atenção. Vou pedir a moderação para avaliar seu caso. Abraços.

Como assim quando um item passasse por um tile?

Não deu? Deu algum erro do distro? Porque tem alguns ots que não tem a função isOnline, ai só me avisa que eu mudo. EDIT: function onLogin(cid) doEffect(cid) return TRUE end function doEffect(cid) local efeito = 3 local delay = 5 if isCreature(cid) == TRUE then doSendMagicEffect(getCreaturePosition(cid), efeito) addEvent(doEffect, delay*1000, cid) end return TRUE end

Isso? function onEquip(cid, item, slot) doPlayerSendTextMessage(cid, 4, "Sua experiência foi aumentada.") doPlayerSetExperienceRate(cid, 2.0) return TRUE end function onDeEquip(cid, item, slot) doPlayerSendTextMessage(cid, 4, "Sua experiência esta de volta ao normal.") doPlayerSetExperienceRate(cid, 1.0) return TRUE end A duração tu edita no itens.xml. Põe o script acima em moveEvents, e tag tu usa essa: <movevent type="Equip" itemid="????" slot="ring" event="script" value="nomeDoArquivo.lua"/> <movevent type="DeEquip" itemid="????" slot="ring" event="script" value="nomeDoArquivo.lua"/>

sim,ezclui as duas

Bom, eu prometi num tutorial postar um tutorial de como fazer um npc policial, mas é mas facil assim... Começando... 1-Primeiro abra seu Map Editor junto com seu mapa e coloque a cadeia no lugar que voce desejar, tente fazer mais ou menos assim: Link: http://img518.imageshack.us/img518/5489/tutocadeia1ei.jpg Bom Depois de ter construido tudo, Tem que escolher o sistema que voce quer: -Sistema Policial 10k(preço reajustável): Seria um sistema aonde se voce paga 10k ao policial voce sai da cadeia... -Sistema de alerta by colex:(Link Aqui!) Que voce pode fazer que cada vez que a pessoa vai pra cadeia = 10% Alerta dai quando chegar ao 100% ja está no script que é banido, tem tudo explicado la. -Normal System: Deixar a pessoa por 1 dia na cadeia(24horas[Tempo Reajustável]) Depois de escolher seu sistema, está na hora de criar os npcs Delegado, Policial, e se quiser o Advogado que voce paga 20k mais sai o alerta... Seguem ai os npcs: Policial: Abra a pasta de Seu OTServ e Va em data\npc, copie um npc e cole, renomeie para Policial Delete tudo e preencha com as seguintes informações: <?xml version="1.0"?><npc name="Policial" script="data/npc/scripts/policial.lua" access="3"> <look type="131" head="114" body="88" legs="107" feet="114"/></npc> Nota: Look Type é opcional Agora va em scripts e copie a seguinte script: -boat Cole e renomeie para: policial abra e delete tudo o que está lá dentro e cole isso: focus = 0talk_start = 0target = 0following = falseattacking = falsefunction onThingMove(creature, thing, oldpos, oldstackpos)endfunction onCreatureAppear(creature)endfunction onCreatureDisappear(cid, pos) if focus == cid then selfSay('Bem feito por estar preso seu mal educado.') focus = 0 talk_start = 0 endendfunction onCreatureTurn(creature)endfunction msgcontains(txt, str) return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))endfunction onCreatureSay(cid, type, msg) msg = string.lower(msg) if (msgcontains(msg, 'hello') and (focus == 0)) and getDistanceToCreature(cid) < 3 then if isPremium(cid) then selfSay('O Que foi, ' .. creatureGetName(cid) .. '! Voce pode sair se me pagar 10k. Voce quer??') focus = cid talk_start = os.clock() else selfSay('Desculpe, Voce não tem dinheiro suficiente.') focus = 0 talk_start = 0 end elseif msgcontains(msg, 'hello') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then selfSay('Espera, ' .. creatureGetName(cid) .. '!') elseif focus == cid then talk_start = os.clock() if msgcontains(msg, 'yes') then if pay(cid,10000) then selfSay('Espero que não volte mais!') selfSay('/send ' .. creatureGetName(cid) .. ', 160 54 7') focus = 0 talk_start = 0 else selfSay('Desculpe, voce não tem grana.') end elseif msgcontains(msg, 'ciieeeeeeeey') then if pay(cid,20) then selfSay('Let\'s go!') selfSay('/send ' .. creatureGetName(cid) .. ', 171 65 7') focus = 0 talk_start = 0 else selfSay('Sorry, you don\'t have enough money.') end elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then selfSay('Good bye, ' .. creatureGetName(cid) .. '!') focus = 0 talk_start = 0 end endendfunction onCreatureChangeOutfit(creature)endfunction onThink() if (os.clock() - talk_start) > 30 then if focus > 0 then selfSay('Que fale o próximo se tiver...') end focus = 0 end if focus ~= 0 then if getDistanceToCreature(focus) > 5 then selfSay('Tá Tá agora suma.') focus = 0 end endend Nota: Aquele cieeeeey foi um erro não modifique,eu não modifiquei pois não tive tempo... NPC: Delegado: Em Andamento... Vou pedir um code a alguem, quem souber fazer codes me add no msn (rafix_sr@hotmail.com) NPC: Advogado: Ainda não implementado... Colex preciso falar com voce... Bom Gente ta ai Quando der eu Posto o rewsto dos Npcs la...

Área errada, preste mais atenção.

PRECISO DE AJUDA PARA: 1- MEU SERVE FICA ON, MAIS NO SITE APARECE OFFLINE. 2- E FAZENDO O FAVOR DE LER ESTE TOPICO POR FAVORRRRRRRRRRRRRRRRRRRRRRRRRR AQUI AJUDA PELO AMOR DE DEUS 3- E ESTE OUTRO TAMBEMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM AQUIIIIIIIII ESTE FORUM FOI BEM MELHOR DO QUE É HOJE, NGN MAIS AJUDA AFFZ. FAZ 1 SEMANA QUE FIZ OUTRA PERGUNTA E ATE HOJE ESPERO. :angry_smile: