Demonbholder 420 Postado Fevereiro 14, 2011 Share Postado Fevereiro 14, 2011 (editado) Olá galera do XTibia; eu postei já vários tópicos, incluindo sistemas, e scripts em parceria com o Vodkart, por exemplo, que infelizmente, não foram muito apreciados (links na minha assinatura). Então eu pensei em fazer algo grande, um sistema que talvez não fosse compartilhado por outras pessoas, sem negociações de dinheiro. Foi ai que me veio uma idéia, que inicialmente eu pensei que poderia ser grande, um sistema difícil e com vários scripts. Trabalhando nisso por alguns dias, eu desenvolvi um sistema de reputação, ou recompensa, como preferirem, utilizando apenas dois scripts lua. Não posso dizer que foi fácil, tive meus problemas, mas não foi tão difícil quanto o esperado. Bom, vamos ao que interessa; o sistema funciona assim: Há um npc, e este npc pode colocar recompensas pela cabeça dos jogadores, desde que você o pague, é claro. São dez níveis de recompensa, sendo que a cada nível, a recompensa vai melhorando. Exemplo de uso: Um pk me matou, e não tenho forças para mata-lo. Quero que ele sofra, mas não quero ser descoberto, pois não quero morrer para ele de novo. A solução? Caçador de recompensas. Vou contratar o caçador de recompensas e usar todo o meu dinheiro para aumentar sua recompensa ao nível máximo, o nível 9! Assim, uma mensagem irá avisar a todos no servidor que o jogador teve sua recompensa aumentada, e assim, os mais fortes irão matar este pk para mim, e ele não saberá que fui eu. Assim que o jogador for morto, a recompensa será resetada, e o cara que matou irá ganhar um item de acordo com o nível da recompensa. Vamos aos scripts e suas explicações: Versão 1.5: CreatureScripts: Vá em data/creaturescripts/scripts, crie um arquivo .lua, e cole isto nele: function onKill(cid, target) local award = { [0] = 2160, -- crystal coin [1] = 2497, -- crusader helmet [2] = 2487, -- crown armor [3] = 2195, -- boots of haste [4] = 2520, -- demon shield [5] = 2470, -- golden legs [6] = 2466, -- golden armor [7] = 2506, -- dragon scale helmet [8] = 2492, -- dragon scale mail [9] = 2514 -- mastermind shield } if getPlayerStorageValue(target, 13131) > -1 then doPlayerAddItem(cid, award[getPlayerStorageValue(target, 13131)]) setPlayerStorageValue(target, 13131, -1) end return TRUE end Feito isso, nesta mesma pasta, abra o arquivo login.lua, ache as tags que registram eventos, que são algo assim: registerCreatureEvent(cid, "Evento") registerCreatureEvent(cid, "Evento") registerCreatureEvent(cid, "Evento") Entre alguma delas, adicione esta tag: registerCreatureEvent(cid, "Recompensa") Para finalizar a parte do CreatureScripts, vá em data/creaturescripts, abra o arquivo creaturescripts.xml e cole esta tag em algum lugar: <event type="kill" name="Recompensa" event="script" value="Nome_do_Arquivo.lua"/> Npc: Vá em data/npcs, crie um arquivo .xml e cole isto nele: <?xml version="1.0" encoding="UTF-8"?> <npc name="Matador por Recompensas" script="data/npc/scripts/Nome_do_Arquivo.lua" walkinterval="2000" floorchange="0" access="5" level="1" maglevel="1"> <health now="150" max="150"/> <look type="152" head="79" body="128" legs="114" feet="0" addons="3"/> <parameters> <parameter key="message_greet" value="Ola |PLAYERNAME|. Diga {promover, recompensa, level,} ou para mais informacoes, diga {informacoes}." /> </parameters> </npc> Agora vá em data/npcs/scripts, crie um arquivo .lua e cole isto nele: local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} 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(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid preco = { [-1] = 100000, [0] = 200000, [1] = 300000, [2] = 400000, [3] = 500000, [4] = 600000, [5] = 700000, [6] = 800000, [7] = 900000, [8] = 1000000 } if(msgcontains(msg, 'promover')) then selfSay('Diga o nome do jogador que voce deseja promover.', cid) talkState[talkUser] = 1 elseif isPlayer(getPlayerByNameWildcard(msg)) and talkState[talkUser] == 1 then if getPlayerStorageValue(getPlayerByNameWildcard(msg), 13131) < 9 then if doPlayerRemoveMoney(cid, preco[getPlayerStorageValue(getPlayerByNameWildcard(msg), 13131)]) == TRUE then setPlayerStorageValue(getPlayerByNameWildcard(msg), 13131, getPlayerStorageValue(getPlayerByNameWildcard(msg), 13131) + 1) doBroadcastMessage("O jogador "..msg.." foi promovido para o nivel "..getPlayerStorageValue(getPlayerByNameWildcard(msg), 13131)..".", BroadCast_Type) else selfSay('Descupe, voce não possui o dinheiro necessário para promover este jogador.', cid) end else selfSay('O jogador que voce escolheu ja foi promovido ao maximo.', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'no') and isInArray({1}, talkState[talkUser]) == TRUE) then talkState[talkUser] = 0 selfSay('Certo entao.', cid) end if(msgcontains(msg, 'level')) then selfSay('Diga o nome do jogador que voce deseja checar o level.', cid) talkState[talkUser] = 2 elseif isPlayer(getPlayerByNameWildcard(msg)) and talkState[talkUser] == 2 then if getPlayerStorageValue(getPlayerByNameWildcard(msg), 13131) >= 0 then selfSay("O level de recompensa deste jogador é "..getPlayerStorageValue(getPlayerByNameWildcard(msg), 13131)..".", cid) else selfSay('Este jogador nao esta sendo procurado.', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'no') and isInArray({1}, talkState[talkUser]) == TRUE) then talkState[talkUser] = 0 selfSay('Certo entao.', cid) end if(msgcontains(msg, 'recompensa')) then selfSay('Deseja checar o seu level de recompensa?', cid) talkState[talkUser] = 3 elseif (msgcontains(msg, 'yes') and talkState[talkUser]) == 3 then if getPlayerStorageValue(cid, 13131) >= 0 then selfSay("O seu level de recompensa é "..getPlayerStorageValue(cid, 13131)..".", cid) else selfSay('Voce nao esta sendo procurado.', cid) end talkState[talkUser] = 0 elseif(msgcontains(msg, 'no') and isInArray({1}, talkState[talkUser]) == TRUE) then talkState[talkUser] = 0 selfSay('Certo entao.', cid) end if(msgcontains(msg, 'informaçoes')) then selfSay('O sistema funciona da seguinte maneira: voce pode colocar recompensas pela cabeça de jogadores, assim, quem matar estes jogadores irá ganhar algum item, porem, ha um alto custo para utilizar os meus serviços.', cid) talkState[talkUser] = 0 end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) As seguintes opções de palavras são validas para versão 1.5: Informaçoes - O npc irá explicar detalhadamente como funciona o sistema para o jogador. Recompensa - O npc irá te dizer o nível de sua recompensa. Level - Diga level, e depois o nome do jogador que você deseja consultar, e irá saber o nível da recompensa dele. Promover - Diga promover e promova a recompensa de algum jogar, lembrando que a recompensa será aumentado 1 por 1. Espero que gostem, me esforcei de mais para fazer este sistema, espero que todos que utilizarem, comentem; é só comentar dizendo se gostou ou não, ou se encontrou algum erro, enfim, comentem. Editado Setembro 8, 2012 por Demonbholder Link para o comentário Compartilhar em outros sites More sharing options...
Saymon14 115 Postado Fevereiro 14, 2011 Share Postado Fevereiro 14, 2011 Inovador, eu nao tinha visto sistema como esse, agora é só testar tudo pra ver se nao tem nenhum bug, aaahhh e é bom os donos do servers colocar um preço bem alto porque se nao vai ser um SPAM da poh# no BC Abraços, Rep+ Link para o comentário Compartilhar em outros sites More sharing options...
Vodkart 1515 Postado Fevereiro 14, 2011 Share Postado Fevereiro 14, 2011 wow,ótimo sistema cara,ctz vai ser muito usado nos servidores,pois inova no rpg (: parabéns. Link para o comentário Compartilhar em outros sites More sharing options...
Vampiresco 35 Postado Fevereiro 14, 2011 Share Postado Fevereiro 14, 2011 Excelente sistema, ideia excepcional a sua, e funciono.. meus sinceros parabéns! Pena que este belo sistema não terá nem uma utilidade no meu projeto que está perto de lançar..Mais como o amigo ai em cima lhe disse, vai ser muito usado nos servidores.. tá salvo no meu PC para se um dia eu precisar.. Valeu. Link para o comentário Compartilhar em outros sites More sharing options...
Shandon 1 Postado Fevereiro 14, 2011 Share Postado Fevereiro 14, 2011 Cara você é um crânio.. Sei que não tenho muita moral para falar mais ! Fico mais que ótimo.E outra vou colocar em meu server e garanto que vai ficar bom REP+ Link para o comentário Compartilhar em outros sites More sharing options...
Karislayer 1 Postado Fevereiro 14, 2011 Share Postado Fevereiro 14, 2011 Só tenho uma coisa a dizer, Parabéns! Link para o comentário Compartilhar em outros sites More sharing options...
Demonbholder 420 Postado Fevereiro 16, 2011 Autor Share Postado Fevereiro 16, 2011 Valeu galera, tinha uns errinhos no npc, mas agora ta arrumado. Link para o comentário Compartilhar em outros sites More sharing options...
Hudsin 47 Postado Fevereiro 16, 2011 Share Postado Fevereiro 16, 2011 Script Ótimo e aprovado! Ótima ideia aalem de ser um script perfeito e incentivador de "movimentação" no server,vlw! :smile_positivo: Link para o comentário Compartilhar em outros sites More sharing options...
Cren Lucienuk 1 Postado Fevereiro 17, 2011 Share Postado Fevereiro 17, 2011 Ótima idéia, inovador mesmo. Script ta perfeito pelo que vi, vo indicar pros meus amigos que tão criando servers. Link para o comentário Compartilhar em outros sites More sharing options...
Secular 132 Postado Fevereiro 17, 2011 Share Postado Fevereiro 17, 2011 (editado) Ideias Cada Vez Melhores e Achei A Sua Como Todos Disseram: Inovadora :button_ok: ! Editado Fevereiro 17, 2011 por cmgabriel Link para o comentário Compartilhar em outros sites More sharing options...
Demonbholder 420 Postado Fevereiro 19, 2011 Autor Share Postado Fevereiro 19, 2011 Muito obrigado pelos comentários, isso me levou a criar a versão 1.5, já disponível, com algumas alterações, mas o principal motivo foi diminuir os scripts mesmo. Link para o comentário Compartilhar em outros sites More sharing options...
Vampiresco 35 Postado Fevereiro 19, 2011 Share Postado Fevereiro 19, 2011 A versão 1.5 melhor ainda, obrigado Demonbholder pelo belo script! Link para o comentário Compartilhar em outros sites More sharing options...
pintopinto 0 Postado Fevereiro 27, 2011 Share Postado Fevereiro 27, 2011 Nice,coloquei no meu OT Link para o comentário Compartilhar em outros sites More sharing options...
Demonbholder 420 Postado Março 2, 2011 Autor Share Postado Março 2, 2011 Valeu pessoal, o que vocês acham de fazer uma formula para o valor da recompensa? Se aprovarem, logo estarei fazendo. Exemplo: Preço + Formula. Até. Link para o comentário Compartilhar em outros sites More sharing options...
UnderWalter 8 Postado Março 2, 2011 Share Postado Março 2, 2011 Muito Bem. Link para o comentário Compartilhar em outros sites More sharing options...
Posts Recomendados