QUEST DIVORT

Totalitatea subiectelor care nu respectă regulamentul vor fi stocate aici.
Deconectat
Avatar utilizator
necroreborn112
Nivel 1
Nivel 1
Mesaje: 117
Membru din: 30 Noi 2014
Status: Sunt bine mersi ^.^
Server Metin2: Metin2 Craiova
Regat: Jinno
Mulțumiri acordate: 1
Mulțumiri primite: 0

QUEST DIVORT

Mesajde necroreborn112 » 18 Ian 2015, 22:17

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 ..

Deconectat
Avatar utilizator
[Chuli-Gaara]
Utilizator interzis !
Utilizator interzis !
Mesaje: 2356
Membru din: 27 Oct 2014
Localitate: Bucureşti
Status: Haide
Server Metin2: Al meu
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 10
Contact:

Re: QUEST DIVORT

Mesajde [Chuli-Gaara] » 18 Ian 2015, 22:18

Mutat in secţiunea corespunzătoare.

Deconectat
Avatar utilizator
FreshXL
Nivel 2
Nivel 2
Mesaje: 194
Membru din: 02 Feb 2014
Localitate: Suceava
Status: Sunt bine mersi ^.^
Server Metin2: www.metin2suceava.tk
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 0
Contact:

Re: QUEST DIVORT

Mesajde FreshXL » 18 Ian 2015, 22:19

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

Deconectat
Avatar utilizator
necroreborn112
Nivel 1
Nivel 1
Mesaje: 117
Membru din: 30 Noi 2014
Status: Sunt bine mersi ^.^
Server Metin2: Metin2 Craiova
Regat: Jinno
Mulțumiri acordate: 1
Mulțumiri primite: 0

Re: QUEST DIVORT

Mesajde necroreborn112 » 18 Ian 2015, 22:25

Core dumped... Nu merge : /
Si nu stiu sa pun poza aici..

Deconectat
Avatar utilizator
.Deb
Fost Administrator
Fost Administrator
Mesaje: 4699
Membru din: 25 Iul 2013
Localitate: Saint Louis, Missouri
Reputație: Fost Administrator.
Fost Super Ad Moderator.
Fost lider Ad Moderatori.
Fost lider Super Moderatori
Fost lider Moderatori.
Fost lider Designeri.
Fost organizator Miss&Mister.
Status: Egalitatea nu există decât în matematică
Mulțumiri acordate: 9
Mulțumiri primite: 2
Contact:

Re: QUEST DIVORT

Mesajde .Deb » 19 Ian 2015, 20:45

Subiect trimis la coş.
Titlul cererii trebuie să fie de forma:
Cerere X...


Înapoi la “Topicuri şi mesaje şterse”

Cine este conectat

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