[SERVICE] Die Questerstellung

Quote:

Originally Posted by .Vegas™ PHP Code: quest seelenstein begin      state start begin          function BuildPerfectMasterSkillList(job, group)              GRAND_MASTER_SKILL_LEVEL = 30              PERFECT_MASTER_SKILL_LEVEL = 40              local skill_list = special.active_skill_list[job+1][group]              local ret_vnum_list = {}              local ret_name_list = {}              -- test_chat(string.format("job=%d, group=%d", job, group))              table.foreach(skill_list,               function(i, skill_vnum)               local skill_level = pc.get_skill_level(skill_vnum)              -- test_chat(string.format("[%d]=%d", skill_vnum, skill_level))              if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then                  table.insert(ret_vnum_list, skill_vnum)                  local name=locale.GM_SKILL_NAME_DICT[skill_vnum]                  if name == nil then name=skill_vnum end                  table.insert(ret_name_list, name)              end              end)              return {ret_vnum_list, ret_name_list}              --return {ret_vnum_list, ret_name_list}          end          when 50513.use begin              local count = pc.count_item(50513)              pc.setqf("regen_count", count)              if pc.get_skill_group() == 0 then                  say("Du hast noch keine Fertigkeiten.")                  say("Versuche es später erneut.")                  return              end              local result = regenbogenstein.BuildPerfectMasterSkillList(pc.get_job(), pc.get_skill_group())              local vnum_list = result[1]              local name_list = result[2]              if table.getn(vnum_list) == 0 then                  say("Du hast keine Fertigkeiten.")                  return              end              local menu_list = {}              table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)              table.insert(menu_list, "Abbrechen")               local s=select_table(menu_list)              if table.getn(menu_list) == s then                  return              end              local skill_name=name_list[s]              local skill_vnum=vnum_list[s]              say("Möchtest du "..skill_name.." wirklich erhöhen?")              local wahl = select("Ja", "Nein")              if wahl == 1 then                  if pc.count_item(50513) == pc.getqf("regen_count") then                      pc.set_skill_level(skill_vnum, pc.get_skill_level(skill_vnum)+1)                       say(skill_name.." wurde erhöht.")                  else                      say("Buguser bekommen keine P-Skills ! ")                  end              elseif wahl == 2 then                  return              end              pc.remove_item(50513, 1)          end      end  end  Wenn ich die Quest Reloade kommt das: [Only registered and activated users can see links. Click Here To Register...] lg. .Vegas

Quote:

Originally Posted by .Vegas™ Wenn ich die Quest Reloade kommt das: [Only registered and activated users can see links. Click Here To Register...] lg. .Vegas

quest Seelenstein begin 
	state start begin 
		function BuildPerfectMasterSkillList(job, group) 
			GRAND_MASTER_SKILL_LEVEL = 30 
			PERFECT_MASTER_SKILL_LEVEL = 40 

			local skill_list = special.active_skill_list[job+1][group] 
			local ret_vnum_list = {} 
			local ret_name_list = {} 

			-- test_chat(string.format("job=%d, group=%d", job, group)) 

			table.foreach(skill_list,  
			function(i, skill_vnum)  
			local skill_level = pc.get_skill_level(skill_vnum) 

			-- test_chat(string.format("[%d]=%d", skill_vnum, skill_level)) 
			if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then 

				table.insert(ret_vnum_list, skill_vnum) 
				local name=locale.GM_SKILL_NAME_DICT[skill_vnum] 
				if name == nil then name=skill_vnum end 
				table.insert(ret_name_list, name) 
			end 
			end) 
			return {ret_vnum_list, ret_name_list} 


			--return {ret_vnum_list, ret_name_list} 
		end 
		when 50513.use begin
			if pc.get_skill_group() == 0 then 
				say("Du hast noch keine Fertigkeiten.") 
				say("Versuche es später erneut.") 
				return 
			end 
			local result = Seelenstein.BuildPerfectMasterSkillList(pc.get_job(), pc.get_skill_group()) 
			local vnum_list = result[1] 
			local name_list = result[2] 
			if table.getn(vnum_list) == 0 then 
				say("Du hast keine Fertigkeiten.") 
				return 
			end 
			local menu_list = {} 
			table.foreach(name_list, function(i, name) table.insert(menu_list, name) end) 
			table.insert(menu_list, "Abbrechen")  
			local s=select_table(menu_list) 
			if table.getn(menu_list) == s then 
				return 
			end 
			local skill_name=name_list[s] 
			local skill_vnum=vnum_list[s] 
			say("Möchtest du "..skill_name.." wirklich erhöhen?") 
			if select("Ja", "Nein")==2 then return end
			if pc.count_item(50513)>0 then 
				pc.set_skill_level(skill_vnum, pc.get_skill_level(skill_vnum)+1)  
				say(skill_name.." wurde erhöht.") 
			else
				say("Buguser bekommen keine P-Skills ! ") 
				return 
			end 
			pc.remove_item(50513, 1) 
		end 
	end 
end

Quote:

Originally Posted by .Vegas™ Guten Tag, kann mir jemand eine Teleporter Quest machen? Es sollte so sein das man zu einem NPC geht und dann steht da Grotter der Verbannung2, Drachenraum. Man braucht für den Drachenraum aber ein Item das das man abgeben muss. Wäre toll jemand könnte mir die erstellen. lg. .Vegas

quest TeleportVegas begin
	state start begin
		when NPC.chat."Teleportieren" begin -- NPC durch die NPC vnum ersetzen
			say_title("Teleportieren")
			say("")
			say("Wo möchtest du hin?")
			s = select("Grotte der Verbannung 2", "Drachenraum", "Abbrechen")
			if s==3 then
				return
			elseif s==1 then
				pc.warp(xxxx,xxxx) -- xxxx durch den Warpcode Grotte 2 ersetzen
			elseif s==2 then
				if pc.count_item(itemid)<1 then itemid des items für Drachenraum
					say_title("Drachenraum")
					say("")
					say("Um in den Drachenraum zugelangen, brauche")
					say("ich:")
					say_item("Itemname", itemid, "Itemname") -- itemid des items für Drachenraum
					say("")
				else
					pc.remove_item(itemid, 1) -- itemid des items für Drachenraum
					pc.warp(xxxx,xxxx) -- xxxx durch den Warpcode Drachenraum ersetzen
				end
			end
		end
	end
end

Quote:

Originally Posted by IzeBreakzz Hey @all, könnte mir jemand eine Quest die folgendermaßen aussieht schreiben?: Wenn sich ein Spieler der im Roten Reich einloggt muss er zum Stadtwächter. Wenn einer ausm blauen einloggt, zum Schmied und wenn er aus dem Gelben kommt zum Fischer. Und evtl. eine Anschlussquest: Wenn der SPieler die vorherige Quest erledigt hat dann kann er die Quest hier anfangen. Das soll praktisch eine Questreihe für jedes Reich seperat werden. Wäre toll wenn mir da jemand bei der Umsetzung helfen könnte. Kind Regards, IzeBreakzz

Quote:

Originally Posted by Critella Ich suche eine Quest Wenn ich eine lv 70er rüssi auf den NPC ziehe öffnet sich ein Fenster wo drin steht ob ich PVP oder PVM haben will und der NPC ändert mir dann die 70er zu den Ausgesuchten Rüssis um

quest Critella begin
	state start begin
		function is_in_table(t, var)
			for i=1, table.getn(t), 1 do
				if t[i]==var then
					return true
				end
			end
		end
		when npcid.take begin -- npcvnum
			if not Critella.is_in_table({11299, 11499, 11699, 11899}, item.get_vnum()) then 
				syschat("Du kannst nur Lv70'er Rüstungen tauschen!")
				return
			end
			vnum = item.get_vnum()
			newr = {
					[11299] = { PVM, PVP }, -- Krieger
					[11499] = { PVM, PVP }, -- Ninja
					[11699] = { PVM, PVP }, -- Sura
					[11899] = { PVM, PVP } -- Schamane
					}
			say_title(mob_name(npc.get_race()))
			say("")
			say("Welche Rüstung möchtest du?")
			s = select("PvM-Rüstung", "PvP-Rüstung", "Schließen")
			if s==3 then return end
			pc.give_item2(newr[vnum][s], 1)
			item.remove()
		end
	end
end

Quote:

Originally Posted by Critella Suche eine Quest wo ich beim NPC ganz schnell swutchen kann zu einem anderen Abteil z.B. der Gemi hat Itemshop, Getränke und Steine wenn ich bei Itemshops bin, das ich ganz schnell ohne wegzu klicken zu den Getränken oder Steinen komme

Quote:

Originally Posted by .тyѕση /.ηαяuтσ Viel Glück beim suchen. Wenn das jemand hinkriegt, Respekt.

Quote:

Originally Posted by .ʛᶉɑҹғох™ Das ist nicht schwierig, nur nicht in LUA umzusetzen, da musste Python nutzen oder es direkt in der Binary anstellen. somit #delete-it-request-jo-digga