[SERVICE] Die Questkontrolle

Page 753 of 845

753

04/04/2015 07:38 .He3o Copy�#11281

Quote:

Originally Posted by dragos2pac

Code:

quest dragon_soul begin
	state start begin	
		when levelup or letter with pc.level >= 30 begin
			send_letter("Despre alchimie ")
			local v = find_npc_by_vnum(20001)
			if 0 != v then
				target.vid("__TARGET__", v, mob_name(20001))
			end
		end
	
		when info or button begin
			say("Alchimistul, cel mai de�tept dintre cet��eni[ENTER]te caut�. Se pare c� a auzit de ni�te[ENTER]cor draconis bune pentru prelucrat![ENTER]Du-te la el s� te vad�! ")
		end

		when 20001.chat."Cor draconis?! " with pc.level >= 30 begin
			target.delete("__TARGET__")
			say_title(mob_name(20001))
			say("Ah, aici erai! Am descoperit ceva remarcabil[ENTER]Cor draconis![ENTER]Cor draconis-ul este un cristal foarte valoros �i are o putere[ENTER]nemaipomenit�. Se spune c� a fost odat�[ENTER]sufletul unui dragon. Incredibil de frumos! O s�-�i[ENTER]dau Puterea Ochiului Dragon ca s� po�i detecta[ENTER]�i tu aceast� piatr�. Am nevoie de una pentru[ENTER]a o cerceta mai bine. ")
			set_state(state_learning)
		end
	end

	state state_learning begin
		when letter begin
			send_letter("Piatra dragonului ")
		end
		
		when info or button begin
			say("Du-te la Alchimist c�nd g�se�ti un Cor Draconis. ")
		end
		
		when 20001.chat."Piatra dragonului " begin
			say_title(mob_name(20001))
			if pc.count_item(50255) >= 1 then
				say("Felicit�ri! Ai g�sit un cor draconis! Nu m�[ENTER]a�teptam s� m� crezi...[ENTER]Te rog s� ai pu�ina r�bdare.[ENTER]Uau. Am reu�it! �mpreun�![ENTER]Piatra dragon va intra direct �n alchimia[ENTER]dragonului. ")
				ds.give_qualification()
				char_log(pc.get_player_id(), 'DS_QUALIFICATION', 'SUCCESS')
				local today = math.floor(get_global_time() / 86400)
				pc.setf("dragon_soul", "eye_timestamp", today)
				pc.setf("dragon_soul", "eye_left", 100)		
				set_state(state_farming)
			else			
				say("Hei, nu pierde timpul degeaba.[ENTER]Du-te pe t�r�mul dragonului �n c�utarea pietrei! ")
			end
		end
	end

	state state_farming begin
		when letter begin
			send_letter("Puterea dragonului ")
		end
		
		when info or button begin
			say(string.format("Puterea ramas�: %d ", pc.getf("dragon_soul", "eye_left")))
			wait()
			send_letter("Puterea dragonului ")
		end

		when kill begin
			if npc.is_pc() then
				return
			end
			if pc.get_map_index() >= 2400000 and pc.get_map_index() <= 2405000 or pc.get_map_index() >= 2350000 and pc.get_map_index() <= 2355000 then
				return
			else
				if pc.getf("dragon_soul", "drop_on") == 1 then
					if drop_gamble_with_flag("ds_drop") then
						local sansa = number (1, 100)
						local eye_left = pc.getf("dragon_soul", "eye_left")
						if eye_left == 0 then
							pc.setf("dragon_soul", "drop_on", 0)
						else
							if eye_left >= 50 and sansa <= 10 or eye_left >= 25 and sansa <= 5 or eye_left < 25 and sansa <= 2 then
								game.drop_item_with_ownership(50255)
								local cor_got = pc.getf("dragon_soul", "cor_got")
								pc.setf("dragon_soul", "cor_got", cor_got + 1)
								if (cor_got + 1 == 20) then
									pc.setf("dragon_soul", "cor_got", 0)
									pc.setf("dragon_soul", "eye_left", eye_left - 1)
								end
							end
						end
					end
				end
			end
		end

		when 20001.chat."Piatra dragonului " begin
			say_title(mob_name(20001))
			local today = math.floor(get_global_time() / 86400)
			if today == pc.getf("dragon_soul", "eye_timestamp") then
				say("Bun� ziua! A�i primit deja puterea dragonului azi.[ENTER]Procesul m� sl�be�te foarte mult, te pot ajuta[ENTER]pe zi doar o singur� dat�. Vino din nou m�ine! ")
			else
				say("Salut! Pun pariu c� e�ti aici din cauza[ENTER]puterii dragonului. Corect? Ei bine[ENTER]ai venit unde trebuie. Mult noroc �n c�utarea[ENTER] dumneavoastr�! ")
				pc.setf("dragon_soul", "eye_timestamp", today)
				pc.setf("dragon_soul", "cor_got", 0)
				pc.setf("dragon_soul", "eye_left", 100)
				pc.setf("dragon_soul", "drop_on", 1)
			end			
		end
	end
