SINVAL o.O 728 Posted March 17, 2013 Vwenho postar novamete a quest de Halloween que eu ja tinha postado mais devido as erros não estava a funcionar, depois do pacificador fazer algumas mudanças ele conseguiu por ela funcional, então Créditos a min pela 1º modificação, e a pacificador por tirar os erros e por funcional... quest halloween beginstate start begin when 20094.chat."Evento Halloween" begin if pc.is_gm() then if game.get_event_flag("evento") == 0 then say("O evento não está activo.") say("Deseja ativar?") local a = select ("Sim", "Não") if a == 1 then game.set_event_flag("evento", 1) notice_all("O Evento de Halloween Começou!") end else say("O evento está activo.") say("Deseja desativar?") local b = select ("Sim", "Não") if b == 1 then game.set_event_flag("evento", 0) notice_all("O Evento de Halloween Acabou!") end end else if game.get_event_flag("evento") == 0 then say("O Evento está desativado.") else say_title ("Olá, "..pc.get_name().."!") say ("O evento de Halloween já começou e agora ") say ("isso significa que cada jogador tem a chance, ") say ("para ganhar algo especial.") say ("Os monstros roubaram as abóboras das bruxas,") say ("que podem ser obtidas a partir de qualquer monstro.") say ("Porem voçê deve tomar cuidado, pois a varios monstros malignos por ai, ") say ("mais voçê tera uma surpresa no final. ") say ("Você pode ganhar premios dropando de 5 há 100 abóboras. ") say ("Voçê pode escolher quantas abóbora quer trocar, voçê pode trocar 5-10-25-50-100 quanto mais voçê ") say ("dropar, mais premios melhores voçê vai ganhar. ") wait() say_title ("Voçê pode fazer as seguintes trocas de abóboras: ") say ("") say_reward ("5 = Item 299") say_reward ("10 = item 49") say_reward ("25 = item 59") say_reward ("50 = item 69") say_reward ("100 = item 79") end end end when 20094.chat."Trocar Aboboras" with game.get_event_flag("evento") == 1 and pc.count_item("50095") >= 5 begin say_title (""..pc.get_name()..": ") say ("Voçê tem quantas abóboras pra trocar?") local a = select ("5 abóboras ", "10 abóboras ", "25 abóboras ", "50 abóboras ", "100 abóboras ", "Cancelar") if a == 1 then pc.give_item2("299", 1) pc.remove_item("50095", 5) elseif a == 2 then if pc.count_item("50095") >= 10 then pc.give_item2("49", 1) pc.remove_item("50095", 10) else say("Não tens aboboras suficientes.") end elseif a == 3 then if pc.count_item("50095") >= 25 then pc.give_item2("59", 1) pc.remove_item("50095", 25) else say("Não tens aboboras suficientes") end elseif a == 4 then if pc.count_item("50095") >= 50 then pc.give_item2("69", 1) pc.remove_item("50095", 50) else say("Não tens aboboras suficientes") end elseif a == 5 then if pc.count_item("50095") >= 100 then pc.give_item2("79", 1) pc.remove_item("50095", 100) else say("Não tens aboboras suficientes") end end endendend C. Sinval 9 Vintereais, purabrisa, vida100vida and 6 others reacted to this Share this post Link to post Share on other sites
purabrisa 31 Posted March 17, 2013 http://cyber-gamers.org/public/style_emoticons/default/451960.gif . Share this post Link to post Share on other sites
Slender_Man 173 Posted March 28, 2015 Como adiciono esta quest ? ja tentei copiar e colar e da cor dumped Share this post Link to post Share on other sites