Pisanie / Poprawa Questów !

[kolozmetka]

DLA KOSSIKA!!!

http://wklej.to/ClaRL powinno dziala jak cos pisz na pw pomoge..!

[z4z0l]

kolo lepiej wyjdź

 

http://wklej.to/E0DeG

[zabujcax]

Wiem, że to długi questa, ale bardzo proszę żeby go ktoś przejrzał. Chodzi o to, że po wbiciu 70LVl nie pojawia się list z boku( jeśli były by inne błędy prosiłbym o poprawienie)

 

 

http://wklej.to/SXA6h

 

 

[JonyNawa1ony]

zabujcax, zamień to:

when login or levelup with pc.level >= 70 

na to:

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

)

[zabujcax]

Poprawiłem to ale dalej mi wywala bład o co kaman?

 

http://wklej.to/j4ODR

[Mateo193]

Poprawiłem to ale dalej mi wywala bład o co kaman?

 

http://wklej.to/j4ODR

A może dałbyś SS błędu z konsoli bo widać quest przerabiany a nikomu się nie chce przeglądać linijki po linijce

[z4z0l]

say_reward("Do tej pory dostarczyłeś ".." "10..pc.getqf("collect_count ").." Konarów Zelkova. ")

na :

say_reward("Do tej pory dostarczyłeś "..10-pc.getqf("collect_count ").." Konarów Zelkova. ")

 

w 99 linijce zrób enter aby oddzielić enda od whena

 

więcej 'błędów' nie widzę, podaj wynik z konsoli

[NiePowiemxD]

Chcialbym questa w ktorym bedzie cos takiego ze idziesz do jakiegos npc i wypelniasz u niego misje np. na zabicie 20 metinow i za ktora dostajesz bonus 100k hp, 1000wartosci ataku i 1000defa na stałe... i druga misja za ktora musisz zabic np. 15 bossów i za nia dostajesz +100% na ludzi i 100% na kryta i tez na stałe

[Gość piotr9821]

Kto poprawi ten quest plis fast

quest asd begin
state start begin
when 70022.use begin
local x = pc.get_local_x()+1
local y = pc.get_local_y()-1
mob.spawn 20091 , x, y, 0, 0, 1)
timer("zabity", 300)
end
when zabity.timer begin
npc.purge()
end
end
end
end

[Sunushi]

Kto poprawi ten quest plis fast

quest asd begin
state start begin
when 70022.use begin
local x = pc.get_local_x()+1
local y = pc.get_local_y()-1
mob.spawn 20091 , x, y, 0, 0, 1)
timer("zabity", 300)
end
when zabity.timer begin
npc.purge()
end
end
end
end

To Ci niestety nie zadziała, nie da się usunąć zrespionego moba, tylko npc na którym wykonuje się akcję.

[DarkNightxx]

Witam mam problem z tym questem :P Mianowicie wszystko dziala 1000 % poprawnie i jak juz oddaje ryby na koncu to dostarcz ryby po quescie jak sie nagrode dostanie nie znika mozna co chwile brac nagrode prosze o pomoc caly quest jest sptawny tylko koncówka oto quest

 

 

 

 

quest saphira_rybak begin

state start begin

when login or levelup with pc.get_level() >= 30 begin

set_state(idziemy)

end

end

state idziemy begin

when letter begin

local v = find_npc_by_vnum(9009)

if v != 0 then

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

end

send_letter("Znajdź Rybaka!")

end

when button or info begin

say_title("Znajdź Rybaka! ")

say("Przybądź jak najszybciej do Rybaka!")

say("Podobno ma do Ciebie sprawę.")

end

when __TARGET__.target.click or 9009.chat."Słucham..." begin

target.delete("__TARGET__")

say_title("Rybak:")

say("Witaj wędkarzu! ")

say("Wezwałem Cię w jednej, prostej sprawie. ")

say("Potrzebne mi ryby. Nie mogę ich złowić sam,")

say("ponieważ najzwyczajniej w świecie")

say("nie mam czasu. ")

wait()

