Pisanie / Poprawa Questów !

[Sunushi]

Nudzę się ;d

[KRis215]

witam, napisał by mi ktoś questa który poinformuje że:

 

np

notice_all("Związek małżeński między x")
notice_all("a x został zawarty, Gratulujemy!!")
notice_all("Wszystkiego najlepszego na nowej drodze życia!") 

[Asti™]

Hmm gdy wgrywam questa nie ma błedu. Ale w grze nie działa.

Kiedyś jak wgrałem za pierwszym razem tego samego questa działał a teraz już nie ;/

Proszę

 

 

 

 

quest zabite_bosy begin
    state start begin
		    when 2307.kill begin
                       local nick = pc.get_name()

              				 local m_sex = pc.get_sex()

						    if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Wladce Duchów Drzew!")
                                       else
               notice_all( "Pani "..nick.." zabiła Wladce Duchów Drzew!")
                                       end
		    end
		    when 2206.kill begin
               local nick = pc.get_name()

               local m_sex = pc.get_sex()

               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Ognistego Króla!")
                                       else
               notice_all( "Pani "..nick.." zabiła Ognistego Króla!")
		    end
               end
		    when 1304.kill begin
               local nick = pc.get_name()

               local m_sex = pc.get_sex()

               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Zjawe Żółtego Tygrysa!")
               else
               notice_all( "Pani "..nick.." zabiła Zjawe Żółtego Tygrysa!")
		    end
               end
		    when 691.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Wodza Orków!")
               else
               notice_all( "Pani "..nick.." zabiła Wodza Orków!")
               end
		    end
		    when 1901.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Dziewięć Ogonów!")
               else
               notice_all( "Pani "..nick.." zabiła Dziewięć Ogonów!")
		    end
               end
		    when 1093.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Umarłego Rozpruwacza!")
               else
               notice_all( "Pani "..nick.." zabiła Umarłego Rozpruwacza!")
               end
		    end
		    when 1095.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Niebieską Smierć!")
               else
               notice_all( "Pani "..nick.. zabiła Niebieską Śmierć!")
               end
		    end
		    when 1191.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Lodową Wiedźme!")
               else
               notice_all( "Pani "..nick.." zabiła Lodową Wiedźme!")
		    end
               end
		    when 1192.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Silną Lodową Wiedzme!")
               else
               notice_all( "Pani "..nick.." zabiła Silną Lodową Wiedźme!")
               end
		    end
		    when 1091.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Króla Demonów!")
               else
               notice_all( "Pani "..nick.." zabiła Króla Demonów!")
               end
		    end
		    when 1092.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Elitarnego Króla Demonów!")
               else
               notice_all( "Pani "..nick.." zabiła Elitarnego Króla Demonów!")
               end
		    end
		    when 993.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
		    notice_all( "Pan "..nick.." zabił Olbrzymiego Nosiciel Plagi!")
               else
               notice_all( "Pani "..nick.." zabiła Olbrzymiego Nosiciela Plagi!")
               end
		    end
               when 692.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Elitarnego Wodza Orków!")
               else
               notice_all( "Pani "..nick.." zabiła Elitarnego Wodza Orków!")
               end
               end
               when 791.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Ezot. Przywoływacza!")
               else
               notice_all( "Pani "..nick.." zabiła Ezot. Przywoływacza!")
               end
               end
               when 1902.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Elit. 9 Ogonów!")
               else
               notice_all( "Pani "..nick.." zabiła Elit. 9 Ogonów!")
               end
               end
               when 2091.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.."  zabił Królową Pająków!")
               else
               notice_all( "Pani "..nick.." zabiła Królową Pająków!")
               end
               end
               when 2092.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_se == 0 then
               notice_all( "Pan "..nick.." zabił Króla Pająków!")
               else
               notice_all( "Pani "..nick.." zabiła Króla Pająków!")
               end
               end
               when 2191.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Olbrzymiego Żółwia!")
               else
               notice_all( "Pani "..nick.." zabiła Olbrzymiego Żółwia!")
               end
               end
               when 2306.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Olbrzymiego Ducha Drzewa!")
               else
               notice_all( "Pani "..nick.." zabiła Olbrzymiego Ducha Drzewa!")
               end
               end
               when 5161.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Skalistą Małpe!")
               else
               notice_all( "Pani "..nick.." zabiła Skalistą Małpe!")
               end
               end
               when 5162.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == 0 then
               notice_all( "Pan "..nick.." zabił Chodzącą Małpe!")
               else
               notice_all( "Pani "..nick.." zabiła Chodzącą Małpe!")
               end
               end
               when 2307.kill begin
               local nick = pc.get_name()
               local m_sex = pc.get_sex()
               if m_sex == o then
               notice_all( "Pan "..nick.." zabił Lorda Małp!")
               else
               notice_all( "Pani "..nick.." zabiła Lorda Małp!")
               end
               end
		    end
    end

 

 

 

[Sunushi]

witam, napisał by mi ktoś questa który poinformuje że:

 

np

notice_all("Związek małżeński między x")
notice_all("a x został zawarty, Gratulujemy!!")
notice_all("Wszystkiego najlepszego na nowej drodze życia!") 

 

Podeślij swój quest na ślub. marriage_manage.quest

 

Asti,

notice_all( "Pani "..nick.. zabiła Niebieską Śmierć!")

zamień na

notice_all( "Pani "..nick.." zabiła Niebieską Śmierć!")

[Asti™]

Sunshi dziękuje ;p teraz każde "when" się wczytuje

[Wlodziu]

kris podeslij swoj quest caly jak wroce z psem to go przerobie o ile sunushi mnie nie wyprzedzi

[kenet10]

Potrzebuje questa na pierscien teleportacji.

 

-Wszystkie expowiska.

-Miasta i miasteczka

-v1 od 75 lvl

-v2 od 90

-nowa mapa od 100 sam ustale kordy nazwa:Zombie

-nowa mapa od 115 sam ustale kordy nazwa:Zinki

-nowa mapa od 130 sam ustale kordy nazwa:Do ustalenia

-nowa mapa od 150 sam ustale kordy nazwa:Do ustalenia

-Komnata smoka od lvl 90 potrzebny 2 razy obsydian

[Rower1310]

Potrzebuje questa na pierscien teleportacji.

 

-Wszystkie expowiska.

-Miasta i miasteczka

-v1 od 75 lvl

-v2 od 90

-nowa mapa od 100 sam ustale kordy nazwa:Zombie

-nowa mapa od 115 sam ustale kordy nazwa:Zinki

-nowa mapa od 130 sam ustale kordy nazwa:Do ustalenia

-nowa mapa od 150 sam ustale kordy nazwa:Do ustalenia

-Komnata smoka od lvl 90 potrzebny 2 razy obsydian

v1 i v2 rozumiem że ci się rozchodzi o atlantydę tak ??

 

@edit już zrobiłem pozmieniaj sobie kordy

 

quest teleport begin
   state start begin
       when 80009.use begin
           say_title("Pierścień teleportacji")
           say("Witaj gdzie chcesz się przenieść ??")
           wait()
           local s = select("M1","M2","Expowiska cz.1","Expowiska cz.2","Inne","Wyjście")
           if s == 1 then
               local m1 = select("Shinsso","Chunjo","Jinno","Wyjście")
               if m1 == 1 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp(474300 , 954800)
               elseif m1 == 2 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 63800 , 166400 )
               elseif m1 == 3 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 959900 , 269200 )
               elseif m1 == 4 then
                   return
               end
           elseif s == 2 then
               local m2 = select("Shinsso","Chunjo","Jinno","Wyjście")
               if m2 == 1 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 353100 , 882900 )
               elseif m2 == 2 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 145500 , 240000 )
               elseif m2 == 3 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 863900 , 246000 )
               elseif m2 == 4 then
                   return
               end
           elseif s == 3 then
               local exp1 = select("Dolina Seungryong","Pustynia Yongbi","Góra Sohan","Loch Pająków v1","Wyjście")
               if exp1 == 1 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   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 exp1 == 2 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   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 exp1 == 3 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   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 exp1 == 4 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 60000 , 496000 )
               elseif exp1 == 5 then
                   return
               end
           elseif s == 4 then
               local exp2 = select("Loch Pająków v2","Atlantyda v1","Atlantyda v2","Wyjście")
               if exp2 == 1 then
                   say_title("Pierścień teleportacji")
                   say("Za chwilę zostaniesz przeniesiony do wskazanego")
                   say("miejsca. Uważaj na siebie.")
                   pc.warp( 704100 , 464100 )
               elseif exp2 == 2 then
                   if pc.get_level() >= 75 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( 9800 , 1215100 )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif exp2 == 3 then
                   if pc.get_level >= 90 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( 135200 , 1215100 )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif exp2 == 4 then
                   return
               end
           elseif s == 5 then
               local inne = select("Komnata Smoka (90 lvl)","Zombie (100 lvl)","Zinki (115 lvl)","Do ustalenia (130 lvl)","Do ustalenia (150 lvl)","Wyjście")
               if inne == 1 then
                   if pc.get_level >= 90 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( , )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif inne == 2 then
                   if pc.get_level >= 100 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( , )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif inne == 3 then
                   if pc.get_level >= 115 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( , )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif inne == 4 then
                   if pc.get_level >= 130 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( , )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif inne == 5 then
                   if pc.get_level >= 150 then
                       say_title("Pierścień teleportacji")
                       say("Za chwilę zostaniesz przeniesiony do wskazanego")
                       say("miejsca. Uważaj na siebie.")
                       pc.warp( , )
                   else
                       say("Nie masz odpowiedniego lvl, żeby się przenieść.")
                       return
                   end
               elseif inne == 6 then
                   return
               end
           elseif s == 6 then
               return
           end
       end
   end
end

 

[DevilxMetin]

Boże ! Proszę pomóżcie! Resetowałem all questy. I zapomniałem skopiować moich questach:(

Zrobiłem jak kiedyś questa i błąd wyskakuje

A jak pisałem 2h temu to wszystko działało

Treść questa:

 

quest make_herb_lv76  begin
	state start begin
			when login or levelup with pc.get_level() ==76  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, "Biolog")
					end
					send_letter("Analiza Biologa 76lvl")
			end

			when button or info begin
					say_title("Analiza Biologa")
					say("Biolog Chaegirab, uczen Uriela,")
					say("wlasnie Cie szukal. Prosze idz")
					say("do niego i zaoferuj swoja pomoc")
			end

			when __TARGET__.target.click or
					20084.chat."Rozmowa z Biologiem" begin
					target.delete("__TARGET__")
					say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
					---												   l
					say("Witaj, Jestem Biologiem.")
					say("Badam wszystkie rodzaje kamieni oraz innych rzeczy")
					say("W całym imerium.")
					say("Proszę pomóż mi.")
					wait()
					say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
					say("Aktualnie badam Szlachetne Kamienie")
					say("Muszę przeprowadzić eksperymenty")
					say("Na nich.")
					say("Czy przyniesiesz mi 5 takich Kamieni?")
					say("Proszę. Tylo przynoś mi po jednym abym miał czas na ich zbadanie.")
					say("Dziękuje. Z góry.")
		   say("Pozdrawiam Biolog Chaegirab")
					set_state(go_to_disciple)
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
			end
	end

	state go_to_disciple begin
			when letter begin
					send_letter("Szlachetne Kamienie 76lvl")

			end
			when button or info begin
					say_title("Zdobądź Szlachetne Kamienie")
					---												   l
					say("Biolog Chaegirab uczy się u Uriela")
					say("Potrzebne mu teraz")
					say("Szlachetne Kamienie. Ale pamiętaj")
					say("On dopiero się uczy przynoś mu po jednym Kamieniu")
					say("Aby miał czas na ich zbadanie.")
		   say("Te Kamienie wyglądają tak:")
					say_item_vnum(30254)
					say_reward("Przyniosłeś już ".." "..pc.getqf("collect_count").." Szlachetnych Kamieni.")
					say("")
			end

			when 71035.use begin --˘Xgˇ¦b?A?o

					if pc.getqf("drink_drug")==1 then
							say("")
							say("?wˇMgˇL??I?F1|ˇM")
							say("")

							return
					end
					if pc.count_item(30254)==0 then
							say("Biolog Chaegirab:")
							say("Prosze, zdobadz dla mnie te Kamienie!")
							say("To jest naprawde bardzo wazne dla mnie!")
							say("")
							return
					end
					item.remove()  
					pc.setqf("drink_drug",1)
			end


			when 117.kill begin
					if pc.count_item(30254)<5- pc.getqf("collect_count")then
							pc.give_item2(30254, 1)
					end
			end

	when 20084.chat."Szlachetny Kamień" with pc.count_item(30254) >0   begin
							say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)
							---												   l
							say("O jak fajnie! Masz już jeden Kamień Dla mnie.")
							say("Pozwól rzucę okiem.")
							say("Jeszcze sekundka")
							say("")
							pc.remove_item(30254, 1)
							wait()

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

							local s= number(1,100)
							if s<= pass_percent  then
							   if pc.getqf("collect_count")< 4 then	 --5-O?H?U
											local index =pc.getqf("collect_count")+1
											pc.setqf("collect_count",index)
											say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)
											say("Jupi. Ten Kamień nie jest uszkodzony =) ")
											say("Dostarcz mi jeszcze".." "..5-pc.getqf("collect_count").. " Szlachetnych Kamieni!")
											say("Proszę poszukaj jeszcze.")
											say("")
											pc.setqf("drink_drug",0)		 --?A?o??cl??
											return
									end
									say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
									say_reward("O jak fajnie. Dostarczyłeś mi już")
									say_reward("wszystkie Kamienie.")
									say("Biolog w nagrodę dał Ci")
									say_reward("20.000.000 PD")
									say_reward("30.000.000 PLN")	
									say_reward("Zwój Przywołania Bossa")

									pc.setqf("collect_count",index)
									pc.setqf("drink_drug",0)		

									clear_letter()
									set_state(__complete)

									pc.give_item2(71043)
									pc.change_money(30000000)
									pc.give_exp2(20000000)
									set_quest_state("levelup","run")


									return
							else															
							say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
							say("Ahhhh ;P")
							say("Ten Kamień jest uszkodzony =( .")
							say("Dostarcz mi następny....")
							say("")
							pc.setqf("drink_drug",0)		 --?A?o??cl??
							return
							end

	end
end



	state __complete begin
	end
end

 

[Kusicielka]

Może ktoś mi napisać w tym temacie questa zeby na start dostawać 50lvl i eq na 50lvl + zbroja na 54 i 61, tarcza 61, 40 buty 61 54 itp.

[Rower1310]

@DevilxMetin nie może być na końcu znaku polskiego, miałeś dwa takie błędy

say_reward("O jak fajnie. Dostarczyłeś mi już")
when 20084.chat."Szlachetny Kamień" with pc.count_item(30254) > 0 begin

 

Masz tutaj poprawiony kod

 

quest make_herb_lv76  begin
   state start begin
       when login or levelup with pc.get_level() == 76  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, "Biolog")
           end
           send_letter("Analiza Biologa 76lvl")
       end

       when button or info begin
           say_title("Analiza Biologa")
           say("Biolog Chaegirab, uczen Uriela,")
           say("wlasnie Cie szukal. Prosze idz")
           say("do niego i zaoferuj swoja pomoc")
       end

       when __TARGET__.target.click or 20084.chat."Rozmowa z Biologiem" begin
           target.delete("__TARGET__")
           say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)
           say("Witaj, Jestem Biologiem.")
           say("Badam wszystkie rodzaje kamieni oraz innych rzeczy")
           say("W całym imerium.")
           say("Proszę pomóż mi.")
           wait()
           say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
           say("Aktualnie badam Szlachetne Kamienie")
           say("Muszę przeprowadzić eksperymenty")
           say("Na nich.")
           say("Czy przyniesiesz mi 5 takich Kamieni?")
           say("Proszę. Tylo przynoś mi po jednym abym miał czas na ich zbadanie.")
           say("Dziękuje. Z góry.")
           say("Pozdrawiam Biolog Chaegirab")
           set_state(go_to_disciple)
           pc.setqf("collect_count",0)
           pc.setqf("drink_drug",0)
       end
   end

   state go_to_disciple begin
       when letter begin
           send_letter("Szlachetne Kamienie 76lvl")
       end

       when button or info begin
           say_title("Zdobądź Szlachetne Kamienie")
           say("Biolog Chaegirab uczy się u Uriela")
           say("Potrzebne mu teraz")
           say("Szlachetne Kamienie. Ale pamiętaj")
           say("On dopiero się uczy przynoś mu po jednym Kamieniu")
           say("Aby miał czas na ich zbadanie.")
           say("Te Kamienie wyglądają tak:")
           say_item_vnum(30254)
           say_reward("Przyniosłeś już ".." "..pc.getqf("collect_count").." Szlachetnych Kamieni.")
           say("")
       end

       when 71035.use begin --˘Xgˇ¦b?A?o
           if pc.getqf("drink_drug") == 1 then
               say("")
               say("?wˇMgˇL??I?F1|ˇM")
               say("")
               return
           end
           if pc.count_item(30254) == 0 then
               say("Biolog Chaegirab:")
               say("Prosze, zdobadz dla mnie te Kamienie!")
               say("To jest naprawde bardzo wazne dla mnie!")
               say("")
               return
           end
           item.remove()  
           pc.setqf("drink_drug",1)
       end

       when 117.kill begin
           if pc.count_item(30254) < 5 - pc.getqf("collect_count")then
               pc.give_item2(30254, 1)
           end
       end

       when 20084.chat."Szlachetny Kamień " with pc.count_item(30254) > 0 begin
           say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)
           say("O jak fajnie! Masz już jeden Kamień Dla mnie.")
           say("Pozwól rzucę okiem.")
           say("Jeszcze sekundka")
           say("")
           pc.remove_item(30254, 1)
           wait()
           local pass_percent
           if pc.getqf("drink_drug")==0 then
               pass_percent=90
           else				    
               pass_percent=100
           end

           local s= number(1,100)
           if s<= pass_percent  then
               if pc.getqf("collect_count")< 4 then  --5-O?H?U
                   local index =pc.getqf("collect_count")+1
                   pc.setqf("collect_count",index)
                   say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)
                   say("Jupi. Ten Kamień nie jest uszkodzony =) ")
                   say("Dostarcz mi jeszcze".." "..5-pc.getqf("collect_count").. " Szlachetnych Kamieni!")
                   say("Proszę poszukaj jeszcze.")
                   say("")
                   pc.setqf("drink_drug",0)				 --?A?o??cl??
                   return
               end
               say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
               say_reward("O jak fajnie. Dostarczyłeś mi już ")
               say_reward("wszystkie Kamienie.")
               say("Biolog w nagrodę dał Ci")
               say_reward("20.000.000 PD")
               say_reward("30.000.000 PLN")    
               say_reward("Zwój Przywołania Bossa")
               pc.setqf("collect_count",index)
               pc.setqf("drink_drug",0)			    
               clear_letter()
               set_state(__complete)
               pc.give_item2(71043)
               pc.change_money(30000000)
               pc.give_exp2(20000000)
               set_quest_state("levelup","run")
               return
           else																												    
               say(locale.NOTICE_COLOR.."Biolog Chaegirab:"..locale.NORMAL_COLOR)  
               say("Ahhhh ;P")
               say("Ten Kamień jest uszkodzony =( .")
               say("Dostarcz mi następny....")
               say("")
               pc.setqf("drink_drug",0)				 --?A?o??cl??
               return
           end

       end
   end

   state __complete begin
   end
end

 

[DevilxMetin]

Tzn. Nie rozumiem 2 polskie znaki ?

[Sunushi]

Może ktoś mi napisać w tym temacie questa zeby na start dostawać 50lvl i eq na 50lvl + zbroja na 54 i 61, tarcza 61, 40 buty 61 54 itp.

Już piszę.

[adm]

Podeślij swój quest na ślub. marriage_manage.quest

 

Asti,

notice_all( "Pani "..nick.. zabiła Niebieską Śmierć!")

zamień na

notice_all( "Pani "..nick.." zabiła Niebieską Śmierć!")

 

 

 

quest marriage_manage begin
state start begin
when oldwoman.chat."Chcę wziąć Ślub " with not pc.is_engaged_or_married() begin
if not npc.lock() then
say("Nie wiem1")
say("")
return
end
if pc.level < 25 then
say_title("Starsza Pani:")
say("Jesteś za młody aby wziąć ślub... ")
say("Nie jesteś jeszcze gotów. Młodzi ludzie bardzo")
say("szybko się rozwodzą. Nie popieram tego.")
say("Wróć gdy bedziesz miał więcej doświadczenia.")
say_title("Informacja:")
say_reward("Śluby są możliwe od poziomu 25.")
say("")
npc.unlock()
return
end

local m_ring_num = pc.countitem(70301)
local m_has_ring = m_ring_num > 0
if not m_has_ring then
say_title("Starsza Pani:")
say("Co? Chcesz wziąć Ślub bez Obrączki? ")
say("")
say_item("Pierścionek Zaręczynowy", 70301, "")
say("Muszis zdobyć Pierścionek Zaręczynowy. ")
say("Dopiero wtedy będziesz mógł wziąć Ślub. ")
npc.unlock()

return
end

local m_sex = pc.get_sex()
if not marriage_manage.is_equip_wedding_dress() then
say_title("Starsza Pani:")
say("Nie masz jeszcze odpowiedniego odzienia?")
say("Musisz je zdobyc!")
say("")

if m_sex==0 then
say_item("Smoking", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Mozesz go kupic od wedrujacego domokrazcy!")
say_reward("Lub od innych graczy!")
else
say_item("Suknia Slubna", marriage_manage.get_wedding_dress(pc.get_job()), "")
say_reward("Mozesz ja kupic od wedrujacego domokrazcy!")
say_reward("Lub od innych graczy!")
end
say("")
npc.unlock()
return
end

local NEED_MONEY = 1000000
if pc.get_money() < NEED_MONEY then
say_title("Starsza Pani:")
say("Co? Czy Ty myslales, ze slub nie kosztuje?")
say("Przeciez Ja tez musze z czegos zyc!")
say("")
say("")
say("")
say_reward(string.format("Potrzebujesz %d yang", NEED_MONEY/10000))
say("")
npc.unlock()
return
end

say_title("Starsza Pani:")
say("Jesli chcesz wziasc slub musisz")
say("wpisac imie swojego partnera!")
say("")
say_reward("Wpisz je ponizej!")

local sname = input()
if sname == "" then
say_title("Starsza Pani:")
say("Czy nie znasz imienia swojego partnera?")
say("")
npc.unlock()
return
end

local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()
if u_vid == 0 then
say_title("Starsza Pani:")
say("Takiej osoby nie ma...")
say("Czyzbys zapomnial imienia swojego partnera?")
say("")
say_reward(string.format("Imienia takiego jak %s nie ma!", sname))
say("")
npc.unlock()
return
end

if not npc.is_near_vid(u_vid, 10) then
say_title("Starsza Pani:")
say("Twoj partner musi tutaj podejsc!")
say("Przeciez nie bede was swatala w ciemno...")
say("")
say("")
say_reward(string.format("%s musi tutaj podejsc!", sname))
say("")
npc.unlock()
return
end

local old = pc.select(u_vid)
local u_level = pc.get_level()
local u_job = pc.get_job()
local u_sex = pc.get_sex()
local u_name = pc.name
local u_gold = pc.get_money()
local u_married = pc.is_married()
local u_has_ring = pc.countitem(70301) > 0
local u_wear = marriage_manage.is_equip_wedding_dress()
pc.select(old)
local m_level = pc.get_level()

if u_vid == m_vid then
say_title("Starsza Pani:")
say("Czy ty oszalales?")
say("Nie mozesz wziac slubu samemu ze soba!")
say_reward("")
say("")
npc.unlock()
return
end

if u_sex == m_sex then
say_title("Starsza Pani:")
say("Czy ty oszalales?")
say("Slubu nie mozesz wziac z osoba tej[ENTER]samej plci!")
say_reward("")
say("")
npc.unlock()
return
end

if u_married then
say_title("Starsza Pani:")
say("Co?")
say("Przeciez osoba, z ktora chcesz sie")
say("ozenic juz jest zonata.")
say("")
say_reward(string.format("%s jest zonata!", sname))
say("")
npc.unlock()
return
end

if u_level < 25 then
say_title("Starsza Pani:")
say("Twoj partner musi miec 25 poziom")
say("abys mogl zawrzec z nim zwiazek")
say("malzenski!")
say_reward("")
say("")
npc.unlock()
return
end

if m_level - u_level > 15 or u_level - m_level > 15 then
say_title("Starsza Pani:")
say("Co!?")
say("")
say("Roznica miedzy waszymi poziomami")
say("nie moze przekroczyc 15 poziomow!")
say_reward("")
say("")
npc.unlock()
return
end

if not u_has_ring then
if m_ring_num >= 2 then
say_title("Starsza Pani:")
say("Twoj partner nie ma")
say("pierscionku zareczynowego!")
else
say_title("Starsza Pani:")
say("Twoj partner nie ma")
say("pierscionku zareczynowego!")
say("")
end

say_item("Pierscionek zareczynowy", 70301, "")
say_reward("Mozesz go zdobyc")
say_reward("w jednej z moich misji!")
say("")
npc.unlock()
return
end

if not u_wear then
say_title("Starsza Pani:")
say("±zŞşąď¶HÁ٨S¦ł·ÇłĆ, ±zŞşµ˛±BĄ˛¶·Şş¦çŞAÁ٨S¦ł·ÇłĆ")
say("¦pŞGĄu¦ł±z¤@­Ó¤H¬ď¤Fµ˛±B¸Ë")
say("±z·|¤Ł¦n·N«äŞş")
say("")
if u_sex==0 then
say_item("§ŞA", marriage_manage.get_wedding_dress(u_job), "")
say_reward("¬°¤Fµ˛±B, Ą˛¶·¬ďµŰ")
say_reward("§ŞA")
else
say_item("±BŻ˝", marriage_manage.get_wedding_dress(u_job), "")
say_reward("¬°¤Fµ˛±B, Ą˛¶·¬ďµŰ")
say_reward("±BŻ˝")
end
say("")
npc.unlock()
return
end


local ok_sign = confirm(  u_vid, "Czy chcesz zawrzec slub z: "..pc.name.. "", 30)
if ok_sign == CONFIRM_OK then
local m_name = pc.name
if pc.get_gold()>=NEED_MONEY then
pc.change_gold(-NEED_MONEY)

pc.removeitem(70301, 1)
pc.give_item2(70302, 1)
local old = pc.select(u_vid)
pc.removeitem(70301, 1)
pc.give_item2(70302, 1)
pc.select(old)

say_title("Starsza Pani:")
say("Zaakceptowales slub!")
say("Zostaniesz przeniesiony do specjalnej")
say("lokacji!")
say("")
say_reward("Wcisnij kontynuuj!")
say("")
wait()
setskin(NOWINDOW)
marriage.engage_to(u_vid)
end
else
say_title("Starsza Pani:")
say("±zŞşąď¶H¤Ł·Q¸ň±zµ˛±B.")
say("±z¸ňĄL¦n¦n˝Í˝Í§a.")
say("")
say_reward("ąď¶H©Úµ´¸ň±zµ˛±B")
end
say("")
npc.unlock()
end
-- ?? ???? ???? ??? ??

when oldwoman.chat."Wejdz na moj slub" with pc.is_engaged() begin
say_title("Starsza Pani:")
say("Co? Zgubiles sie!?")
say("Pozwol, ze ci pomoge...")
say("")
wait()
setskin(NOWINDOW)
marriage.warp_to_my_marriage_map()
end


when 9011.chat."Rozpocznij slub" with pc.is_engaged() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title("Helen:")
say("Czyzbys sie zgubil?")
say("")
return
end
say_title("Helen:")
say("Hmm, nowozency...")
say("")
say("Wpisz tutaj imie swojego partnera!")
say("")

local sname = input()
local u_vid = find_pc_by_name(sname)
local m_vid = pc.get_vid()

if u_vid == 0 then
say_title("Helen:")
say("Twojego partnera nie ma")
say("kolo ciebie!")
say("")
say_reward(string.format("%s musi tutaj przyjsc!", sname))
say("")
npc.unlock()
return
end

if not npc.is_near_vid(u_vid, 10) then
say_title("Helen:")
say("Twoj partner stoi zbyt daleko od Ciebie!")
say("")
say("")
say("")
say_reward(string.format("Zawolaj %s aby tu przyszedl/szla.", sname))
say("")
npc.unlock()
return
end

if u_vid == m_vid then
say_title("Helen:")
say("Chyba nie chcesz wziasc slubu sam ze soba?")
say("")
say_reward("")
say("")
npc.unlock()
return
end

if u_vid != marriage.find_married_vid() then
say_title("Helen:")
say("Partner musi potwierdzic")
say("slub!")
say("")
npc.unlock()
return
end

local ok_sign = confirm(u_vid, ""..pc.name.. " akceptuj?", 30)
if ok_sign != CONFIRM_OK then
say_title("Helen:")
say("[DELAY value;500].....[/DELAY]")
say("Od teraz jestescie mezem i zona!")
say("")
npc.unlock()
return
end
say_title("Helen:")
say("Zaakceptowaliscie zwiazek malzenski!")
say("")
marriage.set_to_marriage()

-- 2005.04.12.??? ?? ?? ??
-----------------------------------------------
say("Otrzymaliscie prezenty!")
marriage_manage.give_wedding_gift()
old = pc.select(u_vid)
marriage_manage.give_wedding_gift()
pc.select(old) 
say("")
say("")
npc.unlock()
end

function give_wedding_gift()
local male_item = {71072, 71073, 71074}
local female_item = {71069, 71070, 71071} 
if pc.get_sex() == MALE then
pc.give_item2(male_item[number(1, 3)], 1)
else
pc.give_item2(female_item[number(1, 3)], 1)
end
end

-- ??? ???? ?? ????? ?? ??
-- ?? pc.is_married() and marriage.in_my_wedding()

-- ??? ?? ??? ??? ?? ????
when 9011.chat."Wlacz melodie" with 
(pc.is_engaged() or pc.is_married()) and 
marriage.in_my_wedding() and
not marriage.wedding_is_playing_music() begin
marriage.wedding_music(true, "wedding_day.mp3")
setskin(NOWINDOW)
end
when 9011.chat."Wylacz melodie" with 
(pc.is_engaged() or pc.is_married()) and 
marriage.in_my_wedding() and
marriage.wedding_is_playing_music() begin
marriage.wedding_music(false, "default")
setskin(NOWINDOW)
end
when 9011.chat."Noc" with 
pc.is_married() and 
marriage.in_my_wedding() begin
marriage.wedding_dark(true)
setskin(NOWINDOW)
end

when 9011.chat."Zakoncz slub" with pc.is_married() and marriage.in_my_wedding() begin
if not npc.lock() then
say_title("Helen:")
say("Czyzbys sie zgubil?")
say("")
return
end

say_title("Helen:")
say("Zakonczyc slub?")
say("")
local s = select("Tak","Nie")
if s == 1 then
local u_vid = marriage.find_married_vid()
if u_vid == 0 then
say_title("Helen:")
say("Twojego partnera nie ma")
say("kolo ciebie!")
npc.unlock()
return
end
say_title("Helen:")
say("Oczekiwanie na akceptacje")
say("partnera.")
say("")
local ok_sign = confirm(u_vid, "Akceptuj?", 30)
if ok_sign == CONFIRM_OK then
marriage.end_wedding() -- ??? ???? ??? ??.
else
say_title("Helen:")
say("...")
say("")
end

end

npc.unlock()
end

-- ??? ???? ???? ??? ??
when  11000.chat."Rozwiedz sie" or
11002.chat." Rozwiedz sie" or
11004.chat." Rozwiedz sie" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

local u_vid = marriage.find_married_vid()
if u_vid == 0 or not npc.is_near_vid(u_vid, 10) then
say("ľÔ»î:")
say("±z¨S¦łąď¶HŞş¸Ü, µLŞkÂ÷±B")
say("Â÷±B¬O«ÜÄY­«Şş¨Ć±ˇ")
say("±z­ĚĄ˛¶·¦P®ÉąL¨Ó")
say("")
return
end

say("ľÔ»î:")
say("Rozwiedz sieŞş®É­Ô»Ý­n50¸U.")
say("Á٦ł»Ý­nąď¶HŞş¦P·N.")
say("±z·QRozwiedz sie¶Ü?")
say("")

local MONEY_NEED_FOR_ONE = 500000
local s = select("Tak", "Nie")

if s == 1 then
local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local m_have_ring = pc.countitem(70302) > 0

local old = pc.select(u_vid)
local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local u_have_ring = pc.countitem(70302) > 0
pc.select(old)

if not m_have_ring then
say("Nie posiadasz juz obraczki!")
return;
end
if not u_have_ring then
say("Twoj partner nie posiada juz obraczki!")
return;
end

if not m_enough_money then
say("Straznik:")
say("Nie posiadasz wystarczajaco yang!")
say("")
say_reward(string.format("Potrzebujesz: ", MONEY_NEED_FOR_ONE/10000, " yang!"))
say("")
return;
end
if not u_enough_money then
say("Straznik:")
say("Twoj partner nie posiada wystarczajaco yang!")
say("")
say_reward("Potrzebuje: 500.000 yang!")
say("")
return;
end

say("Czy jestes pewien, ze")
say("chcesz usunac pierscien?")
say("")
say("")

local c=select("Tak", "Nie")
if 2 == c then
say_pc_name()
say("Nie marnuj mojego czasu!")
say("")
return
end

local ok_sign = confirm(u_vid, pc.name.."Akceptowac?", 30)
if ok_sign == CONFIRM_OK then

local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local m_have_ring = pc.countitem(70302) > 0

local old = pc.select(u_vid)
local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE
local u_have_ring = pc.countitem(70302) > 0
pc.select(old)

if m_have_ring and m_enough_money and u_have_ring and u_enough_money then
pc.removeitem(70302, 1)
pc.change_money(-MONEY_NEED_FOR_ONE)

local old = pc.select(u_vid)
pc.removeitem(70302, 1)
pc.change_money(-MONEY_NEED_FOR_ONE)
pc.select(old)

say("ľÔ»î:")
say("Â÷±B¦¨Ą\¤F.")
say("˛{¦b±z­Ě¤w¸g¦¨Ą\Â÷±B¤F.")
say("±z­Ě2­Ó¤H¤ŁłßĹwąď¤č, §Ú¤]¨S¦łżěŞk.")
say("")
say_reward("Â÷±B¦¨Ą\¤F")
say("")
marriage.remove()
else
say("ľÔ»î:")
say("Â÷±Bł~¤¤µoĄÍżů»~, µLŞkÂ÷±B")
say("¤U¦¸¦A¨Ó§a")
say("")
say_reward("Â÷±B¨ú®ř¤F.")
say("")
end
else
say("ľÔ»î:")
say("ąď¤č¤Ł¦P·N¸ň±zÂ÷±B")
say("±z­ĚĄý¦A°Ó¶q¤@¤U¦AąL¨Ó§a")
say("")
say_reward("Â÷±B¤w¸g¨ú®ř.")
say("")
end
end
end

when  11000.chat."Pierscionek" or
11002.chat." Pierscionek" or
11004.chat." Pierscionek" with 
not pc.is_married()  and 
pc.count_item(70302)>0
begin
say("Straznik:")
say("Pierscien zostal usuniety!")
say("")
pc.remove_item(70302)
end

when  11000.chat." łć¤čÂ÷±B" or
11002.chat." łć¤čÂ÷±B" or
11004.chat." łć¤čÂ÷±B" with pc.is_married() begin

if not marriage_manage.check_divorce_time() then
return
end

say("ľÔ»î:")
say("±z·Qłć¤č­±´ŁĄXÂ÷±B, »Ý­nĄIĄX100¸U¨â")
say("±z·Q¸ň˛{¦bŞş¦ń«QÂ÷±B¶Ü?")
say("")

local s = select("¬OŞş.", "¤Ł¬O.")

local NEED_MONEY = 1000000
if s == 2 then
return
end

if pc.money < NEED_MONEY then
say("ľÔ»î:")
say("±zŞşŞ÷żú¤Ł¨¬")
say("Â÷±B¸ňµ˛±B¤@ĽË, »Ý­n¤j¶qŞşŞ÷żú")
say("±z¦n¦n¦ŇĽ{¤@¤U¦A¨Ó§a")
say("")
return
end

say("ľÔ»î:")
say("±zŻuŞş»Ý­nÂ÷±B¶Ü? ±zÁ٬O¦n¦n¦ŇĽ{¤@¤U§a")
local c = select("¬OŞş,§Ú­nÂ÷±B.", "¤Ł¬O, §Ú¦ŇĽ{¤@¤U.")

if c == 2 then
say("ľÔ»î:")
say("»Ý­n¦ŇĽ{ło¬O¦nŞş, ±z¦n¦n¨É¨ü±z­ĚŞşĄÍ¬ˇ§a.")
say("¨C¤@­Ó¤HŞş·QŞkłŁ¤Ł¤@ĽË")
say("¦ł®É­Ô·|¤Ł¤Ó¦XľA, ¦ý¬O±z­Ě§V¤OŞş¸ÜŔł¸Ó·|¦ł¦nŞşµ˛ŞG.")
say("")
say_reward("łć¤čÂ÷±B¨ú®ř¤F")
say("")
return
end

pc.removeitem(70302, 1)
pc.change_gold(-NEED_MONEY)

marriage.remove()

say("ľÔ»î:")
say("¬JµM±z­Ěło»ň¤ŁłßĹwąď¤č, ¨ş±z­ĚÁ٬OÂ÷±B§a.")
say("˛{¦b±z¤w¸g¬Ołć¨­, §Ú§Ć±ć±z·|Ĺܱo¶}¤ß¨Ç.")
say("")
say_reward("łć¤čÂ÷±B¦¨Ą\¤F.")
say("")
end

-- ??? ?? ??
when oldwoman.chat."Lista ceremonii Ślubnych" with not pc.is_engaged() begin
local t = marriage.get_wedding_list()
if table.getn(t) == 0 then
                           say_title("Starsza Pani:")
say("Aktualnie nie odbywają się żadne ceremonie[ENTER]Ślubne. ")
say("")
else
-- chat(table.getn(t))
local wedding_names = {}
table.foreachi(t, function(n, p) wedding_names[n] = p[3].." zeni sie z: "..p[4].."" end)
wedding_names[table.getn(t)+1] = locale.confirm
local s = select_table(wedding_names)

if s != table.getn(wedding_names) then
marriage.join_wedding(t[s][1], t[s][2])
end
end
end
when 9011.click with not pc.is_engaged() and not pc.is_married() begin
say_title("Helen:")
say("To nie twoj slub! Jestes gosciem!")
say("Baw sie dobrze!")
say("")
end

function check_divorce_time()

local DIVORCE_LIMIT_TIME = 86400

if is_test_server() then
DIVORCE_LIMIT_TIME = 60
end

if marriage.get_married_time() < DIVORCE_LIMIT_TIME then 
say("ľÔ»î:")
say("±z­Ě¤~­č­čµ˛±B´N­nÂ÷±B!!!")
say("±z­ĚÁ٬O¦n¦n¦ŇĽ{˛M·ˇ§a")
say("")
return false
end

return true
end

-- ?? ??? ?? ???? ??? ??
-- ?? ?? : pc.is_engaged_or_married()
function is_equip_wedding_dress()
local a = pc.get_armor()
return a >= 11901 and a <= 11904
end
function get_wedding_dress(pc_job)
if 0==pc_job then
return 11901
elseif 1==pc_job then
return 11903
elseif 2==pc_job then
return 11902
elseif 3==pc_job then
return 11904
else
return 0;
end
end
end
end

 

[Sunushi]

adm, znajdź w swoim queście marriage.set_to_marriage(). Kliknij po tym enter i wprowadź takie coś:

notice_all(pc.get_name().." i "..sname.." zawarli związek małeżeński!")

Jeśli nie zadziała to pisz

[Kusicielka]

Sunshi... miałeś napisać ..

[Rower1310]

@Kusicielka już ci napisałem pozmieniaj sobie id itemów

 

 

quest na_start begin
state start begin
	when letter begin
		send_letter("Eq na start")
	end

	when button or info begin
		say_title("Eq na start")
		pc.give_exp2(155497600)
		say("Wybierz jaką chcesz dostać tarczę??")
		local s = select("Sokola Tarcza","Buddyjska Tarcza Tygrysa","Lwia Tarcza","Tarcza Smoka")
		if s == 1 then
			pc.give_item(13069)
		elseif s == 2 then
			pc.give_item(13089)
		elseif s == 3 then
			pc.give_item(13109)
		elseif s == 4 then
			pc.give_item(13129)
		end
		pc.give_item(13049)
		pc.give_item(14149)
		pc.give_item(15209)
		pc.give_item(16149)
		pc.give_item(17149)
		if pc.job == 0 then -- Wojownik
			pc.give_item(12249)
			pc.give_item(11279)
			pc.give_item(11289)
			say("Wolisz RIBA czy FMSA")
			local ss = select("RIB","FMS")
			if ss == 1 then
				pc.give_item(3219)
			elseif ss == 2 then
				pc.give_item(299)
			end
		elseif pc.job == 1 then -- Ninja
			pc.give_item(12389)
			pc.give_item(11479)
			pc.give_item(11489)
			pc.give_item(299)
		elseif pc.job == 2 then -- Sura
			pc.give_item(12529)
			pc.give_item(11679)
			pc.give_item(11689)
			pc.give_item(299)
		elseif pc.job == 3 then -- Szaman
			pc.give_item(12669)
			pc.give_item(11879)
			pc.give_item(11889)
			pc.give_item(5339)
		end
   	 set_state(koniec)
	end
end

state koniec begin

end
end

 

@edit poprawiłem bo zapomniałem o state koniec

[DevilxMetin]

Po tym co widzę Sunshi... Umiesz pisać questy

A umiesz na pisać takie coś?

test awansował z poziomu 88 na poziom 89

test osiągną 90 poziom

[Rower1310]

@Pan RiV masz tutaj quest

 

 

quest staruszka begin
state start begin
	when 9006.chat."Chciałbym otrzymać umiejętność !" begin
		say_title ("Staruszka:")
		say ("")
		say ("Witaj !")
		say ("Posiadam tajemniczą moc dawania umiejętności.")
		say ("Mogę ci dać wszystkie umiejętności na poziom G, wystarczy że mi zapłacisz.")
		say_reward ("Kosz wszystkich umiejętności: 25.000.000 Yang.")
		say_title ("Czy chcesz tego ?")
		local s = select("Tak !", "Pffe, czarodziejka za pięć zeta.")
		if s == 1 then
			if pc.job == 0 then -- Wojownik
				pc . set_skill_level ( 1 , 39 )
				pc . set_skill_level ( 2 , 39 )
				pc . set_skill_level ( 3 , 39 )
				pc . set_skill_level ( 4 , 39 )
				pc . set_skill_level ( 5 , 39 )
				pc . set_skill_level ( 16 , 39 )
				pc . set_skill_level ( 17 , 39 )
				pc . set_skill_level ( 18 , 39 )
				pc . set_skill_level ( 19 , 39 )
				pc . set_skill_level ( 20 , 39 )
			elseif pc.job == 1 then -- Ninja
				pc . set_skill_level ( 31 , 39 )
				pc . set_skill_level ( 32 , 39 )
				pc . set_skill_level ( 33 , 39 )
				pc . set_skill_level ( 34 , 39 )
				pc . set_skill_level ( 35 , 39 )
				pc . set_skill_level ( 46 , 39 )
				pc . set_skill_level ( 47 , 39 )
				pc . set_skill_level ( 48 , 39 )
				pc . set_skill_level ( 49 , 39 )
				pc . set_skill_level ( 50 , 39 )
			elseif pc.job == 2 then -- Sura
				pc . set_skill_level ( 61 , 39 )
				pc . set_skill_level ( 62 , 39 )
				pc . set_skill_level ( 63 , 39 )
				pc . set_skill_level ( 64 , 39 )
				pc . set_skill_level ( 65 , 39 )
				pc . set_skill_level ( 66 , 39 )
				pc . set_skill_level ( 76 , 39 )
				pc . set_skill_level ( 77 , 39 )
				pc . set_skill_level ( 78 , 39 )
				pc . set_skill_level ( 79 , 39 )
				pc . set_skill_level ( 80 , 39 )
				pc . set_skill_level ( 81 , 39 )
			elseif pc.job == 3 then -- Szaman
				pc . set_skill_level ( 91 , 39 )
				pc . set_skill_level ( 92 , 39 )
				pc . set_skill_level ( 93 , 39 )
				pc . set_skill_level ( 94 , 39 )
				pc . set_skill_level ( 95 , 39 )
				pc . set_skill_level ( 96 , 39 )
				pc . set_skill_level ( 106 , 39 )
				pc . set_skill_level ( 107 , 39 )
				pc . set_skill_level ( 108 , 39 )
				pc . set_skill_level ( 109 , 39 )
				pc . set_skill_level ( 110 , 39 )
				pc . set_skill_level ( 111 , 39 )
			end
			pc . change_money (-25000000)
          	 set_state(koniec)
           else
               say_title ("Staruszka")
               say ("Ja ci dam staruszkę !")
               say ("Darmozjadzie ty !")
               return
           end
       end
   end

   state koniec begin

   end
end

 

[damomo]

@DevilxMetin2

 

quest lvl begin
state start begin
when levelup with pc.get_level() == 89 begin
notice_all(" "...pc.get_name()..." awansował z poziomu "...pc.get_level(-1)..." na poziom "...pc.get_level() !")
end
end
end

 

 

Spróbuj, nie wiem czy coś z tego zadziała.

Jeśli zadziała, to spróbuj..

Wyjdzie, że podczas każdego wbijania lvla będzie pokazywał z którego na który przeskoczył.

 

quest lvl begin
state start begin
when levelup begin
notice_all(" "...pc.get_name()..." awansował z poziomu "...pc.get_level(-1)..." na poziom "...pc.get_level() !")
end
end
end

 

lub od ogranicznika lvlowego

 

quest lvl begin
state start begin
when levelup with pc.get_level() >= XX begin
notice_all(" "...pc.get_name()..." awansował z poziomu "...pc.get_level(-1)..." na poziom "...pc.get_level() !")
end
end
end

 

W miejsce XX wpisz lvl, od którego komunikat ma się pokazywać.

[Rower1310]

@DevilxMetin masz tutaj ten quest żeby pokazywał info o wbiciu lvl-a

 

 

quest info_level begin
state start begin
	when levelup with pc.get_level() >= 80 and pc.get_level() <= 120 begin
		notice_all(pc.get_name().." awansował z poziomu "..pc.get_level() -1 .." na "..pc.get_level())
	end
end
end

 

 

@edit tak jak pisałeś na pw jest już zrobione od 80 do 120 lvl

[Sunushi]

Kusicielka, co nagle to po diable. Daj człowiekowi pomyśleć i napisać. Quest jest bardzo zoptymalizowany, istnieje taka możliwość, że coś nie zadziała (miejmy nadzieję, że nie).

 

quest first_quest begin
state start begin
 when login or enter begin
  local bron = 299
  if pc.get_job() == 1 then
bron = 1179
  elseif pc.get_job() == 3 then
bron = 7169
  end
  local zbr54 = 11269 + pc.get_job() * 200
  local zbr61 = 11279 + pc.get_job() * 200
  local itemy = {zbr54, zbr61, bron, 13069, 13089, 13109, 13129, 14209, 15209, 16209, 17209}
  for i = 1, 11 do
pc.give_item2(itemy[i], 1)
  end
  repeat
pc.give_exp2(pc.get_next_exp())
  until pc.get_level() == 50 -- 50 zmieniasz na lvl jaki chcesz usiagnac
  set_state(__COMPLETE__)
 end
end

state __COMPLETE__ begin
end
end

 

 

Rower, czarodzieju. Zapomniałeś nawiasów przy pc.get_level()

[Rower1310]

dzięki za poprawienie Sunushi

[KRis215]

Podeślij swój quest na ślub. marriage_manage.quest

 

Asti,

notice_all( "Pani "..nick.. zabiła Niebieską Śmierć!")

zamień na

notice_all( "Pani "..nick.." zabiła Niebieską Śmierć!")

 

Prosze.

 

 

quest marriage_manage begin

state start begin

when oldwoman.chat."Ich will heiraten" with not pc.is_engaged_or_married() begin

if not npc.lock() then

say("Guten Tag")

say("Moechtet Ihr tatsaechlich heiraten??")

return

end

if pc.level < 25 then

say("Nun denn...")

say("Ich habe leider eine schlechte Nachricht..")

say("Es sieht ganz so aus,")

say("als ob Ihr nicht die")

say("noetige Erfahrung ")

say("fuer eine Hochzeit habt.")

say("")

say_reward("Kommt wieder, wenn Ihr das Level 25 erreicht habt.")

say("")

npc.unlock()

return

end

 

local m_ring_num = pc.countitem(70301)

local m_has_ring = m_ring_num > 0

if not m_has_ring then

say("Nun denn...")

say("Euch fehlt etwas..")

say("")

say_item("Beide brauchen einen", 70301, "")

say_reward("Kommt wieder, wenn ihr einen Verlobungsring habt.")

say("")

npc.unlock()

 

return

end

 

 

if not marriage_manage.is_equip_wedding_dress() then

say("Nun denn....")

say("So wollt Ihr heiraten?")

say("Euch fehlt die noetige Kleidung!")

say("So kann man sich nicht sehen lassen!")

say("")

 

if m_sex==0 then

say_item("Kleidung", marriage_manage.get_wedding_dress(pc.get_job()), "")

say_reward("Nun denn...")

say_reward("Einer hat keine Hochzeitskleidung!")

else

say_item("Kleidung", marriage_manage.get_wedding_dress(pc.get_job()), "")

say_reward("Nun denn...")

say_reward("Einer hat keine Hochzeitskleidung!")

end

say("")

npc.unlock()

return

end

 

local NEED_MONEY = 1000000

if pc.get_money() < NEED_MONEY then

say("Nun denn...")

say("Etwas kostet das schoene Spielchen..")

say("Und ihr scheint")

say("nicht das noetige Geld zu haben!")

say("Kommt doch wieder, wenn ihr 1.000.000 Yang habt.")

say("")

say_reward(string.format("??!ÓB?O????*n %d?U??", NEED_MONEY/10000))

say("")

npc.unlock()

return

end

 

say("Alte Frau:")

say("Jetzt bist du erwachsen und")

say("kannst heiraten.")

say("Mit wem willst du heiraten?")

say("")

say_reward("Bitte gib den Namen ein:")

 

local sname = input()

if sname == "" then

say("Alte Frau:")

say("Du musst keine Angst vor")

say("dem Heiraten haben.")

say("Komme wieder, wenn du")

say("die richtige Entscheidung getroffen hast.")

say("")

npc.unlock()

return

end

 

local u_vid = find_pc_by_name(sname)

local m_vid = pc.get_vid()

if u_vid == 0 then

say("Alte Frau:")

say("Du weisstden Namen nicht?")

say("Nun gut - Komme wieder, wenn du")

say("den richtigen Namen kennst.")

say("")

say_reward(string.format("%s aehnliche Namen wie", sname))

say("")

npc.unlock()

return

end

 

if not npc.is_near_vid(u_vid, 10) then

say("Alte Frau:")

say("Die Person, mt der du Heiraten")

say("willst, muss auch bei mir sein.")

say("Suche die Person und")

say("kommt dann zu mir zurueck.")

say("")

say_reward(string.format("%s ist die Distanz zu", sname))

say("")

npc.unlock()

return

end

 

local old = pc.select(u_vid)

local u_level = pc.get_level()

local u_job = pc.get_job()

local u_sex = pc.get_sex()

local u_name = pc.name

local u_gold = pc.get_money()

local u_married = pc.is_married()

local u_has_ring = pc.countitem(70301) > 0

local u_wear = marriage_manage.is_equip_wedding_dress()

pc.select(old)

local m_level = pc.get_level()

 

if u_vid == m_vid then

say("Alte Frau:")

say("Das ist doch dein eigener Name.")

say("")

say_reward("Du kannst dich nicht selber heiraten.")

say("")

npc.unlock()

return

end

 

if u_married then

say("Alte Frau:")

say("Wusstest du nicht, dass die")

say("Person schon verheiratet ist?")

say("Du solltest nicht zu voreilig sein.")

say("")

say_reward(string.format("%s verheiratet gewesen.", sname))

say("")

npc.unlock()

return

end

 

if u_level < 25 then

say("Alte Frau:")

say("Die Person ist noch zu jung.")

say("Junge und alte Menschen haben")

say("verschiedene Beduerfnisse...")

say("")

say_reward("Die Person muss das Level 25")

say_reward("erreichen, bevor Sie heiraten kann.")

say("")

npc.unlock()

return

end

 

if m_level - u_level > 15 or u_level - m_level > 15 then

say("AlteFrau:")

say("Euer Levelunterschied ist einfach zu hoch.")

say("Das wuerde nur Probleme geben...")

say("Das kann ich einfach nicht zulassen.")

say("")

say_reward("Charaktere mit mehr als 15 Leveln ")

say_reward("Unterschied koennen nicht heiraten.")

say("")

npc.unlock()

return

end

 

if not u_has_ring then

if m_ring_num >= 2 then

say("Alte Frau:")

say("Um zu Heiraten, brauchst du ein")

say("Zeichen der Liebe.")

say("Komme wieder, wenn du eines")

say("hast.")

else

say("Alte Frau:")

say("Denke daran, ein Zeichen")

say("der Liebe zu tragen.")

say("")

end

 

say_item("Als Zeichen der Liebe verwendbar.", 70301, "")

say_reward("Die andere Person muss")

say_reward("auch ein Zeichen der Liebe tragen.")

say("")

npc.unlock()

return

end

 

if not u_wear then

say("Alte Frau:")

say("Du hast keine Hochzeitskleidung an.")

say("Es waere Peinlich, mit einer Ruestung")

say("zu heiraten.")

say("Komme wieder, wenn du dich")

say("passend eingekleidet hast.")

say("")

if u_sex==0 then

say_item("Kleidung", marriage_manage.get_wedding_dress(u_job), "")

say_reward("Um zu heiraten, musst du diese")

say_reward("Kleidung tragen.")

else

say_item("Kleidung", marriage_manage.get_wedding_dress(u_job), "")

say_reward("Um zu heiraten, musst du")

say_reward("ein Hochzeitskleid tragen.")

end

say("")

npc.unlock()

return

end

 

 

local ok_sign = confirm( u_vid, "Willst du"..pc.name.. "heiraten?", 30)

if ok_sign == CONFIRM_OK then

local m_name = pc.name

if pc.get_gold()>=NEED_MONEY then

pc.change_gold(-NEED_MONEY)

 

pc.removeitem(70301, 1)

pc.give_item2(70302, 1)

local old = pc.select(u_vid)

pc.removeitem(70301, 1)

pc.give_item2(70302, 1)

pc.select(old)

 

say("Alte Frau:")

say("Wir sind nun bereit, um")

say("die Hochzeit veranstalten zu koennen.")

say("Zum Ausdruck meiner Liebe zu euch")

say("spreche ich euch nun den Segen aus.")

say("Die Hochzeit findet auf der Insel der")

say("Liebe statt. ")

say("")

say_reward("Ich schicke euch nun")

say_reward("zur Insel der Liebe.")

say("")

wait()

setskin(NOWINDOW)

marriage.engage_to(u_vid)

end

else

say("Alte Frau:")

say("Dein Partner will dich nicht heiraten.")

say("Ein Gespraech wird euch")

say("sicherlich helfen.")

say("")

say_reward("Dein Partner weigerte sich,")

say_reward("zu heiraten.")

end

say("")

npc.unlock()

end

-- ?? ???? ???? ??? ??

 

when oldwoman.chat."zur Hochzeit" with pc.is_engaged() begin

say("Nun denn..")

say("Euer Ehepartner")

say("befindet sich nicht in eurem Reich!!!")

say("")

wait()

setskin(NOWINDOW)

marriage.warp_to_my_marriage_map()

end

 

 

when 9011.chat."Ehe anerkennen" with pc.is_engaged() and marriage.in_my_wedding() begin

if not npc.lock() then

say("Nun denn..")

say("Euer Partner ist entweder verheiratet oder")

say("befindet sich in einem anderen Reich!")

say("")

return

end

say("Sofern der Partner")

say("in einem anderen Reich ist,")

say("kann er es jederzeit ueber das Item")

say("Tinktur der Reiche das Reich wechseln.")

say("Eine Scheidung kann den Ehepartner loesen.")

 

local sname = input()

local u_vid = find_pc_by_name(sname)

local m_vid = pc.get_vid()

 

if u_vid == 0 then

say("Ihr seid zu")

say("schwach um mit eurem Partner")

say("zu heiraten...")

say("")

say_reward(string.format("%s Parallelen zu", sname))

say("")

npc.unlock()

return

end

 

if not npc.is_near_vid(u_vid, 10) then

say("Nun denn..")

say("Eine Heirat innerhalb")

say("eines Geschlechts ist nicht moeglich.")

say("")

say("")

say_reward(string.format("%s zu dir bewegen muss sich", sname))

say("")

npc.unlock()

return

end

 

if u_vid != marriage.find_married_vid() then

say("Nun denn...")

say("Euer Ehepartner ist nicht")

say("in eurer Naehe!")

say("")

npc.unlock()

return

end

 

local ok_sign = confirm(u_vid, "Willst du"..pc.name.. "heiraten??", 30)

if ok_sign != CONFIRM_OK then

say("Nun denn...")

say("Ihr wollt heiraten...")

say("So soll es sein!")

say("")

npc.unlock()

return

end

say("Nehmt noch")

say("diesen Ehering mit!")

say("")

marriage.set_to_marriage()

 

-- 2005.04.12.??? ?? ?? ??

-----------------------------------------------

-- say("Hier habt Ihr ihn!")

-- say("Ich wuensche euch viel Erfolg!")

-- marriage_manage.give_wedding_gift()

-- old = pc.select(u_vid)

-- marriage_manage.give_wedding_gift()

-- pc.select(old)

say("")

say_reward("Ihr habt einen Ehering erhalten.")

say("")

npc.unlock()

end

 

function give_wedding_gift()

local male_item = {71072, 71073, 71074}

local female_item = {71069, 71070, 71071}

if pc.get_sex() == MALE then

pc.give_item2(male_item[number(1, 3)], 1)

else

pc.give_item2(female_item[number(1, 3)], 1)

end

end

 

-- ??? ???? ?? ????? ?? ??

-- ?? pc.is_married() and marriage.in_my_wedding()

 

-- ??? ?? ??? ??? ?? ????

when 9011.chat."Hochzeitsmusik starten" with

(pc.is_engaged() or pc.is_married()) and

marriage.in_my_wedding() and

not marriage.wedding_is_playing_music() begin

marriage.wedding_music(true, "wedding.mp3")

setskin(NOWINDOW)

end

when 9011.chat." Hochzeitsmusik stoppen" with

(pc.is_engaged() or pc.is_married()) and

marriage.in_my_wedding() and

marriage.wedding_is_playing_music() begin

marriage.wedding_music(false, "default")

setskin(NOWINDOW)

end

when 9011.chat."Tageszeit zu Nacht aendern" with

pc.is_married() and

marriage.in_my_wedding() begin

marriage.wedding_dark(true)

setskin(NOWINDOW)

end

 

when 9011.chat."Schneefall starten" with pc.is_married() and marriage.in_my_wedding() begin

marriage.wedding_snow(true)

setskin(NOWINDOW)

end

 

when 9011.chat."Hochzeit beenden" with pc.is_married() and marriage.in_my_wedding() begin

if not npc.lock() then

say("Hochzeitsplanerin:")

say("Willst du nun die Hochzeit beenden?")

say("")

return

end

 

say("Hochzeitsplanerin:")

say("Willst du das Fest wirklich beenden?")

say("")

local s = select("Ja","Nein")

if s == 1 then

local u_vid = marriage.find_married_vid()

if u_vid == 0 then

say("Um die Hochzeit zu beenden, muss")

say("dein Partner zustimmen.")

say("Nun, da dein Partner nicht da ist,")

say("kann ich die Hochzeit nicht beenden.")

say("")

npc.unlock()

return

end

say("Hochzeitsplanerin:")

say("Um die Hochzeit zu beenden, muss")

say("dein Partner zustimmen.")

say("Ich warte auf die Antwort...")

say("")

local ok_sign = confirm(u_vid, "Willst du die Hochzeit beenden?", 30)

if ok_sign == CONFIRM_OK then

marriage.end_wedding() -- ??? ???? ??? ??.

else

say("Hochzeit beenden:")

say("Die andere Person ist nicht einverstanden.")

say("")

end

 

end

 

npc.unlock()

end

 

-- ??? ???? ???? ??? ??

when 11000.chat."Scheidung einreichen" or

11002.chat." Scheidung einreichen" or

11004.chat." Scheidung einreichen" with pc.is_married() begin

 

if not marriage_manage.check_divorce_time() then

return

end

 

local u_vid = marriage.find_married_vid()

if u_vid == 0 or not npc.is_near_vid(u_vid, 10) then

say("Waechter des Dorfplatzes:")

say("Die Scheidung ist eine sehr ernste Angelegenheit!")

say("Wenn du dich scheiden lassen willst,")

say("muss dein Partner dabei sein.")

say("")

return

end

 

say("Waechter des Dorfplatzes:")

say("Die Scheidung kostet 500.000 Yang.")

say("Ausserdem muss die andere Person")

say("zustimmen.")

say("Willst du die Scheidung veranlassen?")

say("")

 

local MONEY_NEED_FOR_ONE = 500000

local s = select("Ja", "Nein")

 

if s == 1 then

local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE

local m_have_ring = pc.countitem(70302) > 0

 

local old = pc.select(u_vid)

local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE

local u_have_ring = pc.countitem(70302) > 0

pc.select(old)

 

if not m_have_ring then

say("Du musst den Ehering mitbringen.")

return;

end

if not u_have_ring then

say("Die andere Person muss den")

say("Ehering auch mitbringen.")

return;

end

 

if not m_enough_money then

say("Waechter des Dorfplatzes:")

say("Du hast nicht genug Yang fuer die Scheidung.")

say("")

say_reward(string.format("Die Scheidung kostet %dvon", MONEY_NEED_FOR_ONE/10000))

say("")

return;

end

if not u_enough_money then

say("Waechter des Dorfplatzes::")

say("Die andere Person hat nicht genug Yang.")

say("")

say_reward("Fuer die Scheidung muessen")

say_reward("beide 500.000 Yang bezahlen.")

say("")

return;

end

 

say("Die Scheidung ist eine sehr")

say("schmerzhafte Angelegenheit. Willst")

say("du dich wirklich scheiden lassen?")

say("")

say("Wirklich? Du willst wirklich die Scheidung?")

say("")

 

local c=select("Ja", "Nein")

if 2 == c then

say_pc_name()

say("Ich will die Scheidung, das")

say("ist meine Entscheidung.")

say("")

wait()

say("Waechter des Dorfplatzes:")

say("So sei es...")

say("Ihr seid 2 Personen, die weder zusammen")

say("halten, noch ihr Leben geniessen.")

say("")

say_reward("Ich werde die Ehe mit der Scheidung beenden.")

say("")

return

end

 

local ok_sign = confirm(u_vid, pc.name.." willst du dich Scheiden lassen?", 30)

if ok_sign == CONFIRM_OK then

 

local m_enough_money = pc.gold > MONEY_NEED_FOR_ONE

local m_have_ring = pc.countitem(70302) > 0

 

local old = pc.select(u_vid)

local u_enough_money = pc.gold > MONEY_NEED_FOR_ONE

local u_have_ring = pc.countitem(70302) > 0

pc.select(old)

 

if m_have_ring and m_enough_money and u_have_ring and u_enough_money then

pc.removeitem(70302, 1)

pc.change_money(-MONEY_NEED_FOR_ONE)

 

local old = pc.select(u_vid)

pc.removeitem(70302, 1)

pc.change_money(-MONEY_NEED_FOR_ONE)

pc.select(old)

 

say("Waechter des Dorfplatzes:")

say("Die Scheidung war erfolgreich.")

say("Ihr seid zwei verschiedene Menschen,")

say("das kann man nicht ändern.")

say("")

say_reward("Scheidung erfolgreich abgeschlossen!")

say("")

marriage.remove()

else

say("Waechter des Dorfplatzes::")

say("Ein Fehler ist aufgetreten.")

say("Ich konnte euch nicht scheiden.")

say("Versuche es später erneut.")

say("")

say_reward("Scheidung fehlgeschlagen.")

say("")

end

else

say("Waechter des Dorfplatzes:")

say("Die andere Person ist nicht einverstanden.")

say("Kommt am besten zu mir, dann")

say("reden wir ueber die Sache.")

say("")

say_reward("Die Scheidung wurde abgebrochen.")

say("")

end

end

end

 

when 11000.chat."Ehering abgeben" or

11002.chat." Ehering abgeben" or

11004.chat." Ehering abgeben" with

not pc.is_married() and

pc.count_item(70302)>0

begin

say("Waechter des Dorfplatzes:")

say("Du wirst die Schlechten Erinnerungen")

say("schnell vergessen.")

say("")

say_reward("Der Ehering wurde erfolgreich entfernt.")

pc.remove_item(70302)

end

 

when 11000.chat." Einseitige Scheidung" or

11002.chat." Einseitige Scheidung" or

11004.chat." Einseitige Scheidung" with pc.is_married() begin

 

if not marriage_manage.check_divorce_time() then

return

end

 

say("Waechter des Dorfplatzes:")

say("Die einseitige Scheidung kostet dich 1.000.000 Yang.")

say("Willst du das bezahlen?")

say("")

 

local s = select("Ja", "Das ist mir zuviel.")

 

local NEED_MONEY = 1000000

if s == 2 then

return

end

 

if pc.money < NEED_MONEY then

say("Waechter des Dorfplatzes:")

say("Dein Yang reicht nicht fuer die Scheidung.")

say("Eine Scheidung ist teuer.")

say("Komme wieder, wenn du genug gespart hast.")

say("")

return

end

 

say("Waechter des Dorfplatzes:")

say("Willst du wirklich die Scheidung?")

say("Hast du es dir gut ueberlegt?")

local c = select("Ich will die Scheidung!", "Ich ueberlege es mir noch.")

 

if c == 2 then

say("Waechter des Dorfplatzes:")

say("Das ist die richtige Entscheidung. Geniesse dein")

say("Leben.")

say("Nicht immer haben beide die gleichen Meinungen.")

say("")

say_reward("Die Scheidung wurde abgebrochen.")

say("")

return

end

 

pc.removeitem(70302, 1)

pc.change_gold(-NEED_MONEY)

 

marriage.remove()

 

say("Waechter des Dorfplatzes:")

say("Da ihr eich nicht verstanden habt, seid ihr nun")

say("geschieden.")

say("Ich hoffe, du bist nun gluecklich.")

say("")

say_reward("Die einseitige Scheidung war erfolgreich.")

say("")

end

 

-- ??? ?? ??

when oldwoman.chat."Liste der Hochzeiten" with not pc.is_engaged() begin

local t = marriage.get_wedding_list()

if table.getn(t) == 0 then

say("Im Moment findet keine Hochzeit statt.")

say("")

else

-- chat(table.getn(t))

local wedding_names = {}

table.foreachi(t, function(n, p) wedding_names[n] = p[3].."und "..p[4].." Hochzeit" end)

wedding_names[table.getn(t)+1] = locale.confirm

local s = select_table(wedding_names)

 

if s != table.getn(wedding_names) then

marriage.join_wedding(t[1], t[2])

end

end

end

when 9011.click with not pc.is_engaged() and not pc.is_married() begin

say("Hochzeitsplanerin:")

say("Wir sind hier heute zusammen gekommen,")

say("um die Hochzeit")

say("zu feiern.")

say("Gesegnet sei das Paar.")

say("")

end

 

function check_divorce_time()

 

local DIVORCE_LIMIT_TIME = 86400

 

if is_test_server() then

DIVORCE_LIMIT_TIME = 60

end

 

if marriage.get_married_time() < DIVORCE_LIMIT_TIME then

say("Hallenwaechter:")

say("Jetzt ist genug gefeiert!!!")

say("Alle raus hier!")

say("")

return false

end

 

return true

end

 

-- ?? ??? ?? ???? ??? ??

-- ?? ?? : pc.is_engaged_or_married()

function is_equip_wedding_dress()

local a = pc.get_armor()

return a >= 11901 and a <= 11904

end

function get_wedding_dress(pc_job)

if 0==pc_job then

return 11901

elseif 1==pc_job then

return 11903

elseif 2==pc_job then

return 11902

elseif 3==pc_job then

return 11904

else

return 0;

end

end

end

end

 

[Sunushi]

adm, znajdź w swoim queście marriage.set_to_marriage(). Kliknij po tym enter i wprowadź takie coś:

notice_all(pc.get_name().." i "..sname.." zawarli związek małeżeński!")

Jeśli nie zadziała to pisz

Już pisałem wcześniej