[SERVICE] Die Questkontrolle

Page 691 of 845

691

07/10/2014 16:50 dstyl#10351

Man bekommt kein Item, es verschwindet auch keines beim Kill.
W�re gut wenn jmd den Fehler findet. :/

PHP Code:


			
quest seelenstein begin
    state start begin
        when 85020.use begin
            if pc.getqf("seelenstein_leer")==1 then
                chat("Du sammelst nun keine Seelen mehr von Bossmonstern.")
                pc.setqf("seelenstein_leer", 0)
            else
                chat("Du sammelst nun Seelen von Bossmonstern, wenn du leere Seelensteine im Inventar hast.")
                pc.setqf("seelenstein_leer", 1)
            end
        end
    -- Test
        when 2306.kill or 5002.kill or 791.kill or 792.kill or 793.kill or 794.kill or 192.kill with pc.getqf("seelenstein_leer")==1 begin
            if pc.count_item(85020) >= 1 then
                pc.remove_item(85020, 1)
                pc.give_item2(85021, 1)
            else
                chat("Du sammelst nun keine Seelen mehr von Bossmonstern.")
                chat("Du besitzt keine leeren Seelensteine mehr.")
                pc.setqf("seelenstein_leer", 0)
            end
        end
    end
end

07/10/2014 17:45 terron#10352

Quote:

Originally Posted by dstyl

Man bekommt kein Item, es verschwindet auch keines beim Kill.
W�re gut wenn jmd den Fehler findet. :/

PHP Code:

quest seelenstein begin state start begin when 85020.use begin if pc.getqf("seelenstein_leer")==1 then chat("Du sammelst nun keine Seelen mehr von Bossmonstern.") pc.setqf("seelenstein_leer", 0) else chat("Du sammelst nun Seelen von Bossmonstern, wenn du leere Seelensteine im Inventar hast.") pc.setqf("seelenstein_leer", 1) end end -- Test when 2306.kill or 5002.kill or 791.kill or 792.kill or 793.kill or 794.kill or 192.kill with pc.getqf("seelenstein_leer")==1 begin if pc.count_item(85020) >= 1 then pc.remove_item(85020, 1) pc.give_item2(85021, 1) else chat("Du sammelst nun keine Seelen mehr von Bossmonstern.") chat("Du besitzt keine leeren Seelensteine mehr.") pc.setqf("seelenstein_leer", 0) end end end end

There is no error. Look for

PHP Code:


			
when 2306.kill or 5002.kill or 791.kill or 792.kill or 793.kill or 794.kill or 192.kill

in other quests.

If x.kill meets 2 more times in different quests then it doesn't work (at least in 2089 game).

07/10/2014 17:52 dstyl#10353

Quote:

Originally Posted by terron

There is no error. Look for

PHP Code:

when 2306.kill or 5002.kill or 791.kill or 792.kill or 793.kill or 794.kill or 192.kill

in other quests.

If x.kill meets 2 more times in different quests then it doesn't work (at least in 2089 game).

They shouldn't appear in other quests.
I use the 40250 game atm.

The mob "192" isn't in any Quest. Shouldn't it work for it then?

07/10/2014 18:19 terron#10354

Quote:

Originally Posted by dstyl

The mob "192" isn't in any Quest. Shouldn't it work for it then?

Sure? Try to check your /quest/object/192/kill directory. How many files are there? If more than one then ID 192 exists in other quests.

Sorry, I could be wrong, but it's most likely solution.

07/10/2014 19:39 dstyl#10355

Quote:

Originally Posted by terron

Sure? Try to check your /quest/object/192/kill directory. How many files are there? If more than one then ID 192 exists in other quests.

Sorry, I could be wrong, but it's most likely solution.

Solved it.
Used npc.get_race() == VNUM insted of VNUM.kill ^^

07/12/2014 09:42 Drαεth#10356

Hei , ich brauche eine Quest f�r mein ANTIEXP Buttom im Inventar.

