[SERVICE] Die Questerstellung

Page 116 of 248

116

09/25/2014 18:36 .yorliK#1726

Quote:

Originally Posted by Girok

remix ist ein Opfer.

Habe Sie schon, Kollege. Lappen xD

Dann schreib das doch bitte auch in den Anfrage-Post.

Quote:

Originally Posted by .Ambition シ

hi

ich brauche eine quest womit man wenn man auf ein xxx item rechts klick macht dan soll es fragen M�chtest du auf Level xxx steigen?
brauche so eine quest dringend.
gibt ein thx!

Code:

quest level_up begin
	state start begin
		when xxx.use begin -- xxx durch ItemID ersetzen
			if pc.get_level()>=LEVEL then syschat("Das Item ist nicht mehr f�r dich geeignet.") return end -- LEVEL durch das zu erreichene Level ersetzen.
			say_title("Level Up")
			say("")
			say("M�chtest du auf Level x steigen?")
			if select("Ja","Nein")==2 then return end
			while pc.get_level()< LEVEL do -- LEVEL durch das zu erreichene Level ersetzen.
				pc.give_exp2(pc.get_next_exp())
			end
		end
	end
end

09/25/2014 19:28 .Ambition シ#1727

@kilroy
hab eingef�gt kein fehler aber wenn ich ingame das benutzen will steht unten im chat einfach nur " Das Item ist nicht mehr f�r dich geeignet "

09/25/2014 19:45 oOAnonymous98Oo#1728

Quote:

Originally Posted by Girok

remix ist ein Opfer.

Habe Sie schon, Kollege. Lappen xD

weil er im leben jetzt schon mehr erreicht hat als deine ganze familie?

09/25/2014 20:28 .yorliK#1729

Quote:

Originally Posted by .Ambition シ

@kilroy
hab eingef�gt kein fehler aber wenn ich ingame das benutzen will steht unten im chat einfach nur " Das Item ist nicht mehr f�r dich geeignet "

Du musst in der Quest 2x LEVEL mit dem zu erreichnen Level ersetzen habs aber eigentlich auch kommentiert, das Item bringt ja nichts mehr, wenn man das Level schon erreicht hat. (Daher der Text: Das Item ist nicht mehr f�r dich geeignet.")

09/26/2014 00:24 Tuora#1730

Hallo,k�nnte vielleicht jemand von euch mir eine Quest schreiben
Ablauf

Spoiler

09/26/2014 15:05 .yorliK#1731

Quote:

Originally Posted by ImTweet

Hallo,k�nnte vielleicht jemand von euch mir eine Quest schreiben
Ablauf

Spoiler

Wenn man einen Spieler t�tet sollte man 50 Rankpoints bekommen und
50k Yang und wenn man get�tet wird 50-Rankpoints und -500k Yang.
Danke euch :)

Ich glaube beim Vanilla Core gibt es nen extra when-Befehl daf�r, wie es bei anderen revs ist, wei� ich nicht. Hab es mit npc.get_vid (den Befehl kann man sich, bei �lteren revs, einfach dazu patchen) gel�st.

Code:

quest kill_die begin
	state start begin
		when kill with npc.is_pc() begin
			vid = npc.get_vid()
			MyVid = pc.select(vid)
			pc.change_money(-500000)
			pc.change_alignment(-50)
			pc.select(myVid)
			pc.change_money(50000)
			pc.change_alignment(50)
		end
	end
end

09/26/2014 17:49 Tuora#1732

Quote:
Originally Posted by Kilroy.
Ich glaube beim Vanilla Core gibt es nen extra when-Befehl daf�r, wie es bei anderen revs ist, wei� ich nicht. Hab es mit npc.get_vid (den Befehl kann man sich, bei �lteren revs, einfach dazu patchen) gel�st.
Code:
quest kill_die begin
	state start begin
		when kill with npc.is_pc() begin
			vid = npc.get_vid()
			MyVid = pc.select(vid)
			pc.change_money(-500000)
			pc.change_alignment(-50)
			pc.select(myVid)
			pc.change_money(50000)
			pc.change_alignment(50)
		end
	end
end

Danke f�r diese Quest :)
K�nntest du vllt noch eine Quest schreiben?

Spoiler

09/26/2014 18:32 .yorliK#1733

Quote:

Originally Posted by ImTweet

Danke f�r diese Quest :)
K�nntest du vllt noch eine Quest schreiben?

Spoiler

Also wenn ein Spieler auf der Map xxx(Codes trag ich selbst ein)ist und insgesamt 3mal get�tet wurde wird er rausgekickt(zur hauptmap also Blau,Rot,Gelb),wenn er 1x stirbt soll oben stehen Username wurde gerade get�tet
und am besten wens auch geht soll der Name stehen wer wen get�tet hat.,

(W�re echt nice wenn jemand das hinbekommt)

(wenns geht leben anzeige also Username wurde gerade get�tet er hat noch 2 leben dann 1 leben und wenn er 0 hat steht dort Username wurde gerade von der Map gekickt. )

Schau mal ob's so passt:

Code:

quest kick_kill begin
	state start begin
		when login with pc.get_map_index()==xx begin
			pc.setqf("Map_Leben", 3)
			syschat("Du erh�lst 3 Leben auf dieser Map.")
		end
		when kill with npc.is_pc() and pc.get_map_index()==xx begin
			vid = npc.get_vid()
			myName = pc.get_name()
			myVid = pc.select(vid)
			pc.setqf("Map_Leben", pc.getqf("Map_Leben")-1)
			if pc.getqf("Map_Leben")==0 then
				notice_in_map(pc.get_name().." wurde gerade von "..myName.." aus der Map gekickt.")
				warp_to_village()
			else
				notice_in_map(pc.get_name().." wurde von "..myName.." get�tet. Er/Sie hat noch "..pc.getqf("Map_Leben").." Leben.")
			end
			pc.select(myVid)
		end
	end
end

09/26/2014 20:50 Tuora#1734

Quote:

Originally Posted by Kilroy.

Schau mal ob's so passt:

Code:

quest kick_kill begin
	state start begin
		when login with pc.get_map_index()==xx begin
			pc.setqf("Map_Leben", 3)
			syschat("Du erh�lst 3 Leben auf dieser Map.")
		end
		when kill with npc.is_pc() and pc.get_map_index()==xx begin
			vid = npc.get_vid()
			myName = pc.get_name()
			myVid = pc.select(vid)
			pc.setqf("Map_Leben", pc.getqf("Map_Leben")-1)
			if pc.getqf("Map_Leben")==0 then
				notice_in_map(pc.get_name().." wurde gerade von "..myName.." aus der Map gekickt.")
				warp_to_village()
			else
				notice_in_map(pc.get_name().." wurde von "..myName.." get�tet. Er/Sie hat noch "..pc.getqf("Map_Leben").." Leben.")
			end
			pc.select(myVid)
		end
	end
end

Nice ich danke dir :) bist ein guter Quester
Falls dir nichts ausmacht k�nntest du das noch ein wenig umsetzen?

Spoiler

09/26/2014 22:15 .yorliK#1735

Quote:

Originally Posted by ImTweet

Nice ich danke dir :) bist ein guter Quester
Falls dir nichts ausmacht k�nntest du das noch ein wenig umsetzen?

Spoiler

Also ich kanns per questrolle oder npc eig egal das Event starten und man hat 5min zeit reinzuporten(codes xxx pls danke)und nach 5min kann man sich nicht mehr Porten.Dann soll wenn man auf der map is ne nachricht bekommen oben also
(Text gebe ich dann ein) dann einfach die quest da einbauen also spieler t�ten dan verliert der leben etc also was du mir davor geschrieben hast :)
Wenns geht ein Limit einbauen also max 15Spieler k�nnen die Map Betreten und wenn schon 15spieler drauf sind kann man sich nicht mehr hinporten wenn das geht ^^,danke im vorraus

Sind vielleicht n paar unn�tige Abfragen drin, sollte aber nichts am Endresultat �ndern. Damit die Quest funktioniert musst du in der questlib.lua am Anfang z.B. unter CONFIRM_TIMEOUT einfach
PLAYER_ON_MAP = {}
schreiben.

Quest

Code:

quest kick_kill begin
	state start begin
		function map_index()
			return xx -- einmaliger MapIndex!
		end
-- NPC chat
		when 20011.chat."Kick Kill Event Start" with game.get_event_flag("Kick_Kill_Event")==0 and pc.is_gm() begin
			say_title("Kick Kill Event")
			say("")
			say("M�chtest du das Kick Kill Event")
			say("starten?")
			if select("Ja","Nein")==2 then return end
			game.set_event_flag("Kick_Kill_Event", 1)
			game.set_event_flag("Kick_Kill_Remain_Time", get_time()+60*5)
			notice_all("Kick Kill Event gestartet. Ihr habt 5 Minuten, um euch reinzuteleportieren!")
			server_timer("Kick_Kill_Event", 60*5)
		end
		when 20011.chat."Kick Kill Event Close" with game.get_event_flag("Kick_Kill_Event")!=0 and pc.is_gm() begin
			say_title("Kick Kill Event")
			say("")
			say("M�chtest du das Kick Kill Event")
			say("canceln?")
			if select("Ja","Nein")==2 then return end
			game.set_event_flag("Kick_Kill_Event", 0)
			notice_all("Kick Kill Event wurde gecancelt. Ihr werdet aus der Kick Kill Map gewarpt!")
			warp_all_to_village(kick_kill.map_index(), 1)
		end
		when 20011.chat."Kick Kill Event" with game.get_event_flag("Kick_Kill_Event")==1 begin
			say_title("Kick Kill Event")
			say("")
			say("Auf die Map porten?")
			if select("Ja","Nein")==2 then return end
			if table.getn(PLAYER_ON_MAP)>=15 then 
				say_title("Kick Kill Event")
				say("")
				say("Die Map ist voll, versuche es sp�ter erneut.")
				return
			end
			if game.get_event_flag("Kick_Kill_event")==2 then
				say_title("Kick Kill Event")
				say("")
				say("Man kann sich nicht mehr zur Map porten.")
				return
			end
			pc.warp(863900, 245900) -- Warp eintragen
		end
