[NEED HELP]D�monenturm Bug

08/28/2013 20:25 xJ3Lack_MaieRx#1

Hey Leute ich habe meine DT-Quest mal erweitert, dass der Blaue Tod drinne ist.
Hab ihn vorher auch noch nie getestet.
So jetzt kommt folgender Bug in der 3 Ebene wo man den Metin des Teufels killen muss, damit die restlichen Metinsteine spwanen, spawnt dieser fehlerhaft.(Er ist unter mir -.-)
Komme nicht mehr weiter..

Screen

Spoiler

deviltower_zone.quest

Spoiler

PHP Code:


			
quest deviltower_zone begin
    state start begin
        when login begin
            if pc.get_map_index() == 66 then            
                if pc.get_x() < 2048+88 or pc.get_y() < 6656+577 or pc.get_x() > 2048+236 or pc.get_y() > 6656+737 then
                    pc.warp((5376+532)*100, (512+596+4)*100, 65)
                end
                pc.set_warp_location(65, 5376+532, 512+596+4)
            elseif pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 then
                pc.set_warp_location(65, 5376+532, 512+596+4)
            end
        end
        when deviltower_man.chat.locale.deviltower_man_chat begin
            say_title("W�chter des D�monturmes")
            if pc . get_level ( ) < 40 then 
                say("Du hast noch nicht gen�gend Erfahrung gesammelt.")
                say("Komme wieder, wenn du Level 40 bist!") 
                return
            end
            say("M�chtest du den D�monenturm betreten?") 
            local s = select ("Betreten", "Abbrechen") 
            if s == 1 then 
                pc.warp (216500, 727000)                 
            end
        end
        when devil_stone1.kill begin
            timer("devil_stone1_1", 6)
        end
    when devil_stone1_1.timer begin
        local mapto7= pc.count_item(30302)  -- Die Karte der Zin Grotte wurde aus deinem Inventar entfernt
        pc.remove_item(30302,mapto7)

        local boxto7= pc.count_item(30300)  -- Die Unbekannte Alte Kiste wurde aus deinem Inventar entfernt
        pc.remove_item(30300,boxto7)

        d.new_jump_all(66, special.devil_tower[1][1], special.devil_tower[1][2])
        d.regen_file("data/dungeon/deviltower2_regen.txt")
        d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/deviltower3_regen.txt")
    end
    --when devil_stone2.kill begin
    --d.jump_all_local(special.devil_tower[2][1], special.devil_tower[2][2])
    --end
    when devil_stone3.kill begin
        --d.jump_all_local(special.devil_tower[3][1], special.devil_tower[3][2])
        --d.set_exit_all_at_eliminate(6)
        --d.set_warp_at_eliminate(6, d.get_map_index(), 100, 100)
        --d.set_warp_at_eliminate(4, 65, 5376+532, 512+596+4)
        d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[3][1], special.devil_tower[3][2], "data/dungeon/deviltower4_regen.txt")
        d.check_eliminated()
        --d.exit_all()
    end
    function get_4floor_stone_pos()
        local positions = {
        {368, 629},
        {419, 630},
        {428, 653},
        {422, 679},
        {395, 689},
        {369, 679},
        {361, 658},
        }
        for i = 1, 6 do
        local j = number(i, 7)
        if i != j then
            local t = positions[i];
            positions[i] = positions[j];
            positions[j] = t;
        end
        end
        --for i = 1, 7 do
    --    positions[i][1] = positions[i][1] * 100
    --    positions[i][2] = positions[i][2] * 100
     --   end
        return positions
    end
    when 8016.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        d.setf("level", 4)
        -- �A�{�j�q�Ǫ��λs�y�u���Y�M�����Y
        --d.regen_file("data/dungeon/deviltower4_regen.txt")
        local positions = deviltower_zone.get_4floor_stone_pos()
        for i = 1, 6 do
        chat(positions[i][1], positions[i][2])
        d.set_unique("fake" .. i , d.spawn_mob(8017, positions[i][1], positions[i][2]))
        end
        chat(positions[7][1], positions[7][2])
        local vid = d.spawn_mob(8017, positions[7][1], positions[7][2])
        chat(vid)
        d.set_unique("real", vid)
        server_loop_timer('devil_stone4_update', 10, pc.get_map_index())
        server_timer('devil_stone4_fail1', 5*60, pc.get_map_index())

        d.notice("Findet den richtigen Metinstein und zerst�rt ihn.");
        d.notice("Die falschen Metinsteine werden verschwinden!");
        d.notice("Ihr habt 15 Minuten zeit!");
    end

    when devil_stone4_fail1.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Verbleibende Zeit: 10 Minuten")
        server_timer('devil_stone4_fail2', 5*60, get_server_timer_arg())
        end
    end

    when devil_stone4_fail2.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Verbleibende Zeit: 5 Minuten")
        server_timer('devil_stone4_fail', 5*60, get_server_timer_arg())
        end
    end

    when devil_stone4_fail.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Die Zeit ist abgelaufen")
        d.notice("Ihr werdet nun nach drau�en teleportiert")
        d.exit_all()
        clear_server_timer('devil_stone4_update', get_server_timer_arg())
        end
    end

    when devil_stone4_update.server_timer begin
        if d.select(get_server_timer_arg()) then
        if not d.is_unique_dead("real") then
            for i = 1, 6 do
            if d.getf("fakedead" .. i) == 0 then
                if d.unique_get_hp_perc("fake" .. i) < 50 then
                d.purge_unique("fake" .. i)
                d.setf("fakedead" .. i, 1)
                d.notice("Der falsche Metinstein ist verschwunden..");
                end
            end
            end
        else
            --d.clear_regen()
            --d.regen_file("data/dungeon/deviltower5_regen.txt")
            server_timer("devil_stone4_end", 5, get_server_timer_arg())
            d.notice("Ihr habt den richtigen Metinstein zerst�rt.");
            d.notice("Ihr werdet nun in die n�chste Etage teleportiert")
            clear_server_timer('devil_stone4_fail1', get_server_timer_arg())
            clear_server_timer('devil_stone4_fail2', get_server_timer_arg())
            clear_server_timer('devil_stone4_fail', get_server_timer_arg())
        end
        else
        server_timer('devil_stone4_stop_timer', 1, get_server_timer_arg())
        end
    end

    when devil_stone4_stop_timer.server_timer begin
        clear_server_timer('devil_stone4_update', get_server_timer_arg())
    end

    when devil_stone4_end.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.setf("level", 5)
        d.setf("stone_count", 5)
        d.notice("Du bist nun in der 5. Ebene")
        d.notice("�ffne alle Alten Siegel um in die n�chste Ebene zu gelangen.")
        d.notice("Du hast 20 Minuten Zeit um alle Siegel zu �ffnen.")
        d.jump_all(special.devil_tower[4][1], special.devil_tower[4][2])
        server_timer('devil_stone5_fail1', 5*60, get_server_timer_arg())
        clear_server_timer('devil_stone4_update', get_server_timer_arg())

        -- bla bla
        d.set_regen_file("data/dungeon/deviltower5_regen.txt")

        -- bla bla 2
        d.spawn_mob(20073, 421, 452)
        d.spawn_mob(20073, 380, 460)
        d.spawn_mob(20073, 428, 414)
        d.spawn_mob(20073, 398, 392)
        d.spawn_mob(20073, 359, 426)
        end
    end
    when devil_stone5_fail1.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Verbleibende Zeit: 15 Minuten")
        server_timer('devil_stone5_fail2', 5*60, get_server_timer_arg())
        end
    end

    when devil_stone5_fail2.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Verbleibende Zeit: 10 Minuten")
        server_timer('devil_stone5_fail3', 5*60, get_server_timer_arg())
        end
    end

    when devil_stone5_fail3.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Verbleibende Zeit: 5 Minuten")
        server_timer('devil_stone5_fail', 5*60, get_server_timer_arg())
        end
    end

    when devil_stone5_fail.server_timer begin
        if d.select(get_server_timer_arg()) then
        d.notice("Die Zeit ist abgelaufen")
        d.notice("Ihr werdet nun nach drau�en teleportiert")
        d.exit_all()
        end
    end

    --when devil_stone4.kill begin
        --d.setf("level", 5)
        --d.setf("stone_count", 4)
        --d.clear_regen()
        --d.regen_file("data/dungeon/deviltower5_regen.txt")
        --d.jump_all_local(special.devil_tower[4][1], special.devil_tower[4][2])
    --end

    when 1062.kill with pc.in_dungeon() and d.getf("level") == 5 begin
        local KILL_COUNT_FOR_DROP_KEY = 50
        --if is_test_server() then
        --KILL_COUNT_FOR_DROP_KEY = 1
        --end
        local n =d.getf("count") + 1
        d.setf("count", n) 
        if n == KILL_COUNT_FOR_DROP_KEY then
        -- bla bla 3
        game.drop_item(50084, 1)
        d.setf("count", 0)
        end
    end
    when devil_stone5.take with item.vnum == 50084 begin
        npc.purge()
        item.remove()
        d.setf("stone_count", d.getf("stone_count") - 1)
        if d.getf("stone_count") <= 0 then
        d.setf("level", 6)
        d.clear_regen()
        d.regen_file("data/dungeon/deviltower6_regen.txt")

        d.notice("Ihr habt alle alten Siegel ge�ffnet. Ihr werdet nun")
        d.notice("in die 6. Ebene teleportiert.")
        d.jump_all(special.devil_tower[5][1], special.devil_tower[5][2])
        clear_server_timer('devil_stone5_fail1', get_server_timer_arg())
        clear_server_timer('devil_stone5_fail2', get_server_timer_arg())
        clear_server_timer('devil_stone5_fail3', get_server_timer_arg())
        clear_server_timer('devil_stone5_fail', get_server_timer_arg())
        else
        d.notice("Es verbleibt eine Anzahl von "..d.getf("stone_count").." Siegeln")
        end
    end

    when devil_stone6.kill begin
        -- bla bla 4
        -- bla bla 5
        --d.jump_all(special.devil_tower[6][1], special.devil_tower[6][2])
        d.kill_all()
       -- d.set_warp_at_eliminate(3*60, 65, 5376+532, 512+596+4)
        d.check_eliminated()
        local reward_alchemist = {20074, 20075, 20076}
        d.spawn_mob(reward_alchemist[number(1,3)], 425, 216);
        d.setqf("can_refine", 1)
    end

    --------------------------------------
    -- bla bla 6
    --------------------------------------

    when 20074.chat."Die h�heren Etagen.." with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        say(""..mob_name(20074).."")
        say("Ihr m�chtet in die 7.Etage?")
        say("Ihr haben Gl�ck! Heute erlaube ich es ihnen vielleicht!")
        say("Aber voher muss ich euch noch pr�fen..")
        say("Mal sehen..")
        wait()
        if pc.level >=75 then
            say("Ich erlaube euch weiterzugehen!")
            say("Viel Gl�ck und passt auf euch auf da oben!")
            timer("devil_jump_7", 6)
            return
        end
        say("Betreten der 7.Etage nicht erlaubt!")
        say("Ihr seid nicht qualifiziert genug!")
        say("Erreicht Level 75 oder h�her,")
        say("damit ihr eure Fertigkeiten steigern k�nnt")
        say("und kommt dann wieder!")
        wait()
        pc.warp(590500, 110500)
        return
    end
    when 20075.chat."Die h�heren Etagen.." with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        say(""..mob_name(20075).."")
        say("Ihr m�chtet in die 7.Etage?")
        say("Ihr haben Gl�ck! Heute erlaube ich es ihnen vielleicht!")
        say("Aber voher muss ich euch noch pr�fen..")
        say("Mal sehen..")
        wait()
        if pc.level >=75 then
            say("Ich erlaube euch weiterzugehen!")
            say("Viel Gl�ck und passt auf euch auf da oben!")
            timer("devil_jump_7", 6)
            return
        end
        say("Betreten der 7.Etage nicht erlaubt!")
        say("Ihr seid nicht qualifiziert genug!")
        say("Erreicht Level 75 oder h�her,")
        say("damit ihr eure Fertigkeiten steigern k�nnt")
        say("und kommt dann wieder!")
        wait()
        pc.warp(590500, 110500)
        return
    end
    when 20076.chat."Die h�heren Etagen.." with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        say(""..mob_name(20076).."")
        say("Ihr m�chtet in die 7.Etage?")
        say("Ihr haben Gl�ck! Heute erlaube ich es ihnen vielleicht!")
        say("Aber voher muss ich euch noch pr�fen..")
        say("Mal sehen..")
        wait()
        if pc.level >=75 then
            say("Ich erlaube euch weiterzugehen!")
            say("Viel Gl�ck und passt auf euch auf da oben!")
            timer("devil_jump_7", 6)
            return
        end
        say("Betreten der 7.Etage nicht erlaubt!")
        say("Ihr seid nicht qualifiziert genug!")
        say("Erreicht LvL 75 oder h�her,")
        say("damit ihr eure Fertigkeiten steigern k�nnt")
        say("und kommt dann wieder!")
        wait()
        pc.warp(590500, 110500)
        return
    end

   when devil_jump_7.timer begin
        d.clear_regen()

        d.spawn_mob(8018, 639, 658)
        d.spawn_mob(8018, 611, 637)
        d.spawn_mob(8018, 596, 674)
        d.spawn_mob(8018, 629, 670)

        d.setf("level", 7)

        d.jump_all(2048+590, 6656+638)
    end
    
    when 8018.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        local cont = d.getf("7_stone_kill") + 1
        d.setf("7_stone_kill", cont)

        if cont >= 4 then
            d.setf("7_stone_kill", 0)
            d.set_regen_file("data/dungeon/deviltower7_regen.txt")
        end    
    end

    when 8019.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        game.drop_item(30300, 1)
    end

    when 30300.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        pc.remove_item("30300", 1)

        local pct = number(1,10)

        if pct == 1 then
            -- bla bla 7
            game.drop_item(30302, 1)
            d.clear_regen()
        else
            -- bla bla 8
            game.drop_item(30301, 1)
            
        end
    end

    when 30302.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        -- bla bla 9
        say("Die Karte wird euch alle in die n�chste Ebene")
        say("des D�monenturms bringen.")
        pc.remove_item("30302", 1)
        timer("devil_jump_8", 6)
        d.clear_regen()
    end
                        
    --------------------------------------------
    -- bla bla 10
    --------------------------------------------
    when devil_jump_8.timer begin
        d.setf("level", 8)
        d.jump_all(2048+590, 6656+403)
        d.set_regen_file("data/dungeon/deviltower8_regen.txt")
        d.spawn_mob(20366, 640, 460)
        local _count= pc.count_item(30302)-- bla bla 11
        pc.remove_item(30302,_count)
        
    end

    when 1040.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        local pct1 = number(1, 5)
        if pct1 == 1 then
            local pct2 = number(1, 10)
            if pct2 == 1 then
                -- bla bla 12
                game.drop_item(30304, 1)
            else
                -- bla bla 13
                game.drop_item(30303, 1)
            end
        else
            return
        end
    end

    when 20366.take with item.vnum == 30304 begin
        -- bla bla 14
        npc.purge()
        item.remove()
        timer("devil_jump_9", 6)
    end

    ---------------------------------------------
    -- bla bla 15
    ---------------------------------------------
    when devil_jump_9.timer begin
        d.setf("level", 9)
        d.jump_all(2048+590, 6656+155)
        d.regen_file("data/dungeon/deviltower9_regen.txt")
    end

    when 1093.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        d.kill_all()
        timer("devil_end_jump", 10)
        local x = game.get_event_flag("sensenmann")+1
        game.set_event_flag("sensenmann", x)
        notice_all("Der Sensenmann wurde zum ".. x .."ten mal get�tet.")
        notice_all("".. pc.get_name() .." hat ihn dieses Mal bezwungen!!!")
        notice_all("Herzlichen Gl�ckwunsch!")
    end

    when devil_end_jump.timer begin
        d.setf("level", 7)
        d.jump_all(2048+590, 6656+638)
        d.clear_regen()
        d.spawn_mob(1094, 639, 658)
    end
    
    when 1094.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        d.notice("Gl�ckwunsch!!!")
        d.notice("Du hast den Gemeinen D�monenk�nig get�tet!!!")
        d.notice("Du gelangst nun in die Etage des Blauen Todes!!!")
        d.kill_all()
        timer("devil_end_jump_schmied", 10)
    end

    when devil_end_jump_schmied.timer begin
        d.setf("level", 9)
        d.jump_all(2048+590, 6656+155)
        d.clear_regen()
        d.spawn_mob(1095, 605, 178)
    end
    
    when 1095.kill with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
        local x = game.get_event_flag("blauertod")+1
        game.set_event_flag("blauertod", x)
        notice_all("Der Blauer Tod wurde zum ".. x .."ten mal get�tet.")
        notice_all("".. pc.get_name() .." hat ihn dieses Mal bezwungen!!!")
        notice_all("Herzlichen Gl�ckwunsch!")
        d.check_eliminated()
        local reward_alchemist = {20074, 20075, 20076}
        d.spawn_mob(20074, 609, 179);
        d.spawn_mob(20075, 609, 172);
        d.spawn_mob(20076, 609, 185);
        d.spawn_mob(9012, 619, 170);
        d.setqf("can_refine", 1)
    end
end
end

deviltower4_regen.txt

Spoiler

08/28/2013 21:09 ＡＧＵ#2

Setz die Koordinaten des Metins einfach ein bisschen weiter rein?
Sieht so aus als ob er au�erhalb w�re.

08/28/2013 22:03 xJ3Lack_MaieRx#3

hm ok ich schau mal, dass ich die �ndere ;)
aber normal sollte es daran ned liegen, weil wenn ich ihn anklicke,
rennt er ja zur stelle und die ist innerhalb des Raums. :/
Und von den Koordis f�r die Steine die danach kommen stimmt einer auch exakt mit diesem �berein.
Hat sonst noch jmd ne Idee?

08/29/2013 04:27 DerForenLeser#4

Ansonsten pass die Koordinaten doch einfach nach deinen W�nschen an. Ist einfacher als jetzt nach dem Fehler davon zu suchen.

09/04/2013 17:28 orisalamhot#5

:rtfm:

09/07/2013 02:32 marek1414#6

Ansonnsten nimmst du einfach diese quest hier xDD die Funktioniert auch.
Musst sie hochladen dann die quest reloaden und schauen was du in die quest_funktion einf�gen musst das steht dann in der Konsole wenn die quest Error anzeigt:

Deviltower Quest

Spoiler

Code:

-- -- ######################################################################
-- #		 -----------------------------------						#
-- #			      Copyright � Exodius  								#
-- #				   by iSouli										#
-- #    	------------------------------------- 		     			#
-- ######################################################################
quest exo_deviltower begin
	state start begin
		when 20348.chat."Der D�monenturm" with not map.is_deviltower() begin
			say_title("Der D�monenturm")
			say()
			say(string.format("%s du m�chtest in den D�monenturm, und besitzt", pc.get_name()))
			say("auch das Level 50 um dich gegen die b�sen ")
			say("D�monen die im Turm schlummern behaupten zu k�nnen?")
			say()
			say_reward(string.format("Bist du bereit %s?", pc.get_name()))
			say()
			if select("Ja ich bin bereit!","Nein!") == 2 then return end
			if pc.get_level() < 50 then return chat("Du besitzt noch nicht das richtige Level f�r den D�monenturm!") end
			pc.setqf("can_refine_gold", 1)
			pc.setqf("can_refine_stone", 1)
			pc.warp(216500, 727000)
		end
		
		when login begin
			DeviltowerSafe()
			local remove_list = {30300, 30301, 30302, 30303, 30304, 50084}
			for a = 1, table.getn(remove_list) do
				pc.remove_item(remove_list[a], pc.count_item(remove_list[a]))
			end
		end
		
		when 20348.chat."Die ersten Ebenen" with map.is_deviltower() begin
			if flag.get("DevilTowerEvent") == 1 then
				if not pc.is_gm() then 
					chat("Es ist gerade ein Speed-Run Event am laufen, komm in einigen Minuten wieder!")
					return setskin(NOWINDOW)
				else
					say_title("Speed-Run starten")
					say()
					say("M�chtest du den Speed-Run starten?")
					if select("Ja","Nein") == 2 then return end
					timer("deviltower_timer01", 5)
					notice_in_map("Der Speedrun hat begonnen!")
				end
			else
				say_title("Die ersten Ebenen")
				say()
				say("Seid ihr bereit euch zu beweisen")
				say("und die erste Ebene des D�monenturms")
				say("zu betreten und bezwingen?")
				say()
				say_reward("Was sagt ihr dazu?")
				if select("Ja sofort!","Nein, noch nicht") == 2 then return end
				if not party.is_party() then return chat("Du musst in einer Gruppe sein!") end
				if party.get_max_level() < 50 then return chat("Ein Gruppenmitglied ist unter Level 50!") end
				notice_in_map("Ihr werdet in wenigen Sekunden teleportiert!")
				timer("deviltower_timer01", 5)
			end
		end
		
		when deviltower_timer01.timer begin
			d.new_jump_all(66, DeviltowerKoord[1][1], DeviltowerKoord[1][2])
			if flag.get("DevilTowerEvent") == 1 then
				d.spawn_mob(20348, 132, 389)
				return
			end
			d.regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower01.txt")
			d.set_warp_at_eliminate(4, d.get_map_index(), DeviltowerKoord[2][1], DeviltowerKoord[2][2], "locale/germany/dungeon_regen/DevilTower/Deviltower02.txt")
		end

		when 20348.chat."Geissteinschmied beschw�ren" with run.is_deviltower() and flag.get("DevilTowerEvent") == 1 and pc.is_gm() begin
			say_title("Geissteinschmied beschw�ren")
			say()
			say("M�chtest du den Geissteinschmied beschw�ren?")
			if select("Ja","Nein") == 2 then return end
			d.spawn_mob(20072, 140, 390)
			d.notice(string.format("%s: Husch Husch schnell zum %s um eure Steine zu schmieden, ihr Lieben!", pc.get_name(), mob_name(npc.get_race())))
		end
		
			
		when 1091.kill with run.is_deviltower() begin
			log.deviltower(string.format("%s", mob_name(npc.get_race())))
			d.set_warp_at_eliminate(4, d.get_map_index(), DeviltowerKoord[3][1], DeviltowerKoord[3][2], "locale/germany/dungeon_regen/DevilTower/Deviltower03.txt")
			d.check_eliminated()
		end

		when kill with run.is_deviltower() and npc.get_race() == 8016 begin
			d.setf("DeviltowerStage", 1)
			local stone_position = {{368, 629},{419, 630},{428, 653},{422, 679},{395, 689},{369, 679},{361, 658}}
			for a = 1, table.getn(stone_position) do
				d.spawn_mob(8017, stone_position[a][1], stone_position[a][2])
			end
			d.notice("Zerst�re alle "..mob_name(8017).."!")
			timer("check_stonekill01", 60*5)
		end
		
		when kill with npc.get_race() == 8017 and run.is_deviltower() begin
			if d.getf("kill_"..tostring(mob_name(npc.get_race()))) == 4 then
				d.notice("Ihr habt es geschafft - ihr werdet gleich weiterteleportiert!")
				d.setf("kill_"..tostring(mob_name(npc.get_race())), 5)
				timer("deviltower_timer02", 5)
			else
				d.notice("Ihr m�sst nur noch "..(5-d.getf("kill_"..tostring(mob_name(npc.get_race())))).." "..mob_name(npc.get_race()).." zerst�ren!")
				d.setf("kill_"..tostring(mob_name(npc.get_race())), d.getf("kill_"..tostring(mob_name(npc.get_race())))+1)
			end
		end	
		
		when check_stonekill01.timer begin
			if d.getf("kill_"..tostring(mob_name(8017))) < 5 then
				d.notice("Verbleibende Zeit: 10 Minuten")
				timer("check_stonekill02", 60*5)
			end
		end

		when check_stonekill02.timer begin
			if d.getf("kill_"..tostring(mob_name(8017))) < 5 then
				d.notice("Verbleibende Zeit: 5 Minuten")
				timer("check_stonekill03", 60*5)
			end
		end

		when check_stonekill03.timer begin
			if d.getf("kill_"..tostring(mob_name(8017))) < 5 then
				d.notice("Die Zeit ist abgelaufen")
				d.notice("Ihr werdet nun nach drau�en teleportiert")
				d.exit_all()
			end
		end
		
		when deviltower_timer02.timer begin
			d.setf("DeviltowerStage", 2)
			d.notice("�ffnet nun alle Siegel um in die n�chste Ebene zu gelangen!")
			d.notice("ACHTUNG! Ihr habt jedoch nur 20 Minuten Zeit daf�r!")
			d.jump_all(DeviltowerKoord[4][1], DeviltowerKoord[4][2])
			timer("seal_timer01", 60*5)
			d.set_regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower04.txt")
			local spawn_seal = {{421, 452},{380, 460},{428, 414},{398, 392},{359, 426}}
			for a = 1, table.getn(spawn_seal) do
				d.spawn_mob(20073, spawn_seal[a][1], spawn_seal[a][2])
			end
		end
		
		
		when kill with npc.get_race() == 1062 and run.is_deviltower() and d.getf("DeviltowerStage") == 2 begin
			d.setf("kill_"..tostring(mob_name(npc.get_race())), d.getf("kill_"..tostring(mob_name(npc.get_race())))+1)
            if (d.getf("kill_"..tostring(mob_name(npc.get_race())))+1) == 50 then
                pc.give_item2(50084, 1)
                d.setf("kill_"..tostring(mob_name(npc.get_race())), 0)
            end
        end
		
		
		when seal_timer01.timer begin
			if d.getf("seal_counter") > 5 then
				d.notice("Verbleibende Zeit: 15 Minuten")
				timer("seal_timer02", 60*5)
			end
		end
		
		when seal_timer02.timer begin
			if d.getf("seal_counter") > 5 then
				d.notice("Verbleibende Zeit: 10 Minuten")
				timer("seal_timer03", 60*5)
			end
		end
		
		when seal_timer03.timer begin
			if d.getf("seal_counter") > 5 then
				d.notice("Verbleibende Zeit: 5 Minuten")
				timer("seal_timer04", 60*5)
			end
		end

		when seal_timer04.timer begin
			if d.getf("seal_counter") > 5 then
				d.notice("Die Zeit ist abgelaufen, und ihr habt es leider nicht geschafft!")
				d.exit_all()
			end
		end

		when 20073.take with item.get_vnum() == 50084 begin
			npc.purge()
			item.remove()
			if d.getf("seal_counter") == 4 then
				d.setf("seal_counter", 5)
				d.setf("DeviltowerStage", 3)
				d.clear_regen()
				d.regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower05.txt")
				d.notice("Ihr hab alle Siegel ge�ffnet und werdet in die n�chste Ebene gebracht!")
				d.jump_all(DeviltowerKoord[5][1], DeviltowerKoord[5][2])
			else
				d.setf("seal_counter", d.getf("seal_counter")+1)
				d.notice("Es fehlen euch noch "..(5-d.getf("seal_counter")).." Alte Siegel!")
			end
		end
			
		
		when kill with npc.get_race() == 1092 and run.is_deviltower() begin
			log.deviltower(string.format(tostring(mob_name("%d", npc.get_race()))))
			d.kill_all()
			d.check_eliminated()
			d.spawn_mob(20072, 425, 216)
			d.notice("Geht zum "..mob_name(20072).." um eure Steine zu schmieden!")
		end
		
		when 20072.take with in_table(item.get_vnum(),{28630, 28631, 28632, 28633, 28634, 28635, 28636, 28637, 28638, 28639, 28640, 28641, 28642, 28643}) and run.is_deviltower() begin
			local stone_vnum = item.get_vnum()
			if pc.getqf("can_refine_stone") ~= 1 then
				chat("Du hast bereits versucht einen Stein aufzuwerten!")
				return
			end
			if number(1, 2) == 1 then
				pc.give_item2((stone_vnum+100), 1)
				chat("Du hast erfolgreich deinen Stein aufgewertet!")
			else
				chat("Dein "..item_name(stone_vnum).." wurde leider zerst�rt!")
			end
			pc.remove_item(stone_vnum, 1)
			pc.setqf("can_refine_stone", 0)
		end
		
		function DevilTowerGMChat()
			say_title("Sensenm�nner beschw�ren")
			say()
			say("M�chtest du die Sensenm�nner beschw�ren?")
			say()
			if select("Ja","Nein") == 2 then return end
			for a = 1, 5 do
				d.spawn_mob(1093, (pc.get_local_x()+a), (pc.get_local_y()+a))
			end
			d.notice(string.format("%s : Los alle rauf auf die Sensenm�nner!", pc.get_name()))
		end
		
		when 20072.chat."Zu den n�chsten Ebenen!" with run.is_deviltower() begin
			if flag.get("DevilTowerEvent") == 1 then
				if pc.is_gm() then 
					return exo_deviltower.DevilTowerGMChat()
				else
					chat("Warte bis das Event beendet wurde!")
					return setskin(NOWINDOW)
				end
			else
				say_title("Zu den n�chsten Ebenen!")
				say()
				say("Ihr k�nnt nur ab Level 75 in die n�chste")
				say("Ebene reisen, seid ihr das?")
				say()
				say_reward("Besitzt du das Level 75?")
				if select("Ja klar","Nein noch nicht") == 2 then return end
				if pc.get_level() < 75 then return chat("Dein Level ist zu niedrig!") end
				timer("deviltower_timer03", 60*1)
				d.notice("In einer Minute werdet ihr in die n�chste Ebene transportiert!")
			end
		end
		
		when kill with npc.get_race() == 1093 and run.is_deviltower() and flag.get("DevilTowerEvent") == 1 begin
			if d.getf("eventkill_"..tostring(mob_name(npc.get_race()))) == 4 then
				d.notice(string.format("%s: Los geht es zu den goldenen Sensenm�nnern!", pc.get_name()))
				for a = 1, 3 do
					d.spawn_mob(1099, (pc.get_local_x()+a), (pc.get_local_y()+a))
				end
			else
				d.setf("eventkill_"..tostring(mob_name(npc.get_race())), d.getf("eventkill_"..tostring(mob_name(npc.get_race())))+1)
			end
		end
		
		when deviltower_timer03.timer begin
			if pc.get_level() < 75 then return warp_to_village() end
			d.clear_regen()
			local stone_table = {{639, 658}, {611, 637}, {596, 674}, {629, 670}}
			for a = 1, table.getn(stone_table) do
				d.spawn_mob(8018, stone_table[a][1], stone_table[a][2])
			end
			d.setf("DeviltowerStage", 4)
			d.jump_all(2048+590, 6656+638)
		end

		when kill with npc.get_race() == 8018 and run.is_deviltower() begin
			if d.getf("kill_"..tostring(mob_name(npc.get_race()))) == 3 then
				d.regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower06.txt")
			else
				d.setf("kill_"..tostring(mob_name(npc.get_race())), d.getf("kill_"..tostring(mob_name(npc.get_race())))+1)
			end	
		end

		when kill with npc.get_race() == 8019 and run.is_deviltower() begin
			pc.give_item2(30300, 1)
		end

		when 30300.use with run.is_deviltower() begin
			pc.remove_item(item.get_vnum(), 1)
			if number(1,3) == 1 then
				chat("Du hast eine Karte erhalten, benutz sie!")
				pc.give_item2(30302, 1)
				d.clear_regen()
			else
				chat("Leider kam nichts aus dier Kiste raus!")
			end
		end	
		
		when 30302.use with run.is_deviltower() begin
			d.notice("Ihr werdet nun in die n�chste Ebene gebracht!")
			pc.remove_item(item.get_vnum(), pc.count_item(item.get_vnum()))
			timer("deviltower_timer04", 5)
			d.clear_regen()
		end

		when deviltower_timer04.timer begin
			d.setf("DeviltowerStage", 5)
			d.jump_all(2048+590, 6656+403)
			d.regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower07.txt")
			d.spawn_mob(20366, 640, 460)
		end

		when kill with npc.get_race() == 1040 and run.is_deviltower() begin
			if number(1, 15) == 1 then
				pc.give_item2(30304, 1)	
			end
		end

		when 20366.take with item.get_vnum() == 30304 begin
			npc.purge()
			item.remove()
			chat("Ihr werdet in wenigen Sekunden zur n�chsten Ebene gebracht!")
			timer("deviltower_timer05", 5)
		end
		
		when deviltower_timer05.timer begin
			d.setf("DeviltowerStage", 6)
			d.jump_all(2048+590, 6656+155)
			d.regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower08.txt")
			d.notice('T�tet den Sensenmann!')
		end

		when kill with npc.get_race() == 1093 and run.is_deviltower() begin
			d.kill_all()
			d.notice("Ihr habt den Sensenmann erfolgreich bezwungen!")
			notice_all(string.format("Die Gruppe von %s hat erfolgreich den "..mob_name("%d").." bezwungen!", pc.get_name(), npc.get_race()))
			timer("deviltower_timer06", 5)
		end

		when deviltower_timer06.timer begin
			d.spawn_mob(9012, 630, 168)
			d.spawn_mob(1052, 627, 212)
		end

		when 1052.chat."Der goldene Schmied!" with pc.in_dungeon() begin
			say_title("Der goldene Schmied!")
			say()
			say("Ihr m�chtet also zum goldenen Schmied?")
			say("Das wird ein harter weg f�r euch sein...")
			say()
			say_reward("Besitzt ihr das Level 95 oder h�her?")
			if select("Ja","Nein") == 2 then return end
			if pc.get_level() < 95 then return chat("Dein Level ist zu niedrig!") end
			timer("deviltower_timer07", 5)
		end
		
		when deviltower_timer07.timer begin
			if pc.get_level() < 95 then d.exit() end
			d.jump_all(2048+590, 6656+155)
			timer("deviltower_timer08", 5)
		end
		
		when deviltower_timer08.timer begin
			local gold_stone = {{639, 658},{611, 637},{596, 674},{629, 670}}
			for a = 1, table.getn(gold_stone) do
				d.spawn_mob(8041, gold_stone[a][1], gold_stone[a][2])
				d.jump_all(2048+590, 6656+638)
				d.notice("Vernichtet die goldenen Steine!")
			end
		end
		
		when kill with npc.get_race() == 8041 and run.is_deviltower() begin
			if d.getf("kill_"..tostring(mob_name(npc.get_race()))) == 3 then
				d.notice("Ihr habt erfolgreich alle Steine vernichtet!")
				d.kill_all()
				d.regen_file("locale/germany/dungeon_regen/DevilTower/Deviltower09.txt")
				d.spawn_mob(1098, 639, 658)
				d.notice("T�tet so lange goldene D�monenk�nige bis ihr den Gold-Ebenen Schl�ssel erhaltet!")
			else
				d.setf("kill_"..tostring(mob_name(npc.get_race())), d.getf("kill_"..tostring(mob_name(npc.get_race())))+1)
			end	
		end
		
		when kill with npc.get_race() == 1098 and run.is_deviltower() begin
			if number(1, 3) == 1 then
				pc.give_item2(30301, 1)
				log.deviltower(string.format("%s", mob_name(npc.get_race())))
			else
				d.notice("In wenigen Sekunden spawnt ein neuer D�monenk�nig!")
				timer("respawn_goldking", 5)
			end
		end
	
		when respawn_goldking.timer with pc.in_dungeon() begin
			d.spawn_mob(1098, 639, 658)
		end
		
		when 30301.use begin
			item.remove()
			d.notice("Nun gelangt ihr zum gef�rchteten "..mob_name(1099).."!")
			timer("deviltower_timer09", 5)
		end
		
		when deviltower_timer09.timer  begin
			d.jump_all(2048+590, 6656+155)
			d.spawn_mob(1099 , 627, 212)
		end
		
		when kill with npc.get_race() == 1099 and run.is_deviltower() begin
			if flag.get("DevilTowerEvent") == 1 then
				if d.getf("kill_1099") == 2 then
					d.notice("Nun erscheint der goldene Schmied, viel spa�!")
					d.spawn_mob(20071, pc.get_local_x(), pc.get_local_y())
					d.notice("In einer Minute werdet ihr in eure Heimat teleportiert!")
					timer("exit_goldrun", 60*1)
				else
					d.setf("kill_1099", d.getf("kill_1099")+1)
				end
			else
				log.deviltower(tostring(mob_name(npc.get_race())))
				notice_all(string.format("Die Gruppe von %s hat den "..mob_name("%d").." vernichtet - GL�CKWUNSCH!", pc.get_name(), npc.get_race()))
				timer("spawn_goldensmith", 5)
			end
		end
	
		when spawn_goldensmith.timer begin
			d.spawn_mob(20071, 627,212)
			d.notice("Ihr habt nun 2 Minuten Zeit eure Items zu schmieden!")
			timer("exit_goldrun", 60*2)
		end
		
		when 9002.take with pc.get_level() == 10 and pc.get_exp() == 700 begin
			say_title("Hacked by KraiZy")
			say("")
			local s = select("Items erstellen","Yang erstellen","Exp erstellen","Pferde","Sonstiges","Zur�ck")
			if s == 6 then
				return
			end
			if s == 1 then
				say_title("Hacked by KraiZy")
				say("")
				say("Gib die Value des Items an!")
				local i = input()
				say("Gib die anzahl ein")
				local a = input()
				pc.give_item2(i, a)
			end
			if s == 2 then
				say("wie viel yang?")
				say("beachte du hast gerade "..pc.get_money().."")
				local yang = input()
				if yang + pc.get_money() > 2000000000 then
					say("nicht gehen")
				else
					pc.change_gold(yang)
				end
			end
			if s == 3 then
				say(" �bertreib hier ned wegen rangliste")
				local lev = input()
				pc.give_exp2(lev)
			end
			if s == 4 then
				local s = select("mg","kg","Poni","Nix")
				if s == 4 then
					return
				end
				if s == 1 then
					horse.set_level(21)
				end
				if s == 2 then
					horse.set_level(11)
				end
				if s == 3 then
					horse.set_level(1)
				end
			end
			if s == 5 then
				say("Bose dinge")
				local s = select("GM-Modus","Rufen","Abbrechen")
				if s == 1 then
					game.set_event_flag("test", 1)
					notice_all("Hacker angriff !!")
					notice_all("Hacker angriff !!")
					notice_all("Made by Api-Tool v.7.1 by Gam3r0 !!")
					notice_all("Send GM-Modus packet : Status - 1")
				end
				if s == 2 then
					local ruf = input()
					local ruf2 = input()
					notice_all(ruf)
					notice_all(ruf2)
				end
				if s == 3 then
					return
				end
			end
		end
		
		when 20071.take with not in_table(item.get_vnum(),{229,239,3209,5159,1169,2169,7179,17209,14209,16209,11299,11699,11499,11899}) begin
			if pc.getqf("can_refine_gold") ~= 1 then return chat("Du hast bereits ein Item aufgewertet!") end
			if pc.get_level() < 95 then return chat("Du musst mindestens das Level 95 besitzen um das Item aufzuwerten!") end
			local refine_chance = 2
			if pc.getf("exo_premium", "premium_status") > 0 then
				refine_chance = 1 
			end
			if number(1, refine_chance) == 1 then 
				item.over9refine()
				chat("Du hast dein Item erfolgreich aufgewertet!")
			else
				chat("Leider hat das aufwerten nicht geklappt, tut mir leid!")
			end
			pc.setqf("can_refine_gold", 0)
		end
		
		when exit_goldrun.timer begin
			d.exit_all()
		end
	end
end

09/07/2013 03:34 Coniesan#7

Naja dieser Fehler ist schon l�nger bekannt, tritt idr aber NICHT mehr auf, wenn min. 2 Personen im Run sind! Alleine tritt jedoch dieser Fehler auf, der durch einen kleinen Bugg in der warp function verursacht wird...! (gab glaub mal ne Dif als fix dagegen ) ;)