Blue Dragon Problem

[united7170]

Hello guys, i have this quest:

 Spoiler

quest dragon_lair_access begin
	state start begin

		function get_settings()
			local settings = {}
			settings.cooldown_time = 300
			settings.group_time = 300
			settings.access_item = 30179
			settings.dragon_vnum = 2493

			settings.spawn = {}
			settings.spawn.x = 181
			settings.spawn.y = 173

			settings.warp_in = {}
			settings.warp_in.first = {}
			settings.warp_in.last = {}
			settings.warp_in.first.x = 843677
			settings.warp_in.first.y = 1066206
			settings.warp_in.last.x = 844027
			settings.warp_in.last.y = 1067599

			settings.warp_out = {}
			settings.warp_out.first = {}
			settings.warp_out.last = {}
			settings.warp_out.first.x = 9200
			settings.warp_out.first.y = 1206400
			settings.warp_out.last.x = 10900
			settings.warp_out.last.y = 1209100

			settings.room_area = {}
			settings.room_area.first = {}
			settings.room_area.last = {}
			settings.room_area.first.x = 833000
			settings.room_area.first.y = 1062500
			settings.room_area.last.x = 844100
			settings.room_area.last.y = 1071500

			settings.access_item_amount = game.get_event_flag("dragon_lair_amount")
			if (settings.access_item_amount == 0) then
				settings.access_item_amount = 3
			elseif (settings.access_item_amount == -1) then
				settings.access_item_amount = 0
			end

			return settings
		end

		function get_random_point(area_coordinates)
			return math.random(area_coordinates.first.x, area_coordinates.last.x), math.random(area_coordinates.first.y, area_coordinates.last.y)
		end

		function warp_to_lair()
			local settings = dragon_lair_access.get_settings()
			local x, y = dragon_lair_access.get_random_point(settings.warp_in)
			char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' WARPTOLAIR: x:'.. x ..', y:' .. y)
			pc.warp(x,y)
		end
		function warp_from_lair()
			local settings = dragon_lair_access.get_settings()
			local x, y = dragon_lair_access.get_random_point(settings.warp_out)
			char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' WARPFROMLAIR: x:'.. x ..', y:' .. y)
			pc.warp(x,y)
		end

		function warp_all_from_lair()
			local settings = dragon_lair_access.get_settings()
			warp_all_in_area_to_area(settings.room_area.first.x, settings.room_area.first.y, settings.room_area.last.x, settings.room_area.last.y, settings.warp_out.first.x, settings.warp_out.first.y, settings.warp_out.last.x, settings.warp_out.last.y)
			game.set_event_flag("dragon_lair_alive", 0)
			char_log(0, 'LAIR', 'WARP ALL')
		end
		function get_time_remaining()
			local settings = dragon_lair_access.get_settings()
			return (game.get_event_flag("dragon_lair_time") + settings.cooldown_time - get_global_time())
		end

		function give_item_to_ghost()
			local settings = dragon_lair_access.get_settings()
			say_title(mob_name(30121))
			say("Te voi duce direct la peºtera Dragonului, [ENTER]atunci când doreºti.")
			say(settings.access_item_amount.."x: ")
			say_item_vnum(settings.access_item)
			local give_item = select("Du-mã acum! ", "Închide")
			if give_item == 1 then
				pc.remove_item(settings.access_item, settings.access_item_amount)
				char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' GIVE ITEM')
				return true
			else
				return false
			end
		end

		function show_time_remaining(time_remaining)
			q.set_title("Învinge Dragonul Albastru")
			send_letter_ex("Învinge Dragonul Albastru", "golden,ex", "scroll_open_golden.tga")
			q.set_clock("Timp rãmas: ", time_remaining)
			timer("dragon_lair_timer", time_remaining)
			notice_multiline(string.format("Ai la dispoziþie %d minute pentru [ENTER]a învinge Dragonul Albastru.", time_remaining / 60), notice)
			q.start()
		end

		when enter or login begin
			pc.setqf("is_leader", 0)
			q.done()
			if pc.get_map_index() == 208 and not pc.is_gm() then
				dragon_lair_access.warp_from_lair()
			end
		end

		when blue_dragon_timer.server_timer begin
			game.set_event_flag("dragon_lair_timer_used", 0)
			if game.get_event_flag("dragon_lair_alive") == 1 then
				notice_multiline("Dragonul Albastru este încã în viaþã!", notice_all)
			else
				notice_multiline("Dragonul Albastru s-a întors!", notice_all)
			end
			dragon_lair_access.warp_all_from_lair()
		end
		when 30121.chat."Vrei sã omori Dragonul?" with pc.get_map_index() != 208 begin
			local starttime = game.get_event_flag("dragon_lair_time")
			local current_time = get_global_time()
			local settings = dragon_lair_access.get_settings()
			local time_remaining = dragon_lair_access.get_time_remaining()
			if pc.count_item(settings.access_item) >= settings.access_item_amount then
				if starttime + settings.group_time >= current_time then
					local password_input;
					repeat
						say_title(mob_name(30121))
						say("Spune-mi numãrul secret. Altfel nu te pot lãsa[ENTER]sã intrii.")
						password_input = tonumber(input())
						if password_input != game.get_event_flag("dragon_lair_password") then
							say_title(mob_name(30121))
							say("Acest numãr nu este corect!")
							local again = select("Încearcã iar.", "Închide")
							if again == 2 then
								return
							end
						end
					until password_input == game.get_event_flag("dragon_lair_password")
					if not dragon_lair_access.give_item_to_ghost() then
						return
					end
					
					pc.setqf("time", starttime)
					dragon_lair_access.warp_to_lair()
					set_state(kill_dragon)
				elseif time_remaining < 0 and npc.lock() then
					say_title(mob_name(30121))
					say("Tu eºti prima persoanã care solicitã intrarea[ENTER]în Templul Dragonului. Vã voi lãsa sã intraþi dacã[ENTER] aveþi cheia rãsucitã. Dar mai întâi trebuie [ENTER]sã setaþi o parolã pentru ai lãsa pe colegii dumneavoastrã[ENTER] sã intre în camerã, în urmãtoarele 5 minute. [ENTER]Amintiþi-vã deasemenea cã puterea cheilor dureazã doar 60 de minute.")
					local abort = select("Sunt pregãtit!", "Închide")

					if abort == 2 then
						npc.unlock()
						return
					end
					local password_number;
					repeat
						say_title(mob_name(30121))
						say("Spune-mi acum codul secret.")
						password_number = tonumber(input())
						local again;
						if type(password_number) != 'number' then
							say_title(mob_name(30121))
							say("Codul poate conþine numai cifre!")
							again = select("Încearcã iar. ", "Închide")
							if again == 2 then
								npc.unlock()
								return
							end
						end
					until type(password_number) == 'number'

					if not dragon_lair_access.give_item_to_ghost() then
						npc.unlock()
						return
					end
					if dragon_lair_access.get_time_remaining() > 0 then
						pc.give_item2(settings.access_item, settings.access_item_amount)
						npc.unlock()
						say_title(mob_name(30121))
						say("Un alt grup a încercat sã-l omoare pe dragon.[ENTER] Trebuie sã aºteptaþi un timp pânã când puteþi[ENTER]intra în Templul Dragonului!")
						return
					end
					
					pc.setqf("password", password_number)
					timer("dragon_lair_warptimer", pc.get_channel_id()*2)
					
					npc.unlock()
				else
					say_title(mob_name(30121))
					say("Un alt grup a încercat sã-l omoare pe dragon.[ENTER] Trebuie sã aºteptaþi un timp pânã când puteþi[ENTER]intra în Templul Dragonului!")
					return
				end

			else
				say_title(mob_name(30121))
				say("Nu ai destule chei! Pentru a activa portalul am nevoie de ele.")
				say("Te-ai alãturat liderilor rãi Yonghan ºi Huashin.")
				say(settings.access_item_amount.."x: ")
				say_item_vnum(settings.access_item)
				return
			end
