Pisanie / Poprawa Questów !

[Wojtek]

Nie działa, gdy klikam na sztabke nic mi sie nie wyswietla, ani nie dodaje kasy.

[N3ST0]

Zapewne gdzieś w bazie masz szlaczki

Naprawdę wytłumaczyłeś mi to ... chyba nikt nie byłby w stanie lepiej . -,-*

[Wojtek]

Dobra juz sobie poradziłem ale mam dwie sprawy dotyczace tego quest'a: http://wklej.to/PwLle

 

Po 1 nie usuwa itemku.

Po 2 chcialbym aby ta wiadomosc Otrzymales 1kk i posiadasz za duzo yang... wyświetlała się na czacie a nie w nowym oknie

 

Z góry dziękuje

[N3ST0]

Dobra juz sobie poradziłem ale mam dwie sprawy dotyczace tego quest'a: http://wklej.to/PwLle

 

Po 1 nie usuwa itemku.

Po 2 chcialbym aby ta wiadomosc Otrzymales 1kk i posiadasz za duzo yang... wyświetlała się na czacie a nie w nowym oknie

 

Z góry dziękuje

 

chat("Sztabka:")
 chat("Otrzymałeś 1KK yang.")
 pc.give_gold(1000000)
   else
 chat("Posiadasz za dużó yang. Kasa Ci się zbuguje.")
pc.remove_item(tutaj wpisz jaki item chcesz usunąć z eq tzn ID, a tuaj ilość PO SPACJI !)

[N3ST0]

Poprawi ktoś ?

 

quest metin begin

state start begin

when login or levelup with pc.level >= 30 begin

setstate(info)

end

end

state info begin

when letter begin

send_letter("Polowanie 30 lvl")

end

when button or info begin

say_title("Polowanie 30 lvl")

say("")

say("Gratulujemy! Wlasnie wbiles 30 lvl!")

say("Twoim zadaniem jest zabicie 5: ")

say_reward("Metinów Zazdrości")

local s = select("Przyjmuje", "Nie chce")

if s == 2 then

setstate(koniec)

end

if s == 1 then

setstate(opk)

end

end

end

state opk begin

when letter begin

send_letter("Polowanie 30 lvl")

end

when 8007.kill begin

local count = pc.getqf("ile")+1

if count < 5 then

pc.setqf("ile", count)

q.set_counter("Pozostało ", 5 - count)

else

setstate(list)

end

end

when button or info begin

say("Zabij 5: ")

say_reward("Metinów Zazdrości")

say("")

say_reward("Dotychczas zabiłeś: "..pc.getqf("ile").."")

end

end

state list begin

when letter begin

send_letter("Polowanie 30 lvl")

end

when button or info begin

say_title("Polowanie 30 lvl")

say("") say("Udalo ci sie! Gratulujemy! ")

say("Zgodnie z obietnicą nagroda przyznana. ")

pc.give_item2(2009, 1)

setstate(koniec)

end

end

state koniec begin

end

end

 

[JonyNawa1ony]

@ElvonPL, spróbuj:

http://wklej.to/AKg6o

[Avertus]

Napisze ktoś questa? Klikamy na medal konny jest 30% szans na ulepszenie poziomu konia. Medal można czytać co 6h. Max lvl konia to 21.

[x3PaiiNx]

Siemka.

Napisze mi ktoś questa żeby dropiły różne itemki i KD od + 0 do +3 z metków? Dam Lubię to!

[Avertus]

Siemka.

Napisze mi ktoś questa żeby dropiły różne itemki i KD od + 0 do +3 z metków? Dam Lubię to!

To dodajesz do mob_drop_item.txt

[motobi17]

when 20023.chat."Nowa Technika Ekstradowania Marmurów!" begin

say("Nareszcie!")

say("Udało mi się opracować zupełnie nową technikę")

say("Za jej pomocą mogę demontować Kamienie")

say("ekstradując z nich marmury !.")

wait()

say("Jeśli posiadasz Kamienie Dusz typu +0 ,1 ,2")

say("możesz je przynieśc do mnie a ja dzięki mojej")

say("genialnej technice stworzę marmur !.")

say("Nie czekaj bierz sie do pracy ! Marmury czekają")

say("Możesz zdobyć je niszcząc straszne marmury !")

 

end