end

Please, help me! I got this error:

Code:

dragon_soul.lua:1:must start with 'quest'

just remove the "_" in ur quest title

04/04/2015 17:44 gondolator#11282

Code:

quest Sparschwein begin
	state start begin
		when login begin
			set_state(information)
		end
	end
	state information begin
		when letter begin
			send_letter("Sparschwein")
		end
		when info or button begin
		say_title("Sparschwein:")
		say("Es ist recht schwierig hier an Yang zu kommen.")
		say("Und weil die Welt nun mal ungerecht ist,")
		say("bekommen die jenigen die es schaffen 10kk anzusparen,")
		say("sogar noch eine Belohnung.")
		say("schaffst du es 10kk anzusparen? Glaub mir es wird sich lohnen")
		say("Willst du die Aufgabe annhemen?")
        local s = select("Ja","Nein keine Zeit")
        if s == 2 then
                    say("Hmm schade")
                    clear_letter()
                    set_state(aufgeben)
        else
            say("Okay los gehts!")
            say_reward("Spare bis du 10kk hast")
            set_state(sparen)
			end
		end
	end
	state sparen begin
		when letter begin
			send_letter("Sparschwein")
		end
		when info or button begin
			say_title("Sparschwein:")
			say("Status:")
			say_reward("Du hast schon "..pc.get_gold().." von 10.000.000 gespart")
		end
		if pc.get_gold()>=10000000 then
			set_state(fertig)
			end
		end
	end
	state fertig begin
		when letter begin
			send_letter("Aufgabe abgeschlossen!")
		end
		when info or button begin
			say_title("Aufgabe abgeschlossen:")
			say("Du hast es geschafft, du hast 10kk angesparrt")
			say("hier wie versprochen deine Belohnung")
			say_reward("20% provision auf dein angesparrtes Yang")
			say_reward("5 Geschenckekisten!")
			pc.give_item2(50035, 5)
			pc.get_gold()*1.2
			clear_letter()
			set_state(ende)
        end
    end

    state aufgeben begin
    end
    
    state ende begin
    end
end

Es kommt die Fehlermeldung:

Code:

expecting `when`or `funktion�
Sparschwein.quest:40:Error occured on compile Sparschwein.quest

04/04/2015 17:48 rollback#11283

Quote:

Originally Posted by gondolator

Code:

quest Sparschwein begin
	state start begin
		when login begin
			set_state(information)
		end
	end
	state information begin
		when letter begin
			send_letter("Sparschwein")
		end
		when info or button begin
		say_title("Sparschwein:")
		say("Es ist recht schwierig hier an Yang zu kommen.")
		say("Und weil die Welt nun mal ungerecht ist,")
		say("bekommen die jenigen die es schaffen 10kk anzusparen,")
		say("sogar noch eine Belohnung.")
		say("schaffst du es 10kk anzusparen? Glaub mir es wird sich lohnen")
		say("Willst du die Aufgabe annhemen?")
        local s = select("Ja","Nein keine Zeit")
        if s == 2 then
                    say("Hmm schade")
                    clear_letter()
                    set_state(aufgeben)
        else
            say("Okay los gehts!")
            say_reward("Spare bis du 10kk hast")
            set_state(sparen)
			end
		end
	end
	state sparen begin
		when letter begin
			send_letter("Sparschwein")
		end
		when info or button begin
			say_title("Sparschwein:")
			say("Status:")
			say_reward("Du hast schon "..pc.get_gold().." von 10.000.000 gespart")
		end
		if pc.get_gold()>=10000000 then
			set_state(fertig)
			end
		end
	end
	state fertig begin
		when letter begin
			send_letter("Aufgabe abgeschlossen!")
		end
		when info or button begin
			say_title("Aufgabe abgeschlossen:")
			say("Du hast es geschafft, du hast 10kk angesparrt")
			say("hier wie versprochen deine Belohnung")
			say_reward("20% provision auf dein angesparrtes Yang")
			say_reward("5 Geschenckekisten!")
			pc.give_item2(50035, 5)
			pc.get_gold()*1.2
			clear_letter()
			set_state(ende)
        end
    end

    state aufgeben begin
    end
    
    state ende begin
    end
end

Es kommt die Fehlermeldung:

Code:

expecting `when`or `funktion�
Sparschwein.quest:40:Error occured on compile Sparschwein.quest

Code:

if pc.get_gold()>=10000000 then
			set_state(fertig)
			end
		end

Du brauchst an der Stelle einen Quest-Trigger (when ... begin)

04/04/2015 17:53 gondolator#11284

ok, jetzt kommt:

Code:

when doesn�t have begin end clause

04/04/2015 20:38 KΛIƬӨ#11285

Quote:
Originally Posted by gondolator
ok, jetzt kommt:
Code:
when doesn�t have begin end clause

Schick mal die ganze Quest bitte und ich schaus mir schnell an. =)

04/05/2015 01:46 Backxtar#11286

Hey ich hab folgendes Problem. Ich habe einen Teleportationsring, der mich auch �berall hinbringt, jedoch steht 2x weiter da.. einmal rechts am Rang und einmal unter den Warpzielen. Wenn ich rechts auf weiter klicke komme ich auf eine leere Seite. Kann ich diese Seiten bef�llen, da das weiter unten etwas �ber das Fenster hinausragt?

Hier ein Bild:

Spoiler

Hier meine Quest:

Spoiler

PHP Code:


			
quest warpringwayne begin
state start begin
when 70058.use begin
say_title("Warpring") 
say("Wohin m�chtest Du teleportiert werden?")
local empire = pc.get_empire() 
local selectmap = select("Map1","Map2","Orktal","W�ste","Eisland","Feuerland","Weiter","Abbrechen")
if selectmap == 8 then
return
elseif selectmap == 7 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local selectmap2 = select("D�monenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Land der Riesen / Mini FM","Abbrechen")
if selectmap2 == 7 then
return
elseif selectmap2 == 1 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
pc.warp(590500,110800)
elseif selectmap2 == 2 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local geisterselect = select("Anfang","Ende","Abbrechen")
if geisterselect == 3 then
return
elseif geisterselect == 1 then
pc.warp(290500,5700)
elseif geisterselect == 2 then
pc.warp(286400,44200)
end
elseif selectmap2 == 3 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local roterselect = select("Anfang","Ende","Abbrechen")
if roterselect == 3 then
return
elseif roterselect == 1 then
pc.warp(1119900,70800)
elseif geisterselect == 2 then
pc.warp(1119100,7700)
end
elseif selectmap2 == 4 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local spinnenselect = select("SD1","SD2","SD3","Abbrechen")
if spinnenselect == 4 then
return
elseif spinnenselect == 1 then
pc.warp(91700,525300)
elseif spinnenselect == 2 then
pc.warp(704096,464233)
elseif spinnenselect == 3 then
pc.warp(98400,571100)
end
elseif selectmap2 == 5 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local grotteselect = select("Grotte1","Grotte2","Abbrechen")
if grotteselect == 3 then
return
elseif grotteselect == 1 then
pc.warp(10000,1214200)
elseif grotteselect == 2 then
pc.warp(153600,1203200)
end
elseif selectmap2 == 6 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
pc.warp(827700,763400)
end
elseif selectmap == 1 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if map1select == 4 then
return
elseif map1select == 1 then
pc.warp(474300, 954800)
elseif map1select == 2 then
pc.warp(63800, 166400)
elseif map1select == 3 then
pc.warp(959900, 269200)
end
elseif selectmap == 2 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
if map2select == 4 then
return
elseif map2select == 1 then
pc.warp(353100, 882900)
elseif map2select == 2 then
pc.warp(145500, 240000)
elseif map2select == 3 then
pc.warp(863900, 246000)
end
elseif selectmap == 3 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local otselect = select("Anfang","Mitte","Abbrechen")
if otselect == 3 then
return
elseif otselect == 1 then
if empire == 1 then
pc.warp(402100, 673900)
elseif empire == 2 then
pc.warp(270400, 739900)
elseif empire == 3 then
pc.warp(321300, 808000)
end
elseif otselect == 2 then
pc.warp(332800, 745600)
end
elseif selectmap == 4 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local wuesteselect = select("Anfang","Mitte","Abbrechen")
if wuesteselect == 3 then
return
elseif wuesteselect == 1 then
if empire == 1 then
pc.warp(217800, 627200)
elseif empire == 2 then
pc.warp(221900, 502700)
elseif empire == 3 then
pc.warp(344000, 502500)
end
elseif wuesteselect == 2 then
pc.warp(296800, 547100)
end
elseif selectmap == 5 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local eisselect = select("Anfang","Mitte","Abbrechen")
if eisselect == 3 then
return
elseif eisselect == 1 then
if empire == 1 then
pc.warp(434200, 290600)
elseif empire == 2 then
pc.warp(375200, 174900)
elseif empire == 3 then
pc.warp(491800, 173600)
end
elseif eisselect == 2 then
pc.warp(436500, 215400)
end
elseif selectmap == 6 then
say_title("Warpring") 
say("Wohin m�chtest du Teleportiert werden?")
local feuerselect = select("Anfang","Mitte","Abbrechen")
if feuerselect == 3 then
return
elseif feuerselect == 1 then
if empire == 1 then
pc.warp(599400, 756300)
elseif empire == 2 then
pc.warp(597800, 622200)
elseif empire == 3 then
pc.warp(730700, 689800)
end
elseif feuerselect == 2 then
pc.warp(600800, 687100)
end
end
end
end
end

04/05/2015 03:11 Rofelmau#11287

der weiter Button ist eine Funktion deines Servers (glaube in der quest.ui oder so hei�t die Datei) die automatisch wenn es zu viele Buttons sind, diesen weiter Button einf�gt.
Du hast 2 M�glichkeiten
1. Du sagst du willst diese Funktion nicht haben. dann musst du dass in besagter Datei auskommentieren, genaue Anleitungen gibt es mehrfach hier in epvp einfach suchen.
2. Du sagst, du nutzt diese Funktion, hierf�r m�sstest du dann einfach deinen selbst geschrieben weiter Button entfernen und einfach alle Button hintereinander machen, die Funktion in deinem Server, wird die Umbr�che auf nie n�chste Seite automatisch machen, sofern sie richtig geschrieben ist.

04/05/2015 11:36 Backxtar#11288

:o nicht mein fachgebiet .. kann das einer ^^ die quest umschreiben? :D

04/05/2015 12:30 KΛIƬӨ#11289

Quote:

Originally Posted by Backxtar

:o nicht mein fachgebiet .. kann das einer ^^ die quest umschreiben? :D

Nimm die Sensenmann Quest, oder ich schreib dir eine wenn du die nicht m�chtest :>

04/05/2015 12:50 .yorliK#11290

Quote:

Originally Posted by Backxtar

Hey ich hab folgendes Problem. Ich habe einen Teleportationsring, der mich auch �berall hinbringt, jedoch steht 2x weiter da.. einmal rechts am Rang und einmal unter den Warpzielen. Wenn ich rechts auf weiter klicke komme ich auf eine leere Seite. Kann ich diese Seiten bef�llen, da das weiter unten etwas �ber das Fenster hinausragt?

Warum k�nnt ihr ihm die Quest denn nicht einfach so umschreiben, wie er es m�chte xD?

Code:

quest warpringwayne begin
	state start begin
		when 70058.use begin
			say_title("Warpring") 
			say("Wohin m�chtest Du teleportiert werden?")
			local empire = pc.get_empire() 
			local selectmap = select("Map1","Map2","Orktal","W�ste","Eisland","Feuerland", "D�monenturm","Geisterwald","Roter Wald","Spinnendungeon","Grotte der Verbannung","Land der Riesen / Mini FM","Abbrechen")
			if selectmap == 1 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local map1select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
				if map1select == 4 then
					return
				elseif map1select == 1 then
					pc.warp(474300, 954800)
					elseif map1select == 2 then
				pc.warp(63800, 166400)
				elseif map1select == 3 then
					pc.warp(959900, 269200)
				end
			elseif selectmap == 2 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local map2select = select("Rotes Reich","Gelbes Reich","Blaues Reich","Abbrechen")
				if map2select == 4 then
					return
				elseif map2select == 1 then
					pc.warp(353100, 882900)
				elseif map2select == 2 then
					pc.warp(145500, 240000)
				elseif map2select == 3 then
					pc.warp(863900, 246000)
				end
			elseif selectmap == 3 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local otselect = select("Anfang","Mitte","Abbrechen")
				if otselect == 3 then
					return
				elseif otselect == 1 then
					if empire == 1 then
						pc.warp(402100, 673900)
					elseif empire == 2 then
						pc.warp(270400, 739900)
					elseif empire == 3 then
						pc.warp(321300, 808000)
					end
				elseif otselect == 2 then
					pc.warp(332800, 745600)
				end
			elseif selectmap == 4 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local wuesteselect = select("Anfang","Mitte","Abbrechen")
				if wuesteselect == 3 then
					return
				elseif wuesteselect == 1 then
				if empire == 1 then
					pc.warp(217800, 627200)
				elseif empire == 2 then
					pc.warp(221900, 502700)
				elseif empire == 3 then
					pc.warp(344000, 502500)
				end
				elseif wuesteselect == 2 then
				pc.warp(296800, 547100)
				end
			elseif selectmap == 5 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local eisselect = select("Anfang","Mitte","Abbrechen")
				if eisselect == 3 then
					return
				elseif eisselect == 1 then
					if empire == 1 then
						pc.warp(434200, 290600)
					elseif empire == 2 then
						pc.warp(375200, 174900)
					elseif empire == 3 then
						pc.warp(491800, 173600)
					end
				elseif eisselect == 2 then
					pc.warp(436500, 215400)
				end
			elseif selectmap == 6 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local feuerselect = select("Anfang","Mitte","Abbrechen")
				if feuerselect == 3 then
					return
				elseif feuerselect == 1 then
					if empire == 1 then
						pc.warp(599400, 756300)
					elseif empire == 2 then
						pc.warp(597800, 622200)
					elseif empire == 3 then
						pc.warp(730700, 689800)
					end
				elseif feuerselect == 2 then
					pc.warp(600800, 687100)
				end
			elseif selectmap == 7 then
				pc.warp(590500,110800)
			elseif selectmap == 8 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local geisterselect = select("Anfang","Ende","Abbrechen")
				if geisterselect == 3 then
					return
				elseif geisterselect == 1 then
					pc.warp(290500,5700)
				elseif geisterselect == 2 then
					pc.warp(286400,44200)
				end
			elseif selectmap == 9 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local roterselect = select("Anfang","Ende","Abbrechen")
				if roterselect == 3 then
					return
				elseif roterselect == 1 then
					pc.warp(1119900,70800)
				elseif geisterselect == 2 then
					pc.warp(1119100,7700)
				end
			elseif selectmap == 10 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local spinnenselect = select("SD1","SD2","SD3","Abbrechen")
				if spinnenselect == 4 then
					return
				elseif spinnenselect == 1 then
					pc.warp(91700,525300)
				elseif spinnenselect == 2 then
					pc.warp(704096,464233)
				elseif spinnenselect == 3 then
					pc.warp(98400,571100)
				end
			elseif selectmap == 11 then
				say_title("Warpring") 
				say("Wohin m�chtest du Teleportiert werden?")
				local grotteselect = select("Grotte1","Grotte2","Abbrechen")
				if grotteselect == 3 then
					return
				elseif grotteselect == 1 then
					pc.warp(10000,1214200)
				elseif grotteselect == 2 then
					pc.warp(153600,1203200)
				end
			elseif selectmap == 12 then
				pc.warp(827700,763400)
			elseif selectmap == 13 then
				return
			end
		end
	end
end

04/05/2015 21:45 Backxtar#11291

Danke :D die Quest scheint zu stimmen, jedoch ist schon ne weile mein Warpring nicht mehr anklickbar :( Woran liegt das?

04/05/2015 21:49 rollback#11292

Quote:

Originally Posted by Backxtar

Danke :D die Quest scheint zu stimmen, jedoch ist schon ne weile mein Warpring nicht mehr anklickbar :( Woran liegt das?

Ist der Type auf 18?

04/05/2015 22:15 Backxtar#11293

Ja :(

keiner ne idee? verzweifle ..

04/06/2015 20:46 Zentu.#11294

PHP Code:


			
 when 70058.use begin

PHP Code:


			
 when 70007.use begin

um�ndern.

Gru�,
Zentu

04/06/2015 22:10 Backxtar#11295

Hab noch eine Frage und zwar hab ich von Sensenmann diese Quest bekommen.. er ist definitiv f�hig dazu, der erste Teil der Quest klappt auch, jedoch sind die Lehrlingstruhen nicht anklickbar :(
Type is 18!

Spoiler

Code:

quest lehrlingstruhe begin
	state start begin
		when login begin
			pc.give_item2(50187, 1)
			pc.set_skill_level(131, 10) --Pferd Rufen
			pc.set_skill_level(137, 20) --Pferderücken
			pc.set_skill_level(138, 20) --Pferdestampfer
			pc.set_skill_level(139, 20) --Kraftwelle
			pc.set_skill_level(140, 20) --Pfeilregen
			horse.set_level(21) --Pferd LVL 21
			notice_all("Wir begr��en "..pc.get_name().." als neuen Spieler auf Latoya2.")
			set_state(letter)
		end
	end
	state letter begin
		when login or enter begin
			send_letter("Willkommen auf Latoya2!")
		end
		when button or info begin
			say("Hallo "..pc.get_name().."!")
			say("Die spannenden Abenteuer von Latoya2 stehen kurz")
			say("bevor. Zun�chst solltest Du jedoch Erfahrung")   
			say("sammeln. In Deiner Online-Liste findest Du")
			say("eine Kategorie Team. Solltest Du Fragen haben,")
			say("wende Dich an einen Teamler. Wir helfen gerne.")
			say("Wenn du jagen m�chtest, findest du wilde Tiere")
			say("au�erhalb der Dorfgrenzen. Sie werden als rote")
			say("Punkte auf der Minimap angezeigt. Du solltest")
			say("Dich zun�chst auf kleine Tiere konzentrieren,")
			say("da sie die einfachsten Gegner darstellen.")
			say("Viel Erfolg!")
			if select("Info l�schen", "Info behalten") == 2 then return end
			clear_letter()
			set_state(_COMPLETE_)
		end
	end
	state _COMPLETE_ begin
	end
end

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 truhe_config = {
				[50187] = {
					["lv"] = 0,
					[0] = {
						{19, 1},
						{11209, 1},
						{12209, 1}
					},
					[1] = {
						{1009, 1},
						{11409, 1},
						{12349, 1}
					},
					[2] = {
						{19, 1},
						{11609, 1},
						{12489, 1}
					},
					[3] = {
						{7009, 1},
						{11809, 1},
						{12629, 1}
					},
					["all"] = {
						{13009, 1},
						{14009, 1},
						{17009, 1},
						{16009, 1},
						{15009, 1},
						{70058, 1},
						{50053, 1},
						{72724, 1},
						{72728, 1},
						{27112, 5},
						{27115, 5},
						{72701, 1},
						{76007, 200},
						{76023, 25},
						{76024, 25},
						{50034, 1},
						{50188, 1}
					}
				},
				[50188] = {
					["lv"] = 10,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{25040, 5},
						{76023, 50},
						{76024, 50},
						{76008, 5},
						{50189, 1}
					}
				},
				[50189] = {
					["lv"] = 20,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{39024, 5},
						{39025, 5},
						{71003, 1},
						{71034, 25},
						{50190, 1}
					}
				},
				[50190] = {
					["lv"] = 30,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{71035, 10},
						{71001, 10},
						{71084, 75},
						{71094, 5},
						{50191, 1}
					}
				},
				[50191] = {
					["lv"] = 40,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{71101, 15},
						{25040, 15},
						{27987, 10},
						{70003, 1},
						{50192, 1}
					}
				},
				[50192] = {
					["lv"] = 50,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{50513, 5},
						{39005, 15},
						{71027, 5},
						{71107, 5},
						{71034, 50},
						{50193, 1}
					}
				},
				[50193] = {
					["lv"] = 60,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{71001, 10},
						{39016, 10},
						{71094, 10},
						{39018, 5},
						{50194, 1}
					}
				},
				[50194] = {
					["lv"] = 70,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{39015, 5},
						{27992, 3},
						{27993, 3},
						{27994, 3},
						{50082, 1},
						{71001, 20},
						{50195, 1}
					}
				},
				[50195] = {
					["lv"] = 80,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{25041, 1},
						{30179, 3},
						{50186, 1},
						{50513, 10},
						{71094, 10},
						{50196, 1}
					}
				},
				[50196] = {
					["lv"] = 90,
					[0] = {},
					[1] = {},
					[2] = {},
					[3] = {},
					["all"] = {
						{39005, 15},
						{39016, 10},
						{39015, 5},
						{27992, 5},
						{27993, 5},
						{27994, 5},
						{25041, 1},
						{71153, 1}
					}
				}
			}
			if pc.get_level() >= truhe_config[item.get_vnum()]["lv"] then
				for _, tbl in pairs(truhe_config[item.get_vnum()][pc.get_job()]) do
					pc.give_item2(tbl[1], tbl[2])
				end
				for _, tbl in pairs(truhe_config[item.get_vnum()]["all"]) do
					pc.give_item2(tbl[1], tbl[2])
				end
				pc.remove_item(item.get_vnum(), 1)
			else
				syschat("Diese Truhe kannst du erst ab Level "..truhe_config[item.get_vnum()]["lv"].." öffnen.")
			end
		end
	end
end

Page 753 of 845

753