end
		when 30121.chat."Vreau sã plec de aici!" with pc.get_map_index() == 208 begin
			say_title(mob_name(30121))
			say("Te duc înapoi la intrarea în peºterã?")
			local warp = select("Da", "Nu")
			if warp == 1 then
				dragon_lair_access.warp_from_lair()
				set_state(start)
			end
		end
		
		when dragon_lair_warptimer.timer begin
			local settings = dragon_lair_access.get_settings()
			if dragon_lair_access.get_time_remaining() < 0 then
				local starttime = get_global_time()
				game.set_event_flag("dragon_lair_time", starttime)
				char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' SET STARTTIME: ' .. starttime)
				pc.setqf("time", starttime)
				
				pc.setqf("is_leader", 1)
				game.set_event_flag("dragon_lair_password", pc.getqf("password"))
				char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' SET PASSWORD: '.. pc.getqf("password"))
				
				server_timer("blue_dragon_timer", settings.cooldown_time)
				
				dragon_lair_access.warp_to_lair()
				set_state(spawn_dragon)
			else
				pc.give_item2(settings.access_item, settings.access_item_amount)
				say_title(mob_name(30121))
				say("Un alt grup a încercat sã-l omoare pe dragon.[ENTER] Trebuie sã aºteptaþi un timp pânã când puteþi[ENTER]intra în Templul Dragonului!")
			end
			pc.setqf("password", 0)
		end
	end

	state spawn_dragon begin
		when login begin
			local settings = dragon_lair_access.get_settings()
			purge_area(settings.room_area.first.x, settings.room_area.first.y, settings.room_area.last.x, settings.room_area.last.y)
			notice_multiline(string.format("Grupul lui %s încearcã sã omoare dragonul albastru. Le urãm succes!", pc.name), notice_all)

			regen_in_map(208, "locale/romania/map/metin2_map_skipia_dungeon_boss/regen1.txt") -- Dam drumul la regen
			regen_in_map(208, "locale/romania/map/metin2_map_skipia_dungeon_boss/dragon.txt") --regen dragon
			mob.spawn_group(settings.dragon_vnum, settings.spawn.x, settings.spawn.y, 1, 1, 1)
			
			
			game.set_event_flag("dragon_lair_alive", 1)
			char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' SPAWN DRAGON')
			
			notice_multiline(string.format("Ai la dispoziþie 5 minute. Apoi codul %s [ENTER]se va schimba!", game.get_event_flag("dragon_lair_password")), notice)
			dragon_lair_access.show_time_remaining(settings.cooldown_time)
			
			set_state(kill_dragon)
		end

		when 30121.chat."Vreau sã plec de aici!" with pc.get_map_index() == 208 begin
			say_title(mob_name(30121))
			say("Te duc înapoi la intrarea în peºterã?")
			local warp = select("Da", "Nu")
			if warp == 1 then
				dragon_lair_access.warp_from_lair()
				set_state(start)
			end
		end
		
	end

	state kill_dragon begin

		when dragon_lair_timer.timer begin
			set_state(start)
		end

		when login begin
			if pc.getqf("time") != game.get_event_flag("dragon_lair_time") or dragon_lair_access.get_time_remaining() <= 0 then
				set_state(start)
			else
				dragon_lair_access.show_time_remaining(dragon_lair_access.get_time_remaining())
			end
		end
		
		when button or info begin
			notice_multiline(string.format("Ai la dispoziþie %s minute pentru [ENTER]a invinge Dragonul Albastru", dragon_lair_access.get_time_remaining() / 60), notice)
			local settings = dragon_lair_access.get_settings()
			if (pc.getqf("is_leader") == 1 and settings.cooldown_time-dragon_lair_access.get_time_remaining() < settings.group_time) then
				notice_multiline(string.format("Ai la dispoziþie 5 minute. Apoi codul %s [ENTER]se va schimba!", game.get_event_flag("dragon_lair_password")), notice)
			end
		end

		when 30121.chat."Vreau sã plec de aici!" with pc.get_map_index() == 208 begin
			say_title(mob_name(30121))
			say("Te duc înapoi la intrarea în peºterã?")
			local warp = select("Da", "Nu")
			if warp == 1 then
				dragon_lair_access.warp_from_lair()
				set_state(start)
			end
		end
		when kill begin
		if npc.get_race() == 2493 and pc.get_map_index() == 208 then
			char_log(pc.get_player_id(), 'LAIR', pc.get_channel_id() ..' DRAGON KILLED')
			game.set_event_flag("dragon_lair_alive", 0) -- dragon dead
			notice_multiline(string.format("Grupul lui %s a ucis Dragonul Albastru!", pc.name), notice_all)
			timer("skipia_boss_end", 20) -- 20 sec out
			say("In 20 secunde veti fi  teleportati in afara Camerei de Cristal")
			local settings = dragon_lair_access.get_settings()
			purge_area(settings.room_area.first.x, settings.room_area.first.y, settings.room_area.last.x, settings.room_area.last.y)
		end
		end
		when skipia_boss_end.timer begin
        dragon_lair_access.warp_all_from_lair() -- tp all group out
		d.clear_regen("regen1.txt") -- disable regen1
		d.clear_regen("dragon.txt") -- disable dragon
		set_state(start)
      end
         
	end
end

I cant get it to work, the problem is:
- When it teleports me out after i kill the dragon, the dragon its not set as dead (game.set_event_flag("dragon_lair_alive", 0).
When i click again on npc it dosent give me the message "dragon is dead you cant enter..." it gives me the option to enter again in the dungeon....

[andii]

You are in the wrong section here. We have a thread for quests:
post your problem there

[Jinbei]

#moved
#closed (use the sticky thread please)