Register for your free account! | Forgot your password?

You last visited: Today at 09:00

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Problem mit Hochzeit

Discussion on Problem mit Hochzeit within the Metin2 Private Server forum part of the Metin2 category.

Closed Thread
 
Old   #1

 
.Namikaze's Avatar
 
elite*gold: 17
Join Date: Mar 2009
Posts: 135
Received Thanks: 30
Problem mit Hochzeit

Guten Tag,

habe derzeit ein problem mit der hochzeits quest sobald man die map betritt sollten eigentlich die npcs spawnen bei mir ist dies der fall nicht man muss immer selber die npcs spawnen.

Benutze derzeit die de Hochzeits quest

Code:
quest marriage_manage begin
    state start begin
	when oldwoman.chat.gameforge.marriage_manage._10_npcChat with not pc.is_engaged_or_married() begin
	    if not npc.lock() then
		say_title(gameforge.fortune_telling._100_sayTitle)
		say(gameforge.marriage_manage._20_say)
		return
	    end
	    if pc.level < 25 then
			say_title(gameforge.couple_ring._20_sayTitle)
			say(gameforge.marriage_manage._30_say)
			say_title(gameforge.marriage_manage._40_sayTitle)
			say_reward(gameforge.marriage_manage._50_sayReward)
				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(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._60_say)
		say_item(gameforge.marriage_manage._70_sayItem, 70301, "")
		say(gameforge.marriage_manage._80_say)
		npc.unlock()

		return
	    end

	    local m_sex = pc.get_sex()
		local m_nationality= pc.get_empire()
	    if not marriage_manage.is_equip_wedding_dress() then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._90_say)

		if m_sex==0 then
		    say_item(gameforge.marriage_manage._100_sayItem, marriage_manage.get_wedding_dress(m_sex), "")
		    say_reward(gameforge.marriage_manage._110_sayReward)
		else
		    say_item(gameforge.marriage_manage._120_sayItem, marriage_manage.get_wedding_dress(m_sex), "")
		    say_reward(gameforge.marriage_manage._130_sayReward)
		end
				npc.unlock()
		return
	    end

	    local NEED_MONEY = 1000000
	    if pc.get_money() < NEED_MONEY then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._140_say)
		say_reward(gameforge.marriage_manage._150_sayReward)
		npc.unlock()
		return
	    end

	    say_title(gameforge.couple_ring._20_sayTitle)
	    say(gameforge.marriage_manage._160_say)
	    say_reward(gameforge.marriage_manage._170_sayReward)

	    local sname = input()
	    if sname == "" then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._180_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(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._190_say)
		say_reward(string.format(gameforge.marriage_manage._200_sayReward, sname))
				npc.unlock()
		return
	    end

	    if not npc.is_near_vid(u_vid, 10) then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._210_say)
		say_reward(string.format(gameforge.marriage_manage._220_sayReward, 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_nationality= pc.get_empire()
	    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(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._230_say)
		say_reward(gameforge.marriage_manage._240_sayReward)
				npc.unlock()
		return
	    end

	    if u_sex == m_sex then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._250_say)
		npc.unlock()
		return
	    end

	    if u_nationality != m_nationality then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._260_say)
		npc.unlock()
		return
	    end
	    if u_married then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._270_say)
