[SERVICE] Die Questkontrolle

Page 588 of 845 « First 88488538578586587 588 589590598638688 Last »
08/21/2013 00:54 ♥Punchinello♥#8806
PHP Code:
quest otsura begin
    state start begin
        when 20091.chat."Maps" begin
        local map = select ("Grotte 1", "Grotte 2", "Drachenraum", "Erze Map", "Tal von Kanji", "Abbrechen")
        if map == 1 then
                pc.warp(10086, 1213190)
        elseif map == 2 then
                pc.warp(241500, 1274700)
        elseif map == 3 then
                pc.warp(171900, 1221300)
        elseif map == 4 then
                pc.warp(1226600, 1680600)
        elseif map == 5 then
                pc.warp(1082700, 1792400)
            elseif map == 6 then
            return
        end
    end
    end
end 
Könnte mir jemand Level Begrenzung rein hauen ??

Grotte 1 ---- 60
Grotte 2 ---- 75
Bossraum ----- 80
Erze Map ------ 30
Tal von Kanji ----- 90

Wäre Lieb :)
08/21/2013 03:43 [Patrick]#8807
Versuchs mal so:
-------------------------
Kann mir jemand bitte helfen?
Code:
quest bla begin
	state start begin
		when 20023.chat."bla"  with pc.getqf("bla2") == 0 begin
				say_title("bla")
				say_gold("Hallo "..pc.get_name()..",")
				say_gold("")
				say_gold("")
				local aw = select ("Ja, i", "Nein ")
				if aw == 1 then
					say_gold("Bitte gebe die Anzahl ein.")
					local a = input()
					pc.remove_item(19, a)
					pc.setqf("bla2", 1)
					pc.setqf("bla", pc.getqf("bla")+a)
				end
				if aw == 2 then
					return
				end
		end
		when 20023.chat."bla" with pc.getqf("bla2") == 1 begin
			say_title("Bla")
			say_gold("")
			say_gold("Du hast insgesamt "..pc.getqf("bla").."  ,")
			say_gold("")
			local ab = select ("Ja, ", "Nein, ")
			if ab == 1 then
				local anzahl = input()
				pc.give_item2(19, b)
				pc.setqf("bla", pc.getqf("bla")-b)
				pc.setqf("bla2", 2)
				if pc.getqf("bla") < 1 then 
					pc.setqf("bla2", 0)
				end
				if pc.getqf("bla2")  <= 50 then
					pc.setqf("bla2", 0)
				end
			elseif ab == 2 then
				return
			end
		end
		when 20023.chat."bla" with pc.getqf("bla2") == 2 begin
			say_title("bla")
			say("")
			say_gold("Du hast insgesamt "..pc.getqf("bla").." , ")
		end
	end
end
Der 1. Teil funktioniert fehlerfrei wo ich das Zeug einzahlen/abgeben kann.
Aber wenn ich beim 2. Teil etwas abholen will wird das automatisch danach auf 0 gesetzt.
Also ich hab z.B. 5 Schwerter drauf und hebe 3 ab.
Dann wird wenn ich nochmal drauf klicke angezeigt, dass ich 0 Schwerter habe, aber im praktischen Sinn sind noch 2 Schwerter drauf..es spinnt lediglich die Anzeige.
Kann mir jemand helfen..?
08/21/2013 08:04 G.I Duke#8808
Quote:
Originally Posted by Shiro2Punshi View Post
PHP Code:
quest otsura begin
    state start begin
        when 20091.chat."Maps" begin
        local map = select ("Grotte 1", "Grotte 2", "Drachenraum", "Erze Map", "Tal von Kanji", "Abbrechen")
        if map == 1 then
                pc.warp(10086, 1213190)
        elseif map == 2 then
                pc.warp(241500, 1274700)
        elseif map == 3 then
                pc.warp(171900, 1221300)
        elseif map == 4 then
                pc.warp(1226600, 1680600)
        elseif map == 5 then
                pc.warp(1082700, 1792400)
            elseif map == 6 then
            return
        end
    end
    end
end 
Könnte mir jemand Level Begrenzung rein hauen ??

Grotte 1 ---- 60
Grotte 2 ---- 75
Bossraum ----- 80
Erze Map ------ 30
Tal von Kanji ----- 90

Wäre Lieb :)
PHP Code:
quest otsura begin 
    state start begin 
        when 20091.chat."Maps" begin 
        local map = select ("Grotte 1", "Grotte 2", "Drachenraum", "Erze Map", "Tal von Kanji", "Abbrechen") 
        if map == 1 then 
            if pc.get_level() >= xx then
                pc.warp(10086, 1213190)
            else
                syschat("Du musst mindestens Level xx sein!") end
        elseif map == 2 then
            if pc.get_level() >= xx then
                pc.warp(241500, 1274700)
            else
                syschat("Du musst mindestens Level xx sein!") end
        elseif map == 3 then
            if pc.get_level() >= xx then
                pc.warp(171900, 1221300)
            else
                syschat("Du musst mindestens Level xx sein!") end
        elseif map == 4 then
            if pc.get_level() >= xx then
                pc.warp(1226600, 1680600)
            else
                syschat("Du musst mindestens Level xx sein!") end
        elseif map == 5 then
            if pc.get_level() >= xx then
                pc.warp(1082700, 1792400)
            else 
                syschat("Du musst mindestens Level xx sein!") end
            elseif map == 6 then 
            return 
        end 
    end 
    end 
end 
grad bei xx deine Level eintragen.

MfG
08/21/2013 23:27 florian_german#8809
quest lvl_nachricht begin
state start begin
when levelup begin
if pc.get_level() == 50 then
notice_all("".. pc.get_name() .." hat gerade")
notice_all("Level 50 erreicht!")
notice_all("Weiter so!")
elseif pc.get_level() == 75 then
notice_all("".. pc.get_name() .." hat gerade")
notice_all("Level 75 erreicht!")
notice_all("Weiter so!")
elseif pc.get_level() == 105 then
notice_all("".. pc.get_name() .." hat gerade")
notice_all("Level 105 erreicht!")
notice_all("Glückwunsch!")
notice_all("Gratuliert ihm!")
notice_all("Für seine/ihre harte Arbeit hat")
end
end
end
end


Wo istn da ein Fehler?
PS: bei mir sind die Leerschritte
08/22/2013 00:03 .ExTase#8810
Code:
quest siegel begin 
    state start begin 
        when 83000.use with pc.get_job() == 0 or pc.get_job() == 4 and pc.get_skill_group() == 2 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local mento = select("Durchschlag", "Starker Körper", "Stampfer", "Heftiger Schlag", "Schwerschlag", "Abbrechen") 
            if mento == 6 then 
                return 
            elseif mento == 1 then 
                pc.set_skill_level(16 ,59) 
                chat("'Durchschlag' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 2 then 
                pc.set_skill_level(19 ,59) 
                chat("'Starker Körper' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 3 then 
                pc.set_skill_level(18 ,59) 
                chat("'Stampfer' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 4 then 
                pc.set_skill_level(17 ,59) 
                chat("'Heftiger Schlag' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 5 then 
                pc.set_skill_level(20 ,59) 
                chat("'Schwertschlag' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return  
            end
        end
        when 83000.use with pc.get_job() == 0 or pc.get_job() == 4 and pc.get_skill_group() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.")
            local krieger = select("Schwertwirbel", "Dreiwege Schnitt", "Aura des Schwertes", "Kampfrausch", "Sausen", "Abbrechen") 
            if krieger == 6 then 
                return 
            elseif krieger == 1 then 
                pc.set_skill_level(2 ,59) 
                chat("'Schwertwirbel' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 2 then 
                pc.set_skill_level(1 ,59) 
                chat("'Dreiwege Schnitt' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 3 then 
                pc.set_skill_level(4 ,59) 
                chat("'Aura des Schwertes' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 4 then 
                pc.set_skill_level(3 ,59) 
                chat("'Kampfrausch' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 5 then 
                pc.set_skill_level(5 ,59) 
                chat("'Sausen' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return
            end 
        end

        when 83000.use with pc.get_job() == 1 or pc.get_job() == 5 and pc.get_skill_group() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local nah = select("Hinterhalt", "Blitzangriff", "Degenwirbel", "Tarnung", "Giftwolke", "Abbrechen") 
            if nah == 6 then 
                return 
            elseif nah == 1 then 
                pc.set_skill_level(31 ,59) 
                chat("'Hinterhalt' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 2 then 
                pc.set_skill_level(32 ,59) 
                chat("'Blitzangriff' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 3 then 
                pc.set_skill_level(33 ,59) 
                chat("'Degenwirbel' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 4 then 
                pc.set_skill_level(34 ,59) 
                chat("'Tarnung' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 5 then 
                pc.set_skill_level(35 ,59) 
                chat("'Giftwolke' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            end 
        end
        when 83000.use with pc.get_job() == 1 or pc.get_job() == 5 and pc.get_skill_group() == 2 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local fern = select("Federschreiten", "Giftpfeil", "Feuerpfeil", "Pfeilregen", "Wiederholter Schuss", "Abbrechen") 
            if fern == 6 then 
                return 
            elseif fern == 1 then 
                pc.set_skill_level(49 ,59) 
                chat("'Federschreiten' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 2 then 
                pc.set_skill_level(50 ,59) 
                chat("'Giftpfeil' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 3 then 
                pc.set_skill_level(51 ,59) 
                chat("'Feuerpfeil' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 4 then 
                pc.set_skill_level(52 ,59) 
                chat("'Pfeilregen' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 5 then 
                pc.set_skill_level(53 ,59) 
                chat("'Wiederholter Schuss' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return  
            end
        end
         
        when 83000.use with pc.get_job() == 2 or pc.get_job() == 6 and pc.get_skill_group() == 2 begin 
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local magie = select("Dunkler Schlag", "Flammenschlag", "Geist der Flamme", "Dunkler Schutz", "Geisterschlag", "Dunkler Stein", "Abbrechen") 
            if magie == 7 then 
                return 
            elseif magie == 1 then 
                pc.set_skill_level(76 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Dunkler Schlag' ist nun perfektioniert.") 
                return 
            elseif magie == 2 then 
                pc.set_skill_level(77 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Flammenschlag' ist nun perfektioniert.") 
                return 
            elseif magie == 3 then 
                pc.set_skill_level(78 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Geist der Flamme' ist nun perfektioniert.") 
                return 
            elseif magie == 4 then 
                pc.set_skill_level(79 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Dunkler Schutz' ist nun perfektioniert.") 
                return 
            elseif magie == 5 then 
                pc.set_skill_level(80 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Geisterschlag' ist nun perfektioniert.") 
                return
            elseif magie ==65 then 
                pc.set_skill_level(81 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Dunkler Stein' ist nun perfektioniert.") 
                return
            end 
        end
        when 83000.use with pc.get_job() == 2 or pc.get_job() == 6 and pc.get_skill_group() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local waffen = select("Fingerschlag", "Drachenwirbel", "Verzauberte Klinge", "Furcht", "Verzauberte Rüstung", "Zauber Aufheben", "Abbrechen") 
            if waffen == 7 then 
                return 
            elseif waffen == 1 then 
                pc.set_skill_level(61 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Fingerschlag' ist nun perfektioniert.") 
                return 
            elseif waffen == 2 then 
                pc.set_skill_level(62 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Drachenwirbel' ist nun perfektioniert.") 
                return 
            elseif waffen == 3 then 
                pc.set_skill_level(63 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Verzauberte Klinge' ist nun perfektioniert.") 
                return 
            elseif waffen == 4 then 
                pc.set_skill_level(64 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Furcht' ist nun perfektioniert.") 
                return 
            elseif waffen == 5 then 
                pc.set_skill_level(65 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Verzauberte Rüstung' ist nun perfektioniert.") 
                return 
            elseif waffen == 6 then 
                pc.set_skill_level(66 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Zauber aufheben' ist nun perfektioniert.") 
                return 
            end 
        end
         
        when 83000.use with pc.get_job() == 3 or pc.get_job() == 7 and pc.get_skill_level() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.

") 
            local drachen = select("Fliegender Talisman", "Drachenschießen", "Drachengebrüll", "Segen", "Reflektieren", "Hilfe des Drachen", "Abbrechen") 
            if drachen == 7 then 
                return 
            elseif drachen == 1 then 
                pc.set_skill_level(91 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 2 then 
                pc.set_skill_level(92 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 3 then 
                pc.set_skill_level(93 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 4 then 
                pc.set_skill_level(94 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 5 then 
                pc.set_skill_level(95 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 6 then 
                pc.set_skill_level(96 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            end 
        end
        when 83000.use with pc.get_job() == 3 or pc.get_job() == 7 and pc.get_skill_level() == 2 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.

") 
            local heil = select("Angriff+", "Schnelligkeit", "Kurieren", "Blitzkralle", "Blitz beschwören", "Blitzwurf", "Abbrechen") 
            if heil == 7 then 
                return 
            elseif heil == 1 then 
                pc.set_skill_level(111 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Angriff+' ist nun perfektioniert.") 
                return 
            elseif heil == 2 then 
                pc.set_skill_level(112 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Schnelligkeit' ist nun perfektioniert.") 
                return 
            elseif heil == 3 then 
                pc.set_skill_level(113 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Kurieren' ist nun perfektioniert.") 
                return 
            elseif heil == 4 then 
                pc.set_skill_level(114 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Blitzkralle' ist nun perfektioniert.") 
                return 
            elseif heil == 5 then 
                pc.set_skill_level(115 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Blitz beschwören' ist nun perfektioniert.") 
                return 
            elseif heil == 6 then 
                pc.set_skill_level(116 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Blitzwurf' ist nun perfektioniert.") 
                return 
            end 
        end 
    end
end
Error ocurred on compile siegel.quest
08/22/2013 07:42 G.I Duke#8811
Quote:
Originally Posted by .ExTase View Post
Code:
quest siegel begin 
    state start begin 
        when 83000.use with pc.get_job() == 0 or pc.get_job() == 4 and pc.get_skill_group() == 2 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local mento = select("Durchschlag", "Starker Körper", "Stampfer", "Heftiger Schlag", "Schwerschlag", "Abbrechen") 
            if mento == 6 then 
                return 
            elseif mento == 1 then 
                pc.set_skill_level(16 ,59) 
                chat("'Durchschlag' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 2 then 
                pc.set_skill_level(19 ,59) 
                chat("'Starker Körper' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 3 then 
                pc.set_skill_level(18 ,59) 
                chat("'Stampfer' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 4 then 
                pc.set_skill_level(17 ,59) 
                chat("'Heftiger Schlag' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif mento == 5 then 
                pc.set_skill_level(20 ,59) 
                chat("'Schwertschlag' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return  
            end
        end
        when 83000.use with pc.get_job() == 0 or pc.get_job() == 4 and pc.get_skill_group() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.")
            local krieger = select("Schwertwirbel", "Dreiwege Schnitt", "Aura des Schwertes", "Kampfrausch", "Sausen", "Abbrechen") 
            if krieger == 6 then 
                return 
            elseif krieger == 1 then 
                pc.set_skill_level(2 ,59) 
                chat("'Schwertwirbel' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 2 then 
                pc.set_skill_level(1 ,59) 
                chat("'Dreiwege Schnitt' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 3 then 
                pc.set_skill_level(4 ,59) 
                chat("'Aura des Schwertes' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 4 then 
                pc.set_skill_level(3 ,59) 
                chat("'Kampfrausch' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif krieger == 5 then 
                pc.set_skill_level(5 ,59) 
                chat("'Sausen' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return
            end 
        end

        when 83000.use with pc.get_job() == 1 or pc.get_job() == 5 and pc.get_skill_group() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local nah = select("Hinterhalt", "Blitzangriff", "Degenwirbel", "Tarnung", "Giftwolke", "Abbrechen") 
            if nah == 6 then 
                return 
            elseif nah == 1 then 
                pc.set_skill_level(31 ,59) 
                chat("'Hinterhalt' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 2 then 
                pc.set_skill_level(32 ,59) 
                chat("'Blitzangriff' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 3 then 
                pc.set_skill_level(33 ,59) 
                chat("'Degenwirbel' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 4 then 
                pc.set_skill_level(34 ,59) 
                chat("'Tarnung' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif nah == 5 then 
                pc.set_skill_level(35 ,59) 
                chat("'Giftwolke' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            end 
        end
        when 83000.use with pc.get_job() == 1 or pc.get_job() == 5 and pc.get_skill_group() == 2 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local fern = select("Federschreiten", "Giftpfeil", "Feuerpfeil", "Pfeilregen", "Wiederholter Schuss", "Abbrechen") 
            if fern == 6 then 
                return 
            elseif fern == 1 then 
                pc.set_skill_level(49 ,59) 
                chat("'Federschreiten' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 2 then 
                pc.set_skill_level(50 ,59) 
                chat("'Giftpfeil' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 3 then 
                pc.set_skill_level(51 ,59) 
                chat("'Feuerpfeil' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 4 then 
                pc.set_skill_level(52 ,59) 
                chat("'Pfeilregen' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return 
            elseif fern == 5 then 
                pc.set_skill_level(53 ,59) 
                chat("'Wiederholter Schuss' ist nun perfektioniert.") 
                pc.remove_item(83000, 1) 
                return  
            end
        end
         
        when 83000.use with pc.get_job() == 2 or pc.get_job() == 6 and pc.get_skill_group() == 2 begin 
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local magie = select("Dunkler Schlag", "Flammenschlag", "Geist der Flamme", "Dunkler Schutz", "Geisterschlag", "Dunkler Stein", "Abbrechen") 
            if magie == 7 then 
                return 
            elseif magie == 1 then 
                pc.set_skill_level(76 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Dunkler Schlag' ist nun perfektioniert.") 
                return 
            elseif magie == 2 then 
                pc.set_skill_level(77 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Flammenschlag' ist nun perfektioniert.") 
                return 
            elseif magie == 3 then 
                pc.set_skill_level(78 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Geist der Flamme' ist nun perfektioniert.") 
                return 
            elseif magie == 4 then 
                pc.set_skill_level(79 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Dunkler Schutz' ist nun perfektioniert.") 
                return 
            elseif magie == 5 then 
                pc.set_skill_level(80 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Geisterschlag' ist nun perfektioniert.") 
                return
            elseif magie ==65 then 
                pc.set_skill_level(81 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Dunkler Stein' ist nun perfektioniert.") 
                return
            end 
        end
        when 83000.use with pc.get_job() == 2 or pc.get_job() == 6 and pc.get_skill_group() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
            local waffen = select("Fingerschlag", "Drachenwirbel", "Verzauberte Klinge", "Furcht", "Verzauberte Rüstung", "Zauber Aufheben", "Abbrechen") 
            if waffen == 7 then 
                return 
            elseif waffen == 1 then 
                pc.set_skill_level(61 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Fingerschlag' ist nun perfektioniert.") 
                return 
            elseif waffen == 2 then 
                pc.set_skill_level(62 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Drachenwirbel' ist nun perfektioniert.") 
                return 
            elseif waffen == 3 then 
                pc.set_skill_level(63 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Verzauberte Klinge' ist nun perfektioniert.") 
                return 
            elseif waffen == 4 then 
                pc.set_skill_level(64 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Furcht' ist nun perfektioniert.") 
                return 
            elseif waffen == 5 then 
                pc.set_skill_level(65 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Verzauberte Rüstung' ist nun perfektioniert.") 
                return 
            elseif waffen == 6 then 
                pc.set_skill_level(66 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Zauber aufheben' ist nun perfektioniert.") 
                return 
            end 
        end
         
        when 83000.use with pc.get_job() == 3 or pc.get_job() == 7 and pc.get_skill_level() == 1 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.

") 
            local drachen = select("Fliegender Talisman", "Drachenschießen", "Drachengebrüll", "Segen", "Reflektieren", "Hilfe des Drachen", "Abbrechen") 
            if drachen == 7 then 
                return 
            elseif drachen == 1 then 
                pc.set_skill_level(91 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 2 then 
                pc.set_skill_level(92 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 3 then 
                pc.set_skill_level(93 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 4 then 
                pc.set_skill_level(94 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 5 then 
                pc.set_skill_level(95 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            elseif drachen == 6 then 
                pc.set_skill_level(96 ,59) 
                pc.remove_item(83000, 1) 
                chat("'' ist nun perfektioniert.") 
                return 
            end 
        end
        when 83000.use with pc.get_job() == 3 or pc.get_job() == 7 and pc.get_skill_level() == 2 begin
            say_title("Wähle die Fähigkeit, die Du perfektioniern willst.

") 
            local heil = select("Angriff+", "Schnelligkeit", "Kurieren", "Blitzkralle", "Blitz beschwören", "Blitzwurf", "Abbrechen") 
            if heil == 7 then 
                return 
            elseif heil == 1 then 
                pc.set_skill_level(111 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Angriff+' ist nun perfektioniert.") 
                return 
            elseif heil == 2 then 
                pc.set_skill_level(112 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Schnelligkeit' ist nun perfektioniert.") 
                return 
            elseif heil == 3 then 
                pc.set_skill_level(113 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Kurieren' ist nun perfektioniert.") 
                return 
            elseif heil == 4 then 
                pc.set_skill_level(114 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Blitzkralle' ist nun perfektioniert.") 
                return 
            elseif heil == 5 then 
                pc.set_skill_level(115 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Blitz beschwören' ist nun perfektioniert.") 
                return 
            elseif heil == 6 then 
                pc.set_skill_level(116 ,59) 
                pc.remove_item(83000, 1) 
                chat("'Blitzwurf' ist nun perfektioniert.") 
                return 
            end 
        end 
    end
end
Error ocurred on compile siegel.quest
Wer hat denn die Quest geschrieben? .. naja hier

PHP Code:
quest siegel begin 
    state start begin 
        when 83000.use begin
            if pc.get_job() == 0 and pc.get_skill_group() == 2 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local mento = select("Durchschlag", "Starker Körper", "Stampfer", "Heftiger Schlag", "Schwerschlag", "Abbrechen") 
                if mento == 6 then 
                    return 
                elseif mento == 1 then 
                    pc.set_skill_level(16 ,59) 
                    chat("'Durchschlag' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif mento == 2 then 
                    pc.set_skill_level(19 ,59) 
                    chat("'Starker Körper' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1) 
                elseif mento == 3 then 
                    pc.set_skill_level(18 ,59) 
                    chat("'Stampfer' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif mento == 4 then 
                    pc.set_skill_level(17 ,59) 
                    chat("'Heftiger Schlag' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif mento == 5 then 
                    pc.set_skill_level(20 ,59) 
                    chat("'Schwertschlag' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                end
            elseif pc.get_job() == 0 and pc.get_skill_group() == 1 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.")
                local krieger = select("Schwertwirbel", "Dreiwege Schnitt", "Aura des Schwertes", "Kampfrausch", "Sausen", "Abbrechen") 
                if krieger == 6 then 
                    return 
                elseif krieger == 1 then 
                    pc.set_skill_level(2 ,59) 
                    chat("'Schwertwirbel' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif krieger == 2 then 
                    pc.set_skill_level(1 ,59) 
                    chat("'Dreiwege Schnitt' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif krieger == 3 then 
                    pc.set_skill_level(4 ,59) 
                    chat("'Aura des Schwertes' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1) 
                elseif krieger == 4 then 
                    pc.set_skill_level(3 ,59) 
                    chat("'Kampfrausch' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif krieger == 5 then 
                    pc.set_skill_level(5 ,59) 
                    chat("'Sausen' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                end
                
            elseif pc.get_job() == 1 and pc.get_skill_group() == 1 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local nah = select("Hinterhalt", "Blitzangriff", "Degenwirbel", "Tarnung", "Giftwolke", "Abbrechen") 
                if nah == 6 then 
                    return 
                elseif nah == 1 then 
                    pc.set_skill_level(31 ,59) 
                    chat("'Hinterhalt' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif nah == 2 then 
                    pc.set_skill_level(32 ,59) 
                    chat("'Blitzangriff' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif nah == 3 then 
                    pc.set_skill_level(33 ,59) 
                    chat("'Degenwirbel' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif nah == 4 then 
                    pc.set_skill_level(34 ,59) 
                    chat("'Tarnung' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif nah == 5 then 
                    pc.set_skill_level(35 ,59) 
                    chat("'Giftwolke' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                end 
            elseif pc.get_job() == 1 and pc.get_skill_group() == 2 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local fern = select("Federschreiten", "Giftpfeil" "Feuerpfeil", "Pfeilregen", "Wiederholter Schuss", "Abbrechen") 
                if fern == 6 then 
                    return 
                elseif fern == 1 then 
                    pc.set_skill_level(49 ,59) 
                    chat("'Federschreiten' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif fern == 2 then 
                    pc.set_skill_level(50 ,59) 
                    chat("'Giftpfeil' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif fern == 3 then 
                    pc.set_skill_level(51 ,59) 
                    chat("'Feuerpfeil' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif fern == 4 then 
                    pc.set_skill_level(52 ,59) 
                    chat("'Pfeilregen' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                elseif fern == 5 then 
                    pc.set_skill_level(53 ,59) 
                    chat("'Wiederholter Schuss' ist nun perfektioniert.") 
                    pc.remove_item(83000, 1)
                end
         
            elseif pc.get_job() == 2 and pc.get_skill_group() == 2 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local magie = select("Dunkler Schlag", "Flammenschlag", "Geist der Flamme", "Dunkler Schutz", "Geisterschlag", "Dunkler Stein", "Abbrechen") 
                if magie == 7 then 
                    return 
                elseif magie == 1 then 
                    pc.set_skill_level(76 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Dunkler Schlag' ist nun perfektioniert.")
                elseif magie == 2 then 
                    pc.set_skill_level(77 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Flammenschlag' ist nun perfektioniert.")
                elseif magie == 3 then 
                    pc.set_skill_level(78 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Geist der Flamme' ist nun perfektioniert.")
                elseif magie == 4 then 
                    pc.set_skill_level(79 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Dunkler Schutz' ist nun perfektioniert.")
                elseif magie == 5 then 
                    pc.set_skill_level(80 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Geisterschlag' ist nun perfektioniert.")
                elseif magie == 6 then 
                    pc.set_skill_level(81 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Dunkler Stein' ist nun perfektioniert.")
                end
            
            elseif pc.get_job() == 2 and pc.get_skill_group() == 1 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local waffen = select("Fingerschlag", "Drachenwirbel", "Verzauberte Klinge", "Furcht", "Verzauberte Rüstung", "Zauber Aufheben", "Abbrechen") 
                if waffen == 7 then 
                    return 
                elseif waffen == 1 then 
                    pc.set_skill_level(61 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Fingerschlag' ist nun perfektioniert.")
                elseif waffen == 2 then 
                    pc.set_skill_level(62 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Drachenwirbel' ist nun perfektioniert.")
                elseif waffen == 3 then 
                    pc.set_skill_level(63 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Verzauberte Klinge' ist nun perfektioniert.")
                elseif waffen == 4 then 
                    pc.set_skill_level(64 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Furcht' ist nun perfektioniert.")
                elseif waffen == 5 then 
                    pc.set_skill_level(65 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Verzauberte Rüstung' ist nun perfektioniert.")
                elseif waffen == 6 then 
                    pc.set_skill_level(66 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Zauber aufheben' ist nun perfektioniert.")
                end
         
            elseif pc.get_job() == 3 and pc.get_skill_level() == 1 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local drachen = select("Fliegender Talisman", "Drachenschießen", "Drachengebrüll", "Segen", "Reflektieren", "Hilfe des Drachen", "Abbrechen") 
                if drachen == 7 then 
                    return 
                elseif drachen == 1 then 
                    pc.set_skill_level(91 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'' ist nun perfektioniert.")
                elseif drachen == 2 then 
                    pc.set_skill_level(92 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'' ist nun perfektioniert.")
                elseif drachen == 3 then 
                    pc.set_skill_level(93 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'' ist nun perfektioniert.")
                elseif drachen == 4 then 
                    pc.set_skill_level(94 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'' ist nun perfektioniert.")
                elseif drachen == 5 then 
                    pc.set_skill_level(95 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'' ist nun perfektioniert.")
                elseif drachen == 6 then 
                    pc.set_skill_level(96 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'' ist nun perfektioniert.")
                end
                
            elseif pc.get_job() == 3 and pc.get_skill_level() == 2 then
                say_title("Wähle die Fähigkeit, die Du perfektioniern willst.") 
                local heil = select("Angriff+", "Schnelligkeit", "Kurieren", "Blitzkralle", "Blitz beschwören", "Blitzwurf", "Abbrechen") 
                if heil == 7 then 
                    return 
                elseif heil == 1 then 
                    pc.set_skill_level(111 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Angriff+' ist nun perfektioniert.")
                elseif heil == 2 then 
                    pc.set_skill_level(112 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Schnelligkeit' ist nun perfektioniert.")
                elseif heil == 3 then 
                    pc.set_skill_level(113 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Kurieren' ist nun perfektioniert.")
                elseif heil == 4 then 
                    pc.set_skill_level(114 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Blitzkralle' ist nun perfektioniert.")
                elseif heil == 5 then 
                    pc.set_skill_level(115 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Blitz beschwören' ist nun perfektioniert.")
                elseif heil == 6 then 
                    pc.set_skill_level(116 ,59) 
                    pc.remove_item(83000, 1) 
                    chat("'Blitzwurf' ist nun perfektioniert.")
                end 
            end
        end 
    end
end 
MfG

Quote:
Originally Posted by florian_german View Post
quest lvl_nachricht begin
state start begin
when levelup begin
if pc.get_level() == 50 then
notice_all("".. pc.get_name() .." hat gerade")
notice_all("Level 50 erreicht!")
notice_all("Weiter so!")
elseif pc.get_level() == 75 then
notice_all("".. pc.get_name() .." hat gerade")
notice_all("Level 75 erreicht!")
notice_all("Weiter so!")
elseif pc.get_level() == 105 then
notice_all("".. pc.get_name() .." hat gerade")
notice_all("Level 105 erreicht!")
notice_all("Glückwunsch!")
notice_all("Gratuliert ihm!")
notice_all("Für seine/ihre harte Arbeit hat")
end
end
end
end


Wo istn da ein Fehler?
PS: bei mir sind die Leerschritte
Definier mal deine "Leerschritte" bis auf ne Kleinigkeit die man
bei sowas anders macht seh ich nix..

PHP Code:
quest lvl_nachricht begin 
    state start begin 
        when levelup begin
            if pc.get_level() >= 50 then
                notice_all(""..pc.get_name().." hat gerade")
                notice_all("Level 50 erreicht!")
                notice_all("Weiter so!")
            elseif pc.get_level() >= 75 then
                notice_all(""..pc.get_name().." hat gerade")
                notice_all("Level 75 erreicht!")
                notice_all("Weiter so!") 
            elseif pc.get_level() >= 105 then
                notice_all(""..pc.get_name().." hat gerade")
                notice_all("Level 105 erreicht!")
                notice_all("Glückwunsch!") 
                notice_all("Gratuliert ihm!")
                notice_all("Für seine/ihre harte Arbeit hat")
            end
        end
    end 
end 
08/22/2013 09:52 Megawurrrm#8812
Bei mir will die standart Levelup.quest nicht funktionieren. Auf level 2 kommt am linken rand eine schriftrolle mit dem Titel Jagtauftrag lvl2 klickt man drauf verschwindet sie einfach und es passiert nichts mehr bis man sich erneut einloggt

PHP Code:
quest levelup begin
    state run begin
      when letter begin
      local current = pc.getqf("current")
      local completed_level = pc.getqf("complete");
      if current == 0 and 
          pc.get_level() > completed_level and 
          pc.get_level() >  1 and 
          pc.get_level() < 60 then

              local lev = pc.get_level()
              pc.setqf("buttonstate", 2)
              makequestbutton(locale.level..lev..' '..locale.quest_word..' - '..locale.start)
              pc.setqf("current", lev)
              pc.setqf("select", 1)
              pc.setqf("remain", special.levelup_quest[lev][2])
              setskin(NOWINDOW)
          end

          setstate(start)
      end
    end

    state start begin
    when info begin
        local lev = pc.getqf("current")
        if lev == 0 then return end

        setskin(SCROLL)
        setbgimage('level_bg.tga')
        local s = pc.getqf("select")
        if s == 0 then s = 1 end
        addimage(20,12,special.levelup_img[special.levelup_quest[lev][s*2-1]])
        setcolor(0,0,0)
        say(locale.levelup.slay_them1,mob_name(special.levelup_quest[lev][s*2-1]),locale.levelup.slay_them2,"[ENTER]",locale.levelup.slay_target_is,"   : ", mob_name(special.levelup_quest[lev][s*2-1]),"[ENTER]",locale.levelup.slay_target_count," : ", special.levelup_quest[lev][s*2])

        raw_script(locale.reward..":".. special.levelup_quest[lev][5].."% "..locale.exp)

        if lev <= table.getn(special.levelup_reward1) then
            raw_script(","..item_name(special.levelup_reward1[lev][pc.job+1]))
        elseif lev> table.getn(special.levelup_reward1) and lev < 26 then
            raw_script(","..locale.levelup.random_item)
        end    
        if lev>=21 then
            raw_script(","..locale.levelup.gold)
        end

        raw_script(newline)

        levelup.show_mob_pos(lev)

        select(locale.confirm)
        clearmapsignal()
        setskin(NOWINDOW)
    end

    when login begin
        local lev = pc.getqf("current")

        if lev != 0 then
        if pc.getqf("remain") <= 0 then
            setskin(NOWINDOW)
            pc.setqf("buttonstate", 3)
            makequestbutton(locale.level..lev..' '..locale.quest_word..' - '..locale.complete)
        else
            setskin(NOWINDOW)
            pc.setqf("buttonstate", 1)
            makequestbutton(locale.level..lev..' '..locale.quest_word)
        end
        end
    end

    when button begin
        local lev = pc.getqf("current")

        if lev == 0 then return end

        if pc.getqf("buttonstate") == 3 then
        -- ¿Ï·á!
        local s = pc.getqf("select")
        if s == 0 then s = 1 end

        say_title(locale.level..lev..' '..locale.quest_word..' - '..locale.complete)
        say(mob_name(special.levelup_quest[lev][s*2-1]),locale.levelup.slayed_them)
        say("")
        wait()

        if lev <= 20 then -- ÀÌÀü ¹æ½Ä´ë·Î º¸»ó.
            if lev <= table.getn(special.levelup_reward1) then
            pc.give_item("level"..lev.."item", special.levelup_reward1[lev][pc.job+1])
            else
            local v = number(1,100)

            if v <= special.levelup_reward3[1][1] then
                pc.give_item("level"..lev.."item",special.levelup_reward3[1][2],special.levelup_reward3[1][3])
            elseif v <= special.levelup_reward3[2][1] then
                pc.give_item("level"..lev.."item",special.levelup_reward3[2][2],special.levelup_reward3[2][3])
            elseif v <= special.levelup_reward3[3][1] then
                pc.give_item("level"..lev.."item",special.levelup_reward3[3][2],special.levelup_reward3[3][3])
            elseif v <= special.levelup_reward3[4][1] then
                pc.give_item("level"..lev.."item",special.levelup_reward3[4][2],special.levelup_reward3[4][3])
            else
                pc.give_item("level"..lev.."item",special.levelup_reward3[5][2],special.levelup_reward3[5][3])
            end
            end

            pc.give_exp_perc("level"..lev.."exp", lev, special.levelup_quest[lev][5])

            if lev == 12 or lev == 14 or lev == 16 or lev == 18 or lev == 20 then
            pc.give_item2(50083)
            say_reward("Gegenstand erhalten: "..item_name(50083) .. "")
            end

        else
            -- give item
            local ll = lev - 20
            if lev < 26 then
            
            local n = table.getn(special.levelup_reward_item_21[ll])
            local t = special.levelup_reward_item_21[ll][number(1, n)]
            say_reward(locale.reward .. " : ")
            if type(t) == 'table' then
                pc.give_item2(t[1], t[2])
                  say_reward("Gegenstand erhalten: "..t[2].."*Ó"..item_name(t[1]).."ª««~.")
            else
                pc.give_item2(t)
                   say_reward("Gegenstand erhalten: "..item_name(t).."ª««~.")
            end

            end
            local reward_gold = special.levelup_reward_gold21
            local reward_exp = special.levelup_reward_exp21

            if lev >= 31 and lev <= 40 then
            reward_gold = special.levelup_reward_gold31
            reward_exp = special.levelup_reward_exp31
            elseif lev >= 41 and lev <= 50 then
            reward_gold = special.levelup_reward_gold41
            reward_exp = special.levelup_reward_exp41
                elseif lev >= 51 and lev <= 60 then
            reward_gold = special.levelup_reward_gold51
            reward_exp = special.levelup_reward_exp51
            end

            -- give money
            n = number(0, 300)
            local i = 0
            for i = 1, table.getn(reward_gold) do
            if n < reward_gold[i][2] then
                pc.change_money(reward_gold[i][1])
                  say_reward("Item erhalten: "..reward_gold[i][1].."¨â.")
                break
            else
                n = n - reward_gold[i][2]
            end
            end

            -- give exp
            n = number(0, 300)
            i = 0
            for i = 1, table.getn(reward_exp) do
            if n < reward_exp[i][2] then
                pc.give_exp_perc("level"..lev.."exp", lev, reward_exp[i][1])
                  say_reward("Item erhalten: "..reward_exp[i][1].."%¸gÅç*È.")
                break
            else
                n = n - reward_exp[i][2]
            end
            end

            say("")

        end

        local old_lev = lev

        lev = lev + 1

        -- ÇöÀç ·¹º§ÀÌ ´ÙÀ½ ·¹º§ Äù½ºÆ®¸¦ ÇÒ ¼ö Àִ ·¹º§À̸頹ٷΠ½ÃÀÛÇؾߠÇÑ´Ù.
        if lev > 1 and lev < 60 and pc.level >= lev then
            pc.setqf("buttonstate", 2)
            makequestbutton(locale.level..lev..' '..locale.quest_word..' - '..locale.start)
            pc.setqf("current", lev)
            pc.setqf("select", 1)
            pc.setqf("remain",special.levelup_quest[lev][2])
            setskin(NOWINDOW)
            return
        else
            pc.setqf("complete", old_lev)
            pc.setqf("current", 0)
            q.done()
        end

        elseif pc.getqf("buttonstate") == 2 then
        -- ·¹º§¾÷ Äù½ºÆ® ¾È³»Ã¢À» ¶ç¿ò
        local lev = pc.getqf("current")
        if lev == 0 then
            q.done()
        end

        say(locale.levelup.choice1)
        say(locale.levelup.choice2)

        local sel = select(
        mob_name(special.levelup_quest[lev][1]).." "..special.levelup_quest[lev][2]..locale.levelup.kill_count, 
        mob_name(special.levelup_quest[lev][3]).." "..special.levelup_quest[lev][4]..locale.levelup.kill_count
        )

        setskin(SCROLL)
        setbgimage('level_bg.tga')
        pc.setqf("select", sel)
        addimage(20, 12, special.levelup_img[special.levelup_quest[lev][sel*2-1]])
        setcolor(0,0,0)
        say(locale.levelup.slay_them1, mob_name(special.levelup_quest[lev][sel*2-1]), locale.levelup.slay_them2, "[ENTER]", locale.levelup.slay_target_is,"   : ", mob_name(special.levelup_quest[lev][sel*2-1]), "[ENTER]", locale.levelup.slay_target_count, " : ", special.levelup_quest[lev][sel*2])
        
            raw_script(locale.reward..":".. special.levelup_quest[lev][5].."% "..locale.exp)
            
            if lev <=  table.getn(special.levelup_reward1) then
                raw_script(","..item_name(special.levelup_reward1[lev][pc.job+1]))
            elseif lev> table.getn(special.levelup_reward1) and lev < 26 then
                raw_script(","..locale.levelup.random_item)
            end
            if lev>=21 then 
                raw_script(","..locale.levelup.gold)
        end

        raw_script(newline)

        levelup.show_mob_pos(lev)

        local s = select(locale.levelup.lets_go)

        if s == 1 then
            setskin(NOWINDOW)
            pc.setqf("remain",special.levelup_quest[lev][sel*2])
            syschat("<"..locale.quest_word.."> ", mob_name(special.levelup_quest[lev][sel*2-1]), " ", special.levelup_quest[lev][sel*2],locale.levelup.kill_count)
            q.set_title(locale.level..' '..locale.quest_word..' - '..locale.eliminate_on_begin..mob_name(special.levelup_quest[lev][sel*2-1])..locale.eliminate_on_end)
            q.set_counter(locale.levelup.remain_count, pc.getqf("remain"))
            q.start()
        end

        setskin(NOWINDOW)
        clearmapsignal()

        elseif pc.getqf("buttonstate") == 1 then
        -- Áö³*¹ø Äù½ºÆ®°¡ ³¡³ªÁö ¾Ê¾Æ¼* ·Î±×ÀΠ½Ã¿¡ ´Ù½Ã º¸¿©ÁÙ ¶§
            local s = pc.getqf("select")
            if s == 0 then s = 1 end

            local lev = pc.getqf("current")

            if lev != 0 then
                say(locale.levelup.prev_quest1..mob_name(special.levelup_quest[lev][s*2-1]).." "..pc.getqf("remain")..locale.levelup.prev_quest2)
                local ss = select(locale.levelup.prev_quest_info,locale.levelup.prev_quest_go)

                if ss == 1 then
                    setskin(SCROLL)
                    setbgimage('level_bg.tga')
                    addimage(20,12,special.levelup_img[special.levelup_quest[lev][s*2-1]])
                    setcolor(0,0,0)

                    say(locale.levelup.slay_them1,mob_name(special.levelup_quest[lev][s*2-1]),locale.levelup.slay_them2,"[ENTER]",locale.levelup.slay_target_is,"   : ", mob_name(special.levelup_quest[lev][s*2-1]),"[ENTER]",locale.levelup.slay_target_count," : ", special.levelup_quest[lev][s*2])

                    raw_script(locale.reward..":".. special.levelup_quest[lev][5].."% "..locale.exp)
                    
                    if lev <=  table.getn(special.levelup_reward1) then
                        raw_script(","..item_name(special.levelup_reward1[lev][pc.job+1]))
                    elseif lev> table.getn(special.levelup_reward1) and lev < 26 then
                        raw_script(","..locale.levelup.random_item)
                    end    
                    if lev>=21 then 
                    raw_script(","..locale.levelup.gold)
                    end

                    raw_script(newline)

--                    q.set_title(locale.level..' '..locale.quest_word..' - '..locale.eliminate_on_begin..mob_name(special.levelup_quest[lev][s*2-1])..locale.eliminate_on_end)
--                    q.set_counter(locale.levelup.remain_count, pc.getqf("remain"))
--                    q.start()

--                    levelup.show_mob_pos(lev)

                    select(locale.confirm)
                    setskin(NOWINDOW)
                    clearmapsignal()

                end

                setskin(NOWINDOW)
                q.set_title(locale.level..' '..locale.quest_word..' - '..locale.eliminate_on_begin..mob_name(special.levelup_quest[lev][s*2-1])..locale.eliminate_on_end)
                q.set_counter(locale.levelup.remain_count, pc.getqf("remain"))
                --q.set_icon(string.format("level_%02d.sub", lev))
                q.start()
            end
        end

        pc.setqf("buttonstate", -1)
    end

    when levelup begin
        local lev = pc.getqf("current");

        if lev == 0 then
        lev = pc.level

        -- ·¹º§ 2ºÎÅÍ 60±îÁö¸¸ Äù½ºÆ®°¡ ½ÇÇàµÇ¾î¾ß ÇÑ´Ù.
        if lev < 2 or lev > 60 then return end

        pc.setqf("buttonstate", 2)
        makequestbutton(locale.level..lev..' '..locale.quest_word..' - '..locale.start)
        pc.setqf("current", lev)
        pc.setqf("select", 1)
        pc.setqf("remain", special.levelup_quest[lev][2])
        setskin(NOWINDOW)
        end
    end

    when kill begin
        local sel = pc.getqf("select")

        if sel == 0 then
        sel = 1
        end

        local lev = pc.getqf("current")

        if lev != 0 and npc.race == (special.levelup_quest[lev][sel*2-1]) and pc.getqf("buttonstate") == -1 then
        local remain = pc.getqf("remain") - 1

        if remain <= 0 then
            pc.setqf("remain", 0)
            q.set_counter_value(0)
            setskin(NOWINDOW)
            makequestbutton(locale.level..lev..' '..locale.quest_word..' - '..locale.complete)
            pc.setqf("buttonstate", 3)
        else
            pc.setqf("remain", remain)
            q.set_counter_value(remain)
        end
        end
    end

    function show_mob_pos(lev)
        map_index = pc.get_map_index()

        if map_index <= 0 then
        test_chat("show_mob_pos: map_index("..map_index..") < 0")
        return 
        end

        if map_index > table.getn(special.lvq_map) then
        test_chat("show_mob_pos: map_index("..map_index..") > max("..table.getn(special.lvq_map)..")")
        return
        end

        lev_quest_list = special.lvq_map[map_index]
        if not lev_quest_list then
        test_chat("show_mob_pos: special.lvq_map[map_index("..map_index..")] is nil")
        return
        end

        mob_pos_list = lev_quest_list[lev]
        if not mob_pos_list then
        test_chat("show_mob_pos: special.lvq_map[map_index("..map_index..")][lev("..lev..")] is nil")
        return
        end

        table.foreachi(
        mob_pos_list, 
        function (n, mob_pos) 
        test_chat("addmapsignal("..mob_pos[1]..", "..mob_pos[2]..")")
        addmapsignal(mob_pos[1]*100, mob_pos[2]*100) 
        end
        )
        setmapcenterposition(200, 0)
    end
end
end 
08/22/2013 17:22 G.I Duke#8813
Quote:
Originally Posted by _Jimbo View Post
wo muss ich das angeben ?
entweder
PHP Code:
with pc.in_dungeon(map_index) and 
oder
PHP Code:
with pc.in_dungeon() == map_index and 
MfG
08/22/2013 19:17 KaffeePausex3#8814
Roter wald ende kann ich nicht porten und in die grotte komme ich auch nicht hin


PHP Code:
quest warpring begin
    state start begin
        when 70007.use begin
            say_title("Warpring") 
            say("Wohin möchtest du Teleportiert werden?")
        local empire = pc.get_empire() 
                    local selectmap = select("Map1","Map2","Orktal","Wüste","Eisland","Feuerland","Weiter","Abbrechen")
                    if selectmap == 8 then
                return
                    elseif selectmap == 7 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            local selectmap2 = select("Dämonenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Land der Riesen","Abbrechen")
                    if selectmap2 == 7 then
                        return
                    elseif selectmap2 == 1 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(590500,110800)
                    elseif selectmap2 == 2 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local geisterselect = select("Anfang","Ende","Abbrechen")
                    if geisterselect == 3 then
                        return
                    elseif geisterselect == 1 then
            pc.warp(290500,5700)
                    elseif geisterselect == 2 then
            pc.warp(286400,44200)
            end
                    elseif selectmap2 == 3 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local roterselect = select("Anfang","Ende","Abbrechen")
                    if roterselect == 3 then
                        return
                    elseif roterselect == 1 then
            pc.warp(1119900,70800)
                    elseif geisterselect == 2 then
            pc.warp(1119100,7700)
            end
                    elseif selectmap2 == 4 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(91700, 525300)
                    elseif selectmap2 == 5 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(27600, 142700)
                    elseif selectmap2 == 6 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(819200, 716800)
            end
                    elseif selectmap == 1 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
                    if map1select == 4 then
                        return
                    elseif map1select == 1 then
            pc.warp(474300, 954800)
                    elseif map1select == 2 then
            pc.warp(63800, 166400)
                    elseif map1select == 3 then
            pc.warp(959900, 269200)
            end
                    elseif selectmap == 2 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
                    if map2select == 4 then
                        return
                    elseif map2select == 1 then
            pc.warp(353100, 882900)
                    elseif map2select == 2 then
            pc.warp(145500, 240000)
                    elseif map2select == 3 then
            pc.warp(863900, 246000)
            end
                    elseif selectmap == 3 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local otselect = select("Anfang","Mitte","Abbrechen")
                    if otselect == 3 then
                        return
                    elseif otselect == 1 then
            if empire == 1 then
            pc.warp(402100, 673900)
                    elseif empire == 2 then
            pc.warp(270400, 739900)
                    elseif empire == 3 then
            pc.warp(321300, 808000)
            end
                    elseif otselect == 2 then
            pc.warp(332800, 745600)
            end
                    elseif selectmap == 4 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local wuesteselect = select("Anfang","Mitte","Abbrechen")
                    if wuesteselect == 3 then
                        return
                    elseif wuesteselect == 1 then
            if empire == 1 then
            pc.warp(217800, 627200)
                    elseif empire == 2 then
            pc.warp(221900, 502700)
                    elseif empire == 3 then
            pc.warp(344000, 502500)
            end
                    elseif wuesteselect == 2 then
            pc.warp(296800, 547100)
            end
                    elseif selectmap == 5 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local eisselect = select("Anfang","Mitte","Abbrechen")
                    if eisselect == 3 then
                        return
                    elseif eisselect == 1 then
            if empire == 1 then
            pc.warp(434200, 290600)
                    elseif empire == 2 then
            pc.warp(375200, 174900)
                    elseif empire == 3 then
            pc.warp(491800, 173600)
            end
                    elseif eisselect == 2 then
            pc.warp(436500, 215400)
            end
                    elseif selectmap == 6 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local feuerselect = select("Anfang","Mitte","Abbrechen")
                    if feuerselect == 3 then
                        return
                    elseif feuerselect == 1 then
            if empire == 1 then
            pc.warp(599400, 756300)
                    elseif empire == 2 then
            pc.warp(597800, 622200)
                    elseif empire == 3 then
            pc.warp(730700, 689800)
            end
                    elseif feuerselect == 2 then
            pc.warp(600800, 687100)
            end
                end
                    end
                        end
                            end 
08/22/2013 20:48 G.I Duke#8815
Quote:
Originally Posted by KaffeePausex3 View Post
Roter wald ende kann ich nicht porten und in die grotte komme ich auch nicht hin


PHP Code:
quest warpring begin
    state start begin
        when 70007.use begin
            say_title("Warpring") 
            say("Wohin möchtest du Teleportiert werden?")
        local empire = pc.get_empire() 
                    local selectmap = select("Map1","Map2","Orktal","Wüste","Eisland","Feuerland","Weiter","Abbrechen")
                    if selectmap == 8 then
                return
                    elseif selectmap == 7 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            local selectmap2 = select("Dämonenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Land der Riesen","Abbrechen")
                    if selectmap2 == 7 then
                        return
                    elseif selectmap2 == 1 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(590500,110800)
                    elseif selectmap2 == 2 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local geisterselect = select("Anfang","Ende","Abbrechen")
                    if geisterselect == 3 then
                        return
                    elseif geisterselect == 1 then
            pc.warp(290500,5700)
                    elseif geisterselect == 2 then
            pc.warp(286400,44200)
            end
                    elseif selectmap2 == 3 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local roterselect = select("Anfang","Ende","Abbrechen")
                    if roterselect == 3 then
                        return
                    elseif roterselect == 1 then
            pc.warp(1119900,70800)
                    elseif geisterselect == 2 then
            pc.warp(1119100,7700)
            end
                    elseif selectmap2 == 4 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(91700, 525300)
                    elseif selectmap2 == 5 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(27600, 142700)
                    elseif selectmap2 == 6 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
            pc.warp(819200, 716800)
            end
                    elseif selectmap == 1 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
                    if map1select == 4 then
                        return
                    elseif map1select == 1 then
            pc.warp(474300, 954800)
                    elseif map1select == 2 then
            pc.warp(63800, 166400)
                    elseif map1select == 3 then
            pc.warp(959900, 269200)
            end
                    elseif selectmap == 2 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
                    if map2select == 4 then
                        return
                    elseif map2select == 1 then
            pc.warp(353100, 882900)
                    elseif map2select == 2 then
            pc.warp(145500, 240000)
                    elseif map2select == 3 then
            pc.warp(863900, 246000)
            end
                    elseif selectmap == 3 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local otselect = select("Anfang","Mitte","Abbrechen")
                    if otselect == 3 then
                        return
                    elseif otselect == 1 then
            if empire == 1 then
            pc.warp(402100, 673900)
                    elseif empire == 2 then
            pc.warp(270400, 739900)
                    elseif empire == 3 then
            pc.warp(321300, 808000)
            end
                    elseif otselect == 2 then
            pc.warp(332800, 745600)
            end
                    elseif selectmap == 4 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local wuesteselect = select("Anfang","Mitte","Abbrechen")
                    if wuesteselect == 3 then
                        return
                    elseif wuesteselect == 1 then
            if empire == 1 then
            pc.warp(217800, 627200)
                    elseif empire == 2 then
            pc.warp(221900, 502700)
                    elseif empire == 3 then
            pc.warp(344000, 502500)
            end
                    elseif wuesteselect == 2 then
            pc.warp(296800, 547100)
            end
                    elseif selectmap == 5 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local eisselect = select("Anfang","Mitte","Abbrechen")
                    if eisselect == 3 then
                        return
                    elseif eisselect == 1 then
            if empire == 1 then
            pc.warp(434200, 290600)
                    elseif empire == 2 then
            pc.warp(375200, 174900)
                    elseif empire == 3 then
            pc.warp(491800, 173600)
            end
                    elseif eisselect == 2 then
            pc.warp(436500, 215400)
            end
                    elseif selectmap == 6 then
                        say_title("Warpring") 
                        say("Wohin möchtest du Teleportiert werden?")
                    local feuerselect = select("Anfang","Mitte","Abbrechen")
                    if feuerselect == 3 then
                        return
                    elseif feuerselect == 1 then
            if empire == 1 then
            pc.warp(599400, 756300)
                    elseif empire == 2 then
            pc.warp(597800, 622200)
                    elseif empire == 3 then
            pc.warp(730700, 689800)
            end
                    elseif feuerselect == 2 then
            pc.warp(600800, 687100)
            end
                end
                    end
                        end
                            end 
quest is richtig. hin laufen richtige Koordinaten
eingeben und einfügen.
08/22/2013 21:02 KaffeePausex3#8816
Es funktioniert einfach nicht bei mir .....!


pc.warp(1119100,7700) die sind falsch oder nicht was bedeutet den 1119100 ? und wie kriegt man es heraus das es diese zahl sein muss
08/22/2013 22:22 G.I Duke#8817
Quote:
Originally Posted by KaffeePausex3 View Post
Es funktioniert einfach nicht bei mir .....!


pc.warp(1119100,7700) die sind falsch oder nicht was bedeutet den 1119100 ? und wie kriegt man es heraus das es diese zahl sein muss
geh dahin wohin es dich porten soll.. gib in den Chat "/state"
ein und nehm die Koordinaten aus den ( ) und setz 2 Nullen dahinter. Bsp.: (1234, 4321) dann machst du:
PHP Code:
pc.warp(123400, 432100) 
08/23/2013 12:12 ©Fitchi#8818
Habe die Drachenraumquest:

PHP Code:
quest Tempel_of_dragon begin 
state start begin 
         
        when 30121.chat."Tempel des Drachen" with pc.get_map_index() == 73 begin 
        if get_time() > game.get_event_flag("Grotte_time") then 
        game.set_event_flag("Grotte_zugang",0) 
        end 
        if pc.is_gm() or pc.count_item(80041) >= 1 then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Hallo Gamemaster, "..pc.get_name().."") 
        say("Ich lasse dich auch ohne die Schlüssel und") 
        say("das Passwort passieren.") 
        wait() 
        pc.warp(843200, 1066900) 
        return 
        end 
        if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Dir fehlen "..item_name(30179).."") 
        say_item_vnum(30179) 
        say("Komme wieder wenn du 3 besitzt.") 
        return 
        end 
        if game.get_event_flag("Grotte_zugang") == 1 then 
        say_title(""..mob_name(30121).."") 
        say("") 
        pc.setqf("grotte_passworto", 078954687921) 
        if pc.getqf("abgabe") == 1 then 
        pc.setqf("abgabe",0) 
        say("Du hast bereits deine 3 Schlüssel abgeben.") 
        say("Ich lasse dich passieren.") 
        pc.setqf("erlaubt",1) 
        wait() 
        pc.warp(843200, 1066900) 
        return 
        end 
        say("Tut mir Leid, der Raum ist reseviert.") 
        say("Wenn du ein die Kennzahl hast für den Zugang,") 
        say("gebe sie jetzt bitte ein.") 
        local passwort = tonumber(input("")) 
        --pc.setqf("grotte_passworto", passwort)  
        if game.get_event_flag("Grotte_passwort") == passwort then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Die Kennzahl stimmt überein.") 
        if pc.count_item(30179) < 3 then 
        say("Ich kann dir den zutritt nicht gewähren") 
        say("Dir fehlt "..item_name(30179).."") 
        say_item_vnum(30179) 
        say("Komme wieder wenn du 3 besitzt.") 
        return 
        end 
        say("Ich gewähre dir den zutritt!") 
        pc.setqf("erlaubt",1) 
        wait() 
        if pc.can_warp() then    pc.remove_item("30179",3) end 
        pc.warp(843200, 1066900) 
        elseif passi != pc.getqf("grotte_passworto") then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Die Kennzahl ist leider falsch.") 
        return 
        end 
        end 
        if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then 
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Du bist der erste der den Eintritt in den Tempel") 
        say("des Drachens verlangt. Ich werde dich passieren") 
        say("lassen, sofern du einen gewunden Schlüssel") 
        say("besitzt. Bevor du den Raum betreten darfst") 
        say("musst du eine geheime Zahl eingeben.") 
        say("Diese kannst du innerhalb von 5 Minuten an") 
        say("deine Mitstreiter weitergeben, so das auch") 
        say("sie den Raum betreten können. ") 
        say("") 
        say("Bedenke auch das die Macht der Schlüssel nur") 
        say("30 Minuten lang hält. In dieser Zeit müsst") 
        say("ihr den Drachen besiegt haben.") 
        local i = select("Ich bin Bereit", "Abbrechen") 
        if 1 == i then 
        say_title(""..mob_name(30121).."") 
        say("Dann Lege jetzt die kennzahl fest.") 
        local passwort = tonumber(input("")) 
        if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then 
        game.set_event_flag("Grotte_zugang",1) 
        game.set_event_flag("Grotte_passwort",passwort) 
        local times = get_time() + 300 --Wartezeit 
        game.set_event_flag("Grotte_time", times) 
        say_title(""..mob_name(30121).."") 
        pc.setqf("abgabe",1) 
        say("") 
        say("Die Kennzahl lautet:") 
        chat("Die Kennzahl lautet für den Tempel des Drachen: "..passwort.."") 
        say_reward(""..passwort.."") 
        say("Gib die Kennzahl deinen Mitstreitern weiter") 
        pc.remove_item("30179",3) 
        else  
        say_title(""..mob_name(30121).."") 
        say("") 
        say("Beim Kennzahl setzen ist ein fehler aufgetreten, versuche es erneut.") 
        say("Bitte gebe nur Ziffern ein.") 
        end 
        end 
        end 
        end 
    when login with pc.get_map_index() == 97 and not pc.is_gm() begin 
        if pc.count_item("80041") >= 1 then chat("Tempel des Drachen: Du hast das GM-Item, prüfungen werden geblockt!") return end 
        if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 97 then 
         chat("Dir ist es nicht erlaubt diese Map zu betreten. "..pc.get_level().." "..pc.getqf("erlaubt").." "..pc.get_map_index().." ") 
            warp_to_village() 
        end 
        chat("Willkommen, zerstört schnell den Stein um zu dem Drachen zu gelangen.") 
        chat("Aber beeilt euch, sonst fliegt ihr raus") 
        local sekunden = game.get_event_flag("Grotte_time") - get_time() 
        notice_in_map("Verbleibende Zeit bis ihr rausfliegt: "..sekunden.." Sekunden") 
        timer("skipia_boss_ende", sekunden)
        pc.set_warp_location(73 , 1825, 12207) 
        end 
    when 8023.kill with pc.get_map_index() == 97 begin 
        timer("skipia_boss_goo", 2) 
        notice_in_map("Ihr hab den Stein zerstört ihr werden nun in die nächste Ebene gebracht") 
        end 
    when skipia_boss_goo.timer begin 
        game.set_event_flag("Grotte_zugang",0) 
        d.new_jump_all(97, 8436, 10669) 
        d.setf("grotte_boss", 1) 
        d.spawn_mob(9012, 239, 173) 
        end 
    when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin 
    local n =d.getf("count") + 1 
    d.setf("count", n)  
    --notice_all("Metin killed "..n.."") 
    if n > 2 then 
    local t = number(1,4) 
    --notice_all("Spawn Metin") 
    if 1 == t then 
    d.regen_file("data/dungeon/skia_boss1.txt") 
    elseif 2 == t then 
    d.regen_file("data/dungeon/skia_boss2.txt") 
    elseif 3 == t then 
    d.regen_file("data/dungeon/skia_boss3.txt") 
    else 
    d.regen_file("data/dungeon/skia_boss4.txt") 
    end 
    end 
    end 
    when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin 
        d.setf("grotte_boss", 3) 
        notice_all("Die Gruppe von "..pc.get_name().." hat Beran-Setaou getötet.") 
        d.notice("Beeindruckend, ihr habt ihn tatsächlich besiegt.") -- Als Abschluss könnt ihr noch die Metins zerstören") 
        d.notice("ihr werdet in 60 Sekunden zurück in Grotte 2 gebracht.") 
        timer("skipia_boss_end", 60) 
        d.kill_all() 
        d.spawn_mob(9012, 239, 173) 
        d.clear_regen() 
        end 

    when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin 
    pc.set_warp_location(73 , 1825, 12207) 
    end 
    when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin 
        timer("skipia_boss_end", 3600)     
        d.set_regen_file("data/dungeon/skia_boss.txt") 
        local t = number(1,4) 
        if 1 == t then 
            d.regen_file("data/dungeon/skia_boss1.txt") 
            elseif 2 == t then 
            d.regen_file("data/dungeon/skia_boss2.txt") 
            elseif 3 == t then 
            d.regen_file("data/dungeon/skia_boss3.txt") 
            else 
            d.regen_file("data/dungeon/skia_boss4.txt") 
        end 
        local o = number(1,4) 
        if 1 == o then 
            d.regen_file("data/dungeon/skia_boss1.txt") 
            elseif 2 == o then 
            d.regen_file("data/dungeon/skia_boss2.txt") 
            elseif 3 == o then 
            d.regen_file("data/dungeon/skia_boss3.txt") 
            else 
            d.regen_file("data/dungeon/skia_boss4.txt") 
            end     
        d.setf("grotte_boss", 2) 
        d.notice("Willkommen im Tempel des Drachen, ihr habt maximal 1 Stunde Zeit Beran-Setaou zu besiegen, Viel Erfolg") 
        d.setf("count", 0) 
        pc.set_warp_location(73 , 1825, 12207) 
        end 

    when login with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin -- begin 
    --pc.warp(181700, 1220600) 
    end 
    when skipia_boss_end.timer begin 
        d.exit_all() 
        end 
    when skipia_boss_ende.timer begin 
        kill_all_in_map(97) 
        game.set_event_flag("Grotte_zugang",0) 
        d.setf("grotte_boss", 1) 
        d.exit_all() 
    end 
    when login with pc.get_map_index() != 97 or not pc.in_dungeon() begin 
    pc.setqf("erlaubt",0) 
    end 
    end 
end 
Bei mir ist es das Problem, das er den kaiserfels nicht Spawnt...

Wenn ich den Kaiserfels manuell via Befehl Spawne und ihn zerstöre dann geht alles wie geplant weiter!
Bitte um dringende Hilfe!!


MFG Fitchi
08/23/2013 19:46 ♥Punchinello♥#8819
PHP Code:
quest multiring begin   
    state start begin   
        when 70007.use begin   
            say_title("Warpring:")   
            local s=select("Map1", "Map2", "Orktal", "Eisland", "Wüste", "Spinnendungeon", "WEITER", "Beenden")   
            if 1==s then   
                say_title("Warpring:")   
                local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")   
                if 1==a then   
                    pc.warp(474086, 954540)   
                elseif 2==a then   
                    pc.warp(63098, 166617)   
                elseif 3==a then   
                    pc.warp(960054, 268807)   
                elseif 4==a then   
                    return   
                end   
            elseif 2==s then   
                say_title("Warpring:")   
                local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")   
                if 1==a then   
                    pc.warp(353003, 882460)   
                elseif 2==a then   
                    pc.warp(145582, 240227)   
                elseif 3==a then   
                    pc.warp(863589, 246139)   
                elseif 4==a then   
                    return   
                end   
            elseif 3==s then   
                pc.warp(332885, 745737)   
            elseif 4==s then   
                pc.warp(435705, 215084)   
            elseif 5==s then   
                pc.warp(296758, 547724)
            elseif 6==s then   
                    say_title("Warping:")   
                    local sd = select ("SD1", "SD2", "Beenden")   
                    if 1==sd then   
                        pc.warp(51200, 486400)   
                    elseif 2==sd then   
                        pc.warp(665600, 435200)                           
                    elseif 3==sd then   
                        return   
                    end                
            elseif 7==s then   
                if pc.get_level() > 1 then       
                    say_title("Weitere Maps:")   
                    local a=select ("Feuerland", "Dämonenturm", "Lungsam", "Roter Wald", "Beenden")   
                    if 1==a then   
                        pc.warp(600813, 687144)    
                    elseif 1==a then   
                        pc.warp(590516, 110606)   
                    elseif 2==a then   
                        end
                    elseif 3==a then   
                        pc.warp(281600, 5700) 
                    elseif 4==a then   
                        pc.warp(1049600, 69800) 
                    elseif 5==a then 
                        return            
                    end
                end
            end
        end    
    end       
end 

Bekomme diesen Fehler


must start with 'quest'
Warpring.quest:67:Error occured on compile Warpring.quest
08/23/2013 23:15 G.I Duke#8820
Quote:
Originally Posted by Shiro2Punshi View Post
PHP Code:
quest multiring begin   
    state start begin   
        when 70007.use begin   
            say_title("Warpring:")   
            local s=select("Map1", "Map2", "Orktal", "Eisland", "Wüste", "Spinnendungeon", "WEITER", "Beenden")   
            if 1==s then   
                say_title("Warpring:")   
                local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")   
                if 1==a then   
                    pc.warp(474086, 954540)   
                elseif 2==a then   
                    pc.warp(63098, 166617)   
                elseif 3==a then   
                    pc.warp(960054, 268807)   
                elseif 4==a then   
                    return   
                end   
            elseif 2==s then   
                say_title("Warpring:")   
                local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")   
                if 1==a then   
                    pc.warp(353003, 882460)   
                elseif 2==a then   
                    pc.warp(145582, 240227)   
                elseif 3==a then   
                    pc.warp(863589, 246139)   
                elseif 4==a then   
                    return   
                end   
            elseif 3==s then   
                pc.warp(332885, 745737)   
            elseif 4==s then   
                pc.warp(435705, 215084)   
            elseif 5==s then   
                pc.warp(296758, 547724)
            elseif 6==s then   
                    say_title("Warping:")   
                    local sd = select ("SD1", "SD2", "Beenden")   
                    if 1==sd then   
                        pc.warp(51200, 486400)   
                    elseif 2==sd then   
                        pc.warp(665600, 435200)                           
                    elseif 3==sd then   
                        return   
                    end                
            elseif 7==s then   
                if pc.get_level() > 1 then       
                    say_title("Weitere Maps:")   
                    local a=select ("Feuerland", "Dämonenturm", "Lungsam", "Roter Wald", "Beenden")   
                    if 1==a then   
                        pc.warp(600813, 687144)    
                    elseif 1==a then   
                        pc.warp(590516, 110606)   
                    elseif 2==a then   
                        end
                    elseif 3==a then   
                        pc.warp(281600, 5700) 
                    elseif 4==a then   
                        pc.warp(1049600, 69800) 
                    elseif 5==a then 
                        return            
                    end
                end
            end
        end    
    end       
end 

Bekomme diesen Fehler


must start with 'quest'
Warpring.quest:67:Error occured on compile Warpring.quest
Easy Fehler.. ich machs dir aber du musst auch mal
dazulernen also sag mir was du hier
PHP Code:
elseif 7==s then    
                if pc.get_level() > 1 then        
                    say_title("Weitere Maps:")    
                    local a=select ("Feuerland", "Dämonenturm", "Lungsam", "Roter Wald", "Beenden")    
                    if 1==a then    
                        pc.warp(600813, 687144)     
                    elseif 1==a then    
                        pc.warp(590516, 110606)    
                    elseif 2==a then    
                        end 
                    elseif 3==a then    
                        pc.warp(281600, 5700)  
                    elseif 4==a then    
                        pc.warp(1049600, 69800)  
                    elseif 5==a then  
                        return             
                    end 
                end 
            end 
        end     
    end        
end 
siehst und ich geb dir die reparierte..
naja vllt siehst den unterschied und lernst dazu..
PHP Code:
quest multiring begin    
    state start begin    
        when 70007.use begin    
            say_title("Warpring:")    
            local s=select("Map1", "Map2", "Orktal", "Eisland", "Wüste", "Spinnendungeon", "WEITER", "Beenden")    
            if 1==s then    
                say_title("Warpring:")    
                local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")    
                if 1==a then    
                    pc.warp(474086, 954540)    
                elseif 2==a then    
                    pc.warp(63098, 166617)    
                elseif 3==a then    
                    pc.warp(960054, 268807)    
                elseif 4==a then    
                    return    
                end    
            elseif 2==s then    
                say_title("Warpring:")    
                local a=select ("Rotes", "Gelbes", "Blaues", "Beenden")    
                if 1==a then    
                    pc.warp(353003, 882460)    
                elseif 2==a then    
                    pc.warp(145582, 240227)    
                elseif 3==a then    
                    pc.warp(863589, 246139)    
                elseif 4==a then    
                    return    
                end    
            elseif 3==s then    
                pc.warp(332885, 745737)    
            elseif 4==s then    
                pc.warp(435705, 215084)    
            elseif 5==s then    
                pc.warp(296758, 547724) 
            elseif 6==s then    
                    say_title("Warping:")    
                    local sd = select ("SD1", "SD2", "Beenden")    
                    if 1==sd then    
                        pc.warp(51200, 486400)    
                    elseif 2==sd then    
                        pc.warp(665600, 435200)                            
                    elseif 3==sd then    
                        return    
                    end                 
            elseif 7==s then    
                if pc.get_level() > 1 then        
                    say_title("Weitere Maps:")    
                    local a=select ("Feuerland", "Dämonenturm", "Lungsam", "Roter Wald", "Beenden")    
                    if 1==a then    
                        pc.warp(600813, 687144)     
                    elseif 2==a then    
                        pc.warp(590516, 110606)
                    elseif 3==a then    
                        pc.warp(281600, 5700)  
                    elseif 4==a then    
                        pc.warp(1049600, 69800)  
                    elseif 5==a then         
                    end 
                end 
            end 
        end     
    end        
end 
MfG
Page 588 of 845 « First 88488538578586587 588 589590598638688 Last »