QUEST DIVORT

Totalitatea subiectelor care nu respectă regulamentul vor fi stocate aici.
Închis
Avatar utilizator
necroreborn112
Nivel 1

Nivel 1
Mesaje: 117
Membru din: 30 Noi 2014, 17:55
Server: Metin2 Craiova
Regat: Jinno
Aprecieri: 1  
Mulţumiri: 1  
Medalii

Am si eu nevoie urgent de un quest pentur a putea divorta.
Nu apare sa divortez nici la gardian nici la baba .. am gasit un quest in italiana dar nu mergea ..
Avatar utilizator
[Chuli-Gaara]
Nivel 10

Nivel 10
Mesaje: 2285
Membru din: 27 Oct 2014, 22:34
Server: Al meu
Regat: Chunjo
Aprecieri: 0
Mulţumiri: 17  
 Contact:
Medalii

Mutat in secţiunea corespunzătoare.
Avatar utilizator
FreshXL
Nivel 2

Nivel 2
Mesaje: 200
Membru din: 02 Feb 2014, 19:35
Server: www.herad2.r
Regat: Chunjo
Aprecieri: 0
Mulţumiri: 33  
 Contact:
Medalii

Poftim

Cod: Selectaţi tot

quest divort begin
    state start begin
            when 11000.chat."Divort" or
11002.chat." Divort" or
11004.chat." Divort" 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("Gardian:")
say("Divortul este o chestiune foarte grava!")
say("Daca vrei sa divortezi,")
say("Trebuie sa fie si partenerul de acord.")
say("")
return
end

say("Gardian:")
say("Divortul te va costa 500.000 Yang.")
say("")
say("")
say("Vrei sa organizezi divortul?")
say("")

local MONEY_NEED_FOR_ONE = 500000
local s = select("Da", "Nu")

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("Trebuie sa aduci inelul de nunta.")
return;
end
if not u_have_ring then
say("Si partenerul de nunta")
say("Trebuie sa aduca inelul.")
return;
end

if not m_enough_money then
say("Gardian:")
say("Nu ai suficienti Yang pentru divort.")
say("")
say_reward(string.format("Costurile divortului %dvon", MONEY_NEED_FOR_ONE/10000))
say("")
return;
end
if not u_enough_money then
say("Gardian:")
say("Partenerul nu are suficienti Yang.")
say("")
say_reward("Pentru a putea divorta")
say_reward("Ambele persoane trebuie sa aibe 500.000 Yang.")
say("")
return;
end

say("Divortul este foarte dureros")
say("")
say("Vreti sa va distrugeti viitorul?")
say("")
say("Serios? Iti doresti cu adevarat sa divortezi?")
say("")

local c=select("Da", "Nu")
if 2 == c then
say_pc_name()
say("Vreau sa divortez pentru ca")
say("aceasta este decizia mea.")
say("")
wait()
say("Gardian:")
say("Asa sa fie...")
say("Sunteti 2 persoane care nu aveti nimic in comun")
say("")
say("")
say_reward("Voi incheia casatoria cu un divort.")
say("")
return
end

local ok_sign = confirm(u_vid, pc.name.." vrei sa divortezi?", 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("Gardian:")
say("Divortul a fost un succes.")
say("Acum sunteti 2 persoane care nu mai aveti nimic in comun,")
say("")
say("")
say_reward("Divortul a fost finalizat cu succes!")
say("")
marriage.remove()
else
say("Gardian:")
say("A avut loc o eroare.")
say("Divortul nu a putut fi terminat.")
say("Te rog revina mai tarziu.")
say("")
say_reward("Divortul nu a reusit.")
say("")
end
else
say("Gardian:")
say("Partenerul nu este de acord.")
say("Reveniti la mine cand sunteti")
say("de acord amandoi.")
say("")
say_reward("Divortul a fost abandonat.")
say("")
end
end
end

when 11000.chat."Inel de Nunta" or
11002.chat." Inel de Nunta" or
11004.chat." Inel de Nunta" with
not pc.is_married() and
pc.count_item(70302)>0
begin
say("Gardian:")
say("Iti voi sterge amintirile rele")
say("cu partenerul.")
say("")
say_reward("Verigheta a fost eliminata cu succes.")
pc.remove_item(70302)
end

when 11000.chat." Consecintele Divortului" or
11002.chat." Consecintele Divortului" or
11004.chat." Consecintele Divortului" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

say("Gardian:")
say("Divortul te va costa 1.000.000 Yang.")
say("Vrei sa dai suma asta?")
say("")

local s = select("Da", "Nu.")

local NEED_MONEY = 1000000
if s == 2 then
return
end

if pc.money < NEED_MONEY then
say("Gardian:")
say("Nu ai suficienti Yang pentru Divort.")
say("")
say("")
say("")
return
end

say("Gardian:")
say("Chiar vrei sa divortezi?")
say("Sa uiti de toate clipele fericite alaturi de partener?")
local c = select("Da!", "Nu.")

if c == 2 then
say("Gardian:")
say("Asta este decizia voastra si eu o respect")
say("")
say("Bucurati-va de viata")
say("")
say_reward("Divortul a fost anulat")
say("")
return
end

pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)

marriage.remove()

say("Gardian:")
say("Pentru ca nu va intelegiati bine")
say("")
say("Acum esti divortat")
say("")
say_reward("Divortul a fost reusit")
say("")
end
            end
        end
Avatar utilizator
necroreborn112
Nivel 1

Nivel 1
Mesaje: 117
Membru din: 30 Noi 2014, 17:55
Server: Metin2 Craiova
Regat: Jinno
Aprecieri: 1  
Mulţumiri: 1  
Medalii

Core dumped... Nu merge : /
Si nu stiu sa pun poza aici..
Avatar utilizator
.Deb
Fost Administrator

Fost Administrator
Mesaje: 4585
Membru din: 25 Iul 2013, 21:37
Aprecieri: 10  
Mulţumiri: 7  
 Contact:
Medalii

Subiect trimis la coş.
Titlul cererii trebuie să fie de forma:
Cerere X...
Imagine
Afișează semnătura
Închis
Răspunsuri
6
Vizualizări
311
Răspunsuri
6
Vizualizări
611
Răspunsuri
2
Vizualizări
240
Răspunsuri
7
Vizualizări
754

Înapoi la “Arhivă”

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 24 vizitatori