Hier die Quest...

Spoiler

Die Quest muss mit when button or info begin anfangen.

Fehler laut Putty:

syntax error : [string "start"]:11: unexpected symbol near `when'
antiexpbottum.quest:17:Error occured on compile antiexpbottum.quest

07/12/2014 10:11 .Delta#10357

du kannst keinen when block innerhalb eines when blocks aufmachen

PHP Code:


			
quest antiexp begin 
    state start begin 
        when button or info begin 
            if pc.getqf("exp_block")==0 then 
                chat("AntiEXP: Ab jetzt bekommst du KEINE Exp mehr!") 
                chat("AntiEXP: Um es zu deaktivieren, klicke nochmal auf mich") 
                pc.setqf("exp_block", 1)     
                loop_timer("exp", 5) 
            else 
                chat("AntiEXP: Ab jetzt bekommst du wieder Exp!") 
                pc.setqf("exp_block", 0) 
                cleartimer("exp") 
            end
        end
        when exp.timer with pc.get_exp()>10 begin             
            pc.give_exp2(-pc.get_exp())           
        end         
    end 
end

07/13/2014 16:03 Ogotox978#10358

Quest itemlevel begin
....... state start begin

.......if pc.get_level == 100 then
...... pc.give_item2(51503)

...... end
.......end
end

Diese Quest soll einem Spieler einfach nur ein Item geben nachdem er wie in diesem Fall Level 100 erreicht hat!
Fehler Code: In VB ; Error occurred on compile ( Name der Quest)
Die Punkte geben die Leerzeichen an .... nur mal so xD Aber die Quest funktioniert auch ingame nicht. Also bei erreichen von level 100 bekommt man kein item. Kann mir wer die korrekte Quest zukommen lassen oder sie posten?

07/13/2014 16:07 terron#10359

Quote:

Originally Posted by Ogotox978

Quest itemlevel begin
state start begin

if pc.get_level == 100 then
pc.give_item2(51503)

end
end
end

Diese Quest soll einem Spieler einfach nur ein Item geben nachdem er wie in diesem Fall Level 100 erreicht hat!
Fehler Code: In VB ; Error occurred on compile ( Name der Quest)

You forgot 'when' block. An example:

PHP Code:


			
quest itemlevel begin

    state start begin

        when login with pc.get_level() == 100 begin

            pc.give_item2(51503)

        end

    end

end

07/13/2014 16:07 QuickFlameZ#10360

Quote:

Originally Posted by Ogotox978

Quest itemlevel begin
....... state start begin

.......if pc.get_level == 100 then
...... pc.give_item2(51503)

...... end
.......end
end

Diese Quest soll einem Spieler einfach nur ein Item geben nachdem er wie in diesem Fall Level 100 erreicht hat!
Fehler Code: In VB ; Error occurred on compile ( Name der Quest)
Die Punkte geben die Leerzeichen an .... nur mal so xD Aber die Quest funktioniert auch ingame nicht. Also bei erreichen von level 100 bekommt man kein item. Kann mir wer die korrekte Quest zukommen lassen oder sie posten?

PHP Code:


			
quest level_price begin
    state start begin
        when levelup with pc.get_level() == 100 begin
            pc.give_item2(itemId, itemAnzahl)
        end
    end
end

07/14/2014 19:27 iTepzHD#10361

Hab auch ein Problem..
Kann nur das "Sensenmann-Event" starten der Rest beendet sich direkt.

Spoiler

Code:

quest eventmanager begin
	state start begin
		when 1337.use begin
			say_title("GM-Panel")
			local main=select("Sensenmann-Event", "Zombie-Event", "Eishexe-Event", "Metin-Event", "Drachen-Event", "Abbrechen")
			if 1==main then
				say_title("Sensenmann-Event")
				say("Wenn du diese Quest aktivierst wird ein Event")
				say("gestartet. Startest du dieses Event kannst du es")
				say("nicht mehr abbrechen.")
				say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")
				say("M�chtest du das Event nun starten?")
				local s = select ("Ja!", "Nein!")
				if s == 1 then
					pc.setqf("sensenmann_ot", 1)
					notice_all("Sensenmann-Event gestartet!")
					notice_all("Es wurden soeben 8 Sensenmann�nner im Orktal vor dem")
					notice_all("Tempel gesichtet. Sucht ihn auf und vernichtet ihn.")
					notice_all("Aber sei gewarnt sie sind Stark und k�nnten so manchen")
					notice_all("Kriegern von euch zu schaffen machen.")
					notice_all("Und nun geht los und vernichtet diese Kreatur!")
					regen_in_map("64", "locale/germany/map/map_n_threeway/sensennmannevent.txt" )
					pc.setqf("sensenmann_ot", 0)
				else
				return
				end
			elseif 2==s then
				say_title("Zombie-Event")
				say("Wenn du diese Quest aktivierst wird ein Event")
				say("gestartet. Startest du dieses Event kannst du es")
				say("nicht mehr abbrechen.")
				say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")
				say("M�chtest du das Event nun starten?")
				local s = select ("Ja!", "Nein!")
				if s == 1 then
					notice_all("Zombie-Event gestartet!")
					notice_all("Es wurde soeben ein Zombiesensenmann im Orktal vor dem")
					notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")
					notice_all("Aber sei gewarnt er ist Stark und k�nnte so manchen")
					notice_all("Kriegern von euch zu schaffen machen.")
					notice_all("Und nun geht los und vernichtet diese Kreatur!")
					mob.spawn(2525, 769, 805, 1)
				else
				return
				end
			elseif 3==s then
				say_title("Eishexe-Event")
				say("Wenn du diese Quest aktivierst wird ein Event")
				say("gestartet. Startest du dieses Event kannst du es")
				say("nicht mehr abbrechen.")
				say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")
				say("M�chtest du das Event nun starten?")
				local s = select ("Ja!", "Nein!")
				if s == 1 then
					pc.setqf("eishexen_ot", 1)
					notice_all("Eishexen-Event gestartet!")
					notice_all("Es wurden soeben 4 Eishexen im Orktal vor dem")
					notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")
					notice_all("Aber sei gewarnt sie sind Stark und k�nnten so manchen")
					notice_all("Kriegern von euch zu schaffen machen.")
					notice_all("Und nun geht los und vernichtet diese Kreatur!")
					regen_in_map("64", "locale/germany/map/map_n_threeway/eishexen.txt" )
					pc.setqf("eishexen_ot", 0)
				else
				return
				end
			elseif 4==s then
				say_title("Metin-Event")
				say("Wenn du diese Quest aktivierst wird ein Event")
				say("gestartet. Startest du dieses Event kannst du es")
				say("nicht mehr abbrechen.")
				say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")
				say("M�chtest du das Event nun starten?")
				local s = select ("Ja!", "Nein!")
				if s == 1 then
					pc.setqf("metin_ot", 1)
					notice_all("Metin-Event gestartet!")
					notice_all("Es wurden soeben einige Metins im Orktal vor dem")
					notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")
					notice_all("Aber sei gewarnt sie sind halten viel aus und k�nnen")
					notice_all("Kriegern von euch zu schaffen machen.")
					notice_all("Und nun geht los und vernichtet diese Kreatur!")
					regen_in_map("64", "locale/germany/map/map_n_threeway/metinsteine.txt" )
					pc.setqf("metin_ot", 0)
				else
				return
				end
			elseif 5==s then
				say_title("Drachen-Event")
				say("Wenn du diese Quest aktivierst wird ein Event")
				say("gestartet. Startest du dieses Event kannst du es")
				say("nicht mehr abbrechen.")
				say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")
				say("M�chtest du das Event nun starten?")
				local s = select ("Ja!", "Nein!")
				if s == 1 then
					notice_all("Drachen-Event gestartet!")
					notice_all("Es wurde soeben ein Drache im Orktal vor dem")
					notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")
					notice_all("Aber sei gewarnt er ist Stark und k�nnte so manchen")
					notice_all("Kriegern von euch zu schaffen machen.")
					notice_all("Und nun geht los und vernichtet diese Kreatur!")
					mob.spawn(2291, 769, 805, 1)
				else
				return
				end
			elseif 6==main then
				return
			end
		end
	end
end

Danke f�r die Hilfe :)

07/14/2014 19:49 terron#10362

PHP Code:


			
quest eventmanager begin

    state start begin

        when 1337.use begin

            say_title("GM-Panel")

            

            local main = select("Sensenmann-Event", "Zombie-Event", "Eishexe-Event", "Metin-Event", "Drachen-Event", "Abbrechen")

            

            if main == 1 then

                say_title("Sensenmann-Event")

                say("Wenn du diese Quest aktivierst wird ein Event")

                say("gestartet. Startest du dieses Event kannst du es")

                say("nicht mehr abbrechen.")

                say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")

                say("M�chtest du das Event nun starten?")

                

                local s = select("Ja!", "Nein!")

                

                if s == 1 then

--                    pc.setqf("sensenmann_ot", 1) -- What did you want to do when past this 

                    notice_all("Sensenmann-Event gestartet!")

                    notice_all("Es wurden soeben 8 Sensenmann�nner im Orktal vor dem")

                    notice_all("Tempel gesichtet. Sucht ihn auf und vernichtet ihn.")

                    notice_all("Aber sei gewarnt sie sind Stark und k�nnten so manchen")

                    notice_all("Kriegern von euch zu schaffen machen.")

                    notice_all("Und nun geht los und vernichtet diese Kreatur!")

                    regen_in_map(64, "locale/germany/map/map_n_threeway/sensennmannevent.txt")

--                    pc.setqf("sensenmann_ot", 0) -- and this rows?

                else

                    return

                end

                

            elseif main == 2 then

                say_title("Zombie-Event")

                say("Wenn du diese Quest aktivierst wird ein Event")

                say("gestartet. Startest du dieses Event kannst du es")

                say("nicht mehr abbrechen.")

                say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")

                say("M�chtest du das Event nun starten?")

                

                local s = select("Ja!", "Nein!")

                

                if s == 1 then

                    notice_all("Zombie-Event gestartet!")

                    notice_all("Es wurde soeben ein Zombiesensenmann im Orktal vor dem")

                    notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")

                    notice_all("Aber sei gewarnt er ist Stark und k�nnte so manchen")

                    notice_all("Kriegern von euch zu schaffen machen.")

                    notice_all("Und nun geht los und vernichtet diese Kreatur!")

                    mob.spawn(2525, 769, 805)

                else

                    return

                end

                

            elseif main == 3 then

                say_title("Eishexe-Event")

                say("Wenn du diese Quest aktivierst wird ein Event")

                say("gestartet. Startest du dieses Event kannst du es")

                say("nicht mehr abbrechen.")

                say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")

                say("M�chtest du das Event nun starten?")

                

                local s = select("Ja!", "Nein!")

                

                if s == 1 then

--                    pc.setqf("eishexen_ot", 1) -- What the hell is this? 

                    notice_all("Eishexen-Event gestartet!")

                    notice_all("Es wurden soeben 4 Eishexen im Orktal vor dem")

                    notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")

                    notice_all("Aber sei gewarnt sie sind Stark und k�nnten so manchen")

                    notice_all("Kriegern von euch zu schaffen machen.")

                    notice_all("Und nun geht los und vernichtet diese Kreatur!")

                    regen_in_map(64, "locale/germany/map/map_n_threeway/eishexen.txt")

--                    pc.setqf("eishexen_ot", 0) -- And this.

                else

                    return

                end

                

            elseif main == 4 then

                say_title("Metin-Event")

                say("Wenn du diese Quest aktivierst wird ein Event")

                say("gestartet. Startest du dieses Event kannst du es")

                say("nicht mehr abbrechen.")

                say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")

                say("M�chtest du das Event nun starten?")

                

                local s = select("Ja!", "Nein!")

                

                if s == 1 then

--                    pc.setqf("metin_ot", 1)

                    notice_all("Metin-Event gestartet!")

                    notice_all("Es wurden soeben einige Metins im Orktal vor dem")

                    notice_all("Tempel gesichtet. Sucht sie auf und vernichtet sie.")

                    notice_all("Aber sei gewarnt sie sind halten viel aus und k�nnen")

                    notice_all("Kriegern von euch zu schaffen machen.")

                    notice_all("Und nun geht los und vernichtet diese Kreatur!")

                    regen_in_map(64, "locale/germany/map/map_n_threeway/metinsteine.txt")

--                    pc.setqf("metin_ot", 0)

                else

                    return

                end

                

            elseif main == 5 then

                say_title("Drachen-Event")

                say("Wenn du diese Quest aktivierst wird ein Event")

                say("gestartet. Startest du dieses Event kannst du es")

                say("nicht mehr abbrechen.")

                say("Dieser NPC ist nur f�r Eventhelfer und Manager gedacht.")

                say("M�chtest du das Event nun starten?")

                

                local s = select("Ja!", "Nein!")

                

                if s == 1 then

                    notice_all("Drachen-Event gestartet!")

                    notice_all("Es wurde soeben ein Drache im Orktal vor dem")

                    notice_all("Tempel gespawnt. Vernichtet ihn und rettet die Orks.")

                    notice_all("Aber sei gewarnt er ist Stark und k�nnte so manchen")

                    notice_all("Kriegern von euch zu schaffen machen.")

                    notice_all("Und nun geht los und vernichtet diese Kreatur!")

                    mob.spawn(2291, 769, 805)

                else

                    return

                end



            elseif main == 6 then

                return

            end

        end

    end

end

P.S. I've added some commentaries but I don't understand what you wanted to do with underlined rows:

Wtf?

07/15/2014 03:15 iTepzHD#10363

Spoiler

Code:

quest lehrlingstruhe begin
    state start begin  
        when 50187.use or 50188.use or 50189.use or 50190.use or 50191.use or 50192.use or 50193.use or 50194.use or 50195.use or 50196.use begin
			local item_v = item.get_vnum()
			local tab, nr = {
				[50187] = {
					["Level"] = 1,
					["Items"] = {
						{"Klasse"},
						{27003, 200},  			--Roter Trank(G) 
						{27006, 200}, 			--Blauer Trank(G) 
						{70038, 200},   			--Tapferkeitsumhang
						{72702, 1},	  			--Windschuhe+
						{71050,	50},	  		--Geschwindigkeitstrank
						{27112,	50},	  		--Gr�ner Trank (G)
						{13009,	1},	  			--Schlachtschild+9
						{14009,	1},	  			--Holzarmband+9
						{15009,	1},	  			--Lederschuhe+9
						{16009,	1},	  			--Holzhalskette+9+9
						{17009,	1},	  			--Holzohrringe+9 
						{70058,	1},				--Teleportationsring
						{50188,	1} 				--Lehrlingstruhe II
					},
					["Klasse"] = {
							[0] = {19, 1},		-- Schwert+9
							[0] = {11209, 1},	-- M�nchsplattenpanzer+9
							[0] = {12209, 1},	-- Traditoneller Helm+9
							[1] = {19, 1},		-- Schwert+9
							[1] = {11409, 1},	-- Azuranzug+9
							[1] = {12349, 1},	-- Lederkapuze+9
							[2] = {19, 1},		-- Schwert+9
							[2] = {11609, 1},	-- Requiem-Plattenpanzer+9
							[2] = {12489, 1},	-- Blutiger Helm+9
							[3] = {7009, 1},	-- F�cher+9	
							[3] = {11809, 1},	-- Purpurkleidung+9
							[3] = {12629, 1}	-- M�nchshut+9
					},
				},
				[50188] = {
					["Level"] = 10,
					["Items"] = {
						{71085, 25},  			--Gegenstand verst�rken
						{71084, 100},  			--Gegenstand verzaubern
						{71003, 1},  			--Fertigkeit-Neuverteilung
						{50189, 1}  			--Lehrlingstruhe III 					
					}
				},
				[50189] = {
					["Level"] = 20,
					["Items"] = {
						{71124, 1},	 			--Wei�er L�we			  
						{50190, 1}  			--Expertentruhe I 					
					}					
				},
				[50190] = {
					["Level"] = 30,
					["Items"] = {
						{25040, 10},  			--Segenschriftrollen 
						{70003, 1},  			--Buch des Anf�hrers     
						{71154, 1},  			--Erfahrungstrank (+80%)	
						{72501, 1},	  			--Anti Exp Ring						
						{50191, 1}  			--Expertentruhe II 					
					}					
				},
				[50191] = {
					["Level"] = 40,
					["Items"] = {
						{71101, 10},  			--Trank der Hast 
						{72001, 1},	 			--1Std Exp Ring
						{70003, 1},  			--Buch des Anf�hrers 
						{50192, 1}  			--Expertentruhe III 					
					}					
				},
				[50192] = {
					["Level"] = 50,
					["Items"] = {
						{71101, 3},  			--Trank der Hast 
						{27112, 3},  			--Trank des Angriffs 
						{71095, 5},  			--Passierschein 
						{70058, 1},  			--Teleportationsring 
						{50513, 100},			--Seelenstein (100x)
						{50193, 1}  			--Meistertruhe I 					
					}					
				},
				[50193] = {
					["Level"] = 60,
					["Items"] = {
						{71032, 3},  			--Schriftrolle des Drachen 
						{71101, 3},  			--Trank der Hast 
						{27112, 3},  			--Trank des Angriffs 
						{76000, 5},  			--Pfirsichbl�tenwein 
						{50513, 200},  			--Seelenstein (200x)
						{50194, 1}  			--Meistertruhe II 					
					}					
				},
				[50194] = {
					["Level"] = 70,
					["Items"] = {
						{71101, 3},  			--Trank der Hast 
						{27112, 3},  			--Trank des Angriffs 
						{76001, 2},  			--Status-Neuverteilung 
						{71084, 3},  			--Gegenstand verst�rken 
						{71085, 3},  			--Gegenstand verzaubern 
						{50195, 1}  			--Meistertruhe III 					
					}					
				},
				[50195] = {
					["Level"] = 80,
					["Items"] = {
						{71101, 3},  			--Trank der Hast 
						{27112, 3},  			--Trank des Angriffs 
						{72728, 1},  			--Elixier des Mondes (M) 
						{72728, 3},  			--Elixier des Forschers 
						{50196, 1}  			--Gro�meistertruhe 					
					}					
				},
				[50196] = {
					["Level"] = 90,
					["Items"] = {
						{27987, 200}  			--200Muscheln					
					}					
				}
			}, 0
			if pc.get_level() >= tab[item_v]["Level"] then
				table.foreach(tab[item_v]["Items"],
					function(i, p)
						if p[1] != "Klasse" then
							pc.give_item2(p[1], p[2])
						else
							nr = tab[item_v]["Klasse"][pc.get_job()]
							pc.give_item2(nr[1], nr[2])
						end
					end
				)
				item.remove()
			else
				chat(string.format("Du musst f�r diese Truhe mindestens Level %d sein!", tab[item_v]["Level"]))
			end
		end
	end
end

Sobald ich die Lehrlingstruhe benutzen will kommt "Du kannst diese Truhe nicht �ffnen."

07/15/2014 05:25 RealHappy#10364

Lehrlingstruhe auf Type 18?

07/15/2014 13:49 iTepzHD#10365