-- Login, Logout
		when login with pc.get_map_index()==kick_kill.map_index() begin
			if game.get_event_flag("Kick_Kill_Event")!=0 then
				a = 0
				for i=1, table.getn(PLAYER_ON_MAP), 1 do
					if PLAYER_ON_MAP[i]==pc.get_name() then
						a = i
						break
					end
				end
				if a==0 then
					table.insert(PLAYER_ON_MAP, pc.get_name())
				end
				loop_timer("Kick_Kill_Check", 1)
				if game.get_event_flag("Kick_Kill_Event")==1 then
					timer("Start_Ansage", (game.get_event_flag("Kick_Kill_Remain_Time")-get_time()))
				end
			else
				warp_to_village()
			end
		end
		when logout or disconnect with pc.get_map_index()==kick_kill.map_index() begin
			for i=1, table.getn(PLAYER_ON_MAP), 1 do
				if PLAYER_ON_MAP[i] == pc.get_name() then
					table.remove(PLAYER_ON_MAP, i)
				end
			end
		end
-- Kill
		when kill with npc.is_pc() and pc.get_map_index()==kick_kill.map_index() and game.get_event_flag("Kick_Kill_Event")==2 begin
			vid = npc.get_vid()
			myName = pc.get_name()
			myVid = pc.select(vid)
			pc.setqf("Map_Leben", pc.getqf("Map_Leben")-1)
			if pc.getqf("Map_Leben")==0 then
				notice_in_map(pc.get_name().." wurde gerade von "..myName.." aus der Map gekickt.")
				warp_to_village()
			else
				notice_in_map(pc.get_name().." wurde von "..myName.." get�tet. Er/Sie hat noch "..pc.getqf("Map_Leben").." Leben.")
			end
			pc.select(myVid)
		end
-- Timer, Server_timer, loop_timer
		when Start_Ansage.timer with pc.get_map_index()==kick_kill.map_index() begin
			syschat("Du erh�lst 3 Leben auf dieser Map.")
			pc.setqf("Map_Leben", 3)
			notice("Den Text hier eingeben, Text Text Text Text Text Text Text") -- Text hier eingeben
		end
		when Kick_Kill_Event.server_timer begin
			game.set_event_flag("Kick_Kill_Event", 2)
			notice_all("Kick Kill Event: Die 5 Minuten sind um, man kann sich nun nicht mehr zur Map porten.")
		end
		when Kick_Kill_Check.timer with pc.get_map_index()==kick_kill.map_index() begin
			if table.getn(PLAYER_ON_MAP)>15 then
				for i=1, table.getn(PLAYER_ON_MAP), 1 do
					if PLAYER_ON_MAP[i]==pc.get_name() then
						if i>15 then
							warp_to_village()
						end
					end
				end
			end
		end
	end
end

09/26/2014 23:50 .Ryuzaki�#1736

Hallo & guten Tag. Ich br�uchte eine kleine Quest.

Man klickt auf den K�rperkampf-Lehrer und da w�hlt man seine Lehre.. aber stop,
ich will, dass man wenn man die K�rperkampf-Lehre nimmt, dass man direkt alles
auf M1 bekommt statt auf 0 wie normaler Weise. Das halt mit allen Lehrern und jeder
Rasse. W�re echt dankbar f�r die Quest :)

Liebe Gr��e.

09/27/2014 00:07 Tuora#1737

Quote:

Originally Posted by Kilroy.

Quest

Code:

quest kick_kill begin
	state start begin
		function map_index()
			return xx -- einmaliger MapIndex!
		end
-- NPC chat
		when 20011.chat."Kick Kill Event Start" with game.get_event_flag("Kick_Kill_Event")==0 and pc.is_gm() begin
			say_title("Kick Kill Event")
			say("")
			say("M�chtest du das Kick Kill Event")
			say("starten?")
			if select("Ja","Nein")==2 then return end
			game.set_event_flag("Kick_Kill_Event", 1)
			game.set_event_flag("Kick_Kill_Remain_Time", get_time()+60*5)
			notice_all("Kick Kill Event gestartet. Ihr habt 5 Minuten, um euch reinzuteleportieren!")
			server_timer("Kick_Kill_Event", 60*5)
		end
		when 20011.chat."Kick Kill Event Close" with game.get_event_flag("Kick_Kill_Event")!=0 and pc.is_gm() begin
			say_title("Kick Kill Event")
			say("")
			say("M�chtest du das Kick Kill Event")
			say("canceln?")
			if select("Ja","Nein")==2 then return end
			game.set_event_flag("Kick_Kill_Event", 0)
			notice_all("Kick Kill Event wurde gecancelt. Ihr werdet aus der Kick Kill Map gewarpt!")
			warp_all_to_village(kick_kill.map_index(), 1)
		end
		when 20011.chat."Kick Kill Event" with game.get_event_flag("Kick_Kill_Event")==1 begin
			say_title("Kick Kill Event")
			say("")
			say("Auf die Map porten?")
			if select("Ja","Nein")==2 then return end
			if table.getn(PLAYER_ON_MAP)>=15 then 
				say_title("Kick Kill Event")
				say("")
				say("Die Map ist voll, versuche es sp�ter erneut.")
				return
			end
			if game.get_event_flag("Kick_Kill_event")==2 then
				say_title("Kick Kill Event")
				say("")
				say("Man kann sich nicht mehr zur Map porten.")
				return
			end
			pc.warp(863900, 245900) -- Warp eintragen
		end
