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

Pliki serwerowe by Qentinios


Qentinios

Rekomendowane odpowiedzi

  • Odpowiedzi 1,3 tys.
  • Dodano
  • Ostatniej odpowiedzi
Opublikowano

@up sam se dodaj stalki

 

Minus plikow duzo bugow ....

Sam jesteś bugiem..

Skoro dożo bugów to wyjdź z tematu i zacznij robić swoje. Lepsze bez ''bugów'' ????;)

Opublikowano

Witam gdy chcę zmienić npc np : 20091 (Sura) żeby stał w m1 jak robię w metin2_map_c1 (Jinno) daje kordy i po restarcie serwera on tam nie stoi (Wgl go nie ma)

 

- Nie ustawiają się npc.

 

Quest na itemy na start

 

- Gdzie się znajduję

 

* Dostaję :

-2x p.tp

- Eq +7

 

Chciałbym to zmienić lecz nigdzie tego questa nie ma...

KANAŁ YOUTUBE KLIK W OBRAZEK

Opublikowano

Witam gdy chcę zmienić npc np : 20091 (Sura) żeby stał w m1 jak robię w metin2_map_c1 (Jinno) daje kordy i po restarcie serwera on tam nie stoi (Wgl go nie ma)

 

- Nie ustawiają się npc.

 

- Gdzie się znajduję

 

* Dostaję :

-2x p.tp

- Eq +7

 

Chciałbym to zmienić lecz nigdzie tego questa nie ma...

 

Masz tuta do tego npc..

http://www.youtube.com/watch?v=qSOQMkFkA6k

 

Poszukaj Qustao nozwie

give_basic_weapon.quest

i se zmieniasz jakie maja byc itemy na start.

Opublikowano

Jak usunąć tego questa który wyświetla u soen pyeong-a te miecze itp. usuwałem questa nic nie dało mógłby ktoś pomóc ;]

oynk.png

Opublikowano

Znaczy tak tylko troche nie kminie moglibyście pomóc ;] od początku do końca bo w nowe.quest jest tego pełno :/

oynk.png

Opublikowano

@kris otoź mam wlasne lepsze ;]

 

No jak masz lepsze to udostępnij ;] Pośmieje się.

A z tego co wiem nie ma lepszych plików na mpc niż te;]

Starczy trochę edytować i pliki Pro;]

Bugi da się naprawić;] Ale jak ktoś nie umie to już nie mój problem..

Pozdro.

 

@edit.

 

Macie nowe,quest bez tych mieczy, zbroji itp.

-- ?? ???? ??
quest tibia begin
	state start begin
			when 20095.chat."Chciałbyś się gdzieś przenieść?"  begin
					say ("Witaj![ENTER]Jestem Seon-Hae, staruszek który wie o rzeczach,[ENTER]O których inni nie mają pojęcia, Jeżeli chcesz,[ENTER]Mogę ci pokażę drogę do zaginionych krain,[ENTER]Ale droga tam jest bardzo niebezpieczna i nie zrobię tego za darmo![ENTER]Za moje usługi musisz zaplacic![ENTER]Czy nadal jesteś chętny?")

					local main_set = select("Tak","Nie")
					if main_set == 2 then
							return
					end

					if pc.get_level() < 75 then
							say("Chyba nie myślisz, że na takim poziomie[ENTER]gdziekolwiek cię przeniose?[ENTER]Osiągnij 75 lvl i przyjdź ponownie")
							say("")
							return
					end

					local map = pc.get_map_index()
					local empire = pc.get_empire()
					local level = pc.get_level()
					local cost = math.floor(level / 5) * 100000

					-- ?? ????
					if cost < 100000 then
							cost = 100000
					end

					say("A więc jednak się zdecydowałeś?[ENTER] Lecz wiedz że takie coś kosztuje... ")
					say_reward(string.format("Musisz zapłacić %d Yang", cost))

					-- ?? ?? ???? ?? ?? (? ?? 1,2 ??)
					if map == 1 or map == 3 or map == 21 or map == 23 or map == 41 or map == 43 then

							local guild_map_names = {
									"Miasto Duchów",
									"Miasto Duchów",
									"Miasto Duchów",
							}

							guild_map_name = guild_map_names[empire]
							local empire_castle={
									"Atlantyda",
									"Atlantyda",
									"Atlantyda",
							}
							empire_castle =empire_castle[empire]
							local sub_set = 0
							if level < 145 then -- 60?? : ?????, ???, ????, ???
									sub_set = select(guild_map_name, "Wu-Tei", "Ziemia Zombie", "Śródziemie", empire_castle,"Anuluj")
									if sub_set == 6 then -- ??
											return
									end

							else -- 61?? : ????, ???, ????, ????
									sub_set = select(guild_map_name, "Wu-Tei", "Ziemia Zombie", "Śródziemie", empire_castle,"Dalej")
									if sub_set == 6 then -- ??
											say("Te mapy dostępne są od 145 poziomu!")
											say_reward(string.format("Za usługe pobieram %d yang!", cost))
											sub_set = select("Stare Bagno", "Klasztor", "Wróć", "Anuluj") + 5
											if sub_set == 9 then -- ??
													return
											end
											if sub_set == 8 then -- ??
																							 ---												   l
													say_reward(string.format("Bedzie to kosztowac %d yang.", cost))
													say_reward("To co postanowiłeś?")
													sub_set = select(guild_map_name, "Wu-Tei", "Ziemia Zombie", "Śródziemie", empire_castle,"Dalej")
													if sub_set == 6 then -- ??
															---												   l
															say("Te mapy dostepne sa od 145 poziomu!")
															say("Więc jak?")
															say_reward(string.format("Koszt to %d yang.", cost))
															sub_set = select("Stare Bagno", "Klasztor", "Wróć", "Anuluj") + 5
															if sub_set == 8 then -- ??
																	return
															end
													end
											end
									end
							end

							if pc.gold < cost then
									say("Niestety nie masz wystarczająco[ENTER]Dużo Yang![ENTER]Przyjdź kiedy będziesz mieć pełną sumę...")
									say_reward(string.format("Musisz zapłacić %d yang", cost))
									say("")
									return
							end

							pc.changegold(-cost)

							local warp = {
				-- gm_guild_build
				{
					{ 105100, 99 },
					{ 105100, 99 },
					{ 105100, 99 },
				},
				-- metin2_map_dd
				{
					{ 8010900, 9300 },
					{ 8010900, 9300 },
					{ 8010900, 9300 },
				},
				-- metin2_map_zombiev1
				{
					{ 1024092, 537981 },
					{ 1024092, 537981 },
					{ 1024092, 537981 },
				},
				-- metin2_map_naga1
				{
					{ 9935552, 9935731 },
					{ 9935552, 9935731 },
					{ 9935552, 9935731 },
				},
									{-- metin2_map_skipia_dungeon_01
											{ 100, 1203248 },
											{ 100, 1203248 },
											{ 100, 1203248 },

									} ,
				-- metin2_map_bagno
				{
					{ 1844902, 1000816 },
					{ 1844902, 1000816 },
					{ 1844902, 1000816 },
				},
				-- metin2_map_m2m
				{
					{ 6935877, 6936042 },
					{ 6936174, 6935790 },
					{ 6936406, 6936041 },
				},
							}
							test_chat(warp[sub_set][empire][1]..warp[sub_set][empire][2])
							say("Podązaj za mną!")
							say("")
							say("Za godzine powinnismy byc na miejscu!")
							wait()
							pc.warp(warp[sub_set][empire][1], warp[sub_set][empire][2])


					else -- ? ?? 1,2 ? ??? ?????? ? ?? 1,2 ? ??? ?? ??	  
							local sub_set2 = 3

							--sub_set2 = select(locale.vileage1_name[empire], locale.vileage2_name[empire], locale.cancel)
							if empire==1 then	
									sub_set2 = select("Shinsoo M1","Shinsoo M2" , locale.cancel)
							elseif  empire ==2 then  
									sub_set2 = select("Chunjo M1","Chunjo M2" , locale.cancel)
							elseif  empire ==3 then
									sub_set2 = select("Jinno M1","Jinno M2" , locale.cancel)
							end	
							if sub_set2 != 3 then
									if pc.gold < cost then
											say("Hmm...")
											say("Rozumiem, ze nie masz yang")
											say("ale ja tez musze jakos wyzywic swoja rodzine!")
											say_reward(string.format("Wroc kiedy zdobedziesz %d yang", cost))
											say("")
									else
											if sub_set2 == 1 then
													say("Podązaj za mną!")
													say("Za godzine powinnismy byc na miejscu")
													wait()

													if empire == 1 then
															pc.warp(474300,954800)
													elseif empire == 2 then
															pc.warp(63800,166400)
													elseif empire == 3 then
															pc.warp(959900,269200)
													end	
											elseif sub_set2 == 2 then
													say("Podązaj za mną!")
													say("Za godzine powinnismy byc na miejscu")
													say("")
													say("")
													wait()
													if empire == 1 then
															pc.warp(353100,882900)
													elseif empire == 2 then
															pc.warp(145500,240000)
													elseif empire == 3 then
															pc.warp(863900,246000)
													end	
											end

											pc.changegold(-cost)
									end
