Killua

kkkkkkkkk, o nome fica a criterio de cada um ai

Ah sim... É, dá pra dizer que é parecido

Que dado?

PS: Meu teclado nao tem ascentos nem cedilha, nao reparem na grafia. Eae , vou postar um script que eu fiz. Eu utilizava ele no meu antigo servidor, o Mell World, pois ja que o server esta fexado eu nao queria que esse script fosse esquecido. Ele faz o seguinte: Quando usado, ele oferece 3 opcoes: Ser teleportado para uma area exclusiva de hunt, onde se pode permanecer por no maximo 1 hora (configuravel), uma vez por dia Sumonar um monstro diferente (no meu ot eu tinha criado a Alma Penada, que dropava itens exclusivos) Simplesmente perder 500 vida. Ele so pode ser usado a cada 15 minutos e, dependendo de qual opcao for sorteada, faz o player falar algo. Script (actions/scripts/necronomicon.lua) local hunt = {x=596, y=1037, z=4} local options = { [1] = {name = "teleportar"}, [2] = {name = "sefrodo"}, [3] = {name = "summon"} } function onUse(cid, item, fromPosition, itemEx, toPosition) if isCreature(cid) then local fazer = options[math.random(1, #options)] if getPlayerStorageValue(cid, 12391) < os.time () then setPlayerStorageValue(cid, 12391, os.time () + 15*60) if fazer.name == "teleportar" then if getPlayerStorageValue(cid, 12481) < os.time () then setPlayerStorageValue(cid, 12481, os.time () + 60*60*24) addEvent(voltarprotemplo, 1000*60*60, cid) doTeleportThing(cid, hunt) setPlayerStorageValue(cid, 24739, 1) doSendMagicEffect(hunt, CONST_ME_TELEPORT) doCreatureSay(cid,"Aha! Consegui decifrar o caminho secreto!",TALKTYPE_ORANGE_1) else doPlayerSendCancel(cid,"Voce nao pode entrar na are 64 mais de uma vez por dia") end elseif fazer.name == "sefrodo" then doCreatureAddHealth(cid, -500) doCreatureSay(cid,"Cada coisa que esta escrita nesse livro... Nao consigo suportar!",TALKTYPE_ORANGE_1) elseif fazer.name == "summon" then doCreateMonster("Alma Penada",getCreaturePosition(cid)) doCreatureSay(cid,"Nao era bem isso que eu queria, mas...",TALKTYPE_ORANGE_1) end else doPlayerSendCancel(cid, "Você so consegue ler a cada 15 minutos! Espere.") end function voltarprotemplo(cid, pos) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) setPlayerStorageValue(cid, 24739, -1) doPlayerSendTextMessage(cid, 22, "Voce ja atingiu seu limite de permanencia na Area 64, voce foi teleportado para o templo") end end return true end

Oi amigo, aqui está um sistema bem simples de VIP por char: function onUse(cid, item, fromPosition, itemEx, toPosition) local config={ removeOnUse = "yes" -- remover quando usar ("yes" or "no") } local days = 30 -- dias que serão adicionados local daysvalue = days * 24 * 60 * 60 local storageplayer = getPlayerStorageValue(cid, 13546) local timenow = os.time() if getPlayerStorageValue(cid, 13546) - os.time() <= 0 then time = timenow + daysvalue else time = storageplayer + daysvalue end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.") setPlayerStorageValue(cid, 13546, time) local quantity = math.floor((getPlayerStorageValue(cid, 13546) - timenow)/(24 * 60 * 60)) doSendMagicEffect(getPlayerPosition(cid), math.random(28,30)) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de VIP restantes.") if (config.removeOnUse == "yes") then doRemoveItem(item.uid, 1) end return TRUE end E para os VIPs receberem 35% a mais de exp vc usa esse código: local expextra = 1.35 -- 35% de exp function onLogin(cid) if getPlayerStorageValue(cid, 13546) == 1 then doPlayerSetExperienceRate(cid,expextra) doPlayerSendTextMessage(cid,21,"Você tem 35% a mais de exp por ser vip ") else doPlayerSendTextMessage(cid,21,"Torne-se vip e ganhe 35% a mais de exp") end return TRUE end com a tag <event type="login" name="expvip" script="XXXX.lua"/> e no login.lua vc adiciona: registerCreatureEvent(cid, "expvip") Qualquer dúvida pode me perguntar

ADICIONADO WAR SYSTEM COM ESCUDOS E CIDADES DO GLOBAL

Nao fica muito pratico fazer isso em todas as quests... E tambem quem esta assistindo pode mover os itens que estao por perto e tambem ficar falando. O script eh otimo, nao posso negar, mas preciso arrumar os bugs antes de usar...

Bugadissimo, nao compensa utilizar

ATUALIZADO ADICIONADO WAR SYSTEM COM ESCUDOS E CIDADES DO GLOBAL Mell World agora 8.60!! Acesse o site http://mellworld.no-ip.info Mell World 8.60, criado em 2009, agora esta online de novo! Exp por stages, inciando com 100x Skills: 10x Magic Level: 9x Loot: 2 IP: mellworld.no-ip.info Para entrar, use a versao 8.60 com o ip changer! O Servidor tem um mapa proprio, 100% completo e cheio de RPG. + 100 quests (exclusivas) + 20 missoes (exclusivas) Sistema de forja perfeito Sistema de mineraçao perfeito Sistema de plantio perfeito Espaços planejados para war Eventos semanais (WAR) Venha jogar o melhor servidor de tibia! Assista o Video do servidor para ter uma visao do ot! http://www.youtube.com/watch?v=EJIyTpmNcno&feature=player_embedded

Beleza vou tentar! @Edit Muito obrigado cara, funcionou!

Eu atualizei recentemente meu servidor do 8.54 pro 8.60, consegui corrigir todos os bugs menos um! As runas estao muito bugadas, por exemplo: quando eu junto uma de 1 carga com outra de 1 carga, forma uma de 100 cargas. E quando eu uso 1 carga da de 100 cargas, acabam todas as cargas! E as vezes as runas somem quando mexe elas. Alguem sabe arrumar isso?

Truta vc nao pode ensinar a instalar o gesior? Pq aqui da um monte de erros

Vlw, to esperando o OtheReality ver [=

Editei o tópico com um script que se o target for pk ganha outro item (nem testei)

usa os.time() pro exhausted e doCreatureAddMana(cid, mana) pra mana. Explica melhor como é essa action.

Eu resolvi fazer meu primeiro script para pokemon, visto que, todo mundo só pensa em fazer servidor de pokemon =S Vá em data/actions e crie harvest.lua. Nele coloque: Premios: Coloque o id da berry e a chance de vir. Pode-se adicionar quantos itens quiser, mas sempre deixando o último sem vírgula. 2700: ID da árvore que o pokemon usa harvest. 60: tempo que o player deve esperar para usar harvest outra vez (exhausted). Agora crie a tag em actions.xml: 2700: ID da árvore que o pokemon usa harvest (tem que ser o mesmo que usou em harvest.lua). Testem e me digam o resultado. Se funfar REP+ kk DÚVIDAS E SUGESTÕES É SÓ POSTAR NÃO PERMITO QUE POSTEM EM OUTRO LUGAR SEM ME AVISAR

Do geito que o Kimoszin falou vc vai demorar 1 ano. Para saber as cores vá em data/lib/constant.lua e dê ctrl+f na cor que quiser. Está não é a área certa para dúvidas, portanto, vou reportar para moverem ao local adequado. Abraços.

O script funcionou lucas?

Vlw galera (: FIco feliz em receber um elogio seu Vodka haha. Aceito sugestões para implementar o script.

Não acredito que ainda postem tutorial sobre isso...

Vc quer simplesmente que dobre ou que ganhe mais a cada level? Se for só dobrar eu faço, n tenho paciencia. Vou precisar que você me passe a função de checar se é VIP do seu ot.

Como sempre, eu tava no tédio e resolvi faze qualquer scriptzinho, e pra ele não ficar inutilizado vou postar aqui que talvez ele possa ser útil pra alguem... Explicando: A cada X tempo (1 hora por exemplo) é criado um teleport numa posição selecionada. Este teleport permanece por apenas 5 minutos. Broadscast mensangem quando abre e quando fexa. Vamos ao script. Vá em data/globalevents/scripts/evento.lua e adicione: Verde: Posição onde é criado o teleport. Vermelho: Tempo que o tp fica Roxo: Posição para onde o tp leva o player. TAG: DÚVIDA E SUGESTÕES É SÓ POSTAR NO TÓPICO NÃO PERMITO QUE POSTE EM OUTRO LUGAR SEM ME AVISAR @EDIT: Não da pra por cor no code por isso tirei.

DELETA O POST, SAIU DOUBLE POST SEM QUERE

Oi :XTibia_smile: faz um tempo que não posto nada aqui e eu queria postar alguma coisa, entao fiz a primeira porcariazinha que me veio em mente rs. Oque ele faz? Quando um player mata outro ele recebe um "Morgaroth's Heart" com o nome do player que matou, exemplo: O João mata a Maria, ele ganha o seguinte item: You see the Morgaroth's heart. It weighs 35.00 oz. Este foi retirado de Maria. Começando: Vá em data/creaturescripts/scripts/heartnb.lua e adicione: function onKill(cid, target, lastHitKiller) if(isPlayer(target) and isPlayer(lastHitKiller)) then doPlayerSendTextMessage(cid, 22, "Parabens, voce matou o jogador "..getCreatureName(target).." e tirou seu coraçao") function additem() local aditi = doPlayerAddItem(lastHitKiller, 5943, 1) doItemSetAttribute(aditi, "description", "Este foi retirado de "..getCreatureName(target).."") end addEvent(additem, 1000) end end Depois adicione a seguinte TAG em data/creaturescripts/creaturescripts.xml: <event type="kill" name="heartnb" event="script" value="heartnb.lua"/> Eu não testei o script pois não estou em casa e não tenho nenhum servidor para testar aqui, então pesso que testem para mim e postem resultado. @EDIT --- Para se o target for pk ganhar outro item, usem: function onKill(cid, target, lastHitKiller) if(isPlayer(target) and isPlayer(lastHitKiller)) then if getCreatureSkullType(target) == SKULL_NONE then doPlayerSendTextMessage(cid, 22, "Parabens, voce matou o jogador "..getCreatureName(target).." e tirou seu coraçao") function additem() local aditi = doPlayerAddItem(lastHitKiller, 5943, 1) doItemSetAttribute(aditi, "description", "Este foi retirado de "..getCreatureName(target).."") end addEvent(additem, 1000) end else doPlayerSendTextMessage(cid, 22, "Parabens, voce matou o jogador "..getCreatureName(target).." e tirou seu coraçao") function add2() local adoto = doPlayerAddItem(lastHitKiller, XXX, 1) doItemSetAttribute(aditi, "description", "Este foi retirado de "..getCreatureName(target).."") end addEvent(add2, 1000) end end DÚVIDAS E SUGESTÕES É SÓ POSTAR NÃO PERMITO QUE POSTEM EM OUTRO LUGAR SEM ME AVISAR