Fehler in der syserr durch quest

quest icerun begin
	state start begin
		when login begin
	    if pc.get_map_index() == 226 then
		if pc.get_x() < 23333+79 or pc.get_y() < 23333+54 or pc.get_x() > 23333+151 or pc.get_y() > 23333+130 then
		    pc.warp((9999+123)*100, (9999+135)*100, 201)
		end
		pc.set_warp_location(201, 9999+123, 9999+135)
	    elseif pc.get_map_index() >= 2260000 and pc.get_map_index() < 2270000 then
		pc.set_warp_location(201, 9999+123, 9999+135)
	    end
	end

		when 21552.chat."Atlantis betreten" with pc.get_map_index() == 201 begin
		if pc.get_level() <= 110 then
			say_title("Wächter von Atlantis")
			say("")
			say("Du hast noch nicht genuegend Erfahrung gesammelt.")
			say("Komme wieder, wenn du Level 110 bist!")
		else
			say_title("Wächter von Atlantis")
			say("")
			say("Seid gegrüßt Reisender.")
			say("Ich bin der Wächter von Atlantis.")
			say("Eins war Atlantis ein friedliches Reich, aber dan")
			say("tauchte Neralex auf und übernahm die Herrschaft.")
			say("Seit dem wird jeder Ungebetener Besuch verfolg und")
			say("getötet.")
			wait()
			say_title("Wächter von Atlantis")
			say("")
			say("Würdest du,")
			say("uns helfen Atlantis wieder zurück erobern?")
			say("Damit das Volk von Atlantis wieder in ihre")
			say("alte Heimat zurück kann?")
			say("")
		local s = select("Ich werde euch helfen.", "Tut mir leid.")
		if s == 1 then
			pc.warp( 2343900, 2342200)
		else
			return
			end
			end
		end

		when login with pc.get_map_index() == 226 begin
		if pc.get_x() == 23333+106 or pc.get_y() == 23333+89 then
			notice("Ungebetener Besuch!")
			notice("Verschwindet aus meinem Atlantis!")
			notice("Wehe ihr berührt meinen Metin!")
		end
	end
	
		when 21578.kill with pc.get_map_index()>= 226 begin
			notice_in_map("NEEEIIIN! Mein Stein...!")
			notice_in_map("Ich verfluche euch!")
			notice_in_map("Los tapfere Krieger, erledigt die Eindringlinge!")
			notice_in_map("Ich hoffe ihr tötet nicht alle meine tapferen Krieger!")
			timer("erster_metin", 5)
		end
		
		when erster_metin.timer begin
			d.new_jump_all(226, 23333+380, 23333+123)
			d.regen_file("data/dungeon/ice_run/1.txt")
			d.setf("keule", 0)
			d.set_warp_at_eliminate(4, d.get_map_index(), (23333+432), (23333+122), "data/dungeon/ice_run/2.txt")
		end
		
		when 21581.chat."GM-Abkürzung BOSS" with pc.get_map_index() >= 2260000 and pc.get_map_index() < 2270000 and pc.is_gm() begin
			say("Du kommst zum Bossraum")
			wait()
			npc.purge()
			d.setf("statue", 5)
			timer("ice_jump", 6)
		end
		
		when 21581.chat."Wolang des Weges?" with pc.get_map_index() >= 2260000 and pc.get_map_index() < 2270000 begin
			say("Grantelbart:")
			say(".....")
			say("Dieser Weg ist kalt.")
			say(".....")
			say("Nehmt euch vor Neralex in Acht!")
			say(".....")
			wait()
			d.notice("Neralex:")
			d.notice("Was habt ihr hier verloren!")
			d.notice("Sucht das Weite und zwar sofort!!")
			npc.purge()
			d.kill_all()
			timer("erster_spruch", 10)
		end
			
		when erster_spruch.timer begin
			d.jump_all(23333+685, 23333+82)
			d.setf("insel1", 0)
			d.setf("insel2", 0)
			d.setf("insel3", 0)
			d.setf("insel4", 0)
			d.setf("alleinseln", 0)
			d.regen_file("data/dungeon/ice_run/3.txt")
			d.notice("Grantelbart:")
			d.notice("Besuche jede der 4 Inseln einmal. Beim wiederholten")
			d.notice("erreichen einer Insel erscheinen Kämpfer die")
			d.notice("dann getötet werden müssen, bevor man zur nächsten")
			d.notice("Insel kommt.")
		end
		
		when 20369.chat."GM-Abkürzung Mini-Bossraum" with pc.get_map_index() >= 2260000 and pc.get_map_index() < 2270000 and pc.is_gm() begin
			say("Du kommst zum Mini-Bossraum")
			wait()
			npc.purge()
			timer("inseln_fertigg", 10)
		end
		
		when 20369.chat."Die 4 Inseln" with pc.get_map_index() >= 2260000 and pc.get_map_index() < 2270000 begin
			npc.lock()
			say_title("Nerolfrös:")
			say("Ich kann euch auf eine andere")
			say("Insel befördern. Bitte wähle eine aus:")
		local s=select ("1","2","3","4","Abbruch")
		if s<=4 then
		local positions = {
			{685, 82},
			{590, 82},
			{590, 177},
			{685, 177},	
			}
		local fish = number(1,4)
		if d.getf("insel"..fish) < 1 then
			d.setf("insel"..fish, 1)
			d.setf("alleinseln", d.getf("alleinseln")+1)
			d.kill_all()
		if d.getf("alleinseln")==4 then
			d.notice("Nerolfrös:")
			d.notice("Dies war die letzte Insel.")
			d.notice("Nun kann ich euch nicht mehr helfen.")
			d.notice("Ihr müsst den Weg nun alleine finden.")
			timer("inseln_fertig", 10)
			return
		end
			d.notice("Nerolfrös:")
			d.notice("Ihr wart bisher auf "..d.getf("alleinseln").." Inseln.")
			d.notice("Ihr müsst auf allen vier einmal gewesen sein.")
			d.regen_file("data/dungeon/ice_run/4_"..fish..".txt")
		else
			d.purge()
			d.regen_file("data/dungeon/ice_run/4_"..fish.."_more.txt")
			d.set_warp_at_eliminate(4, d.get_map_index(), 23333 + positions[fish][1], 23333 + positions[fish][2], "data/dungeon/ice_run/4_"..fish..".txt")
		end
			npc.unlock()
			d.jump_all(23333+positions[fish][1], 23333+positions[fish][2])
		else
			npc.unlock()
			return
			end
		end
		
		when 101.kill with pc.is_gm() begin
			chat("Dein Mapindex: "..pc.get_map_index())
		end
					
		when inseln_fertig.timer begin
			timer("inseln_fertigg", 10)
			d.notice("Neralex:")
			d.notice("Jetzt ist aber Schluß!")
			d.notice("Ich will hier KEINEN mehr sehen!")
		end
					
		when inseln_fertigg.timer begin
			local positionss = {
			{473, 441},
			{483, 451},
			{473, 461},
			{464, 451},	
			}
			local fissh = number(1,4)
			d.jump_all(23333+positionss[fissh][1], 23333+positionss[fissh][2])
			d.regen_file("data/dungeon/ice_run/5.txt")
			--d.jump_all(23333+122, 23333+89)
			--d.exit_all() 
		end
		
		when 2623.kill with d.getf("alleinseln")==4 begin
			d.notice("Neralex:")
			d.notice("Komm geht nach Hause!")
			d.notice("Ihr seid ja absolut lächerlich!")
			d.notice("Ihr schafft es nicht die Volvins zu töten um")
			d.notice("ein Eismedallion auf die Säulen zu ziehen...")
			d.regen_file("data/dungeon/ice_run/6.txt")
			timer("miniboss", 10)
		end
		
		when miniboss.timer begin
			d.setf("statue", 0)
			d.setf("keulenmann", 0)
			d.setf("keule", 1)
			d.jump_all(23333+705, 23333+519)
		end
		
		when 21579.take with item.vnum == 90033 begin
			npc.purge()
			item.remove()
			d.setf("keulenmann", 0)
			d.setf("statue", d.getf("statue")+1)
			timer("ice_jump", 6)
		if d.getf("statue")==5 then
			d.notice("Neralex:")
			d.notice("Das ist eure letzte Chance zu verschwinden, sonst stirbt ihr!")
			d.setf("keule", 0)
			end
		end
		
		when 2627.kill with d.getf("keule")==1 begin
			d.setf("keulenmann", d.getf("keulenmann")+1)
		if d.getf("keulenmann")== 9 then
			game.drop_item("90033")
			end
		end
		
		when ice_jump.timer begin
		local positionsss = {
			{705, 495},
			{705, 460},
			{705, 425},
			{705, 390},
			{144, 449},
			}
		local fisssh = d.getf("statue")
			d.jump_all(23333+positionsss[fisssh][1], 23333+positionsss[fisssh][2])
		if fisssh==5 then
			timer("ice_boss1", 10)
			d.spawn_mob(2636, 124, 446)
			d.spawn_mob(2635, 124, 450)
			d.notice("Neralex:")
			d.notice("Ah, da seid ihr ja. Ich freue mich auf die Show!")
		else
			d.regen_file("data/dungeon/ice_run/6_"..fisssh..".txt")
		end
			--d.jump_all(5000+122, 4000+89)
			--d.exit_all()
		end
		
		when ice_boss1.timer begin
			d.notice("Los Valons! Ergreift die Eindringlinge!")
		for i = 1, 132 do
		local firts= number(138, 231)
		local secodn= number(413, 483)
			d.spawn_mob(2633, firts, secodn)
		end
			d.setf("schild", 1)
			d.setf("schildmann" , 0)
		end
		
		when 2633.kill with d.getf("schild")==1 begin
			d.setf("schildmann", d.getf("schildmann")+1)
			d.notice("Noch "..120-d.getf("schildmann").." Wächter besiegen.")
		if d.getf("schildmann")== 120 then
			d.notice("Neralex:")
			d.notice("Ihr denkt wohl, das war alles!")
			d.notice("Los Kristallfelsen! Sperrt sie ein!")
			timer("ice_boss2", 5)
			d.setf("schild", 0)
			d.setf("kristallmann", 0)
				end
		end
		
		when ice_boss2.timer begin
		for i = 1, 220 do
		local firts= number(138, 231)
		local secodn= number(413, 483)
			d.spawn_mob(21580, firts, secodn)
		end
			d.setf("kristall", 1)
		end
		
		when 21580.kill with d.getf("kristall")==1 begin
			d.setf("kristallmann", d.getf("kristallmann")+1)
			d.notice("Noch "..200-d.getf("kristallmann").." Kristalle zerschlagen.")
		if d.getf("kristallmann")== 200 then
			d.notice("Neralex:")
			d.notice("WAS!? Ihr habt noch nicht genug?")
			d.notice("Los Frau! Vernichte die Eindringlinge!")
			d.notice("Nerala:")
			d.notice("Ja wohl Geliebter.")
			timer("ice_boss3", 15)
			d.setf("kristall", 0)
			end
		end
		
		when ice_boss3.timer begin
			d.purge()
			d.spawn_mob(2624, 144, 449)
			d.spawn_mob(2636, 124, 450)
			d.setf("Nerala", 1)
		end
		
		when 2624.kill with d.getf("Nerala")==1 begin
			d.notice("Neralex:")
			d.notice("Wozu hat man heutzutage noch eine Frau...")
			d.notice("Sie sind zu nichts Nutze!")
			d.notice("Jetzt komme ich!")
			timer("ice_boss4", 15)
			d.setf("Nerala", 0)
		end
					
		when ice_boss4.timer begin
			d.purge()
			d.spawn_mob(2625, 144, 449)
			d.setf("Neralex", 1)
		end
		
		when 2625.kill with d.getf("Neralex")==1 begin
			d.notice("Neralex:")
			d.notice("Ich bin noch längst nicht besiegt...")
			d.notice("Spürt meine Drachenmacht!")
			timer("ice_boss5", 5)
			d.setf("Neralex", 0)
		end
		
		when ice_boss5.timer begin
			d.purge()
			d.spawn_mob(2620, 144, 449)
			d.setf("Neralexdragon", 1)
		end
				
		when 2620.kill with d.getf("Neralexdragon")==1 begin
			d.notice("Neralex:")
			d.notice("Ihr habt mich besiegt, ich werde Atlantis verlassen!")
			notice_all("".. pc.get_name() .." + Team haben den Ice-Run gemeistert!")
			--notice_all("Sie haben Neralex besiegt und seine Truhe bekommen.")
			d.setf("Neralex", 0)
			server_timer('iceruns_boss', 60, pc.get_map_index())
			server_timer('iceruns_boss2', 120, pc.get_map_index())
			server_timer('iceruns_boss3', 180, pc.get_map_index())
			server_timer('iceruns_boss4', 240, pc.get_map_index())
			server_timer('iceruns_boss5', 300, pc.get_map_index())
			d.spawn_mob(23004, 139, 449)
			d.setf("dpbelohnung", 0)
		end

		when iceruns_boss.server_timer begin
		if d.select(get_server_timer_arg()) then
			d.notice("Noch vier Minuten bis zum Verlassen!")
			end
		end
		
		when iceruns_boss2.server_timer begin
		if d.select(get_server_timer_arg()) then
			d.notice("Noch drei Minuten bis zum Verlassen!")
			end
		end
		
		when iceruns_boss3.server_timer begin
		if d.select(get_server_timer_arg()) then
			d.notice("Noch zwei Minuten bis zum Verlassen!")
			end
		end
		
		when iceruns_boss4.server_timer begin
		if d.select(get_server_timer_arg()) then
			d.notice("Noch eine Minute bis zum Verlassen!")
			end
		end

		when iceruns_boss5.server_timer begin
		if d.select(get_server_timer_arg()) then
			d.exit_all()
			end
		end
	end
end