Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Kilka Questów do Zabawy i nie tylko

SϒS™

Rekomendowane odpowiedzi

SϒS™ Specjalista

SϒS™

Opublikowano
Specjalista

SϒS™

Opublikowano

Hi MPC dzisiaj dam wam kilka questów swojego jak i nie swojego autorstwa , pisane na potrzeby serwera metinologia

http://www.mpcforum.pl/topic/163124-tutwgrywanie-questow-na-serwer/

1.Przemiana w mooba jakiego się chce w itemie (20010)

 

quest poly begin
state start begin
when 20010.use begin
 say_title(item_name(20010)..":")
 say("Witaj "..pc.get_name().." !")
 say("W tym itemie masz możloiwość przemienienia się ")
 say("w jakiego tylko potworka chcesz. ")
 say("")
 say("Pamiętaj aby wpisywać tylko pewne ID. ")
 say("")
 local wpis = tonumber(input("12345"))
  if wpis < 101 then
say("Nie ma potworków z ID niższym od 101 ! ")
say("")
  else
pc.polymorph(wpis)
chat("Miłej zabawy jako "..mob_name(wpis).."  ")
  end
end
end
end

 

2.Przemiana w mooba jakiego się chce u NPC (80022)

 

quest poly begin
state start begin
when 80022.chat."Polimorfia " begin
 say_title(mob_name(80022)..":")
 say("Witaj "..pc.get_name().." !")
 say("Masz u mnie możloiwość przemienienia się ")
 say("w jakiego tylko potworka chcesz. ")
 say("")
 say("Pamiętaj aby wpisywać tylko pewne ID. ")
 say("")
 local wpis = tonumber(input("12345"))
  if wpis < 101 then
say("Nie ma potworków z ID niższym od 101 ! ")
say("")
  else
pc.polymorph(wpis)
chat("Miłej zabawy jako "..mob_name(wpis).."  ")
  end
end
end
end

 

3.Dokupienie punktów statystyk (siła,wit,zr,int)

*+10 pkt kosztuje 50 krwistych i 1kkk ,może dokupić tyle ile mu się podoba ,i na ile go stać..

 

quest staty begin
state start begin
	when 20091.chat."Dokup statystyki" begin
		-----------------------------
		local brak_kasa = "Niestety, ale nie masz 1.000.000.000 Yang."
		local brak_item = "Niestety, ale nie masz tyle Krwistych kamieni(5)"
		-----------------------------
		local money = 1000000000
		local ID = 30190
		-----------------------------
		local a = select("+10 pkt Sila","+10 pkt int.","+10 pkt.PZ","+10 pkt zrecznosc","Anuluj")
		if a == 5 then
			return
		elseif a == 1 then
			if pc.count_item(ID) >= 5 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 5)
					affect.add_collect(apply.STR, 10, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		elseif a == 2 then
			if pc.count_item(ID) >= 5 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 5)
					affect.add_collect(apply.INT, 10, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		elseif a == 3 then
			if pc.count_item(ID) >= 5 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 5)
					affect.add_collect(apply.CON, 10, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		elseif a == 4 then
			if pc.count_item(ID) >= 5 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 5)
					affect.add_collect(apply.DEX, 10, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		end
	end
end
end

 

4.Dropienie itemu (80007) po zabiciu 2 moobów ( z co drugiego ,mozna zmienić na ile się chce)

 

quest drop begin
state start begin
when kill with not npc.is_pc() begin
local count = math.random(2)
if count == 2 then
pc.give_item2(80007, 1)
end
end
end
end

 

5.Kupno bonusu stałego typu +5000 Tys deffa ,wart. atk itp

 

 

quest gogame begin
state start begin
	when 20091.chat."Kup bonus na zawsze !" begin
		-----------------------------
		local brak_kasa = "Niestety, ale nie masz 1.000.000.000 Yang."
		local brak_item = "Niestety, ale nie masz tyle Krwistych kamieni(50)"
		-----------------------------
		local money = 1000000000
		local ID = 30190
		-----------------------------
		local a = select("+5000 Obrony","+140 Wartości Ataku","+50% Speeda","+15% szybkosc Ataku","Anuluj")
		if a == 5 then
			return
		elseif a == 1 then
			if pc.count_item(ID) >= 50 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.DEF_GRADE_BONUS, 5000, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		elseif a == 2 then
			if pc.count_item(ID) >= 50 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.ATT_GRADE_BONUS, 140, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		elseif a == 3 then
			if pc.count_item(ID) >= 50 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.MOV_SPEED, 50, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		elseif a == 4 then
			if pc.count_item(ID) >= 50 then
				if pc.get_money() >= money then
					pc.change_money(pc.get_money() - money)
					pc.remove_item(ID, 50)
					affect.add_collect(apply.ATT_SPEED, 15, 60*60*24*365*60)
				else
					say(brak_kasa)
				end
			else
				say(brak_item)
			end
		end
	end
end
end

 

6.Quest u mikołaja , wymiana skarpetek na prezenty

 

quest mikolaj begin
	state start begin
			when 20031.chat."Skarpetki" begin
					say_title("Mikolaj: ")
					say("Witaj:")
					say("możesz u mnie wymienic skarpetki na co zechcesz!")
					say_reward("Wymieniasz się ")
							local tn = select("Tak" , "Nie")
									if tn == 2 then
											return
									end

											if tn == 1 then
													if pc.count_item(50010) >= 50 then
															say_title("Mikolaj: ")
															say("Wybierz co chcesz!")
															local wybierz = select("Krwisty Kamien(50)" , "Nowe Fryzury(5)" , "Szkat. Smoczego eq(25)" , "Krysztal(5)")
																	if wybierz == 1 then
																	pc.give_item2(30190)
																	pc.remove_item(50010, 50)
																	elseif wybierz == 2 then
																	pc.give_item2(50080)
																	pc.remove_item(50010, 5)

																	elseif wybierz == 3 then
																	pc.give_item2(50033)
																	pc.remove_item(50010, 25)

																	elseif wybierz == 4 then
																	pc.give_item2(30204)
																	pc.remove_item(50010, 5)

																	end
													else
															say_title("Mikolaj: ")
															say("Nie masz sztabek")
													end
											end
			end
	end
end

 

 

7.Gdy mapa się zbuguje (caly czas tepa) ten quest naprawia to ,odbugowywuje gracza

 

quest mapka_sie_buguje begin
state start begin
 when login begin
  if pc.get_map_index() == INDEXMAPYwMAP then
if pc.get_x() != 5555+1180 and pc.get_y() != 5555+1193 then
pc.warp(555500, 555500)
elseif pc.get_x() == 5555+1180 and pc.get_y() == 5555+1193 then
chat("Lofffciam Merkona ;dddd")
end
  elseif pc.get_map_index() != INDEXMAPYwMAP then
  chat("Mapa sie zbugowala dlatego zostales przeniesiony tutaj!")
  end
 end
end
end

 

8.Chyba najlepszy quest na teleportacje u jakiegos npc na mapę o wybr. indexie i kordach dla kazdego krolestwa

 

quest telep2 begin
	state start begin
			when 20062.chat."Przenies do Doliny " begin
							say_title(mob_name(20062)..":")
					if pc.getqf("czas") == 0 then
							say("Teleportuj do Seona "..pc.get_name())
							say("Moge cie przeniesc do Seona w Dolinie ")
							say("")
							say("Chcesz? ")
							say("")
							local s = select("Tak", "Nie")
									if s == 2 then
											return
									end
									if s == 1 then
											say("Zostaniesz przeniesiony ")
											wait()
											pc.warp(280600, 803300)
											pc.setqf("wejscie", 1)
									end
					else
							say("Nie mozesz jeszcze przejsc na mape")
							say("")
					end
			end
			when logout with pc.get_map_index() == 64 begin
					pc.setqf("mapa", get_time()+60*30)
			end
			when login begin
					if get_time() >= pc.getqf("Polanka obok Seona w dolinie") then
							pc.setqf("dolina s", 0)
					end
			end
			when login with pc.get_map_index() == 64 begin
					if pc.getqf("wejscie") == 1 then
							return
					else
							local e = pc.get_empire()
									if e == 1 then
											pc.warp(280600, 803300)
									elseif e == 2 then
											pc.warp(280600, 803300)
									elseif e == 3 then
											pc.warp(280600, 803300)
									end
					end
			end
	end
end

 

9.hair.quest ze wszystkimi fryzurami nowymi na mpc + standardowymi

 

quest hair begin
state start begin
 function My_hair_item(vnum,index)
  hair_list={}
    --   vnum    /hair/ option  /  howmuch / duration
  hair_list [74001] = {1001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74002] = {1002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74003] = {1003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74004] = {1004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74005] = {1005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74006] = {1006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74007] = {1007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74008] = {1008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74009] = {1009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74010] = {1010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74011] = {1011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74012] = {1012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [76013] = {1013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [76015] = {1014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75801] = {1015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75802] = {1016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75803] = {1017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [74020] = {1018, apply.ATTBONUS_HUMAN, 10, 2592000}

  hair_list [74251] = {2001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74252] = {2002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74253] = {2003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74254] = {2004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74255] = {2005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74256] = {2006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74257] = {2007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74258] = {2008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74259] = {2009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74260] = {2010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74261] = {2011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74262] = {2012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [76263] = {2013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [76265] = {2014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75816] = {2015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75817] = {2016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75818] = {2017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [74270] = {2018, apply.ATTBONUS_HUMAN, 10, 2592000} 
  hair_list [74501] = {3001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74502] = {3002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74503] = {3003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74504] = {3004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74505] = {3005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74506] = {3006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74507] = {3007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74508] = {3008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74509] = {3009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74510] = {3010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74511] = {3011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74512] = {3012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [76513] = {3013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [76515] = {3014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75807] = {3015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75808] = {3016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75809] = {3017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [74520] = {3018, apply.ATTBONUS_HUMAN, 10, 2592000} 

  hair_list [74751] = {4001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74752] = {4002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74753] = {4003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74754] = {4004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74755] = {4005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74756] = {4006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74757] = {4007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74758] = {4008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [74759] = {4009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [74760] = {4010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [74761] = {4011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [74762] = {4012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [76763] = {4013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [76765] = {4014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75822] = {4015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75823] = {4016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75824] = {4017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [74770] = {4018, apply.ATTBONUS_HUMAN, 10, 2592000} 
  hair_list [75001] = {1001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75002] = {1002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75003] = {1003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75004] = {1004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75005] = {1005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75006] = {1006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75007] = {1007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75008] = {1008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75009] = {1009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75010] = {1010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75011] = {1011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75012] = {1012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75013] = {1013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75015] = {1014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75804] = {1015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75805] = {1016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75806] = {1017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75020] = {1018, apply.ATTBONUS_HUMAN, 10, 2592000} 

  hair_list [75201] = {2001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75202] = {2002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75203] = {2003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75204] = {2004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75205] = {2005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75206] = {2006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75207] = {2007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75208] = {2008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75209] = {2009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75210] = {2010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75211] = {2011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75212] = {2012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75213] = {2013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75215] = {2014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75813] = {2015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75814] = {2016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75815] = {2017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75220] = {2018, apply.ATTBONUS_HUMAN, 10, 2592000} 
  hair_list [75401] = {3001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75402] = {3002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75403] = {3003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75404] = {3004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75405] = {3005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75406] = {3006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75407] = {3007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75408] = {3008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75409] = {3009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75410] = {3010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75411] = {3011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75412] = {3012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75413] = {3013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75415] = {3014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75810] = {3015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75811] = {3016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75812] = {3017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75420] = {3018, apply.ATTBONUS_HUMAN, 10, 2592000} 
  hair_list [75601] = {4001, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75602] = {4002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75603] = {4003, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75604] = {4004, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75605] = {4005, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75606] = {4006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75607] = {4007, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75608] = {4008, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75609] = {4009, apply.ATTBONUS_WARRIOR, 10, 2592000}
  hair_list [75610] = {4010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
  hair_list [75611] = {4011, apply.ATTBONUS_SURA,  10, 2592000}
  hair_list [75612] = {4012, apply.ATTBONUS_SHAMAN, 10, 2592000}
  hair_list [75613] = {4013, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75615] = {4014, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75819] = {4015, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75820] = {4016, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75821] = {4017, apply.ATTBONUS_HUMAN, 10, 2592000}
  hair_list [75620] = {4018, apply.ATTBONUS_HUMAN, 10, 2592000} 
  return hair_list[vnum][index]
 end

 function leave_log(item_vnum)

  char_log(0, "CHANGE_HAIR", string.format("USE_ITEM(%d)",item_vnum)) -- ľĆŔĚĹŰ ·Î±× ĽłÁ¤
  --char_log(0, "CHANGE_HAIR", string.format("SET_HAIR(%d)",item_vnum)) -- ľĆŔĚĹŰ ·Î±× ĽłÁ¤
  char_log(0, "CHANGE_HAIR", string.format("END_SEC(%d)",get_time()+ hair.My_hair_item(item_vnum,4)) ) -- »çżë±â°Ł ·Î±×
  --char_log(0, "CHANGE_HAIR", string.format("AFFECT(%s), DURATION:%d)",hair.My_hair_item(item_vnum,2),get_time()+ hair.My_hair_item(item_vnum,4))) -- Čż°ú ĽłÁ¤ ·Î±×
  char_log(0, "CHANGE_HAIR", "CHANGE_HAIR_END") -- Áľ·á ·Î±×
 end

 when  74001.use or
 74002.use or
 74003.use or
 74004.use or
 74005.use or
 74006.use or
 74007.use or
 74008.use or
 74009.use or
 74010.use or
 74011.use or
 74012.use or
 76013.use or
 76015.use or
 75801.use or
 75802.use or
 75803.use or
 74020.use or
 75001.use or
 75002.use or
 75003.use or
 75004.use or
 75005.use or
 75006.use or
 75007.use or
 75008.use or
 75009.use or
 75010.use or
 75011.use or
 75012.use or
 75013.use or
 75015.use or
 75804.use or
 75805.use or
 75806.use or
 75020.use with pc.get_job()==0 begin

  pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
  affect.remove_hair()
  affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
  pc.setqf("limit_time",get_time()+ hair.My_hair_item(item.vnum,4))
  hair.leave_log(item.vnum)
  item.remove()
 end
 when  74251.use or
 74252.use or
 74253.use or
 74254.use or
 74255.use or
 74256.use or
 74257.use or
 74258.use or
 74259.use or
 74260.use or
 74261.use or
 74262.use or
 76263.use or
 76265.use or
 75816.use or
 75817.use or
 75818.use or
 74270.use or
 75201.use or
 75202.use or
 75203.use or
 75204.use or
 75205.use or
 75206.use or
 75207.use or
 75208.use or
 75209.use or
 75210.use or
 75211.use or
 75212.use or
 75213.use or
 75215.use or
 75813.use or
 75814.use or
 75815.use or
 75220.use with pc.get_job()==1 begin

  pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
  affect.remove_hair()
  affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
  pc.setqf("limit_time",get_time()+hair.My_hair_item(item.vnum,4))
  hair.leave_log(item.vnum)
  item.remove()
 end
 when  74501.use or
 74502.use or
 74503.use or
 74504.use or
 74505.use or
 74506.use or
 74507.use or
 74508.use or
 74509.use or
 74510.use or
 74511.use or
 74512.use or
 76513.use or
 76515.use or
 75807.use or
 75808.use or
 75809.use or
 74520.use or
 75401.use or
 75402.use or
 75403.use or
 75404.use or
 75405.use or
 75406.use or
 75407.use or
 75408.use or
 75409.use or
 75410.use or
 75411.use or
 75412.use or
 75413.use or
 75415.use or
 75810.use or
 75811.use or
 75812.use or
 75420.use with pc.get_job()==2 begin

  pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
  affect.remove_hair()
  affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
  pc.setqf("limit_time",get_time()+hair.My_hair_item(item.vnum,4))
  hair.leave_log(item.vnum)
  item.remove()
 end
 when  74751.use or
 74752.use or
 74753.use or
 74754.use or
 74755.use or
 74756.use or
 74757.use or
 74758.use or
 74759.use or
 74760.use or
 74761.use or
 74762.use or
 76763.use or
 76765.use or
 75822.use or
 75823.use or
 75824.use or
 74770.use or
 75601.use or
 75602.use or
 75603.use or
 75604.use or
 75605.use or
 75606.use or
 75607.use or
 75608.use or
 75609.use or
 75610.use or
 75611.use or
 75612.use or
 75613.use or
 75615.use or
 75819.use or
 75820.use or
 75821.use or
 75620.use with pc.get_job()==3 begin

  pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
  affect.remove_hair()
  affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
  pc.setqf("limit_time",get_time()+ hair.My_hair_item(item.vnum,4))
  hair.leave_log(item.vnum)
  item.remove()
 end
end
end

 

10.Quest od @xDes.... zakladka u NPC z jakas informacja od was i opcją ''Anuluj''

 

quest pisze_cos begin
state start begin
when 20062.chat."cosTAMoSerwie" begin
say_title("Piotr Lekko Garby:")
say("")
say("Dupa dupa cos tam cos tam")
say("pierdu pierdu")
local s=select("Anuluj")
if s==1 then
return
else
return
end
end
end
end

 

11.Bank u Dozorcy + standadowe opcje które ma

 

----------------------------------------------
--- Edit. by Czarny dla MPCForum
--- Prosze o nie przypisywanie sobie
--- cudzej pracy! Pozdrawiam
----------------------------------------------
quest bank_depo_is begin
state start begin
when 9005.chat."Bank" begin
say_title(mob_name(9005)..":")
say("Wybierz co chcesz : ")
say("")
local s = select("Magazyn", "Item Shop", "Bank", "Sztabki", "Anuluj")
if s == 5 then
return
end
if s == 4 then
npc.open_shop(7)
say("")
setskin(NOWINDOW)
end
if s == 2 then
game.open_mall()
say("")
end
if s == 1 then
game.open_safebox()
say("")
end
if s == 3 then
local pin = pc.getqf("konto_pin")
local konto_yang = pc.getqf("konto_yang")
if pin == 0 then
--------------------------- PIN FESTLEGEN! ---------------------------
say_title(mob_name(9005).. " mowi do Ciebie ".. pc.get_name() ..".")
say("Witam cię na xxx")
say("Jestem bankierem tego serwera")
say("Ponieważ rozmawiasz ze mna po raz pierwszy,")
say("prosze Cie, abys ustawil swoj kod PIN.")
say("5 cyfrowy kod jest bezpieczny.")
say("Ten kod musi byc bezpieczny przed zlodziejami!")
say("")
say_reward("Wprowadz swoj 5 cyfrowy kod (tylko cyfry!)")
local pin_eing = tonumber(input("12345"))
if pin_eing > 9999 and pin_eing < 100000 then
say_title(mob_name(20006).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Ten PIN jest OK")
say("")
say_reward("Zapisac " ..pin_eing.. " jako Twoj numer PIN?")
local sel=select("Tak", "Nie")
if sel==1 then
pc.setqf("konto_pin", pin_eing)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin zostal zapisany.")
say("Do zobaczenia wkrotce.")
elseif sel==2 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Do zobaczenia wkrotce.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 1")
end
elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Przykro mi, ale cos jest nie tak z")
say("Twoim kodem PIN")
say("")
say_reward("Info: Pin musi zawierac tylko liczby!")
say_reward("PIN nie moze byc wiekszy niz 99999")
say_reward("lub mniejszy niz 10000!")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 2")
end
else
--------------------------- PIN VORHANDEN! ---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Witam. Jestem bankierem.")
say("Mozesz powierzyc mi nadmiar gotowki.")
say("")
say_reward("Co chcesz zrobic?")
say("")
local sel=select("Wplac pieniadze", "Wyplac pieniadze", "Sprawdz moje konto", "Zmien kod PIN", "Nic")
if sel==1 then
---------------------------GELD GEBEN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Prosze podac kod PIN")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin jest prawidlowy.")
say("Ile chcesz wplacic?")
say("")
say_reward("Masz: " ..pc.get_money())
say("")
local geld_auf_konto = tonumber(input(""))
if geld_auf_konto < 0 then return end
local auf_konto_new = tonumber(geld_auf_konto) + pc.getqf("konto_yang")
if pc.get_money() < geld_auf_konto then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Nie masz tyle gotowki!")
else
if auf_konto_new < 2000000000 then
pc.change_money(-geld_auf_konto)
pc.setqf("konto_yang", auf_konto_new)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Mam " ..geld_auf_konto.. " Yang na koncie")
else
say_title(" Bankier ")
say("")
say("Nie mozesz na koncie")
say("miec wiecej niz")
say("1.999.999.999")
end
end
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Zly pin")
end
elseif sel==2 then
---------------------------GELD ABHEBEN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Prosze podac kod PIN")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(20006).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin jest prawidlowy")
say("Ile pieniedzy chcesz wyplacic?")
say("")
say_reward("Na koncie: " ..pc.getqf("konto_yang"))
say("")
local geld_von_konto = tonumber(input(""))
if geld_von_konto < 0 then
return
elseif geld_von_konto > pc.getqf("konto_yang") then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Nie masz tylu pieniedzy na koncie!")
elseif geld_von_konto <= pc.getqf("konto_yang") then
local yang_bug_check = pc.get_money() + geld_von_konto
if yang_bug_check < 2000000000 then
local auf_konto_new = tonumber(pc.getqf("konto_yang") - geld_von_konto)
pc.setqf("konto_yang", auf_konto_new)
pc.change_money(geld_von_konto)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Otrzymales " ..geld_von_konto.. " Yang.")
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pamietaj aby nie wyplacac za duzo")
say("gdyz Yang moga Ci sie zbugowac!")
end
end
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Zly kod PIN")
end
elseif sel==3 then
---------------------------GELD ABFRAGEN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Chcesz wiedziec ile yang masz na koncie?")
say("Sprawdzmy...")
say("")
say_reward("Yang na koncie: " ..pc.getqf("konto_yang"))
elseif sel==4 then
---------------------------PIN ÄNDERN---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Wpisz aktualny kod PIN")
local pin_abf = tonumber(input(""))
if pin_abf == pc.getqf("konto_pin") then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Pin jest prawidlowy.")
say("Wpisz nowy kod PIN (tylko cyfry!)")
local pin_eing = tonumber(input("12345"))
if pin_eing > 9999 and pin_eing < 100000 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Ten PIN jest OK")
say("")
say_reward("Ustawic " ..pin_eing.. " jako nowy PIN?")
local sel=select("Tak", "Nie")
if sel==1 then
pc.setqf("konto_pin", pin_eing)
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Kod PIN zostal zmieniony.")
say("Do zobaczenia wkrotce.")
elseif sel==2 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Do zobaczenia wkrotce.")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 3")
end
elseif pin_eing > 99999 or pin_eing == 0 or pin_eing < 10000 then
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Przykro mi, ale cos jest nie tak z")
say("Twoim PIN. Dlatego tez nie ulegl zmianie")
say("")
say("")
say_reward("Info:PIN musi zawierac tylko liczby!")
say_reward("Info: Nie wieksze niz 99999")
say_reward("i nie mniejsze niz 10000!")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 4")
end
else
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Zly kod PIN")
end
elseif sel==5 then
---------------------------Nic---------------------------
say_title(mob_name(9005).. " mowi Ci ".. pc.get_name() ..".")
say("")
say("Do zobaczenia wkrotce")
else
-- Fehler abfangen!
say("Unbekannter Fehler!")
say("Bitte umgehend mit ihren")
say("Fehler Code beim Serverleiter")
say("melden!")
say("Fehler Code: 5")
end
end
end
end
end
end

 

 

 

To na tyle może się komus przyda , moze nie :P pozdro =)

 

 

Są to questy ze serwera Metinologia kilka z nich napisalem sam ,kilka mam od innych questmaków

(czyt. xDes + czarny ,gogame) znalazlem w kompie więc daje ^^

Więcej straci ten co to wszystko liczy...

Wigilia 24 Grudnia 2011 ROK SϒS™ Obchodzi 14 Wigilię w Swoim Życiu..

Życzę wszystkim wesołych,pogodnych świąt ,tym czasem ja kończę zabawę w forumowanie i idę

z D&G'em polować na łanie =)

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano

Mam rozumieć, że quest na bank to ten zbugowany jeszcze ? W razie czego zapraszam do mojego tematu. Za questy dzięki, ale nie skorzystam ;|

 

umarł

profilus=) Znawca

profilus=)

Opublikowano
Znawca

profilus=)

Opublikowano

Wszystko ładnie, ale zobacz czy quest z bankiem nie jest zbugowany jak rok temu cavalos.. mogło sie brac na tzw " Debet" wpisywalo sie kwote na minusie przy wplacaniu i dostawalo sie na konto

Nigdy nie trać czasu dla kogoś, kto nie ma go dla Ciebie ! :))

NlSMO Mentor

NlSMO

Opublikowano
Mentor

NlSMO

Opublikowano

Pytanie, ten quest na kupienie stałego bonusu, on się powtarza, czy tylko raz go można użyć ?

  • 2 tygodnie później...
  • 2 tygodnie później...
Remotion Pasjonat

Remotion

Opublikowano
Pasjonat

Remotion

Opublikowano

Dopiszę iż :

 

4.Dropienie itemu (80007) po zabiciu 2 moobów ( z co drugiego ,mozna zmienić na ile się chce)

 

quest drop

begin

 

state start begin

when kill with not npc.is_pc() begin

local count = math.random(2)

if count == 2 then

pc.give_item2(80007, 1)

end

end

end

end

 

Od razu przedmiot wpada do plecaka (

pc

.

give_item2)

Sunushi Bywalec

Sunushi

Opublikowano
Bywalec

Sunushi

Opublikowano

Tylko że wtedy item może ktoś nam zabrać, ponieważ wypada bez właściciela ;)

Koniec z MPCForum.pl i ogółem z metinem

:D

 

sunp.png

Sygnatura wykonana przez

Isuribi aka Amelka.

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano

game.drop_item_with_ownership ? ;)

 

zan00buję : w jakim game jest taka funkcja ? jeszcze się nie spotkałem

 

umarł

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano

@UP game_2089 :P

ok dzięki wielkie. będzie czeba kiedyś je wgrać i popatrzeć co ciekawego mają ;D (jakoś wolę stereotypy i pierwsze pliki od mcn ;P)

 

umarł

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...