Pisanie / Poprawa Questów !

Farrek · 3 Maja 2012

Jak okno na czas?? tzn jeżeli ktoś uaktywni questa u npc to musi poczekac np.10sec aby mógł wyłączyć okno z say...

Chyba napisałem zrozumiale xDD

xDDDD

say("[DELAY value; 250]text[/DELAY]")

Kubaman · 3 Maja 2012

quest make_herb_lv10  begin
    state start begin
		    when login or levelup with pc.get_level() ==5  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: Żółć ")
		    end
		    when button or info begin
				    say_title("List od Biologa")
				    say("Dzielny wojowniku, potrzebuję pomocy.")
				    say("Proszę, przyjdź tutaj do mnie.")
				    say_reward("Biologa znajdziesz na mapie")
		    end

		    when __TARGET__.target.click or
				    20084.chat."Żółć niedźwiedzia" begin
				    target.delete("__TARGET__")
  say_title("Biolog Chaegirab: ")
				    say("Dobrze, że tu przybyłeś.")
				    say("Mam dla ciebie bardzo ważną misję.")
				    say("Proszę, pomóż mi.")
				    wait()
				    say_title
				    say_title("Biolog Chaegirab: ")
				    say("Mam na myśli żółć niedźwiedzia.")
				    say("Potrzebuję ją do stworzenia wywaru")
				    say("dla rannych wojowników.")
				    say("Myślę, że 5 sztuk wystarczy.")																																															   
				    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("Znajdź żółć ")

		    end
		    when button or info begin
				    say_title("Znajdź żółć ")
				    say("Biolog Chaegirab potrzebuje")
				    say("żółcie niedźwiedzia dla rannych")
				    say("wojowników z wioski.")
				    say("Żółć pozyskasz od: ")
				    say_reward("Niedźwiedź")
				    say_item_vnum(30010)
				    say_reward("Do tej pory dostarczyłeś ".." "..pc.getqf("collect_count").." Żółci niedźwiedzia.")
				    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(50703)==0 then
						    say_title("Biolog Chaegirab: ")
						    say("Proszę, zdobądź te żółcie...")
						    say("Ranni wojownicy potrzebują pomocy.")
						    say("")
						    return
				    end
				    item.remove()  
				    pc.setqf("drink_drug",1)
		    end

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

    when 20084.chat."Żółć " with pc.count_item(30010) >0   begin
						    say_title("Biolog Chaegirab: ")
						    say("Masz żółć?")
						    say("To świetnie! Proszę, podaj mi ją.")
						    say("Muszę ją przebadać")
						    say("")
						    pc.remove_item(30010, 1)
						    wait()

						    local pass_percent
						    if pc.getqf("drink_drug")==0 then
								    pass_percent=100
						    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_title("Biolog Chaegirab: ")
										    say("Tak! Ta żółć jest doskonałej jakości.")
										    say("Proszę, przynieś mi jeszcze ".." "..5-pc.getqf("collect_count").. " żółci niedźwiedzia.")
										    say("")
										    pc.setqf("drink_drug",0)		 --?A?o??cl??
										    return
								    end
								    say_title("Biolog Chaegirab: ")
								    say("Zdobyłeś już wszystkie 5 żółci.")
								    say("Doskonała robota.")
								    say("Teraz mogę pomóc wojownikom z wioski.")
								    say("Ahh! O to twoja nagroda!")
								    say_reward("Jako nagrodę, biolog podarowuje ci 500")
								    say_reward("PD, 150.000 Yang oraz")	
								    say_reward("broń +9.")

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

								    clear_letter()
								    set_state(__complete)

								    pc.change_money(150000)
								    pc.give_exp2(500)
	  if pc . job == 0 then
	  pc.give_item2(29)
	  elseif pc . job == 1 then
	  pc.give_item2(4009)
	  elseif pc . job == 2 then
	  pc.give_item2(29)
	  elseif pc . job == 3 then
	  pc.give_item2(7019)
								    set_quest_state("levelup","run")

								    return
						    else														   
						    say_title("Biolog Chaegirab: ")
						    say("Przykro mi.")
						    say("Ta żółć nie jest dobrej jakości..")
						    say("Proszę, znajdź inną.")
						    say("")
						    pc.setqf("drink_drug",0)		 --?A?o??cl??
						    return
						    end
    end
