quest de divórcio..

[Keevin Aguiar 0]

Alguém tem quest de divórcio funcionando 100% que possa compartilhar?  

 

Agradeço desde já.. 

[Mário. 154]

quest divorcio begin
	state start begin
		when 11000.chat."Divórcio " or 
			11002.chat."Divórcio " or
			11004.chat."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("Casamenteira:")
                say("")
                say("Tu não te podes divorciar sem um(a) parceiro(a).")
                say("")
                return
            end

            say_title("Casamenteira:")
            say("")
            say("Para legalizar a separação")
            say("500.000 Yang e o(a) aprovação do(a) teu(ua) parceiro(a)")
            say("Tu queres realmente queres te divorciar? ")
            say("")

            local MONEY_NEED_FOR_ONE = 500000
            local s = select("Sim", "Não")

            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("Traga o teu anel de casamento.")
                    return;
                end
                if not u_have_ring then
                    say("O anel de casamento não está contigo.")
                    return;
                end

                if not m_enough_money then
                    say_title("Guarda da Cidade:")
                    say("")
                    say("Não tens dinheiro suficiente para o divorcio.")
                    say("")
                    say_reward(string.format("É preciso %de Yang .", MONEY_NEED_FOR_ONE/10000))
                    say("")
                    return;
                end
                if not u_enough_money then
                    say_title("Guarda da Cidade:")
                    say("")
                    say("Não tens dinheiro suficiente para o divorcio.")
                    say("")
                    say_reward("Precisas de 500.000 de yang para te divorciares.")
                    say("")
                    return;
                end
                say_title("Guarda da Cidade:")
                say("")
                say("Realmente queres divorciar-te?")
                say("Pode ser um erro.")
                say("")
                say("")

                local c=select("Sim", "Não")
                if 2 == c then
                    say_pc_name()
                    say("")
                    say("Eu mudei a minha mente.")
                    say("Eu não quero o divórcio.")
                    say("")
                    wait()
                    say_title("Guarda da Cidade:")
                    say("")
                    say("Eu quero que tenhas um casamento feliz.")
                    say("")
                    say("")
                    return
                end

                local ok_sign = confirm(u_vid, pc.name.."Tens a certeza que te queres divorciar?", 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 Cidade:")
                        say("")
                        say("Não estão mais casados.")
                        say("Provalvamente é o melhor para ambos")
                        say("")
                        say_reward("Divórcio efetuado.")
                        say("")
                        marriage.remove()
                    else
                        say_title("Guarda da Cidade:")
                        say("")
                        say("Os papeis não estão completos.")
                        say("Volta em breve.")
                        say("")
                        say_reward("O divorcio foi cancelado.")
                        say("")
                    end
                else
                    say_title("Guarda da Cidade:")
                    say("")
                    say("O(a) teu(a) parceiro(a) não se quer divorciar")
                    say("Façam mutuo acordo.")
                    say("")
                    say_reward("O divorcio foi cancelado.")
                    say("")
                end
            end
        end
	end
end