say_title("Rybak:")

say("Dam Ci tu listę potrzebnych ryb:")

say("")

say_reward("15x Drobne Rybki ")

say_reward("10x Karasi ")

say_reward("2x Ryba Mandaryna ")

say_reward("1x Rybia Ość ")

wait()

say_title("Rybak:")

say("Ale to nie wszystko!")

say("Masz 45 minut na złowienie tych ryb. ")

say("Wchodzisz w to "..pc.get_name().."?")

say("Obiecuję hojnie Cię wynagrodzić!")

say("")

say_reward("Zgadzasz się na to?")

local wybieraj = select("Oczywiscie","Nie Dziekuje")

if wybieraj == 1 then

set_state(lowimy)

elseif wybieraj == 2 then

say_title("Rybak:")

say("Hehe.")

say("Widocznie łowienie ryb Cię przerasta.")

say("W związku z tym muszę poszukać kogoś innego.")

end

end

end

state lowimy begin

when letter begin

send_letter("Złów ryby dla Rybaka.")

if pc.getqf("limit_time") < get_time() then

else

timer("lowimy", pc.getqf("limit_time")-get_time())

q.set_clock("Pozostało", pc.getqf("limit_time")-get_time())

end

end

when button or info begin

say_title("Złów ryby dla Rybaka")

say("Rybak potrzebuje tych ryb:")

say("")

say_reward("15x Drobne Ryby ")

say_reward("10x Karas ")

say_reward("5x Ryby Mandaryny ")

say_reward("2x Rybia Ość ")

say("")

say_reward("Złów je i mu zanieś.")

say_title("Ilość czasu zobaczysz w zakładce")

say_title("zadania, bądź naciskając klawisz N.")

wait()

say_title("Złów ryby dla Rybaka")

say_title("Do tej pory złowiłeś:")

say("")

say_reward("Drobne Ryby: "..pc.count_item(27802).." z 15")

say_reward("Karasie: "..pc.count_item(27803).." z 10")

say_reward("Ryby Mandaryny: "..pc.count_item(27804).." z 5")

say_reward("Rybia Ość: "..pc.count_item(27799).." z 2")

say("")

say_reward("Łów dalej!")

if pc.getqf("limit_time") < get_time() then

timer("lowimy", 45*60)

pc.setqf("limit_time", get_time()+45*60)

q.set_clock("Pozostało", pc.getqf("limit_time")-get_time())

else

q.set_clock("Pozostało", pc.getqf("limit_time")-get_time())

end

end

when 9009.chat."Mam już ryby!" begin

if pc.count_item(27802)>=15 and pc.count_item(27803)>=10 and pc.count_item(27804)>=5 and pc.count_item(27799)>=2 then

say_title("Rybak:")

say("Tak? To świetnie.")

say("Kliknij teraz na mnie jeszcze raz,")

say("by oddać ryby.")

local v = find_npc_by_vnum(9009)

if v != 0 then

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

set_state(raport)

end

else

say_title("Rybak:")

say("Co Ty gadasz, przecież nie masz")

say("wszystkich ryb!")

say("Potrzebuję:")

say("")

say_reward("15x Drobne Ryby ")

say_reward("10x Karasi ")

say_reward("5x Ryb Mandaryn ")

say_reward("2x Rybia Ość ")

say("")

say_reward("Ilość czasu zobaczysz w zakładce")

say_reward("zadania, bądź naciskając klawisz N.")

wait()

say_title("Rybak")

say_title("Do tej pory złowiłeś:")

say("")

say_reward("Drobnych Ryb: "..pc.count_item(27802).." z 15")

say_reward("Karasi: "..pc.count_item(27804).." z 10")

say_reward("Ryb Mandaryn: "..pc.count_item(27806).." z 5")

say_reward("Rybich Ości: "..pc.count_item(27816).." z 2")

say("")

say_reward("Łów dalej!")

end

end

when lowimy.timer begin

if pc.count_item(27802)>=15 and pc.count_item(27803)>=10 and pc.count_item(27804)>=5 and pc.count_item(27799)>=2 then

