[SERVICE] Die Questerstellung

Page 197 of 248

197

06/24/2015 12:50 JulianII#2941

Hey,

brauche eine kleine PvP-Quest,

bei PvP Kill werden 1-3 Items gedroppt.. Es soll aber auch vor Bugusing gesch�tzt sein, also irgendeine Schleife die es verhindert das man als die selben Chars killen kann..

Mfg

06/24/2015 16:50 #Metho#2942

Quote:

Originally Posted by JulianII

Hey,

brauche eine kleine PvP-Quest,

bei PvP Kill werden 1-3 Items gedroppt.. Es soll aber auch vor Bugusing gesch�tzt sein, also irgendeine Schleife die es verhindert das man als die selben Chars killen kann..

Mfg

W�rde mich Interessieren, ob's M�glich ist per Quest zu verhindern, dass jemand get�tet wird durch XY, denke aber eher nicht :(

06/24/2015 19:53 Jeonsa#2943

PHP Code:


			
quest kaito begin
    state start begin
        when kill with npc.is_pc() and not npc_is_same_empire() and pc.getqf("time") > get_time() begin
            game.drop_item_with_ownership(({vnum,vnum,vnum})[math.random(3)])
            pc.setqf("time",get_time()+60*5)
        end
    end
end

-von kaito da er banned ist

06/24/2015 20:08 Chaosnightx3#2944

Suche immernoch eine simple Quest:

Du gehst zu einem NPC und kannst dir deine standard Frisur machen lassen.
Wenn du zb das Stirntuch vom Krieger tr�gst, gehst du zu Npc
xyz und l�sst sich dort seine normale Frisur wieder geben.^^

lg^^

06/24/2015 21:41 x"Kazuki#2945

Falsches Thema xD

Mit freundlichen Gr��en

06/24/2015 23:03 JulianII#2946

Quote:

Originally Posted by Choppaaaa

PHP Code:

quest kaito begin state start begin when kill with npc.is_pc() and not npc_is_same_empire() and pc.getqf("time") > get_time() begin game.drop_item_with_ownership(({vnum,vnum,vnum})[math.random(3)]) pc.setqf("time",get_time()+60*5) end end end

-von kaito da er banned ist

Falls das meine ist, danke!
Aber leider geht sie nicht.

Habe es mit einer VNUM (Schwert+9) versucht, aber bei einem PVPKill dropp ich nichts.

JulianII

06/25/2015 06:34 Red Firestar#2947

1. Ich brauche eine warehouse (Lagerverwalter) Quest sie muss an die ViruzDev Serverfiles angepasst sein. Diese Quest soll DE Like sein mit dem Zugriff auf das Normale Lager und auf das Itemshop Lager, und wenn man den Lagerverwalter aufruft, zum ersten Mal soll er 500 Yang verlangen f�r ein Lager. (Also es sollte halt De Like sein) W�re nett wenn sie jemand erstellen k�nnte.

06/25/2015 12:13 .yorliK#2948

Quote:

Originally Posted by Red Firestar

1. Ich brauche eine warehouse (Lagerverwalter) Quest sie muss an die ViruzDev Serverfiles angepasst sein. Diese Quest soll DE Like sein mit dem Zugriff auf das Normale Lager und auf das Itemshop Lager, und wenn man den Lagerverwalter aufruft, zum ersten Mal soll er 500 Yang verlangen f�r ein Lager. (Also es sollte halt De Like sein) W�re nett wenn sie jemand erstellen k�nnte.

Code:

quest warehouse begin
	state start begin
		when 20007.click begin
			local l = game.get_safebox_level()
			if l == 0 then
				say("Hallo[ENTER]Bei mir kannst du ein Lager f�r 500 Yang mieten[ENTER]Und?")
				if select("Bezahlen", "Abbrechen")==2 then say("Dann nicht.") return end
				if pc.get_gold()<500 then
					say("Nicht genug Yang")
				else
					game.set_safebox_level(3)
					pc.change_money(-500)
					say("Dein Lagerpasswort ist 000000")
				end
			elseif l >= 3 then
				say("Lagerverwalter")
				local s = select("Lager �ffnen", "Itemshoplager �ffnen", "Barren Shop", "Schlie�en")
				if s == 1 then
					game.open_safebox()
				elseif s == 2 then
					game.open_mall()
				elseif s== 3 then
					npc.open_shop(shopid)
				end
			end
		end
	end
end

# Barren added

06/25/2015 21:43 .Xilent#2949

Quote:

Originally Posted by Lord Metho

W�rde mich Interessieren, ob's M�glich ist per Quest zu verhindern, dass jemand get�tet wird durch XY, denke aber eher nicht :(

Wenn die Funktion npc.get_vid existiert, dann ist es m�glich.
[Only registered and activated users can see links. Click Here To Register...]

Da muss einfach nur der when-Block mit der Belohnung umgeschrieben werden.

06/26/2015 16:49 [TEC]Tigrex#2950

Hallo leute, ich suche eine de like Pferde level quest halt das man mit 25 erste pferd bekommt in den man die map2 bogis killt und man hat 30 min zeit daf�r, dann die 200 bogis in w�ste mit level 35 und mit level 50 die DT fernis killn.

06/27/2015 00:24 KΛIƬӨ#2951

Quote:

Originally Posted by JulianII

Falls das meine ist, danke!
Aber leider geht sie nicht.

Habe es mit einer VNUM (Schwert+9) versucht, aber bei einem PVPKill dropp ich nichts.

JulianII

Musst jemand aus nem anderem Reich killen.

06/27/2015 12:06 x"Kazuki#2952

Quote:

Originally Posted by #Desert Eagle

kann die Warpring quest nicht compilen. (soll per Button aufgehen):

Spoiler

Code:

quest teleport begin
	when info or button 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")
					if selectmap == 7 then
						say_title("Warpring") 
						say("Wohin m�chtest du Teleportiert werden?")
						local selectmap2 = select("D�monenturm","Geisterwald","Roter Wald","SD2","Abbrechen")
							if selectmap2 == 5 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
										pc.warp(1119900,70800)
									end
							elseif selectmap2 == 4 then
								pc.warp(704200, 462600)
							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
								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
							end
						end
					end
				end	
			end
		end
	end
end

MFG

Das geh�rt eher in die Questkontrolle.

Mit freundlichen Gr��en

06/27/2015 12:26 Cyber36#2953

Eine Quest, die automatisch Geldspeicher mit der vnum: 81014 (1kkk Gelspeicher) kauft, wenn der Spieler 2kkk �berschreiten w�rde.

Danke im Vorraus!

06/27/2015 23:06 KΛIƬӨ#2954

Quote:

Originally Posted by Cyber36

Eine Quest, die automatisch Geldspeicher mit der vnum: 81014 (1kkk Gelspeicher) kauft, wenn der Spieler 2kkk �berschreiten w�rde.

Danke im Vorraus!

Code:

DEFINE GELD 1000000000
DEFINE GELDSPEICHER 81014
quest kaito begin
	state start begin
		when login with pc.get_gold() > 1999999999 begin
			pc.change_money(-GELD)
			pc.give_item2(GELDSPEICHER)
		end
		when GELDSPEICHER.use
			pc.change_money(GELD)
			pc.remove_item(item.get_vnum())
		end
	end
end

06/27/2015 23:57 Cyber36#2955

Quote:

Originally Posted by DYSKaito

Code:

DEFINE GELD 1000000000
DEFINE GELDSPEICHER 81014
quest kaito begin
	state start begin
		when login with pc.get_gold() > 1999999999 begin
			pc.change_money(-GELD)
			pc.give_item2(GELDSPEICHER)
		end
		when GELDSPEICHER.use
			pc.change_money(GELD)
			pc.remove_item(item.get_vnum())
		end
	end
end

Erstmal vielen Dank f�r die Quest :)

Ist es nicht allerdings so, dass diese Quest nur wirkt, wenn ich einen "login" mache? Also Teleport, Relog usw.? Ich m�chte ja umgehen, dass man �berhaupt zu 2kkk kommt.

Page 197 of 248

197