[Poprawa] 2 Moje questy

[Dragonir119]

Cześć, chciałbym żeby ktoś sprawdził moje questy czy nie ma w nich błedu, itp.

 

Quest 1:

 

 

quest handzbrquest2 begin
state start begin
when login or levelup with pc.level >= 2 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Zaginiona Książka")
local v = find_npc_by_vnum(9008)
if v != 0 then
target.vid("tar", v, "Tar")
end
end
when button or info begin
say_title("Udaj się do Handlarza Zbroją")
say("Handlarz Zbrojami Cię potrzebuje.")
say("Idź do niego i pomuż mu.")
end
when tar.target.click begin
target.delete("tar")
npc.name()
say("Witaj, czy mógłbyś mi pomóc?")
say("Parę dni temu gdy wracałem od przyjaciela")
say("zostałem zaatakowany przez watahę")
say("Dzikich Psów.")
say("Gdy uciekałem zgubiłem bardzo ważną książkę,")
say("mianowicie Podręcznik Płatnerza.")
say_item_vnum(99304)
wait()
say("Wiem że nie powinienem cię o to prosić,")
say("ale sam nie dam rady jej odzyskać.")
say("Więc, czy mógłbyś ją dla mnie odzyskać?")
if select(locale.yes,locale.no) == 1 then
npc.name()
say("Wspaniale! Czekam z niecierpliwością!")
set_state(run)
else
npc.name()
say("No cóż, poszukam więc kogoś innego.")
set_state(complete)
end
end
end
state run begin
when letter begin
send_letter("Zaginiona Książka")
end
when button or info begin
say_title("Zaginiona Książka")
say("Handlarz Zbrojami zgubił Podręcznik Płatnerza,")
say("podczas ucieczki przed watahą Dzikich Psów")
say_item_vnum(99304)
say_reward("Zdobyć ją możesz zabijając Dzikie Psy")
end
when kill with npc.get_race() == 101 begin
if math.random(100) < 25 then
pc.give_item2(99304)
say_title("Zaginiona Książka")
say("Odzyskałeś/aś książkę, idż do Handlarza Zbroją.")
say_item_vnum(99304)
set_state(reward)
end
end
end
state reward begin
when letter begin
send_letter("Zaginiona Książka")
local v = find_npc_by_vnum(9008)
if v != 0 then
target.vid("tar", v,"Tar")
end
end
when button or info begin
say_tittle("Zaginiona Książka")
say("Zdobyłeś/aś książkę, oddaj ją Handlarzowi")
end
when tar.target.click or 9008.chat."Mam Książkę!" with pc.count_item(99304) >=1 begin
target.delete("tar")
npc.name()
say("Wspaniale! Wiedziałem że sobie poradzisz.")
say("Za pomoc należy ci się nagroda.")
say("Pamiętaj że mój sklep jest zawsze otwarty")
say("dla ludzi takich jak Ty. Gdybyś potrzebował")
say("zbroji, wiesz gdzie mnie szukać.")
say_reward("Otrzymałeś/aś:
say_reward("3.000 punktów doświadczenia")
say_reward("10.000 Yang")
pc.give_exp2(3000)
pc.change_money(10000)
set_state(complete)
end
end
state complete begin
end
end

 

 

Quest 2:

 

 

quest handbroquest3 begin
state start begin
when login or levelup with pc.level >= 3 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Niebezpieczna Podróż")
local v = find_npc_by_vnum(9007)
if v != 0 then
target.vid("tar", v, "Tar")
end
end
when button or info begin
say_title("Udaj się do Handlarza Bronią")
say("Handlarz Bronią Cię potrzebuje.")
say("Idź do niego i pomuż mu.")
end
when tar.target.click begin
target.delete("tar")
npc.name()
say("Witaj, czy mógłbyś mi pomóc?")
say("Parę dni temu wysłałem posłańca do drugiej")
say("wioski by przyniósł mi bardzo ważny przedmiot")
say("do wykucia miecza.")
say("Jednak gry wracał został zaatakowany przez")
say("stado wilków.")
say("Udało mu się uciel ale niestety zgubił to,")
say("a mianowicie Rękojeść Miecza.")
say_item_vnum(99305)
wait()
say("On nie da rady go odzyskać, a ja nie")
say("mogę opuszczać mojego stanowiska.")
say("Więc, czy mógłbyś to dla mnie odzyskać?")
if select(locale.yes,locale.no) == 1 then
npc.name()
say("Wspaniale! Czekam z niecierpliwością!")
set_state(run)
else
npc.name()
say("No cóż, poszukam więc kogoś innego.")
set_state(complete)
end
end
end
state run begin
when letter begin
send_letter("Niebezpieczna Podróż")
end
when button or info begin
say_title("Niebezpieczna Podróż")
say("Posłaniec Handlarza Bronią zgubił Rękojeść Miecza")
say("podczas ucieczki przed stadem wilków.")
say_item_vnum(99305)
say_reward("Zdobyć ją możesz zabijając Głodne Wilki")
end
when kill with npc.get_race() == 172 begin
if math.random(100) < 25 then
pc.give_item2(99305)
say_title("Niebezpieczna Podróż")
say("Odzyskałeś/aś rękojeść, idż do Handlarza Bronią.")
say_item_vnum(99305)
set_state(reward)
end
end
end
state reward begin
when letter begin
send_letter("Niebezpieczna Podróż")
local v = find_npc_by_vnum(9007)
if v != 0 then
target.vid("tar", v,"Tar")
end
end
when button or info begin
say_tittle("Niebezpieczna Podróż")
say("Zdobyłeś/aś rękojeść, oddaj ją Handlarzowi")
end
when tar.target.click or 9007.chat."Mam Rękojeść!" with pc.count_item(99305) >=1 begin
target.delete("tar")
npc.name()
say("Światnie! Dzięki tobie wykonam zamówienie.")
say("Za pomoc należy ci się nagroda.")
say("Pamiętaj że mój sklep jest zawsze otwarty")
say("dla ludzi takich jak Ty. Gdybyś potrzebował")
say("broni, wiesz gdzie mnie szukać.")
say_reward("Otrzymałeś/aś:
say_reward("5.000 punktów doświadczenia")
say_reward("10.000 Yang")
pc.give_exp2(5000)
pc.change_money(10000)
set_state(complete)
end
end
state complete begin
end
end

 

 

PS. Dodam że w nich zostały użyte nowe przedmioty.

[z4z0l]

W jakim celu piszesz te questy i oddajesz je do sprawdzenia? Zaczynasz "przygodę" z programowaniem i nie możesz tego nawet testować więc zastanów się, czy Ci się to przyda...

say_title("Udaj się do Handlarza Zbroją")

nie zadziała