Pisanie / Poprawa Questów !

Nigahiga · 13 Marca 2012

@up

quest ded begin
state start begin
	when login or enter or letter begin
		while true do -- or while ( 1 != 2) do
			if pc.is_dead() == true then

				makequestbutton("Pokazuje się liścik.")
					break
			end
		end
	end
end
end

xDeStRuCtx · 13 Marca 2012

@UP

To trochę obciąża. Lepszym wyjściem jest napisanie sobie funkcji sleep() i sleepować ok. 2 sekund lub timery.

Nigahiga · 13 Marca 2012

Mi to mówisz..? Przecież ja tego nie będę używał. =)

old_kwiatosz · 13 Marca 2012

function sleep(x)
system.sleep(x)
end

I po if pc.is

daj tu:

sleep(2)

Dobrze mówię ?

nfsfankp50098 · 13 Marca 2012

Witam potrzebuje questa na bonusy do oryginalnych koni np

koń zwykły id 20101, 20102, 20103 -----bonus +20 do szybkości

koń bojowy id 20104, 20105, 20106 -----bonus +80 do ataku

koń militarny id 20107, 20108, 20109 -----bonus + 100 do obrony

I te bony będą działać wtedy kiedy będę siedział na koniu a nie jak będzie np: Koń stał koło mnie

ZA POMOC DUŻO PLUSÓW

xDeStRuCtx · 13 Marca 2012

@kwiatmix

można i tak. lub bardziej jeszcze to rozjechać 'do kodu źródłowego' i metina, ale to też może być. :]

szeler · 13 Marca 2012

Siemaaaaaa

Doda mi ktoś do Pierścienia TP do expowiska cz.2 jeszcze Dwie mapki jedna na kordy 5555500 5555500 i druga na 999900 999900 Pierwsza od 95 druga od 100 lvl.

Quest:

-----------------
-----GuutekRlz mpcforum.pl-----
-----------------
quest move_ring begin
state start begin
when 80009.use begin
say_title ( "Pierscien Teleportacji:" )
say (pc.get_name().. " Gdzie lecisz ziomek?:" )
say ( "" )
local s = select ( "Główne Miasta" , "Wesole Miasteczka (M2)" , "Inne" , "Expowiska" , "Expowiska cz.2" , "Wyjdz (idziesz spac?)" )
if s == 1 then
say_reward ( "hmm..." )
say ( pc.get_name().." Do którego miasta chcesz sie wybrac bracie??" )
local s = select ( "Shinsoo" , "Chunjo" , "Jinno" , "Nigdzie!" )
if s == 1 then
say_title ( pc.get_name().."!")
say ("Teleportujemy cie do wioski Shinsso")
wait ()
pc.warp ( 474300 , 954800 )
elseif 2 == s then
say_title ( pc.get_name().."!")
say ("Teleportujemy cie do wioski Chunjo")
wait ()
pc.warp ( 63800 , 166400 )
elseif 3 == s then
say_title ( pc.get_name().."!")
say ("Teleportujemy cie do wioski Jinno")
wait ()
pc.warp ( 959900 , 269200 )
elseif 4 == s then
else
return
end
elseif s == 2 then
say_reward ( "hmm..." )
say ( pc.get_name().." Do którego miasteczka chcesz sie wybrac?" )
local s = select ( "Shinsoo M2" , "Chunjo M2" , "Jinno M2" , "Nigdzie!" )
if s == 1 then
say_title ( pc.get_name().."!")
say ("Lecisz do drugiej wioski Shinsso")
wait ()
pc.warp ( 353100 , 882900 )
elseif 2 == s then
say_title ( pc.get_name().."!")
say ("Lecisz do drugiej wioski Chunjo")
wait ()
pc.warp ( 145500 , 240000 )
elseif 3 == s then
say_title ( pc.get_name().."!")
say ("Lecisz do drugiej wioski Jinno")
wait ()
pc.warp ( 863900 , 246000 )
elseif 4 == s then
return
end
elseif s == 3 then
say_title ( pc.get_name().."!")
say ( "Zwiedz tez inne miejsca :")
local s = select ( "Przed DT" , "Ziemia Olbrzymów" , "Mapa GM map/zombie" , "Nie chcesz?!" )
if s == 1 then
say_title ( pc.get_name().."!")
say ("Lecisz Na DT kolego :DD ??")
wait ()
pc.warp ( 590500 , 110500 )
elseif 2 == s then
say_title ( pc.get_name().."!")
say ("Lecisz na Tysiaczki baw sie dobrze :DD")
wait ()
pc.warp ( 845100 , 745900 )
elseif 3 == s then
say_title ( pc.get_name().."!")
say ("Nowa mapa (jeszcze w budowie , ale lookniesz jak wyglada :DD)")
wait ()
pc.warp ( 83200 , 0 )
elseif 4 == s then
else
return
end
elseif s == 4 then
say_title ( pc.get_name().."!")
say ( "Idz poexpic radzi GuutekRlz" )
local s = select ( "Dolina Seungryong" , "Pustynia Yongbi" , "Góra Sohan" , "Loch Pająków v1" , "Ognista Ziema" , "Wyjdz (idziesz spac?)" )
if s == 1 then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
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 2 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
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 3 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
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 4 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 60000 , 496000 )
elseif empire == 2 then
pc.warp ( 60000 , 496000 )
elseif empire == 3 then
pc.warp ( 60000 , 496000 )
end
elseif 5 == s then
say_title ("Zostaniesz Przeniesiony")
say ("Trzymaj się Mocno")
wait ()
local empire = pc . get_empire ( )
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
else
return
end
elseif s == 5 then
say_reward ( "hmm..." )
say ( pc.get_name().." Do której miesciny chcesz sie wybrac" )
local s = select ( "Loch Pająków V2" , "Czerwony Las" , "Alantyda V1" , "Atlantyda V2" , "Anuluj" )
if s == 1 then
say_title ("Zostaniesz Przeniesiony do Lochy Pajaków V2")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 704100 , 464100 )
elseif 2 == s then
say_title ("Zostaniesz Przeniesiony do Czerwonego Lasu")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 1119900 , 70800 )
elseif 3 == s then
say_title ("Zostaniesz Przeniesiony do Atlantydy V1")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 9800 , 1215100 )
elseif 4 == s then
say_title ("Zostaniesz Przeniesiony do Atlantydy V2")
say ("Trzymaj się Mocno")
wait ()
pc.warp ( 135200 , 1215100 )
elseif 5 == s then
return
end
end
end
end
end