end


    state __complete begin
    end
end

Błąd w VB:

syntax error : [string "information"]:8: '=' expected near 'say_tit;e' biolog5lv.quest:41:Abort (core dumped)

maniek1310 · 3 Maja 2012

@up zobacz jaki masz błąd

       	 say_title
           say_title("Biolog Chaegirab: ")

rozchodzi się o te pierwsze say_title

Kubaman · 3 Maja 2012

@up zobacz jaki masz błąd
	   	 say_title
		say_title("Biolog Chaegirab: ")
rozchodzi się o te pierwsze say_title

poprawiłem, teraz jest:

expecting 'when' or 'function'

biolog5lv.quest:159:Abort (core dumped)

JonyNawa1ony · 3 Maja 2012

@ Kubaman

Ale wgraj tutaj w spoilerze i code quest: biolog5lv.quest

A nie make_herb_lv10

Masz za mało, lub za dużo end....

Nie widzę tego questa, więc nie mogę Ci pomoc....

maniek1310 · 3 Maja 2012

@Kubaman zabrakło ci jednego end

http://wklej.to/3yigu

Cięcina · 3 Maja 2012

Może ktoś poprawić mi kilka questów

Bardzo bym prośił

Dam ++ i nie tylko wynagrodzę mu to jakoś

http://speedy.sh/JeC...-do-poprawy.rar

SKAN :

http://imageshack.us/photo/my-images/715/beztytuuuuu.jpg/

Mondes · 3 Maja 2012

@UP

Byłbyś tak miły i powiedział jakie błędy wyskakują?

Cięcina · 3 Maja 2012

Jak wpisywałem Make to mi wyskakuje na tych questach up error coniecton i nazwa questa wyskakiwała

Cięcina · 3 Maja 2012

up^^ ref...

JonyNawa1ony · 4 Maja 2012

@ Cięcina

http://wklej.to/EpGqz

http://wklej.to/feCah

http://wklej.to/EqyUH

kilu · 4 Maja 2012

@z4z0l przeczytałeś co nie działa? quest się wczytuje etc... nie działa tylko to co napisałem, gdyby była to wina pl znaków quest wcale by się nie wczytywał... ;p

Quest by sie wgrał... ale nie użyłbyś jakiejś funkcji z niego, bądź w jakimś momencie czegoś nie dałoby się wykonać

Kubaman · 4 Maja 2012

quest itemek begin
state start begin
when 30141.use begin
say_title ("Wyryty napis na Ozdobnym Kamieniu")
say("Nauka to do potęgi klucz.")
say("Pójdź drogą dobra...")
say_title("Hmm dziwne... Dalej napis się urywa.")
wait()
say_reward("Otrzymano umiejętności P")
if pc . get_job() == 0 and pc . get_skill_group()==1 then
pc . set_skill_level (1, 59)
pc . set_skill_level (2, 59)
pc . set_skill_level (3, 59)
pc . set_skill_level (4, 59)
pc . set_skill_level (5, 59)

elseif pc . get_job()==0 and pc . get_skill_group()==2 then
pc . set_skill_level (16, 59)
pc . set_skill_level (17, 59)
pc . set_skill_level (18, 59)
pc . set_skill_level (19, 59)
pc . set_skill_level (20, 59)

