[GYŰJTŐTÉMA]Questtel kapcsolatos kérdések, kérések

[hurka97]

Sziasztok! Akár hogy is próbálom kivenni az IntetoryDialogot sehogy sem megy belépek metin végig tölt és ennyi avagy el inditom a klienst és ki is dob mikor bejelentkeznék. Valaki segítsen legyen olyan kedves  ^^ 

[fabtam11]

Sziasztok! Akár hogy is próbálom kivenni az IntetoryDialogot sehogy sem megy belépek metin végig tölt és ennyi avagy el inditom a klienst és ki is dob mikor bejelentkeznék. Valaki segítsen legyen olyan kedves  ^^ 

Ombre rossz téma, te pythonos kérdést tettél fel e.O
Az adott téma meg lua és quest témájú.

[Devil1]

Sziasztok.
Magyarosítás közben jött elő egy hiba, abban kérném a segítségeteket hogy javítsam vagy hogy mitől lehet ez a hiba?

https://kephost.com/image/Bz6O

Megjegyzés:
Franzi sf-ben jött elő a hiba.
Már próbáltam rá javítást találni de nem találtam.
Előre köszönöm a segítséget.

Kód Kijelölés Kibont


----------------------------------------------------------
-- Házasság Quest --
-- Magyarosítva by P3NG3R --
----------------------------------------------------------
quest marriage_manage begin
state start begin
when 9006.chat." Házasság " with not pc.is_engaged_or_married() begin
if not npc.lock() then
say("Hello pc.get_name().." ")
say(" Megszeretnél házasodni? ")
return
end
if pc.get_level() < 25 then
say_title(mob_name(9006)..":")
say("Üdvözöllek.")
say("Házasságot csak és kizálólag 25 Szint felett")
say("lehet kötni! Neked még igencsak fejlődnöd kell,")
say("hogy házasodhass!")
say("Remélem megérted..")
say("")
say_reward("Gyere vissza, ha már elérted minimum a 25 Szintet.")
say("")
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(mob_name(9006)..":")
say_reward("Neked nincs eljegyzési gyűrűd!")
say("")
say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Amíg nincs nem kezdhetsz házasságot.")
say("")
return
end

local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title(mob_name(9006)..":")
say("Jól látok? Nincs nálad az esküvő ruházatod?!")
say("A nélkül nem engedhetek senkit esküdni!")
say("Talán később...")
say("")
if m_sex==0 then
say_item("Szmoking", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Szmokingod!")
else
say_item("Menyasszonyi ruha", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Menyasszonyi ruhád!")
end
say("")
return
end

local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title(mob_name(9006)..":")
say("Nincs nálad a szükséges fizetség...")
say("És így nincs mibőn finanszírozni az esküvőt!")
say("Be kell szerezzétek de sürgősen!")
say("")
say_reward(string.format("Szükséges Yang: %d Millió.", NEED_MONEY/1000000))
say("")
return
end

say_title(mob_name(9006)..":")
say("Oké, megvan minden, most jöhet a név.")
say("Mi a kedves menyasszony neve?")
say("")
say_reward("Add meg párod nevét:")
local sname = input()
if sname == "" then
say_title(mob_name(9006)..":")
say_reward("Muszáj megadnod egy nevet!")
say("")
return
end

local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title(mob_name(9006)..":")
say_reward("Ez a játékos nem létezik vagy nem elérhető!")
say_reward("Lehet, hogy elírtad a játékos nevét.")
say("")
say_reward(string.format("A megadott név: %s", sname))
say("")
return
end

if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házassági partner: %s ", sname))
say("")
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.get_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(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end

if u_sex == m_sex then
say_title(mob_name(9006)..":")
say_reward("Saját nemeddel való házasságot a törvény büntetni!!!")
say_reward("Hülye b*zi-_-'")
say("")
return
end

if u_married then
say_title(mob_name(9006)..":")
say("A párod már házas?!")
say("Így nem tudtok házasságot kötni!")
say("Bontsa fel az előző házasságát.")
say("")
say_reward(string.format("%s már házasságban van valakivel!", sname))
say("")
return
end

if u_level < 25 then
say_title(mob_name(9006)..":")
say("A párodnak nincs meg a szükséges szintje!")
say("Így nem tudtok házasságot kötni!")
say("")
say_reward("El kell érnie a 25 Szintet legalább!")
say("")
return
end

if m_level - u_level > 15 or u_level - m_level > 15 then
say_title(mob_name(9006)..":")
say("A házastársak közti szint különbsége nem haladhatja")
say("meg a +/- 15 Szintet!.")
say("Ez sajnos szabály..")
say("")
say_reward("Házastársadnak fel kell zárkóznia hozzád 15 Szint[ENTER]különbségig!")
say("")
return
end

if not u_has_ring then
if m_ring_num >= 2 then
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
else
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
say("")
end

say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Az esküvő abbamaradt,")
say_reward("mert nincs meg a két eljegyzési gyűrű!")
say("")
return
end

if not u_wear then
say_title(mob_name(9006)..":")
say("Párod nincs felkészülve.. Nem viseli az esküvői")
say("ruházatát. A folytatáshoz elengedhetetlen!")
say("")
if m_sex==0 then
say_item("Menyasszonyi ruha", 11903, "")
say_reward("Nincs rajta a Menyasszonyi ruhája!")
else
say_item("Szmoking", 11902, "")
say_reward("Nincs rajta a Szmokingja!")
end
say("")
return
end


local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign == CONFIRM_OK then
local m_name = pc.get_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(mob_name(9006)..":")
say("Rendben van, a gyűrűket megkaptátok.")
say("Kicsit várni kell...")
say("Aztán elviszlek titeket a szerelmesek szigetére,")
say("ahol végbe mehet az esküvőtök.")
say("")
say_reward("Gratulálok nektek!")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title(mob_name(9006)..":")
say("Visszautasították az ajánlatodat!")
say("")
say_reward("Esküvő megszakadt!")
end
say("")
end

when 9006.chat."Házassági HIBA" with pc.is_engaged() begin
say_title(mob_name(9006)..":")
say("Szeretnél házasságot kötni?")
say("Oké odateleportállak.")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end


when 9011.chat."Az eskövő elkezdése" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("Elkezdjük az esküvőt?")
say("")
return
end
say_title(mob_name(9011)..":")
say("Üdvözöllek.")
say("Az eskövő kezdéséhez szükség lesz a nevek megadására.")
say("Ez csupán szakmai formalitás.")
say("")

local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()

if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Ne szórakozz...")
say("Helyesen írd be a nevét!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end

if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end

if u_vid == m_vid then
say_title(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end

if u_vid != marriage.find_married_vid() then
say_title(mob_name(9011)..":")
say("Oké minden okés.")
say("Miért házasodtok??")
say("")
return
end

local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign != CONFIRM_OK then
say_title(mob_name(9011)..":")
say("Oké, Minden szuper!")
say("Házastársakká nyílvánítalak!")
say("")
return
end
say_title(mob_name(9011)..":")
say("Gratulálok!")
say("A házastársak megajándékozták egymást!")
notice_in_map("Sok Boldogságot az ifjú párnak!")
marriage_manage.give_wedding_gift()
old = pc.select(u_vid)
marriage_manage.give_wedding_gift()
pc.select(old)
marriage.set_to_marriage()
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."Zene be" 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."Zene ki" 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."Naplemente" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end

when 9011.chat."Havazás" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end

when 9011.chat."Házasság befejezése" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("A házasság szent és sérthetetlen, ne legyetek rosszak )")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnéd befejezni az esküvőt?")
say("")
local s = select("Igen","Nem")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Az esküvő befejezéséhez mindkét fél beleegyezésére")
say("lesz szükség!")
say_reward("Nem fejezheted be az esküvődet, mert a párod[ENTER]nincs jelen.")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnétek befejezni az esküvőtöket?")
say_reward("Mindkét fél beleegyezése szükséges.")
say("")
local ok_sign = confirm(u_vid, "Befejezitek az esküvőtöket?", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding()
else
say_title(mob_name(9011)..":")
say_reward("Úgy döntöttetek, hogy a végéig buliztok :D!")
say("")
end
end
end

when 11000.chat."Válás" or 11002.chat."Válás" or 11004.chat."Válás" 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("Őr:")
say("Nincs itt a másik fél!")
say("Így nem tudlak szétválasztani titeket!")
say("Próbáld meg később!")
say("")
return
end

say_title("Őr:")
say("A kölcsönös válás feltételei: Mindkét félnek")
say("fizetnie kell fejenként 500.000 Yangot.")
say("Valóban el akartok válni?")
say("")

local MONEY_NEED_FOR_ONE = 500000
local s = select("Igen", "Nem")

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_reward("A másik félnél nincs meg a gyűrű!")
return
end
if not u_have_ring then
say_reward("Nincs nálad a gyűrű!")
return
end

if not m_enough_money then
say_title("Őr:")
say_reward("A másik félnél nincs meg a szükséges Yang!")
say("")
say_reward(string.format("A másik félnél nincs %s millió Yang!", MONEY_NEED_FOR_ONE/1000000))
say("")
return
end
if not u_enough_money then
say_title("Őr:")
say_reward("Nincs nálad a szükséges 500.000 Yang!")
say("")
return
end

say("Átgondolotátok a válás nehézségeit?.")
say("")
say("Mégis válni akartok?")
local c=select("Igen","Nem")
if 2 == c then
say_title(pc.get_name()..":")
say("Jobban belegondolva hülye ötlet volt.")
say("")
wait()
say_title("Őr:")
say("Ugye-ugye?")
say("A válás nem megoldás a problémáinkra!")
say("Legközelebb beszéljétek meg!")
say("")
say_reward("Amíg még nem késő!")
say("")
return
end

local ok_sign = confirm(u_vid, "El akarsz válni "..pc.get_name().."-tól?", 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("Őr:")
say("Ez kellett?! Nem lehetett volna megbeszélni?")
say("Jó, de utána nehogy sírjatok..!")
say("Akarod, hogy kimondjam?")
say("")
say_reward("Mostantól nem vagytok házasok!")
say("")
marriage.remove()
else
say_title("Őr:")
say("A válás nem sikerült!")
say("Hiányosak voltak a feltételek!")
say("")
say_reward("Próbáljátok meg később!")
say("")
end
else
say_title("Őr:")
say("A másik fél nem kíván tőled elválni!")
say("Ha egyoldalú válást vállalsz neked kell")
say("fizetned a kétfejre jutó összeget, ami Egy Millió Yang.")
say_reward("Próbáld meg később!")
say("")
end
end
end

when 11000.chat."Gyűrű visszaadás!" or 11002.chat."Gyűrű visszaadás!" or 11004.chat."Gyűrű visszaadás!" with not pc.is_married() and  pc.count_item(70302)>0 begin
say_title("Őr:")
say("Nálad maradt egy Jegygyűrű és már elváltál?!")
say("Ide vele azonnal!")
say("")
say_reward("Jegygyűrű átadva!")
pc.remove_item(70302)
end

when 11000.chat."Egyoldalú válás" or 11002.chat."Egyoldalú válás" or 11004.chat."Egyoldalú válás" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

say_title("Őr:")
say("Valóban el akarsz válni párodtól?")
say("Ugye tudod, hogy ennek az ára duplája lesz a[ENTER]normális árnak?")
say("")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")

local s = select("Igen","Nem")

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

if pc.money < NEED_MONEY then
say_title("Őr:")
say("Nincs meg a szükséges pénzd!")
say("Mint mondtam a duplája lesz..")
say_reward(string.format("Gyere vissza ha meglesz a szükséges %s Yang.", NEED_MONEY))
say("")
return
end

say_title("Őr:")
say("Nem gondolnád meg magad?")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")
local c = select("Igen", "Nem")

if c == 2 then
say_title("Őr:")
say("A házassággal nem szabad szórakozni!")
say("Keresd fel párod és beszéld meg vele mi legyen..")
say("Viszlát!")
say("")
return
end

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

marriage.remove()

say_title("Őr:")
say("Sikeresen elváltál párodtól.")
say("Viszlát...")
say("")
say_reward("Elváltál az ex-párodtól.")
say("")
end

when 9006.chat."Házasság lista" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say_title("Házasság lista")
say("Jelenleg nincs házasság folyamatban!")
else
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].." és "..p[4].." esküvője." 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(mob_name(9011)..":")
say("Te csak vendég vagy!")
say("Psszt!")
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("Őr:")
say("Most házasodtál meg nem válhatsz el azonnal!")
say("Várnod kell egy teljes napot!")
say("")
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
end



[DonNodus]

az elején van a hiba, sok az idézőjel:

Kód Kijelölés Kibont

say("Hello pc.get_name().." ")

[Devil1]

Hát megpróbáltam máshogy de így már más hiba jött ki ahogy le./qc-tam azonnal ez a hiba jött.
segmentation fault (core dumped)
Ezt hogy lehet javítani vagy mitől lehet ez a hiba?

Ja most így szerkesztettem a questet.

Kód Kijelölés Kibont


----------------------------------------------------------
-- Házasság Quest --
-- Magyarosítva by P3NG3R --
----------------------------------------------------------
quest marriage_manage begin
state start begin
when 9006.chat." Házasság " with not pc.is_engaged_or_married() begin
if not npc.lock() then
say("Hello harcos")
say(" Megszeretnél házasodni? ")
return
end
if pc.get_level() < 25 then
say_title(mob_name(9006)..":")
say("Üdvözöllek.")
say("Házasságot csak és kizálólag 25 Szint felett")
say("lehet kötni! Neked még igencsak fejlődnöd kell,")
say("hogy házasodhass!")
say("Remélem megérted..")
say("")
say_reward("Gyere vissza, ha már elérted minimum a 25 Szintet.")
say("")
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(mob_name(9006)..":")
say_reward("Neked nincs eljegyzési gyűrűd!")
say("")
say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Amíg nincs nem kezdhetsz házasságot.")
say("")
return
end

local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title(mob_name(9006)..":")
say("Jól látok? Nincs nálad az esküvő ruházatod?!")
say("A nélkül nem engedhetek senkit esküdni!")
say("Talán később...")
say("")
if m_sex==0 then
say_item("Szmoking", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Szmokingod!")
else
say_item("Menyasszonyi ruha", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Nincs rajtad a Menyasszonyi ruhád!")
end
say("")
return
end

local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title(mob_name(9006)..":")
say("Nincs nálad a szükséges fizetség...")
say("És így nincs mibőn finanszírozni az esküvőt!")
say("Be kell szerezzétek de sürgősen!")
say("")
say_reward(string.format("Szükséges Yang: %d Millió.", NEED_MONEY/1000000))
say("")
return
end

say_title(mob_name(9006)..":")
say("Oké, megvan minden, most jöhet a név.")
say("Mi a kedves menyasszony neve?")
say("")
say_reward("Add meg párod nevét:")
local sname = input()
if sname == "" then
say_title(mob_name(9006)..":")
say_reward("Muszáj megadnod egy nevet!")
say("")
return
end

local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title(mob_name(9006)..":")
say_reward("Ez a játékos nem létezik vagy nem elérhető!")
say_reward("Lehet, hogy elírtad a játékos nevét.")
say("")
say_reward(string.format("A megadott név: %s", sname))
say("")
return
end

if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házassági partner: %s ", sname))
say("")
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.get_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(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end

if u_sex == m_sex then
say_title(mob_name(9006)..":")
say_reward("Saját nemeddel való házasságot a törvény büntetni!!!")
say_reward("Hülye b*zi-_-'")
say("")
return
end

if u_married then
say_title(mob_name(9006)..":")
say("A párod már házas?!")
say("Így nem tudtok házasságot kötni!")
say("Bontsa fel az előző házasságát.")
say("")
say_reward(string.format("%s már házasságban van valakivel!", sname))
say("")
return
end

if u_level < 25 then
say_title(mob_name(9006)..":")
say("A párodnak nincs meg a szükséges szintje!")
say("Így nem tudtok házasságot kötni!")
say("")
say_reward("El kell érnie a 25 Szintet legalább!")
say("")
return
end

if m_level - u_level > 15 or u_level - m_level > 15 then
say_title(mob_name(9006)..":")
say("A házastársak közti szint különbsége nem haladhatja")
say("meg a +/- 15 Szintet!.")
say("Ez sajnos szabály..")
say("")
say_reward("Házastársadnak fel kell zárkóznia hozzád 15 Szint[ENTER]különbségig!")
say("")
return
end

if not u_has_ring then
if m_ring_num >= 2 then
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
else
say_title(mob_name(9006)..":")
say("Egyikőtöknek hiányzik az eljegyzési gyűrűje!")
say("Szerezzétek be minél előbb!")
say("")
end

say_item("Eljegyzési gyűrű ", 70301, "")
say_reward("Az esküvő abbamaradt,")
say_reward("mert nincs meg a két eljegyzési gyűrű!")
say("")
return
end

if not u_wear then
say_title(mob_name(9006)..":")
say("Párod nincs felkészülve.. Nem viseli az esküvői")
say("ruházatát. A folytatáshoz elengedhetetlen!")
say("")
if m_sex==0 then
say_item("Menyasszonyi ruha", 11903, "")
say_reward("Nincs rajta a Menyasszonyi ruhája!")
else
say_item("Szmoking", 11902, "")
say_reward("Nincs rajta a Szmokingja!")
end
say("")
return
end


local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign == CONFIRM_OK then
local m_name = pc.get_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(mob_name(9006)..":")
say("Rendben van, a gyűrűket megkaptátok.")
say("Kicsit várni kell...")
say("Aztán elviszlek titeket a szerelmesek szigetére,")
say("ahol végbe mehet az esküvőtök.")
say("")
say_reward("Gratulálok nektek!")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title(mob_name(9006)..":")
say("Visszautasították az ajánlatodat!")
say("")
say_reward("Esküvő megszakadt!")
end
say("")
end

when 9006.chat."Házassági HIBA" with pc.is_engaged() begin
say_title(mob_name(9006)..":")
say("Szeretnél házasságot kötni?")
say("Oké odateleportállak.")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end


when 9011.chat."Az eskövő elkezdése" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("Elkezdjük az esküvőt?")
say("")
return
end
say_title(mob_name(9011)..":")
say("Üdvözöllek.")
say("Az eskövő kezdéséhez szükség lesz a nevek megadására.")
say("Ez csupán szakmai formalitás.")
say("")

local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()

if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Ne szórakozz...")
say("Helyesen írd be a nevét!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end

if not npc.is_near_vid(u_vid, 10) then
say_title(mob_name(9006)..":")
say("Oké, de miért nincs itt?!")
say("Nem vagyok képes így beazonosítani ha nem látom.")
say("Jöjjön ide azonnal!")
say("")
say_reward(string.format("Házasság partner: %s ", sname))
say("")
return
end

if u_vid == m_vid then
say_title(mob_name(9006)..":")
say("Saját magaddal nem köthetsz házasságot")
say("")
say_reward("Idióta-_-")
say("")
return
end

if u_vid != marriage.find_married_vid() then
say_title(mob_name(9011)..":")
say("Oké minden okés.")
say("Miért házasodtok??")
say("")
return
end

local ok_sign = confirm(u_vid, "Elfogadod "..pc.get_name().. "-t házastársadul?", 30)
if ok_sign != CONFIRM_OK then
say_title(mob_name(9011)..":")
say("Oké, Minden szuper!")
say("Házastársakká nyílvánítalak!")
say("")
return
end
say_title(mob_name(9011)..":")
say("Gratulálok!")
say("A házastársak megajándékozták egymást!")
notice_in_map("Sok Boldogságot az ifjú párnak!")
marriage_manage.give_wedding_gift()
old = pc.select(u_vid)
marriage_manage.give_wedding_gift()
pc.select(old)
marriage.set_to_marriage()
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."Zene be" 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."Zene ki" 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."Naplemente" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end

when 9011.chat."Havazás" with pc.is_married() and marriage.in_my_wedding() begin
marriage.wedding_snow(true)
setskin(NOWINDOW)
end

when 9011.chat."Házasság befejezése" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title(mob_name(9011)..":")
say("A házasság szent és sérthetetlen, ne legyetek rosszak )")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnéd befejezni az esküvőt?")
say("")
local s = select("Igen","Nem")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say_title(mob_name(9011)..":")
say("Az esküvő befejezéséhez mindkét fél beleegyezésére")
say("lesz szükség!")
say_reward("Nem fejezheted be az esküvődet, mert a párod[ENTER]nincs jelen.")
say("")
return
end
say_title(mob_name(9011)..":")
say("Szeretnétek befejezni az esküvőtöket?")
say_reward("Mindkét fél beleegyezése szükséges.")
say("")
local ok_sign = confirm(u_vid, "Befejezitek az esküvőtöket?", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding()
else
say_title(mob_name(9011)..":")
say_reward("Úgy döntöttetek, hogy a végéig buliztok :D!")
say("")
end
end
end

when 11000.chat."Válás" or 11002.chat."Válás" or 11004.chat."Válás" 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("Őr:")
say("Nincs itt a másik fél!")
say("Így nem tudlak szétválasztani titeket!")
say("Próbáld meg később!")
say("")
return
end

say_title("Őr:")
say("A kölcsönös válás feltételei: Mindkét félnek")
say("fizetnie kell fejenként 500.000 Yangot.")
say("Valóban el akartok válni?")
say("")

local MONEY_NEED_FOR_ONE = 500000
local s = select("Igen", "Nem")

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_reward("A másik félnél nincs meg a gyűrű!")
return
end
if not u_have_ring then
say_reward("Nincs nálad a gyűrű!")
return
end

if not m_enough_money then
say_title("Őr:")
say_reward("A másik félnél nincs meg a szükséges Yang!")
say("")
say_reward(string.format("A másik félnél nincs %s millió Yang!", MONEY_NEED_FOR_ONE/1000000))
say("")
return
end
if not u_enough_money then
say_title("Őr:")
say_reward("Nincs nálad a szükséges 500.000 Yang!")
say("")
return
end

say("Átgondolotátok a válás nehézségeit?.")
say("")
say("Mégis válni akartok?")
local c=select("Igen","Nem")
if 2 == c then
say_title(pc.get_name()..":")
say("Jobban belegondolva hülye ötlet volt.")
say("")
wait()
say_title("Őr:")
say("Ugye-ugye?")
say("A válás nem megoldás a problémáinkra!")
say("Legközelebb beszéljétek meg!")
say("")
say_reward("Amíg még nem késő!")
say("")
return
end

local ok_sign = confirm(u_vid, "El akarsz válni "..pc.get_name().."-tól?", 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("Őr:")
say("Ez kellett?! Nem lehetett volna megbeszélni?")
say("Jó, de utána nehogy sírjatok..!")
say("Akarod, hogy kimondjam?")
say("")
say_reward("Mostantól nem vagytok házasok!")
say("")
marriage.remove()
else
say_title("Őr:")
say("A válás nem sikerült!")
say("Hiányosak voltak a feltételek!")
say("")
say_reward("Próbáljátok meg később!")
say("")
end
else
say_title("Őr:")
say("A másik fél nem kíván tőled elválni!")
say("Ha egyoldalú válást vállalsz neked kell")
say("fizetned a kétfejre jutó összeget, ami Egy Millió Yang.")
say_reward("Próbáld meg később!")
say("")
end
end
end

when 11000.chat."Gyűrű visszaadás!" or 11002.chat."Gyűrű visszaadás!" or 11004.chat."Gyűrű visszaadás!" with not pc.is_married() and  pc.count_item(70302)>0 begin
say_title("Őr:")
say("Nálad maradt egy Jegygyűrű és már elváltál?!")
say("Ide vele azonnal!")
say("")
say_reward("Jegygyűrű átadva!")
pc.remove_item(70302)
end

when 11000.chat."Egyoldalú válás" or 11002.chat."Egyoldalú válás" or 11004.chat."Egyoldalú válás" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

say_title("Őr:")
say("Valóban el akarsz válni párodtól?")
say("Ugye tudod, hogy ennek az ára duplája lesz a[ENTER]normális árnak?")
say("")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")

local s = select("Igen","Nem")

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

if pc.money < NEED_MONEY then
say_title("Őr:")
say("Nincs meg a szükséges pénzd!")
say("Mint mondtam a duplája lesz..")
say_reward(string.format("Gyere vissza ha meglesz a szükséges %s Yang.", NEED_MONEY))
say("")
return
end

say_title("Őr:")
say("Nem gondolnád meg magad?")
say_reward("Akarod, hogy elválasztjalak a házastársadtól?")
local c = select("Igen", "Nem")

if c == 2 then
say_title("Őr:")
say("A házassággal nem szabad szórakozni!")
say("Keresd fel párod és beszéld meg vele mi legyen..")
say("Viszlát!")
say("")
return
end

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

marriage.remove()

say_title("Őr:")
say("Sikeresen elváltál párodtól.")
say("Viszlát...")
say("")
say_reward("Elváltál az ex-párodtól.")
say("")
end

when 9006.chat."Házasság lista" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
say_title("Házasság lista")
say("Jelenleg nincs házasság folyamatban!")
else
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].." és "..p[4].." esküvője." 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(mob_name(9011)..":")
say("Te csak vendég vagy!")
say("Psszt!")
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("Őr:")
say("Most házasodtál meg nem válhatsz el azonnal!")
say("Várnod kell egy teljes napot!")
say("")
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
end



Köszönöm a segitséget.
#Megoldva

[AngelOfGod]

Sziasztok. Mi lehet a baj ezzel a questtel?
[spoiler]

quest alap begin
   state start begin
      when login or levelup with pc.get_level() >= 5 begin
         set_state(alap_information)
      end
   end

   state alap_information begin
      when letter begin
         send_letter("Uriel vár rád. ")
         local v=find_npc_by_vnum(20011)
         if 0==v then
         else
            target.vid("__TARGET__", v, "Uriel")
         end
      end
      when button or info begin
         say_title("Menj el Uriel-hez. ")
         say()
         say("Uriel körbe vezet téged a városban hogy tisztában ")
         say("legyél azzal hogy mi hol van. ")
         say()
         say("Na ne várasd meg és menj el hozzá más különben ")
         say("Nem fogsz több küldetést kapni. ")
      end
      when __TARGET__.target.click begin
         target.delete("__TARGET__")
         gameforge.main_quest_lv10._30_sayTitle)
         say("Üdv kalandor. Én vagyok Uriel. Elöszzör is kezdjük ott ")
         say("hogy a különleges Ox eseményre nálam tudsz belépni. ")
         say("Na menjünk tovább.")
         clear_letter()
         set_state(keresd_meg_vn)
      end
   end
   
   state keresd_meg_vn begin
      when letter begin
         local v=find_npc_by_vnum(9003)
         send_letter("Menj a vegyeskereskedőnőhöz! ")
         local v=find_npc_by_vnum(9003)
         if 0==v then
         else
            target.vid("__TARGET__", v, "Vegyeskereskedőnő ")
         end
      end
      when button or info begin
         say_title(gameforge.main_quest_lv10._110_sayTitle)
            say(gameforge.main_quest_lv10._120_sayReward)
      end
      when __TARGET__.target.click begin
         target.delete("__TARGET__")
         say_title(mob_name(9003)..":")
         say("Nálam tudsz venni mindenféle bájitalt, csecsebecsét.")
         say("Bár nem a legolcsóbbak az árúim de én vagyok az ")
         say("egyetlen aki ilyet árúl szóval. (Mosolyog)")
         clear_letter()
         set_state(keresd_meg_kv)
      end
   end
   state keresd_meg_kv begin
      when letter begin
         send_letter("Keresd meg a kovácsot. ")
         local v=find_npc_by_vnum(20016)
         if 0==v then
         else
            target.vid("__TARGET__", v, "A kovács")
         end
      end
      when button or info begin
      end
      when __TARGET__.target.click begin
         target.delete("__TARGET__")
         say_title(mob_name(20016)..":")
         say("Nálam fogod tudni alap szinten kovácsoltatni az ")
         say("Összes felszerelésed. Szóval bátran gyere hozzám.")
         say("Ha mégse nálam akkor az én előregyártott Mágikus ")
         say("tárgyakkal amelyeket szétszórva találhatsz meg a ")
         say("világban.")
         clear_letter()
         set_state(keresd_meg_fk)

      end
   end
   
   state keresd_meg_fk begin
      when letter begin
         send_letter("Keresd meg a kovácsot. ")
         local v=find_npc_by_vnum(9001)
         if 0==v then
         else
            target.vid("__TARGET__", v, "A fegyverkereskedo")
         end
      end
      when button or info begin
      end
      when __TARGET__.target.click begin
         target.delete("__TARGET__")
         say_title(mob_name(9001)..":")
         say("Nálam és a testvéremnél tudsz venni fegyvert és ")
         say("fegyverzetet ebben a városban. Ezek alapszintű ")
         say("felszerelések. Késöbb más kis városokban fogsz ")
         say("tudni venni nagyobb szintű felszerelést vagy ")
         say("tudsz szerezni a szörnyek vagy az állatok ")
         say("elejtésével. Ugyan is nagyon sok harcos felszerelését ")
         say("Bitorolták el.")
         clear_letter()
         set_quest_state("to_2_quest", "run")
         set_state(__COMPLETE__)
      end
   end
   state __COMPLETE__ begin
   end
end

[/spoiler]

Kép csatolva.

[K3zX]

Esetleg így?

Kód Kijelölés Kibont

quest alap begin
   state start begin
      when login or levelup with pc.get_level() >= 5 begin
         set_state(alap_information)
      end
   end

   state alap_information begin
      when letter begin
         send_letter("Uriel vár rád. ")
         local v=find_npc_by_vnum(20011)
         if 0==v then
         else
            target.vid("__TARGET1__", v, "Uriel")
         end
      end
      when button or info begin
         say_title("Menj el Uriel-hez. ")
         say()
         say("Uriel körbe vezet téged a városban hogy tisztában ")
         say("legyél azzal hogy mi hol van. ")
         say()
         say("Na ne várasd meg és menj el hozzá más különben ")
         say("Nem fogsz több küldetést kapni. ")
      end
      when __TARGET1__.target.click begin
         target.delete("__TARGET1__")
         gameforge.main_quest_lv10._30_s ayTitle)
         say("Üdv kalandor. Én vagyok Uriel. Elöszzör is kezdjük ott ")
         say("hogy a különleges Ox eseményre nálam tudsz belépni. ")
         say("Na menjünk tovább.")
         clear_letter()
         set_state(keresd_meg_vn)
      end
   end
   
   state keresd_meg_vn begin
      when letter begin
         local v=find_npc_by_vnum(9003)
         send_letter("Menj a vegyeskereskedőnőhöz! ")
         local v=find_npc_by_vnum(9003)
         if 0==v then
         else
            target.vid("__TARGET2__", v, "Vegyeskereskedőnő ")
         end
      end
      when button or info begin
         say_title(gameforge.main_quest_lv10._110_ sayTitle)
            say(gameforge.main_quest_lv10._120_ sayReward)
      end
      when __TARGET2__.target.click begin
         target.delete("__TARGET2__")
         say_title(mob_name(9003)..":")
         say("Nálam tudsz venni mindenféle bájitalt, csecsebecsét.")
         say("Bár nem a legolcsóbbak az árúim de én vagyok az ")
         say("egyetlen aki ilyet árúl szóval. (Mosolyog)")
         clear_letter()
         set_state(keresd_meg_kv)
      end
   end
   state keresd_meg_kv begin
      when letter begin
         send_letter("Keresd meg a kovácsot. ")
         local v=find_npc_by_vnum(20016)
         if 0==v then
         else
            target.vid("__TARGET3__", v, "A kovács")
         end
      end
      when button or info begin
      end
      when __TARGET3__.target.click begin
         target.delete("__TARGET3__")
         say_title(mob_name(20016)..":")
         say("Nálam fogod tudni alap szinten kovácsoltatni az ")
         say("Összes felszerelésed. Szóval bátran gyere hozzám.")
         say("Ha mégse nálam akkor az én előregyártott Mágikus ")
         say("tárgyakkal amelyeket szétszórva találhatsz meg a ")
         say("világban.")
         clear_letter()
         set_state(keresd_meg_fk)

      end
   end
   
   state keresd_meg_fk begin
      when letter begin
         send_letter("Keresd meg a kovácsot. ")
         local v=find_npc_by_vnum(9001)
         if 0==v then
         else
            target.vid("__TARGET4__", v, "A fegyverkereskedo")
         end
      end
      when button or info begin
      end
      when __TARGET4__.target.click begin
         target.delete("__TARGET4__")
         say_title(mob_name(9001)..":")
         say("Nálam és a testvéremnél tudsz venni fegyvert és ")
         say("fegyverzetet ebben a városban. Ezek alapszintű ")
         say("felszerelések. Késöbb más kis városokban fogsz ")
         say("tudni venni nagyobb szintű felszerelést vagy ")
         say("tudsz szerezni a szörnyek vagy az állatok ")
         say("elejtésével. Ugyan is nagyon sok harcos felszerelését ")
         say("Bitorolták el.")
         clear_letter()
         set_quest_state("to_2_quest", "run")
         set_state(__COMPLETE__)
      end
   end
   state __COMPLETE__ begin
   end
end

(Make.sh/py-t nyomj)

[adamadeak]

Törölhető

[AngelOfGod]

Esetleg így?

Kód Kijelölés Kibont

quest alap begin
   state start begin
      when login or levelup with pc.get_level() >= 5 begin
         set_state(alap_information)
      end
   end

   state alap_information begin
      when letter begin
         send_letter("Uriel vár rád. ")
         local v=find_npc_by_vnum(20011)
         if 0==v then
         else
            target.vid("__TARGET1__", v, "Uriel")
         end
      end
      when button or info begin
         say_title("Menj el Uriel-hez. ")
         say()
         say("Uriel körbe vezet téged a városban hogy tisztában ")
         say("legyél azzal hogy mi hol van. ")
         say()
         say("Na ne várasd meg és menj el hozzá más különben ")
         say("Nem fogsz több küldetést kapni. ")
      end
      when __TARGET1__.target.click begin
         target.delete("__TARGET1__")
         gameforge.main_quest_lv10._30_s ayTitle)
         say("Üdv kalandor. Én vagyok Uriel. Elöszzör is kezdjük ott ")
         say("hogy a különleges Ox eseményre nálam tudsz belépni. ")
         say("Na menjünk tovább.")
         clear_letter()
         set_state(keresd_meg_vn)
      end
   end
   
   state keresd_meg_vn begin
      when letter begin
         local v=find_npc_by_vnum(9003)
         send_letter("Menj a vegyeskereskedőnőhöz! ")
         local v=find_npc_by_vnum(9003)
         if 0==v then
         else
            target.vid("__TARGET2__", v, "Vegyeskereskedőnő ")
         end
      end
      when button or info begin
         say_title(gameforge.main_quest_lv10._110_ sayTitle)
            say(gameforge.main_quest_lv10._120_ sayReward)
      end
      when __TARGET2__.target.click begin
         target.delete("__TARGET2__")
         say_title(mob_name(9003)..":")
         say("Nálam tudsz venni mindenféle bájitalt, csecsebecsét.")
         say("Bár nem a legolcsóbbak az árúim de én vagyok az ")
         say("egyetlen aki ilyet árúl szóval. (Mosolyog)")
         clear_letter()
         set_state(keresd_meg_kv)
      end
   end
   state keresd_meg_kv begin
      when letter begin
         send_letter("Keresd meg a kovácsot. ")
         local v=find_npc_by_vnum(20016)
         if 0==v then
         else
            target.vid("__TARGET3__", v, "A kovács")
         end
      end
      when button or info begin
      end
      when __TARGET3__.target.click begin
         target.delete("__TARGET3__")
         say_title(mob_name(20016)..":")
         say("Nálam fogod tudni alap szinten kovácsoltatni az ")
         say("Összes felszerelésed. Szóval bátran gyere hozzám.")
         say("Ha mégse nálam akkor az én előregyártott Mágikus ")
         say("tárgyakkal amelyeket szétszórva találhatsz meg a ")
         say("világban.")
         clear_letter()
         set_state(keresd_meg_fk)

      end
   end
   
   state keresd_meg_fk begin
      when letter begin
         send_letter("Keresd meg a kovácsot. ")
         local v=find_npc_by_vnum(9001)
         if 0==v then
         else
            target.vid("__TARGET4__", v, "A fegyverkereskedo")
         end
      end
      when button or info begin
      end
      when __TARGET4__.target.click begin
         target.delete("__TARGET4__")
         say_title(mob_name(9001)..":")
         say("Nálam és a testvéremnél tudsz venni fegyvert és ")
         say("fegyverzetet ebben a városban. Ezek alapszintű ")
         say("felszerelések. Késöbb más kis városokban fogsz ")
         say("tudni venni nagyobb szintű felszerelést vagy ")
         say("tudsz szerezni a szörnyek vagy az állatok ")
         say("elejtésével. Ugyan is nagyon sok harcos felszerelését ")
         say("Bitorolták el.")
         clear_letter()
         set_quest_state("to_2_quest", "run")
         set_state(__COMPLETE__)
      end
   end
   state __COMPLETE__ begin
   end
end

(Make.sh/py-t nyomj)

Köszi jó lett.