[Quest] Straszne Potwory

[Tolkien]

Quest polega na zabiciu 10 Tysięcznych Wojowników dostajemy go od 90 lvl

w nagrode dostajemy 1kkk więc prosze :

 

 

quest Dusze zmarłych begin
state start begin
 when login or levelup or enter with pc.get_level() >= 90 begin
  setstate( gototeacher )
 end
end
state gototeacher begin
 when letter begin
  send_letter("Okropne Bestie")
  local v=find_npc_by_vnum(20016)
  if 0==v then
  else
target.vid("__TARGET__", v, "Idź do ")
  end
 end
 when button or info begin
		say_title(":")
  say("Idź do kowala!")
 end
 when __TARGET__.target.click begin
  target.delete("__TARGET__")
  say_title(":")											l
		say("Witaj straszne bestie ukradły mi kowadło. Nie wiem jakie to były stwory chociaż podejrzewam Tysięcznych Wojowników sam bym się z nimi rozprawił lecz nie wiem gdzie one się znajdują. Pomożesz mi ? ")
		wait()
		say("Wiem od Strażnika wsi że wejście do nich trzeba szukać na Wężowym polu.")
  say_reward("Znajdź gdzie znajdują się tysięczni Wojownicy i zabij 10 z nich ")
  say("")
  set_state(kill)
  pc.setqf("state", 0)
  q.set_counter("Pozostało: ", 0)
 end
end
state kill begin
 when letter begin
  send_letter("")
 end
 when button or info begin
  say_title(":")
  say("Musisz 10  zabić")
  say("")
  say_reward(..pc.getqf("state").." z 10 typu   zabitych")
  say("")
 end
 when 1403.kill begin
  local count = pc.getqf("state") + 1
  if count <= 10 then
pc.setqf("state", count)
q.set_counter("Pozostało ", 10 - count)
if count == 10 then
 say_title(":")
 say("")
				say("Przyjdź do mnie teraz, proszę")
 set_state(gototeacher2)
end
  end
 end
 when 20016.chat." Polowanie nie(?)." with pc.getf("main_quest_lv2","state") < 10 begin
  say_title(":")
		say("Znalazłeś moje kowadło ? ")
if not npc.is_pc() then
wait()
say_title(":")
say("Przyjmujesz zadanie?")
local s = select("Tak", "Nie")
if s == 1 then
 set_state(gototeacher2)
end
  end
 end
 when 20016.chat." Polowanie nie(?)." with pc.getf("main_quest_lv2","state") >= 10 begin
  say_title(":")
  say("Szkoda że go nie znalazłeś ale przygotowałem dla Ciebie nagrodę ")
  set_state(gototeacher2)
 end
end
state gototeacher2 begin
 when letter begin
  local v=find_npc_by_vnum(20016)
  if 0==v then
  else
target.vid("__TARGET__", v, "Idź do ")
  end
 end
 when letter begin
  send_letter("Okropne Bestie")
 end
 when button or info begin
  say_title("Okropne Bestie")
  say("Jeśli nie znalazłeś kowdała nie musisz odchodzić ")
 end
 when __TARGET__.target.click begin
  target.delete("__TARGET__")
  say("Jeśli nie znalazłeś kowdała nie musisz odchodzić ")
		   set_quest_state("levelup","run") -- levelup quest wieder starten
  pc.change_money( 100000000 )
		say_reward("Yang 1000000000")
				 clear_letter()
  set_state( __COMPLETE__ )
  pc.setqf("state", 0)
 end
end
state __COMPLETE__ begin
end
end

[Sceptyk]

Działa, dobra robota. Można pozwolić sobie na Edycje Questu?

[Tolkien]

@Up

 

jasne nie zapomnij dać " Lubie to " !

[PavloX]

a potrafisz zrobić questa co dajesz item a on cie teleportuje na mapke ??

[Tolkien]

@up

 

mogę zrobić tylko powiedz

jaki itemy i ile ?

[PavloX]

30120 i tylko 1

 

i npc 9997

[z4z0l]

Działa, dobra robota. Można pozwolić sobie na Edycje Questu?

Wątpię

say("Musisz 10 zabić")

Przez qf przejdzie ale w grze nie będzie poprawnie. Quest śmieszny, za długie say'e i wgl ...

[old_kwiatosz]

Tyle błędów, że się załamie....

when 20016.chat." Polowanie nie(?)." with pc.getf("main_quest_lv2","state") < 10 begin
  say_title(":")
  say("Znalazłeś moje kowadło ? ")
  if pc.is_gm() then
   wait()
   say_title(":")
   say("Przyjmujesz zadanie?")
   local s = select("Tak", "Nie")
   if s == 1 then
set_state(gototeacher2)
   end
  end
 end

Misje może dokończyć tylko gm?

Ten quest jest robiony niemieckim generatorem, więc jest do dupy.

[Unikatowy]

zróbcie jeden temat z questami bo co chwile jakieś nowe wychodzą i znikają w tych wszystkich stronach

[Nigahiga]

say("Przyjdź do mnie teraz, proszę")

No na pewno działa..

 

@edit

z resztą wystarczy sam początek:

quest Dusze zmarłych beign

[xXAsparteXx]

quest Dusze zmarłych begin

Ten quest nie ma prawa działać...

[™Rampager]

set_quest_state("levelup","run") -- levelup quest wieder starten

 

niemiecki, nawet gosciu spolszczyc nie umie