Rancoroso 604 Posted January 27, 2013 OLÁ PESSOAL.BOM HOJE VOU DISPONIBILIZAR MINHA QUEST DE EVENTO DE PESCAR PARA QUEM QUISE USAR CLARO.OBSERVAÇÃO:PREMIO É EM MODO RANDOM ENTÃO VOCÊ PODE AUMENTAR OU DIMINUIR O LIMITE ESTÁ DE 20 ITEMS NO RANDOM.JOGADOR GANHAR APENAS 1 ITEM EM MODO RANDOM.BOM COMO A MAIORIA JÁ SABE COMO INSTALAR A QUEST NÃO SERÁ NECESSÁRIO UM TUTORIAL DE COMO INSTALAR A QUEST NA SUA SERVERFILES.ENTÃO VAMOS A QUEST BASTAR CRIAR UM ARQUIVO DE TEXTO COM O FORMATO QUEST E NOME evento_pescar.quest E DEPOIS ADD O SCRIPT ABAIXO FEITO POR MIM E DEPOIS DE CRIAR BASTAR INSTALAR: --------------------------------------------------------------------- Criado por Rancoroso - Overgame.-- Quest evento de pescar by Rancoroso.-- Email: [email protected] Skype: invisionbrazil.-- Site: www.overgame.hostei.com.--------------------------------------------------------------------quest evento_pescar beginstate start beginwhen 9009.chat."GM: Evento de Pescador" with pc.is_gm() beginsay_title("Pescador:")say("")say("Olá, Administrador gostaria de iníciar um")say("evento de pescar para animar o pessoal?")say("")local s = select ( "Começar Evento" , "Terminar Evento" , "Fechar" )if s == 1 thennotice_all("Evento de pescar foi iníciado!")command("e peixaria 1")elseif s == 2 thennotice_all("Evento de pescar foi finalizado!")command("e peixaria 0")elseif s == 3 thenreturnendendwhen 9009.chat."Pescar do Pescador" with game.get_event_flag("peixaria")>0 beginsay_title("Pescador:")say("")say("Olá pescadores estou precisando de ajuda")say("não consigo pescar 1 peixe.")say("Preciso de 1 peixe usado para pegar peixes maiores.")say_item_vnum(27802)say("Em trocar da sua ajuda vou lhe dar um grande")say("prêmio como recompensa.")say("")endwhen 9009.chat."Trouxe a Isca de Peixe?" with game.get_event_flag("peixaria")>0 and pc.countitem(27802) >= 1 beginsay_title("Pescador:")say("")say("Nossa! muito obrigado por mim ajudar")say("como recompensa lhe darei seu prêmio.")say("")wait()pc.removeitem("27802", 1)local r=number(1, 20)if r==1 thenpc.give_item2("71085", 1)elseif r==2 thenpc.give_item2("70024", 1)elseif r==3 thenpc.give_item2("71051", 1)elseif r==4 thenpc.give_item2("71084", 1)elseif r==5 thenpc.give_item2("71052", 1)elseif r==6 thenpc.give_item2("71083", 1)elseif r==7 thenpc.give_item2("71001", 1)elseif r==8 thenpc.give_item2("71020", 15)elseif r==9 thenpc.give_item2("71032", 1)elseif r==10 thenpc.give_item2("71033", 1)elseif r==11 thenpc.give_item2("71034", 5)elseif r==12 thenpc.give_item2("71044", 5)elseif r==13 thenpc.give_item2("71045", 5)elseif r==14 thenpc.give_item2("71094", 1)elseif r==15 thenpc.give_item2("27992", 1)elseif r==16 thenpc.give_item2("70038", 20)elseif r==17 thenpc.give_item2("71027", 5)elseif r==18 thenpc.give_item2("71028", 5)elseif r==19 thenpc.give_item2("71029", 5)elseif r==20 thenpc.give_item2("71030", 5)endendendendCRÉDITOS: RANCOROSO.OBRIGADO PELA A ATENÇÃO. 5 RazrDx, 米格尔滨江, ƤāƱŁѲ ƒēƦƦēƗƦā and 2 others reacted to this Share this post Link to post Share on other sites
kimameixede 70 Posted January 27, 2013 muito boa obrigado 1 米格尔滨江 reacted to this Share this post Link to post Share on other sites
Gleisson 0 Posted January 28, 2013 http://cyber-gamers.org/public/style_emoticons/default/451960.gif Share this post Link to post Share on other sites
米格尔滨江 37 Posted April 22, 2013 http://cyber-gamers.org/public/style_emoticons/default/451960.gif Share this post Link to post Share on other sites
PokerAlho *-* 13 Posted May 6, 2013 Pode-se editar tudo o que diz rancoroso? Share this post Link to post Share on other sites
MetinProfile 16 Posted May 6, 2013 Pode-se editar tudo o que diz rancoroso?sim podes nao sei se ja tem ..mas se nao tiver podes cumpz Share this post Link to post Share on other sites
PokerAlho *-* 13 Posted May 6, 2013 como se ativa esse evento? Share this post Link to post Share on other sites
amptteixeira1 39 Posted May 11, 2013 Meti essa Quest (deu tudo bem e dei reboot) e quando vou pescador não aparece nada para ligar ela (em personagem GM). Share this post Link to post Share on other sites
Vintereais 5 Posted September 25, 2013 Meti essa Quest (deu tudo bem e dei reboot) e quando vou pescador não aparece nada para ligar ela (em personagem GM). Isso porque deve ir até Npc (Pescado) se ajudei não custa dar +1 :) Share this post Link to post Share on other sites
Tiago Gomes 3 Posted July 22, 2015 alguem tem a quest como deve ser? Share this post Link to post Share on other sites
Tyler Durden 556 Posted July 22, 2015 alguem tem a quest como deve ser? -------------------------------------------------------------------- -- Criado por Rancoroso - Overgame. -- Quest evento de pescar by Rancoroso. -- Email: [email protected]. -- Skype: invisionbrazil. -- Site: www.overgame.hostei.com. -------------------------------------------------------------------- quest evento_pescar begin state start begin when 9009.chat."GM: Evento de Pescador" with pc.is_gm() begin say_title("Pescador:") say("") say("Olá, Administrador gostaria de iníciar um") say("evento de pescar para animar o pessoal?") say("") local s = select ( "Começar Evento" , "Terminar Evento" , "Fechar" ) if s == 1 then notice_all("Evento de pescar foi iníciado!") command("e peixaria 1") elseif s == 2 then notice_all("Evento de pescar foi finalizado!") command("e peixaria 0") elseif s == 3 then return end end when 9009.chat."Pescar do Pescador" with game.get_event_flag("peixaria")>0 begin say_title("Pescador:") say("") say("Olá pescadores estou precisando de ajuda") say("não consigo pescar 1 peixe.") say("Preciso de 1 peixe usado para pegar peixes maiores.") say_item_vnum(27802) say("Em trocar da sua ajuda vou lhe dar um grande") say("prêmio como recompensa.") say("") end when 9009.chat."Trouxe a Isca de Peixe?" with game.get_event_flag("peixaria")>0 and pc.countitem(27802) >= 1 begin say_title("Pescador:") say("") say("Nossa! muito obrigado por mim ajudar") say("como recompensa lhe darei seu prêmio.") say("") wait() pc.removeitem("27802", 1) local r=number(1, 20) if r==1 then pc.give_item2("71085", 1) elseif r==2 then pc.give_item2("70024", 1) elseif r==3 then pc.give_item2("71051", 1) elseif r==4 then pc.give_item2("71084", 1) elseif r==5 then pc.give_item2("71052", 1) elseif r==6 then pc.give_item2("71083", 1) elseif r==7 then pc.give_item2("71001", 1) elseif r==8 then pc.give_item2("71020", 15) elseif r==9 then pc.give_item2("71032", 1) elseif r==10 then pc.give_item2("71033", 1) elseif r==11 then pc.give_item2("71034", 5) elseif r==12 then pc.give_item2("71044", 5) elseif r==13 then pc.give_item2("71045", 5) elseif r==14 then pc.give_item2("71094", 1) elseif r==15 then pc.give_item2("27992", 1) elseif r==16 then pc.give_item2("70038", 20) elseif r==17 then pc.give_item2("71027", 5) elseif r==18 then pc.give_item2("71028", 5) elseif r==19 then pc.give_item2("71029", 5) elseif r==20 then pc.give_item2("71030", 5) end end end end 1 xxAndrexx reacted to this Share this post Link to post Share on other sites