F-Caneiras Posted March 4, 2019 at 01:33 PM Share Posted March 4, 2019 at 01:33 PM Boas malta bom venho aqui partilhar umas quests que traduzi podem fazer jeito. antes que as perca aqui as deixo no forum. 1 - change_empire_item Spoiler quest change_empire begin state start begin when 20011.chat."Libertar Mudança de Reino" with pc.get_name() == "[GM]" begin say_title("Troca de Reino:") say("") local s = select("Libertar para Todos Reinos", "Bloquear Troca Shinsoo", "Bloquear Troca Chunjo", "Bloquear Troca Jinno", "Bloquear Todas Trocas", "Sair") if s == 1 then change_empire.move_pc() game.set_event_flag("TrocaReinoShinsoo", 1) game.set_event_flag("TrocaReinoChunjo", 1) game.set_event_flag("TrocaReinoJinno", 1) say("Permissão de Exílio Liberada para todos!") return end if s == 2 then change_empire.move_pc() game.set_event_flag("TrocaReinoShinsoo", 0) game.set_event_flag("TrocaReinoChunjo", 1) game.set_event_flag("TrocaReinoJinno", 1) say("Nenhum player poderá sair do Reino Shinsoo!") return end if s == 3 then change_empire.move_pc() game.set_event_flag("TrocaReinoShinsoo", 1) game.set_event_flag("TrocaReinoChunjo", 0) game.set_event_flag("TrocaReinoJinno", 1) say("Nenhum player poderá sair do Reino Chunjo!") return end if s == 4 then change_empire.move_pc() game.set_event_flag("TrocaReinoShinsoo", 1) game.set_event_flag("TrocaReinoChunjo", 1) game.set_event_flag("TrocaReinoJinno", 0) say("Nenhum player poderá sair do Reino Jinno!") return end if s == 5 then game.set_event_flag("TrocaReinoShinsoo", 0) game.set_event_flag("TrocaReinoChunjo", 0) game.set_event_flag("TrocaReinoJinno", 0) say("Nenhum player poderá sair do seu Reino!") return end if s == 6 then return end end when 71054.use begin say_title("Permissão de Exílio:") say("") if pc.is_gm() then say("GM não pode trocar de reino sem permissão.") say("") return end if pc.get_empire() == 1 and game.get_event_flag("TrocaReinoShinsoo") == 0 then say("A Troca de Reino não está liberada para") say("o seu reino.") say("") return elseif pc.get_empire() == 2 and game.get_event_flag("TrocaReinoChunjo") == 0 then say("A Troca de Reino não está liberada para") say("o seu reino.") say("") return elseif pc.get_empire() == 3 and game.get_event_flag("TrocaReinoJinno") == 0 then say("A Troca de Reino não está liberada para") say("o seu reino.") say("") return end if get_time() < pc.getqf("next_use_time") then say("Você ainda não pode trocar de reino.") say("") return end if change_empire.move_pc() == true then pc.setqf("next_use_time", get_time() + 86400 * 5) end end function move_pc() if pc.is_engaged() then say_reward("Você é casado.") say_reward("Não pode mudar de reino.") return false end if pc.is_married() then say_reward("Você não pode estar casado para") say_reward("mudar de reino.") return false end if pc.is_polymorphed() then say_reward("Você não pode estar transformado para") say_reward("mudar de reino.") return false end if pc.has_guild() then say_reward("Você deve sair da guild para mudar") say_reward("de reino.") return false end if pc.money < 500000 then say_reward("Você não tem gold suficiente.") say_reward("Precisa do item e mais 500.000 Gold.") return false end say_reward("Para qual reino desejar ir?") local s = select("Reino Shinsu (Vermelho)", "Reino Chunjo (Amarelo)", "Reino Jinno (Azul)", "Cancelar") if 4==s then return false end say_title("Permissão de Exílio:") say("") say("Ao trocar de reino, você não poderá retornar") say("ao reino antigo, por pelo menos 5 dias.") say("") say("Tem certeza que deseja mudar de reino?") say("") local a = select("Sim", "Não") if 2== a then return false end local ret = pc.change_empire(s) local oldempire = pc.get_empire() if ret == 999 then say_title("Permissão de Exílio:") say("") say("Troca de Reino efetuada com sucesso.") say("") say_reward("Por favor, RELOGUE. ") say("") pc.change_gold(-500000) pc.remove_item(71054) ; char_log(0, "CHANGE_EMPIRE",string.format("%d -> %d", oldempire, s)) return true else if ret == 1 then say_title("Permissão de Exílio:") say("") say_reward("Você não pode mudar de reino.") say("") say("Verifique se algum char de sua conta está ") say("em Guild, Casado ou Transformado.") say("") elseif ret == 2 then say_title("Permissão de Exílio:") say("") say_reward("Você não pode mudar de reino.") say("") say("Verifique se algum char de sua conta está ") say("em Guild, Casado ou Transformado.") say("") elseif ret == 3 then say_title("Permissão de Exílio:") say("") say_reward("Você não pode mudar de reino.") say("") say("Verifique se algum char de sua conta está ") say("em Guild, Casado ou Transformado.") say("") elseif ret == 4 then say_title("Permissão de Exílio:") say("") say_reward("Você não pode mudar de reino.") say("") say("Verifique se algum char de sua conta está ") say("em Guild, Casado ou Transformado.") say("") elseif ret == 5 then say_title("Permissão de Exílio:") say("") say_reward("Você não pode mudar de reino.") say("") say("Verifique se algum char de sua conta está ") say("em Guild, Casado ou Transformado.") say("") end end return false end end end 2 - change_sex_item Spoiler quest change_sex_item begin state start begin when 71048.use begin say_title("Feitíço da Mudança") if pc.get_level() < 5 then say("") say("Para realizar a troca precisa ter no minimo nivel 5.") say("Adquira mais experiência para realizar a troca!") say("") return elseif pc.is_married() then say("") say("Apenas solteiros podem trocar de sexo.") say("Obtenha um divórcio e tente novamente!") say("") return elseif pc.is_polymorphed() then say("") say("Você está atualmente transformado.") say("Espere até que sua transformação termine ") say("e tente novamente!") return elseif pc.get_part(PART_MAIN) >= 41001 and pc.get_part(PART_MAIN) <= 41258 then say("") say("Proibido usar traje para realizar a troca. ") say("") return elseif pc.get_part(PART_HAIR) > 0 then say("") say("Proibido usar penteados para realizar a troca. ") say("") return elseif get_time() < pc.getqf("next_time") then say("") say("O seu período de espera ainda não terminou!") say("Você so pode mudar seu sexo a cada 7 dias,") say("após usar o item.") if pc.is_gm() then say_reward("Seu tempo de espera é definido como 0.") pc.setqf("next_time", 0) end return end say("") say("Você quer iniciar uma troca de sexo.") say("O sexo só pode ser trocado a cada sete dias") say("") say_reward("Aceita fazer a troca?") say("") local s=select("Sim", "Não") if 1==s then say_title("Feitíço da Mudança") say("") say("O sexo foi alterada com sucesso!") say_reward("Para que a mudança seja completa,") say_reward("por favor, relogue seu personagem!") pc.remove_item("71048", 1) pc.setqf("next_time", get_time() + 86400 * 7) pc.change_sex() end end end end 3 - acce Spoiler quest acce begin state start begin when 60003.chat."O que é uma faixa de ombro?" begin say_title("-- "..mob_name(60003).." --") say("") say("O sistema de faixas oferece duas opções:") say("Combinação & Absorção.") say("") say("Podes combinar 2 faixas da mesma qualidade") say("Para obeter uma faixa de qualidade superior.") say("Existem 4 qualidades de faixas.") say("") say("A absorção permite que absorvas uma % ") say("dos bónus da tua arma ou armadura!") say("A % de absorção varia consoante") say("a qualidadeda faixa!") say("A arma/armadura absorvida será destruida.") say("") end when 60003.chat."Combinação" begin say_title("-- "..mob_name(60003).." --") say("") say("Queres combinuar as duas faixas?") say("") local confirm = select("Sim", "Não") if confirm == 2 then return end setskin(NOWINDOW) pc.open_sash(true) end when 60003.chat."Absorção de bônus" begin say_title("-- "..mob_name(60003).." --") say("") say("Queres absorver os bónus da tua arma ou armadura?") say("") local confirm = select("Sim", "Não") if confirm == 2 then return end setskin(NOWINDOW) pc.open_sash(false) end end end 4 - reset_scroll Spoiler quest reset_scroll begin state start begin when 71002.use or 76001.use begin --- l say_title("Pregaminho dos Atributos: ") say("") say("Este artigo torna possível esquecer tudo") say("isso irá redefinir todos os seus pontos de status.") say("") say("") say("Você quer usá-lo?") say("") local s = select("Sim Quero", "Não Obrigado") if 2 == s then return end say_title("Pregaminho dos Atributos:") say("") say("Todos os pontos de status serão redefinidos ") say("você vai começar de novo. ") say("") say("Você aprova a reposição do status?") say("") local c = select("Sim Aprovo", "Não Aprovo") if 2 == c then return end item.remove() pc.reset_point() end when 71003.use or 71100.use or 39009.use begin ---------- l say_title("Pregaminho de Habilidades: ") say_reward("A habilidade selecionada será reiniciada,") local result = BuildSkillList(pc.get_job(), pc.get_skill_group()) local vnum_list = result[1] local name_list = result[2] if table.getn(vnum_list) < 2 then say("Nenhuma habilidade para redefinir.") say("") return end say("Selecione a habilidade que deseja redefinir. ") say("") local i = select_table(name_list) if table.getn(name_list) == i then return end local name = name_list[i] local vnum = vnum_list[i] say_title("Pregaminho de Habilidades:") say(string.format("%s Você deseja redefinir sua habilidade?", name)) say("") local s = select("Sim", "Não") if 2 == s then return end say_title("Confirmar areposição de Habilidade:") say("") say("Você aprova a reposição de habilidades?") say("") local c = select("Sim tudo Bem", "Não Inda Não") if 2 == c then return end item.remove() pc.clear_one_skill(vnum) say_title("Pregaminho dos Atributos:") say(string.format("%s A habilidade foi redefinida.", name)) say("") --- l say("") end end end 5 - skill_group com lycan Spoiler quest skill_group begin state start begin when login or levelup with pc.level>=5 and pc.skillgroup ==0 begin set_state(run) end end state run begin when login with pc.get_skill_group()!=0 begin restart_quest() end when letter with pc.get_skill_group()==0 begin send_letter("Treinar habilidade") local job=pc.get_job() if job==0 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher1", v, "Professor Força(corpo).") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher2", v, "Professor Força (Mental).") end elseif job==1 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher3", v, "Professor Força(Armas).") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher4", v, "Professor Força(Magia).") end elseif job==2 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher5", v, "Professor Força(Adagas).") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher6", v, "Professor Força(Arco).") end elseif job==3 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher7", v, "Professor Força(Dragão).") end local v=pc_find_skill_teacher_vid(2) if 0!=v then target.vid("teacher8", v, "Professor Força(Cura).") end elseif job==4 then local v=pc_find_skill_teacher_vid(1) if 0!=v then target.vid("teacher9", v, "Guarda do Portal(Lycan).") end clear_letter() end end when leave begin target.delete("teacher1") target.delete("teacher2") target.delete("teacher3") target.delete("teacher4") target.delete("teacher5") target.delete("teacher6") target.delete("teacher7") target.delete("teacher8") target.delete("teacher9") end when button or info begin if pc.job == 0 then say_title("Professor Força (Gerreiro):") say("") say_reward("Se você quer ser um gerreiro Rapido, ") say_reward("Com um ataque direto ao fisico ") say_reward("Deve aprender a arte de corpo ") say_reward("Se você quer ser um gerreiro munido de força, ") say_reward("E derrubar varios aprenda arte Mental. ") say_reward("Recomendação: estar na cidade.") say("") elseif pc.job == 1 then say_title("Professor força (Ninja):") say("") say_reward("Se você quer ser um bom atirador, ") say_reward("Aprenda a arte de arco. ") say_reward("Se uiser andar oculto de outros e ") say_reward("se você quiser realizar missões secretas") say_reward("Escolha a arte de Adagas.") say_reward("Recomendação: estar na cidade. ") say("") elseif pc.job == 2 then say_title("Professor Força (Sura):") say("") say_reward("Um verdadeiro representante com habilidades sobrenaturais") say_reward("Você quer ser um cavaleiro, com uma arma mágica") say_reward("Recomendo arte de Armas") say_reward("se você quer ser temido como uma maldição,") say_reward("Recomendo aprender a arte de magia negra") say_reward("Recomendação: estar na cidade. ") say("") elseif pc.job == 3 then say_title("Professor Força (Shaman):") say("") say_reward("O que controla a magia e a bênção") say_reward("Que é ajudado pelo dragão. ") say_reward("Recomendo a arte de Dração") say_reward("O que luta e pode curar a si e outros.") say_reward("Recomendo a arte de cura.") say_reward("Recomendação estar na cidade. ") say("") elseif pc.job == 4 then say_title("Guarda do Portal:") say("") say_reward("O que controla a magia e as garras?") say_reward("Lycam com a sua abilidade de Instinto ") say_reward("Se quiser aprender essa abilidade") say_reward("Fale com o Guarda do portal para aprender") say_reward("Alem de guarda é um grande mestre e") say_reward("Professor. ") say_reward("Recomenda-se ir a primeira cidade! ") say("") end ---setleftimage("") select("Entendido") setskin(NOWINDOW) end -- Arahan Troop when teacher1.target.click or skill_group1_1.chat."Iniciar o treino de Corpo" or skill_group2_1.chat."Iniciar o treino de Corpo" or skill_group3_1.chat."Iniciar o treino de Corpo" begin target.delete("teacher1") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 0 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar os Guerreiros Corpo.") say("") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Treinamento da Habilidade Corpo") say("") --- l say("O treinamento de corpo uma forma de luta rápida e") say("Métodos, bem como um ataque básico melhorado ") say_reward("Requisito: Seja um guerreiro no nível 5 e acima") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=0 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(1) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado.") ---------------------------------------------- say_title("Treinamento de Corpo Finalizado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (1,20) pc.set_skill_level (2,20) pc.set_skill_level (3,20) pc.set_skill_level (4,20) pc.set_skill_level (5,20) pc.set_skill_level (6,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Byulki Troop when teacher2.target.click or skill_group1_2.chat."Iniciar o treino de Mental" or skill_group2_2.chat."Iniciar o treino de Mental" or skill_group3_2.chat."Iniciar o treino de Mental" begin target.delete("teacher2") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 0 then --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar gerreiro Mental ") say("Escolha outro Professor.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Treinamento da Habilidade Mental") say("") --- l say("Você luta contra seus inimigos com habilidade Mental") say("você pode fazer chi-ataques poderosos e auto") say("Ainda se pode defender de varios ataques.") say_reward("Requisito: Seja um guerreiro no nível 5 e acima") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=0 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(2) pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado") ---------------------------------------------- say_title("Habilidade de Mental Finalizado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,20) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) pc.set_skill_level (17,20) pc.set_skill_level (18,20) pc.set_skill_level (19,20) pc.set_skill_level (20,20) pc.set_skill_level (16,20) pc.set_skill_level (21,20) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Bisal Troop when teacher3.target.click or skill_group1_3.chat."Iniciar o treino de Adagas" or skill_group2_3.chat."Iniciar o treino de Adagas" or skill_group3_3.chat."Iniciar o treino de Adagas" begin target.delete("teacher3") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 1 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar Ninjas adagas.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Treinamento da Habilidade Adagas") say("") --- l say("No treinamento de Luta Adagas você pode ser ") say("apido e fatal contra o inimigo.") say("Eles podem dar muitos hits.") say_reward("Requisito: Seja um Ninja no nível 5 e acima") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=1 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(1) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado") ---------------------------------------------- say_title("Treino de ninja adagas Finalizado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (31,20) pc.set_skill_level (32,20) pc.set_skill_level (33,20) pc.set_skill_level (34,20) pc.set_skill_level (35,20) pc.set_skill_level (36,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (140,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,20) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Kangno Troop when teacher4.target.click or skill_group1_4.chat."Iniciar o treino de Arco" or skill_group2_4.chat."Iniciar o treino de Arco" or skill_group3_4.chat."Iniciar o treino de Arco" begin target.delete("teacher4") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 1 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar ninja Arco.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Iniciar o treino de Arco") say("") --- l say("Aprender a Hbilidade de luta distante") say("é uma boa forma de matar o seu inimigo") say("Ele tera de caminhar muito para o vencer.") say_reward("Requisito: Seja um Ninja no nível 5 e acima") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=1 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(2) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado") ---------------------------------------------- say_title("Treinamento de Ninja Adagas Finalizado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (49,20) pc.set_skill_level (50,20) pc.set_skill_level (48,20) pc.set_skill_level (47,20) pc.set_skill_level (46,20) pc.set_skill_level (51,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (140,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Hwanmoo Troop when teacher5.target.click or skill_group1_5.chat."Iniciar o treino de Armas" or skill_group2_5.chat."Iniciar o treino de Armas" or skill_group3_5.chat."Iniciar o treino de Armas" begin target.delete("teacher5") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 2 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar suras Armas") say("Escolha outro Professor.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Iniciar o treino de Armas") say("") --- l say("Treinamento de armas mágicas, é uma abilidade") say("Que deixa os inimigos enfraquecidos. ") say("Juntamente com o uso de armas malditas.") say_reward("Requisito: Seja uma sura de nivel 5 ou mais") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=2 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(1) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado") ---------------------------------------------- say_title("Treino da Habilidade Armas Terminado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (61,20) pc.set_skill_level (62,20) pc.set_skill_level (63,20) pc.set_skill_level (64,20) pc.set_skill_level (65,20) pc.set_skill_level (66,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Black Horse Troop when teacher6.target.click or skill_group1_6.chat."Iniciar o treino de Magias" or skill_group2_6.chat."Iniciar o treino de Magias" or skill_group3_6.chat."Iniciar o treino de Magias" begin target.delete("teacher6") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 2 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar suras magia") say("Escolha outro Professor.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Iniciar o treino de Magia") say("") --- l say("No treinamento da magia negra oferece ") say("métodos de maldição que enfraquecem seus inimigos") say("ögretilir.") say_reward("Requisito: Seja um sura de nivel 5 ou mais") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=2 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(2) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado.") ---------------------------------------------- say_title("Treino da Hbilidade Magia Terminado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (76,20) pc.set_skill_level (77,20) pc.set_skill_level (78,20) pc.set_skill_level (79,20) pc.set_skill_level (80,20) pc.set_skill_level (81,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Heavenly Dragon Troop when teacher7.target.click or skill_group1_7.chat."Iniciar o treino de Dragão" or skill_group2_7.chat."Iniciar o treino de Dragão" or skill_group3_7.chat."Iniciar o treino de Dragão" begin target.delete("teacher7") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 3 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar Shaman Dragão") say("Escolha outro Professor.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Iniciar o Treino de Dragão") say("") --- l say("O poder do Deus do Dragão em suas mãos ") say("dirigindo ataques de fogo fortes. ") say("com magia de resistência do deus Dragão. ") say("Eles aprendem a usar sua proteção.") say_reward("Requisito: Seja um Shaman level 5 ou a cima") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=3 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(1) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado.") ---------------------------------------------- say_title("Treino de Dragão Finalizado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (91,20) pc.set_skill_level (92,20) pc.set_skill_level (93,20) pc.set_skill_level (94,20) pc.set_skill_level (95,20) pc.set_skill_level (96,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Thunder Light Troop when teacher8.target.click or skill_group1_8.chat."Iniciar o treino de Cura" or skill_group2_8.chat."Iniciar o treino de Cura" or skill_group3_8.chat."Iniciar o treino de Cura" begin target.delete("teacher8") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 3 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar shaman Cura") say("Escolha outro Professor.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Iniciar o treino de Cura") say("") --- l say("No treinamento da cura, ajuda os amigos ") say("E desfaz os inimigos Com fortes raios") say("Aprenda a usar a cura para seu beneficio.") say_reward("Requisito: Shaman level 5 ou mais") say("") ---------------------------------------------- local s=select("Iniciar", "Não Iniciar") if 2 == s then return end if pc.get_job()!=3 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(2) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado.") ---------------------------------------------- say_title("Treino de cura Finalizado.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Porque você escolheu aprender habilidades ") say("Eu as dou como Mestre") say("Para as evoluir você precisa do seu livro de habilidades.") say_title("Informação:") say_reward("Recebeu habilidades a Mestre.") say("") pc.set_skill_level (106,20) pc.set_skill_level (107,20) pc.set_skill_level (108,20) pc.set_skill_level (109,20) pc.set_skill_level (110,20) pc.set_skill_level (111,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end -- Lycan Light Troop when teacher9.target.click or skill_group1_9.chat."Iniciar o treino de Instinto" or skill_group2_9.chat."Iniciar o treino de Instinto" or skill_group3_9.chat."Iniciar o treino de Instinto" begin target.delete("teacher8") ---------------------------------------------- local pc_job=pc.get_job() if pc_job != 4 then -- !!! --- l say_title("Educação incorreta ") say("") say("Peço imensa desculpa.") say("Somente posso ajudar Lycan Instinto") say("você pode escolher.") say("") if pc_job==0 then --- l say_reward("Você é um Guerreiro Corpo! ") say_reward("Você é um Gerreiro Mental! ") say_reward("Escolha outro Professor.") elseif pc_job==1 then say_reward("Você é um Ninja Adagas! ") say_reward("Você é um Ninja Arco! ") say_reward("Escolha outro Professor.") elseif pc_job==2 then say_reward("Você é um Sura Armas! ") say_reward("Você é um Sura Magia! ") say_reward("Escolha outro Professor.") elseif pc_job==3 then say_reward("Você é um Shaman Dragão! ") say_reward("Você é um Shaman cura! ") say_reward("Escolha outro Professor.") elseif pc_job==4 then say_reward("Você é um Lycam Instinto! ") say_reward("Escolha outro Professor.") end say("") return end ---------------------------------------------- say_title("Treinar Instinto") say("") --- l say("Como estão as suas garras? ") say("Bem vou lhe enssinar uma arte para o ajudar") say("Vai aprender a arte de Instinto..") say_reward("Informação: Ser do nivel 5 ou mais") say("") ---------------------------------------------- local s=select("Iniciar", "Inda Não") if 2 == s then return end if pc.get_job()!=4 or pc.get_skill_group()!=0 then test_chat("npc_is_same_job:"..bool_to_str(npc_is_same_job())) test_chat("pc.get_skill_group:"..pc.get_skill_group()) test_chat("pc_job:"..pc.get_job()) return end set_state("start") pc.set_skill_group(1) -- !!! pc.clear_skill() char_log(0, "CLEAR_SKILL", "O próximo talento natural quando o professor é liberado.") ---------------------------------------------- say_title("Eu escolhi a educação instintiva.") --- l say("Parabens!") if not pc.is_clear_skill_group() then --- l say("Aprendeu as abilidades a Mestre ") say("Eu não o posso ajudar mais o resto você vai") say("precisar do seu livro de habilidades para desenvolver.") say_title("Informação:") say_reward("Habilidades Dadas como Mestre.") say("") pc.set_skill_level (170,20) pc.set_skill_level (171,20) pc.set_skill_level (172,20) pc.set_skill_level (173,20) pc.set_skill_level (174,20) pc.set_skill_level (175,20) pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (141,40) pc.set_skill_level (142,40) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) else say_reward("Quando você escolhe um novo curso,") say_reward("Você não terá mais pontos de experiência.") say("") end clear_letter() end end -- end_of_state: run end -- end_of_quest 6 - skill_reset2 Spoiler quest skill_reset2 begin state start begin when 9006.chat."Redefinição de habilidade." begin say_title(mob_name(npc.get_race())..":") say("") --- if(math.floor(get_global_time()/86400) == pc.getf("skill_reset2","time")) then say("Você já redefiniu suas habilidades. Lembra? ") say("Eu sei por estar tão exausto você pode perder a cabeça.") say("Essa mudança pode ser alterada pasdado 1 dia .") return elseif(pc.get_level() < 5) then say("Você é apenas um Iniciante e não aprendeu nada") say("Vá e aprenda algo primeiro!") say("") return elseif(pc.get_skill_group() == 0) then say("A memória já está vazia não tem Habilidades.") say("") return end local cost if(pc.get_level() > 30) then cost = 10000 + pc.level * 3000 else cost = 10000 + pc.level * 2000 end say("Olá está no lugar certo") say("mas você parece canssado.") say("Eu ajudo as pessoas a esquecer as suas Habilidades. ") say("Então você quer começasr de novo?") say("E esquecer as suas antigas Habilidades?") say("Para o fazer tem um custo!") say_reward("Preço : "..cost.." Yang.") say("") local s = select("Quero Esquecer","Não Obrigado") if(s == 2) then return end if(pc.money < cost) then say_title(mob_name(npc.get_race())..":") say("") --- say("Acha que sou rica não taraz Yang?.") say("Com a minha idade eu não posso trabalhar,") say("Preciso de ganhar algum para viver.") return end pc.setf("skill_reset2","time",math.floor(get_global_time()/259000)) pc.change_gold(-cost) pc.clear_skill() pc.set_skill_group(0) set_quest_state("skill_group","run") end end end 7 - skil_p Spoiler ---pc.set_skill_level ---pc.get_skill_level quest pskill begin state start begin when 50512.use begin local meslek = pc.get_job() local grup = pc.get_skill_group() if meslek == 0 then if grup == 1 then say(" Olá "..pc.get_name()..", ") say(" Por ser Gerreiro Corpo ,") say(" Selecione um abaixo! ") local bedensel = select (" Ataque Triplo " , " Espada Rotativa " , " raiva " , " Aura da Espada " , " Investida" , " Força Vital " , " Fechar ") if bedensel == 1 then local skillnumara = 1 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bedensel == 2 then local skillnumara = 2 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bedensel == 3 then local skillnumara = 3 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bedensel == 4 then local skillnumara = 4 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bedensel == 5 then local skillnumara = 5 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bedensel == 6 then local skillnumara = 6 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end elseif grup == 2 then say(" Olá "..pc.get_name()..", ") say(" So por ser Gerreiro Mental ,") say(" Selecione um a baixo! ") local zihinsel = select (" Força do Golpe " , " Ataque Destrutivo " , " Terramoto " , " Corpo Forte " , " Ataque de Espada " , " Orbe da Espada " , " Fechar ") if zihinsel == 1 then local skillnumara = 16 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif zihinsel == 2 then local skillnumara = 17 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif zihinsel == 3 then local skillnumara = 18 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif zihinsel == 4 then local skillnumara = 19 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif zihinsel == 5 then local skillnumara = 20 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif zihinsel == 6 then local skillnumara = 21 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end end elseif meslek == 1 then if grup == 1 then say(" Olá "..pc.get_name()..", ") say(" Por ser Ninja Adagas ,") say(" Selecione um a baixo! ") local yakýndovus = select (" Emboscar " , " Ataque Rápido " , " Adaga Rotativa " , " Modo Furtivo " , " Nuvem Venenosa " , " Veneno Insidioso " , " Fechar ") if yakýndovus == 1 then local skillnumara = 31 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif yakýndovus == 2 then local skillnumara = 32 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif yakýndovus == 3 then local skillnumara = 33 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif yakýndovus == 4 then local skillnumara = 34 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif yakýndovus == 5 then local skillnumara = 35 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif yakýndovus == 6 then local skillnumara = 36 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end elseif grup == 2 then say(" Olá "..pc.get_name()..", ") say(" Por ser Ninja Arco ,") say(" Selecione um a baixo! ") local uzakdovus = select (" Tiro Duplo " , " Chuva de Setas " , " Seta de Fogo " , " Flutuar " , " Seta Envenenada " , " Faisca" , " Fechar ") if uzakdovus == 1 then local skillnumara = 46 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif uzakdovus == 2 then local skillnumara = 47 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif uzakdovus == 3 then local skillnumara = 48 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif uzakdovus == 4 then local skillnumara = 49 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif uzakdovus == 5 then local skillnumara = 50 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif uzakdovus == 6 then local skillnumara = 51 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end end elseif meslek == 2 then if grup == 1 then say(" Olá "..pc.get_name()..", ") say(" Só porque é sura Armas ,") say(" Selecione um a baixo! ") local bsilah = select (" Ataque do Dedo " , " Espiral do Dragão " , " Lâmina Encantada " , " Receio " , " Armadura Negra " , " Remover Efeito " , " Kapat ") if bsilah == 1 then local skillnumara = 61 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bsilah == 2 then local skillnumara = 62 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bsilah == 3 then local skillnumara = 63 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bsilah == 4 then local skillnumara = 64 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bsilah == 5 then local skillnumara = 65 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif bsilah == 6 then local skillnumara = 66 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end elseif grup == 2 then say(" Olá "..pc.get_name()..", ") say(" Só porque é sura Magias ,") say(" Selecione um a baixo! ") local karabuyu = select (" Ataque Obscuro " , " Ataque Chama " , " Espírito Chama " , " Proteção Sombria " , " Ataque Espiritual " , " Bola da Escuridão " , " Fechar ") if karabuyu == 1 then local skillnumara = 76 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif karabuyu == 2 then local skillnumara = 77 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif karabuyu == 3 then local skillnumara = 78 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif karabuyu == 4 then local skillnumara = 79 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif karabuyu == 5 then local skillnumara = 80 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif karabuyu == 6 then local skillnumara = 81 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end end elseif meslek == 3 then if grup == 1 then say(" Olá "..pc.get_name()..", ") say(" Só porque é Shaman Dragão ,") say(" Selecione um a baixo! ") local ejderhay = select (" Talismã Voador " , " Ataque do Dragão " , " Rugido do Dragão " , " Benção " , " Poder Reflectivo " , " Ajuda do Dragão ", " Fechar ") if ejderhay == 1 then local skillnumara = 91 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif ejderhay == 2 then local skillnumara = 92 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif ejderhay == 3 then local skillnumara = 93 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif ejderhay == 4 then local skillnumara = 94 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif ejderhay == 5 then local skillnumara = 95 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif ejderhay == 6 then local skillnumara = 96 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end elseif grup == 2 then say(" Olá "..pc.get_name()..", ") say(" Só porque é Shaman Cura ,") say(" Selecione um a baixo! ") local iyilestirme = select (" Atirar Raio " , " Invocar Raio " , " Garra de Raios " , " Curar " , " Rapidez " , " Energia ", " Kapat ") if iyilestirme == 1 then local skillnumara = 106 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif iyilestirme == 2 then local skillnumara = 107 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif iyilestirme == 3 then local skillnumara = 108 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif iyilestirme == 4 then local skillnumara = 109 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif iyilestirme == 5 then local skillnumara = 110 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif iyilestirme == 6 then local skillnumara = 111 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end end elseif meslek == 4 then if grup == 1 then say(" Olá "..pc.get_name()..", ") say(" Para treinar as suas Habilidades ,") say(" Selecione um abaixo! ") local icgudu = select (" Retalho " , " Sopro do Lobo " , " Salto do Lobo " , " Garra do Lobo " , " Alma do Lobo Rubro " , " Alma do Lobo Anil ", " Fechar ") if icgudu == 1 then local skillnumara = 170 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" O nível de habilidade deve ser de pelo menos 17. ") end elseif icgudu == 2 then local skillnumara = 171 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif icgudu == 3 then local skillnumara = 172 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif icgudu == 4 then local skillnumara = 173 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif icgudu == 5 then local skillnumara = 174 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end elseif icgudu == 6 then local skillnumara = 175 local perfect = 40 local skillseviye = pc.get_skill_level(skillnumara) if skillseviye >= 17 and skillseviye < 40 then say(" Se tiver mais de 17 pontos de Habilidade, ") say(" Você pode tornar esta habilidade perfeita. ") say(" Você quer fazê-lo? ") local secim = select (" Sim " , " Não ") if secim == 1 then pc.set_skill_level(skillnumara,perfect) pc.remove_item("50512",1) elseif secim == 2 then say(" Você é que sabe Adeus! ") end elseif skillseviye >= 40 then say(" Essa habilidade já é perfeita. ") elseif skillseviye < 17 then say(" Deve ter pelo menos 17 pontos de Habilidade. ") end ---- end end end end end end 8-Serviços ou anel de teleporte Spoiler ------ Bu files Yakup Polat tarafindan yapilmistir,skype : best_desiqner ------ ----------------------------------------------- quest servis begin state start begin when 40003.use begin say_title("Server: Serviços ") say("Serviços disponiveis para ti, "..pc.get_name()) say("Queres usar algum?") local menu = select("Armazém " , "Teleporte " , "Anti Exp " , "Habilidades " , "Quests Biologo " , "Mapas Beta " , "Fechar ") if menu == 1 then if pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 then syschat("Não podes abrir o Armazém dentro da torre.") return elseif pc.get_map_index() == 73 then syschat("Não podes abrir o Armazém dentro da cave 2.") return elseif pc.get_map_index() == 211 then syschat("Não podes abrir o Armazém dentro da cave 3.") return elseif pc.get_map_index() == 28 then syschat("Não podes abrir o Armazém na area de evetos.") return elseif pc.get_map_index() >= 790000 and pc.get_map_index() < 800000 or pc.get_map_index() == 79 then syschat("Não podes abrir o Armazém no templo do Dragão.") return else game.open_safebox() return end elseif menu == 2 then say_title("Teste server: Serviços ") say("Para onde queres ir?") local s = select("Reinos ","Para as Florestas ","Cave das Aranhas ","Entrada da Atlandida ","Outras Regiões ", "Zona comercial ","Fechar ") if s == 1 then say_title("Teste server: Serviços ") say("Queres ir a outro Reino?") local ss = select("Reino Vermelho(Cidade.1) ","Reino Vermelho(Cidade.2) ","Reino Amarelo (Cidade.1) ","Reino Amarelo (Cidade.1) ","Reino Azul (Cidade.1) ","Reino Azul (Cidade.2) ","Fechar ") if ss == 1 then pc.warp(474300,954800) elseif ss == 2 then pc.warp(360800,877600) elseif ss == 3 then pc.warp(63800,166400) elseif ss == 4 then pc.warp(138500,234900) elseif ss == 5 then pc.warp(959800,268400) elseif ss == 6 then pc.warp(873100,242600) elseif ss == 7 then return end elseif s == 2 then say_title("Teste server: Serviços ") say("Queres Ir para as Florestas?") local sss = select("Floresta ","Bosque Rubro (Inicio) ","Bosque Rubro (Final) ","Fechar ") if sss == 1 then pc.warp(288700,5700) elseif sss == 2 then pc.warp(1119900,70800) elseif sss == 3 then pc.warp(1118100,8600) elseif sss == 4 then return end elseif s == 3 then say_title("Teste server: Serviços ") say("Vamos a Cave das Aranhas?") local zindan = select("Cave das Aranhas.1 Inicio ","Cave das Aranhas 2. Final ", "Cave das Aranhas 3. Final ","Fechar ") if zindan == 1 then pc.warp(59800,497300) elseif zindan == 2 then pc.warp(704100,521900) elseif zindan == 3 then if pc.get_level() < 60 then say_title("Teste server: Serviços ") say ( "Ir para a Cave das arnhas piso 3?" ) say ( "So a level 60 podes ir! ") return end pc.warp(69200,611000) elseif zindan == 4 then return end elseif s == 4 then say_title("Teste server: Serviços ") say("Vou te teleportar para a entrada da Atlantida...") wait() pc.warp(284400,810700) elseif s == 5 then say_title("Teste server: Serviços ") say("Onde queres ir?") local sssssss = select("Vale Seungryong ","Montanha Sohan ","Deserto Yongbi ","Doyyumhwan ","Terra de Gigantes ","Torre do Demonio ","Fechar ") if sssssss == 1 then pc.warp(336000,755600) elseif sssssss == 2 then pc.warp(436400,215600) elseif sssssss == 3 then pc.warp(296800,547400) elseif sssssss == 4 then pc.warp(600800,687400) elseif sssssss == 5 then pc.warp(829900,763300) elseif sssssss == 6 then pc.warp(590500,110500) elseif sssssss == 7 then return end elseif s == 6 then say_title("Teste server: Serviços ") say("Vou te teleportar Para a Zona de Comercio.") wait() pc.warp(16558200,16575600) end elseif menu == 3 then if pc.getqf("antiexp") == 0 then pc.block_exp() pc.setqf("antiexp", 1) chat("Anti exp foi Activado.") elseif pc.getqf("antiexp") == 1 then pc.unblock_exp() pc.setqf("antiexp", 0) chat("Anti exp Desactivado.") end elseif menu == 4 then if pc.get_level() < 15 then say_title("Teste server: Serviços ") say("Vai upar mais um pouco.") return else local sure = pc.getqf("beceri_islem") if get_time() < sure then say_title("Teste server: Serviços ") say("Podes voltar a usar passado 5 minutos ") say("Aguarda 1 pouco.") say("") say_reward("Tempo restante :"..(math.ceil(sure-get_time())/60).." minuto") return else say_title("Teste server: Serviços ") say("O que queres fazer?") local skill = select("Descartar Habilidade ", "Fechar") if skill == 1 then say_title("Blade2 : Servis ") say_reward("De certeza de que desejas redefinir todas as tuas habilidades?") local skilleminmisin = select("Sim ","Não ") if skilleminmisin == 1 then if pc.get_skill_group()==0 then say_title("Teste server: Serviços ") say("") say("Não precisas de uma redefinição de habilidades.") say("Porque inda não tens habilidades.") say("") return end pc.setqf("beceri_islem",get_time()+60*5) char_log(0, "RESET_ALL", "RESET_SKILL_POINTS") pc.clear_skill() pc.set_skill_level (137,20) pc.set_skill_level (138,20) pc.set_skill_level (139,20) pc.set_skill_level (131,10) pc.set_skill_level (129,40) pc.set_skill_level (128,20) pc.set_skill_level (127,20) pc.set_skill_level (126,20) pc.set_skill_level (124,40) pc.set_skill_level (121,40) pc.set_skill_level (122,2) pc.set_skill_group(0) set_quest_state("skill_group","run") elseif skill == 3 then return end end end end elseif menu == 5 then local index = pc.get_map_index() if index != 211 and index != 79 then if index == 72 or index == 73 or index == 41 or index == 1 or index == 21 then local b = pc.get_empire() command("setblockmode 1") if pc.getqf("bio_gittim") == 0 then local x = pc.getx() local y = pc.gety() say_title("Teste server: Serviços ") say("Queres ir falar com o biólogo?") say("") local a = select(locale.yes,locale.no) if a == 1 then pc.setqf("bio_x",x) pc.setqf("bio_y",y) pc.setqf("bio_gittim",1) if b == 1 then pc.warp(498300,956800) elseif b == 2 then pc.warp(89300,182000) elseif b == 3 then pc.warp(950900,233400) end end else say_title("Teste server: Serviços ") say("Queres voltar para o último ponto?") say("") local c = select(locale.yes,locale.no) if c == 1 then pc.setqf("bio_gittim",0) pc.warp(pc.getqf("bio_x")*100,pc.getqf("bio_y")*100) end end else say_title("Teste server: Serviços ") say("Esta seção apenas dispara ") say("Você pode usá-lo em sua caverna.") return end else say_title("Teste server: Serviços ") say("No ninho da baronesa e na sala do dragão ") say("Não podes usar esta partição.") return end elseif menu == 6 then say_title("Teste server: Serviços ") say("A pouco tempo atrás, foram descobertos mapas beta.") say("Os mapas beta são lugares muito perigosos Mesmo para min!") say("Mas se me deres algum yang 10k posso te levar la!") say_reward("Para quql mapa queres Ir? ") local s = select("Mapa Cap Dragão ","Baia Nefrit","Montanhas do Trovão ","Baia Gautama ","Eu não quero ir! ") if s == 1 then if pc.get_level() < 80 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Deves ser do nivel 80! ") return end if pc.get_gold() < 10000000 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Tens que ter 10k yang! ") return end say_title("Teste server: Serviços ") say("Vais de seguida para a Aldeia Cap Dragão..") wait() pc.change_gold(-10000000) pc.warp(1104300,1788500) end if s == 2 then if pc.get_level() < 80 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Deves ser do nivel 80! ") return end if pc.get_gold() < 10000000 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Tens que ter 10k yang! ") return end say_title("Teste server: Serviços ") say("Vais de seguida para a baía Nephrite..") wait() pc.change_gold(-10000000) pc.warp(1087900,1655900) end if s == 3 then if pc.get_level() < 80 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Deves ser do nivel 80! ") return end if pc.get_gold() < 10000000 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Tens que ter 10k yang! ") return end say_title("Teste server: Serviços ") say("Vais de seguida para as Montanhas do Trovão..") wait() pc.change_gold(-10000000) pc.warp(1135500,1653400) end if s == 4 then if pc.get_level() < 80 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Deves ser do nivel 80! ") return end if pc.get_gold() < 10000000 then say_title("Teste server: Serviços ") say ( "Para ir para mapeamentos Beta" ) say ( "Tens que ter 10k yang! ") return end say_title("Teste server: Serviços ") say("Vais de seguida para a Baia Gautama..") wait() pc.change_gold(-10000000) pc.warp(1226300,1681100) end elseif menu == 7 then return end end when login with pc.get_map_index() == 210 and pc.get_map_index() == 209 and pc.get_map_index() == 208 and pc.get_map_index() == 207 and pc.get_level() < 80 begin chat("Para poderes acessar este mapa, é necessário Nivel 80!") warp_to_village() end when login with pc.get_map_index() == 211 and pc.get_level() < 60 begin chat("Para poderes acessar este mapa, precisas ter um personagem acima de Nivel 60!") warp_to_village() end when login begin if pc.getqf("antiexp") == 1 then pc.block_exp() chat("Anti-EXP Sistema activo. Não ganharás exp durante este tempo.") end end end end 9 - Armazem Spoiler quest warehouse begin state start begin when 9005.click begin if pc.getqf("pw")==0 then say_title("Guarda do Armazém") say("Olá Amigo,") say("Como deves imaginar nesse teu inventário") say("năo te vai caber todos os itens que ") say("eventualmente queiras apanhar.") say("Eu ofreço-te aqui um armazém") say("Para guardares todos os teus itens") say("Mas terás que pagar algum yang.") say("É Só 500 Yang.") say_reward("Queres Comprar um Armazém?") local s=select("Quero", "Năo Quero") if s==2 then return end if pc.get_gold()<500 then say_title("Guarda do Armazém") say("Năo tens yang Suficiente.") return end say_title("Guarda do Armazém") say("Oh! Muito Obrigado Por Comprares") say("o Armazém.") say_reward("A Tua Password é 000000") pc.change_gold(-500) game.set_safebox_level(1) pc.setqf("pw", 1) elseif pc.getqf("pw")==1 then say_title("Guarda do Armazém") say("Que Queres Fazer?") local f = select("Abrir Armazém", "Comprar Barras de Ouro", "Abrir Armazém de Artigos", "Sair") if f == 1 then game.open_safebox() setskin(NOWINDOW) elseif f == 2 then npc.open_shop() setskin(NOWINDOW) elseif f == 3 then game.open_mall() setskin(NOWINDOW) end end end end end 10- info do cavalo no guarda Spoiler quest horse_guard begin state start begin when 20349.chat."Informaçőes sobre meu cavalo" begin local s=number(1, 7) if 1>=s then -- 14.29% (1/7) --- l say("Em quanto estiver montado no cavalo,") say("ele irá se cansar. Vocę năo pode montar num") say("cavalo sem vida. Deve deixá-lo descansar .") say(" ") elseif 2>=s then -- 14.29% (1/7) say("Dizem que um cavalo morto pode ser ressucitado") say("com ervas. Mas essas ervas săo guardadas pelos") say("Macacos, e parece ser difícil buscá-las. Se") say("vocę for apanhado por um Macaco, eles") say("te transformam num Macaco também!") elseif 3>=s then -- 14.29% (1/7) say("Há diferentes habilidades de montaria. Vocę pode") say("melhorar o nivel do seu cavalo o deixando mais") say("forte. Mas apenas uma pessoa pode usar o cavalo ") elseif 4>=s then -- 14.29% (1/7) say("Os cavalos precisam de vários tipos de comida, ") say("nas diferentes fases de crescimento.") say("Os cavalos pequenos comem Feno, os médios comem.") say("Cenouras e os grandes comem Ginseng Vermelhos.") say("") say("Como pode imaginar, eles tęm mais resistęncia") say("do que os humanos.") say("") elseif 6>=s then -- 14.29% (1/7) say("Se o seu cavalo for saudável, é marcado como") say("verde, se for amarelo, o seu cavalo está com fome") say("e se for vermelho, o seu cavalo está faminto") say("Vocę deve alimentá-lo para que ele volte ") say("ao estado verde outra vez.") say("Será um grande problema se o seu cavalo morrer.") say("") say("") elseif 7>=s then -- 14.29% (1/7) say("Os cavalos tęm 3 fases de crescimento:") say("pequeno, médio e grande. Para o seu crescimento,") say("") elseif 7>=s then -- 14.29% (1/7) say("Para iniciar a missăo do cavalo é preciso") say("ter uma Medalha Equestre. Poderá adquirir") say("uma no Calabouços dos Macacos.") end end end state __COMPLETE__ begin when enter begin q.done() end end end 11- cards_event Spoiler quest cards_event begin state start begin when login or enter with game.get_event_flag("cards_event") == 0 and pc.getqf("first_click") == 1 begin pc.setqf("first_click",0) end when login or enter with game.get_event_flag("cards_event") != 0 begin cmdchat("cards icon") local mapIndex = pc.get_map_index() if mapIndex == 1 or mapIndex == 21 or mapIndex == 41 then if find_npc_by_vnum(20417) == 0 then if mapIndex == 1 then mob.spawn(20417, 612, 612, 1, 1, 1) elseif mapIndex == 21 then mob.spawn(20417, 595, 622, 1, 1, 1) elseif mapIndex == 41 then mob.spawn(20417, 354, 735, 1, 1, 1) end end end end when 79505.pick with pc.count_item(79505) >= 24 begin pc.remove_item(79505, 24) pc.give_item2(79506) end when 20417.chat."Veja os prêmios" with game.get_event_flag("cards_event") != 0 begin local items = {item_name(50267), item_name(50268), item_name(50269), "Fechar"} local points = {"Pontuação superior a 400", "Entre 400 e 299 pontos", "299 ou menus pontos"} local rewards = { {55403,55404,55405,55406,79506,71192,71193,50513,55003,55001,55009,55004,55005,51505,51506,71224,71225,"700000 EXP","500000 Yang","700000 Yang"}, {55401,55403,55405,79506,71192,71193,50513,55003,55003,55001,55009,55004,55005,51505,51506,71224,71225,"700000 EXP","500000 Yang","700000 Yang"}, {79505,"700000 EXP","500000 Yang","700000 Yang"}, } local s = select_table(items) if s == 4 then return end if s == 1 then say_item_vnum(50267) say("Condição: 400 ou mais pontos") say("") say("Pode conter objetos:") say("") say(item_name(rewards[s][1])) say(item_name(rewards[s][2])) say(item_name(rewards[s][3])) say(item_name(rewards[s][4])) say("") wait() say(item_name(rewards[s][5])) say(item_name(rewards[s][6])) say(item_name(rewards[s][7])) say(item_name(rewards[s][8])) say(item_name(rewards[s][9])) say(item_name(rewards[s][10])) say(item_name(rewards[s][11])) say(item_name(rewards[s][12])) say(item_name(rewards[s][13])) say(item_name(rewards[s][14])) say(item_name(rewards[s][15])) say(item_name(rewards[s][16])) say("") wait() say(item_name(rewards[s][17])) say(rewards[s][18]) say(rewards[s][19]) say(rewards[s][20]) say("") elseif s == 2 then say_item_vnum(50268) say("Condição: entre 400 e 299 pontos") say("") say("Pode conter objetos:") say("") say(item_name(rewards[s][1])) say(item_name(rewards[s][2])) say(item_name(rewards[s][3])) say(item_name(rewards[s][4])) say("") wait() say(item_name(rewards[s][5])) say(item_name(rewards[s][6])) say(item_name(rewards[s][7])) say(item_name(rewards[s][8])) say(item_name(rewards[s][9])) say(item_name(rewards[s][10])) say(item_name(rewards[s][11])) say(item_name(rewards[s][12])) say(item_name(rewards[s][13])) say(item_name(rewards[s][14])) say(item_name(rewards[s][15])) say(item_name(rewards[s][16])) say("") wait() say(item_name(rewards[s][17])) say(rewards[s][18]) say(rewards[s][19]) say(rewards[s][20]) say("") elseif s == 3 then say_item_vnum(50269) say("Condição: 299 ou seis pontos") say("") say("Pode conter objetos:") say("") say(item_name(rewards[s][1])) say(rewards[s][2]) say(rewards[s][3]) say(rewards[s][4]) say("") end end when 20417.chat."Top List" with game.get_event_flag("cards_event") != 0 begin if pc.getqf("first_click") == 0 then game.mysql_query("insert into log.okay_event values('"..pc.get_player_id().."', '"..pc.get_name().."', '0')") pc.setqf("first_click",1) end local my_points_rund = game.mysql_query("select points from log.okay_event where pid='"..pc.get_player_id().."' ORDER BY points DESC LIMIT 1") local my_points_total = game.mysql_query("select sum(points) as spoints from log.okay_event where pid='"..pc.get_player_id().."' LIMIT 1") local my_points_rund_1 = tonumber(my_points_rund[1][1]) local my_points_total_1 = tonumber(my_points_total[1][1]) local a = select("Grande Prêmio","Pontos totais","Top Tour Score ","Fechar") if a == 1 then say("10 jogadores com o maior resultado total") say("Ganham os segintes prêmios.") say("") say("Primeiro: 10 "..item_name(50267)) say("") say("Segundo: 5 "..item_name(50267)) say("") say("Terceiro: 3 "..item_name(50267)) say("") say("Do quarto ao décimo: 1 "..item_name(50267)) say("") elseif a == 2 then say_title("Pontos totais") say("") say(pc.get_okay_global_rank()) say("") say("Mostrar: "..my_points_total_1) elseif a == 3 then say_title("Top Tour Score ") say("") say(pc.get_okay_rund_rank()) say("") say("Mostrar: "..my_points_rund_1) else return end end when 20417.chat."GM: Activar Evento" with pc.is_gm() begin if game.get_event_flag("cards_event") == 0 then say("O evento de cartas está desligado.") say("Você deseja abri-lo?") if select("Sim","Não") == 2 then return end say("Excluir entradas do evento anterior") say("Quer excluir?") if select("Sim","Não") == 1 then game.mysql_query("delete from log.okay_event where pid > 0") end game.set_event_flag("cards_event",1) else say("O evento de cartas está a decorrer.") say("Você quer fechá-lo?") if select("Sim","Nao") == 2 then return end game.set_event_flag("cards_event",0) end end when 71194.use with game.get_event_flag("cards_event") != 0 begin pc.remove_item("71194",1) pc.give_item2("79506",5) end when 71195.use with game.get_event_flag("cards_event") != 0 begin pc.remove_item("71195",1) pc.give_item2("79506",1) end when 71196.use with game.get_event_flag("cards_event") != 0 begin pc.remove_item("71196",1) pc.give_item2("79505",6) end end end 12 - serviços de gm ou painel de eventos Spoiler quest cards_event begin state start begin when login or enter with game.get_event_flag("cards_event") == 0 and pc.getqf("first_click") == 1 begin pc.setqf("first_click",0) end when login or enter with game.get_event_flag("cards_event") != 0 begin cmdchat("cards icon") local mapIndex = pc.get_map_index() if mapIndex == 1 or mapIndex == 21 or mapIndex == 41 then if find_npc_by_vnum(20417) == 0 then if mapIndex == 1 then mob.spawn(20417, 612, 612, 1, 1, 1) elseif mapIndex == 21 then mob.spawn(20417, 595, 622, 1, 1, 1) elseif mapIndex == 41 then mob.spawn(20417, 354, 735, 1, 1, 1) end end end end when 79505.pick with pc.count_item(79505) >= 24 begin pc.remove_item(79505, 24) pc.give_item2(79506) end when 20417.chat."Veja os prêmios" with game.get_event_flag("cards_event") != 0 begin local items = {item_name(50267), item_name(50268), item_name(50269), "Fechar"} local points = {"Pontuação superior a 400", "Entre 400 e 299 pontos", "299 ou menus pontos"} local rewards = { {55403,55404,55405,55406,79506,71192,71193,50513,55003,55001,55009,55004,55005,51505,51506,71224,71225,"700000 EXP","500000 Yang","700000 Yang"}, {55401,55403,55405,79506,71192,71193,50513,55003,55003,55001,55009,55004,55005,51505,51506,71224,71225,"700000 EXP","500000 Yang","700000 Yang"}, {79505,"700000 EXP","500000 Yang","700000 Yang"}, } local s = select_table(items) if s == 4 then return end if s == 1 then say_item_vnum(50267) say("Condição: 400 ou mais pontos") say("") say("Pode conter objetos:") say("") say(item_name(rewards[s][1])) say(item_name(rewards[s][2])) say(item_name(rewards[s][3])) say(item_name(rewards[s][4])) say("") wait() say(item_name(rewards[s][5])) say(item_name(rewards[s][6])) say(item_name(rewards[s][7])) say(item_name(rewards[s][8])) say(item_name(rewards[s][9])) say(item_name(rewards[s][10])) say(item_name(rewards[s][11])) say(item_name(rewards[s][12])) say(item_name(rewards[s][13])) say(item_name(rewards[s][14])) say(item_name(rewards[s][15])) say(item_name(rewards[s][16])) say("") wait() say(item_name(rewards[s][17])) say(rewards[s][18]) say(rewards[s][19]) say(rewards[s][20]) say("") elseif s == 2 then say_item_vnum(50268) say("Condição: entre 400 e 299 pontos") say("") say("Pode conter objetos:") say("") say(item_name(rewards[s][1])) say(item_name(rewards[s][2])) say(item_name(rewards[s][3])) say(item_name(rewards[s][4])) say("") wait() say(item_name(rewards[s][5])) say(item_name(rewards[s][6])) say(item_name(rewards[s][7])) say(item_name(rewards[s][8])) say(item_name(rewards[s][9])) say(item_name(rewards[s][10])) say(item_name(rewards[s][11])) say(item_name(rewards[s][12])) say(item_name(rewards[s][13])) say(item_name(rewards[s][14])) say(item_name(rewards[s][15])) say(item_name(rewards[s][16])) say("") wait() say(item_name(rewards[s][17])) say(rewards[s][18]) say(rewards[s][19]) say(rewards[s][20]) say("") elseif s == 3 then say_item_vnum(50269) say("Condição: 299 ou seis pontos") say("") say("Pode conter objetos:") say("") say(item_name(rewards[s][1])) say(rewards[s][2]) say(rewards[s][3]) say(rewards[s][4]) say("") end end when 20417.chat."Top List" with game.get_event_flag("cards_event") != 0 begin if pc.getqf("first_click") == 0 then game.mysql_query("insert into log.okay_event values('"..pc.get_player_id().."', '"..pc.get_name().."', '0')") pc.setqf("first_click",1) end local my_points_rund = game.mysql_query("select points from log.okay_event where pid='"..pc.get_player_id().."' ORDER BY points DESC LIMIT 1") local my_points_total = game.mysql_query("select sum(points) as spoints from log.okay_event where pid='"..pc.get_player_id().."' LIMIT 1") local my_points_rund_1 = tonumber(my_points_rund[1][1]) local my_points_total_1 = tonumber(my_points_total[1][1]) local a = select("Grande Prêmio","Pontos totais","Top Tour Score ","Fechar") if a == 1 then say("10 jogadores com o maior resultado total") say("Ganham os segintes prêmios.") say("") say("Primeiro: 10 "..item_name(50267)) say("") say("Segundo: 5 "..item_name(50267)) say("") say("Terceiro: 3 "..item_name(50267)) say("") say("Do quarto ao décimo: 1 "..item_name(50267)) say("") elseif a == 2 then say_title("Pontos totais") say("") say(pc.get_okay_global_rank()) say("") say("Mostrar: "..my_points_total_1) elseif a == 3 then say_title("Top Tour Score ") say("") say(pc.get_okay_rund_rank()) say("") say("Mostrar: "..my_points_rund_1) else return end end when 20417.chat."GM: Activar Evento" with pc.is_gm() begin if game.get_event_flag("cards_event") == 0 then say("O evento de cartas está desligado.") say("Você deseja abri-lo?") if select("Sim","Não") == 2 then return end say("Excluir entradas do evento anterior") say("Quer excluir?") if select("Sim","Não") == 1 then game.mysql_query("delete from log.okay_event where pid > 0") end game.set_event_flag("cards_event",1) else say("O evento de cartas está a decorrer.") say("Você quer fechá-lo?") if select("Sim","Nao") == 2 then return end game.set_event_flag("cards_event",0) end end when 71194.use with game.get_event_flag("cards_event") != 0 begin pc.remove_item("71194",1) pc.give_item2("79506",5) end when 71195.use with game.get_event_flag("cards_event") != 0 begin pc.remove_item("71195",1) pc.give_item2("79506",1) end when 71196.use with game.get_event_flag("cards_event") != 0 begin pc.remove_item("71196",1) pc.give_item2("79505",6) end end end 13 - guild_building Spoiler quest guild_building begin state start begin when 20040.click begin say_title("Corretor de Terras:") say("") say("Sou o vendedor de terrenos.") say("Antes estes terrenos eram tranquilos, as pessoas") say("viviam tranquilamente, havia terrenos suficiente") say("para todos. Mas agora com tantos monstros") say("as pessoas vivem com medo, e o terreno tornou-se") say("deserto, se quiser pode comprar este terreno para sua guild") say("Quer comprar este terreno?") say("") local s = select(locale.yes, locale.no) if s == 1 then if not pc.is_guild_master() then say_title("Corretor de Terras:") say("") say("Você não pode compra nenhum terreno") say("pós não é lider de guild.") say("") elseif building.has_land(pc.get_guild()) then say_title("Corretor de Terras:") say("") say("Desculpa , mas cada guilda só pode ter um terreno.") say("") else local land_id = building.get_land_id(pc.get_map_index(), pc.get_x()*100, pc.get_y()*100) if land_id == 0 then say_title("Corretor de Terras:") say("") say("Não consigo encontrar está terra.") else local price, owner, guild_level_limit = building.get_land_info(land_id) say_title("Corretor de Terras:") say("") say("Comprar um terreno não é uma tarefa fácil:") say("Sua guilda precisa ter nível "..guild_level_limit.." .") say("E também precisa de "..price..locale.gold.." .") if guild.level(pc.get_guild()) < guild_level_limit then say("") say("Vejo que você não possui os requisitos necessarios.") say("Volte , quando tiver pronto realmente.") else say("") say("Deseja mesmo compra este terreno ?") s = select(locale.yes, locale.no) if s == 1 then local price, owner, guild_level_limit = building.get_land_info(land_id) if owner!= 0 then say_title("Corretor de Terras:") say("") say("Tem outras guildas interessadas neste terreno.") say("Fique atento..") elseif pc.gold < price then say_title("Corretor de Terras:") say("") say("Não possui gold suficiente.") say("Volte quando tiver com gold ...") else pc.changegold(-price) building.set_land_owner(land_id, pc.get_guild()) notice(guild.name(pc.get_guild()).." Agora é dono de um terreno!") end else say_title("Corretor de Terras:") say("") say("Hmm.. volte quando quiser realmente") say("comprar um terreno.") end end end end else say_title("Corretor de Terras:") say("") say("Hmm.. volte quando quiser realmente") say("comprar um terreno.") end end end end 14 - guild_building_alter_of_power Spoiler quest alter_of_power begin state start begin when 20077.click with npc.get_guild() == pc.get_guild() and pc.is_guild_master() begin --- l say_title("Guarda do Altar:") say("") say("Olá! Sou o Guarda do Altar.") say("O altar permite aumentar o número") say("de membros de uma guilda.") say("Também pode expandir o altar") say("De modo que o número de membros") say("vá aumentando.") say("") if pc.getqf("build_level") == 0 then pc.setqf("build_level", guild.level(pc.get_guild())) end wait() if pc.getqf("build_level") < guild.level(pc.get_guild()) or guild.level(pc.get_guild()) >= 20 then --- l say_title("Guarda do Altar:") say("") say("Bem, está pronto para expandir o altar?") say("Deseja mesmo continuar?") say("") say("Necessario ter:") say("") say_reward("25.000.000 Yang") say_reward("10 Pedra da Fundação") say_reward("15 Compensado") say_reward("10 Tronco") say("") local s = select("Continuar", "Fechar") if s == 1 then if pc.count_item(90010) >= 10 and pc.count_item(90012) >= 15 and pc.count_item(90011) >= 10 and pc.get_gold() >= 25000000 then say_title("Guarda do Altar:") say("") say("O altar foi expandido.") building.reconstruct(14062) pc.setqf("build_level", guild.level(pc.get_guild())) char_log(0, "GUILD_BUILDING", "alter_of_power 14062 constructed") pc.change_gold(-25000000) pc.remove_item("90010", 10) pc.remove_item("90011", 10) pc.remove_item("90012", 15) else say_title("Guarda do Altar:") say("") say("Não possui os materiais necessarios.") say("Quando tiver eles venha até min.") say("") end elseif s == 2 then say_title("Guarda do Altar:") say("") say("Se você mudar de idéia, volte.") say("") end else say_title("Guarda do Altar:") say("") say("Não pode ser expandido agora.") say("") end end when 20078.click with npc.get_guild() == pc.get_guild() and pc.is_guild_master() begin say_title("Guarda do Altar:") say("") say("O altar pode ser expandido outra vez.") say("") wait() say_title("Guarda do Altar:") say("") if pc.getqf("build_level") < guild.level(pc.get_guild()) or guild.level(pc.get_guild()) >= 20 then say("Pode expandir o altar outra vez.") say("Desta vez, precisa de:") say("") say_reward("30.000.000 Gold") say_reward("15 Pedra da Fundação") say_reward("20 Tronco") say_reward("20 Compensado") say("") local s = select("Continuar", "Fechar") if s == 1 then if pc.count_item(90010) >= 15 and pc.count_item(90012) >= 20 and pc.count_item(90011) >= 15 and pc.get_gold() >= 30000000 then say_title("Guarda do Altar:") say("") say("O altar será expandido.") say("") building.reconstruct(14063) pc.setqf("build_level", guild.level(pc.get_guild())) char_log(0, "GUILD_BUILDING", "alter_of_power 14063 constructed") pc.change_gold(-30000000) pc.remove_item("90010", 15) pc.remove_item("90011", 20) pc.remove_item("90012", 20) else say_title("Guarda do Altar:") say("") say("Não possui os materias necessarios.") say("Quando tiver eles venha até min.") say("") end elseif s == 2 then say_title("Guarda do Altar:") say("") say("pode vim mas uma vez.") say("") end end end when 20079.click with npc.get_guild() == pc.get_guild() and pc.is_guild_master() begin say_title("Guarda do Altar:") say("") say("") say("Não pode mas expandir o altar , ele já está no maximo.") say("") say("") end when 20077.click or 20078.click or 20079.click with npc.get_guild() == pc.get_guild() and pc.is_guild_master()!= true begin say_title("Guarda do Altar:") say("Quanto maior for o nível do Altar") say("Poderá ter mais membros na guilda.") end end end 15 - guild_building_melt Spoiler quest guild_building_melt begin state start begin function GetOreRefineCost(cost) if pc.empire != npc.empire then return 3 * cost end if pc.get_guild() == npc.get_guild() then return cost * 0.9 end return cost end function GetOreRefineGoodPct() return 60 end function GetOreRefineBadPct() return 30 end function GetMyRefineNum(race) return race - 20060 + 50601 end function IsRefinableRawOre(vnum) return vnum >= 50601 and vnum <= 50613 end function DoRefineDiamond(pct) local from_postfix local from_name = item_name(item.vnum) local to_vnum = item.vnum + 20 local to_name = item_name(to_vnum) local to_postfix if under_han(from_name) then from_postfix = "" else from_postfix = "" end if under_han(to_name) then to_postfix = "" else to_postfix = "" end say("Traga-me 100 " .. from_name .. from_postfix .. " e também precisamos") say(to_name .. to_postfix .. " para ser capaz de produzir oque quer.") if item.count >= 100 then say("Probabilidade de sucesso "..pct.."%.") say(""..guild_building_melt.GetOreRefineCost(10000).." Gold necessario.") say("Deseja tentar?") local s = select("Sim", "Não") if s == 1 then if pc.get_gold() < guild_building_melt.GetOreRefineCost(10000) then say("Não possui gold suficiente.") return end if pc.diamond_refine(10000, pct) then say("A refinação foi realizada. irá receber:") say_item(to_name, to_vnum, "") else say("A refinação falhou.") end end else say("Traga-me 100 Unidades.") end end function DoRefine(pct) local from_postfix local from_name = item_name(item.vnum) local to_vnum = item.vnum + 20 local to_name = item_name(to_vnum) local to_postfix if under_han(from_name) then from_postfix = "" else from_postfix = "" end if under_han(to_name) then to_postfix = "" else to_postfix = "" end say("Traga-me 100 " .. from_name .. from_postfix .. " e uma") say("pedra +0, +1, +2") say(to_name .. to_postfix .. " Assim você poderá produzir oque quer.") if item.count >= 100 then say("Probabilidade de sucesso "..pct.."%."..guild_building_melt.GetOreRefineCost(3000).." Gold necessario.") say("Deseja tentar ?") local s = select("Sim", "Não") if s == 1 then if pc.get_gold() < guild_building_melt.GetOreRefineCost(3000) then say("Não possui gold suficiente.") return end local selected_item_cell = select_item() if selected_item_cell == 0 then say("Sem o material necessario eu não posso fazer isso.") return end local old_item = item.get_id() if not item.select_cell(selected_item_cell) then say("Não utilizamos esse tipo de material.") return end -- checken, ob der meteorit ist if item.vnum < 28000 or item.vnum >= 28300 then say("Isso é a verdade não importa.") return end item.select(old_item) if pc.ore_refine(3000, pct, selected_item_cell) then say("A refinação foi realizada, irá receber:") say_item(to_name, to_vnum, "") else say("A refinação falhou.") end end else say("Traga-me 100 Unidades.") end end when 20060.take or 20061.take or 20062.take or 20063.take or 20064.take or 20065.take or 20066.take or 20067.take or 20068.take or 20069.take or 20070.take or 20071.take or 20072.take with guild_building_melt.GetMyRefineNum(npc.race) == item.vnum begin if item.vnum == 50601 then guild_building_melt.DoRefineDiamond(guild_building_melt.GetOreRefineGoodPct()) else guild_building_melt.DoRefine(guild_building_melt.GetOreRefineGoodPct()) end end when 20060.take or 20061.take or 20062.take or 20063.take or 20064.take or 20065.take or 20066.take or 20067.take or 20068.take or 20069.take or 20070.take or 20071.take or 20072.take with guild_building_melt.IsRefinableRawOre(item.vnum) and guild_building_melt.GetMyRefineNum(npc.race) != item.vnum begin if item.vnum == 50601 then guild_building_melt.DoRefineDiamond(guild_building_melt.GetOreRefineBadPct()) else guild_building_melt.DoRefine(guild_building_melt.GetOreRefineBadPct()) end end when 20060.click or 20061.click or 20062.click or 20063.click or 20064.click or 20065.click or 20066.click or 20067.click or 20068.click or 20069.click or 20070.click or 20071.click or 20072.click with npc.get_guild() == pc.get_guild() and pc.isguildmaster() begin say("Precisa de 3.000.000 de gold para personalizar seu terreno.") if pc.get_gold() < 3000000 then say("Traga-me 3.000.000 de gold.") else say("Que tipo de especialização você pretende comprar?") local sel = 0 local timetable1 = {"Diamante", "Fósseis", "Cobre", "Prata", "Ouro", "Jade", "Próximo", "Fechar"} local valuetable1 = {14043, 14045, 14046, 14047, 14048, 14049, 0, -1} local timetable2 = {"Ébano", "Pérola", "Ouro Branco", "Cristal", "Ametista", "Diamante", "Próximo", "Fechar"} local valuetable2 = {14050, 10451, 14052, 14053, 14054, 14055, 0, -1} repeat local s = select_table(timetable1) sel = valuetable1[s] if sel == 0 then local s = select_table(timetable2) sel = valuetable2[s] end until sel != 0 if sel != -1 then npc_num = sel + 20060 - 14043 if npc_num == npc.get_race() then say("Não é possível sem um trabalho.") else pc.changegold(-3000000) building.reconstruct(sel) end else say("Isso não pode acontecer.") end end end end end 16 - guild_building_npc Spoiler quest guild_building_npc begin state start begin when 20044.click begin if npc.get_guild() == pc.get_guild() then --- l say_title("Chorbu:") say("") say("O meu nome é Chorbu, Sou responsável") say("pelo melhoramento de armas.") say("Sou muito mais que um armeiro na vila!") say("Quando vocę vem até min pode aumentar a chance de") say("sucesso para 10%. Dę-me a sua arma,") say("que eu quero melhorá-la.") else --- l say_title("Chorbu:") say("") say("O meu nome é Chorbu, Sou responsável") say("pelo melhoramento de armas.") say("Sou muito mais que um armeiro na vila!") say("Quando vocę vem até min pode aumentar a chance de") say("sucesso para 10%. Dę-me a sua arma,") say("que eu quero melhorá-la.") end end when 20045.click begin if npc.get_guild() == pc.get_guild() then --- l say_title("Chorya:") say("") say("O meu nome é Chorya, Sou o responsável") say("pelo melhoramento das armaduras") say("Eu posso melhorar as armaduras, capacetes e escudos") say("") say("Sou muito mais do que ferreiro na vila. Quando") say("vier até min poderá aumentar a chance de sucesso") say("para 10%. Dę me o seu equipamento, eu quero melhorá-lo.") else --- l say_title("Chorya:") say("") say("O meu nome é Chorya, Sou o responsável") say("pelo melhoramento das armaduras") say("Eu posso melhorar as armaduras, capacetes e escudos") say("") say("Sou muito mais do que ferreiro na vila. Quando") say("vier até min poderá aumentar a chance de sucesso") say("para 10%. Dę me o seu equipamento, eu quero melhorá-lo.") end end when 20046.click begin if npc.get_guild() == pc.get_guild() then --- l say_title("Chorjan:") say("") say("O meu nome é Chorjan, Sou o responsável") say("pelo melhoramento de acessórios.") say("Sou muito mais que um joalheiro na vila!") say("Quando vocę vier até min pode aumentar a chance de") say("sucesso para 10%. Dę-me a sua jóia,") say("que eu quero melhorá-la.") else --- l say_title("Chorjan:") say("") say("O meu nome é Chorjan, Sou o responsável") say("pelo melhoramento de acessórios.") say("Sou muito mais que um joalheiro na vila!") say("Quando vocę vier até min pode aumentar a chance de") say("sucesso para 10%. Dę-me a sua jóia,") say("que eu quero melhorá-la.") end end end end 17 - guild_manage Spoiler quest guild_building begin state start begin when guild_man1.chat."Inscrever GM:.." or guild_man2.chat."Inscrever GM:.." or guild_man3.chat."Inscrever GM:.." with pc.is_gm() begin say_title("Guarda da Praça: ") say("") say("Solicita informações, registradas ") say("Escreva o nome da pessoa.") say("") local u_name = input() local u_vid=find_pc_by_name(u_name) if u_vid==0 then say_title("Este nome não está registrado.") say(u_name) return end local old_vid = pc.select(u_vid) u_withdrawTime=pc.getqf("new_withdraw_time") u_withdrawTime=pc.getqf("new_withdraw_time") pc.select(old_vid) withdrawDelay=game.get_event_flag("guild_withdraw_delay") disbandDelay=game.get_event_flag("guild_disband_delay") say_title("Guarda da Praça:") say("") say("Data de atendimento mais antigo") say("Verifique.") if u_withdrawTime>0 then say("Tempo passado: "..time_to_str(u_withdrawTime)) say("(Tempo restante: ".. withdrawDelay.." Dia)") say("") end if u_disbandTime>0 then say("Quando está perdido: "..time_to_str(u_disbandTime)) say("(Tempo restante: ".. disbandDelay.." Dia)") say("") end local retryTime1 = u_withdrawTime + withdrawDelay*86400 local retryTime2 = u_withdrawTime + disbandDelay*86400 local retryTime = 0 if retryTime1 > retryTime2 then retryTime = retryTime1 else retryTime = retryTime2 end local curTime = get_time() if curTime < retryTime then say("Nova tentativa, tempo restante: "..time_to_str(retryTime)) say("(Tempo Restante: "..((retryTime-curTime)/3600).." Hora)") say("") if is_test_server() then local s=select("Adapte agora", "Fechar") if s==1 then local old_vid = pc.select(u_vid) local curTime=get_time() pc.setqf("new_withdraw_time", curTime-withdrawDelay*86400) pc.setqf("new_withdraw_time", curTime-disbandDelay*86400) pc.select(old_vid) end end else say("Registro imediato possível."); say("") end end when guild_man1.chat."Sair da Guild " or guild_man2.chat."Sair da Guild " or guild_man3.chat."Sair da Guild " with pc.hasguild() and not pc.isguildmaster() and (pc.is_gm() or npc.empire == pc.empire) begin -- ?? say_title("Guarda da Praça:") say("") say("Você quer sair da Guild?") say("Você provavelmente não encontrou um amigo lá. ") say("Como você gostaria.") say("Tem certeza de que deseja sair?") say("") local s = select("Sim Tenho", "Não tenho") if s==1 then say_title("Guarda da Praça:") say("") say("Muito Bem.") say("Você não está mais na Guid. ") say("") say("") pc.remove_from_guild() pc.setqf("new_withdraw_time",get_global_time()) end end when guild_man1.chat."Apagar Guild" or guild_man2.chat."Apagar Guild" or guild_man3.chat."Apagar Guild" with pc.hasguild() and pc.isguildmaster() and (pc.is_gm() or npc.empire == pc.empire) begin -- ?? say_title("Guarda da Praça:") say("") say("O que?") say("[DELAY value;150] [/DELAY]") say("É tão chato ") say("Eu a configurei e você deseja fechá-la agora?") say("Todas as suas memórias e amigos ") say("Vão desaparecer para sempre!") say("") say("Tem certeza de que quer o Apagar Guild?") say("") local s = select("Sim Tenho", "Ainda Não") if s==1 then say_title("Guarda da Praça:") say("") say("Muito Bem.") say("A Guild foi apagada.") say("") say("") pc.destroy_guild() pc.setqf("new_disband_time", get_global_time()) pc.setqf("new_withdraw_time", get_global_time()) end end when guild_man1.chat."Criar uma Guild" or guild_man2.chat."Criar uma Guild" or guild_man3.chat."Criar uma Guild" with not pc.hasguild() or not pc.isguildmaster() begin ----with (pc.is_gm() or npc.empire == pc.empire) -------------------------------------------------------------- local level_limit; local guild_create_item level_limit = 40 guild_create_item = false ----------------------------------------------------------------------- if pc.hasguild() then return end if game.get_event_flag("guild_withdraw_delay")*86400 > get_global_time() - pc.getqf("new_withdraw_time") then say_title("Guarda da Praça:") say("") say("Depois de deixar uma Guild tem de esperar 1 dia.") return end if game.get_event_flag("guild_disband_delay")*86400 > get_global_time() - pc.getqf("new_withdraw_time") then say_title("Guarda da Praça: ") say("") say("Você acabou de excluir sua guilda! ") say("Espere 24h para estabelecer uma nova.") say_reward("Tera de esperar algum tempo: ") say_reward(string.format("%s", time_to_str(pc.getqf("new_withdraw_time")))) return end say_title("Guarda da Praça:") say("") say("Você gostaria de criar uma Guild?") say("") say("Para criar uma Guilda você precisa preencher dois ") say("pré-requisitos: possuir nível 40") say("e pagar 200.000 Yang..") say("") say("Deseja criar uma Guild?") say("") local s = select("Sim quero Criar", "Não Obrigado") if s == 2 then return end if pc.level >= 40 then if pc.gold >= 200000 then if not guild_create_item or pc.countitem(guild_create_item)>0 then game.request_make_guild() end else say_title("Guarda da Praça:") say("") say("Não tem Yang Suficiente!") say("") return end else say_title("Guarda da Praça:") say("") say("Para Criar uma Guild o seu Nivel ") say("não é suficiente. ") end end end end 18 - guild_ranking Spoiler quest guild_ranking begin state start begin when guild_man1.chat."Mostrar o melhor ranking da guild" or guild_man2.chat."Mostrar o melhor ranking da guild" or guild_man3.chat."Mostrar o melhor ranking da guild" with pc.hasguild() begin say_title("Guarda da Praça:") say("Os resultados da luta, da posição 1 até 10 são") say("Você tambem pode ver resultados de outras guilds: [DELAY value;0]") --- l say("|Guild |Pontos |Vitórias |Empates |Derrotas ") say(guild.around_ranking_string().."[/DELAY]") end when guild_man1.chat."Mostrar o ranking da guild(1-8)" or guild_man2.chat."Mostrar o ranking da guild(1-8)" or guild_man3.chat."Mostrar o ranking da guild(1-8)" with pc.hasguild() begin say_title("Guarda da Praça:") say("") say("Aqui estão oito da classificação mais alta") say("A guilda tem os seguintes resultados: [DELAY value;0]") say(" |Guilda |Pontos |Vitórias |Empates |Derrotas ") say(guild.high_ranking_string().."[/DELAY]") say("") end when guild_man1.chat."Mostrar o resultado da guild" or guild_man2.chat."Mostrar o resultado da guild" or guild_man3.chat."Mostrar o resultado da guild" with pc.hasguild() begin say_title("Guarda da Praça:") say("") say("O estado da sua guilda é "..guild.get_rank()..".") say("e o resultado em pontos :"..guild.get_ladder_point()..".") say("") end end end 19 - guild_war_bet Spoiler quest guild_war_bet begin state start begin when guild_war_observer1.chat."Apostas da Guerra entre Guilds" or guild_war_observer2.chat."Apostas da Guerra entre Guilds" or guild_war_observer3.chat."Apostas da Guerra entre Guilds" begin local info_counter = pc.getqf("Info") if info_counter < 3 then say_title("As Apostas da Guerra entre Guildas") say("") say("Compre um lote de apostas para o seu Império.") say("1. A cada guerra serão anunciadas na guilda") say("as possibilidades de vitória") say("") say("2. Você poderá comprar o seu lote de apostas,") say("e ganhar mesmo se as possibilidades de vitória") say("não forem anunciadas") say("") say("3. As possibilidades de escolha na aposta são") say("controladas pela Bolsa de Apostas e quando o") say("prazo terminar você vai ser informado se ganhou") say("ou perdeu. 10% do lucro é pago ao Império.") wait() end local g = guild.get_reserve_war_table() local gname_table = {} table.foreachi(g, function(n, p) gname_table[n] = guild.get_name(p[2]).." vs "..guild.get_name(p[3]) end) if table.getn(g) == 0 then -- no currently war say_title("Beleguin de Batalha") say("") say("Não há guerra de guildas no momento") say("para você poder apostar.") else gname_table[table.getn(g)+1] = "Bitir " say_title("Bahis Kurulu:") say("") say("Hangi lonca için bilet almak istiyorsun?") local s = select_table(gname_table) if s != table.getn(gname_table) then if guild.is_bet(g[s][1]) then say_title("Bahis Kurulu:") say("") say("Listeye göre piyango bileti aldın bile.") say("Her lonca için yalnız bir bilet ") say("alabilirsin.") else local name1 = guild.get_name(g[s][2]) local name2 = guild.get_name(g[s][3]) say_title("Bahis Kurulu:") say("") say("Görünüşe göre ") say(name1.." ile"..name2.." ,"..g[s][4].."puanla kaybediyor.") say("Hangi loncaya bahis oyanayacaksın?") local guild_s = select(name1, name2, "Bitir ") if guild_s != 3 then local bet_guild = g[s][guild_s+1] say_title("Bahis Kurulu:") say("") say("Hmm ... İyi karar! Cevabın ne?") local price_button_table = {} table.foreachi(guild_war_bet_price_table, function(n, p) price_button_table[n] = p.."Yang" end) price_button_table[table.getn(price_button_table)+1] = "Bitir" local price_idx = select_table(price_button_table) if price_idx != table.getn(price_button_table) then -- ? ??? ?? ??? ??? if pc.gold < guild_war_bet_price_table[price_idx] then say_title("Bahis Kurulu:") say("") say("Yeterli Yang yok!") say("") else say_title("Bahis Kurulu:") say("") pc.changegold(-guild_war_bet_price_table[price_idx]) guild.war_bet(g[s][1], bet_guild, guild_war_bet_price_table[price_idx]) say("Her şey hazır. Kazanan loncayı bildiysen,") say("kazandığın yangları deponda bulacaksın.") say("Bol şanslar!") end end end -- if guild_s != 3 end -- if guild.is_bet(g[s][1]) end -- if s != table.getn(gname_table) end end end end 20 - guild_war_join Spoiler quest guild_war_join begin state start begin when letter begin local e = guild.get_any_war() if e != 0 and pc.get_war_map() == 0 then setskin(NOWINDOW) makequestbutton("Ajudar a Guild") end end when button begin local e = guild.get_any_war() if e == 0 then say("A guerra terminou.") else say(guild.name(e).." Você quer lutar com sua Guild?") local s = select("Sim","Não") if s == 1 then guild.war_enter(e) else setskin(NOWINDOW) makequestbutton("Ajudar a Guild") end end end end end 21 - marriage_manage Spoiler quest marriage_manage begin state start begin when oldwoman.chat."Gostaria de me casar" with not pc.is_engaged_or_married() begin if not npc.lock() then say("") say("Já está um casamento em curso.") say("Por favor, fale comigo depois ok?") say("") return end if pc.level < 25 then say_title("Senhora do Casamento: ") say("") say("Você esta pensando em casar? Mas é muito ") say("inexperiente e jovem para isso. Depois que se") say("casar o divórcio é difícil e muito triste. ") say("Entãoo eu decidi não realizar casamento de jovens ") say("muito inexperientes. você ainda vai voltar,tenuo ") say(" certeza. Assim que for mais experiente vou aceitar") say("casar você com quem tiver escolhido. Boa Sorte!") say("") say_reward("O casamento só pode acontecer a nível 25+.") say("") npc.unlock() return end local m_ring_num = pc.countitem(70301) local m_has_ring = m_ring_num > 0 if not m_has_ring then say_title("Senhora do Casamento: ") say("") say("Você que casar e nem mesmo anel de casamento trouxe? ") say("") say_item("Anel de Casamento", 70301, "") say_reward("Para casar e necessário ter um Anel de Casamento.") say("") npc.unlock() return end local m_sex = pc.get_sex() if not marriage_manage.is_equip_wedding_dress() then say_title("Senhora do Casamento: ") say("") say("Estas roupas? Pretende casar com elas? ") say("O casamento e a coisa mais importante na vida, ") say("você precisa prestar atencao a roupa.") say("") if m_sex==0 then say_item("Vestido", marriage_manage.get_wedding_dress(pc.get_job()), "") say_reward("Para se casar você deve usar") say_reward("Vestido") else say_item("Casamento", marriage_manage.get_wedding_dress(pc.get_job()), "") say_reward("A fim de se casar, você deve usar") say_reward("Casamento") end say("") npc.unlock() return end local NEED_MONEY = 1000000 if pc.get_money() < NEED_MONEY then say_title("Senhora do Casamento: ") say("") say("O casamento e um momento único, mas para poder casá-los ") say("precisarei receber por isso, e agora o dinheiro que ") say("você tme não é o suficiente. Por favor traga o dinheiro") say("que pedi. Espero que pretenda casar apenas uma vez, então") say("o valor que peço não é muito pela sua felicidade, ou é?") say("") say_reward(string.format("O casamento %d 10 000 2", NEED_MONEY/10000)) say("") npc.unlock() return end say_title("Senhora do Casamento: ") say("") say("Agora você está mais experiente, agora pode se casar.") say("Ja escolheu com quem irá casar? ") say("") say_reward("Por favor, indique o nome do escolhido.") say("") local sname = input() if sname == "" then say_title("Senhora do Casamento: ") say("") say("Você está muito nervoso e não conseguiu escrever ") say("o nome? Por favor, escreva novamente.") say("") npc.unlock() return end local u_vid = find_pc_by_name(sname) local m_vid = pc.get_vid() if u_vid == 0 then say_title("Senhora do Casamento: ") say("") say("Como você não sabe o que o nome do seu escolhido...") say("Observe bem e tenha cuidado ao nome que escreves. ") say("") say_reward(string.format("%s ¨Ã¤£¦b½u", sname)) say("") npc.unlock() return end if not npc.is_near_vid(u_vid, 10) then say_title("Senhora do Casamento: ") say("") say("Seu escolhido deve estar ao seu lado. ") say("Eu posso ajudar o seu casamento..") say("Tem que chamar seu escolhido para perto de você.") say("") say_reward(string.format("%s Com a sua muito longe.", sname)) say("") npc.unlock() return end local old = pc.select(u_vid) local u_level = pc.get_level() local u_job = pc.get_job() local u_sex = pc.get_sex() local u_name = pc.name local u_gold = pc.get_money() local u_married = pc.is_married() local u_has_ring = pc.countitem(70301) > 0 local u_wear = marriage_manage.is_equip_wedding_dress() pc.select(old) local m_level = pc.get_level() if u_vid == m_vid then say_title("Senhora do Casamento: ") say("") say("não é o seu nome") say("") say_reward("Por favor, insira o nome do seu escolhido.") say("") npc.unlock() return end if u_sex == m_sex then say_title("Senhora do Casamento: ") say("") say("Desculpe, não realizo casamento entre noivos ") say("do mesmo sexo, ainda. ") say("") say_reward("Não há casamento do mesmo sexo.") say("") npc.unlock() return end if u_married then say_title("Senhora do Casamento: ") say("") say("Você sabe que escolheu uma pessoa casada?") say("Você vai conseguir escolher alguém livre ") say("para que possa ser feliz ao lado dele.") say("") say_reward(string.format("%s Ja casado.", sname)) say("") npc.unlock() return end if u_level < 25 then say_title("Senhora do Casamento: ") say("") say("não e muito jovem para casar com.") say("O casamento requer duas para se casar no talento.") say("") say_reward("¹ï¶Hªºµ¥¯Å25¯Å¤~¥i¥Hµ²±B.") say("") npc.unlock() return end if m_level - u_level > 15 or u_level - m_level > 15 then say_title("Senhora do Casamento: ") say("") say("Nível entre ambos é muito diferente, o casamento vai ") say("ser muito dificil depois. Não ha como dar certo.") say("Eu não vou deixar vocês se casarem.") say("") say_reward("Diferença maxima de 15 lvl entre os noivos.") say("") npc.unlock() return end if not u_has_ring then if m_ring_num >= 2 then say_title("Senhora do Casamento: ") say("") say("Querendo de se casar, tokens lembranca do amor ao desgaste.") say("Por favor, tokens lembranca do amor de seu objeto.") else say_title("Senhora do Casamento: ") say("Esta e das coisas mais importantes na vida") say("você precisa usar seus tokens de amor token") say("") end say_item("Tokens de amor token", 70301, "") say_reward("Quando casar deverá usar sempre sua alainça ") say_reward("como simbolo e lembrança do amor que os uniu.") say("") npc.unlock() return end if not u_wear then say_title("Senhora do Casamento: ") say("Seus objetos não estao prontos, não o seu vestido de noiva pronta para ser") say("Se você so se casar com um homem vestindo uma cozinha equipada") say("você vai estar envergonhado") say("") if u_sex==0 then say_item("Vestido", marriage_manage.get_wedding_dress(u_job), "") say_reward("A fim de se casar, você deve usar") say_reward("Vestido") else say_item("Casamento", marriage_manage.get_wedding_dress(u_job), "") say_reward("A fim de se casar, você deve usar") say_reward("Casamento") end say("") npc.unlock() return end local ok_sign = confirm( u_vid, "você quer"..pc.name.. "casar comigo?", 30) if ok_sign == CONFIRM_OK then local m_name = pc.name if pc.get_gold()>=NEED_MONEY then pc.change_gold(-NEED_MONEY) pc.removeitem(70301, 1) pc.give_item2(70302, 1) local old = pc.select(u_vid) pc.removeitem(70301, 1) pc.give_item2(70302, 1) pc.select(old) say_title("Senhora do Casamento: ") say("") say("Agora estamos todos prontos, para fazer o casamento. ") say("A fim de que possam comemorar a felciidade, o amor e ") say("a benção deste momento , vou enviar todos para a festa. ") say("Desejo a todos felicidade, e que seja uma festa divina. ") say("") say_reward("Moverei todos para a Festa de Casmento.") say("") wait() setskin(NOWINDOW) marriage.engage_to(u_vid) end else say_title("Senhora do Casamento: ") say("") say("Seu escolhido disse que não quer casar com você.") say("Deve te ruma boa conversa sobre isso.") say("") say_reward("Pedido de casamento recusado.") end say("") npc.unlock() end -- ?? ???? ???? ??? ?? when oldwoman.chat."Mover para a Festa de Casamento" with pc.is_engaged() begin say_title("Senhora do Casamento: ") say("") say("você quer participar da festa de casamento de um amigo? ") say("eu levarei você ate lá. Seus amigos estao esperando ") say("para que comemorem juntos a felciidade deste momento.") say("") wait() setskin(NOWINDOW) marriage.warp_to_my_marriage_map() end when 9011.chat."Pedido de casamento" with pc.is_engaged() and marriage.in_my_wedding() begin if not npc.lock() then say_title("Hana do Casamento:") say("Convide seus amigos e seu reino para participar do seu casamento!") say("Não se esqueça de por noite e neve para animar mais o local!") say("") return end say_title("Hana do Casamento:") say("") say("Olá! Queres realmente se casar? ") say("Casamento é uma coisa muita séria!") say("Digite o nome da pessoa com quem vai casar. ") say("") local sname = input() local u_vid = find_pc_by_name(sname) --casar local m_vid = pc.get_vid() if u_vid == 0 then say_title("Hana do Casamento:") say("") say("Oh! Esse nome que não e a nossa lista do reino. ") say("Pode olhar se o nome digitado esta correto? ") say("") say_reward(string.format("%s ", sname)) say("") npc.unlock() return end if not npc.is_near_vid(u_vid, 10) then say_title("Hana do Casamento:") say("") say("Você pode chamar seu escolhido para seu lado") say("Precisamos olhar sua identidade.") say("") say("") say_reward(string.format("%s Precisar estar ao lado do ", sname)) say("") npc.unlock() return end if u_vid == m_vid then say_title("Hana do Casamento:") say("") say("não introduziu o seu nome.") say("") say_reward("Você deve digitar o nome.") say("") npc.unlock() return end if u_vid != marriage.find_married_vid() then say_title("Hana do Casamento:") say("") say("O nome digitado não e o mesmo.") say("Por favor, olhe para cima?") say("") npc.unlock() return end local ok_sign = confirm(u_vid, "você quer"..pc.name.. "Marry me?", 30) if ok_sign != CONFIRM_OK then say_title("Hana do Casamento:") say("") say("O escolhido parece com medo de casamento.") say("Tenha uma boa conversa sobre o assunto novamente.") say("") npc.unlock() return end say_title("Hana do Casamento:") say("você concluiu com êxito o seu casamento.") say("") marriage.set_to_marriage() -- 2005.04.12.??? ?? ?? ?? ----------------------------------------------- -- say("Esta e para o seu casamento") -- say("Pronto para presente") -- marriage_manage.give_wedding_gift() -- old = pc.select(u_vid) -- marriage_manage.give_wedding_gift() -- pc.select(old) say("") say_reward("O casamento acabou") say("") npc.unlock() end function give_wedding_gift() local male_item = {71072, 71073, 71074} local female_item = {71069, 71070, 71071} if pc.get_sex() == MALE then pc.give_item2(male_item[number(1, 3)], 1) else pc.give_item2(female_item[number(1, 3)], 1) end end -- ??? ???? ?? ????? ?? ?? -- ?? pc.is_married() and marriage.in_my_wedding() -- ??? ?? ??? ??? ?? ???? when 9011.chat."Marcha inicial começou a tocar" with (pc.is_engaged() or pc.is_married()) and marriage.in_my_wedding() and not marriage.wedding_is_playing_music() begin marriage.wedding_music(true, "wedding.mp3") setskin(NOWINDOW) end when 9011.chat." A Stop Play casamento" with (pc.is_engaged() or pc.is_married()) and marriage.in_my_wedding() and marriage.wedding_is_playing_music() begin marriage.wedding_music(false, "default") setskin(NOWINDOW) end when 9011.chat."Noite" with pc.is_married() and marriage.in_my_wedding() begin marriage.wedding_dark(true) setskin(NOWINDOW) end when 9011.chat."Neve" with pc.is_married() and marriage.in_my_wedding() begin marriage.wedding_snow(true) setskin(NOWINDOW) end when 9011.chat."Casamento foi concluído com exito" with pc.is_married() and marriage.in_my_wedding() begin if not npc.lock() then say_title("Hana do Casamento:") say("") say("Agora eu dialogo com o seu destino,") say("conversar com você falar depois ok?") say("") return end say_title("Hana do Casamento:") say("") say("Você quer encerrar o casamento?") say("") local s = select("Sim","não") if s == 1 then local u_vid = marriage.find_married_vid() if u_vid == 0 then say_title("Hana do Casamento:") say("") say("Para completar o casamento, você deve obter o ") say("consentimento dos outros. Agora seu escolhido ") say("não está online. Impossível concluir o casamento.") say("") npc.unlock() return end say_title("Hana do Casamento:") say("") say("Exigir o consentimento da outra parte, após ") say("a conclusão todos serão removidos da festa. ") say("Aguardando resposta.") say("") local ok_sign = confirm(u_vid, "você quer terminar o casamento?", 30) if ok_sign == CONFIRM_OK then marriage.end_wedding() -- ??? ???? ??? ??. else say_title("Hana do Casamento:") say("") say("O outro se recusou.") say("") end end npc.unlock() end -- ??? ???? ???? ??? ?? when 11000.chat."Concordar com o divórcio" or 11002.chat." Concordar com o divórcio" or 11004.chat." Concordar com o divórcio" with pc.is_married() begin if not marriage_manage.check_divorce_time() then return end local u_vid = marriage.find_married_vid() if u_vid == 0 or not npc.is_near_vid(u_vid, 10) then say_title("Guarda da Praça:") say("") say("Divórcio é uma coisa muita séria! Tem certeza disso?") say("Traga o companheiro até perto de você. ") say("") return end say_title("Guarda da Praça:") say("") say("Concordar com um divórcio quando as necessidades de 500 000.") say("Ainda precisa de aprovacao do parceiro.") say("você quer chegar a acordo para um divórcio?") say("") local MONEY_NEED_FOR_ONE = 500000 local s = select("Concordar.", "Discordar.") if s == 1 then local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE local m_have_ring = pc.countitem(70302) > 0 local old = pc.select(u_vid) local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE local u_have_ring = pc.countitem(70302) > 0 pc.select(old) if not m_have_ring then say("Para trazer um anel de casamento.") return end if not u_have_ring then say("O outro lado tambem deve usar um anel de casamento.") return end if not m_enough_money then say_title("Guarda da Praça:") say("Para o divórcio, você trouxe o dinheiro não e suficiente.") say("") say_reward(string.format("Para o divórcio, o calvario de pagar %d Milhoes de custo das duas", MONEY_NEED_FOR_ONE/10000)) say("") return; end if not u_enough_money then say_title("Guarda da Praça:") say("") say("Seu objeto não seria suficiente.") say("") say_reward("Para o divórcio, todos devem pagar 500 000 2") say("") return; end say("O divórcio e algo muito doloroso, você realmente quer isso?.") say("") say("Sério? você realmente quer um divórcio?") say("") local c=select("Sim.", "Não.") if 2 == c then say_pc_name() say("") say("Eu mudei minha mente, eu não quero um divórcio.") say("") wait() say_title("Guarda da Praça:") say("") say("Falar bem.") say("você tem dois individuos com as costas e aprecia-lo, sua vida.") say("") say_reward("divórcio cancelado.") say("") return end local ok_sign = confirm(u_vid, pc.name.."Para o divórcio?", 30) if ok_sign == CONFIRM_OK then local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE local m_have_ring = pc.countitem(70302) > 0 local old = pc.select(u_vid) local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE local u_have_ring = pc.countitem(70302) > 0 pc.select(old) if m_have_ring and m_enough_money and u_have_ring and u_enough_money then pc.removeitem(70302, 1) pc.change_money(-MONEY_NEED_FOR_ONE) local old = pc.select(u_vid) pc.removeitem(70302, 1) pc.change_money(-MONEY_NEED_FOR_ONE) pc.select(old) say_title("Guarda da Praça:") say("") say("Divórcio com sucesso. Agora que você ") say("tem sucesso divorciados. você tem 2 pessoas ") say("não gostam uns dos outros, eu posso fazer.") say("") say_reward("divórcio com sucesso") say("") marriage.remove() else say_title("Guarda da Praça:") say("") say("Erro aconteceu durante o divórcio, não divorciou") say("Volte na proxima vez") say("") say_reward("divórcio cancelado.") say("") end else say_title("Guarda da Praça:") say("Eles não concordam com você divórcio") say("você tem muitos vem em primeiro lugar e, ") say("em seguida, falar sobre") say("") say_reward("O divórcio foi cancelado.") say("") end end end when 11000.chat."Remova o anel de casamento" or 11002.chat." Remova o anel de casamento" or 11004.chat." Remova o anel de casamento" with not pc.is_married() and pc.count_item(70302)>0 begin say_title("Guarda da Praça:") say("") say("Em breve você ira esquecer.") say("") say_reward("Remova o anel de casamento de sucesso") pc.remove_item(70302) end when 11000.chat." divórcio unilateral" or 11002.chat." divórcio unilateral" or 11004.chat." divórcio unilateral" with pc.is_married() begin if not marriage_manage.check_divorce_time() then return end say_title("Guarda da Praça:") say("") say("Você quer o divórcio unilateral? Me pague um milhão") say("que farei isso imediatamente. ") say("Deseja se divorciar? ") say("") local s = select("Sim.", "não.") local NEED_MONEY = 1000000 if s == 2 then return end if pc.money < NEED_MONEY then say_title("Guarda da Praça:") say("") say("Sua falta de dinheiro") say("Tal como acontece com o divórcio, casamento, ") say("exige uma grande quantidade de dinheiro") say("Volte quando você e bom para pensar") say("") return end say_title("Guarda da Praça:") say("você realmente precisa de um divórcio? você tem que pensar nisso") local c = select("Sim, eu quero o divórcio.", "não, eu considero.") if c == 2 then say_title("Guarda da Praça:") say("") say("Pense bem e lembre-se do que uniu vocês. ") say("sua vida, as ideias de todos não são os mesmos.") say("As vezes não e adequado, mas você tem que, ") say("em seguida, os resultados devem ser bons.") say("") say_reward("Divórcio unilateral cancelado") say("") return end pc.removeitem(70302, 1) pc.change_gold(-NEED_MONEY) marriage.remove() say_title("Guarda da Praça:") say("") say("Desde que você e assim que não gostam uns dos outros, ") say("entao você esta certo ou divórcio. Agora que você e único,") say("eu espero que você se tornara mais feliz.") say("") say_reward("Divórcio unilateral de sucesso.") say("") end -- ??? ?? ?? when oldwoman.chat."Veja uma lista de casamento" with not pc.is_engaged() begin local t = marriage.get_wedding_list() if table.getn(t) == 0 then say("Não há casamentos ocorrendo no momento.") say("") else -- chat(table.getn(t)) local wedding_names = {} table.foreachi(t, function(n, p) wedding_names[n] = p[3].."Com "..p[4].."Casamento" end) wedding_names[table.getn(t)+1] = locale.confirm local s = select_table(wedding_names) if s != table.getn(wedding_names) then marriage.join_wedding(t[s][1], t[s][2]) end end end when 9011.click with not pc.is_engaged() and not pc.is_married() begin say_title("Hana do Casamento:") say("") say("Todos nos viemos aqui para abençoar seu casamento!") say("Por favor, abençoe este novo casal") say("") end function check_divorce_time() local DIVORCE_LIMIT_TIME = 86400 if is_test_server() then DIVORCE_LIMIT_TIME = 60 end if marriage.get_married_time() < DIVORCE_LIMIT_TIME then say_title("Guarda da Praça:") say("") say("Você deve ter acabado de casar com divorciado!!!") say("Você tem de pensar com clareza que e uma boa") say("") return false end return true end -- ?? ??? ?? ???? ??? ?? -- ?? ?? : pc.is_engaged_or_married() function is_equip_wedding_dress() local a = pc.get_armor() return a >= 11901 and a <= 11904 end function get_wedding_dress(pc_job) if 0==pc_job then return 11901 elseif 1==pc_job then return 11903 elseif 2==pc_job then return 11902 elseif 3==pc_job then return 11904 else return 0; end end end end 1 1 Link to comment Share on other sites More sharing options...
xabugas123 Posted March 28, 2019 at 04:04 PM Share Posted March 28, 2019 at 04:04 PM irei testa tks Link to comment Share on other sites More sharing options...
ghosting123 Posted February 26, 2021 at 07:48 AM Share Posted February 26, 2021 at 07:48 AM thanks Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now