[SERVICE] Die Questkontrolle

12/28/2012 16:01 ismaily86#7366
Ich habe ein Problem mit dieser Quest hier ...
Nach d.exitall() von der bosskammer aus werde ich und mein dungeon team nicht
rausgeschmissen! sie warp wieder an die gleich stelle wie d . new_jump_all ( 177 , 880 , 6154 )


Woran kann das liegen ?



Code:
quest orumcek_zindani_3 begin
	state start begin
		when 2010.kill or 2011.kill or 2012.kill or 2013.kill or 2014.kill with pc.get_map_index() == 177 begin
			if party.is_party() then
				local anahtar = party.getf("anahtar")
				party.setf("anahtar",anahtar +1)
				if anahtar < 10 then
					party.chat(" Tebrikler Bir Anahtar Daha Buldunuz. ")
					game.drop_item("27996")
					party.chat(" Boss Odası İçin Gerekli Anahtar Sayısı : "..10-anahtar.."  ")
				else
					party.chat(" Boss Odası İçin Gerekli Anahtara Sahipsin. ")
					party.chat(" Kat Görevlisinden Boss Odasına İlerleyin. ")
					party.chat(" NOT: Sadece Grup Lideri İşlemi Yapabilir. ")
				end
			end
		end
		when login with pc.get_map_index() == 177 begin
			if pc.get_empire() == 1 then
				pc.set_warp_location(1, 4693,9642)
			elseif pc.get_empire() == 2 then 
				pc.set_warp_location(21, 557,1579)
			elseif pc.get_empire() == 3 then
				pc.set_warp_location(41, 9696,2784)
			end
		end
		when login with pc.get_map_index() >= 1770000 and pc.get_map_index() < 1780000 begin
		if d.getf("orumcek0") == 0 then
			d.notice(" Örümceğin İnine Hoş Geldin..! ")
			d.setf("orumcek0",1)
			timer("orumcekmob",3)
		end
		end
		when orumcekmob.timer begin
		if d.getf("orumcek1") == 0 then
			d.notice(" İlerleyebilmek için örümcekleri yok etmelisin.  ")
			d.setf("orumcek1",1)
			d.regen_file("data/dungeon/orumcek/orumcek_mob.txt")
			d.set_warp_at_eliminate(4, d.get_map_index(), (880), (6154), "data/dungeon/orumcek/orumcek_kralice.txt")
		end
		end
		when 2991.kill with pc.get_map_index() >= 1770000 and pc.get_map_index() < 1780000 begin
			d.notice(" Kraliçe Örümceği Kestiniz. Tebrikler... ")
			timer("yumurtametin",3)
		end
		when yumurtametin.timer begin
			d.notice(" Yumurtaları Yok Et! ")
			d.regen_file("data/dungeon/orumcek/orumcek_yumurta.txt")
			d.setf("yumurta",0)
		end
		when 2095.kill with pc.get_map_index() >= 1770000 and pc.get_map_index() < 1780000 begin
			local yumurta = d.getf("yumurta")
			d.setf("yumurta", yumurta + 1)
			if yumurta == 5 then
				d.notice(" Bir ses yaklaşıyor... ")
				timer("bosscagir",2)
			end
		end
		when bosscagir.timer begin
			d.notice(" Kral Örümcek Ortaya Çıktı... ")
			d.regen_file("data/dungeon/orumcek/orumcek_boss.txt")
		end
		when 2094.kill with pc.get_map_index() >= 1770000 and pc.get_map_index() < 1780000 begin
			d.setf("orumcek0",0)
			d.setf("orumcek1",0)
			notice_all(" "..pc.get_name().." grubu Kral Örümceği Yok Etti. ")
			timer("dungeoncikis",5)
		end
		when dungeoncikis.timer begin
			d.exit_all()
		end
		when login with pc.get_map_index() >= 1770000 and pc.get_map_index() < 1780000 begin
			if pc.get_empire() == 1 then
				pc.set_warp_location(1, 4693,9642)
			elseif pc.get_empire() == 2 then 
				pc.set_warp_location(21, 557,1579)
			elseif pc.get_empire() == 3 then
				pc.set_warp_location(41, 9696,2784)
			end
		end
		when 20088.chat." Kral Örümcek " with pc.get_map_index() == 177 begin
			if party.is_party() then
				if party.is_leader() then
					if pc.count_item(27996) < 10 then
						say(" Yeterli Anahtarın Yok ")
					else
						say_title(" Merhaba "..pc.get_name().." ")
						say(" Yeterli anahtarın var seni ve arkadaşlarını [ENTER] içeri gönderiyorum. ")
						pc.remove_item(27996,10)
						d.new_jump_all(177, 880,6154)
					end
				else
					say(" Sadece party lideri içeri sokabilir. ")
				end
			else
				say(" Party olmadan giriş yapamazsın ")
			end
		end
	end
end
12/28/2012 23:59 iSouli~#7367
Quote:
Originally Posted by Ðαrkbøζζ View Post
Kann mir jemand sagen warum die quest nicht funzt ?!
PHP Code:
quest contract begin
    state start begin
        when 50085.
use begin
            say_title
("Contract2 Buch")
            
say("Dies ist das Vision World2 Buch,")
            
say("hiermit kannst du viele tolle")
            
say("Features nutzen. Du wirst es immer")
            
say("brauchen!")
            
say("Pass also gut darauf auf!")
            if 
select("Weiter","Nichts") == 2 then return end
            say
("Welches möchtest du nutzen?")
            
local s select("Teleportieren""Lager öffnen""Tränke Shop""Statistik""Spieleronline")
            if 
== 1 then 
                say
("Wohin möchtest du dich Teleportieren?")
                
local warp_table 
                {
                    [
1] = {"Blaues Reich","9601","2687"},
                    [
2] = {"Blaues Reich","9601","2687"},
                    [
3] = {"Blaues Reich","9601","2687"},
                    [
4] = {"Blaues Reich","9601","2687"},
                    [
5] = {"Blaues Reich","9601","2687"},
                }
                
local v select("Blaues Reich","Gelbes Reich","Rotes Reich","Spinnendungeon""Dämonenturm""Orktal""Feuerland""Eisland""Wüste""Abbrechen")
                if 
== 10 then return end
                say
("Vorsicht! Du wirst ins "..warp_table[v][1].." teleportiert!")
                
pc.warp(tonumber(warp_table[v][2]),tonumber(warp_table[v][3]))
            elseif 
== 2 then
                game
.open_safebox()
            elseif  
== 3 then
                say_title
("Tränke")
                
say("Hier kannst du Tränke kaufen.")
                
say("Du kannst sowohl Rote und Blaue Tränke,")
                
say("als auch Violette und Grüne Tränke kaufen.")
                
say("Das heißt, du musst nicht immer extra")
                
say("in die Stadt laufen, falls du am Leveln bist.")
                
say("Was willst du kaufen?")
                
local a select("200 Rote Tränke""200 Blaue Tränke""200 Violette Tränke""200 Grüne Tränke""Nichts")
                
local pott_table 
                {
                    [
1] = {270033000}
                    [
2] = {270065000}
                }
                if 
== 5 then return send_letter("Tränke kaufen"end
                
if pc.getmoney() < pott_table[a][2then return chat("Nicht genug Yang!"end
                pc
.changemoney(-pott_table[a][2])
                
pc.give_item2(pott_table[a][1], 200)
                
say_title(item_name(pott_table[a][1])
                
say("Du hast folgendes Item erhalten:")
                
say("")
                
say("")
                
say_item_vnum(pott_table[a[1])
            elseif 
== 4 then
                say_title
("Statistiken:")
                
say("Hallo,")
                
say("Hier zeige ich dir deine Statistiken:")
                
say("")
                
say("Logins:  "..pc.getqf("login_count"))
                
say("Logouts: "..pc.getqf("logout_count"))
                
say("Getöte Spieler:  "..pc.getqf("killpc_count"))
                
say("Getötete Monster:  "..pc.getqf("kill_count"))
            elseif 
== 5 then
                say_title
("Spieler Online?:")
                
say("")
                
say("Gebe den Namen des Spielers ein den")
                
say("du finden möchtest ob dieser Online ist.")
                
say("Beachte dabei groß und klein schreibung.")
                
say("")
                
say_title("Beachte dabei aber bitte auch,")
                
say_title("das dies nur funktioniert wenn ihr")
                
say_title("in ein und demselben Channel seit.")
                
say("")
                
local find_player_online tostring(input())
                
local gamer_found find_pc_by_name(find_player_online)
            
end
            
if gamer_found == 0 then
                say_title
("Spieler Offline:")
                
say("")
            else
                
say_title("Spieler Online!:")
                
say("")
                
say("Der Spieler "..find_player_online.." ist im moment Online.")
                
say("")
            
end
        end
        
        when login begin
            local login_count 
pc.getqf("login_count") + 1
            pc
.setqf("login_count"login_count)
            
q.set_counter("login_count"pc.getqf("login_count"))
        
end

        when logout begin
            local logout_count 
pc.getqf("logout_count") + 1
            pc
.setqf("logout_count"logout_count)
            
q.set_counter("logout_count"pc.getqf("logout_count"))
        
end
        
        when kill begin
            
if npc.is_pc() then
                local killpc_count 
pc.getqf("killpc_count") +1
                pc
.setqf("killpc_count"killpc_count)
                
q.set_counter("killpc_count"pc.getqf("killpc_count"))
            else
                
local kill_count pc.getqf("kill_count") +1
                pc
.setqf("kill_count"kill_count)
                
q.set_counter("kill_count"pc.getqf("kill_count"))
            
end
        end
    end
end 
12/29/2012 14:04 QuickFlameZ#7368
Hey hier mal meine Tausch quest need help :D
Code:
quest itemtausch_n begin
    state start begin
        when 30141.use begin
		if pc.getqf("itemtausch_n") == 0 then 
                pc.setqf("itemtausch_n", 1) 
		local klasse

        if pc.job == 0 then
            say("Möchtest du den Horn Panzer")
            say("gegen einen [Rot]Horn Panzer tauschen?")
            say("Der Tausch kostet dich aber einen Edelstein")
            local main = select ("Ja","Nein")
            if main == 1 then
                if pc.count_item(20009) >= 1 then
                    if pc.get_gold() >= 10000000 then
                        pc.remove_item(20009,1)
                        pc.changegold(-10000000)
                        pc.give_item2(20010,1)
						klasse = "Krieger"
                    else
                        say("Nicht genug Yang")
                    end 
                else 
                    say("Du hast den Mondstahlanzug nicht dabei")
					
		
		if pc.job == 1 then
            say("Möchtest du den Horn Panzer")
            say("gegen einen [Rot]Horn Panzer tauschen?")
            say("Der Tausch kostet dich aber einen Edelstein")
            local main = select ("Ja","Nein")
            if main == 1 then
                if pc.count_item(20259) >= 1 then
                    if pc.get_gold() >= 10000000 then
                        pc.remove_item(20259,1)
                        pc.changegold(-10000000)
                        pc.give_item2(20260,1)
						klasse = "Ninja"
                    else
                        say("Nicht genug Yang")
                    end 
                else 
                    say("Du hast den Mondstahlanzug nicht dabei")
					
					
		if pc.job == 3 then
            say("Möchtest du den Horn Panzer")
            say("gegen einen [Rot]Horn Panzer tauschen?")
            say("Der Tausch kostet dich aber einen Edelstein")
            local main = select ("Ja","Nein")
            if main == 1 then
                if pc.count_item(20509) >= 1 then
                    if pc.get_gold() >= 10000000 then
                        pc.remove_item(20509,1)
                        pc.changegold(-10000000)
                        pc.give_item2(20510,1)
						klasse = "Sura"
                    else
                        say("Nicht genug Yang")
                    end 
                else 
                    say("Du hast den Mondstahlanzug nicht dabei")
					
					
		if pc.job == 4 then
            say("Möchtest du den Horn Panzer")
            say("gegen einen [Rot]Horn Panzer tauschen?")
            say("Der Tausch kostet dich aber einen Edelstein")
            local main = select ("Ja","Nein")
            if main == 1 then
                if pc.count_item(20759) >= 1 then
                    if pc.get_gold() >= 10000000 then
                        pc.remove_item(20759,1)
                        pc.changegold(-10000000)
                        pc.give_item2(20760,1)
						klasse = "Sura"
                    else
                        say("Nicht genug Yang")
                    end 
                else 
                    say("Du hast den Mondstahlanzug nicht dabei")	
                end
            end
        end
    end
end
12/29/2012 14:11 .Scratchy.#7369
Komplette Quest:

PHP Code:
----------------------------------------------------
--
Tempel des Drachen
----------------------------------------------------
quest dragontemple begin
    state start begin      
        when 20350.chat
."Ich will den Drachen töten" with pc.get_map_index() == 73 begin
            pc
.setqf("punishment"0)
            if 
game.get_event_flag("dragontemple_used") == 1 then
                
if game.get_event_flag("dragontemple_block") == 1 then
                    say_title
(mob_name(20350))
                    
say("")
                    
say("Der Raum ist gesperrt, versuch es später noch ein mal.")
                    return;
                
end
                
                say_title
(mob_name(20350))
                
say("")
                
say("Tut mir Leid, der Raum ist reseviert.")
                
say("Wenn du ein Passwort hast für den Zugang")
                
say("gebe es jetzt bitte ein.")
                
local password input()
                if 
game.get_event_flag("dragontemple_password") == tonumber(passwordthen
                    say_title
(""..mob_name(20350).."")
                    
say("")
                    
say("Das Passwort stimmt überein.")
                    
say("Ich bringe dich in die Kammer")
                    
wait()
                    
say_title(""..mob_name(20350).."")
                    
say("")
                    
say("Wenn du willst kann ich dich sofort,")
                    
say("in den Drachnraum bringen.")
                    
say("Gib mir einfach 3x")
                    
say("")
                    
say_item_vnum(30179)
                    
                    
local s select("Hier, nimm sie und bring mich rein""Abbrechen")
                    if 
== 1 then
                        
if pc.count_item(30179) >= 3 then
                            pc
.remove_item(30179,3)
                            
pc.warp (1780001220400)
                        else
                            
say("Du hast nur "..pc.count_item(30179).." von 3 benötigten")
                            
say("")
                            
say_item_vnum(30179)
                        
end
                    
else
                        return
                    
end
                
else
                    
say_title(""..mob_name(20350).."")
                    
say("")
                    
say("Das Passwort stimmt nicht überein.")
                    return
                
end
            
elseif pc.has_guild() and game.get_event_flag("dragontemple_used") == 0 then
                say_title
(""..mob_name(20350).."")
                
say("")
                
say("Du willst also den Drachen bekämpfen?")
                
say("Dann gib bitte erst ein Passwort(nur Zahlen) ein")
                
say("um den Raum zu schützen. Geb das Passwort")
                
say("einfach deinen Gruppenmitgliedern und sie")
                
say("können mit in den Raum")
                
say("Gib es bitte jetzt ein.")
                
local password tonumber(input(""))
                
game.set_event_flag("dragontemple_password",password)
                
say_title(""..mob_name(20350).."")
                
say("")
                
say("Wenn du willst kann ich dich sofort,")
                
say("in den Drachnraum bringen.")
                
say("Gib mir einfach 3x")
                
say("")
                
say_item_vnum(30179)
                
say("")
                
                
local s select("Hier, nimm sie und bring mich rein""Abbrechen")
                if 
== 1 then
                    
if pc.count_item(30179) >= 3 then
                        pc
.remove_item(30179,3)
                        
timer("blockentry",10)
                        
game.set_event_flag("dragontemple_used",1)
                        
pc.warp (1780001220400)
                    else
                        
say("Du hast nur "..pc.count_item(30179).." von 3 benötigten")
                        
say("")
                        
say_item_vnum(30179)
                        
say("")
                        return
                    
end
                
elseif s==2 then
                    
return                                
                
end
            
elseif not pc.has_guild() then
                say_title
(""..mob_name(20350).."")
                
say("")
                
say("Du benötigst eine starke Gilde")
                
say("um gegen den Drachen zu kämpfen.")
            
end
        end
        
        when 2493.kill with pc
.get_map_index() == 73 begin
            notice
("Glückwunsch, der Drache wurde besiegt.")
            
notice("In 2 Minuten werden alle hinausgeportet.")
            
timer("set_unused"120)
        
end
        
        when set_unused
.timer begin
            game
.set_event_flag("dragontemple_used",0)
            
game.set_event_flag("dragontemple_block",0)
            
warp_to_village()
        
end
        
        when blockentry
.timer begin
            game
.set_event_flag("dragontemple_block"1)
        
end
    end
end 
Warum startet der Timer "blockentry" nicht?
12/29/2012 14:18 Tentos123#7370
Guten Tag,

kann mir einer die Quest korrigieren?
bei den Special Maps tut sich nichts wenn man eine anklickt...


Wäre echt dankbar für Hilfe!

Mfg
12/29/2012 19:30 [SA]Con#7371
PHP Code:
quest spiderdungeon03_bossroom begin
    state start begin
        when 30130.chat
."Die Bosskammer" begin
            
if pc.get_level() <= 125 then
                say_title
("Grabstein")
                
say("Du kannst die Bosskammer noch nicht betreten.")
                
say("Du musst mindestens Level 125 erreicht haben.")
            else
                if 
pc.getqf("sd3_bossroom_is_blocked_by_user") == and pc.getqf("sd3_bossroom_is_blocked_by_timer") == 0 then
                    say_title
("Grabstein")
                    
say("Ich sehe du möchtest die Bosskammer betreten.")
                    
say("Ich warne dich vor, der Spinnenbaron ist kein")
                    
say("leichter Gegner. Gehe mit einer gut durchdachten")
                    
say("Strategie vor, um ihn zu besiegen.")
                    
say("Du hast aber insgesammt nur 30 Minuten zeit.")
                    
wait()
                    
notice_all("" ..pc.get_name().. ", versucht den Spinnenbaron zu töten.")
                    
notice_all("Der Zugang zur Bosskammer ist nun gesperrt.")
                    
pc.warp(88100614300)
                    
pc.setqf("sd3_bossroom_is_blocked_by_user"1)
                    
timer("sd3_boss"1800)
                else
                    
say_title("Grabstein")
                    
say("Der Zugang zur Bosskammer ist momentan geschlossen.")
                    
say("Das könnte folgende Gründe haben, ein Spieler versucht")
                    
say("bereits den Spinnenbaron zu töten, oder die Zeit")
                    
say("des Spielers ist abgelaufen.")
                    
say("Komm später wieder vorbei.")
                
end
            end
        end
        when sd3_boss
.timer begin
            when 2094.kill begin
                notice_all
("" ..pc.get_name().. ", hat es geschafft den Spinnenbaron zu töten.")
                
notice_all("Der Zugang zur Bosskammer ist nun für 60 Minuten gesperrt.")
                
timer("sd3_boss_timer"3400)
                
game.drop_item_with_ownership("19"1)
            else
                
timer("sd3_boss_timer"3400)
                
say_title("Grabstein")
                
say("Du hast es nicht geschafft den Spinnenbaron")
                
say("zu töten. Du wirst nun in dein Reich zurück")
                
say("teleportiert.")
                
wait()
                if 
empire == 1 then
                    pc
.warp(469300964200)
                elseif 
empire == 2 then
                    pc
.warp(360800877600)
                elseif 
empire == 3 then
                    pc
.warp(55700157900)
                
end
            end
        end
        when sd3_boss_timer
.timer begin
            notice_all
("Der Zugang zur Bosskammer des Spinnenbarones, ist nun")
            
notice_all("wieder offen.")
        
end
    end
end
        when sd3_boss_timer
.timer begin
            notice_all
("Der Zugang zur Bosskammer des Spinnenbarones, ist nun")
            
notice_all("wieder offen.")
        
end
    end
end 
Fehlär:
[Only registered and activated users can see links. Click Here To Register...]
12/29/2012 19:49 .ReDDoX™#7372
Quote:
Originally Posted by [SA]Con View Post

Fehlär:
[Only registered and activated users can see links. Click Here To Register...]
Hey

So müsste die Quest richtig funktionieren:
Ich habe 2 Fehler gefunden:
1. In Zeile 33 muss das "when ... begin" durch "if ... then" ersetzt werden.
2. In den Zeilen 58 & 59 waren 2 ends zu viel. ;)
€: Es könnte sein, dass es noch mehr Fehler gibt, habe nur kurz reingeschaut. ;)
12/30/2012 05:27 QuickFlameZ#7373
Hay habe noch eine Frage ich bin gerade da bei einen Run aufzubauen aber da ich nicht der Pro bin in Questen wollte ich fragen warum ich net geportet werde also erzeigt mir ja alles an z.b die chat nachricht. Man ist bereits im run also stimmt ja d.jump_all
Naja hier mal die Quest bitte um schnelle Rückmeldung..

HTML Code:
quest run_ebene3 begin
state start begin	
when 20077.chat."Weiter zur 3. Ebene" begin
npc.purge()
pc.warp(1013400,1007400) 
end
when 8026.kill with pc.get_map_index()==300 begin
notice_all (pc.get_name().." hat den ersten Gegner bezwungen!")
notice_all ("Es geht weiter!")
d.jump_all(54,107)	
end
end
end
12/30/2012 13:20 ~NwD~#7374
Quote:
Originally Posted by QuickFlameZ View Post
Hay habe noch eine Frage ich bin gerade da bei einen Run aufzubauen aber da ich nicht der Pro bin in Questen wollte ich fragen warum ich net geportet werde also erzeigt mir ja alles an z.b die chat nachricht. Man ist bereits im run also stimmt ja d.jump_all
Naja hier mal die Quest bitte um schnelle Rückmeldung..

HTML Code:
quest run_ebene3 begin
state start begin	
when 20077.chat."Weiter zur 3. Ebene" begin
npc.purge()
pc.warp(1013400,1007400) 
end
when 8026.kill with pc.get_map_index()==300 begin
notice_all (pc.get_name().." hat den ersten Gegner bezwungen!")
notice_all ("Es geht weiter!")
d.jump_all(54,107)	
end
end
end
der befehl um alle wohin zu porten ist
PHP Code:
d.new_jump_all(xx
12/30/2012 13:44 FaiSokumati#7375
Wenn ich mit dem Biologen rede und auf Orkzähne klicke gibt er nicht zurück, was in den if abfragen steht (if pc.countitem("30006") < 10 then)
PHP Code:
quest bio_30 begin
    state start begin
    
        when login with pc
.get_level() > 30 and pc.getqf("30_bio") == 0 begin
            send_letter
("Die Orkzähne")
            
pc.setqf("30_bio"0)
        
end
        when button 
or info begin
            say_title
("Die Orkzähne")
            
say("")
            
say("Gehe zum Biologen, er braucht deine Hilfe")
        
end
        
        when 20084.chat
."Quests" begin
            say_title
("Biologe")
            
say("Na, wen haben wir denn da?")
                if 
pc.get_level() > 30 and pc.getqf("30_bio") == 0 then            
                    s 
select("Orkzähne","Ich verpiss mich lieber")
                        if 
==1 then
                            say
("Ich benötige 10 Orkzähne...")
                            
                            if 
pc.countitem("30006") < 10 then
                                say
("Wie ich sehe hast du sie noch nicht dabei.")
                                
say("Begib dich ins Orktal und suche mir 10 Stück.")
                            
end
                            
                            
if pc.countitem("30006") > 10 then
                                say
("Ahhh.....")
                                
say(" ")
                                
say("Du hast sie dabei")
                            
end
                        end
                        
if ==2 then
                            say
("Nicht mal das bekommst du auf die Reihe........")
                            
say("Taugenichts.....")
                        
end
                end
        end
    end
end 
12/30/2012 14:45 ~NwD~#7376
Quote:
Originally Posted by FaiSokumati View Post
Wenn ich mit dem Biologen rede und auf Orkzähne klicke gibt er nicht zurück, was in den if abfragen steht (if pc.countitem("30006") < 10 then)
PHP Code:
quest bio_30 begin
    state start begin
    
        when login with pc
.get_level() > 30 and pc.getqf("30_bio") == 0 begin
            send_letter
("Die Orkzähne")
            
pc.setqf("30_bio"0)
        
end
        when button 
or info begin
            say_title
("Die Orkzähne")
            
say("")
            
say("Gehe zum Biologen, er braucht deine Hilfe")
        
end
        
        when 20084.chat
."Quests" begin
            say_title
("Biologe")
            
say("Na, wen haben wir denn da?")
                if 
pc.get_level() > 30 and pc.getqf("30_bio") == 0 then            
                    s 
select("Orkzähne","Ich verpiss mich lieber")
                        if 
==1 then
                            say
("Ich benötige 10 Orkzähne...")
                            
                            if 
pc.countitem("30006") < 10 then
                                say
("Wie ich sehe hast du sie noch nicht dabei.")
                                
say("Begib dich ins Orktal und suche mir 10 Stück.")
                            
end
                            
                            
if pc.countitem("30006") > 10 then
                                say
("Ahhh.....")
                                
say(" ")
                                
say("Du hast sie dabei")
                            
end
                        end
                        
if ==2 then
                            say
("Nicht mal das bekommst du auf die Reihe........")
                            
say("Taugenichts.....")
                        
end
                end
        end
    end
end 
denk doch mal nach wenn du 10 orkzähne im inventar hast und du eine bedingung für weniger als 10 (1-9zähne) hast
PHP Code:
if pc.countitem("30006") < 10 then 
und eine für mehr als 10 (11-xx)
PHP Code:
if pc.countitem("30006") > 10 then 
Dann passiert also garnix wenn du genau 10 dabei hast da du dafür nichts festgesetzt hast.

Ändere es einfach so um
PHP Code:
if pc.countitem("30006") >= 10 then 
jetzt passiert etwas wenn du genau 10 oder mehr Zähne bei dir hast.

Außerdem schreibt man item und mob ID's niemals unter ""
nur Text kommt unter ""
12/30/2012 14:55 MrPlayboy#7377
PHP Code:
quest meister begin
    state start begin
        when 20082.chat
."Ingame Itemshop" begin
            
            local a
=select("Krieger","Ninja","Sura","Schami","Verlassen")
            
            if 
a==5 then
                
return
            
end
            
            
if a==1 then
            
            local z
=select("Ruestungen","Waffen")
            
                if 
z==1 then
            
                local i
=select("Lv 80","Lv 102","Lv 122")
            
                if 
i==2 then
                say_item_vnum
("19020")
                
say("")
                
say("Name:        Drachensternpanzer+0")
                
say("Level:        122-140")
                
say("Rasse:        Krieger")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local b=select("Kaufen","Verlassen")            
                
                    if 
b==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                            
pc.give_item2("19020")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if b==2 then
                        
return
                    
end
                end
                
                
if i==1 then
                say_item_vnum
("12010")
                
say("")
                
say("Name:        Blaustahlpanzer+0")
                
say("Level:        80-90")
                
say("Rasse:        Krieger")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local ab=select("Kaufen","Verlassen")            
                
                    if 
ab==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("12010")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if ab==2 then
                        
return
                    
end
                end
                
                
if i==3 then
                say_item_vnum
("19120")
                
say("")
                
say("Name:        Schneepanzer+0")
                
say("Level:        122-140")
                
say("Rasse:        Krieger")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local ac=select("Kaufen","Verlassen")            
                
                    if 
ac==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                            
pc.give_item2("19120")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if ac==2 then
                        
return
                    
end                        
                end
            
                
if z==2 then            
                local free
=select("Tritonschwert+0","Gelbdrachentoeter+0","Kristallschwert+0","Kristallschneider+0")
            
                if 
free==1 then
            
                say_item_vnum
("270")
                
say("")
                
say("Name:        Tritonschwer+0")
                
say("Level:        80-90")
                
say("Rasse:        Krieger, Ninja, Sura")
                
say("Typ:            1 Hand")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local aceed=select("Kaufen","Verlassen")            
                
                    if 
aceed==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                            
pc.give_item2("270")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if aceed==2 then
                        
return
                    
end
                end
                
                
if free==3 then
            
                say_item_vnum
("54810")
                
say("")
                
say("Name:        Kristallschwert+0")
                
say("Level:        102-120")
                
say("Rasse:        Krieger, Ninja, Sura")
                
say("Typ:            1 Hand")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local aceded=select("Kaufen","Verlassen")            
                
                    if 
aceded==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                            
pc.give_item2("54810")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if aceded==2 then
                        
return
                    
end
                end
            
                
if free==2 then
            
                say_item_vnum
("3170")
                
say("")
                
say("Name:        Gelbdrachentoeter+0")
                
say("Level:        80-90")
                
say("Rasse:        Krieger")
                
say("Typ:            2 Hand")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local aceddded=select("Kaufen","Verlassen")            
                
                    if 
aceddded==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                            
pc.give_item2("3170")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if aceddded==2 then
                        
return
                    
end
                end
                
                
if free==4 then
            
                say_item_vnum
("54840")
                
say("")
                
say("Name:        Kristallschneider+0")
                
say("Level:        102-120")
                
say("Rasse:        Krieger")
                
say("Typ:            2 Hand")
                
say("Kosten:    1000 Coins")
                
wait()
                                    
                
local acedeeed=select("Kaufen","Verlassen")            
                
                    if 
acedeeed==1 then
                
                        
if pc.count_item(80016) >= 10 then
                            say_reward
("Item erfolgreich gekauft")
                            
pc.give_item2("54840")
                            
pc.remove_item("80016"10)
                        
end
                    
                        
if pc.count_item(80016) < 10 then
                            say_reward
("Du hast nicht genug Coins")
                        
end
                    end
                
                    
if acedeeed==2 then
                        
return
                    
end
                end
            end
            end
            end            

            
if a==2 then
            
            local 
as=select("Ruestungen","Waffen")
                                    
            if as==
1 then
            
            local ad
=select("Lv 80","Lv 102","Lv 122")
            
            if 
ad==2 then
            say_item_vnum
("19040")
            
say("")
            
say("Name:        Drachensternanzug+0")
            
say("Level:        122-140")
            
say("Rasse:        Ninja")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local aa=select("Kaufen","Verlassen")            
                
                if 
aa==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("19020")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if aa==2 then
                    
return
                
end
            end
            
            
if ad==1 then
            say_item_vnum
("12020")
            
say("")
            
say("Name:        Blauer Drachenanzug+0")
            
say("Level:        80-90")
            
say("Rasse:        Ninja")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local ab=select("Kaufen","Verlassen")            
                
                if 
ab==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("12020")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if ab==2 then
                    
return
                
end
            end
            
            
if ad==3 then
            say_item_vnum
("19120")
            
say("")
            
say("Name:        Schneeanzug+0")
            
say("Level:        122-140")
            
say("Rasse:        Ninja")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local aca=select("Kaufen","Verlassen")            
                
                if 
aca==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("19140")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if aca==2 then
                    
return
                
end
            end
            
            
if as==2 then
            
            local freeee
=select("Seelenloses Messer+0","Grossteufelbogen+0","Kristallmesser+0","Kristallbogen+0")
            
            if 
freeee==1 then
            
            say_item_vnum
("4040")
            
say("")
            
say("Name:        Seelenloses Messer+0")
            
say("Level:        80-90")
            
say("Rasse:        Ninja")
            
say("Typ:            Dolch")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local aceedf=select("Kaufen","Verlassen")            
                
                if 
aceedf==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("4040")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if aceedf==2 then
                    
return
                
end
            end
            
            
if freeee==3 then
            
            say_item_vnum
("54830")
            
say("")
            
say("Name:        Kristallmesser+0")
            
say("Level:        102-120")
            
say("Rasse:        Ninja")
            
say("Typ:            Dolch")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local faceded=select("Kaufen","Verlassen")            
                
                if 
faceded==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("54830")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if faceded==2 then
                    
return
                
end
            end
            
            
if freeee==2 then
            
            say_item_vnum
("2160")
            
say("")
            
say("Name:        Grossteufelbogen+0")
            
say("Level:        80-90")
            
say("Rasse:        Ninja")
            
say("Typ:            Bogen")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local faceddded=select("Kaufen","Verlassen")            
                
                if 
faceddded==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("2160")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if faceddded==2 then
                    
return
                
end
            end
            
            
if freeee==4 then
            
            say_item_vnum
("54820")
            
say("")
            
say("Name:        Kristallbogen+0")
            
say("Level:        102-120")
            
say("Rasse:        Ninja")
            
say("Typ:            Bogen")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local acedefeed=select("Kaufen","Verlassen")            
                
                if 
acedefeed==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("54820")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if acedefeed==2 then
                    
return
                
end
            end
            end
            end
            end
                        
            
if a==3 then
            
            local zz
=select("Ruestungen","Waffen")
            
            if 
zz==1 then
            
            local ii
=select("Lv 80","Lv 102","Lv 122")
            
            if 
ii==2 then
            say_item_vnum
("19060")
            
say("")
            
say("Name:        Drachensternp.panzer+0")
            
say("Level:        122-140")
            
say("Rasse:        Sura")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local bb=select("Kaufen","Verlassen")            
                
                if 
bb==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("19060")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if bb==2 then
                    
return
                
end
            end
            
            
if ii==1 then
            say_item_vnum
("12030")
            
say("")
            
say("Name:        Auraplattenpanzer+0")
            
say("Level:        80-90")
            
say("Rasse:        Sura")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local abc=select("Kaufen","Verlassen")            
                
                if 
abc==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("12030")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if abc==2 then
                    
return
                
end
            end
            
            
if ii==3 then
            say_item_vnum
("19160")
            
say("")
            
say("Name:        Schneeplattenpanzer+0")
            
say("Level:        122-140")
            
say("Rasse:        Sura")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local aco=select("Kaufen","Verlassen")            
                
                if 
aco==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("19160")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if aco==2 then
                    
return
                
end
            end
            end
            end
            
            
if zz==2 then
            
            local fffreeee
=select("Heiliges Schwert","Schnittklinge+0","Kristallklinge+0")
            
            if 
fffreeee==1 then
            
            say_item_vnum
("280")
            
say("")
            
say("Name:        Heiliges Schwert+0")
            
say("Level:        80-90")
            
say("Rasse:        Sura")
            
say("Typ:            1 Hand")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local sdfg=select("Kaufen","Verlassen")            
                
                if 
sdfg==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("280")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if sdfg==2 then
                    
return
                
end
            end
            
            
if fffreeee==3 then
            
            say_item_vnum
("54800")
            
say("")
            
say("Name:        Kristallklinge+0")
            
say("Level:        102-120")
            
say("Rasse:        Sura")
            
say("Typ:            1 Hand")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local fghfgfj=select("Kaufen","Verlassen")            
                
                if 
fghfgfj==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("54800")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if fghfgfj==2 then
                    
return
                
end
            end
            
            
if fffreeee==2 then
            
            say_item_vnum
("200")
            
say("")
            
say("Name:        Schnittklinge+0")
            
say("Level:        80-90")
            
say("Rasse:        Sura")
            
say("Typ:            1 Hand")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local ghghghgh=select("Kaufen","Verlassen")            
                
                if 
ghghghgh==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("200")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if ghghghgh==2 then
                    
return
                
end
            end
                                    
            
if a==4 then
            
            local zzz
=select("Ruestungen","Waffen")
            
            if 
zzz==1 then
            
            local iii
=select("Lv 80","Lv 102","Lv 122")
            
            if 
iii==2 then
            say_item_vnum
("19080")
            
say("")
            
say("Name:        Drachensternkleidung+0")
            
say("Level:        122-140")
            
say("Rasse:        Schami")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local bbb=select("Kaufen","Verlassen")            
                
                if 
bbb==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("19080")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if bbb==2 then
                    
return
                
end
            end
            
            
if iii==1 then
            say_item_vnum
("12040")
            
say("")
            
say("Name:        Kleidung des Drachen+0")
            
say("Level:        80-90")
            
say("Rasse:        Schami")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local abcd=select("Kaufen","Verlassen")            
                
                if 
abcd==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("12040")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if abcd==2 then
                    
return
                
end
            end
            
            
if iii==3 then
            say_item_vnum
("19180")
            
say("")
            
say("Name:        Schneekleidung+0")
            
say("Level:        122-140")
            
say("Rasse:        Schami")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local acoe=select("Kaufen","Verlassen")            
                
                if 
acoe==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("19180")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if acoe==2 then
                    
return
                
end
            end
            end
            end
            
            
if zzz==2 then            
                
            local yklom
=select("Drachenmaulglocke+0","Daemonenfaecher+0","Eisglocke+0","Eisstab+0")
            
            if 
yklom==1 then
            
            say_item_vnum
("5330")
            
say("")
            
say("Name:        Drachenmaulglocke+0")
            
say("Level:        80-90")
            
say("Rasse:        Schami")
            
say("Typ:            Glocke")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local abab=select("Kaufen","Verlassen")            
                
                if 
abab==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("5330")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if abab==2 then
                    
return
                
end
            end
            
            
if yklom==3 then
            
            say_item_vnum
("54850")
            
say("")
            
say("Name:        Eisglocke+0")
            
say("Level:        102-120")
            
say("Rasse:        Schami")
            
say("Typ:            Glocke")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local ghoma=select("Kaufen","Verlassen")            
                
                if 
ghoma==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("54850")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if ghoma==2 then
                    
return
                
end
            end
            
            
if yklom==2 then
            
            say_item_vnum
("7190")
            
say("")
            
say("Name:        Daemonenfaecher+0")
            
say("Level:        80-90")
            
say("Rasse:        Schami")
            
say("Typ:            Faecher")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local atgff=select("Kaufen","Verlassen")            
                
                if 
atgff==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("7190")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if atgff==2 then
                    
return
                
end
            end
            
            
if yklom==4 then
            
            say_item_vnum
("54860")
            
say("")
            
say("Name:        Eisstab+0")
            
say("Level:        80-90")
            
say("Rasse:        Schami")
            
say("Typ:            Glocke")
            
say("Kosten:    1000 Coins")
            
wait()
                                    
            
local atgff=select("Kaufen","Verlassen")            
                
                if 
atgff==1 then
                
                    
if pc.count_item(80016) >= 10 then
                        say_reward
("Item erfolgreich gekauft")
                        
pc.give_item2("54860")
                        
pc.remove_item("80016"10)
                    
end
                    
                    
if pc.count_item(80016) < 10 then
                        say_reward
("Du hast nicht genug Coins")
                    
end
                end
                
                
if atgff==2 then
                    
return
                
end
            end
            end        
            end            
        end
    end    
end 
Kein Fehler in der Konsole. Wenn ich auf Schami klicke schließt sich das Questfenster, genauso wie wenn ich auf Waffen klicke (Bei allen Rassen)
12/30/2012 16:57 QuickFlameZ#7378
Quote:
Originally Posted by ~NwD~ View Post
der befehl um alle wohin zu porten ist
PHP Code:
d.new_jump_all(xx
Funktioniert nicht
12/30/2012 22:33 Invoice™#7379
PHP Code:
quest 30erkrieger begin
    state start begin
        when login begin
            
if pc.job ==0 then
            set_state
(weiter)
        
end
    end
    state weiter begin
        when login 
or levelup with pc.get_level()>= 30 begin
            set_state
(info)
        
end
    end
    state info begin
        when letter begin
            send_letter
("Gehe zum Hauptmann"
        
end
        when button 
or info begin 
            say_title
("Gehe zum Hauptmann!")  
            
say("Der Hauptmann hat nach dir")  
            
say("gerufen")
            
say_reward("geh zu ihm!!")
            
set_state(hm)
        
end 
    end 
    state hm begin
        when letter begin 
            local v 
find_npc_by_vnum(20089)
            if 
!= v then  
                target
.vid("__TARGET__"v"Hauptmann")
            
end 
        end 
        when letter begin 
            send_letter
("Gehe zum Hauptmann!"
        
end 
        when button 
or info begin 
            say_title
("Gehe zum Hauptmann!")  
            
say("Der Hauptmann hat nach dir")  
            
say("gerufen")
            
say_reward("geh zu ihm!!")
        
end
        when __TARGET__
.target.click begin 
            target
.delete("__TARGET__"
            
say_title("Hauptmann"
            
say("Oh da bist du ja endlich")  
            
say("...")  
            
say("Es giebt probleme bei einem")  
            
say("Außenposten von Drigema")  
            
say("Der König hat nach uns gefragt")  
            
say("ob wir nicht einen Krieger entsenden")  
            
say("könnten.")
            
say("Könntest du nach dem Rechten schauen?")
            
local s select("Ja werde ich tun""keine Zeit"
            if 
== 1 then
                say_title
("Hauptmann"
                
say("Hervorragend")  
                
say("...")  
                
say("Gehe zum Teleporter")  
                
say("Er wird dich nach Drigema"
                
say("der Hauptstadt der vereinten"
                
say("Reiche bringen")
                
say("rede dort mit Nakajima")
                
say("er wird dir alles weitere sagen")
                
set_state(stadt
            else 
                
say("Schade..."
                
say(""
                
clear_letter() 
                
q.done() 
            
end 
        end
    end 
    state stadt begin
        when letter begin 
            local v 
find_npc_by_vnum(20364)
            if 
!= v then  
                target
.vid("__TARGEET__"v"Nakajima")
            
end 
        end 
        when letter begin
            send_letter
("Nakajima")
        
end
        when button 
or info begin  
            say_title
("Nakajima")  
            
say_reward("ich soll in Drigema")
            
say("Nakajima aufsuchen")
            
say("")
        
end
        when __TARGEET__
.target.click begin 
            target
.delete("__TARGEET__")
            
say_title("Auftrag"
            
say("Ah dich schickt also")  
            
say("...")  
            
say("Der Hauptmann?")
            
wait()
            
say("Nun gut")
            
say("Ich habe nach einem")
            
say("Krieger gefragt")
            
say("da wir in unserem")
            
say("Außenposten ständig")
            
say("von Barbaren angegriffen werden.")
            
say("...")
            
wait()
            
say("doch seit neuestem werden die")
            
say("angriffe immer Gezielter")
            
say("Vermutlich haben sie einen neuen")    
            
say("Anführer bekommen")
            
say("Deine Aufgabe ist es ihn Auszuschalten")
            
say("Es wird auch eine nette Belohnung")
            
say("geben.")
            
wait()
            
say("Geh zum Teleporter")
            
say("er bringt dich zum Außenposten")
            
set_state(außen
        
end
    end 
    state außen begin
        when letter begin
            send_letter
("Anführer Ausschalten")
        
end
        when button 
or info begin  
            say_title
("Anführer")  
            
say("ich soll den Anführer")
            
say("der Barbaren am Außenposten")
            
say("Ausschalten")            
        
end
        when 494.kill begin
            say_title
("Anführer")  
            
say("ich habe den Anführer")
            
say("beseigt")
            
say("Nun sollte ich wider zu")
            
say("Nakajima gehen.")
            
set_state(besiegt)
        
end
    end
    state besiegt begin
        when letter begin 
            local v 
find_npc_by_vnum(20364)
            if 
!= v then  
                target
.vid("__TARGEEET__"v"Nakajima")
            
end 
        end 
        when letter begin
            send_letter
("Nakajima")
        
end
        when button 
or info begin  
            say_title
("Nakajima")  
            
say("ich sollte wider")
            
say("Nakajima aufsuchen")
            
say("um meine belohnung")
            
say("zu kassieren")
            
say("")
        
end
        when __TARGEEET__
.target.click begin 
            target
.delete("__TARGEEET__")
            
say_title("Auftrag"
            
say("Ah ich habe es schon gehört")  
            
say("Die angriffe nehmen wider ab")  
            
say("Vielen dank")
            
say("Hier das ist für dich")
            
wait()
            
pc.give_item2(11259)
            
clear_letter() 
            
set_state(__COMPLETE__
        
end 
    end   
    state __COMPLETE__ begin
    end
end 
kann sie nicht laden , jedoch sehe ich keinen fehler
12/30/2012 23:25 [uLow]Heinii#7380
Quote:
Originally Posted by SA[Zero] View Post
PHP Code:
quest 30erkrieger begin
    state start begin
        when login begin
            
if pc.job ==0 then
            set_state
(weiter)
        
end
    end
    state weiter begin
        when login 
or levelup with pc.get_level()>= 30 begin
            set_state
(info)
        
end
    end
    state info begin
        when letter begin
            send_letter
("Gehe zum Hauptmann"
        
end
        when button 
or info begin 
            say_title
("Gehe zum Hauptmann!")  
            
say("Der Hauptmann hat nach dir")  
            
say("gerufen")
            
say_reward("geh zu ihm!!")
            
set_state(hm)
        
end 
    end 
    state hm begin
        when letter begin 
            local v 
find_npc_by_vnum(20089)
            if 
!= v then  
                target
.vid("__TARGET__"v"Hauptmann")
            
end 
        end 
        when letter begin 
            send_letter
("Gehe zum Hauptmann!"
        
end 
        when button 
or info begin 
            say_title
("Gehe zum Hauptmann!")  
            
say("Der Hauptmann hat nach dir")  
            
say("gerufen")
            
say_reward("geh zu ihm!!")
        
end
        when __TARGET__
.target.click begin 
            target
.delete("__TARGET__"
            
say_title("Hauptmann"
            
say("Oh da bist du ja endlich")  
            
say("...")  
            
say("Es giebt probleme bei einem")  
            
say("Außenposten von Drigema")  
            
say("Der König hat nach uns gefragt")  
            
say("ob wir nicht einen Krieger entsenden")  
            
say("könnten.")
            
say("Könntest du nach dem Rechten schauen?")
            
local s select("Ja werde ich tun""keine Zeit"
            if 
== 1 then
                say_title
("Hauptmann"
                
say("Hervorragend")  
                
say("...")  
                
say("Gehe zum Teleporter")  
                
say("Er wird dich nach Drigema"
                
say("der Hauptstadt der vereinten"
                
say("Reiche bringen")
                
say("rede dort mit Nakajima")
                
say("er wird dir alles weitere sagen")
                
set_state(stadt
            else 
                
say("Schade..."
                
say(""
                
clear_letter() 
                
q.done() 
            
end 
        end
    end 
    state stadt begin
        when letter begin 
            local v 
find_npc_by_vnum(20364)
            if 
!= v then  
                target
.vid("__TARGEET__"v"Nakajima")
            
end 
        end 
        when letter begin
            send_letter
("Nakajima")
        
end
        when button 
or info begin  
            say_title
("Nakajima")  
            
say_reward("ich soll in Drigema")
            
say("Nakajima aufsuchen")
            
say("")
        
end
        when __TARGEET__
.target.click begin 
            target
.delete("__TARGEET__")
            
say_title("Auftrag"
            
say("Ah dich schickt also")  
            
say("...")  
            
say("Der Hauptmann?")
            
wait()
            
say("Nun gut")
            
say("Ich habe nach einem")
            
say("Krieger gefragt")
            
say("da wir in unserem")
            
say("Außenposten ständig")
            
say("von Barbaren angegriffen werden.")
            
say("...")
            
wait()
            
say("doch seit neuestem werden die")
            
say("angriffe immer Gezielter")
            
say("Vermutlich haben sie einen neuen")    
            
say("Anführer bekommen")
            
say("Deine Aufgabe ist es ihn Auszuschalten")
            
say("Es wird auch eine nette Belohnung")
            
say("geben.")
            
wait()
            
say("Geh zum Teleporter")
            
say("er bringt dich zum Außenposten")
            
set_state(außen
        
end
    end 
    state außen begin
        when letter begin
            send_letter
("Anführer Ausschalten")
        
end
        when button 
or info begin  
            say_title
("Anführer")  
            
say("ich soll den Anführer")
            
say("der Barbaren am Außenposten")
            
say("Ausschalten")            
        
end
        when 494.kill begin
            say_title
("Anführer")  
            
say("ich habe den Anführer")
            
say("beseigt")
            
say("Nun sollte ich wider zu")
            
say("Nakajima gehen.")
            
set_state(besiegt)
        
end
    end
    state besiegt begin
        when letter begin 
            local v 
find_npc_by_vnum(20364)
            if 
!= v then  
                target
.vid("__TARGEEET__"v"Nakajima")
            
end 
        end 
        when letter begin
            send_letter
("Nakajima")
        
end
        when button 
or info begin  
            say_title
("Nakajima")  
            
say("ich sollte wider")
            
say("Nakajima aufsuchen")
            
say("um meine belohnung")
            
say("zu kassieren")
            
say("")
        
end
        when __TARGEEET__
.target.click begin 
            target
.delete("__TARGEEET__")
            
say_title("Auftrag"
            
say("Ah ich habe es schon gehört")  
            
say("Die angriffe nehmen wider ab")  
            
say("Vielen dank")
            
say("Hier das ist für dich")
            
wait()
            
pc.give_item2(11259)
            
clear_letter() 
            
set_state(__COMPLETE__
        
end 
    end   
    state __COMPLETE__ begin
    end
end 
kann sie nicht laden , jedoch sehe ich keinen fehler
Die If-Abfrage in Zeile 4 wurde nicht beendet.
PHP Code:
quest 30erkrieger begin
    state start begin
        when login begin
            
if pc.job ==0 then
                set_state
(weiter)
            
end
        end
    end
    state weiter begin
        when login 
or levelup with pc.get_level()>= 30 begin
            set_state
(info)
        
end
    end
    state info begin
        when letter begin
            send_letter
("Gehe zum Hauptmann"
        
end
        when button 
or info begin 
            say_title
("Gehe zum Hauptmann!")  
            
say("Der Hauptmann hat nach dir")  
            
say("gerufen")
            
say_reward("geh zu ihm!!")
            
set_state(hm)
        
end 
    end 
    state hm begin
        when letter begin 
            local v 
find_npc_by_vnum(20089)
            if 
!= v then  
                target
.vid("__TARGET__"v"Hauptmann")
            
end 
        end 
        when letter begin 
            send_letter
("Gehe zum Hauptmann!"
        
end 
        when button 
or info begin 
            say_title
("Gehe zum Hauptmann!")  
            
say("Der Hauptmann hat nach dir")  
            
say("gerufen")
            
say_reward("geh zu ihm!!")
        
end
        when __TARGET__
.target.click begin 
            target
.delete("__TARGET__"
            
say_title("Hauptmann"
            
say("Oh da bist du ja endlich")  
            
say("...")  
            
say("Es giebt probleme bei einem")  
            
say("Außenposten von Drigema")  
            
say("Der König hat nach uns gefragt")  
            
say("ob wir nicht einen Krieger entsenden")  
            
say("könnten.")
            
say("Könntest du nach dem Rechten schauen?")
            
local s select("Ja werde ich tun""keine Zeit"
            if 
== 1 then
                say_title
("Hauptmann"
                
say("Hervorragend")  
                
say("...")  
                
say("Gehe zum Teleporter")  
                
say("Er wird dich nach Drigema"
                
say("der Hauptstadt der vereinten"
                
say("Reiche bringen")
                
say("rede dort mit Nakajima")
                
say("er wird dir alles weitere sagen")
                
set_state(stadt
            else 
                
say("Schade..."
                
say(""
                
clear_letter() 
                
q.done() 
            
end 
        end
    end 
    state stadt begin
        when letter begin 
            local v 
find_npc_by_vnum(20364)
            if 
!= v then  
                target
.vid("__TARGEET__"v"Nakajima")
            
end 
        end 
        when letter begin
            send_letter
("Nakajima")
        
end
        when button 
or info begin  
            say_title
("Nakajima")  
            
say_reward("ich soll in Drigema")
            
say("Nakajima aufsuchen")
            
say("")
        
end
        when __TARGEET__
.target.click begin 
            target
.delete("__TARGEET__")
            
say_title("Auftrag"
            
say("Ah dich schickt also")  
            
say("...")  
            
say("Der Hauptmann?")
            
wait()
            
say("Nun gut")
            
say("Ich habe nach einem")
            
say("Krieger gefragt")
            
say("da wir in unserem")
            
say("Außenposten ständig")
            
say("von Barbaren angegriffen werden.")
            
say("...")
            
wait()
            
say("doch seit neuestem werden die")
            
say("angriffe immer Gezielter")
            
say("Vermutlich haben sie einen neuen")    
            
say("Anführer bekommen")
            
say("Deine Aufgabe ist es ihn Auszuschalten")
            
say("Es wird auch eine nette Belohnung")
            
say("geben.")
            
wait()
            
say("Geh zum Teleporter")
            
say("er bringt dich zum Außenposten")
            
set_state(außen
        
end
    end 
    state außen begin
        when letter begin
            send_letter
("Anführer Ausschalten")
        
end
        when button 
or info begin  
            say_title
("Anführer")  
            
say("ich soll den Anführer")
            
say("der Barbaren am Außenposten")
            
say("Ausschalten")            
        
end
        when 494.kill begin
            say_title
("Anführer")  
            
say("ich habe den Anführer")
            
say("beseigt")
            
say("Nun sollte ich wider zu")
            
say("Nakajima gehen.")
            
set_state(besiegt)
        
end
    end
    state besiegt begin
        when letter begin 
            local v 
find_npc_by_vnum(20364)
            if 
!= v then  
                target
.vid("__TARGEEET__"v"Nakajima")
            
end 
        end 
        when letter begin
            send_letter
("Nakajima")
        
end
        when button 
or info begin  
            say_title
("Nakajima")  
            
say("ich sollte wider")
            
say("Nakajima aufsuchen")
            
say("um meine belohnung")
            
say("zu kassieren")
            
say("")
        
end
        when __TARGEEET__
.target.click begin 
            target
.delete("__TARGEEET__")
            
say_title("Auftrag"
            
say("Ah ich habe es schon gehört")  
            
say("Die angriffe nehmen wider ab")  
            
say("Vielen dank")
            
say("Hier das ist für dich")
            
wait()
            
pc.give_item2(11259)
            
clear_letter() 
            
set_state(__COMPLETE__
        
end 
    end   
    state __COMPLETE__ begin
    end
end