Szukam questa na konia jak na pl

[Domin0]

Szukam questa ja konia jak na pl

że by była misja na zabicie 20 łuczników

i misje na lvl konia i że by można było je wykonywać co 6h

widziałem na forum gdzieś podobnego questa ale mi nie działał.

Z góry dzięki.

[Phoenix.]

 

 

quest horse_levelup begin
	state training1 begin
		when letter begin
			q.set_counter("Bo", 5-pc.getqf("kill_count"))
		end
		when 492.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Bo", 5-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Bo!")
			q.set_title("Zabij Bo!")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Bo!"..locale.NORMAL_COLOR)
			say("Zabij 5 Bo.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end
		when 492.kill with pc.getf("horse_levelup","kill_count") >= 5 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training2 begin
		when letter begin
			q.set_counter("Chuong", 5-pc.getqf("kill_count"))
		end
		when 494.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Chuong", 5-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Chuong!")
			q.set_title("Zabij Chuong!")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Chuong!"..locale.NORMAL_COLOR)
			say("Zabij 5 Chuong.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end

		when 494.kill with pc.getf("horse_levelup","kill_count") >= 5 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training3 begin
		when letter begin
			q.set_counter("Elit. Ork Generał ", 10-pc.getqf("kill_count"))
		end
		when 635.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Elit. Ork Generał ", 10-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Elit. Ork Generał ")
			q.set_title("Zabij Elit. Ork Generał ")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Elit. Ork Generał "..locale.NORMAL_COLOR)
			say("Zabij 10 Elit. Ork Generał.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end

		when 635.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training4 begin
		when letter begin
			q.set_counter("Czarny Ork", 10-pc.getqf("kill_count"))
		end
		when 636.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Czarny Ork", 10-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Czarny Ork!")
			q.set_title("Zabij Czarny Ork!")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Czarny Ork!"..locale.NORMAL_COLOR)
			say("Zabij 10 Czarny Ork.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end

		when 636.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training5 begin
		when letter begin
			q.set_counter("Ezot. Dręczyciel", 10-pc.getqf("kill_count"))
		end
		when 706.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Ezot. Dręczyciel", 10-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Ezot. Dręczyciel")
			q.set_title("Zabij Ezot. Dręczyciel")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Ezot. Dręczyciel"..locale.NORMAL_COLOR)
			say("Zabij 10 Ezot. Dręczyciel.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end

		when 706.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training6 begin
		when letter begin
			q.set_counter("Szpon. Trujący Pająk", 10-pc.getqf("kill_count"))
		end
		when 2034.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Szpon. Trujący Pająk", 10-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Szpon. Trujący Pająk")
			q.set_title("Zabij Szpon. Trujący Pająk")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Szpon. Trujący Pająk"..locale.NORMAL_COLOR)
			say("Zabij 10 Szpon. Trujący Pająk.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end

		when 2034.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training7 begin
		when letter begin
			q.set_counter("Pustynny Zawadiaka", 20-pc.getqf("kill_count"))
		end
		when 2108.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Pustynny Zawadiaka", 20-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Pustynny Zawadiaka")
			q.set_title("Zabij Pustynny Zawadiaka")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Pustynny Zawadiaka"..locale.NORMAL_COLOR)
			say("Zabij 20 Pustynny Zawadiaka.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end

		when 2108.kill with pc.getf("horse_levelup","kill_count") >= 20 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training8 begin
		when letter begin
			q.set_counter("Lodowy Golem", 10-pc.getqf("kill_count"))
		end
		when 1107.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Lodowy Golem", 10-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Lodowy Golem")
			q.set_title("Zabij Lodowy Golem")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Lodowy Golem"..locale.NORMAL_COLOR)
			say("Zabij 10 Lodowy Golem.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end
		when 1107.kill with pc.getf("horse_levelup","kill_count") >= 10 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state training9 begin
		when letter begin
			q.set_counter("Walczący Tygrys", 20-pc.getqf("kill_count"))
		end
		when 2203.kill begin
			pc.setqf("kill_count", pc.getqf("kill_count")+1)
			q.set_counter("Walczący Tygrys", 20-pc.getqf("kill_count"))
		end
		when enter begin
			pc.setqf("kill_count", 0)
		end
		when leave begin
			q.done()
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Zabij Walczący Tygrys")
			q.set_title("Zabij Walczący Tygrys")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Zabij Walczący Tygrys"..locale.NORMAL_COLOR)
			say("Zabij 20 Walczący Tygrys.")
			say("Kiedy już je zabijesz, udaj się ")
			say("do Stajennego, by zakończył trening.")
		end
		when 2203.kill with pc.getf("horse_levelup","kill_count") >= 20 begin
			setstate(report)
		end
		when unmount begin
			setstate(failure)
		end
	end
	state start begin
		when 20349.chat."Trening Konia" with horse.get_grade()==2 begin
			if horse.get_level()==20 then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Nie możesz trenować konia Militarnego.")
				say("")
			elseif pc.countitem("50050")<1 then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Nie mosiadasz żadnego Medalu Konnego.")
				say("")
			elseif get_time()<pc.getqf("next_time") then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Nie minął jeszcze wymagany czas do następnego")
				say("treningu konia. Daj mu trochę odpocząć!")
				say("")
			elseif horse.get_stamina_pct()<=10 then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Twój koń jest zmęczony.")
				say("")
			elseif horse.get_health_pct()<=10 then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Twój koń ma zbyt mało życia na trening.")
				say("")
			elseif horse.is_riding()==0 then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Musisz wejść na konia.")
			elseif (horse.get_level()>=11 and horse.get_level()<=19) then
				say_title("Stajenny:")
				----"12345678901234567890123456789012345678901234567890"|
				say("Twój koń może być wytrenowany!")
				say("Musisz wykonać tylko na nim zadanie.")
				say("Już Ci przydzielam zadanie...")
				say("Proszę! Oto ono.")
				say("")
				if is_test_server() then
					pc.setqf("next_time", get_time()+10)
				else
					pc.setqf("next_time", get_time()+number(16, 32)*60*60)
				end
				if horse.get_level()==11 then
					setstate(training1)
				elseif horse.get_level()==12 then
					setstate(training2)
				elseif horse.get_level()==13 then
					setstate(training3)
				elseif horse.get_level()==14 then
					setstate(training4)
				elseif horse.get_level()==15 then
					setstate(training5)
				elseif horse.get_level()==16 then
					setstate(training6)
				elseif horse.get_level()==17 then
					setstate(training7)
				elseif horse.get_level()==18 then
					setstate(training8)
				elseif horse.get_level()==19 then
					setstate(training9)
				end
			end
		end
	end
	state failure begin
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Trening nieudany!")
			q.set_title("Trening nieudany!")
			q.start()
		end
		when button or info begin
			say_title("Stajenny:")
			----"12345678901234567890123456789012345678901234567890"|
			say("Trening Konia Bojowego nie powiódł się.")
			say("Aby zrobić go jeszcze raz udaj się do")
			say("Stajennego i z nim porozmawiaj.")
			say("")
			setstate(start)
			q.done()
		end
	end
	state report begin
		when letter begin
			local v=find_npc_by_vnum(20349)
			if 0==v then
			else
				target.vid("__TARGET__", v, "Stajenny")
			end
		end
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Wróć do Stajennego")
			q.set_title("Wróć do Stajennego")
			q.start()
		end
		when button or info begin
			say(locale.NOTICE_COLOR.."Wróć do Stajennego"..locale.NORMAL_COLOR)
			say("Twój trening został zakończony.")
			say("Musisz teraz wrócić do Stajennego.")
		end
		when __TARGET__.target.click begin
			target.delete("__TARGET__")
			say_title("Stajenny:")
			say("Wszystkie potwory zabite?")
			say("Znakomicie.")
			setstate(reward)
			q.done()
		end
	end
	state reward begin
		when letter begin
			setskin(NOWINDOW)
			makequestbutton("Nagroda za trening")
			q.set_title("Nagroda za trening")
			q.start()
		end
		when button begin
			say(locale.NOTICE_COLOR.."Nagroda za trening"..locale.NORMAL_COLOR)
			if horse.get_level()<=10 then
				say("Poziom twojego konia jest za niski.")
			elseif horse.get_level()>=20 then
				say("Poziom twojego konia jest za wysoki.")
			elseif (horse.get_level()>=11 and horse.get_level()<=19) then
				local s=number(1, 2)
				if 1>=s then -- 50.00% (1/2)
					say("Trening nieudany...")
					say("")
					say("Spróbuj jeszcze raz!")
					pc.setqf("next_time", 0)
				elseif 2>=s then -- 50.00% (1/2)
					say("Trening udany.")
					if pc.countitem("50050")>=1 then
						char_log(0, "HORSE_ADVANCE", "BEGIN")
						pc.removeitem("50050", 1)
						char_log(0, "HORSE_ADVANCE", "DEC 50050 1")
						horse.unride()
						horse.advance()
						horse.ride()
						char_log(0, "HORSE_ADVANCE", "INC horse_advance 1")
						char_log(0, "HORSE_ADVANCE", "END")
						say("Twój koń ma teraz "..(horse.get_level()).." poziom.")
						say("")
						if horse.get_level()==20 then
							say("Twój koń nie może być trenowany")
							say("w ten sposób!")
							pc.setqf("next_time", 0)
						else
							say("Szkol dalej konia, tak aby osiągnął ")
							say("20 poziom. Wtedy będziesz mógł go ")
							say("wymienić na Konia Militarnego.")
						end
					else
						say("")
					end
				end
			end
			setstate(start)
			q.done()
		end
	end
	state __COMPLETE__ begin
		when enter begin
			q.done()
		end
	end
end