krzywy_ · 14 Marca 2012

@up

quest ded begin
state start begin
	when login or enter or letter begin
		while true do -- or while ( 1 != 2) do
			if pc.is_dead() == true then

				makequestbutton("Pokazuje się liścik.")
					break
			end
		end
	end
end
end

Gdybym miał zajebistego kompa to by ta pętla działała :<

Zastanawiam się jak to będzie z tymi timer'ami, jak to pisał destruct

Kwiatmix zobaczę ze stopowaniem pętli.

Czyli ostatecznie wygląda to tak:

quest dead begin
state start begin
when login or enter or letter begin
while true do
if pc.is_dead() == true then
system.sleep(2)
makequestbutton("Pokazuje się liścik.")
system.sleep(2)
break
end -- if
end -- while
end -- when
end -- state
end -- quest

Ewentualnie while choć nie wiem czy to będzie dobrze

quest petla begin
state start begin
when login or enter or letter begin
while pc.get_hp() <= 0 do
chat("LOOSER")
if pc.get_hp() > 0 then
break
end -- if
end -- while
end -- when
end -- state
end -- quest

Karpielek · 14 Marca 2012

Szybkie pytanie czym się różni funkcja pc.level od pc.get_level

A jeżeli jest pc.get_level() >= 80 lub pc.get_level >= 80 po co jest pusty nawias obok tej funkcji? Z góry dzięki za wytłumaczenie.

Dargon · 14 Marca 2012

UP to to samo, tylko inna nazwa

Karpielek · 14 Marca 2012

A pusty nawias?

nfsfankp50098 · 14 Marca 2012

Witam potrzebuje questa na bonusy do oryginalnych koni np

koń zwykły id 20101, 20102, 20103 -----bonus +20 do szybkości

koń bojowy id 20104, 20105, 20106 -----bonus +80 do ataku

koń militarny id 20107, 20108, 20109 -----bonus + 100 do obrony

I te bony będą działać wtedy kiedy będę siedział na koniu a nie jak będzie np: Koń stał koło mnie

A DAŁ BY KTOŚ CHOCIAŻ WZÓR

rak222 · 15 Marca 2012

Cześć Może mi ktoś podać przykład ze swoim obrazkiem jak użyć funkcji addimage ??

