Salut !
Am nevoie de questu de la Femeia Bătrână complet deoarece eu am sf Cyptex si e bug la Nunta , nu merge să te căsătorești .
Cerere quest
Poftim sefu:
Daca vrei sa dea mai multe nu numai unul singur,modific aici pc.give_item2(70024, 1)
70024=>cod marmura binecuvantata si 1=>bucati de marmura !
Si uite si unu cu nunta:
Cod: Selectaţi tot
quest marmura begin
state start begin
when 9006.chat."Cumpara Marmura Binecuvantata" begin
say_title("Femeie batrana")
say(" ")
say("Buna cavalere, ai auzit de Marmura Binecuvanta ?")
say("Cu ea poti sa-ti mai adaugi un bonus la item")
say("dar cu o conditie, acel item sa aiba deja 4 bonusuri")
say("Vrei si tu 5 bucati de marmura ?")
say("")
say_reward("Te costa: 100.000 Yang.")
say("")
say("")
s = select("Da","Nu")
if s == 2 then
return
elseif pc.get_gold()<100000 then
say_title("Femeie batrana")
say("")
say("Hm...")
say("Eu fiind o femeie batrana imi este tare greu")
say("sa ma intretin singura...am nevoie de bani.")
say("Nu iti pot da marmura")
say("pe gratis..vino la mine cand ai 100.000 yang.")
say("O zi buna!")
return
end
pc.give_item2(70024, 5)
pc.change_gold(-100000)
syschat("Tocmai ai cumparat Marmura Binecuvantata cu 100.000 Yang de la o Femeie Batrana.")
end
end
end70024=>cod marmura binecuvantata si 1=>bucati de marmura !
Si uite si unu cu nunta:
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
Răspunsuri
6 Vizualizări
350
6 Vizualizări
350
Răspunsuri
2 Vizualizări
463
2 Vizualizări
463
Răspunsuri
5 Vizualizări
1777
5 Vizualizări
1777
-
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 6 vizitatori