end
					end
			end -- end_of_chat
	end -- end_of_state
end

quest z_teleport begin
	state start begin
			when 20376.chat."V2 Krainy Zombie" with pc.level >= 50 begin
									pc.warp(38400,64000)
			end
			when 20376.chat."V2 Krainy Zombie" with pc.level < 50 begin
			   	  say("Abym cię przeniósł do V2 Krainy Zombie musisz mieć[ENTER]Co najmniej 50lv!")
			end
			when 20092.chat."Atlantyda" begin
									pc.warp(10000,1213200)
			end
end
end

quest straznik begin
	state start begin
			when 20370.chat."Kolejne Piętro" with pc.level >= 1 begin
									pc.warp(8084900,75000)
			end
			when 20371.chat."Kolejne Piętro" with pc.level >= 1 begin
									pc.warp(8119300,25000)
			end
			when 20371.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin
									pc.warp(8027400,31000)
			end
			when 20372.chat."Kolejne Piętro" with pc.level >= 1 begin
									pc.warp(8050000, 77000)
			end
			when 20372.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin
									pc.warp(8084900,75000)
			end
			when 20373.chat."Kolejne, już ostatnie Piętro" with pc.level >= 1 begin
									pc.warp(8130000,70000)
			end
			when 20373.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin
									pc.warp(8119300,25000)
			end
			when 20374.chat."Wróć na poprzednie Piętro" with pc.level >= 1 begin
									pc.warp(8050000, 77000)
			end
end
end

quest z_teleport begin
	state start begin
			when 20377.chat."Wróć do V1 Krainy Zombie" with pc.level >= 50 begin
									pc.warp(20000,10000)
			end
end
end

quest czerwony begin
state start begin
	when 20082.chat."Czy moze bylbys zainteresowany..." with pc.level>=70 begin
		say("Kiedy rano, bylam z babcia na grzybach,[ENTER]Znalazlam ta laske. Jezeli chcesz,[ENTER]moge ci ja odsprzedac za 10kk yang[ENTER] [ENTER]Czy napewno chcesz kupic ten przedmiot?")
		say_item_vnum(70023)
		say("")
		local b=select("Tak, kupię go", "Nie, jest za drogi")
		if 1==b then
			if pc.money>=10000000 then
				pc.changemoney(-10000000)
				say("Zakupiłeś Laske Maga")
				pc.give_item2("70023", 1)
			else
				say("Nie masz wystarczajaco pieniedzy!")
				say("Wroc kiedy uzbierasz pelna sume!")
				say("Mam nadzieje ze sie jescze kiedys zobaczymy")
			end
		elseif 2==b then
		else
			say("UNKNOWN BUTTON ["..b.."]")
		end
	end
	when 20082.chat."Czy moze bylbys zainteresowany..." with pc.level<70 begin
		say("Kiedy rano, bylam z babcia na grzybach,[ENTER]Znalazlam ta laske. Jezeli chcesz,[ENTER]moge ci ja odsprzedac za 10kk yang[ENTER] [ENTER]Czy napewno chcesz kupic ten przedmiot?")
		say_item_vnum(70023)
		say("")
		say("Niestety jestes zbyt malo doswiatczony abym[ENTER]Sprzedala ci przedmiot o tak duzej[ENTER]Mocy. Wroc kiedy osiagniesz 70 poziom!")
		say("")
		end
end
end

quest poziom begin
	state start begin
	when levelup with pc.level >= 100 and pc.level <= 250 begin
	local m_sex = pc.get_sex()
	   if m_sex == 0 then
	notice_all(" ".. pc.get_name() .." awansował na ".. pc.get_level() .." level. Gratulujemy i życzymy dalszych sukcesów!")
	 else
	notice_all(" ".. pc.get_name() .." awansowała na ".. pc.get_level() .." level. Gratulujemy i życzymy dalszych sukcesów!")
	end
	end
	end
end

quest music begin
state start begin
	when 20041.chat."Dropnij Item" with pc.is_gm() begin
		say("Wpisz ID itemku!")
		local i=input()
		game.drop_item(i)
	end
	end
end

quest info begin
state start begin
	when 30204.use with pc.is_gm() begin
	say("Wybierz opcje!")
	local s=select("On-Line", "Zaraz Wraca", "Off-line", "Anuluj")
	if s==1 then
		notice_all(pc.get_name().." jest on-line! Możecie do niego pisać!")
	elseif s==2 then
		notice_all(pc.get_name().." zaraz wroci! Nie Przeszkadzać!")
	elseif s==3 then
		notice_all(pc.get_name().." jest off-line! I żegna się z wami!")
	end
	end