Oraz gdzie ma się to znajdować w kliencie ??

Ja wiem że w /etc/ui/game/questobard

ale mi tam działają tylko 2 zdjęcia 757.tga oraz level_bg

za pomoc + oraz 5

Karpielek · 15 Marca 2012

Szybkie pytanie czym się różni funkcja pc.level od pc.get_level

A jeżeli jest pc.get_level() >= 80 lub pc.get_level >= 80 po co jest pusty nawias obok tej funkcji? Z góry dzięki za wytłumaczenie.

Więc czym się różni funkcja bez pustego nawiasu obok a z nawiasem?

old_kwiatosz · 15 Marca 2012

Więc czym się różni funkcja bez pustego nawiasu obok a z nawiasem?

Niczym się nie różnią, to są dwie takie same funkcje sprawdzające poziom postaci =)

Panth · 15 Marca 2012

Mam problem dodałem quest dodał się do końca wszystko OK .. Restartowałem serwer żeby mógł być quest w grze ... I questa nie ma .. Po wbiciu 75lvl'u+ też go nie ma .. Gracze z mojego serwera też go nie mają co zrobić ? Dam 10x lajk

----------------------------------------------------
--Triadica.net By Bambus3k
--METIN2 Biolog Quest Lv.50
----------------------------------------------------
quest biolog75lv  begin
	state start begin
	end
	state run begin
			when login or levelup with pc.level >= 75 and pc.level <= 120 begin
					set_state(information)
			end	
	end

	state information begin
			when letter begin
					local v = find_npc_by_vnum(20084)
					if v != 0 then
							target.vid("__TARGET__", v, "Analiza Biologa")
					end
					send_letter("Analiza Biologa")
			end

			when button or info begin
				say_title("Analiza Biologa")
				say("")
									say("Biolog Chaegirab, uczeń Baek-Goa,")
				say("właśnie Cie szukał. Proszę idz")
				say("do niego i zaoferuj mu swoją pomoc.")
				say("")
			end

			when __TARGET__.target.click or
					20084.chat."Znajdz Biologa" begin
					target.delete("__TARGET__")
					say("Biolog Chaegirab:")
					---												   l
					say("Niebiosa, proszę pomóż mi... ")
					say("Badam wszystkie rodzaje roślin w tym ")
					say("imperium. Jest bardzo dużo rzeczy, ")
					say("które muszą zostać zbadane. Nie mam ")
					say("czasu abym mógł sam wybrać się na wyprawe. ")
					say("Proszę,pomóż mi. ")
					wait()
					say("Aktualnie badam Broszury Szermierki.")
		say("Muszę przeprowadzić kilka eksperymentów,")
		say("dlatego potrzebuje egzemplarzy  broszur...")
		say("Czy mógłbyś przynieść mi piętnaście Broszur?")
		say("Proszę, pomóż mi! Zawsze przynoś mi po jednej,")
		say("abym mial czas na ich dokladne przebadanie!")
					say("")
					say_item_vnum(70031)
					set_state(go_to_disciple)
					pc.setqf("duration",0)  --ĄiĄH¸Ő¸ŐŞş®É¶ˇ
					pc.setqf("collect_count",0)-- ¨ú±oŞşŞ««~ĽĆ¶q
					pc.setqf("drink_drug",0) --łÜ°g´bĂÄ¤ôŞş¸Ü1
			end
	end

	state go_to_disciple begin
			when letter begin
					send_letter("Zadanie specjalne!")

			end
			when button or info begin
					say_title("Znajdz Broszury Szermierki")
					---												   l
					say("")
					say("Biolog Chaegirab, uczeń Baek-Goa,")
					say("szuka Broszurek Szermierki.")
					say("Zawsze przynoś mu po jednej, aby miał czas")
					say("na ich dokładne przebadanie.")
					say("Broszurek szukaj w Niebiańskiej Grocie.")
					say("")
					say_item_vnum(70031)
					say_reward("Do tej pory dostarczyłeś ".." "..pc.getqf("collect_count").." Broszur Szermierki.")
					say("")
			end

			when 71035.use begin --°g´bĂÄ¤ô
					if get_time() < pc.getqf("duration") then
							say("")
							say("ÁŮ¤ŁĄiĄH¨ĎĄÎ°g´bĂÄ¤ô")
							say("")
							return
					end
					if pc.getqf("drink_drug")==1 then
							say("")
							say("¤w¸g¨ĎĄÎ¤F1¦¸")
							say("")

							return
					end
					if pc.count_item(70031)==0 then
							say("Biolog Chaegirab:")
							say("Co? Nie przyniosłeś mi zadnej")
							say("Broszury Szermierki..?")
							say("")
							return
					end

					item.remove()  
					pc.setqf("drink_drug",1)
			end



	when 20084.chat." Pamiątka Po Demonie " with pc.count_item(70031) >0   begin
					if get_time() > pc.getqf("duration") then
															say("Biolog Chaegirab:")
							---												   l
							say("Oh!! Znalazleś!")
							say("Pozwól,ze rzuce okiem...")
							say("Jeszcze chwilke.")
							say("")
							pc.remove_item(70031, 1)
							pc.setqf("duration",get_time()+1*1*1) ----------------1??
							wait()

							local pass_percent
							if pc.getqf("drink_drug")==0 then
									pass_percent=80
							else			
									pass_percent=90
							end

							local s= number(1,100)
							if s<= pass_percent  then
							   if pc.getqf("collect_count")< 14 then	 --15ÓĄĽşˇ
											local index =pc.getqf("collect_count")+1
											pc.setqf("collect_count",index)	 --¨ú±o¤@Ó®É+1
											say("Biolog Chaegirab:")
											say("Oh!! Ta Pamiątka Po Demonie jest doskonałej jakości!")
											say("Jestes wspanialy!")
											say("Przynieś mi jeszcze ".." "..15-pc.getqf("collect_count").. " Broszurek Szermierki.")
											say("Prosze, sprobuj je znalezć!")
											say("")
											pc.setqf("drink_drug",0)		 --ĂÄ¤ôŞě©l¤Ć
											return
									end
									say("Biolog Chaegirab:")
									say("Znalazłeś już piętnaście Broszurek!!")
									say("Dziękuje Ci, że jesteś taki pomocny.")
									say("Musisz teraz zdobyc Olejek Niebios")
									say("Słyszałem, że owy Olejek często wypada z")
									say("Potworów znajdujących się w Niebiańskiej Grocie. ")
									say("Zrobisz to dla mnie?")	
									say("")

									say_item("Olejek Niebios", 71056, "")

									say_reward("Zabijaj Nieb. Wojownik")
									say_reward("Nieb. Łucznik")
									say_reward("Nieb. Magistrat")
									say_reward("Nieb. Komendant")


									pc.setqf("collect_count",0)
									pc.setqf("drink_drug",0)		
									pc.setqf("duration",0)
									set_state(key_item)
									return
							else															
							say("Biolog Chaegirab:")
							say("Wybacz niestety...")
							say("Twoja Broszura była zbyt zepsuta...")
							say("Proszę, przynieś mi inną!")
							say("Nie zawiedz mnie!")
							say("")	
							pc.setqf("drink_drug",0)		 --ĂÄ¤ôŞě©l¤Ć
							return
							end
			else
			  say("Biolog Chaegirab:")
			  say("Jeszcze nie skończyłem badać ostatniej Broszury !")
			  say("Wróc później, kiedy juz skończę!")
			  say("")
			  return
			end

	end
end


	state key_item begin
			when letter begin
					send_letter("Olejek Niebios")

					if pc.count_item(71056)>0 then  
							local v = find_npc_by_vnum(20084)
							if v != 0 then
									target.vid("__TARGET__", v, "Olejek Niebios")
							end
					end

			end
			when button or info begin
					if pc.count_item(71056) >0 then
							say_title("Wróć do Biologa!")
							say("")
							---												   l
							say("Zdobyłeś Olejek Niebios! ")
							say("Idz szybko przynieś go Biologowi.")
							say("")
							return
					end

					say_title("Olejek Niebios")
					say("")
					---												   l
					say("Zebrałeś juz odpowiednia ilość")
					say("Broszur Szermierki.")
					say("Musisz teraz znalezc Olejek Niebios ")
					say_item_vnum(71056)----------Żu¤`ĆFĆF»îĄŰ
					say("Olejek Niebios")
					say("można zdobyć zabiając Potwory z Niebiańskiej Groty")	
					say("Nie zawiedz Biologa!")
			end


			when 2411.kill or
					 2412.kill or
					 2413.kill or
					 2414.kill  begin
					local s = number(1, 50)
					if s == 1 and pc.count_item(71056)==0 then
							pc.give_item2(71056, 1)
							send_letter("Olejek Niebios")			  
					end	
			end




			when __TARGET__.target.click  or
					20084.chat." Olejek Niebios " with pc.count_item(71056) > 0  begin
				target.delete("__TARGET__")
					say("Biolog Chaegirab:")
					say("OH!! Zdobyłeś Go! ")
					say("Odnalazłeś Olejek Niebios")
					say("Ciesze się bardzo")
					say("Dziękuję Ci za pomoc")
					say("W zamian otrzymasz nagrode!")
					say("Idz do mojego mistrza Baek-Go")
					say("On za pomoc mi podaruje Ci cenną nagrode.")
					say("")
					pc.remove_item(71056,1)
					set_state(__reward)
			end

	end

	state __reward begin
			when letter begin
					send_letter("Odbierz nagrode!")

					local v = find_npc_by_vnum(20018)
					if v != 0 then
							target.vid("__TARGET__", v, "Baek-Go")
					end

			end
			when button or info begin
					say_title("Odbierz nagrode!")
					---												   l
					say("Udaj się do Baek-Goa")
					say("by otrzymac nagrode za")
					say("Twój ciezki trud...")
					say("Baek-Go znajduje się w pierwszej wiosce")
					say("Masz go na mapie. Spiesz się!")
					say("")
			end

			when __TARGET__.target.click  or
					20018.chat." Nagroda "  begin
				target.delete("__TARGET__")
					say("Baek-Go:")
					say("Drogi przyjacielu")
					say("Za Twój cięzki trud otrzymujesz")
					say("staly bon do obrony")
					say("Zostal on podniesiony o 100")
					say("")
					say_reward("Otrzymano 500.000.000 yang, oraz 20x Magiczny Metal")
					say_reward("Otrzymano bonus obrony")
					say_reward("Zostal on podniesiony o 215 ")
					say_reward("Tego bonusu nikt Ci nie odbierze oraz")
					say("")
					affect.add_collect(apply.DEF_GRADE_BONUS,215,60*60*24*365*60) -----ˇV60¦~	  

																			say("Wybierz sobie dodatkową nagrode w postaci")
																			say("Kamienia Dusz")
																			local s = select("Wojownika ", "Ninji", "Sury", "Szamana", "Obrony")

																			if 1 == s then
											pc.give_item2(28633, 1)
											say_reward("Otrzymano Kamień Duszy Wojownika +5")
																			elseif 2 == s then
																							pc.give_item2(28434, 1)
																							say_reward("Otrzymaano Kamień Duszy Ninja +5")
																			elseif 3 == s then
																							pc.give_item2(28435, 1)
																							say_reward("Otrzymaano Kamień Duszy Sury +5")
																			elseif 4 == s then
																							pc.give_item2(28436, 1)
																							say_reward("Otrzymaano Kamień Duszy Szamana +5")
																			elseif 5 == s then
																							pc.give_item2(28442, 1)
																							say_reward("Otrzymaano Kamień Duszy Obrony +5")
									end

																			pc.change_money(500000000)
																			pc.give_item2(25041, 20)

					clear_letter()
					set_quest_state("biolog80lv", "run")
					set_state(__complete)
			end

	end


	state __giveup__ begin
			when 20084.chat."Poddajesz sie?" begin
					say("Biolog Chaegirab:")
					say("Czy jestes pewien, że chcesz sie poddać!?")
					say("Nie bedziesz mial szansy, aby zacząć ponownie!")
					say("Ta misja Cie opusci...")
		 end
	 end
	state __complete begin
	end
end

Tylko że jeszcze nie dodałem biologa do gry na 80 chodzi mi o to

clear_letter()
					set_quest_state("biolog80lv", "run")
					set_state(__complete)
			end

	end

sherer · 15 Marca 2012

A DAŁ BY KTOŚ CHOCIAŻ WZÓR

Masz quest na konie:

quest konie begin
state start begin
when login or enter with horse.summon() begin
while true do
if pc.is_riding() then
if horse.get_level() <= 10 then
affect.add_collect(apply.MOV_SPEED, 20, 60*60*24*365*60)
elseif horse.get_level() > 10 and <= 20 then
affect.add_collect(apply.ATT_GRADE_BONUS, 80, 60*60*24*365*60)
elseif horse.get_level() > 20 and <= 30 then
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*24*365*60)
else
affect.remove_collect()
break
end
end
end
end
end
end

+ zmodyfikowany quest na przywolanie konia:

quest horse_summon begin
state start begin
function get_horse_summon_prob_pct()  local skill_level=pc.get_skill_level(131)  if skill_level==1 then   return 15  elseif skill_level==2 then   return 20  elseif skill_level==3 then   return 30  elseif skill_level==4 then   return 40  elseif skill_level==5 then   return 50  elseif skill_level==6 then   return 60  elseif skill_level==7 then   return 70  elseif skill_level==8 then   return 80  elseif skill_level==9 then   return 90  elseif skill_level>=10 then   return 100  end  return 10 end

when 20349.chat."Zgubilem ksiege" with horse.get_grade()==1 and pc.countitem("50051")<1 begin
say("A wiec zgubiles ksiege przywolania?")
say("Czy chcesz, abym stworzyl nastepna?")
local b=select("Tak", "Nie")
if 1==b then
if pc.money>=10000 then
pc.changemoney(-10000)
say("Udalo sie!")
say("Otrzymales ksiege!")
pc.give_item2("50051", 1)
else
say("Nie masz wystarczajaco duzo yang!")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Zgubilem ksiege" with horse.get_grade()==2 and pc.countitem("50052")<1 begin
say("A wiec zgubiles ksiege przywolania?")
say("Czy chcesz, abym stworzyl nastepna?")
local b=select("Tak", "Nie")
if 1==b then
if pc.money>=50000 then
pc.changemoney(-50000)
say("")
say("Otrzymales ksiege!")
pc.give_item2("50052", 1)
else
say("Nie masz wystarczajaco duzo yang!")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Zgubilem ksiege" with horse.get_grade()==3 and pc.countitem("50053")<1 begin
say("A wiec zgubiles ksiege przywolania?")
say("Czy chcesz, abym stworzyl nastepna?")
local b=select("Tak", "Nie")
if 1==b then
if pc.money>=100000 then
pc.changemoney(-100000)
say("")
say("Otrzymales ksiege!")
pc.give_item2("50053", 1)
else
say("Nie masz wystarczajaco duzo yang!")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 50051.use with horse.get_grade()==0 begin
say("Przywołanie konia jest nie możliwe.[ENTER]Nie posiadasz go!")
end
when 50051.use with horse.get_grade()==1 begin
if pc.getsp()>=100 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say("Koń został przywołany")
say("")
horse.summon()
affect.add_collect(apply.MOV_SPEED, 20, 60*60*24*365*60)
else
say("Przywołanie konia nie powiodło się.")
say("Spróbuj zwiększyć swoje umiejętności przywoływania [ENTER]konia.")
say("")
end
pc.change_sp(-100)
else
say("Przywołanie konia nie powiodło się.")
say("Brak wystarczającej ilości energii Chi")
say("")
end
end
when 50051.use with horse.get_grade()==2 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50051.use with horse.get_grade()==3 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50052.use with horse.get_grade()==0 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50052.use with horse.get_grade()==1 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50052.use with horse.get_grade()==2 begin
if pc.getsp()>=200 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say("Koń został przywołany")
say("")
horse.summon()
affect.add_collect(apply.ATT_GRADE_BONUS, 80, 60*60*24*365*60)
else
say("Przywołanie konia nie powiodło się.")
say("Spróbuj zwiększyć swoje umiejętności przywoływania [ENTER]konia.")
say("")
end
pc.change_sp(-200)
else
say("Przywołanie konia nie powiodło się.")
say("Brak wystarczającej ilości energii Chi")
say("")
end
end
when 50052.use with horse.get_grade()==3 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50053.use with horse.get_grade()==0 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50053.use with horse.get_grade()==1 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50053.use with horse.get_grade()==2 begin
say("Ta ksiega nie jest odpowiednia!")
end
when 50053.use with horse.get_grade()==3 begin
if pc.getsp()>=300 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say("Koń został przywołany")
say("")
horse.summon()
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*24*365*60)
else
say("Przywołanie konia nie powiodło się.")
say("Spróbuj zwiększyć swoje umiejętności przywoływania [ENTER]konia.")
say("")
end
pc.change_sp(-300)
else
say("Przywołanie konia nie powiodło się.")
say("Brak wystarczającej ilości energii Chi")
say("")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end

+ zmodyfikowany quest na menu konia:


quest horse_menu begin
state start begin
function horse_menu()
if horse.is_mine() then
say_title("Księga Konia:")
say("Księga, kóra pomoże Ci opanować konia.")
say("")
local s = 6
if horse.is_dead() then
s = select( "Wskrześ Konia", "Odwołaj Konia", "Zamknij")
if s == 1 then s = 0
elseif s == 2 then s = 3
elseif s == 3 then return
end
else
s = select(
"Nakarm Konia", "Wsiądź na Konia", "Odwołaj Konia", "Status Konia",
"Zmień nazwę konia", "Zamknij")
end
if s == 0 then
horse.revive()
elseif s == 1 then
local food = horse.get_grade() + 50054 - 1
if pc.countitem(food) > 0 then
pc.removeitem(food, 1)
horse.feed()
else
say("Nakarmiłeś konia przedmiotem: "..item_name(food)..".")
say("")
end
elseif s == 2 then
horse.ride()
elseif s == 3 then
horse.unsummon()
affect.remove_collect()
elseif s == 4 then
say_title("Status Konia:")
say("Aktualne punkty życia konia: "..horse.get_health_pct().."%")
say("Aktualna wytrzymałość konia: "..horse.get_stamina_pct().."%")
say("")
elseif s == 5 then
if pc.countitem("71110") <= 0 then
say("Potrzebujesz "..item_name("71110")..".")
say("")
return
end
local old_horse_name = horse.get_name() ;
say_title("Imię Konia")
say("Tutaj możesz podać swoją nową nazwę konia.")
say("Dzięki temu twój kon będzie unikalny!")
say("")
if string.len(old_horse_name) == 0 then
say_reward("Koń nie posiada nazwy!")
else
say_reward("Obecna nazwa konia to: "..old_horse_name..".")
end
say("")
say("Podaj nową nazwę konia:")
say("")
local horse_name = input()
if string.len(horse_name) < 2 then
say_title("Nazwa konia")
say("Nazwa jest zbyt krótka.")
say("")
return
elseif string.len(horse_name) > 12 then
say_title("Nazwa konia")
say("Nazwa jest zbyt długa.")
say("")
return
end
local ret = horse.set_name(horse_name)
say_title("Nazwa Konia:")
if ret == 0 then
say_reward("Nie posiadasz konia!")
say("")
elseif ret == 1 then
say_reward("Nie możesz używać takiej nazwy!")
say("")
elseif ret == 2 then
pc.remove_item("71110")
say("Twój koń otrzymał nową nazwę!")
say("")
end
end
end
end
when 20030.click begin horse_menu.horse_menu() end
when 20101.click begin horse_menu.horse_menu() end
when 20102.click begin horse_menu.horse_menu() end
when 20103.click begin horse_menu.horse_menu() end
when 20104.click begin horse_menu.horse_menu() end
when 20105.click begin horse_menu.horse_menu() end
when 20106.click begin horse_menu.horse_menu() end
when 20107.click begin horse_menu.horse_menu() end
when 20108.click begin horse_menu.horse_menu() end
when 20109.click begin horse_menu.horse_menu() end
end
end

maniek1310 · 15 Marca 2012

@Panth jak nie dodałeś tego do questu na niższy lvl od biologa

clear_letter()
set_quest_state("biolog80lv", "run")
set_state(__complete)
end

end

to musisz to dodać ponieważ teraz jak wgrałeś quest to on rozpoczyna się od state start a w tym quescie quest rozpoczyna się od state run

nfsfankp50098 · 15 Marca 2012

@Sherer

Mam pytanie muszę wszystkie te 3 questy dodawać czy tylko ten

quest konie begin
state start begin
when login or enter with horse.summon() begin
while true do
if pc.is_riding() then
if horse.get_level() <= 10 then
affect.add_collect(apply.MOV_SPEED, 20, 60*60*24*365*60)
elseif horse.get_level() > 10 and <= 20 then
affect.add_collect(apply.ATT_GRADE_BONUS, 80, 60*60*24*365*60)
elseif horse.get_level() > 20 and <= 30 then
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*24*365*60)
else
affect.remove_collect()
break
end
end
end
end
end
end

Panth · 15 Marca 2012

Witam może ktoś napisać questa takiego o :

Dialogi :

Po wbiciu 30 poziomu , ukazuje się liścik z nazwą : Przedmioty dla Seona I . Gdy to otworzymy to pisze : Seon Peyong prosi cię o pomoc . Udaj się do Mrocznej Doliny Orków ,i znajdź go na mapię , a następnie z nim porozmawiaj o szczegółach.

Gdy idziemy już ,i klikamy na Seon'a to zleca nam : Witaj Przybyszu z krainy Pantheons. Musisz mi pomóc w odnalezieniu drogocennych zębów orka które muszę zbadać , aby wytworzyć antidotum które pomoże wyleczyć chorego Biologa. Proszę przynieś mi 20 sztuk Zębów Orka. Twoja Nagroda będzie nieziemska , śpiesz się .

Gdy odejdziemy od Seona pokazuję sie znów liścik z tekstem : Musisz Wydropić 20 sztuk Zębów Orka dla Seon'a. Do Tej pory wydropiłeś : xx Zębów Orka

Poziom na którym dostajemy questa : 30

Czas Oddawania Przedmiotów : Musimy oddać mu wszystkie na raz (100% na oddanie wszystkich na raz)

Ilość Przedmiotów które musimy mu oddać : 20 sztuk Zębów Orka

Dialogi : W.W

Nagroda za wykonanie questa : 100.000.000 yang , Wartość Ataku 100 na zawszę

Nazwy Liścików Przed Pójściem do Seon'a : Przedmioty dla Seona I

Nazwy Liścików Po Odejściu od Seon'a : Przedmioty dla Seona I

ID Przedmiotu : 30006

ID Mobów (Niżej przeczytaj ważne) : 631 , 632 , 633 , 634 , 635

I teraz jak będzie wygodniej piszącemu : Może zrobić że w queście jest ustawiony drop Zębów z mobów na 0.45%(sam wpada do eq) , lub nie dodawać ale żeby działało że jak podniesiemy ząb orka podczas expienia to nam go zalicza.

W nagrodę dam 5 limitów lajków , oraz 5*

sherer · 15 Marca 2012

@Sherer

Mam pytanie muszę wszystkie te 3 questy dodawać czy tylko ten

quest konie begin
state start begin
when login or enter with horse.summon() begin
while true do
if pc.is_riding() then
if horse.get_level() <= 10 then
affect.add_collect(apply.MOV_SPEED, 20, 60*60*24*365*60)
elseif horse.get_level() > 10 and <= 20 then
affect.add_collect(apply.ATT_GRADE_BONUS, 80, 60*60*24*365*60)
elseif horse.get_level() > 20 and <= 30 then
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*24*365*60)
else
affect.remove_collect()
break
end
end
end
end
end
end

Dodajesz tylko ten 1, natomiast te 2 to modyfikujesz questy horse_summon i horse_menu

kopson44 · 15 Marca 2012

siema

jest może podobna funkcja do d.regen_file?

chce aby po kliknięciu na przedmiot odpalał się event

wszystko ładnie działa oprócz regenów.

@edit

event mi się ma odpalać w m1, resp jest ustawiony w pliku txt ale quest nie wczytuje tego pliku

da się odpalić ten plik txt jakąś funkcja?

czy trzeba ponad 50 mobów ustawiać przez

mob.spawn

nfsfankp50098 · 16 Marca 2012

@Sherer

Dodajesz tylko ten 1, natomiast te 2 to modyfikujesz questy horse_summon i horse_menu

Dobra już wiem ale ostatnie pytanie.

Co tam modyfikować?

na rzut oka wszystko jest ok dam edit czy działa.

pati9428 · 16 Marca 2012

Przerobi ktoś quest

http://wklej.to/MfNfS tak aby nie był on na czas ?

Z góry dzięki

nfsfankp50098 · 16 Marca 2012

Sherer dał mi 3 questy 2 z nich działają ale ten pierwszy nie chce

o to quest

quest konie begin
state start begin
when login or enter with horse.summon() begin
while true do
if pc.is_riding() then
if horse.get_level() <= 10 then
affect.add_collect(apply.MOV_SPEED, 20, 60*60*24*365*60)
elseif horse.get_level() > 10 and <= 20 then
affect.add_collect(apply.ATT_GRADE_BONUS, 80, 60*60*24*365*60)
elseif horse.get_level() > 20 and <= 30 then
affect.add_collect(apply.DEF_GRADE_BONUS, 100, 60*60*24*365*60)
else
affect.remove_collect()
break
end
end
end
end
end
end

a o to bląd

Uploaded with ImageShack.us

NAPRAWI KTOŚ

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany