[Suche]Questideen

----------------------------------------------------------------------------------------------------------------
------------Script by Jango-------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------
quest rates begin
    state start begin
		function set(type, value, duration)
			local type_name={"1:item_drop", "2:gold_drop", "3:gold10_drop", "4:exp"}
			command("priv_empire 0 "..type_name[type].." "..value.." "..duration.."")
		end
		when 70023.use begin
			----------------------------------------------------------------------------------------------------
			local ratesitem_vnum=70023   --Item ID von dem Rates Item (das was vor .use steht also nur die Zahl)
			local GM_NAME="[SA]Blutwolf" --Name von dem Char der das Item nutzen darf
			----------------------------------------------------------------------------------------------------
			if not pc.is_gm() then
				say("Nur ein GM darf dieses Item Nutzen!")
				pc.remove_item(ratesitem_vnum, pc.countitem(ratesitem_vnum))
				return
			end
			if pc.name!=GM_NAME then
				say("Nur der Admin des Servers")
				say("Darf dieses Item benutzen!")
				pc.remove_item(ratesitem_vnum, pc.countitem(ratesitem_vnum))
				return
			end
			local exit=0
			while exit==0 do
				say("Welcher Type Rates")
				local type=select("Item Drop", "Yang Drop", "Yang Bomben", "EXP", "Letzen Rates Einschalten", "Abbrechen")
				if type==6 then
					exit=1
					return
				end
				if type>=1 and type<=4 then
					say("Wie hoch sollen die Rates sein?")
					local value=tonumber(input())
					say("Wie Lange sollen die Rates andauern?")
					local duration=tonumber(input())
					rates.set(type, value, duration)
					local rates_save="type"..type..""
					pc.setqf(rates_save, value)
					say("Rates erfolgreich Gesetzt!")
				end
				if type==5 then
					say("Zuletzt eingeschaltete Rates:")
					local rates_set="type1"
					local rates_set=pc.getqf(rates_set)
					say("Item: "..rates_set.."")
					local rates_set="type2"
					local rates_set=pc.getqf(rates_set)
					say("Yang Drop: "..rates_set.."")
					local rates_set="type3"
					local rates_set=pc.getqf(rates_set)
					say("Yang Bomben: "..rates_set.."")
					local rates_set="type4"
					local rates_set=pc.getqf(rates_set)
					say("EXP: "..rates_set.."")
					local s=select("Für 24h einschalten", "Für Beliebige Zeit", "Zurück", "Abbrechen")
					if s==1 then
						local rates_set="type1"
						local rates_set=pc.getqf(rates_set)
						rates.set(1, rates_set, 24)
						local rates_set="type2"
						local rates_set=pc.getqf(rates_set)
						rates.set(2, rates_set, 24)
						local rates_set="type3"
						local rates_set=pc.getqf(rates_set)
						rates.set(3, rates_set, 24)
						local rates_set="type4"
						local rates_set=pc.getqf(rates_set)
						rates.set(4, rates_set, 24)
						say("Rates Erfolgreich für 24 Stunden eingeschalten!")
					end
					if s==2 then
						say("Wie lange sollen die Rates an sein?")
						local duration=tonumber(input())
						local rates_set="type1"
						local rates_set=pc.getqf(rates_set)
						rates.set(1, rates_set, duration)
						local rates_set="type2"
						local rates_set=pc.getqf(rates_set)
						rates.set(2, rates_set, duration)
						local rates_set="type3"
						local rates_set=pc.getqf(rates_set)
						rates.set(3, rates_set, duration)
						local rates_set="type4"
						local rates_set=pc.getqf(rates_set)
						rates.set(4, rates_set, duration)
					end
					if s==3 then
					end
					if s==4 then
						exit=1
						return
					end
				end
			end		
		end
	end
end