Bug nunta
-
seby0398
-
- Mesaje: 470
- Membru din: 11 Mar 2014, 22:14
- Server: wWw.Metin2Elyas.Ro
- Regat: Jinno
- Aprecieri: 0
- Mulţumiri: 109
Medalii
Salut Just4Metin folosesc SF Cryptex si cand vreau sa fac nunta merge totul bine imi da inel etc imi cere tot ce trebuie pentru a face nunta dar dupa aceea nu ma teleporteaza in mapa. Multumesc anticipat !
Ofer suport doar contra cost pe skype !
Contact SKYPE : seby.jrr
Afișează semnătura
Posteaza questul.
Daca se poate in CODE
Daca se poate in CODE
vezi daca ai pus index-ul de la mapa in config la map_allow
-
seby0398
-
- Mesaje: 470
- Membru din: 11 Mar 2014, 22:14
- Server: wWw.Metin2Elyas.Ro
- Regat: Jinno
- Aprecieri: 0
- Mulţumiri: 109
Medalii
Uite Questul si INDEX-UL
Cod: Selectaţi tot
quest marriage_manage begin
state start begin
when 9006.chat."Vreau sã mã cãsãtoresc." with not pc.is_engaged_or_married() begin
if not npc.lock() then
say_title("Femeia Bãtrânã:")
say("Ziua bunã, doreºti sã te cãsãtoreºti.")
say("Te cãsãtoreºti cu mine?")
return
end
if pc.level < 25 then
say_title("Femeia Bãtrânã:")
say("Eºti prea mic pentru a te putea cãsãtori.")
say("Nu te pot cãsãtori pânã nu ajungi la nivelul")
say("necesar 25. Ai înþãles?")
say("Revino la mine când ajungi la nivelul 25.")
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("Femeia Bãtrânã:")
say("Oh, nu ai la tine intelul de logodnã.")
say_item("inel de logodnã.", 70301, "")
say("Ai nevoie de el pentru a te putea cãsãtori.")
npc.unlock()
return
end
local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title("Femeia Bãtrânã:")
say("Costumul de nuntã unde este?")
say("Eu nu pot continua ceremonia în acest caz.")
say("Revino când ai costumul.")
if m_sex == 0 then
say_item("Costum:", marriage_manage.get_wedding_dress(pc.get_job()), "")
say("Trebuie sã ai acest costum pentru a continua.")
else
say_item("Costum:", marriage_manage.get_wedding_dress(pc.get_job()), "")
say("Trebuie sã ai acest costum pentru a continua.")
end
npc.unlock()
return
end
local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title("Femeia Bãtrânã:")
say("Oh, era sã uit. Ai nevoie de o sumã de yang")
say("pentru a continua ceremonia de cãsãtorie.")
say(string.format("Ai nevoie de: 1.000.000 Yang.", NEED_MONEY/10000))
npc.unlock()
return
end
say_title("Femeia Bãtrânã:")
say("Oh, ai decis sã te cãsãtoreºti, spune-mi care")
say("este numele persoanei dragi þie.")
local sname = input()
if sname == "" then
say_title("Femeia Bãtrânã:")
say("Oh, era sã uit. Trebuie sã fie de faþã pentru")
say("a continua aceastã ceremonie.")
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("Femeia Bãtrânã:")
say("Eºti sigur(ã) cã acesta este numele?")
say("Deoarece nu este trecu în nici un registru.")
npc.unlock()
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title("Femeia Bãtrânã:")
say("Oh, era sã uit. Trebuie sã fie de faþã pentru")
say("a continua aceastã ceremonie.")
say(string.format("%s nu este lângã tine.", sname))
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("Femeia Bãtrânã:")
say("Nu poþi face aºa ceva. Ceremonia este")
say("anulatã. Revino.")
npc.unlock()
return
end
if u_sex == m_sex then
say_title("Femeia Bãtrânã:")
say("Oh, nu pot cãsãtori pe cineva de acelaº ")
say("sex. Revino cu persoana potrivitã.")
npc.unlock()
return
end
if u_married then
say_title("Femeia Bãtrânã:")
say("Oh, divorþeazã înainte, pentru a te putea")
say("cãsãtori din nou.")
npc.unlock()
return
end
if u_level < 25 then
say_title("Femeia Bãtrânã:")
say("Oh, nu te pot cãsãtori cu o persoanã care")
say("este sub nivelul 25.")
npc.unlock()
return
end
if m_level - u_level > 15 or u_level - m_level > 15 then
say_title("Femeia Bãtrânã:")
say("Oh, între voi doi este o diferenþã mare de")
say("nivel. Reveniþ când aveþi acelaº nivel.")
npc.unlock()
return
end
if not u_has_ring then
if m_ring_num >= 2 then
say_title("Femeia Bãtrânã:")
say("Trebuie sã aveþi amândoi inele de logodnã ")
say("pentru a continua.")
else
say_title("Femeia Bãtrânã:")
say("Oh, douã inele de logodnã sunt suficiente")
say("pentru voi doi.")
end
say_item("inel de logodnã.", 70301, "")
say("Ai nevoie de el pentru a te putea cãsãtori.")
npc.unlock()
return
end
if not u_wear then
say_title("Femeia Bãtrânã:")
say("Costumul de nuntã unde este?")
say("Eu nu pot continua ceremonia în acest caz.")
say("Revino când aveþi costumele.")
if u_sex == 0 then
say_item("Costum:", marriage_manage.get_wedding_dress(u_job), "")
say("Trebuie sã ai acest costum pentru a continua.")
else
say_item("Costum:", marriage_manage.get_wedding_dress(u_job), "")
say("Trebuie sã ai acest costum pentru a continua.")
end
npc.unlock()
return
end
local ok_sign = confirm( u_vid, "sposa"..pc.name.. "ok?", 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("Femeia Bãtrânã:")
say("Oh, aþi primit credinþa. Sunte-þi cãsãtoriþi.")
say("Acum vã voi da inelele, aveþi grijã cu ele.")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title("Femeia Bãtrânã:")
say("Oh, nu te poþi cãsãtori. Revino când ")
say("ai toate cele necesare.")
end
npc.unlock()
end
when 9006.chat."Informaþii." with pc.is_engaged() begin
say("Cãsãtoria este foarte importantã deoarece ")
say("odatã cu ea vei primi un inel de teleportare.")
say("Acest inel de teleportare, te readuce lângã ")
say("persoana dragã þie.")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end
when 9011.chat."Începe sãrbãtoarea." with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say("Ai încheiat deja ceremonia, cum aºa?")
return
end
say("Pentru a oficializa cãsãtoria mai trebuie sã ")
say("faceþi douã lucruri simple.")
say("Scrie numele persoanei iubite mai jos.")
local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say("Oh, era sã uit. Trebuie sã fie de faþã pentru")
say("a continua aceastã ceremonie.")
say_reward(string.format("%s nu este lângã tine.", sname))
npc.unlock()
return
end
if not npc.is_near_vid(u_vid, 10) then
say("Oh, era sã uit. Trebuie sã fie de faþã pentru")
say("a continua aceastã ceremonie.")
say_reward(string.format("%s nu este lângã tine.", sname))
npc.unlock()
return
end
if u_vid == m_vid then
say("Vã voi cãsãtori. Eºti pregãtit(ã) pentru")
say("acest pas uriaº.")
npc.unlock()
return
end
if u_vid != marriage.find_married_vid() then
say("Oh, era sã uit. Trebuie sã fie de faþã pentru")
say("a continua aceastã ceremonie.")
npc.unlock()
return
end
local ok_sign = confirm(u_vid, "Te cãsãtoreºti cu "..pc.name.. " ?", 30)
if ok_sign != CONFIRM_OK then
say("Oh, totul este clar. Putem începe cãsãtoria.")
say("Distracþie plãcutã la petrecere.")
npc.unlock()
return
end
say("O nouã pereche pentru noi.")
marriage.set_to_marriage()
say_reward("Aþi primit credinþa, felicitãri.")
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
when 9011.chat."Porneºte muzica." 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."Opreºte muzica." 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."Ceremonia pe timp de noapte." with
pc.is_married() and
marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end
when 9011.chat."Ceremonia pe timp de iarnã. " with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end
when 9011.chat."Terminã ceremonia." with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say("Dar, nu ai terminat deja ceremonia? ")
return
end
say("Vrei sã termini aceastã ceremonie? ")
local s = select("Da, Vreau. ","Ma-m rãzgândit. ")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say("Oh, eºti singur(ã), nu pot încheia aceastã ")
say("ceremonie fãrã jumãtatea ta. ")
npc.unlock()
return
end
say("Oh, dacã doreºti sã fie gata ceremonia trebuie ")
say("ca partenerul tãu sã fie de acord. ")
local ok_sign = confirm(u_vid, "Terinã ceremonia? ", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding()
else
say("Partenerul nu este de acord ca ceremonia ")
say("sã ia sfârºit. ")
end
end
npc.unlock()
end
when 20355.chat."Divorþeazã. " 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("Cãpitan: ")
say("Oh, pentru a divorþa trebuie ca partenerul ")
say("tãu sã fie de faþã. ")
return
end
say_title("Cãpitan: ")
say("Pentru a putea continua acest divorþ vei ")
say("avea nevoie de 500.000 Yang. ")
local MONEY_NEED_FOR_ONE = 500000
local s = select("Divorþeazã. ", "Ma-m rãzgândit. ")
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_title("Cãpitan: ")
say("Trebuie sã aduci inelul primit de la Babã. ")
return;
end
if not u_have_ring then
say_title("Cãpitan: ")
say("Trebuie sã aduci inelul primit de la Babã. ")
return;
end
if not m_enough_money then
say_title("Cãpitan: ")
say("Nu ai acea sumã destul de importantã. ")
say_reward(string.format("Ai nevoie de %d Yang. ", MONEY_NEED_FOR_ONE/10000))
return;
end
if not u_enough_money then
say_title("Cãpitan: ")
say("Ambii trebuie sã aveþi la voi 500.000 Yang. ")
return;
end
say_title("Cãpitan: ")
say("Încã mai doreºti sã divorþezi? ")
local c=select("Cum am spus, Da. ", "Ma-m rãzgândit. ")
if 2 == c then
say_pc_name()
say("Doresc divorþ, asta este decizia mea. ")
wait()
say_title("Cãpitan: ")
say("Se pare cã voi doi nu aþi fost meniþi sã ")
say("fiþi împreunã. ")
return
end
local ok_sign = confirm(u_vid, pc.name.." vrei sã divorþezi?", 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("Cãpitan:")
say("Se pare cã voi doi nu aþi fost meniþi sã")
say("fiþi împreunã.")
say_green("Cãsãtoria este anulatã.")
marriage.remove()
else
say_title("Cãpitan:")
say("Trebuie sã aºtepþi ceva timp pentru a putea")
say("divorþa.")
say_green("Cãsãtoria nu poate fi anulatã.")
end
else
say_title("Cãpitan:")
say("Oh, cealaltã persoanã nu este de acord.")
end
end
end
when 20355.chat."Nu mai doresc inelul de logodnã. " with not pc.is_married() and pc.count_item(70302)>0 begin
say_title("Cãpitan: ")
say("inelul de logodnã a fost distrus. ")
pc.remove_item(70302)
end
when 20355.chat."Divorþ unilateral.(De unul singur.) " with pc.is_married() begin
if not marriage_manage.check_divorce_time() then
return
end
say_title("Cãpitan: ")
say("Pentru a divorþa de un(a)ul singur(ã) trebui e ")
say("sã plãteºti o sumã de 1.000.000 Yang. ")
local s = select("Da, Vreau. ", "Ma-m rãzgândit. ")
local NEED_MONEY = 1000000
if s == 2 then
return
end
if pc.money < NEED_MONEY then
say_title("Cãpitan:")
say("Ai nevoie de 1.000.000 Yang.")
return
end
say_title("Cãpitan: ")
say("Chear doreºti cu adevãrat sã divorþezi? ")
local c = select("Doresc un divorþ. ", "Nu, cred cã nu. ")
if c == 2 then
say_title("Cãpitan: ")
say("Este alegerea ta. ")
return
end
pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)
marriage.remove()
say_title("Cãpitan: ")
say("Se pare cã voi doi nu aþi fost meniþi sã ")
say("fiþi împreunã. ")
say_green("Cãsãtoria este anulatã. ")
end
when 9006.chat."Lista nunþilor actuale. " with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say("Momentan nu este nici o ceremonie. ")
else
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].." ºi "..p[4].." " 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("Ne-am adunat astãzi aici pentru a putea ")
say("sãrbãtori lângã acest cuplu. ")
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("Cãpitan: ")
say("Eu vara nu dorm, vara nu dorm. ")
say("Revino. ")
return false
end
return true
end
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
endCod: Selectaţi tot
1 metin2_map_a1
3 metin2_map_a3
4 metin2_map_guild_01
5 metin2_map_monkey_dungeon_11
10 metin2_map_spiderdungeon
11 metin2_map_n_flame_02
21 metin2_map_b1
23 metin2_map_b3
24 metin2_map_guild_02
25 metin2_map_monkey_dungeon_12
41 metin2_map_c1
43 metin2_map_c3
44 metin2_map_guild_03
45 metin2_map_monkey_dungeon_13
61 map_n_snowm_01
62 metin2_map_n_flame_01
63 metin2_map_n_desert_01
64 map_n_threeway
65 metin2_map_milgyo
66 metin2_map_deviltower1
67 metin2_map_trent
68 metin2_map_trent02
69 metin2_map_WL_01
70 metin2_map_nusluck01
71 metin2_map_spiderdungeon_02
72 metin2_map_skipia_dungeon_01
73 metin2_map_skipia_dungeon_02
74 map_n_snowm_02
76 metin2_map_n_desert_02
78 metin2_map_milgyo_a
79 metin2_map_trent_a
80 metin2_map_trent02_a
81 metin2_map_wedding_01
100 metin2_map_fielddungeon
101 metin2_map_resources_zon
103 metin2_map_t1
105 metin2_map_t2
107 metin2_map_monkey_dungeon
108 metin2_map_monkey_dungeon2
109 metin2_map_monkey_dungeon3
110 metin2_map_t3
111 metin2_map_t4
112 metin2_map_duel
113 metin2_map_oxevent
114 metin2_map_sungzi
118 metin2_map_sungzi_flame_hill_01
119 metin2_map_sungzi_flame_hill_02
120 metin2_map_sungzi_flame_hill_03
121 metin2_map_sungzi_snow
122 metin2_map_sungzi_snow_pass01
123 metin2_map_sungzi_snow_pass02
124 metin2_map_sungzi_snow_pass03
125 metin2_map_sungzi_desert_01
126 metin2_map_sungzi_desert_hill_01
127 metin2_map_sungzi_desert_hill_02
128 metin2_map_sungzi_desert_hill_03
181 metin2_map_empirewar01
182 metin2_map_empirewar02
183 metin2_map_empirewar03
190 metin2_map_battlearena01
191 metin2_map_battlearena02
193 metin2_map_spiderdungeon_03
194 metin2_map_holyplace_flame
200 gm_guild_build
206 metin2_map_devilscatacomb
207 metin2_map_skipia_dungeon_boss
208 metin2_map_dawnmistwood
209 metin2_map_capedragonhead
210 metin2_map_mt_thunder
211 metin2_map_bayblacksand
222 metin2_map_village
Ofer suport doar contra cost pe skype !
Contact SKYPE : seby.jrr
Afișează semnătura
-
seby0398
-
- Mesaje: 470
- Membru din: 11 Mar 2014, 22:14
- Server: wWw.Metin2Elyas.Ro
- Regat: Jinno
- Aprecieri: 0
- Mulţumiri: 109
Medalii
Am doar in game99 in ch1 core1 core 2 nu am ! am doar in game99 core 1Helios scrie:Verifică dacă ai 81 în MAP_ALLOW și dacă nu funcționează schimbă questul.
Ofer suport doar contra cost pe skype !
Contact SKYPE : seby.jrr
Afișează semnătura
Folosește acest quest, și eu îl folosesc și nu am probleme.
Cod: Selectaţi tot
---------------------------
Quest editat de Helios pentru Just4Metin
---------------------------
quest marriage_manage begin
state start begin
when 9006.chat."Vreau să mă căsătoresc" with not pc.is_engaged_or_married() begin
if not npc.lock() then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("O altă nuntă are loc momentan.")
say("")
say("Aşteaptă sau întoarce-te mai târziu!")
say("")
return
end
if pc.level < 25 then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Pentru a putea organiza o nuntă, trebuie ca ambii")
say("participanţi să aibă minim nivelul 25. Din păcate")
say("nu îndeplineşti această condiţie.")
say("Revin-o la mine când vei fi pregătit(ă)!")
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("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Din păcate nu pot să încep nunta deoarece")
say("vă lipsesc Inelele de Logodnă.")
say("Revin-o la mine când vei fi pregătit(ă)!")
say("")
npc.unlock()
return
end
local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Din păcate nu pot să incep nunta deoarece")
say("nu purtaţi costumele de nuntă.")
say("")
if m_sex==0 then
say("Dacă vrei să te căsătoreşti ai nevoie de:")
say_item("Tuxedo", 11901, "")
else
say("If you want to get married you need to wear:")
say_item("Rochie de mireasă ", 11903, "")
end
say("")
npc.unlock()
return
end
local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Ei ... vrei să te căsătoreşti dar nu ai bani să-ţi")
say("plăteşti nunta? Cum iţi vei întreţine familia?")
say("Revin-o la mine când ai toţi banii.")
say("")
say_reward("Cost: 1.000.000 Yang")
say("")
npc.unlock()
return
end
say_title("Femeia Bătrână:")
say("")
say("Dacă ai venit la mine înseamnă că vrei să ")
say("te căsătoreşti. Ei bine, ai venit la locul")
say("potrivit.")
say("")
say_reward("Introdu numele persoanei iubite:")
say("")
local sname = input()
if sname == "" then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Numele pe care l-ai introdus nu este bun.")
say("Încearcă din nou şi ai grijă de data")
say("asta să introduci numele corect.")
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("Femeia Bătrână:")
say("")
say("Nu ştii cu cine vrei să te căsătoreşti?")
say("")
say_reward(string.format("%s nu este online.", sname))
say("")
npc.unlock()
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Persoana cu care vrei să te căsătoreşti")
say("nu este aproape tine. Pentru a vă putea")
say("căsători cheam-o aproape tine.")
say("")
say_reward(string.format("%s este prea departe.", 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("Femeia Bătrână:")
say("")
say("Introdu numele partenerului nu al tău.")
say("")
npc.unlock()
return
end
if u_sex == m_sex then
say_title("Femeia Bătrână:")
say("")
say("Îmi pare rău dar nu voi căsători două persoane")
say("de acelaşi sex.")
say("")
npc.unlock()
return
end
if u_married then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Ha? Nu ştiai? Persoana cu care vrei să ")
say("te căsătoreşti este deja luată.")
say("")
say_reward(string.format("%s este deja căsătorit(ă).", sname))
say("")
npc.unlock()
return
end
if u_level < 25 then
say_title("Femeia Bătrână:")
say("")
say("Persoana cu care vrei să te căsătoreşti")
say("nu are nivelul necesar.")
say("")
say_reward("Nivel necesar: 25")
say("")
npc.unlock()
return
end
if m_level - u_level > 15 or u_level - m_level > 15 then
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Diferenţa de nivel dintre voi doi este prea")
say("mare. Revin-o atunci când diferenţa va fi")
say("doar de 15 nivele.")
say("")
npc.unlock()
return
end
if not u_has_ring then
if m_ring_num >= 2 then
say_title("Femeia Bătrână:")
say("")
say("Acum schimbaţi inelele.")
say("")
else
say_title("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Căsătoria este o chestiune foarte importantă ")
say("în viaţă. Macar atât puteai să-i cumperi")
say("un inel persoanei iubite.")
say("")
end
say_item("Inel de logodnă ", 70302, "")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Partenerul tău trebuie să aibă si el un inel")
say("de logodnă.")
say("")
npc.unlock()
return
end
if not u_wear then
say_title("Femeia Bătrână:")
say("")
say("Nu purtaţi costumul de nuntă. Ar fi cam jenant")
say("să vă căsătoriţi în armură nu credeţi? Reveniţi")
say("când aveţi costumele de nuntă.")
say("")
if u_sex==0 then
say_reward("Persoanei iubite îi lipseşte costumul de nuntă.")
else
say_reward("Persoanei iubite îi lipseşte costumul de nuntă.")
end
say("")
npc.unlock()
return
end
local ok_sign = confirm(u_vid, "Vrei să te căsătoreşti cu "..pc.name.."?", 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("Femeia Bătrână:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Totul este gata! Cu siguranţă totul este")
say("pregătit acum.")
say("Acum vă voi trimite la managerul de nunţi")
say("pentru a termina cununia.")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title("Femeia Bătrână:")
say("")
say("Partenerul tău nu mai doreşte să se")
say("căsătorească cu tine.")
say("")
end
say("")
npc.unlock()
end
when 9006.chat."Începe nunta" with pc.is_engaged() begin
say_title("Femeia Bătrână:")
say("")
say("De ce eşti încă aici?")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end
when 9011.chat."Permisiunea pentru căsătorie" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title("Organizatoare de nunţi:")
say("")
say("Vorbesc cu partenerul tău. Aşteaptă.")
say("")
return
end
say_title("Organizatoare de nunţi:")
say("")
say("Prima dată, introdu numele partenerului.")
local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title("Organizatoare de nunţi:")
say("")
say("Nu văd pe nimeni cu acest nume în preajmă.")
say("Eşti sigur că acesta este numele? ")
say("")
say_reward(string.format("%s nu este online.", sname))
say("")
npc.unlock()
return
end
if not npc.is_near_vid(u_vid, 10) then
say_title("Organizatoare de nunţi:")
say("")
say("Persoana cu care vrei să te căsătoreşti")
say("nu este aproape tine. Pentru a vă putea")
say("căsători cheam-o aproape tine.")
say("")
say_reward(string.format("%s trebuie sa fie mai aproape.", sname))
say("")
npc.unlock()
return
end
if u_vid == m_vid then
say_title("Organizatoare de nunţi:")
say("")
say("Nu introdu propriul nume.")
say("")
say("Trebuie să introduci numele partenerului tău.")
say("")
npc.unlock()
return
end
if u_vid != marriage.find_married_vid() then
say_title("Organizatoare de nunţi:")
say("")
say("Ceva nu este în regula. Nu este persoana")
say("potrivită.")
say("Poţi să verifici te rog?")
say("")
npc.unlock()
return
end
local ok_sign = confirm(u_vid, "Vrei să te căsătoreşti cu "..pc.name.."?", 30)
if ok_sign != CONFIRM_OK then
say_title("Organizatoare de nunţi:")
say("")
say("Partenerul tău nu este pregătit.")
say("")
npc.unlock()
return
end
say_title("Organizatoare de nunţi:")
say("")
say("Acum totul este în ordine şi putem începe.")
say("")
marriage.set_to_marriage()
say("Să aveţi o nuntă frumoasă!")
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
when 9011.chat."Porneşte muzica" 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."Opreşte muzica" 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."Noapte/zi" with
pc.is_married() and
marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end
when 9011.chat."Porneşte zăpada" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end
when 9011.chat."Anunţ " with pc.is_married() and marriage.in_my_wedding() begin
if pc.getqf("wedding_announce_time") < get_time() then
local old_vid = pc.get_vid()
local u_vid = marriage.find_married_vid()
if u_vid != 0 then
pc.select(u_vid)
local partner = pc.getname()
pc.select(old_vid)
notice_all(pc.name.." şi "..partner.." va invită la nunta lor!")
notice_all("Du-te la femeia bătrână pentru a te alătura.")
pc.setqf("wedding_announce_time", get_time()+60*10)
setskin(NOWINDOW)
else
say("Partenerul tău nu este online!")
say("")
end
else
local remaining = pc.getqf("wedding_announce_time") - get_time()
say("Mai trebuie să aştepţi "..remaining.." secunde.")
say("")
end
end
when 9011.chat."Încheiaţi nunta" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title("Organizatoare de nunţi:")
say("")
say("Vorbesc cu partenerul tău. Aşteaptă.")
say("")
return
end
say_title("Organizatoare de nunţi:")
say("")
say("Doreşti să închei nunta?")
say("")
local s = select("Da","Nu")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say_title("Organizatoare de nunţi:")
say("")
say("Partenerul tău trebuie să fie de acord")
say("pentru terminarea nunţii.")
say("")
say("Nunta nu poate fi terminată deoarece")
say("partenerul tău nu este online.")
say("")
npc.unlock()
return
end
say_title("Organizatoare de nunţi:")
say("")
say("Trebuie să aşteptăm confirmarea partenerului,")
say("tău.")
say("")
local ok_sign = confirm(u_vid, "Vrei să termini nunta? ", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding()
else
say_title("Organizatoare de nunţi:")
say("")
say("Partenerul tău nu este de acord!")
say("")
end
npc.unlock()
end
end
when 11000.chat."Divorţ " or
11002.chat."Divorţ " or
11004.chat."Divorţ " 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("Gardian:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Fără partenerul dumneavoastră nu puteţi obţine")
say("divorţul în mod legal.")
say("Revin-o cu partenerul tău!")
say("")
return
end
say_title("Gardian:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Pentru a divorţa aveţi nevoie de 500.000Yang")
say("şi acordul partenerului dumneavoastră.")
say("")
say("Eşti sigur că vrei asta?")
say("")
local MONEY_NEED_FOR_ONE = 500000
local s = select("Da.", "Nu sunt sigur încă.")
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("Aduceţi inelul de nuntă.")
return;
end
if not u_have_ring then
say("Partenerul trebuie să aibă inelul de nuntă.")
return;
end
if not m_enough_money then
say_title("Gardian:")
say("")
say("Nu ai destui bani pentru a divorţa.")
say("")
say_reward("Ai nevoie de 500.000Yang")
say("")
return;
end
if not u_enough_money then
say_title("Gardian:")
say("")
say("Nu ai destui bani pentru a divorţa.")
say("")
say_reward("Ai nevoie de 500.000Yang")
say("")
return;
end
say_title("Gardian:")
say("")
say("Eşti sigur că vrei să divorţezi?")
say("")
local c=select("Da.", "Nu. M-am răzgândit.")
if 2 == c then
say_pc_name()
say("")
say("M-am răzgândit.")
say("Nu mai vreau sa divorţez.")
say("")
wait()
say_title("Gardian:")
say("")
say("Este cea mai bună cale.")
say("")
say_reward("Divorţul a fost anulat.")
say("")
return
end
local ok_sign = confirm(u_vid, pc.name.."Vrei sa divorţezi?", 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("Gardian:")
say("")
say("Ai divorţat.")
say("")
say("Nu mai poţi face nimic acum.")
say("")
marriage.remove()
else
say_title("Gardian:")
say("")
say("Documentele nu sunt complete.")
say("Vă rog să veniţi mai târziu din nou.")
say("")
say_reward("Divorţul a fost anulat.")
say("")
end
else
say_title("Gardian:")
say("")
say("Partenerul tău nu vrea să divorţeze!")
say("")
say_reward("Divorţul a fost anulat.")
say("")
end
end
end
when 11000.chat."Eliminaţi inelul de cununie" or
11002.chat."Eliminaţi inelul de cununie" or
11004.chat."Eliminaţi inelul de cununie" with
not pc.is_married() and
pc.count_item(70302)>0
begin
say_title("Gardian:")
say("")
----"123456789012345678901234567890123456789012345678901234567890"|
say("Inelul de cununuie a fost eliminat.")
say("")
pc.remove_item(70302)
end
when 11000.chat."Divorţ unilateral" or
11002.chat."Divorţ unilateral" or
11004.chat."Divorţ unilateral" with pc.is_married() begin
if not marriage_manage.check_divorce_time() then
return
end
say_title("Gardian:")
say("")
say("Ai nevoie de 1.000.000Yang pentru acest lucru.")
say("Eşti sigur că vrei să divorţezi?")
say("")
local s = select("Da.", "Nu... ")
local NEED_MONEY = 1000000
if s == 2 then
return
end
if pc.money < NEED_MONEY then
say_title("Gardian:")
say("")
say("Nu ai destui bani pentru a divorţa.")
say("Ai nevoie de 1.000.000Yang.")
say("")
return
end
say_title("Gardian:")
say("")
say("Eşti sigur că vrei să divorţezi?")
say("Gândeşte-te bine:")
say("")
local c = select("Da, vreau.","Mă mai gândesc.")
if c == 2 then
say_title("Gardian:")
say("")
say("Păi")
say("Poate e mai bine aşa.")
say("")
return
end
pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)
marriage.remove()
say_title("Gardian:")
say("")
say("Ok, dacă asta este alegerea ta.")
say("")
end
when 9006.chat."Lista nunţilor" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say_title("Femeia Bătrână:")
say("")
say("În acest moment nu este nici o nuntă ")
say("in desfăşurare.")
say("")
else
-- chat(table.getn(t))
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = "Nunta dintre "..p[3].." şi "..p[4] 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("Organizatoare de nunţi:")
say("")
say("Distracţie plăcută!")
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("Gardian:")
say("")
say("Eşti proaspăt căsătorit!")
say("")
say("Deja vrei să divorţezi? Mai aşteaptă ")
say("puţin timp.")
say("")
return false
end
return true
end
function is_equip_wedding_dress()
local a = pc.get_armor()
return a >= 11901 and a <= 11904
end
end
end
Afișează semnătura
de 
de 
de -
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 46 vizitatori