-- Login, Logout
		when login with pc.get_map_index()==kick_kill.map_index() begin
			if game.get_event_flag("Kick_Kill_Event")!=0 then
				a = 0
				for i=1, table.getn(PLAYER_ON_MAP), 1 do
					if PLAYER_ON_MAP[i]==pc.get_name() then
						a = i
						break
					end
				end
				if a==0 then
					table.insert(PLAYER_ON_MAP, pc.get_name())
				end
				loop_timer("Kick_Kill_Check", 1)
				if game.get_event_flag("Kick_Kill_Event")==1 then
					timer("Start_Ansage", (game.get_event_flag("Kick_Kill_Remain_Time")-get_time()))
				end
			else
				warp_to_village()
			end
		end
		when logout or disconnect with pc.get_map_index()==kick_kill.map_index() begin
			for i=1, table.getn(PLAYER_ON_MAP), 1 do
				if PLAYER_ON_MAP[i] == pc.get_name() then
					table.remove(PLAYER_ON_MAP, i)
				end
			end
		end
-- Kill
		when kill with npc.is_pc() and pc.get_map_index()==kick_kill.map_index() and game.get_event_flag("Kick_Kill_Event")==2 begin
			vid = npc.get_vid()
			myName = pc.get_name()
			myVid = pc.select(vid)
			pc.setqf("Map_Leben", pc.getqf("Map_Leben")-1)
			if pc.getqf("Map_Leben")==0 then
				notice_in_map(pc.get_name().." wurde gerade von "..myName.." aus der Map gekickt.")
				warp_to_village()
			else
				notice_in_map(pc.get_name().." wurde von "..myName.." get�tet. Er/Sie hat noch "..pc.getqf("Map_Leben").." Leben.")
			end
			pc.select(myVid)
		end
-- Timer, Server_timer, loop_timer
		when Start_Ansage.timer with pc.get_map_index()==kick_kill.map_index() begin
			syschat("Du erh�lst 3 Leben auf dieser Map.")
			pc.setqf("Map_Leben", 3)
			notice("Den Text hier eingeben, Text Text Text Text Text Text Text") -- Text hier eingeben
		end
		when Kick_Kill_Event.server_timer begin
			game.set_event_flag("Kick_Kill_Event", 2)
			notice_all("Kick Kill Event: Die 5 Minuten sind um, man kann sich nun nicht mehr zur Map porten.")
		end
		when Kick_Kill_Check.timer with pc.get_map_index()==kick_kill.map_index() begin
			if table.getn(PLAYER_ON_MAP)>15 then
				for i=1, table.getn(PLAYER_ON_MAP), 1 do
					if PLAYER_ON_MAP[i]==pc.get_name() then
						if i>15 then
							warp_to_village()
						end
					end
				end
			end
		end
	end
end

Nice danke f�r die Quest :)

wollte nochmal fragen ob man es so machen k�nnte das 5 Personen pro reich rein k�nnen also
5gelbe 5 rote 5 blaue

09/27/2014 11:32 .yorliK#1738

Quote:

Originally Posted by iBrowly

Hallo & guten Tag. Ich br�uchte eine kleine Quest.

Man klickt auf den K�rperkampf-Lehrer und da w�hlt man seine Lehre.. aber stop,
ich will, dass man wenn man die K�rperkampf-Lehre nimmt, dass man direkt alles
auf M1 bekommt statt auf 0 wie normaler Weise. Das halt mit allen Lehrern und jeder
Rasse. W�re echt dankbar f�r die Quest :)

Liebe Gr��e.

Quest

Code:

quest skill_group begin
	state start begin
		when login or levelup with pc.get_level() >=5 and pc.get_skill_group() == 0 begin
			set_state(run)
		end
	end
	state run begin
		when login with pc.get_skill_group() != 0 begin
			restart_quest()
		end
		when letter with pc.get_skill_group() == 0 begin
			send_letter("Die Ausbildung")
			local job = pc.get_job()
			if job == 0 then
				local v = pc_find_skill_teacher_vid(1)
				if v != 0 then
					target.vid("teacher1", v, "Die Ausbildung")
				end
				local v = pc_find_skill_teacher_vid(2)
				if v != 0 then
					target.vid("teacher2", v, "Die Ausbildung")
				end
			elseif job == 1 then
				local v = pc_find_skill_teacher_vid(1)
				if v != 0 then
					target.vid("teacher3", v, "Die Ausbildung")
				end
				local v = pc_find_skill_teacher_vid(2)
				if v != 0 then
					target.vid("teacher4", v, "Die Ausbildung")
				end
			elseif job == 2 then
				local v = pc_find_skill_teacher_vid(1)
				if v != 0 then
					target.vid("teacher5", v, "Die Ausbildung")
				end
				local v = pc_find_skill_teacher_vid(2)
				if v != 0 then
					target.vid("teacher6", v, "Die Ausbildung")
				end
			elseif job == 3 then
				local v = pc_find_skill_teacher_vid(1)
				if v != 0 then
					target.vid("teacher7", v, "Die Ausbildung")
				end
				local v = pc_find_skill_teacher_vid(2)
				if v != 0 then
					target.vid("teacher8", v, "Die Ausbildung")
				end
			end
		end
		when leave begin
			target.delete("teacher1")
			target.delete("teacher2")
			target.delete("teacher3")
			target.delete("teacher4")
			target.delete("teacher5")
			target.delete("teacher6")
			target.delete("teacher7")
			target.delete("teacher8")
		end
		when button or info begin
			if pc.get_job() == 0 then
				say_title("Lehrer der Kriegerausbildung:")
				say("Wenn du einen Krieger wegen seiner schnellen und")
				say("wiederholten Angriffsf�higkeit bewunderst,")
				say("empfehle ich die K�rper-Kampf-Lehre. Wenn du")
				say("ganze Gruppen von Monstern mit einem Schlag")
				say("ausl�schen m�chtest, empfehle ich die")
				say("Mental-Kampf-Lehre. Wir erwarten dich in der N�he")
				say("des Dorfplatzes.")
				say("")
				select("Best�tigen")
				setskin(NOWINDOW)
			elseif pc.get_job() == 1 then
				say_title("Lehrer der Ninjaausbildung:")
				say("Wenn du dir einen Namen als hervorragender")
				say("Sch�tze machen willst, dann mache eine")
				say("Fernkampf-Lehre. Wenn du bereit bist, geheime")
				say("Missionen im Schutze der Dunkelheit auszuf�hren,")
				say("ist die Nahkampf-Lehre etwas f�r dich.")
				say("Wir erwarten dich in der N�he des Dorfplatzes.")
				say("")
				select("Best�tigen")
				setskin(NOWINDOW)
			elseif pc.get_job() == 2 then
				say_title("Lehrer der Suraausbildung:")
				say("M�chtest du ein wahrer Schwertmagier und")
				say("d�monischer K�mpfer sein? Dann empfehle")
				say("ich die Magische-Waffen-Lehre. Wenn du jedoch")
				say("willst, dass du als Zauberer der Finsternis und")
				say("der Fl�che gef�rchtet wirst, dann w�hle die")
				say("Schwarze-Magie-Lehre.")
				say("Wir erwarten dich in der N�he des Dorfplatzes.")
				say("")
				select("Best�tigen")
				setskin(NOWINDOW)
			elseif pc.get_job() == 3 then
				say_title("Lehrer der Schamanenausbildung:")
				say("Wenn du ein Schamane sein m�chtest, der den")
				say("Einsatz von Magie und das unterst�tzende Segnen")
				say("beherrscht, dann w�hle die Drachenmacht-Lehre.")
				say("Wenn du jedoch den Schmerz und das Leid der")
				say("Anderen lindern willst, dann empfehle ich die")
				say("Lehre der Heilung.")
				say("Wir erwarten dich in der N�he des Dorfplatzes.")
				say("")
				select("Best�tigen")
				setskin(NOWINDOW)
			end
		end
		function join(teacher_job, teacher_group)
			local pc_job = pc.get_job()
			if pc_job != teacher_job then
				say_title("Falsche Lehre")
				say("Tut mir leid.")
				if teacher_job == 1 and teacher_group == 1 then
					say("Nur Ninja k�nnen die Nahkampf-Lehre w�hlen.")
				elseif teacher_job == 1 and teacher_group == 2 then
					say("Nur Ninja k�nnen die Fernkampf-Lehre w�hlen.")
				elseif teacher_job == 2 and teacher_group == 1 then
					say("Nur Sura k�nnen die Magische-Waffen-Lehre")
					say("w�hlen.")
				elseif teacher_job == 2 and teacher_group == 2 then
					say("Nur Sura k�nnen die Schwarze-Magie-Lehre")
					say("w�hlen.")
				elseif teacher_job == 3 and teacher_group == 1 then
					say("Nur Schamanen k�nnen die Drachenmacht-Lehre")
					say("w�hlen.")
				elseif teacher_job == 3 and teacher_group == 2 then
					say("Nur Schamanen k�nnen die Lehre der Heilung")
					say("w�hlen.")
				end
				if pc_job == 0 then
					say_reward("Ein Krieger kann zwischen der K�rper-Kampf-Lehre")
					say_reward("und der Mental-Kampf-Lehre w�hlen.")
				elseif pc_job == 1 then
					say_reward("Ein Ninja kann zwischen der Nahkampf-Lehre und")
					say_reward("der Fernkampf-Lehre w�hlen.")
				elseif pc_job == 2 then
					say_reward("Ein Sura kann zwischen der Magische-Waffen-Lehre")
					say_reward("und der Schwarze-Magie-Lehre w�hlen.")
				elseif pc_job == 3 then
					say_reward("Ein Schamane kann zwischen der Lehre der")
					say_reward("Drachenmacht und der Lehre der Heilung w�hlen.")
				end
			else
				if teacher_job == 0 then
					if teacher_group == 1 then
						say_title("K�rper-Kampf-Lehre")
						say("Ein Sch�ler der K�rper-Kampf-Lehre trainiert")
						say("seine K�rperkraft und lernt sie auch")
						say("gewinnbringend einzusetzen. Seine Angriffe")
						say("schlagen tiefe Wunden, so dass der Gegner schnell")
						say("besiegt ist.")
					elseif teacher_group == 2 then
						say_title("Mental-Kampf-Lehre")
						say("Ein Sch�ler der Mental-Kampf-Lehre trainiert")
						say("seinen Geist und spezialisiert sich auf")
						say("vorausdenkendes K�mpfen. Dadurch ist er in der")
						say("Lage, Angriffe seiner Gegner effektiver")
						say("abzuwehren.")
					end
					say_reward("Anforderung: Krieger ab Level 5")
				elseif teacher_job == 1 then
					if teacher_group == 1 then
						say_title("Nahkampf-Lehre")
						say("In der Nahkampf-Lehre werden Ninja darin")
						say("ausgebildet, den Feind mit schnellen und")
						say("t�dlichen Schl�gen genau an seinen Schwachstellen")
						say("zu treffen.")
					elseif teacher_group == 2 then
						say_title("Fernkampf-Lehre")
						say("In der Fernkamf-Lehre lernen die Ninja, ihre")
						say("Feinde mit einem Bogen pr�zise auf Distanz zu")
						say("bek�mpfen.")
					end
					say_reward("Anforderung: Ninja ab Level 5")
				elseif teacher_job == 2 then
					if teacher_group == 1 then
						say_title("Magische-Waffen_lehre")
						say("In der Magische-Waffen-Lehre �bt man die Kunst")
						say("des gewaltigen Schlags gegen geschw�chte Feinde,")
						say("wobei verfluchte Klingen geschwungen werden.")
					elseif teacher_group == 2 then
						say_title("Schwarze-Magie-Lehre")
						say("In der Schwarze-Magie-Lehre verwendet man dunkle")
						say("K�nste, um Feinde mit Fl�chen auf Distanz zu")
						say("schw�chen.")
					end
					say_reward("Anforderung: Sura ab Level 5")
				elseif teacher_job == 3 then
					if teacher_group == 1 then
						say_title("Drachenmacht-Lehre")
						say("Die Drachenmacht-Lehre verwendet starke")
						say("Feuerangriffe des Drachengottes. Sie nutzt")
						say("Verst�rkungsmagie und kann der Gruppe den Schutz")
						say("des Drachengottes geben.")
					elseif teacher_group == 2 then
						say_title("Lehre der Heilung")
						say("In der Lehre der Heilung lernt man, Feinde durch")
						say("Stromschl�ge zu bet�uben. Zus�tzlich lernt man,")
						say("Gruppenmitglieder zu heilen und zu st�rken.")
					end
					say_reward("Anforderung: Schamanen ab Level 5")
				end
				say("")
				local s = select("Beginnen", "F�r sp�ter vormerken")
				if s == 1 then
					if pc.get_job() == teacher_job and pc.get_skill_group() == 0 then
						pc.set_skill_group(teacher_group)
						pc.clear_skill()
						skill_group.make_M1()
						if not pc.is_clear_skill_group() then
							if pc.get_job() == 0 then
								if pc.get_skill_group() == 1 then
									say_title("Du hast die K�rper-Kampf-Lehre gew�hlt.")
								elseif pc.get_skill_group() == 2 then
									say_title("Du hast die Mental-Kampf-Lehre gew�hlt.")
								end
							elseif pc.get_job() == 1 then
								if pc.get_skill_group() == 1 then
									say_title("Du hast die Nahkampf-Lehre gew�hlt.")
								elseif pc.get_skill_group() == 2 then
									say_title("Du hast die Fernkampf-Lehre gew�hlt.")
								end
							elseif pc.get_job() == 2 then
								if pc.get_skill_group() == 1 then
									say_title("Du hast die Magische-Waffen-Lehre gew�hlt.")
								elseif pc.get_skill_group() == 2 then
									say_title("Du hast die Schwarze-Magie-Lehre gew�hlt.")
								end
							elseif pc.get_job() == 3 then
								if pc.get_skill_group() == 1 then
									say_title("Du hast die Drachenmacht-Lehre gew�hlt.")
								elseif pc.get_skill_group() == 2 then
									say_title("Du hast die Lehre der Heilung gew�hlt.")
								end
							end
							local skill_points = pc.get_level() - 1
							say("Wilkommen!")
							say("Mit der Entscheidung zu einer Lehre erh�ltst du")
							say(""..skill_points.." Fertigkeitspunkte. Diese kannst du einsetzen,")
							say("um Fertigkeiten deiner Wahl zu steigern.")
							say_title("Information:")
							say_reward("Du hast "..skill_points.." Fertigkeitspunkte erhalten.")
							say("")
						else
							say_title("Fehler")
							say("Setze deine Fertigkeiten zur�ck.")
							say("Versuche es anschliessend erneut.")
							say("")
						end
						restart_quest()
					end
				end
			end
		end
		function make_M1()
			skill_list = special.active_skill_list
			for i=1, table.getn(skill_list[pc.get_job()+1][pc.get_skill_group()]), 1 do
				pc.set_skill_level(skill_list[pc.get_job()+1][pc.get_skill_group()][i], 20)
			end
		end
		when teacher1.target.click or 
			skill_group1_1.chat."Beginne die K�rper-Kampf-Lehre" or
			skill_group2_1.chat."Beginne die K�rper-Kampf-Lehre" or
			skill_group3_1.chat."Beginne die K�rper-Kampf-Lehre" 
			begin
			target.delete("teacher1")
			skill_group.join(0, 1)
			
		end
		when teacher2.target.click or 
			skill_group1_2.chat."Beginne die Mental-Kampf-Lehre" or
			skill_group2_2.chat."Beginne die Mental-Kampf-Lehre" or
			skill_group3_2.chat."Beginne die Mental-Kampf-Lehre" 
			begin 
			target.delete("teacher2")
			skill_group.join(0, 2)
		end
		when teacher3.target.click or 
			skill_group1_3.chat."Beginne die Nahkampf-Lehre" or
			skill_group2_3.chat."Beginne die Nahkampf-Lehre" or
			skill_group3_3.chat."Beginne die Nahkampf-Lehre" 
			begin 
			target.delete("teacher3")
			skill_group.join(1, 1)
		end
		when teacher4.target.click or 
			skill_group1_4.chat."Beginne die Fernkampf-Lehre" or
			skill_group2_4.chat."Beginne die Fernkampf-Lehre" or
			skill_group3_4.chat."Beginne die Fernkampf-Lehre" 
			begin 
			target.delete("teacher4")
			skill_group.join(1, 2)
		end
		when teacher5.target.click or 
		skill_group1_5.chat."Beginne die Magische-Waffen-Lehre" or
			skill_group2_5.chat."Beginne die Magische-Waffen-Lehre" or
			skill_group3_5.chat."Beginne die Magische-Waffen-Lehre"
			begin 
			target.delete("teacher5")
			skill_group.join(2, 1)
		end
		when teacher6.target.click or 
			skill_group1_6.chat."Beginne die Schwarze-Magie-Lehre" or
			skill_group2_6.chat."Beginne die Schwarze-Magie-Lehre" or
			skill_group3_6.chat."Beginne die Schwarze-Magie-Lehre" 
			begin 
			target.delete("teacher6")
			skill_group.join(2, 2)
		end
		when teacher7.target.click or 
			skill_group1_7.chat."Beginne die Drachenmacht-Lehre" or
			skill_group2_7.chat."Beginne die Drachenmacht-Lehre" or
			skill_group3_7.chat."Beginne die Drachenmacht-Lehre" 
			begin 
			target.delete("teacher7")
			skill_group.join(3, 1)
		end
		
		when teacher8.target.click or 
			skill_group1_8.chat."Beginne die Lehre der Heilung" or
			skill_group2_8.chat."Beginne die Lehre der Heilung" or
			skill_group3_8.chat."Beginne die Lehre der Heilung" 
			begin 
			target.delete("teacher8")
			skill_group.join(3, 2)
		end
	end
end

Quote:

Originally Posted by ImTweet

Nice danke f�r die Quest :)

wollte nochmal fragen ob man es so machen k�nnte das 5 Personen pro reich rein k�nnen also
5gelbe 5 rote 5 blaue

Ich �berleg mir im Laufe des Tages etwas.
#Edit: Schau mal ob's passt:
#Edit2: Code �berarbeitet, die voherige war Mist. Questlib -> PLAYER_ON_MAP = { {},{},{} }
#Edit3:

Quest

Code:

quest kick_kill begin
	state start begin
		function map_index()
			return xx -- einmaliger MapIndex!
		end
-- NPC chat
		when 20011.chat."Kick Kill Event Start" with game.get_event_flag("Kick_Kill_Event")==0 and pc.is_gm() begin
			say_title("Kick Kill Event")
			say("")
			say("M�chtest du das Kick Kill Event")
			say("starten?")
			if select("Ja","Nein")==2 then return end
			PLAYER_ON_MAP = { {},{},{} }
			game.set_event_flag("Kick_Kill_Event", 1)
			game.set_event_flag("Kick_Kill_Remain_Time", get_time()+60*5)
			notice_all("Kick Kill Event gestartet. Ihr habt 5 Minuten, um euch reinzuteleportieren!")
			server_timer("Kick_Kill_Event", 60*5)
		end
		when 20011.chat."Kick Kill Event Close" with game.get_event_flag("Kick_Kill_Event")!=0 and pc.is_gm() begin
			say_title("Kick Kill Event")
			say("")
			say("M�chtest du das Kick Kill Event")
			say("canceln?")
			if select("Ja","Nein")==2 then return end
			game.set_event_flag("Kick_Kill_Event", 0)
			clear_server_timer("Kick_Kill_Event")
			notice_all("Kick Kill Event wurde gecancelt. Ihr werdet aus der Kick Kill Map gewarpt!")
			warp_all_to_village(kick_kill.map_index(), 1)
		end
		when 20011.chat."Kick Kill Event" with game.get_event_flag("Kick_Kill_Event")==1 begin
			say_title("Kick Kill Event")
			say("")
			say("Auf die Map porten?")
			if select("Ja","Nein")==2 then return end
			if table.getn(PLAYER_ON_MAP[pc.get_empire()])>=5 then 
				say_title("Kick Kill Event")
				say("")
				say("Dein Reich ist bereits 5-Mal in der")
				say("Map vertreten, versuche es sp�ter erneut.")
				return
			end
			if game.get_event_flag("Kick_Kill_event")==2 then
				say_title("Kick Kill Event")
				say("")
				say("Man kann sich nicht mehr zur Map porten.")
				return
			end
			pc.warp(xxxx, xxxx) -- Warp eintragen
		end
-- Login, Logout
		when login with pc.get_map_index()==kick_kill.map_index() begin
			if game.get_event_flag("Kick_Kill_Event")!=0 then
				a = 0
				for i=1, table.getn(PLAYER_ON_MAP[pc.get_empire()]), 1 do
					if PLAYER_ON_MAP[pc.get_empire()][i]==pc.get_name() then
						a = i
						break
					end
				end
				if a==0 then
					table.insert(PLAYER_ON_MAP[pc.get_empire()], pc.get_name())
				end
				if pc.getqf("Map_Leben")==0 and game.get_event_flag("Kick_Kill_Event")==2 then warp_to_village() return end
				loop_timer("Kick_Kill_Check", 1)
				if game.get_event_flag("Kick_Kill_Event")==1 then
					timer("Start_Ansage", (game.get_event_flag("Kick_Kill_Remain_Time")-get_time()))
				end
			else
				warp_to_village()
			end
		end
		when logout or disconnect with pc.get_map_index()==kick_kill.map_index() begin
			for i=1, table.getn(PLAYER_ON_MAP[pc.get_empire()]), 1 do
				if PLAYER_ON_MAP[pc.get_empire()][i] == pc.get_name() then
					table.remove(PLAYER_ON_MAP[pc.get_empire()], i)
				end
			end
		end
-- Kill
		when kill with npc.is_pc() and pc.get_map_index()==kick_kill.map_index() and game.get_event_flag("Kick_Kill_Event")==2 begin
			vid = npc.get_vid()
			myName = pc.get_name()
			myVid = pc.select(vid)
			pc.setqf("Map_Leben", pc.getqf("Map_Leben")-1)
			if pc.getqf("Map_Leben")==0 then
				notice_in_map(pc.get_name().." wurde gerade von "..myName.." aus der Map gekickt.")
				warp_to_village()
			else
				notice_in_map(pc.get_name().." wurde von "..myName.." get�tet. Er/Sie hat noch "..pc.getqf("Map_Leben").." Leben.")
			end
			pc.select(myVid)
		end
-- Timer, Server_timer, loop_timer
		when Start_Ansage.timer with pc.get_map_index()==kick_kill.map_index() begin
			syschat("Du erh�lst 3 Leben auf dieser Map.")
			pc.setqf("Map_Leben", 3)
			notice("Den Text hier eingeben, Text Text Text Text Text Text Text") -- Text hier eingeben
		end
		when Kick_Kill_Event.server_timer begin
			game.set_event_flag("Kick_Kill_Event", 2)
			notice_all("Kick Kill Event: Die 5 Minuten sind um, man kann sich nun nicht mehr zur Map porten.")
		end
		when Kick_Kill_Check.timer with pc.get_map_index()==kick_kill.map_index() begin
			if table.getn(PLAYER_ON_MAP[pc.get_empire()])>5 then
				for i=1, table.getn(PLAYER_ON_MAP[pc.get_empire()]), 1 do
					if PLAYER_ON_MAP[pc.get_empire()][i]==pc.get_name() then
						if i>5 then
							syschat("Tut uns Leid, aber durch dich sind zu viele auf der Map. #WarpBackToVillage")
							warp_to_village()
						end
					end
				end
			end
		end
	end
end

09/29/2014 22:51 Tuora#1739

Hey Quester,ich wollte Fragen ob ihr Zeit h�ttet mir 2 Quests zu schreiben

Ja?

Quest 1 (Easy f�r euch)

Spoiler

Quest 2 (Easy f�r euch)

Spoiler

09/30/2014 14:30 Penk767#1740

Hallo :)
Kann mir jemand helfen eine Quest zu schreiben die:
-Dauerhaft ab level 15 an der Seite ist
-mehrere optionen zur Verf�gung stellt
-Mit PvP kills zu tun hat

Man soll mit 1000 Rangpunkten beginnen (Man kann nicht weniger als 0 Rangpunkte haben). Wenn der Gegner mehr als 5 Level �ber einen ist, sollen keine Punkte abgezogen werden bzw. hinzugef�gt werden zum Rang. Die Punkte die man bekommen soll durch die Leveldifferenz errechnet werden. Bei gleichen Level bekommt man 10 Punkte und dem Verlierer werden 10 abgezogen.

R�nge: Bronze, Silber, Gold, Platin, Diamant
Bronze: 0 - 5000
Silber: 5001 - 10000
Gold: 10001 - 15000
Platin: 15001 - bis ins unendliche
Diamant: Die 10 Spieler mit der h�chsten Rangpunktzahl (erst ab 15001 Punkten zu erreichen)

Die Quest soll folgendes machen: Wenn man Level 15 erreicht und somit PvP machen kann, soll die Quest erscheinen. Die Quest hat folgende optionen:

-Eigener Rang
-Top 10 Spieler auf meinem Rang
-Top 10 Spieler
-Info zum Rangsystem
-Schlie�en

-Wenn man auf "Eigener Rang" klickt, soll nur der Rang angezeigt werden und die Ranggruppe.
-Top 10 Spieler auf meinem Rang: soll die 10 besten Spieler ausgeben die auf dem selben Rang sind wie man selbst
-Top 10 Spieler: Sind die 10 besten Spieler mit den meisten Punkten mit Rang angeben
-Info zum Rangsystem: Hier sollen die R�nge mit der Schrittweite bis zum N�chsten Rang angezeigt werden und allgemeine Infos zur Punkte vergabe.
-Schlie�en: Die Quest soll geschlossen werden und am Rand wieder angezeigt werden.

je nachdem wie es machbar ist.. :)

Falls es gut zu wissen ist: Ich benutze die Daroo files.

Vielen Dank schon mal und einen sch�nen Tag noch :)

Mit besten Gr��en
Penk767

Page 116 of 248

116