say_reward(string.format(gameforge.marriage_manage._280_sayReward, sname))
				npc.unlock()
		return
	    end

	    if u_level < 25 then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._290_say)
		npc.unlock()
		return
	    end

	    if m_level - u_level > 15 or u_level - m_level > 15 then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._300_say)
		npc.unlock()
		return
	    end

	    if not u_has_ring then
		if m_ring_num >= 2 then
		    say_title(gameforge.couple_ring._20_sayTitle)
		    say(gameforge.marriage_manage._310_say)
		else
		    say(gameforge.marriage_manage._320_say)
		end

		say_item(gameforge.marriage_manage._70_sayItem, 70301, "")
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._330_say)
		npc.unlock()
		return
	    end

	    if not u_wear then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._340_say)
		if u_sex==0 then
		    say_title(gameforge.couple_ring._20_sayTitle)
			say_item(gameforge.marriage_manage._100_sayItem, marriage_manage.get_wedding_dress(u_sex), "")
		    say(gameforge.marriage_manage._350_say)
		else
		    say_title(gameforge.couple_ring._20_sayTitle)
		    say_item(gameforge.marriage_manage._120_sayItem, marriage_manage.get_wedding_dress(u_sex), "")
		    say(gameforge.marriage_manage._360_say)
		end
			npc.unlock()
		return
	    end

	    local ok_sign = confirm(u_vid, string.format(gameforge.marriage_manage._365_confirm_chat,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(gameforge.couple_ring._20_sayTitle)
		    say(gameforge.marriage_manage._370_say)
		    wait()
		    setskin(NOWINDOW)
		    marriage.engage_to(u_vid)
		end
	    else
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._380_say)
	    end
	    	    npc.unlock()
	end
	
	when oldwoman.chat.gameforge.marriage_manage._390_npcChat with pc.is_engaged() begin
	    say_title(gameforge.couple_ring._20_sayTitle)
	    say(gameforge.marriage_manage._400_say)
	    wait()
	    setskin(NOWINDOW)
	    marriage.warp_to_my_marriage_map()
	end


	when 9011.chat.gameforge.marriage_manage._410_npcChat with pc.is_engaged() and marriage.in_my_wedding() begin
	    if not npc.lock() then
		say_title(gameforge.marriage_manage._420_sayTitle)
		say(gameforge.marriage_manage._430_say)
		return
	    end
	    say_title(gameforge.marriage_manage._420_sayTitle)
	    say(gameforge.marriage_manage._440_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(gameforge.marriage_manage._420_sayTitle)
			say(gameforge.marriage_manage._450_say)
			say_reward(string.format(gameforge.marriage_manage._200_sayReward, sname))
			npc.unlock()
		return
	    end

	    if not npc.is_near_vid(u_vid, 10) then
			say_title(gameforge.marriage_manage._420_sayTitle)
			say(gameforge.marriage_manage._460_say)
			say_reward(string.format(gameforge.marriage_manage._470_sayReward, sname))
			npc.unlock()
		return
	    end

	    if u_vid == m_vid then
		say_title(gameforge.marriage_manage._420_sayTitle)
		say(gameforge.marriage_manage._480_say)
		npc.unlock()
		return
	    end

	    if u_vid != marriage.find_married_vid() then
		say_title(gameforge.marriage_manage._490_sayTitle)
		say(gameforge.marriage_manage._500_say)
		npc.unlock()
		return
	    end

	    local ok_sign = confirm(u_vid, string.format(gameforge.marriage_manage._365_confirm_chat,pc.name), 30)
	    if ok_sign != CONFIRM_OK then
			say_title(gameforge.marriage_manage._490_sayTitle)
			say(gameforge.marriage_manage._510_say)
			npc.unlock()
			return
	    end
		say_title(gameforge.marriage_manage._420_sayTitle)
		say(gameforge.marriage_manage._520_say)
		marriage.set_to_marriage()
	    say(gameforge.marriage_manage._530_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.gameforge.marriage_manage._540_npcChat 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.gameforge.marriage_manage._550_npcChat 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.gameforge.marriage_manage._560_npcChat with 
	    pc.is_married() and 
	    marriage.in_my_wedding() begin
	    marriage.wedding_dark(true)
	    setskin(NOWINDOW)
	end

	when 9011.chat.gameforge.marriage_manage._570_npcChat with pc.is_married() and marriage.in_my_wedding() begin
	    marriage.wedding_snow(true)
	    setskin(NOWINDOW)
	end

	when 9011.chat.gameforge.marriage_manage._580_npcChat with pc.is_married() and marriage.in_my_wedding() begin
	    if not npc.lock() then
		say_title(gameforge.marriage_manage._490_sayTitle)
		say(gameforge.marriage_manage._590_say)
		return
	    end

	    say_title(gameforge.marriage_manage._420_sayTitle)
	    say(gameforge.marriage_manage._600_say)
	    local s =  select(gameforge.marriage_manage._610_select, gameforge.marriage_manage._620_select)
	    if s == 2 then
				local u_vid = marriage.find_married_vid()
				if u_vid == 0 then
			    say_title(gameforge.marriage_manage._420_sayTitle)
		  	  say(gameforge.marriage_manage._630_say)
			    npc.unlock()
		    return
		end
		say_title(gameforge.marriage_manage._420_sayTitle)
		say(gameforge.marriage_manage._640_say)
		local ok_sign = confirm(u_vid, gameforge.marriage_manage._650_confirm_chat, 30)
		if ok_sign == CONFIRM_OK then
		    marriage.end_wedding()
		else
		    say_title(gameforge.marriage_manage._490_sayTitle)
		    say(gameforge.marriage_manage._660_say)
		end

	    end
		npc.unlock()
	end

	
	when 	11000.chat.gameforge.marriage_manage._670_npcChat or
	    	11002.chat.gameforge.marriage_manage._680_npcChat or
		11004.chat.gameforge.marriage_manage._680_npcChat 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(gameforge.find_squareguard._30_sayTitle)
		say(gameforge.marriage_manage._690_say)
		return
	    end

	    say_title(gameforge.find_squareguard._30_sayTitle)
	    say(gameforge.marriage_manage._700_say)

	    local MONEY_NEED_FOR_ONE = 500000
	    local s =  select(gameforge.horse_upgrade2._180_select, gameforge.marriage_manage._710_select)

	    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(gameforge.marriage_manage._720_say)
		    return;
		end
		if not u_have_ring then
		    say(gameforge.marriage_manage._730_say)
		    return;
		end

		if not m_enough_money then
		    say_title(gameforge.find_squareguard._30_sayTitle)
		    say(gameforge.marriage_manage._740_say)
			say_reward(string.format(gameforge.marriage_manage._750_sayReward, MONEY_NEED_FOR_ONE/10000))
		    return;
		end
		if not u_enough_money then
		    say_title(gameforge.find_squareguard._30_sayTitle)
		    say(gameforge.marriage_manage._740_say)
		    say_reward(gameforge.marriage_manage._760_sayReward)
		    		    return;
		end
		say_title(gameforge.find_squareguard._30_sayTitle)
		say(gameforge.marriage_manage._770_say)

		local c= select(gameforge.horse_upgrade2._180_select, gameforge.marriage_manage._780_select)
		if 2 == c then
		    say_pc_name()
		    say(gameforge.marriage_manage._790_say)
		    wait()
		    say_title(gameforge.find_squareguard._30_sayTitle)
		    say(gameforge.marriage_manage._800_say)
		    say_reward(gameforge.marriage_manage._810_sayReward)
		    		    return
		end

		local ok_sign = confirm(u_vid, pc.name..gameforge.marriage_manage._815_confirm_chat, 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(gameforge.find_squareguard._30_sayTitle)
			say(gameforge.marriage_manage._820_say)
			say_reward(gameforge.marriage_manage._810_sayReward)
						marriage.remove()
		    else
			say_title(gameforge.find_squareguard._30_sayTitle)
			say(gameforge.marriage_manage._830_say)
			say_reward(gameforge.marriage_manage._840_sayReward)
					    end
		else
		    say_title(gameforge.find_squareguard._30_sayTitle)
		    say(gameforge.marriage_manage._850_say)
		    say_reward(gameforge.marriage_manage._840_sayReward)
		    		end
	    end
	end

	when 	11000.chat.gameforge.marriage_manage._860_npcChat or
	    	11002.chat.gameforge.marriage_manage._870_npcChat or
		11004.chat.gameforge.marriage_manage._870_npcChat with 
			not pc.is_married() 	and 
			pc.count_item(70302)>0
			begin
		say_title(gameforge.find_squareguard._30_sayTitle)
		say(gameforge.marriage_manage._880_say)
		say_reward(gameforge.marriage_manage._890_sayReward)
		pc.remove_item(70302)
	end

	when 	11000.chat.gameforge.marriage_manage._900_npcChat or
	    	11002.chat.gameforge.marriage_manage._900_npcChat or
		11004.chat.gameforge.marriage_manage._900_npcChat with pc.is_married() begin

	    if not marriage_manage.check_divorce_time() then
		return
	    end

	    say_title(gameforge.marriage_manage._910_sayTitle)
	    say(gameforge.marriage_manage._920_say)

	    local s =  select(gameforge.horse_upgrade2._180_select, gameforge.marriage_manage._930_select)

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

	    if pc.money < NEED_MONEY then
		say_title(gameforge.find_squareguard._30_sayTitle)
		say(gameforge.marriage_manage._940_say)
		return
	    end

	    say_title(gameforge.find_squareguard._30_sayTitle)
	    say(gameforge.marriage_manage._950_say)

	    local c =  select(gameforge.marriage_manage._960_select, gameforge.marriage_manage._970_select)

	    if c == 2 then
		say_title(gameforge.find_squareguard._30_sayTitle)
		say(gameforge.marriage_manage._980_say)
		return
	    end

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

	    marriage.remove()

	    say_title(gameforge.find_squareguard._30_sayTitle)
	    say(gameforge.marriage_manage._990_say)
	end

	when oldwoman.chat.gameforge.marriage_manage._1000_npcChat with not pc.is_engaged() begin
	    local t = marriage.get_wedding_list()
	    if table.getn(t) == 0 then
		say_title(gameforge.couple_ring._20_sayTitle)
		say(gameforge.marriage_manage._1010_say)
	    else
		local wedding_names = {}
		table.foreachi(t, function(n, p) wedding_names[n] = string.format(gameforge.marriage_manage._1015_foreach,p[3],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(gameforge.marriage_manage._420_sayTitle)
	    say(gameforge.marriage_manage._1020_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(gameforge.find_squareguard._30_sayTitle)
		say(gameforge.marriage_manage._1030_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_sex)
		if 0==pc_sex then
		    return 11901
		else
		    return 11903
		end
	end
    end
end
.Namikaze is offline  
Old 05/21/2014, 12:47   #2

 
elite*gold: 0
Join Date: Dec 2008
Posts: 2,825
Received Thanks: 1,538
Ich denke das dies in der NPC.txt in dem mapordner geregelt wird
.Colossus. is offline  
Old 05/21/2014, 12:48   #3

 
.Namikaze's Avatar
 
elite*gold: 17
Join Date: Mar 2009
Posts: 135
Received Thanks: 30
Quote:
Originally Posted by .Colossus. View Post
Ich denke das dies in der NPC.txt in dem mapordner geregelt wird
Das habe ich auch schon bereits probiert leider hat es nicht geklappt
.Namikaze is offline  
Old 05/21/2014, 13:29   #4
 
Gott'Like's Avatar
 
elite*gold: 0
Join Date: May 2014
Posts: 109
Received Thanks: 17
Versuchs mal mit dieser
PHP Code:
quest marriage_manage begin
    state start begin
        when oldwoman
.chat."Ich möchte heiraten" with not pc.is_engaged_or_married() begin
            
if not npc.lock() then
                say_title
("Alte Dame")
                 
                
say("Die Hochzeitsinseln sind zurzeit voll. Wartet")
                
say("einen Moment oder kommt später wieder!")
                return
            
end
            
if pc.level 25 then
                say_title
("Alte Dame")
                 
                
say("Du bist noch zu jung um zu heiraten.")
                
say("Die jungen Paare werden zu oft geschieden.")
                
say("Ich möchte nicht zulassen, dass du das")
                
say("durchstehen musst.")
                
say("Geh und sammle mehr Erfahrung.")                
                
say_reward("Du kannst erst ab Level 25 heiraten.")
                 
                
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
("Alte Dame")
                 
                
say("Du willst ohne einen Verlobungsring heiraten?")
                
say_item("Verlobungsring"70301"")
                
say("Besorge mir erst einen Ring, dann können")
                
say("wir über Hochzeit reden...")
                 
                
npc.unlock()
                return
            
end
            local m_sex 
pc.get_sex()
            if 
not marriage_manage.is_equip_wedding_dress() then
                say_title
("Alte Dame")
                 
                
say("Möchtest du wirklich so heiraten?")
                
say("Meistens ist eine Ehe für die Ewigkeit,")
                
say("da kannst du doch nicht so gekleidet auftreten.")
                if 
m_sex==0 then
                    say_item
("Smoking"marriage_manage.get_wedding_dress(pc.get_job()), "")
                    
say_reward("Wenn du heiraten möchtest brauchst du")
                    
say_reward("einen Smoking.")
                else
                    
say_item("Brautkleid"marriage_manage.get_wedding_dress(pc.get_job()), "")
                    
say_reward("Wenn du heiraten möchtest brauchst du")
                    
say_reward("ein Brautkleid.")
                
end
                 
                npc
.unlock()
                return
            
end
            local NEED_MONEY 
1000000
            
if pc.get_money() < NEED_MONEY then
                say_title
("Alte Dame")
                 
                
say("Hochzeiten kosten eine Menge Yang.")
                
say("Du besitzt leider nicht genug um deine")
                
say("zu finanzieren.")
                
say_reward("Du brauchst eine Millionen Yang")
                 
                
npc.unlock()
                return
            
end
            say_title
("Alte Dame")
             
            
say("Wie ich sehe bist du entschlossen.")
            
say("Wollen wir jetzt die Vorbereitungen treffen?")
            
say("Dann schreib jetzt bitte den Namen der Person,")
            
say("die du heiraten möchtest.")
            
local sname input()
            if 
sname == "" then
                say_title
("Alte Dame")
                 
                
say("Bist du so aufgeregt, dass du nichtmehr")
                
say("den Namen schreiben kannst? Probiers nochmal")
                 
                
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
("Alte Dame")
                 
                
say("Du weisst nicht den Namen deines Partners?")
                
say("Bist du sicher, dass du heiraten möchtest?")                
                
say_reward(sname.." ist nicht online")
                 
                
npc.unlock()
                return
            
end
            
if not npc.is_near_vid(u_vid10then
                say_title
("Alte Dame")
                 
                
say("Dein Partner muss in der Nähe sein,")
                
say("damit ich euch trauen kann.")                
                
say_reward(sname.." ist zu weit weg")
                 
                
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
("Alte Dame")
                 
                
say("Nicht deinen, den deines Partners!")                
                
say_reward("Du hast deinen eigenen Namen eingegeben")
                 
                
npc.unlock()
                return
            
end            
            
if u_married then
                say_title
("Alte Dame")
                 
                
say("Die Person die du heiraten möchtest ist")
                
say("bereits verheiratet. Ich glaube du musst")
                
say("dir einen neuen, unverheirateten,")
                
say("Lebensgefährten suchen.")                
                 
                
npc.unlock()
                return
            
end
            
if u_level 25 then
                say_title
("Alte Dame")
                 
                
say("Dein Partner ist noch keine 25, du kannst")
                
say("dich mit dieser Ehe strafbar machen!")
                 
                
npc.unlock()
                return
            
end
            
if m_level u_level 15 or u_level m_level 15 then
                say_title
("Alte Dame")
                 
                
say("Der Erfahrungsunterschied zwischen dir und")
                
say("dein Partner ist zu groß! So eine Ehe kann")
                
say("ich leider nicht zulassen.")                
                
say("Ihr dürft nur 15 Level unterschied haben.")               
                 
                
npc.unlock()
                return
            
end
            
if not u_has_ring then                
                say_title
("Alte Dame")
                 
                
say("Dein Partner braucht auch einen Verlobungsring.")
                
say("Kauf ihn doch in Zeichen deiner Liebe einen!")
                 
                
npc.unlock()
                return
            
end
            
if not u_wear then
                say_title
("Alte Dame")
                 
                
say("Dein Partner trägt keine Hochzeitskleidung")
                
say("Ist es dir nicht peinlich dich so mir ihn")
                
say("blicken zu lassen?")
                                 
                
npc.unlock()
                return
            
end
            local ok_sign 
confirm(u_vid"Möchtest du "..pc.name.." heiraten?"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(703011)
                    
pc.give_item2(703021)
                    
local old pc.select(u_vid)
                    
pc.removeitem(703011)
                    
pc.give_item2(703021)
                    
pc.select(old)
                    
say_title("Alte Dame")
                     
                    
say("So, ich denke jetzt haben wirs.")
                    
say("Ich werde euch jetzt auf die Hochzeits-")
                    
say("insel schicken. Ich wünsch euch eine lange")
                    
say("und glückliche Ehe. Gratulation!")                    
                     
                    
wait()
                    
setskin(NOWINDOW)
                    
marriage.engage_to(u_vid)
                
end
            
else
                
say_title("Alte Dame")
                 
                
say("Dein Partner möchte dich nicht heiraten.")
                
say("Klärt es lieber untereinander ab.")
                 
            
end
             
            npc
.unlock()
        
end
        when oldwoman
.chat."Zu meiner Hochzeit" with pc.is_engaged() begin
            say_title
("Alte Dame")
             
            
say("Warum bist du noch hier?")
            
say("Dein Partner vermisst dich!")
            
say("Ich begleite dich zu ihm.")
             
            
wait()
            
setskin(NOWINDOW)
            
marriage.warp_to_my_marriage_map()
        
end
        when 9011.chat
."Eheschließung" with pc.is_engaged() and marriage.in_my_wedding() begin
            
if not npc.lock() then
                say_title
("Hochzeitshelferin")
                 
                
say("Ich rede gerade mit deinen Partner,")
                
say("einen Moment bitte.")
                 
                return
            
end
            say_title
("Hochzeitshelferin")
             
            
say("Ich werde eure Ehe offiziel eintragen.")
            
say("Gib erstmal den Namen deines Partners")
            
say("ein.")
            
local sname input()
            
local u_vid find_pc_by_name(sname)
            
local m_vid pc.get_vid()
            if 
u_vid == 0 then
                say_title
("Hochzeitshelferin")
                 
                
say("Dieser Name ist nicht registriet.")
                
say("Möchtest du deine Eingabe nochmal")
                
say("überprüfen?")                
                
say_reward(sname.." ist nicht online")
                 
                
npc.unlock()
                return
            
end
            
if not npc.is_near_vid(u_vid10then
                say_title
("Hochzeitshelferin")
                 
                
say("Du musst deinen Partner herbringen.")
                
say("Ich brauch ihn um den Ehebund zu")
                
say("schließen.")              
                 
                
npc.unlock()
                return
            
end
            
if u_vid == m_vid then
                say_title
("Hochzeitshelferin")
                 
                
say("Du sollst nicht deinen, sondern den deines")                
                
say("Partners schreiben.")
                 
                
npc.unlock()
                return
            
end
            
if u_vid != marriage.find_married_vid() then
                say_title
("Hochzeitshelferin")                
                
say("Das ist nicht die Person, die du")
                
say("ursprünglich heiraten wolltest.")
                 
                
npc.unlock()
                return
            
end
            local ok_sign 
confirm(u_vid"Möchtest du "..pc.name.." heiraten?"30)
            if 
ok_sign != CONFIRM_OK then
                say_title
("Hochzeitshelferin")
                 
                
say("Dein Partner ist noch nicht für die")
                
say("Eheschließung bereit.")
                 
                
npc.unlock()
                return
            
end
            say_title
("Hochzeitshelferin")
             
            
say("Ok, alles in Ordnung. Wir können anfangen.")
            
marriage.set_to_marriage()            
            
npc.unlock()
        
end
        
function give_wedding_gift()
            
local male_item = {710727107371074}
            
local female_item = {710697107071071}
            if 
pc.get_sex() == MALE then
                pc
.give_item2(male_item[number(13)], 1)
            else
                
pc.give_item2(female_item[number(13)], 1)
            
end
        end

        when 9011.chat
."Hochzeitsmusik abspielen" 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
."Hochzeitsmusik beenden" 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
."Nacht" with
            pc
.is_married() and
            
marriage.in_my_wedding() begin
            marriage
.wedding_dark(true)
            
setskin(NOWINDOW)
        
end

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

        when 9011.chat
."Hochzeit beenden" with pc.is_married() and marriage.in_my_wedding() begin
            
if not npc.lock() then
                say_title
("Hochzeitshelferin")
                 
                
say("Warte einen Moment, ich rede gerade mit")
                
say("deinen Partner.")
                 
                return
            
end
            say_title
("Hochzeitshelferin")
             
            
say("Möchtest du die Party abbrechen?")
             
            
local s select("Ja","Nein")
            if 
== 1 then
                local u_vid 
marriage.find_married_vid()                
                
say_title("Hochzeitshelferin")
                 
                
say("Wir müssen auf deinen Partner warten.")
                
say("Es liegt jetzt an ihn..")
                 
                
local ok_sign confirm(u_vid"Möchtest du die Hochzeit beenden? "30)
                if 
ok_sign == CONFIRM_OK then
                    marriage
.end_wedding()
                else
                    
say_title("Hochzeitshelferin")
                     
                    
say("Dein Partner möchte noch weiterfeiern!")
                     
                
end

                npc
.unlock()
            
end
        end


        when 11000.chat
."Scheidung einreichen" or 11002.chat."Scheidung einreichen" or 11004.chat."Scheidung einreichen " 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 == or not npc.is_near_vid(u_vid10then
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Ohne deinen Partner kannst du auf rechtlichen")
                
say("Wege nicht geschieden werden.")
                 
                return
            
end

            say_title
("Wächter des Dorfplatzes")
             
            
say("Für eine rechtlich Scheidung brauch ich")
            
say("500.000 Yang und eine Einverständniss")
            
say("von deinen Partner.")
            
say("Möchtest du dich wirklich Scheiden lassen?")
             
            
local MONEY_NEED_FOR_ONE 500000
            local s 
select("Ja""Nein")
            if 
== 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
("Ich brauche den Ehering.")
                    return
                
end
                
if not u_have_ring then
                    say
("Ich brauche den Ehering deines Partners.")
                    return
                
end
                
if not m_enough_money then
                    say_title
("Wächter des Dorfplatzes")
                     
                    
say("Du hast nicht genug Yang für die Scheidung.")
                     
                    return
                
end
                
if not u_enough_money then
                    say_title
("Wächter des Dorfplatzes")
                     
                    
say("Du hast nicht genug Yang für die Scheidung.")
                     
                    return
                
end
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Möchtet ihr euch wirklich scheiden lassen?")
                
say("Vielleicht ist es einfach nur ein Missverständniss.")                
                
say("Wollt ihr es wirklich?")
                 
                
local c=select("Ja""Ich hab meine Meinung geändert")
                if 
== c then
                    say_pc_name
()
                     
                    
say("Ich hab meine Meinung geändert")
                    
say("Ich will doch nicht geschieden werden")
                     
                    
wait()
                    
say_title("Wächter des Dorfplatzes")
                     
                    
say("Es ist das beste für euch..")
                    
say("Ich wünsch euch noch eine lange und")
                    
say("glückliche Ehe.")
                    
say_reward("Die Scheidung wurde anuliert.")
                     
                    return
                
end
                local ok_sign 
confirm(u_vid"Möchtest du dich von "..pc.name.." scheiden lassen?"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(703021)
                        
pc.change_money(-MONEY_NEED_FOR_ONE)
                        
local old pc.select(u_vid)
                        
pc.removeitem(703021)
                        
pc.change_money(-MONEY_NEED_FOR_ONE)
                        
pc.select(old)
                        
say_title("Wächter des Dorfplatzes")
                         
                        
say("Die Scheidung ist vollbracht.")
                        
say("Du bist nun wieder ein freier Mensch.")
                        
say("Die Scheidung kann nichtmehr rückgängig")
                        
say("gemacht werden.")
                         
                        
marriage.remove()
                    else
                        
say_title("Wächter des Dorfplatzes")
                         
                        
say("Eure Unterlagen sind nicht komplett.")
                        
say("Kommt später wieder.")                        
                         
                    
end
                
else
                    
say_title("Wächter des Dorfplatzes")
                     
                    
say("Dein Partner möchte sich nicht Scheiden")
                    
say("lassen. Finde zuerst einen Grund.")                    
                     
                
end
            end
        end       
        when 11000.chat
."Einseitige Scheidung einreichen" or 11002.chat."Einseitige Scheidung einreichen" or 11004.chat."Einseitige Scheidung einreichen" with pc.is_married() begin

            
if not marriage_manage.check_divorce_time() then
                
return
            
end

            say_title
("Wächter des Dorfplatzes")
             
            
say("Du brauchst eine Millionen Yang um dich")
            
say("sofort scheiden zu lassen. Willst du es")
            
say("trotzdem machen?")
             
            
local s select("Ja""Nein")

            
local NEED_MONEY 1000000
            
if == 2 then
                
return
            
end

            
if pc.money NEED_MONEY then
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Du hast nicht genug Yang für die")
                
say("einseitige Scheidung.")
                 
                return
            
end

            say_title
("Wächter des Dorfplatzes")
             
            
say("Möchtest du es wirklich machen?")
            
say("Denk nochmal drüber nach..")

            
local c select("Ja, ich will","Nein, doch nicht")

            if 
== 2 then
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Na dann,")
                
say("Es ist besser so. Falls doch komm")
                
say("wieder zurück. Sei dir dann aber wirklich")
                
say("sicher dabei!")
                 
                return
            
end
            pc
.removeitem(703021)
            
pc.change_gold(-NEED_MONEY)
            
marriage.remove()
            
say_title("Wächter des Dorfplatzes")
             
            
say("Wenn du dir ganz sicher bist..")
            
say("dann mal los! Ab jetzt bist du wieder")
            
say("ein freier Mensch.")
             
        
end
        when oldwoman
.chat."Liste der Hochzeiten" with not pc.is_engaged() begin
            local t 
marriage.get_wedding_list()
            if 
table.getn(t) == 0 then
                say_title
("Alte Dame")
                 
                
say("Momentan finden keine Hochzeiten statt...")
                 
            else
                -- 
chat(table.getn(t))
                
local wedding_names = {}
                
table.foreachi(t, function(npwedding_names[n] = p[3].." Hochzeit "..p[4].." von " end)
                
wedding_names[table.getn(t)+1] = locale.confirm
                local s 
select_table(wedding_names)

                if 
!= table.getn(wedding_namesthen
                    marriage
.join_wedding(t[s][1], t[s][2])
                
end
            end
        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
("Guardian of the village:")
                 
                
say("The ink is not even dry yet!")
                
say("Give yourself more time.")
                 
                return 
false
            end

            
return true
        end

        
function is_equip_wedding_dress()
            
local a pc.get_armor()
            return 
>= 11901 and <= 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 
Gott'Like is offline  
Thanks
1 User
Old 05/21/2014, 13:47   #5

 
.Namikaze's Avatar
 
elite*gold: 17
Join Date: Mar 2009
Posts: 135
Received Thanks: 30
Quote:
Originally Posted by Gott'Like View Post
Versuchs mal mit dieser
PHP Code:
quest marriage_manage begin
    state start begin
        when oldwoman
.chat."Ich möchte heiraten" with not pc.is_engaged_or_married() begin
            
if not npc.lock() then
                say_title
("Alte Dame")
                 
                
say("Die Hochzeitsinseln sind zurzeit voll. Wartet")
                
say("einen Moment oder kommt später wieder!")
                return
            
end
            
if pc.level 25 then
                say_title
("Alte Dame")
                 
                
say("Du bist noch zu jung um zu heiraten.")
                
say("Die jungen Paare werden zu oft geschieden.")
                
say("Ich möchte nicht zulassen, dass du das")
                
say("durchstehen musst.")
                
say("Geh und sammle mehr Erfahrung.")                
                
say_reward("Du kannst erst ab Level 25 heiraten.")
                 
                
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
("Alte Dame")
                 
                
say("Du willst ohne einen Verlobungsring heiraten?")
                
say_item("Verlobungsring"70301"")
                
say("Besorge mir erst einen Ring, dann können")
                
say("wir über Hochzeit reden...")
                 
                
npc.unlock()
                return
            
end
            local m_sex 
pc.get_sex()
            if 
not marriage_manage.is_equip_wedding_dress() then
                say_title
("Alte Dame")
                 
                
say("Möchtest du wirklich so heiraten?")
                
say("Meistens ist eine Ehe für die Ewigkeit,")
                
say("da kannst du doch nicht so gekleidet auftreten.")
                if 
m_sex==0 then
                    say_item
("Smoking"marriage_manage.get_wedding_dress(pc.get_job()), "")
                    
say_reward("Wenn du heiraten möchtest brauchst du")
                    
say_reward("einen Smoking.")
                else
                    
say_item("Brautkleid"marriage_manage.get_wedding_dress(pc.get_job()), "")
                    
say_reward("Wenn du heiraten möchtest brauchst du")
                    
say_reward("ein Brautkleid.")
                
end
                 
                npc
.unlock()
                return
            
end
            local NEED_MONEY 
1000000
            
if pc.get_money() < NEED_MONEY then
                say_title
("Alte Dame")
                 
                
say("Hochzeiten kosten eine Menge Yang.")
                
say("Du besitzt leider nicht genug um deine")
                
say("zu finanzieren.")
                
say_reward("Du brauchst eine Millionen Yang")
                 
                
npc.unlock()
                return
            
end
            say_title
("Alte Dame")
             
            
say("Wie ich sehe bist du entschlossen.")
            
say("Wollen wir jetzt die Vorbereitungen treffen?")
            
say("Dann schreib jetzt bitte den Namen der Person,")
            
say("die du heiraten möchtest.")
            
local sname input()
            if 
sname == "" then
                say_title
("Alte Dame")
                 
                
say("Bist du so aufgeregt, dass du nichtmehr")
                
say("den Namen schreiben kannst? Probiers nochmal")
                 
                
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
("Alte Dame")
                 
                
say("Du weisst nicht den Namen deines Partners?")
                
say("Bist du sicher, dass du heiraten möchtest?")                
                
say_reward(sname.." ist nicht online")
                 
                
npc.unlock()
                return
            
end
            
if not npc.is_near_vid(u_vid10then
                say_title
("Alte Dame")
                 
                
say("Dein Partner muss in der Nähe sein,")
                
say("damit ich euch trauen kann.")                
                
say_reward(sname.." ist zu weit weg")
                 
                
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
("Alte Dame")
                 
                
say("Nicht deinen, den deines Partners!")                
                
say_reward("Du hast deinen eigenen Namen eingegeben")
                 
                
npc.unlock()
                return
            
end            
            
if u_married then
                say_title
("Alte Dame")
                 
                
say("Die Person die du heiraten möchtest ist")
                
say("bereits verheiratet. Ich glaube du musst")
                
say("dir einen neuen, unverheirateten,")
                
say("Lebensgefährten suchen.")                
                 
                
npc.unlock()
                return
            
end
            
if u_level 25 then
                say_title
("Alte Dame")
                 
                
say("Dein Partner ist noch keine 25, du kannst")
                
say("dich mit dieser Ehe strafbar machen!")
                 
                
npc.unlock()
                return
            
end
            
if m_level u_level 15 or u_level m_level 15 then
                say_title
("Alte Dame")
                 
                
say("Der Erfahrungsunterschied zwischen dir und")
                
say("dein Partner ist zu groß! So eine Ehe kann")
                
say("ich leider nicht zulassen.")                
                
say("Ihr dürft nur 15 Level unterschied haben.")               
                 
                
npc.unlock()
                return
            
end
            
if not u_has_ring then                
                say_title
("Alte Dame")
                 
                
say("Dein Partner braucht auch einen Verlobungsring.")
                
say("Kauf ihn doch in Zeichen deiner Liebe einen!")
                 
                
npc.unlock()
                return
            
end
            
if not u_wear then
                say_title
("Alte Dame")
                 
                
say("Dein Partner trägt keine Hochzeitskleidung")
                
say("Ist es dir nicht peinlich dich so mir ihn")
                
say("blicken zu lassen?")
                                 
                
npc.unlock()
                return
            
end
            local ok_sign 
confirm(u_vid"Möchtest du "..pc.name.." heiraten?"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(703011)
                    
pc.give_item2(703021)
                    
local old pc.select(u_vid)
                    
pc.removeitem(703011)
                    
pc.give_item2(703021)
                    
pc.select(old)
                    
say_title("Alte Dame")
                     
                    
say("So, ich denke jetzt haben wirs.")
                    
say("Ich werde euch jetzt auf die Hochzeits-")
                    
say("insel schicken. Ich wünsch euch eine lange")
                    
say("und glückliche Ehe. Gratulation!")                    
                     
                    
wait()
                    
setskin(NOWINDOW)
                    
marriage.engage_to(u_vid)
                
end
            
else
                
say_title("Alte Dame")
                 
                
say("Dein Partner möchte dich nicht heiraten.")
                
say("Klärt es lieber untereinander ab.")
                 
            
end
             
            npc
.unlock()
        
end
        when oldwoman
.chat."Zu meiner Hochzeit" with pc.is_engaged() begin
            say_title
("Alte Dame")
             
            
say("Warum bist du noch hier?")
            
say("Dein Partner vermisst dich!")
            
say("Ich begleite dich zu ihm.")
             
            
wait()
            
setskin(NOWINDOW)
            
marriage.warp_to_my_marriage_map()
        
end
        when 9011.chat
."Eheschließung" with pc.is_engaged() and marriage.in_my_wedding() begin
            
if not npc.lock() then
                say_title
("Hochzeitshelferin")
                 
                
say("Ich rede gerade mit deinen Partner,")
                
say("einen Moment bitte.")
                 
                return
            
end
            say_title
("Hochzeitshelferin")
             
            
say("Ich werde eure Ehe offiziel eintragen.")
            
say("Gib erstmal den Namen deines Partners")
            
say("ein.")
            
local sname input()
            
local u_vid find_pc_by_name(sname)
            
local m_vid pc.get_vid()
            if 
u_vid == 0 then
                say_title
("Hochzeitshelferin")
                 
                
say("Dieser Name ist nicht registriet.")
                
say("Möchtest du deine Eingabe nochmal")
                
say("überprüfen?")                
                
say_reward(sname.." ist nicht online")
                 
                
npc.unlock()
                return
            
end
            
if not npc.is_near_vid(u_vid10then
                say_title
("Hochzeitshelferin")
                 
                
say("Du musst deinen Partner herbringen.")
                
say("Ich brauch ihn um den Ehebund zu")
                
say("schließen.")              
                 
                
npc.unlock()
                return
            
end
            
if u_vid == m_vid then
                say_title
("Hochzeitshelferin")
                 
                
say("Du sollst nicht deinen, sondern den deines")                
                
say("Partners schreiben.")
                 
                
npc.unlock()
                return
            
end
            
if u_vid != marriage.find_married_vid() then
                say_title
("Hochzeitshelferin")                
                
say("Das ist nicht die Person, die du")
                
say("ursprünglich heiraten wolltest.")
                 
                
npc.unlock()
                return
            
end
            local ok_sign 
confirm(u_vid"Möchtest du "..pc.name.." heiraten?"30)
            if 
ok_sign != CONFIRM_OK then
                say_title
("Hochzeitshelferin")
                 
                
say("Dein Partner ist noch nicht für die")
                
say("Eheschließung bereit.")
                 
                
npc.unlock()
                return
            
end
            say_title
("Hochzeitshelferin")
             
            
say("Ok, alles in Ordnung. Wir können anfangen.")
            
marriage.set_to_marriage()            
            
npc.unlock()
        
end
        
function give_wedding_gift()
            
local male_item = {710727107371074}
            
local female_item = {710697107071071}
            if 
pc.get_sex() == MALE then
                pc
.give_item2(male_item[number(13)], 1)
            else
                
pc.give_item2(female_item[number(13)], 1)
            
end
        end

        when 9011.chat
."Hochzeitsmusik abspielen" 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
."Hochzeitsmusik beenden" 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
."Nacht" with
            pc
.is_married() and
            
marriage.in_my_wedding() begin
            marriage
.wedding_dark(true)
            
setskin(NOWINDOW)
        
end

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

        when 9011.chat
."Hochzeit beenden" with pc.is_married() and marriage.in_my_wedding() begin
            
if not npc.lock() then
                say_title
("Hochzeitshelferin")
                 
                
say("Warte einen Moment, ich rede gerade mit")
                
say("deinen Partner.")
                 
                return
            
end
            say_title
("Hochzeitshelferin")
             
            
say("Möchtest du die Party abbrechen?")
             
            
local s select("Ja","Nein")
            if 
== 1 then
                local u_vid 
marriage.find_married_vid()                
                
say_title("Hochzeitshelferin")
                 
                
say("Wir müssen auf deinen Partner warten.")
                
say("Es liegt jetzt an ihn..")
                 
                
local ok_sign confirm(u_vid"Möchtest du die Hochzeit beenden? "30)
                if 
ok_sign == CONFIRM_OK then
                    marriage
.end_wedding()
                else
                    
say_title("Hochzeitshelferin")
                     
                    
say("Dein Partner möchte noch weiterfeiern!")
                     
                
end

                npc
.unlock()
            
end
        end


        when 11000.chat
."Scheidung einreichen" or 11002.chat."Scheidung einreichen" or 11004.chat."Scheidung einreichen " 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 == or not npc.is_near_vid(u_vid10then
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Ohne deinen Partner kannst du auf rechtlichen")
                
say("Wege nicht geschieden werden.")
                 
                return
            
end

            say_title
("Wächter des Dorfplatzes")
             
            
say("Für eine rechtlich Scheidung brauch ich")
            
say("500.000 Yang und eine Einverständniss")
            
say("von deinen Partner.")
            
say("Möchtest du dich wirklich Scheiden lassen?")
             
            
local MONEY_NEED_FOR_ONE 500000
            local s 
select("Ja""Nein")
            if 
== 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
("Ich brauche den Ehering.")
                    return
                
end
                
if not u_have_ring then
                    say
("Ich brauche den Ehering deines Partners.")
                    return
                
end
                
if not m_enough_money then
                    say_title
("Wächter des Dorfplatzes")
                     
                    
say("Du hast nicht genug Yang für die Scheidung.")
                     
                    return
                
end
                
if not u_enough_money then
                    say_title
("Wächter des Dorfplatzes")
                     
                    
say("Du hast nicht genug Yang für die Scheidung.")
                     
                    return
                
end
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Möchtet ihr euch wirklich scheiden lassen?")
                
say("Vielleicht ist es einfach nur ein Missverständniss.")                
                
say("Wollt ihr es wirklich?")
                 
                
local c=select("Ja""Ich hab meine Meinung geändert")
                if 
== c then
                    say_pc_name
()
                     
                    
say("Ich hab meine Meinung geändert")
                    
say("Ich will doch nicht geschieden werden")
                     
                    
wait()
                    
say_title("Wächter des Dorfplatzes")
                     
                    
say("Es ist das beste für euch..")
                    
say("Ich wünsch euch noch eine lange und")
                    
say("glückliche Ehe.")
                    
say_reward("Die Scheidung wurde anuliert.")
                     
                    return
                
end
                local ok_sign 
confirm(u_vid"Möchtest du dich von "..pc.name.." scheiden lassen?"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(703021)
                        
pc.change_money(-MONEY_NEED_FOR_ONE)
                        
local old pc.select(u_vid)
                        
pc.removeitem(703021)
                        
pc.change_money(-MONEY_NEED_FOR_ONE)
                        
pc.select(old)
                        
say_title("Wächter des Dorfplatzes")
                         
                        
say("Die Scheidung ist vollbracht.")
                        
say("Du bist nun wieder ein freier Mensch.")
                        
say("Die Scheidung kann nichtmehr rückgängig")
                        
say("gemacht werden.")
                         
                        
marriage.remove()
                    else
                        
say_title("Wächter des Dorfplatzes")
                         
                        
say("Eure Unterlagen sind nicht komplett.")
                        
say("Kommt später wieder.")                        
                         
                    
end
                
else
                    
say_title("Wächter des Dorfplatzes")
                     
                    
say("Dein Partner möchte sich nicht Scheiden")
                    
say("lassen. Finde zuerst einen Grund.")                    
                     
                
end
            end
        end       
        when 11000.chat
."Einseitige Scheidung einreichen" or 11002.chat."Einseitige Scheidung einreichen" or 11004.chat."Einseitige Scheidung einreichen" with pc.is_married() begin

            
if not marriage_manage.check_divorce_time() then
                
return
            
end

            say_title
("Wächter des Dorfplatzes")
             
            
say("Du brauchst eine Millionen Yang um dich")
            
say("sofort scheiden zu lassen. Willst du es")
            
say("trotzdem machen?")
             
            
local s select("Ja""Nein")

            
local NEED_MONEY 1000000
            
if == 2 then
                
return
            
end

            
if pc.money NEED_MONEY then
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Du hast nicht genug Yang für die")
                
say("einseitige Scheidung.")
                 
                return
            
end

            say_title
("Wächter des Dorfplatzes")
             
            
say("Möchtest du es wirklich machen?")
            
say("Denk nochmal drüber nach..")

            
local c select("Ja, ich will","Nein, doch nicht")

            if 
== 2 then
                say_title
("Wächter des Dorfplatzes")
                 
                
say("Na dann,")
                
say("Es ist besser so. Falls doch komm")
                
say("wieder zurück. Sei dir dann aber wirklich")
                
say("sicher dabei!")
                 
                return
            
end
            pc
.removeitem(703021)
            
pc.change_gold(-NEED_MONEY)
            
marriage.remove()
            
say_title("Wächter des Dorfplatzes")
             
            
say("Wenn du dir ganz sicher bist..")
            
say("dann mal los! Ab jetzt bist du wieder")
            
say("ein freier Mensch.")
             
        
end
        when oldwoman
.chat."Liste der Hochzeiten" with not pc.is_engaged() begin
            local t 
marriage.get_wedding_list()
            if 
table.getn(t) == 0 then
                say_title
("Alte Dame")
                 
                
say("Momentan finden keine Hochzeiten statt...")
                 
            else
                -- 
chat(table.getn(t))
                
local wedding_names = {}
                
table.foreachi(t, function(npwedding_names[n] = p[3].." Hochzeit "..p[4].." von " end)
                
wedding_names[table.getn(t)+1] = locale.confirm
                local s 
select_table(wedding_names)

                if 
!= table.getn(wedding_namesthen
                    marriage
.join_wedding(t[s][1], t[s][2])
                
end
            end
        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
("Guardian of the village:")
                 
                
say("The ink is not even dry yet!")
                
say("Give yourself more time.")
                 
                return 
false
            end

            
return true
        end

        
function is_equip_wedding_dress()
            
local a pc.get_armor()
            return 
>= 11901 and <= 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 
Code:
SYSERR: May 21 13:51:29 :: regen_do: SYSTEM: regen_do: locale/germany/map/metin2_map_wedding_01/npc.txt: file not found
SYSERR: May 21 13:51:29 :: __CreateWeddingMap: CreateWeddingMap(pid1=59095, pid2=59096) / regen_do(fileName=locale/germany/map/metin2_map_wedding_01/npc.txt, mapIndex=810000, basePos=(819200, 0)) FAILED
denke mal der fehler erklärt sich jetzt von selbst^^.. man darf die map nicht woanders haben sprich /map/Hochzeit sonder direkt im map ordner sowie ich das jetzt sehe.

Fehler ist nun behoben

#closerequest
.Namikaze is offline  
Old 05/21/2014, 20:29   #6
 
lfcmaus's Avatar
 
elite*gold: 205
Join Date: Jun 2010
Posts: 5,334
Received Thanks: 2,510
wo die map im clienten liegt ist egal im serververzeichnis sollte sie im orginalen pfad liegen sowie auf dem orginalen index
die npc stehen standardmaäßig dank eingtragungen in der npc.txt auch auf der map und werden normal nicht gespawnt das ist aber im grunde egal
lfcmaus is offline  
Closed Thread


Similar Threads Similar Threads
Hochzeit Problem [Buggy]
01/11/2014 - Metin2 Private Server - 7 Replies
Guten Abend E*PvP Community, ich habe ein Problem mit den Invoice Files (Game.rev. 2089m). Ich wollte soeben die Hochzeit testen, jedoch musste ich feststellen, dass diese verbuggt ist. Folgendes hab ich schon überprüft:
Problem [Ingame Hochzeit]
04/20/2010 - Metin2 Private Server - 5 Replies
Aloha, da eben einige spieler auf meinem Root "Amnesia-World2" heiraten wollten, könnten sie das nicht. Als Fehlermeldung steht dort "Der Ehepartner befindet sich im falschen Reich, obwohl sich beide partner, im gleichem Reich befinden. Hat von euch jmd, evntl. ne Quest datei, die nicht verbuggt ist?. mfg.
Longjuyt2 Hochzeit Problem
07/21/2009 - Metin2 Private Server - 1 Replies
Hallo. Wenn ich bei der alten Frau auf das 2. von oben klicke dann muss ich den Namen eingeben und dann kommen nur solche chinesischen Zeichen wo in der Mitte eine 15 steht. Was stimmt nicht?



All times are GMT +1. The time now is 09:01.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.