dalem cos takiego do danego questa lecz u npc wyswietla sie tlyko tytuł a zawartosc nie wie ktos moze czemu ?? a dalasza czesc questa trybi normalnie ....

[x3PaiiNx]

2x UP

Ale różne mają itemki dropić, a nie wybrane przeze mnie

[JonyNawa1ony]

@motobi17, zamień to:

say("Udało mi się opracować zupełnie nową technikę")

na to:

say("Udało mi się opracować zupełnie nową technikę ")

oraz to:

say("Nie czekaj bierz sie do pracy ! Marmury czekają")

na to:

say("Nie czekaj bierz sie do pracy ! Marmury czekają ")

[motobi17]

DZX

[N3ST0]

Tu znowu ja :/

Czy mógłby ktoś tutaj coś poprawić? Sam nie wiem co , wszystko dobrze przy wgrywaniu questa tylko pozniej ten quest sie nie wyswietla ...:/

.Proszę też aby mi powiedziano gdzie popełniłem błąd.

 

quest rzecz begin

state start begin

when login or levelup with pc.level >= 10 begin

set_state(info)

end

end

 

state info begin

when letter begin

local v = find_npc_by_vnum(20011)

if v != 0 then

target.vid("__TARGET__", v, "Uriel")

end

send_letter("Przesylka Uriela")

end

 

when button or info begin

say_title("Pomoc dla Uriela")

say("Urielowi potrzebna jest twoja pomoc")

say("Udaj sie do niego w celu pozyskania")

say("dalszych informacji")

end

 

when __TARGET__.target.click or 20011.chat."Przesylka Uriela" begin

target.delete("__TARGET__")

say("Uriel")

say("Ohh")

say("Przybywasz w sama pore")

say("Potrzebuje twojej pomocy")

say("Zgraja zaprzysiezonych lucznikow")

say("ukradla moja przesylke w ktorej")

say("znajdowal sie skladnik potrzebny do moich badan")

say("")

say("Czy odzyskalbys dla mnie ta przesylke?")

say("Tak?")

say(Jaki jestem szczesliwy,wynagrodze twoja pomoc")

set_state(zabij)

end

end

 

state zabij begin

when letter begin

send_letter("Przesylka Uriela")

end

when button or info begin

say_title("Przesylka Uriela")

say("Zabijaj Zaprzysiezonych lucznikow dopoki")

say("nie oddadza przesylki Uriela")

end

 

when 302.kill with pc.countitem(30134)==0 begin

pc.give_item2(30134, 1)

chat("Gratulacje!")

chat("Odzyskales przesylke Ureila")

chat("Udaj sie do niego w celu uzyskania nagrody")

local v = find_npc_by_vnum(20011)

if v != 0 then

target.vid("__TARGET__", v, "Uriel")

end

set_state(uriel)

end

end

 

state uriel begin

when 20011.chat."Przesylka Uriela" with pc.count_item(30134) > 0 begin

say_title("Uriel:")

target.delete("__TARGET__")

say("Jak sie ciesze!")

say("Zdobyles moja przesylke")

say()

say("Oto twoja nagroda")

pc.remove_item(30134, 1)

if pc.job == 0 then

pc.give_item2(11219, 1)

elseif pc.job == 1 then

pc.give_item2(11419, 1)

elseif pc.job == 2 then

pc.give_item2(11619, 1)

elseif pc.job == 3 then

pc.give_item2(11819, 1)

end

set_state(__COMPLETE__)

end

end

state __COMPLETE__ begin

end

end

 

 

 

PORADZIŁEM SOBIE NIEAKTUALNE

[Senthora]

Witam potrzebuje takiego questa ze np klikam na item id 911 i wyswietla mi sie quest bla bla bla wpisz nazwe itemu ktory ma dropic z wszystkich mobow,potem podaj szanse w % i przez jaki czas ma dropic dany item.

 

Z gory dzieki,daje limit like i 5 w profku

[Venir]

xxx nie aktualne

[Mentor™]

Wie ktoś dlaczego po aktywowaniu tego timera przenosi tam gdzie jest to wskazane, ale nie pojawia się komunikat z d.notice, ani po zabiciu 2593 też nie pojawia się komunikat ani nie dropi 30312... dalsza część questu działa po przyzwaniu sobie totemu komendą...

 

ma ktoś jakieś pomysły co jest nie tak? ;/

when devils_catacomb_goto_ebene5.timer begin
d.new_jump_all(209, 3917, 12925)
d.spawn_mob(30102, 848, 739)
d.notice("Znajdź i zabij Tartara, aby otrzymać Totem! ")
timer("dc4", 600)
d.regen_file("data/dungeon/devilcave/dc_regen_ebene5.txt")
local tartaros = number(1,4)
if tartaros==1 then
d.spawn_mob(2593, 991, 848)
elseif tartaros==2 then
d.spawn_mob(2593, 999, 652)
elseif tartaros==3 then
d.spawn_mob(2593, 848, 577)
elseif tartaros==4 then
d.spawn_mob(2593, 703, 644)
elseif tartaros==5 then
d.spawn_mob(2593, 692, 817)
end
end
when 2593.kill with pc.get_map_index() == 209 begin
d.notice("Tartar został pokonany! ")
game.drop_item(30312, 1)
end

[Senthora]

Witam potrzebuje takiego questa ze np klikam na item id 911 i wyswietla mi sie quest bla bla bla wpisz nazwe itemu ktory ma dropic z wszystkich mobow,potem podaj szanse w % i przez jaki czas ma dropic dany item.

 

Z gory dzieki,daje limit like i 5 w profku

[AthlonX2]

Czy ktos moze mi pomoc z questem na wierzchowce ?

 

Napisalem juz szkielet tylko nie wiem jak dodac wierzchowce do pieczeci aby to dzialalo.. moze nie wyrazilem sie jasno, oto kod

 

quest wierzchowce begin
state start begin
when 90000.use or 90001.use or 90002.use or 90003.use or 90004.use or 90005.use or 90006.use or 90007.use or 90008.use or 90009.use or
90013.use or 90014.use or 90015.use or 90016.use or 90017.use or 90018.use or 90019.use or 90020.use or 90021.use or 90022.use
with not pc.is_polymorphed() begin
end
when login begin
if item.select_cell(97) then
if 90000 <= item.vnum and item.vnum <= 90022 then
pc.unmount(id_wierzchowca) or pc.unmount(id_wierzchowca_2) ) or pc.unmount(id_wierzchowca_2) or pc.unmount(id_wierzchowca_3)
end
end
if item.select_cell(98) then
if 90000 <= item.vnum and item.vnum <= 90022 then
pc.unmount(id_wierzchowca) or pc.unmount(id_wierzchowca_2) ) or pc.unmount(id_wierzchowca_2) or pc.unmount(id_wierzchowca_3)
end
end
end
if pc.get_armor() == 11901 or pc.get_armor() == 11902 then
chat("Aby załozyć pieczęć zdejmij swóją suknię!")
return
elseif pc.get_armor() == 11903 or pc.get_armor() == 11904 then
chat("Aby załozyć pieczęć zdejmij swój garnitur!")
return
end

end
end

 

Czy to jest wlasciwe ?

 

pc.unmount(id_wierzchowca) or pc.unmount(id_wierzchowca_2) ) or pc.unmount(id_wierzchowca_2) or pc.unmount(id_wierzchowca_3)

[Mlodzieniec94]

 

 

quest pajaki begin

state start begin

when 20083.chat."Pajęcza Komnata" with pc.get_level() >= 40 and pc.get_level() <= 99 and pc.get_map_index() == INDEX MAPY begin

say_title("Jegal-Tunseok:")

say("Pajęcza komnata jest pełna mrocznych pająków")

say("które za wszelką cenę będą starały się obronić ")

say("swoje potomstwo!")

say_reward("Aby wejść potrzebujesz Sieć pustynnego pająka.!")

say_reward("inaczej reszta cię rozpozna!")

say_item_vnum(30104)

local s=select("Jestem gotów!", "Gdzie znajdę tą sieć?", "Jednak nie..")

if s == 1 and pc.count_item(30104) >= 1 then

pc.setqf("pajecza", 1)

pc.remove_item("30104", 1)

d.join(84)

end

if s == 2 then

say_title("Jegal-Tunseok:")

say("Skąd mam to wiedzieć?")

say("won")

command("quit")

end

end

when login with pc.getqf("pajecza") == 1 begin

pc.setqf("pajecza", 2)

d.join(84)

end

when login with pc.in_dungeon() and pc.getqf("pajecza") == 2 begin

pc.setqf("time1", get_time())

pc.setqf("pajecza", 0)

notice_in_map("Pająki bacznie pilnują swoich jaj. Aby zmusić Króla Pająków do")

notice_in_map("przyjścia musisz zniszczyć 6 Pajęczych Jaj!")

d.regen_file("data/dungeon/pajaki.txt")

d.regen_file("data/dungeon/jajka.txt")

d.setf("pajecze_jaja", 6)

d.setf("pajecze_wyzwanie", 1)

end

when 2095.kill with d.getf("pajecze_wyzwanie") == 1 begin

d.setf("pajecze_jaja", d.getf("pajecze_jaja") - 1)

if d.getf("pajecze_jaja") <= 0 then

d.setf("pajecze_wyzwanie", 2)

notice_in_map("Wywołaliscie gniew Króla Pająków! Przybył on by was zgładzić...")

d.regen_file("data/dungeon/pajaki.txt")

d.spawn_mob(2092, 368, 585)

else

notice_in_map("Jajo zostało zniszczone! Pozostała ilość jaj do zniszczenia: "..d.getf("pajecze_jaja").."")

notice_in_map("Pająki próbują obronić swoje potomstwo!")

d.regen_file("data/dungeon/jajko.txt")

end

end

when 2092.kill with d.getf("pajecze_wyzwanie") == 2 begin

pc.setqf("time2", get_time())

notice_in_map("Król Pająków został zgładzony!")

notice_in_map("Pomyślnie wykonałeś całe zadanie! Za 10 sekund zostaniesz przeniesiony do Miasta!")

timer("miasteczko", 5)

end

when miasteczko.timer begin

pc.setqf("zakonczene", 1)

d.exit_all_to_start_position()

end

when login with pc.getqf("zakonczene") == 1 begin

local x = pc.getqf("time1")

local y = pc.getqf("time2")

local s = pc.setqf("time3", y-x)

local czas = pc.getqf("time3")

say_title("Wynik wyzwania")

say_reward("Gratulacje "..pc.get_name().." !")

say("Pomyślnie ukończyłeś Pajęcze Wyzwanie z czasem "..czas.." Sekund!")

notice_all(""..pc.get_name().." ukończył Pajęcze Wyzwanie z czasem "..czas.." sekund !")

pc.setqf("zakonczene", 0)

end

end

end

 

 

 

 

Mógłby ktoś zerknąć?

[HIGHLANDER]

quest stone begin
               state start begin
                               when login or levelup with pc.level >= 30 begin
                                               set_state(info)
                               end
               end

               state info begin
                               when letter begin
                                               local v = find_npc_by_vnum(20355)
                                               if v != 0 then
                                                               target.vid("__TARGET__", v, "Kapitan")
                                               end
                                               send_letter("Pierwsze wyzwanie")
                               end

                               when button or info begin
                                               say_title("Pierwsze wyzwanie")
                                               say("Gratulacje Ci osiągnołeś 30level")
                                               say("Zabij 80 dzików i przyjdz do mnie!")
                                               say("Czekam na Ciebie!" Wracaj szybko nagroda czeka !)
                               end


                               state szpon begin
                                                               when letter begin
                                                               send_letter("Zabij 80 dzików")
                                               end
                                               when button or info begin
                                                                               say_title("Musisz zabić 80 dzików")
                                                                               say("Nie zwlekaj z tą misją...")
                                                                               say("Nagroda jest cenna")
end

Potrzebuje teraz linijki z rozpoczęciem qesta czymi musze zabić 80 dzików prosze o szybkie napisanie tej linijki...

Prosze o sprawdzenie tego co napisałem

[Senthora]

Siema proszę o napisanie questa:

-Klika sie na item id xxx i pojawia sie teskt bla bla bla ,wpisz id itemu,potem szanse w % na drop,i czas przez jaki ma dropić item (najlepiej aby pisalo ze event xxx zostal wlaczony)

Głównie chodzi oto że gdy wypełnie pola to aktywuje mi sie event że z wszystkich mobów w grze bd dropił dany przedmiot z szansą w % oraz przez xxx czasu.

Daje limit like przez tydzień oraz 5w profilu

[Cort]

@HIGHLANDER

http://wklej.to/YZMP6

@Senthora

http://wklej.to/6Uclc

W polu na czas, podawaj w godzinach (np 1 = godzina). A i szansa na drop jest ustawiona tak, że jeśli wylosowana liczba z limitu co podałeś, jest mniejsza lub równa 10, dropi item. Dodaj do quest_functions

game.drop_item_with_ownership

.

[Magiczna Panda]

Proste o napisanie questa ,

 

Idzie sie na 95 levelu do xxid npc/

i klikasz na misje xxx /

i muszisz zabic 500 xxx

i w zamian bon na luda 35 otrzymamy ;f

[Mlodzieniec94]

 

 

quest pajaki begin

state start begin

when 20083.chat."Pajęcza Komnata" with pc.get_level() >= 40 and pc.get_level() <= 99 and pc.get_map_index() == INDEX MAPY begin

say_title("Jegal-Tunseok:")

say("Pajęcza komnata jest pełna mrocznych pająków")

say("które za wszelką cenę będą starały się obronić ")

say("swoje potomstwo!")

say_reward("Aby wejść potrzebujesz Sieć pustynnego pająka.!")

say_reward("inaczej reszta cię rozpozna!")

say_item_vnum(30104)

local s=select("Jestem gotów!", "Gdzie znajdę tą sieć?", "Jednak nie..")

if s == 1 and pc.count_item(30104) >= 1 then

pc.setqf("pajecza", 1)

pc.remove_item("30104", 1)

d.join(84)

end

if s == 2 then

say_title("Jegal-Tunseok:")

say("Skąd mam to wiedzieć?")

say("won")

command("quit")

end

end

when login with pc.getqf("pajecza") == 1 begin

pc.setqf("pajecza", 2)

d.join(84)

end

when login with pc.in_dungeon() and pc.getqf("pajecza") == 2 begin

pc.setqf("time1", get_time())

pc.setqf("pajecza", 0)

notice_in_map("Pająki bacznie pilnują swoich jaj. Aby zmusić Króla Pająków do")

notice_in_map("przyjścia musisz zniszczyć 6 Pajęczych Jaj!")

d.regen_file("data/dungeon/pajaki.txt")

d.regen_file("data/dungeon/jajka.txt")

d.setf("pajecze_jaja", 6)

d.setf("pajecze_wyzwanie", 1)

end

when 2095.kill with d.getf("pajecze_wyzwanie") == 1 begin

d.setf("pajecze_jaja", d.getf("pajecze_jaja") - 1)

if d.getf("pajecze_jaja") <= 0 then

d.setf("pajecze_wyzwanie", 2)

notice_in_map("Wywołaliscie gniew Króla Pająków! Przybył on by was zgładzić...")

d.regen_file("data/dungeon/pajaki.txt")

d.spawn_mob(2092, 368, 585)

else

notice_in_map("Jajo zostało zniszczone! Pozostała ilość jaj do zniszczenia: "..d.getf("pajecze_jaja").."")

notice_in_map("Pająki próbują obronić swoje potomstwo!")

d.regen_file("data/dungeon/jajko.txt")

end

end

when 2092.kill with d.getf("pajecze_wyzwanie") == 2 begin

pc.setqf("time2", get_time())

notice_in_map("Król Pająków został zgładzony!")

notice_in_map("Pomyślnie wykonałeś całe zadanie! Za 10 sekund zostaniesz przeniesiony do Miasta!")

timer("miasteczko", 5)

end

when miasteczko.timer begin

pc.setqf("zakonczene", 1)

d.exit_all_to_start_position()

end

when login with pc.getqf("zakonczene") == 1 begin

local x = pc.getqf("time1")

local y = pc.getqf("time2")

local s = pc.setqf("time3", y-x)

local czas = pc.getqf("time3")

say_title("Wynik wyzwania")

say_reward("Gratulacje "..pc.get_name().." !")

say("Pomyślnie ukończyłeś Pajęcze Wyzwanie z czasem "..czas.." Sekund!")

notice_all(""..pc.get_name().." ukończył Pajęcze Wyzwanie z czasem "..czas.." sekund !")

pc.setqf("zakonczene", 0)

end

end

end

 

 

 

 

Mógłby ktoś zerknąć?

Ponawiam