end
end

quest GM begin
state start begin
	when login with pc.is_gm() begin
				pc.remove_item("30204", 1)
				pc.give_item2("30204", 1)
				pc.remove_item("70007", 1)
				pc.give_item2("70007", 1)
	end
	end
end

quest Chi_teleport begin
	state start begin
			when 20375.chat."Zaginione Miasto Escacalia" with pc.level >= 1 begin
									pc.warp(1426000,1424500)
			end
			when 20375.chat."Zaginione Miasto Escacalia" with pc.level < 1 begin
say("Abym cię przeniósł do Escacalii musisz mieć[ENTER]Co najmniej 1lv!")
			end
end
end

----------------------------------------------------
-- Metin2 Triadica.net
-- Kapitan Quest By Bambus3k
-- Change Name
----------------------------------------------------
quest nick begin
state start begin
when 71055.use or 71055.chat begin
say_title("Zmiana Nicku:")
say("")
say("Witaj,")
say("dzięki mnie możesz zmienić swój nick na stałe! ")
say("Wystarczy, że się zgodzisz !")
say("")
say_reward("Czy chciałbyś zmienić swój nick?")
say("")
local change = select("Tak", "Nie")
if change == 1 then
say_title("Zmiana Nicku:")
say("")
say("Więc chcesz zmienić swój nick?")
say("Dobrze, tylko pamiętaj, że przyjaciele ")
say("mogą Cię nie rozpoznać pod tym nowym imieniem")
say("")
say_reward("Podaj swój nowy nick:")
say_reward("Nie możesz używać kodów ASCI!")
say("")
local c_name = input()
local c_search = find_pc_by_name(c_name)

if c_search==0 then
say_title("Zmiana Nicku:")
say("")
say("Podałeś już swój nowy nick wygląda on tak:")
say(""..c_name.." zostawić taki?")
say("")
local secure = select("Tak", "Nie")
if secure == 1 then
say_title("Zmiana Nicku:")
say("")
say("Pomyślnie Zmieniono Nick!")
say("")
say("Twoja nowa nazwa to: "..c_name.." ")
say("")
say_reward("Przeloguj się aby zaktualizować zmiany!")
say("")
pc.change_name(c_name)
pc.remove_item(71055, 1)
else
say_title("Zmiana Nicku:")
say("")
say("Dobrze, że zmieniłeś zdanie...")
say("Twoja nazwa została nie zmieniona!")
say("")
end
else
say_title("Zmiana Nicku:")
say("")
say("Podana przez Ciebie nazwa nicku już jest zajęta!")
say("Wybierz sobie nowy inny nick i go podaj...")
say("")
end
else
return
end
end
end
end

quest reset_scroll begin
state start begin
	when 71002.use begin
		---												   l
		say_title("Zwoj powrotu statusu")
		say("Tym zwojem mozesz")
		say("zresetowac swoje umiejetnosci oraz")
		say("punkty statusu.")
		say("")
		say("")
		say("Czy chcesz kontynuowac?")
		say("")

		local s = select("Tak", "Nie")
		if 2 == s then
			return
		end

		say_title("Zwoj powrotu statusu")
		say("Uwaga!")
		say("Efektu tego zwoju nie da")
		say("sie odwrocic!")
		say("")
		say("Czy jestes pewien, ze chcesz go uzyc?")

		local c = select("Tak", "Nie")
		if 2 == c then
			return
		end

		char_log(0, "RESET_ALL", "USE_ITEM(71002)")
		pc.remove_item(71002)

		char_log(0, "RESET_ALL", "RESET_STAT_POINTS")
		pc.reset_point()

		char_log(0, "RESET_ALL", "RESET_SKILL_POINTS")
		pc.clear_skill()
		pc.set_skill_group(0)
		char_log(0, "RESET_ALL", "RESET_END")
	end

	when 71003.use begin

		---												   l
		say_title("Zwoj powrotu umiejetnosci")
		say_reward("Tym zwojem mozesz zresetowac swoja umiejetnosc i")
		say_reward("dostac 17 punktow umiejetnosci za nia!")

		local result = BuildSkillList(pc.get_job(), pc.get_skill_group())

		local vnum_list = result[1]
		local name_list = result[2]

		if table.getn(vnum_list) < 2 then
			say("LUA ERROR CODE1")
			say("")
			return
		end

		say("Wybierz umiejetnosc, ktora chcesz zresetowac!")
		say("")

		local i = select_table(name_list)

		if table.getn(name_list) == i then
			return
		end

		local name = name_list[i]
		local vnum = vnum_list[i]

		say_title("Zwoj powrotu umiejetnosci")
		say_reward("Uwaga!")
		say_reward("Efektu tego zwoju nie da sie")
		say_reward("odwrocic!")
		say(string.format("Czy chcesz zresetowac umiejetnosc %s ?", name))
		say("")

		local s = select("Tak", "Nie")
		if 2 == s then
			return
		end

		say_title("Zresetowanie tej umiejetnosci")
		say("nie zwroci wszystkich wydanych punktow!")
		say("")
		say("Czy chcesz kontynuowac?")
		say("")

		local c = select("Tak", "Nie")

		if 2 == c then
			return
		end

		--
		--local val = pc.getqf("force_to_master_skill")
		--if val > 0 then
			---												   l
		--	say_title("§ŢŻŕŞě©l¤ĆݵÓD: ĵ§i!")
		--	say("§AĄH«e¤w¸g¨ĎĄÎąL§ŢŻŕŞě©l¤Ć. ")
		--	say("©ŇĄH˛{¦bŔłĄÎ17ÂIłĚ°ŞµĄŻĹŞş®ÄŞGŞşŞ¬şA. ")
		--	say("ło®ÄŞGµLŞk­«˝Ć.")
		--	say("")
		--	say_reward("¨ĎĄÎ§ŢŻŕŞě©l¤ĆݵÓD¤§«e")
		--	say_reward("§ŢŻŕĄýĄ˛¶·­n¨ú±ołĚ°ŞµĄŻĹ")
		--	say("")
		--	return
		--end

		char_log(0, "RESET_ONE_SKILL", "USE_ITEM(71003)")
		pc.remove_item(71003)

		char_log(0, "RESET_ONE_SKILL", string.format("RESET_SKILL[%s]", name))
		pc.clear_one_skill(vnum)

		char_log(0, "RESET_ONE_SKILL", "APPLY_17MASTER_BONUS")
		pc.setqf("force_to_master_skill", 1)

		say_title("§ŢŻŕŞě©l¤ĆݵÓD: ¨ĎĄÎ§ą¦¨")
		say(string.format("%s §ŢŻŕŞě©l¤Ć§ą¦¨.", name))
		say("")

		---												   l
		say_reward("Umiejetnosc zostala zresetowana!")
		say("")
	end
end
end

quest Rybie_Wnetrznosci begin
state start begin
	when 27620.use or click begin
				   say_title("Informacje")					  
				   say("Dziękuję że zdecydowałeś się zapłacić skromną[ENTER]Opłatę za mnie. Zapraszam do lektury!")
	   wait()
				   say_title("Wstęp")
				   say("Wędkarstwo, to cos więcej niz tylko łapanie ryb")
				   say("Wędkarstwo, to Życie")
				   say("Wędkarstwo, to Pasja")
				   say("Wędkarstwo, to cos absolutnie wyjątkowego,")
				   say("Jedyna rzecz, sama w sobie wyjątkowa")
				   say("Zacznijmy od pokazania tego, co można wyłowic w[ENTER]Mętnej toni!")
	   wait()
				   say_title("Strona 1")
  	 say_item_vnum(27802)
  	 say_item_vnum(27803)
  	 say_item_vnum(27804)
	   wait()
				   say_title("Strona 2")
  	 say_item_vnum(27805)
  	 say_item_vnum(27806)
  	 say_item_vnum(27807)
	   wait()
				   say_title("Strona 3")
  	 say_item_vnum(27808)
  	 say_item_vnum(27809)
  	 say_item_vnum(27810)
	   wait()
				   say_title("Strona 4")
  	 say_item_vnum(27811)
  	 say_item_vnum(27812)
  	 say_item_vnum(27813)
	   wait()
				   say_title("Strona 5")
  	 say_item_vnum(27814)
  	 say_item_vnum(27815)
  	 say_item_vnum(27816)
	   wait()
				   say_title("Strona 6")
  	 say_item_vnum(27817)
  	 say_item_vnum(27818)
  	 say_item_vnum(27819)
	   wait()
				   say_title("Strona 7")
  	 say_item_vnum(27820)
  	 say_item_vnum(27821)
  	 say_item_vnum(27822)
	   wait()
				   say_title("Strona 8")
  	 say_item_vnum(27823)
  	 say("To wszystkie ryby!")
  	 say("Z ryb czesto wypadają małże!")
  	 say_item_vnum(27987)
  	 say("Ciekawi cie co można znaleźć w ich wnętrzu?")
	   wait()
				   say_title("Strona 9")
  	 say("Czasami nie ma z nich nic, a czasami jest:")
  	 say_item_vnum(27990)
  	 say("Albo...")
  	 say("")
	   wait()
				   say_title("Strona 10")
  	 say_item_vnum(27992)
  	 say_item_vnum(27993)
  	 say_item_vnum(27994)
	   wait()
				   say_title("Strona 11")
  	 say("To że jest je tak ciężko je zdobyc, powoduje że")
  	 say("Można sobie na nich nieźle zarobić!")
  	 say("Powinieneś także wiedzieć że martwe")
  	 say("Ryby można upiec na ognisku, a rozpalisz je")
  	 say("Za pomocą tego przedmiotu!")
  	 say_item_vnum(27600)
	   wait()
				   say_title("Strona 12")
  	 say("Upieczone ryby zmieniaja zazwyczj swój kolor:")
  	 say_item_vnum(27863)
  	 say("Dają także różne ciekawe bonusy.")
  	 say("U większości ryb to trochę PŻ i PE,")
  	 say("Ale najciekawszy bonus daje ta ryba!")
  	 say_item_vnum(27877)
	   wait()
				   say_title("Strona 13")
  	 say("Dzięki niej.. Stajesz się niewidzialny!")
  	 say("Bonus ten trwa do zabicia, lub do upływu 3 minut!")
  	 say("Podobne, tylko 2x dłuższe działanie ma ta ryba:")
  	 say_item_vnum(27883)
  	 say("To juz koniec lektury!")
  	 say_item_vnum(27620)
				   say_title("Dziękuję za wspólnie spędzony czas!")