elseif pc . get_job()==1 and pc . get_skill_group()==1 then
pc.set_skill_level(31, 59)
pc.set_skill_level(32, 59)
pc.set_skill_level(33, 59)
pc.set_skill_level(34, 59)
pc.set_skill_level(35, 59)
elseif pc . get_job()==1 and pc . get_skill_group()==2 then
pc.set_skill_level(46, 59)
pc.set_skill_level(47, 59)
pc.set_skill_level(48, 59)
pc.set_skill_level(49, 59)
pc.set_skill_level(50, 59)
elseif pc . get_job()==2 and pc . get_skill_group()==1 then
pc.set_skill_level(61, 59)
pc.set_skill_level(62, 59)
pc.set_skill_level(63, 59)
pc.set_skill_level(64, 59)
pc.set_skill_level(65, 59)
pc.set_skill_level(66, 59)
elseif pc . get_job()==2 and pc . get_skill_group()==2 then
pc.set_skill_level(76, 59)
pc.set_skill_level(77, 59)
pc.set_skill_level(78, 59)
pc.set_skill_level(79, 59)
pc.set_skill_level(80, 59)
pc.set_skill_level(81, 59)
elseif pc . get_job()==3 and pc . get_skill_group()==1 then
pc.set_skill_level(91, 59)
pc.set_skill_level(92, 59)
pc.set_skill_level(93, 59)
pc.set_skill_level(94, 59)
pc.set_skill_level(95, 59)
pc.set_skill_level(96, 59)
elseif pc . get_job()==3 and pc . get_skill_group()==2 then
pc.set_skill_level(106, 59)
pc.set_skill_level(107, 59)
pc.set_skill_level(108, 59)
pc.set_skill_level(109, 59)
pc.set_skill_level(110, 59)
pc.set_skill_level(111, 59)
end
pc.removeitem("30141")
end
end
end

Wszystko ok, wgrywa się, tyle że w grze nic się nie dzieje... Używam i nic.

JonyNawa1ony · 4 Maja 2012

@Kubaman

Spróbuj:

http://wklej.to/3kTmh

Kubaman · 4 Maja 2012

Wciąż nic.

Oraz potrzebuję questa, np. jako GM gadasz z npc o id 9010, masz opcje 'event'.

Klikasz, i się pyta, czy rozpocząć event metinów.

Do wyboru opcje tak, nie.

Gdy klikniesz tak, pojawiają się metiny 80, 85 i 90lv wokół świątyni hwang.

W czasie pojawiania, wyświetli się informacja (notice_all):

Metiny wokół świątyni zrespawnowały się.

maniek1310 · 4 Maja 2012

@Kubaman ten quest jest dobry , wiec sprawdź czy masz dobre flag i antyflag w mysql

quest itemek begin
state start begin
 when 30141.use begin
  say_title ("Wyryty napis na Ozdobnym Kamieniu")
  say("Nauka to do potęgi klucz.")
  say("Pójdź drogą dobra...")
  say_title("Hmm dziwne... Dalej napis się urywa.")
  wait()
  say_reward("Otrzymano umiejętności P")
  if pc.get_job() == 0 and pc.get_skill_group() == 1 then
pc.set_skill_level(1, 59)
pc.set_skill_level(2, 59)
pc.set_skill_level(3, 59)
pc.set_skill_level(4, 59)
pc.set_skill_level(5, 59)
  elseif pc.get_job()==0 and pc.get_skill_group() == 2 then
pc.set_skill_level(16, 59)
pc.set_skill_level(17, 59)
pc.set_skill_level(18, 59)
pc.set_skill_level(19, 59)
pc.set_skill_level(20, 59)
  elseif pc.get_job()==1 and pc.get_skill_group() == 1 then
pc.set_skill_level(31, 59)
pc.set_skill_level(32, 59)
pc.set_skill_level(33, 59)
pc.set_skill_level(34, 59)
pc.set_skill_level(35, 59)
  elseif pc.get_job()==1 and pc.get_skill_group() == 2 then
pc.set_skill_level(46, 59)
pc.set_skill_level(47, 59)
pc.set_skill_level(48, 59)
pc.set_skill_level(49, 59)
pc.set_skill_level(50, 59)
  elseif pc.get_job()==2 and pc.get_skill_group() == 1 then
pc.set_skill_level(61, 59)
pc.set_skill_level(62, 59)
pc.set_skill_level(63, 59)
pc.set_skill_level(64, 59)
pc.set_skill_level(65, 59)
pc.set_skill_level(66, 59)
  elseif pc.get_job()==2 and pc.get_skill_group() == 2 then
pc.set_skill_level(76, 59)
pc.set_skill_level(77, 59)
pc.set_skill_level(78, 59)
pc.set_skill_level(79, 59)
pc.set_skill_level(80, 59)
pc.set_skill_level(81, 59)
  elseif pc.get_job()==3 and pc.get_skill_group() == 1 then