send_letter("Wróć do Rybaka!")

say_title("Złów ryby dla Rybaka")

say("Zebrałeś wszystkie ryby!")

say("Wróć do Rybaka i mu je daj.")

local v = find_npc_by_vnum(9009)

if v != 0 then

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

setstate(raport)

end

else

say_title("Misja nie powiodła się!")

say("Ajć, nie zdążyłeś, szkoda. ")

say("Może spróbuj innym razem! ")

say("45 minut właśnie minęło!")

say("")

say_title("Podsumowanie, złowiłeś:")

say("")

say_reward("Drobnych Ryb: "..pc.count_item(27803).." z 15")

say_reward("Karasi: "..pc.count_item(27803).." z 10")

say_reward("Ryb Mandaryn: "..pc.count_item(27804).." z 5")

say_reward("Rybich Ości: "..pc.count_item(27799).." z 2")

end

end

when button or info begin

say_title("Złów ryby dla Rybaka")

say("Zebrałeś wszystkie ryby!")

say("Wróć do Rybaka i mu je daj.")

end

end

state raport begin

when __TARGET__.target.click or 9009.chat."Dostarcz ryby." begin

target.delete("__TARGET__")

say_title("Rybak:")

say("Wybornie, daj mi je!")

say("Wspaniale, są doskonałe!")

say("Czas na Twoją nagrodę. ")

say("Wędkę również możesz zatrzymać.")

say("")

say_reward("Otrzymałeś: PO 1x Każdej Perły")

say_reward("Otrzymałeś: 50.000.000 Yang")

say_reward("Otrzymałeś: 2.500.000 Punktów Doświadczenia.")

pc.remove_item(27802, 15)

pc.remove_item(27803, 10)

pc.remove_item(27804, 5)

pc.remove_item(27799, 2)

pc.give_item2(27992, 1)

pc.give_item2(27993, 1)

pc.give_item2(27994, 1)

pc.give_exp2(2500000)

pc.change_money(50000000)

wait()

say_title("Rybak:")

say("Aha, weź jeszcze to.")

say("Podarował mi to Handlarz Zbrojami.")

say("")

say_reward("Otrzymałeś: Zbroja na 34 poziom +9.")

say_reward("Otrzymałeś Broń na 30 poziom +9.")

if pc.get_job()==0 then

pc.give_item2("11249")

pc.give_item2("299")

elseif pc.get_job()==1 then

pc.give_item2("11449")

pc.give_item2("1179")

elseif pc.get_job()==2 then

pc.give_item2("11649")

pc.give_item2("299")

elseif pc.get_job()==3 then

pc.give_item2("11849")

pc.give_item2("5119")

notice_all("[GRACZ]".. pc.get_name() .." ukonczyl zadanie złowienia ryb dla Rybaka!!")

notice_all("GRATULUJEMY!!!")

end

end

end

end

 

 

Poprostu jak skonczymy zadanie to moge co chwile brac nagrode ;D HELP MI BEDZIE LIMIT PLUSÓW A chcem zeby tylko raz bylo dostarcz ryby bez brania co chwile ;D POTEM JUZ NORMALNIE RYBAK : )

[piotrekkkkkk]

na koncu ustaw puste state

notice_all("[GRACZ]".. pc.get_name() .." ukonczyl zadanie złowienia ryb dla Rybaka!!")
notice_all("GRATULUJEMY!!!")
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
end

[DarkNightxx]

na koncu ustaw puste state

notice_all("[GRACZ]".. pc.get_name() .." ukonczyl zadanie złowienia ryb dla Rybaka!!")
notice_all("GRATULUJEMY!!!")
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
end

 

Mozesz mi pdoac calego questa ? bo dopisalem do koncowki i teraz quest offf

[z4z0l]

Questy wrzucaj na stronę wklej.to - łatwiej się edytuje + są tabulatory

[Sunushi]

Questy wrzucaj na stronę wklej.to - łatwiej się edytuje + są tabulatory

Najpierw twórca musi ich używać

[piotrekkkkkk]

Spróbuj teraz

http://wklej.to/d7IvS

[z4z0l]

@up

endy się nie zgadzają, nie zamykasz state start

[piotrekkkkkk]

A no tak dzieki za cenna uwage

[DarkNightxx]

Nadal to samo co chwile mozan klikac w dostarcz ryby

[Veygr]

@up:

http://wklej.to/e1j5F/text

TABy też poprawiłem przy ostatnim when'ie. Błąd był w tym że setstate i noticeall było pod elseif pc.get_job()==3 then. Teraz jest za if'em, więc powinno działać.

[DarkNightxx]

thx wielkie ziomek jako jedyny widac ze potrafisz oczywiscie innym tez dziekuje za pomoc wszystko smiga ;D

[DarkNightxx]

Mam Jeszcze Jedna Prośbe oczywiscie limit lajków

 

Ten Quest

 

 

 

quest celestial_reduction begin

state start begin

when login or levelup with pc.get_level() >= begin

set_state(info)

end

end

state info begin

when letter begin

local v = find_npc_by_vnum(20355)

if 0 == v then

else

target.vid("__Kapitan__", v, "Kapitan")

end

end

when letter begin

send_letter("Niebianska Armia")

end

when button or info begin

say_title("Niebianska Armia")

say("Niebianska Armia rosnie w sile!")

say("Zapytaj Kapitana co masz zrobic!")

say("")

end

when __Kapitan__.target.click begin

target.delete("__Kapitan__")

say_title("Kapitan:")

say("Jak juz wiesz, Niebianska Armia")

say("kumluje swoje sily! Planuja atak")

say("na nas. Powstrzymaj ich! Zabij")

say("150 Niebian. Zolnierzy!")

say("")

set_state(kill_soldiers)

end

end

state kill_soldiers begin

when letter begin

send_letter("Zabij Zolnierzy!")

end

when button or info begin

say_title("Zabij Zolnierzy!")

say("Musisz pokrzyzowac plany Niebianskiej")

say("Armii! W tym celu zabij 150 Niebian.")

say("Zolnierzy!")

say("")

say_reward("Musisz zabic jeszcze: "..150-pc.getqf("army_kill_soldiers").."!")

say("")

end

when 2401.kill begin

pc.setqf("reduction_of_the_celestial_army_soldiers_kill_soldiers", pc.getqf("reduction_of_the_celestial_army_soldiers_kill_soldiers") +1)

end

when pc.getqf("reduction_of_the_celestial_army_soldiers_kill_soldiers") >= 150 begin

set_state(reward)

end

end

state reward begin

when letter begin

local vv = find_npc_by_vnum(20355)

if 0 == vv then

else

target.vid("__Kapitann__", vv, "Kapitan")

end

end

when letter begin

send_letter("Pokrzyzowane Plany")

end

when button or info begin

say_title("Pokrzyzowane Plany")

say("Zabiles 150 Niebian. Zolnierzy,")

say("udaremniajac tym plany Niebian.")

say("Armii! Poinformuj o tym Kapitana!")

say("")

end

when __Kapitann__.target.click begin

say_title("Kapitan:")

say("Udalo Ci sie? Gratulacje!")

say("Dzieki tobie mozemy spac spokojnie!")

say("Dostaniesz oczywiscie nagrode.")

say("")

say_reward("Otrzymales 20.000.000 Yang!")

say_reward("Otrzymales 10.000.000 Punktow Doswiadczenia!")

say_reward("Otrzymales Bron na 65Lvl +6!")

pc.setqf("reduction_of_the_celestial_army_soldiers_reward", 1)

local item = 166

if pc.job == 2 then

item = 156

elseif pc.job == 1 then

item = 1116

elseif pc.job == 3 then

item = 7136

end

if pc.getqf("reduction_of_the_celestial_army_soldiers_reward") == 1 then

pc.give_item2(item, 1)

set_state(__COMPLETE__)

end

end

state __COMPLETE__ begin

end

end

 

 

[lopes564]

Mam Jeszcze Jedna Prośbe oczywiscie limit lajków

 

Ten Quest

 

 

 

quest celestial_reduction begin

state start begin

when login or levelup with pc.get_level() >= begin

set_state(info)

end

end

state info begin

when letter begin

local v = find_npc_by_vnum(20355)

if 0 == v then

else

target.vid("__Kapitan__", v, "Kapitan")

end

end

when letter begin

send_letter("Niebianska Armia")

end

when button or info begin

say_title("Niebianska Armia")

say("Niebianska Armia rosnie w sile!")

say("Zapytaj Kapitana co masz zrobic!")

say("")

end

when __Kapitan__.target.click begin

target.delete("__Kapitan__")

say_title("Kapitan:")

say("Jak juz wiesz, Niebianska Armia")

say("kumluje swoje sily! Planuja atak")

say("na nas. Powstrzymaj ich! Zabij")

say("150 Niebian. Zolnierzy!")

say("")

set_state(kill_soldiers)

end

end

state kill_soldiers begin

when letter begin

send_letter("Zabij Zolnierzy!")

end

when button or info begin

say_title("Zabij Zolnierzy!")

say("Musisz pokrzyzowac plany Niebianskiej")

say("Armii! W tym celu zabij 150 Niebian.")

say("Zolnierzy!")

say("")

say_reward("Musisz zabic jeszcze: "..150-pc.getqf("army_kill_soldiers").."!")

say("")

end

when 2401.kill begin

pc.setqf("reduction_of_the_celestial_army_soldiers_kill_soldiers", pc.getqf("reduction_of_the_celestial_army_soldiers_kill_soldiers") +1)

end

when pc.getqf("reduction_of_the_celestial_army_soldiers_kill_soldiers") >= 150 begin

set_state(reward)

end

end

state reward begin

when letter begin

local vv = find_npc_by_vnum(20355)

if 0 == vv then

else

target.vid("__Kapitann__", vv, "Kapitan")

end

end

when letter begin

send_letter("Pokrzyzowane Plany")

end

when button or info begin

say_title("Pokrzyzowane Plany")

say("Zabiles 150 Niebian. Zolnierzy,")

say("udaremniajac tym plany Niebian.")

say("Armii! Poinformuj o tym Kapitana!")

say("")

end

when __Kapitann__.target.click begin

say_title("Kapitan:")

say("Udalo Ci sie? Gratulacje!")

say("Dzieki tobie mozemy spac spokojnie!")

say("Dostaniesz oczywiscie nagrode.")

say("")

say_reward("Otrzymales 20.000.000 Yang!")

say_reward("Otrzymales 10.000.000 Punktow Doswiadczenia!")

say_reward("Otrzymales Bron na 65Lvl +6!")

pc.setqf("reduction_of_the_celestial_army_soldiers_reward", 1)

local item = 166

if pc.job == 2 then

item = 156

elseif pc.job == 1 then

item = 1116

elseif pc.job == 3 then

item = 7136

end

if pc.getqf("reduction_of_the_celestial_army_soldiers_reward") == 1 then

pc.give_item2(item, 1)

set_state(__COMPLETE__)

end

end

state __COMPLETE__ begin

end

end

 

 

http://wklej.to/Jczg3

Na przyszłość podawaj treść błędu

[z4z0l]

Mogę się mylić ale to nie zadziała poprawnie :

   if 0 == v then
   else
 target.vid("__Kapitan__", v, "Kapitan")
   end

when __Kapitan__.target.click begin

[DarkNightxx]

Witam czy mógł by mi ktoś naprawidz tego questa zeby teleportowalo na arene walki i tam sie bilo te metiny lub w DT ale bardziej na arene

Dzieki i oczywiscie bedzie limit lajków

 

 

 

 

quest dungeon_metiny begin

state start begin

when 2016.chat."Kill_mETINY" begin

say_red("Kowal:")

say("Witaj wojowniku! Mogę cię wpuścić do")

say("Wymiaru Metina, w którym znajdują się ")

say("Najgroźniejsze metiny jakie żyją w naszym")

say("Świecie. Możesz udać się tam tylko ze ")

say("Swoją grupą.")

say("Czy chcecie się tam udać?")

local open = select("Przenieś Nas!","Może Później!")

if open == 1 then

if party.is_leader() == 0 then

say_red("Kowal:")

say("Nie jesteś liderem grupy!")

return

end

if pc.level < 50 then

say_red("Kowal:")

say("Lider musi posiadać przynajmniej 50 Poziom!")

return

end

if party.get_near_count() < 2 then

say_red("Kowal:")

say("W grupie musi być przynajmniej 2 członków nie licząc Ciebie!")

return

end

d.join()

pc.setqf("p1", 1)

elseif open == 2 then

return

end

end

-- 1 Piętro

when login with pc.in_dungeon() and pc.getqf("p1") begin

if pc.getqf("p1") > 0 then

pc.setqf("p1", 0)

d.notice("Witaj w Wymiarze Metina, wszystkie poziom mają metiny")

d.notice("które trzeba rozwalić. Powodzenia!")

d.spawn_mob(8001, 587,454)

d.spawn_mob(8001, 548,641)

d.spawn_mob(8001, 548,126)

d.spawn_mob(8001, 365,487)

d.spawn_mob(8001, 416,485)

d.spawn_mob(8001, 487,641)

d.spawn_mob(8001, 7454,848)

d.spawn_mob(8001, 487,548)

d.spawn_mob(8001, 489,4941)

d.spawn_mob(8001, 1101,487)

end

end

 

when 8001.kill with pc.in_dungeon() and pc.getqf("p1") begin

party.setf("rozwal", party.getf("rozwal") +1)

if party.getf("rozwal") >= 10 then

d.notice("Udało ci się przejść pierwszy poziom, za chwilę pojawią się ")

d.notice("kolejne metiny!")

timer("tajm1",5)

end

end

-- 2 Piętro

when tajm1.timer with pc.in_dungeon() and pc.getqf("p1") begin

d.spawn_mob(8002, 587,454)

d.spawn_mob(8002, 548,641)

d.spawn_mob(8002, 548,126)

d.spawn_mob(8002, 365,487)

end

 

when 8002.kill with pc.in_dungeon() and pc.getqf("p1") begin

party.setf("rozwal2", party.getf("rozwal2") +1)

if party.getf("rozwal2") >= 4 then

d.notice("Udało ci się przejść drugi poziom, za chwilę pojawią się ")

d.notice("kolejne metiny!")

timer("tajm2",5)

end

end

-- 3 Piętro

when tajm2.timer with pc.in_dungeon() and pc.getqf("p1") begin

d.notice("Witaj na 3 poziomie, zasada jest taka sama za każdym razem")

d.notice("lecz metiny są coraz bardziej silniejsze.")

d.spawn_mob(80034, 587,454)

d.spawn_mob(80034, 548,641)

end

 

when 80034.kill with pc.in_dungeon() and pc.getqf("p1") begin

party.setf("rozwal3", party.getf("rozwal3") +1)

if party.getf("rozwal3") >= 2 then

d.notice("Udało ci się przejść pierwsze piętro, za chwilę zostaniesz przeniesiony!")

timer("tajm3", 5)

end

end

-- 4 Piętro

when tajm3.timer with pc.in_dungeon() and pc.getqf("p1") begin

d.notice("Dotarłeś na ostatnie czyli 4 piętro.")

d.notice("Ostatni, najtrudniejszy metin! Powodzenia.")

d.spawn_mob(, 587,454)

end

 

when .kill with pc.in_dungeon() and pc.getqf("p1") begin

timer("thekoniec", 30)

end

 

when thekoniec.timer with pc.in_dungeon() and pc.getqf("p1") begin

d.exit_all()

end

-- Dodatkowe Zabezpieczenia

when logout with pc.in_dungeon() and pc.getqf("p1") begin

party.setf("rozwal", 0)

party.setf("rozwal2", 0)

party.setf("rozwal3", 0)

d.exit_all()

end

end

end