end
end
end

quest Baek_Go begin
state start begin
	when 20018.chat."Otwórz sklep z miksturami"  begin
   	 npc.open_shop()
		setskin(NOWINDOW)
	end
end
end

quest nic begin
state start begin
	when login begin
				if pc.count_item("33333") then
				pc.remove_item("33333", 200)
else
end
end
end
end

quest automex begin
	state start begin
		when letter with pc . is_gm ( ) begin
		send_letter ("GM Auto Wiadomość")
	end
		when button or info begin
		a = select ("Wlacz Auto Wiadomość" , "Wylacz Auto Wiadomość" , "Ustaw Tekst" , "Ustaw Czas" ,  "Wyjdz")
			if a == 1 then
				if game . get_event_flag ( "auto" ) >= 1 then
				say ( "Juz wlaczony!" )
				else
				say ("Auto Wiadomość Włączona")
				game . set_event_flag ( "auto" , 1 )
				server_timer ( "mex" , t )
			end
			elseif a == 2 then
			say ("Auto Wiadomość Wyłączona")
			game . set_event_flag ( "auto" , 0 )
			clear_server_timer ( "mex" )
			clear_server_timer ( "mex1" )
			elseif a == 3 then
			say ("Wpisz twoja wiadomosc:")
			s = input ( )
			say ("Wpisz 2 wiadomosc")
			b = input ( )
			say ("Wpisz 3 wiadomosc")
			c = input ( )
			elseif a == 4 then
			say ("Ustawianie czasu:")
			m = tonumber(input())
				if m == nil then
				say ( "Musisz wpisac numer" )
				elseif m < 1 then
				say ( "Musisz wpisac pozytywny numer" )
				else
				h = select ( "Sekundy" , "Minuty" , "Godziny" )
					if h == 1 then
					t = m
					elseif h == 2 then
					t = tonumber(m * 60)
					elseif h == 3 then
					t = tonumber(m * 60 * 60)
				end
		   end
		end
	end
		when mex.server_timer begin
		if game.get_event_flag ( "auto" ) == 1 then
		notice_all ( ""..s )
		if b != "" then
		notice_all ( ""..b )
end
		if c != "" then
		notice_all ( ""..c )
end
		server_timer ( "mex1" , t )
		else
	   end
	end
		when mex1.server_timer begin
		if game . get_event_flag ( "auto" ) == 1 then
		notice_all ( ""..s )
		if b != "" then
		notice_all ( ""..b )
end
		if c != "" then
		notice_all ( ""..c )
end
		server_timer ( "mex" , t )
		else
		end
	 end
end
end

-------------------------
--Sztabki 50k
-------------------------
quest dropsztabki begin
state start begin
when kill with pc.level>=1 and pc.level<=250 begin
local s = number(1, 25)
if s == 1 then
game.drop_item(80003)
end
end
end
end

-------------------------
--Sztabki 100k
-------------------------
quest dropsztabki2 begin
state start begin
when kill with pc.level>=25 and pc.level<=49 begin
local s = number(1, 50)
if s == 1 then
game.drop_item(80004)
end
end
end
end

-------------------------
--Sztabki 500k
-------------------------
quest dropsztabki3 begin
state start begin
when kill with pc.level>=50 and pc.level<=74 begin
local s = number(1, 100)
if s == 1 then
game.drop_item(80005)
end
end
end
end

-------------------------
--Sztabki 1kk
-------------------------
quest dropsztabki4 begin
state start begin
when kill with pc.level>=75 and pc.level<=99 begin
local s = number(1, 250)
if s == 1 then
game.drop_item(80006)
end
end
end
end

-------------------------
--Sztabki 2kk
-------------------------
quest dropsztabki5 begin
state start begin
when kill with pc.level>=100 begin
local s = number(1, 500)
if s == 1 then
game.drop_item(80007)
end
end
end
end

------------------------------------------------------------------------------
--New
--Mount
--Jednorożec
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_01 begin
state start begin
when 71115.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount01 = 20110 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount01, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.MAGIC_DEF_GRADE_BONUS,100,180)
pc.removeitem(71115, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Upiorny Ogier
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_02 begin
state start begin
when 71116.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount02 = 20111 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount02, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.BLOCK,10,180)
pc.removeitem(71116, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Dzik Cienia
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_03 begin
state start begin
when 71117.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount03 = 20112 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount03, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.MOV_SPEED,50,180)
pc.removeitem(71117, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Wilk Cienia
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_04 begin
state start begin
when 71118.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount04 = 20113 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount04, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.ATT_SPEED,20,180)
pc.removeitem(71118, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Tygrys Cienia
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_05 begin
state start begin
when 71119.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount05 = 20114 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount05, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.ATT_GRADE_BONUS,175,180)
pc.removeitem(71119, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Lew Cienia
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_06 begin
state start begin
when 71120.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount06 = 20115 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount06, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.DEF_GRADE_BONUS,175,180)
pc.removeitem(71120, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Lodowy Lew
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_07 begin
state start begin
when 71121.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount07 = 20116 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount07, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.MAX_HP,5000,180)
pc.removeitem(71121, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Przeklęty Wilczur
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_08 begin
state start begin
when 71122.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount08 = 20117 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount08, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.STEAL_SP,20,180)
pc.removeitem(71122, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Krwawy Wilczur
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_09 begin
state start begin
when 71123.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount09 = 20118 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount09, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.STEAL_HP,20,180)
pc.removeitem(71123, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Czerwony Smok
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_10 begin
state start begin
when 71124.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount10 = 20119 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount10, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.IMMUNE_STUN,1,180)
pc.mount_bonus(apply.IMMUNE_SLOW,1,180)
pc.mount_bonus(apply.ATTBONUS_HUMAN,10,180)
pc.removeitem(71124, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Dzik
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_11 begin
state start begin
when 71125.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount11 = 20120 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount11, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.MOV_SPEED,30,180)
pc.removeitem(71125, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Wilk
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_12 begin
state start begin
when 71126.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount12 = 20121 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount12, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.ATT_SPEED,10,180)
pc.removeitem(71126, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Tygrys
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_13 begin
state start begin
when 71127.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount13 = 20122 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount13, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.ATT_GRADE_BONUS,100,180)
pc.removeitem(71127, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Lew
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_14 begin
state start begin
when 71128.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount14 = 20123 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount14, 180)
pc.setqf("next_time_use",get_time()+14*10)
pc.mount_bonus(apply.DEF_GRADE_BONUS,100,180)
pc.removeitem(71128, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Dino
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_15 begin
state start begin
when 71129.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount15 = 20124 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount15, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.PENETRATE_PCT,15,180)
pc.removeitem(71129, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Latający Niedźwiedź
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_16 begin
state start begin
when 71130.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount16 = 20125 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount16, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.CASTING_SPEED,50,180)
pc.removeitem(71130, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Rakieta
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_17 begin
state start begin
when 71131.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount17 = 20126 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount17, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.MOV_SPEED,100,180)
pc.removeitem(71131, 1)
end
end
end
end
------------------------------------------------------------------------------
--New
--Mount
--Zebra
------------------------------------------------------------------------------
------------------------
--Jazda na wierzchowcu1
------------------------
quest M_18 begin
state start begin
when 71132.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć pieczęci poczekaj "..iRest.." Sekund!")
elseif horse.get_level() < 11 then
syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iMount18 = 20127 -- Id Wierzchowca
command("unmount")
horse.unsummon()
horse.summon() horse.ride()
pc.mount(iMount18, 180)
pc.setqf("next_time_use",get_time()+18*10)
pc.mount_bonus(apply.DODGE,10,180)
pc.removeitem(71132, 1)
end
end
end
end

quest gmchange begin
state start begin
	when 20366.chat."GM: Zmien plec" with pc.is_gm() begin
		say_reward("Wyloguj sie!")

			pc.change_sex()

			local m_sex = pc.get_sex()

			if m_sex == 0 then
		   	 char_log(0, "CHANGE_SEX", "F -> M")
			else
		   	 char_log(0, "CHANGE_SEX", "M -> F")
			end
	end
end
end

quest change_empire begin
state start begin
	when 20090.chat."Zmien Imperium" begin

		local count = pc.get_change_empire_count() ;
		if count >= 1 then
			say("Nie mozesz zmienic swojego imperium")
			say("")
			return
		end
		say_reward("Zmiana Imperium")
		say("")
		say("A wiec chcesz zmienic swoje imperium?")
		say("Moge to zrobic dla Ciebie")
		say("za drobna oplata!")
		say("Musisz zaplacic 500.000 yang")
		say("zgadzasz sie?")
		say("")
		say("")
		say("")

		local s = select("Zgadzam sie", "Nie, dzieki")

		if s == 1 then
			change_empire.move_pc()
		end
	end

	when 71054.use begin

		if get_time() < pc.getqf("next_use_time") then
			say("Nie mozesz zmienic krolestwa!")
			say("")

			if pc.is_gm() then
				say("Z racji, ze jestes GM mozesz")
				say("zmienic krolestwo")
				local s = select("Zmien", "Nie, dzieki")
				if s == 1 then
					say("Uzyj zwoju jeszcze raz!")
					pc.setqf("next_use_time", 0)
				end
			end

			return
		end

		if change_empire.move_pc() == true then
			pc.setqf("next_use_time", get_time() + 86400 * 7)
		end
	end



	function move_pc()
		if pc.is_engaged() then
			say("Nie mozesz zmienic krolestwa")
			say("kiedy jestes zareczony!")
			say("")
			return false
		end

		if pc.is_married() then
			say("Nie mozesz zmienic krolestwa")
			say("kiedy jestes zonaty!")
			say("")
			return false
		end

		if pc.is_polymorphed() then
			say("Nie moge Ciebie przeniesc")
			say("jako potwora!")
			say("")
			return false
		end

		if pc.has_guild() then
			say("Nie moge Ciebie przeniesc")
			say("z gildia!")
			say("")
			return false
		end
		if pc.money < 500000 then
			say("Aby sie przeniesc")
			say("potrzebujesz 500.000 yang!")
			say("")
			return false
		end
		say("Wybierz imperium, do ktorego chcesz")
		say(" sie przeniesc")
		local s = select("Shinsoo", "Chunjo", "Jinno", "Anuluj")
		if 4==s then
			return false
		end
		say("")
		say_reward("Chcesz zmienic swoje imperium?")
		say_reward("")
		say("")
		local a = select("Kontynuuj", "Anuluj")
		if 2== a then
			return false
		end

		local ret = pc.change_empire(s)
		local oldempire = pc.get_empire()
		if ret == 999 then
			say("Zmieniles Imperium!")
			say("Wyloguj sie, aby zatwierdzic zmiany!")
			say("")
			pc.change_gold(-500000)
			pc.remove_item(71054) ;

			char_log(0, "CHANGE_EMPIRE",string.format("%d -> %d", oldempire, s))

			return  true
		else
			if ret == 1 then
				say("Juz jestes w imperium")
				say("ktore wybrales!")
				say("")
				say("")
			elseif ret == 2 then
				say("Blad2")
				say("")
				say("")
				say("")
			elseif ret == 3 then
				say("Blad3")
				say("")
				say("")
			end
		end
		return false
	end

end
end

 

1.Zamien na to w nowe.quest.

2.sh make

3. ./qc nowe.quest

Opublikowano

Właśnie z tym twoim mi coś nie działa na serwerze chyba ./qc nie mam pojęcia :/ ( serwer ma mam w /USR/SERVERFILES skopiowałem tylko germany + całe mysql)

oynk.png

Opublikowano

Właśnie z tym twoim mi coś nie działa na serwerze chyba ./qc nie mam pojęcia :/ ( serwer ma mam w /USR/SERVERFILES skopiowałem tylko germany + całe mysql)

 

./qc Ci nie dziala.

Opublikowano

kto mi da item_proto i refine_proto z całym systemem ulepszeń? mocno z lajkuje ^^

 

http://speedy.sh/Xb45J/pliki.rar

Skan:

 https://www.virustotal.com/file/878f85a5ca88ebd2f45ee0cddcd21c198acaa41cf87142043ea962416be651d8/analysis/1330275650/

Opublikowano

@up

 

cały system ulepszeń? i ulepszacze dodane :P ?

//nieregulaminowa sygnatura

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...