pc.set_skill_level(91, 59)
pc.set_skill_level(92, 59)
pc.set_skill_level(93, 59)
pc.set_skill_level(94, 59)
pc.set_skill_level(95, 59)
pc.set_skill_level(96, 59)
  elseif pc.get_job()==3 and pc.get_skill_group() == 2 then
pc.set_skill_level(106, 59)
pc.set_skill_level(107, 59)
pc.set_skill_level(108, 59)
pc.set_skill_level(109, 59)
pc.set_skill_level(110, 59)
pc.set_skill_level(111, 59)
  end
  pc.removeitem("30141")
 end
end
end

a tutaj masz tego questa z event-em

quest event begin
   state start begin
       when 20016.chat."Włącz event" with pc.is_gm() begin
           say("Czy chcesz włączyć event ??")
           local s = select("Tak","Nie")
           if s == 2 then
               return
           end
           d.spawn_mob("id_metka", kordy, kordy)
           d.spawn_mob("id_metka", kordy, kordy)
           d.spawn_mob("id_metka", kordy, kordy)
           d.spawn_mob("id_metka", kordy, kordy)
       end
   end
end

maniek1310 · 4 Maja 2012

Przedstawiam wam mój quest dzięki któremu możemy sprawdzić lvl innego gracza.

http://www.mpcforum.pl/topic/618540-quest-sprawdzajacy-lvl-innego-gracza/

Kubaman · 4 Maja 2012

maniek, ten quest nie działa. Metiny nie respią się.

JonyNawa1ony · 4 Maja 2012

@maniek, co do tego questa z eventem:

On przecież nie zadziała. Nawet jak podasz id metinów i kordy.... A na jakiej mapie się zrespią, powiedz mi?

Popraw go

Mondes · 4 Maja 2012

@Kubaman ten quest jest dobry , wiec sprawdź czy masz dobre flag i antyflag w mysql

a tutaj masz tego questa z event-em

quest event begin
state start begin
	when 20016.chat."Włącz event" with pc.is_gm() begin
		say("Czy chcesz włączyć event ??")
		local s = select("Tak","Nie")
		if s == 2 then
			return
		end
		d.spawn_mob("id_metka", kordy, kordy)
		d.spawn_mob("id_metka", kordy, kordy)
		d.spawn_mob("id_metka", kordy, kordy)
		d.spawn_mob("id_metka", kordy, kordy)
	end
end
end

1.ID moba nie daje się w cudzysłowiu.

2.Nie jesteś w dungeonie, więc nie możesz użyć funkcji d.spawn_mob (Jak już to spawn.mob).

3.Gdzie else lub coś potwierdzającego, że ma zostać wybrana opcja 1?

Poprawiony quest:

---------------------
-- Quest by Mondes --
---------------------
quest Event begin
state start begin
when x.chat."Event" with pc.is_gm() and pc.get_map_index() == x begin
say_title(mob_name(x)..":")
say("Włączyć Event?")
local x = select("Tak", "Nie")
if x == 2 then
return
elseif x == 1 then
mob.spawn(id, kord_x, kord_y, 1, 1, 1)
mob.spawn(id, kord_x, kord_y, 1, 1, 1)
mob.spawn(id, kord_x, kord_y, 1, 1, 1)
mob.spawn(id, kord_x, kord_y, 1, 1, 1)
end -- if
end -- when
end -- state
end -- quest

lopescio · 4 Maja 2012

@Maniek, chuj wie co Ty zrobiłeś, nie te funkcje synek

Kubaman

http://wklej.to/5tmjY

Ps. Zapraszam Cię na

questy.tk

Codziennie nowe questy!

kopson44 · 4 Maja 2012

odrazu mówie,że wiem, że nawaliłem tego dużo a mogłem zrobić krócej ale tak wyszło a inaczej wyjść nie chciało

a teraz mam prośbe jak dodać do tego questa możliwość robienia co 1h

-----------------
-----BY WuWu-----
-----------------
-----------------------
---	 Edit by Czarny  ---
-----------------------

quest exp_drop_yang0 begin
    state start begin
		    when 20082.chat."Specjalna Misja" begin
				    say_title ( "O znalazł się śmiałek" )
                       say_title ( "Za wykonanie jej możesz dostać " )
                       say_title ( " - Szczęśliwą Monetę " )
                       say_title ( " - Pierścień Doświadczenia " )
                       say_title ( " - Rękawice Złodzieja " )
                       say_title ( " Losowo od 1 do 5 " )
				    say (pc.get_name().. " Chcesz rozpocząć misje?" )
				    local s = select("Tak", "Nie ")
    if s == 2 then
	 say_title("Ehh:")
	 say("Nie wiesz co tracisz")
    end
    if s == 1 then
	  say_title("Kapturek:")
	  say("No to dobrze!  ")
	  say("Teraz wylosuję ci kogo będziesz")
	  say("musiał zniszczyć ")
	  wait()
	  local los = number(1, 10)
	   if los == 1 then
		    say_title("Kapturek:")
		    say("Ulala: ")
               say("Wypadło na piekło")
		    say("Musisz zabić 1000 piekielnych istot")
		    set_state( pieklo )    
				    pc.setqf("pieklo", 0)
				    q.set_counter("Piekielne Istoty", 1000)
	   end
	   if los == 2 then
		    say_title("Kapturek:")
		    say("Wygląda na to że troche się ochłodzisz ")
               say("Twoje zadanie to pokonanie")
		    say("500 istot z lodowej krainy")
		    set_state( lodzik )    
				    pc.setqf("lodzik", 0)
				    q.set_counter("Lodowe Istoty", 500)
	   end
	   if los == 3 then
		    say_title("Kapturek:")
		    say("Z tego co widze, ")
               say("czeka cię wyprawa do lasu")
		    say("musisz zabić 1500 leśnych stworzeń.")
		    set_state( las )    
				    pc.setqf("las", 0)
				    q.set_counter("Leśne Stwory", 1500)
	   end
	   if los == 4 then
		    say_title("Kapturek:")
		    say("Hoho: ")
               say("Twoja misja rozpocznie się w grocie,")
		    say("Zwaną grotą wygnańców.")
		    say("Pokonaj 2000 ludzi")
               say("zamieszkujących ten teren.")
               set_state( grota )    
				    pc.setqf("grota", 0)
				    q.set_counter("Ludzie z Groty", 2000)
	   end
	   if los == 5 then
		    say_title("Kapturek:")
		    say("Demony!!! ")
               say("Musisz iść do wieży demonów")
		    say("I załatwić ich lidera.")
		    say("Tak!Tak! Umarłego!! Rozpruwacza!!! ")
		    set_state( rip )    
				    pc.setqf("rip", 0)
	   end
	   if los == 6 then
		    say_title("Kapturek:")
		    say("Pff orki: ")
		    say(" Żadne wyzwanie")
		    say("Zabij 300 orków.")
		    set_state( orki )    
				    pc.setqf("orki", 0)
				    q.set_counter("Zabici Orkowie", 300)
	   end
	   if los == 7 then
		    say_title("Kapturek:")
		    say("Akcja w Świątyni ")
		    say("Pokonaj 400 mistyków")
		    set_state( mistyki )    
				    pc.setqf("mistyki", 0)
				    q.set_counter("Mistyczne Stwory", 400)
	   end
	   if los == 8 then
		    say_title("Kapturek:")
		    say(" Żabuchy: ")
		    say("Załatw 300 Żab.")
		    set_state( zaby )    
				    pc.setqf("zaby", 0)
				    q.set_counter(" Żaby do zabicia", 300)
	   end
	   if los == 9 then
		    say_title("Kapturek:")
		    say("Ja pierole: ")
		    say("Farciasz!! Zabij Psa")
		   set_state( pies )    
				    pc.setqf("pies", 0)
                       q.set_counter("Pies", 1)
	   end
	   if los == 10 then
		    say_title("Kapturek:")
		    say("Ooo!! ")
		    say("No to będzisz miał roboty ")
		    say("Zabij 300 mobów które atakują ")
		    say("Na dystans! ")
		    set_state( luki )    
				    pc.setqf("luki", 0)
                       q.set_counter(" Łucznicy", 300)
	   end

	 end
        end
        end
        state pieklo begin
		    when letter begin
				    send_letter("Zabij Piekielne Istoty")
		    end
		    when button or info begin
				    say_title("Zabij Piekielne Istoty: ")
				    say_reward("Twoim zadaniem jest zabić 1000 piekielnych istot")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("pieklo").." Piekielnych Istot")
				    say("")
		    end
		    when 2201.kill or 2202.kill or 2203.kill or 2204.kill or 2205.kill or 2206.kill or
               2207.kill or 2231.kill or 2232.kill or 2233.kill or 2234.kill or 2235.kill begin
				    local count = pc.getqf("pieklo") + 1
				    if count <= 1000 then
						    pc.setqf("pieklo", count)
						    q.set_counter("Pozostała ilość", 1000 - count)
						    if count == 1000 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 1000 Piekielnych stworzeń.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	   if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
	   end

						    end
				    end
		    end
               end

       state lodzik begin
		    when letter begin
				    send_letter("Zabij Lodowe Istoty")
		    end
		    when button or info begin
				    say_title("Zabij Lodowe Istoty: ")
				    say_reward("Twoim zadaniem jest zabić 500 Lodowych istot")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("lodzik").." Lodowych Istot")
				    say("")
		    end
		    when 1101.kill or 1102.kill or 1103.kill or 1104.kill or 1105.kill or 1106.kill or
               1107.kill or 1131.kill or 1132.kill or 1133.kill or 1134.kill or 1135.kill begin
				    local count1 = pc.getqf("lodzik") + 1
				    if count1 <= 500 then
						    pc.setqf("lodzik", count1)
						    q.set_counter("Pozostała ilość", 500 - count1)
						    if count1 == 500 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 500 Lodowych stworzeń.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	   if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
	   end

						    end
				    end
		    end
               end
       state las begin
		    when letter begin
				    send_letter("Zabij Leśne Stwory")
		    end
		    when button or info begin
				    say_title("Zabij Leśne Stwory: ")
				    say_reward("Twoim zadaniem jest zabić 1500 Leśnych istot")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("las").." Leśnych Stworzeń ")
				    say("")
		    end
		    when 2301.kill or 2302.kill or 2303.kill or 2304.kill or 2305.kill or 2306.kill or
               2307.kill or 2311.kill or 2312.kill or 2313.kill or 2314.kill or 2315.kill begin
				    local count2 = pc.getqf("las") + 1
				    if count2 <= 1500 then
						    pc.setqf("las", count2)
						    q.set_counter("Pozostała ilość", 1500 - count2)
						    if count2 == 1500 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 1500 Leśnych stworzeń.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	   if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
		    end
               end
       state grota begin
		    when letter begin
				    send_letter("Zabij Mieszkańców Groty")
		    end
		    when button or info begin
				    say_title("Zabij Mieszkańców Groty: ")
				    say_reward("Twoim zadaniem jest zabić 2000 Mieszkańców Groty")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("grota").." Mieszkańców Groty")
				    say("")
		    end
		    when 2401.kill or 2402.kill or 2403.kill or 2404.kill or 2411.kill or 2412.kill or
               2413.kill or 2414.kill or 2431.kill or 2432.kill or 2433.kill or 2434.kill begin
				    local count3 = pc.getqf("grota") + 1
				    if count3 <= 2000 then
						    pc.setqf("grota", count3)
						    q.set_counter("Pozostała ilość", 2000 - count3)
						    if count3 == 2000 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 2000 Mieszkańców Groty.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	   if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
		    end
               end
       state rip begin
		    when letter begin
				    send_letter("Zabij Umarłego Rozpruwacza")
		    end
		    when button or info begin
				    say_title("Zabij Umarłego Rozpruwacza: ")
				    say_reward("Twoim zadaniem jest zabić Umarłego Rozpruwacza")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("rip").." Umarłego Rozpruwacza")
				    say("")
		    end
		    when 1093.kill begin
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś Umarłego Rozpruwacza.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	  if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
       state orki begin
		    when letter begin
				    send_letter("Zabij Orki")
		    end
		    when button or info begin
				    say_title("Zabij Orki: ")
				    say_reward("Twoim zadaniem jest zabić 300 Orków")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("grota").." Orków")
				    say("")
		    end
		    when 601.kill or 602.kill or 603.kill or 604.kill or 631.kill or 632.kill or
               633.kill or 634.kill or 635.kill or 636.kill or 637.kill or 651.kill or
               652.kill or 653.kill or 654.kill or 655.kill or 656.kill or 657.kill begin
				    local count4 = pc.getqf("orki") + 1
				    if count4 <= 300 then
						    pc.setqf("orki", count4)
						    q.set_counter("Pozostała ilość", 300 - count4)
						    if count4 == 300 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 300 Orków.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	  if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
		    end
               end
       state mistyki begin
		    when letter begin
				    send_letter("Zabij Ezoty")
		    end
		    when button or info begin
				    say_title("Zabij Ezoty: ")
				    say_reward("Twoim zadaniem jest zabić 400 Ezotów")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("mistyki").." Ezotów")
				    say("")
		    end
		    when 701.kill or 702.kill or 703.kill or 704.kill or 705.kill or 706.kill or
               707.kill or 731.kill or 732.kill or 733.kill or 734.kill or 735.kill or 736.kill or
               737.kill or 751.kill or 752.kill or 753.kill or 754.kill or 755.kill or 756.kill or
               757.kill or 771.kill or 772.kill or 773.kill or 774.kill or 775.kill or 776.kill or 777.kill begin
				    local count5 = pc.getqf("mistyki") + 1
				    if count5 <= 400 then
						    pc.setqf("mistyki", count5)
						    q.set_counter("Pozostała ilość", 400 - count5)
						    if count5 == 400 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 400 Ezotów.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	  if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
		    end
               end
       state zaby begin
		    when letter begin
				    send_letter("Zabij Żaby")
		    end
		    when button or info begin
				    say_title("Zabij Żaby: ")
				    say_reward("Twoim zadaniem jest zabić 300 Żab")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("zaby").." Żab")
				    say("")
		    end
		    when 1301.kill or 1302.kill or 1303.kill or 1305.kill or 1331.kill or 1332.kill or
               1333.kill or 1334.kill or 1335.kill begin
				    local count6 = pc.getqf("zaby") + 1
				    if count6 <= 300 then
						    pc.setqf("zaby", count6)
						    q.set_counter("Pozostała ilość", 300 - count6)
						    if count6 == 300 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 300 Żab.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	   if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
		    end
               end
           state pies begin
		    when letter begin
				    send_letter("Zabij Psa")
		    end
		    when button or info begin
				    say_title("Zabij Psa: ")
				    say_reward("Twoim zadaniem jest zabić Psa")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("pies").." Psa")
				    say("")
		    end
		    when 101.kill begin
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś Psa.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	  if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
           state luki begin
		    when letter begin
				    send_letter("Zabij Stworzenia Dystansowe")
		    end
		    when button or info begin
				    say_title("Zabij Stworzenia Dystansowe: ")
				    say_reward("Twoim zadaniem jest zabić 300 Stworzeń Dystansowych")
				    say_reward( "Do tej pory zabiłeś "..""..pc.getqf("luki").." Stworzeń Dystansowych")
				    say("")
		    end
		    when 302.kill or 332.kill or 352.kill or 403.kill or 453.kill or 503.kill or
               553.kill or 936.kill or 906.kill or 1002.kill or 1032.kill or 1034.kill or 1004.kill or
               1036.kill or 1039.kill or 1062.kill or 1064.kill or 1069.kill or 1101.kill or 1131.kill or
               1171.kill or 2105.kill or 2107.kill or 2132.kill or 2134.kill or 2155.kill or 2157.kill or
               2202.kill or 2232.kill or 2301.kill or 2303.kill or 2311.kill or 2313.kill or 2402.kill or 2403.kill or
               2412.kill or 2413.kill or 2432.kill or 2433.kill or 5102.kill or 5112.kill or 5122.kill or 5132.kill or
               5152.kill begin
				    local count7 = pc.getqf("luki") + 1
				    if count7 <= 300 then
						    pc.setqf("luki", count7)
						    q.set_counter("Pozostała ilość", 300 - count7)
						    if count7 == 300 then
								    say_title("Zadanie Wykonane.")
								    say_reward("Zabiłeś 300 Stworzeń Dystansowych.")
								    say_reward("Trwa Losowanie Nagrody.")
                                       wait()
                                       local los1 = number(1, 16)
	  if los1 == 1 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("1 Sztuka")
		    pc.give_item2(71017)
               return
	   end
	   if los1 == 2 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("2 Sztuki")
		    pc.give_item2(71017, 2)
               return
	   end
	   if los1 == 3 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("3 Sztuki")
		    pc.give_item2(71017, 3)
               return
	   end
	   if los1 == 4 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("4 Sztuki")
		    pc.give_item2(71017, 4)
               return
	   end
	   if los1 == 5 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71017)
               say_reward("5 Sztuk")
		    pc.give_item2(71017, 5)
               return
	   end
	   if los1 == 6 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("1 Sztuk")
		    pc.give_item2(71016)
               return
	   end
	   if los1 == 7 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("2 Sztuki")
		    pc.give_item2(71016, 2)
               return
	   end
	   if los1 == 8 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("3 Sztuki")
		    pc.give_item2(71016, 3)
               return
	   end
	   if los1 == 9 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("4 Sztuki")
		    pc.give_item2(71016, 4)
               return
	   end
	   if los == 10 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71016)
               say_reward("5 Sztuk")
		    pc.give_item2(71016, 5)
               return
	   end
	   if los1 == 11 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("1 Sztuka")
		    pc.give_item2(71015, 1)
               return
	   end
	   if los1 == 12 then
			 say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("2 Sztuki")
		    pc.give_item2(71015, 2)
               return
	   end
	   if los1 == 13 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("3 Sztuki")
		    pc.give_item2(71015, 3)
               return
	   end
	   if los1 == 14 then
		    say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("4 Sztuki")
		    pc.give_item2(71015, 4)
               return
	   end
	   if los1 == 15 then
		   say_title("Twoja Nagroda to: ")
               say_item_vnum(71015)
               say_reward("5 Sztuk")
		    pc.give_item2(71015, 5)
               return
	   end
          if los1 == 16 then
		   say_title("Twoja Nagroda to: ")
              say("Ulala Extra Bonus")
               say_item_vnum(71015)
               say_item_vnum(71016)
               say_item_vnum(71017)
               say_reward("Po 3 Sztuki")
		    pc.give_item2(71015, 3)
               pc.give_item2(71016, 3)
               pc.give_item2(71017, 3)
               return
	   end

						    end
				    end
		    end
               end
 end

z góry thx

p.s

proszę bez spoilerów bo nie wiem dlaczego ale żadnego nie mogę otworzyć

MarVexify · 4 Maja 2012

Nazwa Questa: WejscieDoSmoka.quest

Od LvL: 75

Witam chciałbym abyście mi napisali quest na wejście do komnaty smoka, niżej opisze co i jak.

Aby wejść do komnaty smoka potrzeba 3 x KretyKlucz (30179).

Komnata będzie zabezpieczona hasłem tak jak na pl jest,

maja 30minut aby zabić Berana-Setao(2493) po 35 minutach usuwa się hasło i znów można od nowa iść a tych co byli wywala .

Czaicie?

CraiNs · 4 Maja 2012

Nazwa Questa: WejscieDoSmoka.quest

Od LvL: 75

Witam chciałbym abyście mi napisali quest na wejście do komnaty smoka, niżej opisze co i jak.

Aby wejść do komnaty smoka potrzeba 3 x KretyKlucz (30179).

Komnata będzie zabezpieczona hasłem tak jak na pl jest,

maja 30minut aby zabić Berana-Setao(2493) po 35 minutach usuwa się hasło i znów można od nowa iść a tych co byli wywala .

Czaicie?

Nie,nikt nie czai

Vatu · 5 Maja 2012

Jak zrobić by otwierało mi się nowe okno.

Chodzi o takie okienko jak tu:

http://www.youtube.com/watch?v=xkPCkbVzoTA&list=UU7US3xxfuIWm5m7s5Qhhl5A&index=3&feature=plcp

Podczas zmiany bonusów tam gdzie sa one pokazane.

+-

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany