Pisanie / Poprawa Questów !

old_kwiatosz · 16 Lipca 2011

Quest jest normalny lecz trzeba mieć inne flag i antiflag udało mi się znaleźć raz jak przechodzę przez TP to nie zsiada ale nie działał na zabicie. Jeśli chcesz usunąć napis zsiądź to quest ci nie pomoże. To jest po stronie klienta możesz edytować klienta i usunąć ta funkcje albo tak zmodyfikować że tylko działa na konie.

Mógłbyś napisać jaki flag i antiflag?

globasek · 16 Lipca 2011

quest change_empire begin
       state start begin
               when 70021.use begin
                       say("Dostaniesz militara")
                       say("używając Błogosławieństwo Anioła.")
		say ( "Czy chcesz je teraz użyć ?" )

	local scelta = select ( "Tak","Nie" )
if scelta==1 then
pc . set_skill_level ( 131 , 10 )
horse.set_level ( 21 )
elseif scelta==2 then
say ("Może innym razem ")
return
end
end
end

czy ten quest zadziała , gdy kliknę na Błogosławieństwo Anioła , i dostanę militara ? czy nie ?

FunkIt · 17 Lipca 2011

Odświeżam mój quest:

Poprosze questa w którym są do wyboru opcje "Tak"; "Nie"

Po wciśnięciu "Tak" w każdym m1 Jinno/Chunjo/Shinsoo mają się respić moby(podam id)

Dziękuje

adi19et22 · 17 Lipca 2011

Witam wszystkich!

Chciałbym poprosić o quest który przenosi na "Mapę GM'

(832; 00)

Chciałbym żeby ten quest był u kapitana !

ID Kapitana: 20355

Treść:

Witaj, czy chcesz się

przeteleportowac

i do wyboru jest "Tak" i Nie"

jeśli naciśnie tak to przeteleportuje

a jeśli nie to nie przeteleportuje

hehe .

Bardzo bym prosił mam nadzieje że to nie sprawi trudności !!

Marvel40 · 17 Lipca 2011

Adi19@@@@

quest teleport begin
       state start begin
               when 20355.chat."Kapitan" begin
                       say_title("Kapitan:")
                               say("Witaj, czy chcesz się teleportować?")
                                       local s = select(locale.Tak, locale.Nie)
                                               if s == 2 then
                                                       return
                                               end

                                               if s == 1 then
                                               say_title("Kapitan:")
                                                       say("Zostaniesz przeniesiony!")
                                                                               wait()
                                                                                       pc.warp(832,00)


               end
       end

Nie wiem czy Endy się zgadzają bo tego jeszcze nie czaje za bardzo... ; ]]

Więc niech ktoś oceni to. ; ]]

old_kwiatosz · 17 Lipca 2011

Proszę o questa:

Po najechaniu klucza na skrzynie ona się otwiera

ID sam ustalę.

adi19et22 · 17 Lipca 2011

Adi19@@@@

quest teleport begin
       state start begin
               when 20355.chat."Kapitan" begin
                       say_title("Kapitan:")
                               say("Witaj, czy chcesz się teleportować?")
                                       local s = select(locale.Tak, locale.Nie)
                                               if s == 2 then
                                                       return
                                               end

                                               if s == 1 then
                                               say_title("Kapitan:")
                                                       say("Zostaniesz przeniesiony!")
                                                                               wait()
                                                                                       pc.warp(832,00)


               end
       end

Nie wiem czy Endy się zgadzają bo tego jeszcze nie czaje za bardzo... ; ]]

Więc niech ktoś oceni to. ; ]]

mi nie działa wrzucielm w /usr/rain.../locale/quest

wpisalem cd sciezka

potem ./qc nazwa i nie działa w grze bo jak naciskam na

kapitana to nic sie nie dzieje

Pon.Lok · 17 Lipca 2011

2xUp proszę

quest drop_szkata begin
       state start begin
                when id.szkaty.take with item.vnum == id_klucza begin
                       local szansa = 15
                       if math.random(szansa)==1 then
					pc.remove_item(id_klucza, 1)
                       pc.remove_item(id_szkaty, 1)
                               local r=number(1, 3)
                               if r==1 then
                                       pc.give_item2(id_itemu)
                               elseif r==2 then
                                       pc.give_item2(id_itemu)
                               elseif r==3 then
                                       pc.give_item2(id_itemu)

                               end
                       end
               end
        end
end

Up proszę:

quest warp_tp begin 
   state start begin 
	 when 20355.chat."Kapitan" begin
		say_title("Kapitan: ")
		say("Witaj, czy chcesz się teleportować?")
			local a= select("Przenieś ","Anuluj") 
           if 1==a then 
               say(""..mob_name(20355)..":") 
               say("") 
               say("W drogę") 
               wait() 
               pc.warp(832 , 00) 
           elseif 2==a then 
               return
           end 
	end
end
end

w tym 2 quescie tabulatory się przesunęły ale powinien działac

FunkIt · 17 Lipca 2011

quest drop_szkata begin
state start begin

when id.szkaty.take with item.vnum == id_klucza begin

local szansa = 15

if math.random(szansa)==1 then

local r=number(1, 3)

if r==1 then

pc.give_item2(id_itemu)

elseif r==2 then

pc.give_item2(id_itemu)

elseif r==3 then

pc.give_item2(id_itemu)

end

end

end

end

end

Nie działa

@Przenosze item nic sie nie dzieje

luki1301 · 17 Lipca 2011

@Funkit

A wypełniłeś pola typu id szkaty?

@topic

Witam dopiero uczę się pisać questy i chciałbym żebyście sprawdzili mi tego questa:

quest Duże Wyzwanie begin
               state start begin
                               when login or levelup with pc.get_level > 90 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("Zabij Ogra")
when button or info begin
                                               say_title("Zabij Ogra")
                                               say("Idź do Kapitana.")
                                               say("Zdradzi ci szczegóły zadania.")
                                               say("Powodzenia.")
                               end
when __TARGET__.target.click or 
                                               20355.chat."Zabij Ogra" begin
                                               target.delete("__TARGET__")
                                               say_title("Witaj")
                                               say("Zabij dla mnie Ogra Szaleńca i przynieś kamień wodny.")
		say("Wynagrodzę cię.")
		say_reward("Nagroda :")
 			say_reward("Tarcza Krwi. Skorupy +9")
                                               set_state(kolejny_state)
                                               end
                               end
state kolejny_state begin
                               when letter begin
                                       send_letter("Zabij Ogra.")
                       end
                       when button or info begin
                                       say("Zabij Ogra.")
	        say("Znajdziesz go na Ziemi Olbrzymów.")
                       end

                     when 1603.kill with pc.countitem(27991)==0 begin
                          local random = math.random(3)
                          if random == 1 then
                          pc.give_item2(27991, 1)
                          say("Zdobyłeś kamień wodny.")
                          say("Idź z nim do kapitana.")
                       local v = find_npc_by_vnum(20355)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Kapitan")
                       end
               end
       end
when 20355.chat."Zabij Ogra" with pc.countitem(27991)>0 begin
                               target.delete("__TARGET__")
                               say_title("O już wróciłeś.")
                               say("Dziękuje ci za pomoc.")
                               say_reward("Proszę oto twoja nagroda.")
                       pc.remove_item(27991, 1)
                       pc.give_item2(13149)
                                               set_state(__COMPLETE__)
                                               end
                               end
  end
       state __COMPLETE__  begin
       end

Jeżeli ktoś chce może go wykorzystać na swoim serwie.

Coś się porobiło z endami, bo w quescie na kompie mam inaczej, ale mniej więcej tak były.

lordgrzegorz · 17 Lipca 2011

Witam ostatnio mam taki problem. Gdy wgrywam takie questy ,które mają teleportować do Groty Wygnańców oraz do Groty v2 to:

1. Pierwszy quest robi tak ,że jak klikam na NPC i pisze przenieś mnie to wcale nie przenosi.

2. Drugi quest przenosi mnie na środek groty v1.

quest atlantyda begin
       state start begin
               when login or levelup if pc.level < 75 

begin
                       set_state(grota)
               end
       end

       state grota begin
               when 20092.chat."Wejdz do Groty" begin
                       say(""..mob_name(20092)..":")
                       say("Witaj!")
                       say("Jestem straznikiem atlantydy!")
                       say("Jesli chcesz przejsc do owej groty")
                       say("potrzebujesz Krwisty kamien oraz odwage!")
                       say("")
                       say_item("Krwisty Kamien", 30190, "")
                       wait()
                       if pc.get_premium_remain_sec(PREMIUM_EXP) > 0 then
                               say("Masz jeszcze dodatkowe punkty!")
                               say("Wiec wchodzisz bez krwistego kamienia!")
                               wait()
                               pc.warp(704100,1280000)
                               return
                       end

                       if pc.count_item(30190)>0 then
                               say(""..mob_name(20092)..":")
                               say("Masz krwisty kamien!")
                               say("Zostaniesz przeniesiony!")
                               say("")
                               pc.remove_item(30190)

                               char_log(0,"GO_SPIDER2","USE_ITEM(30190)")
                       elseif pc.count_item(30190) >0 then
                               say(""..mob_name(20092)..":")
                               say("Masz Krwisty kamien!")
                               say("Zostaniesz przeniesiony!")
                               say("")

                               char_log(0,"GO_SPIDER2","USE_ITEM(30190)")
                       else
                               say(""..mob_name(20092)..":")
                               say("Nie moge Ciebie przeniesc!")
                               say("Potrzebujesz krwisty kamien!")
                               say_item("Krwisty Kamien", 30190, "")
                               return
                       end

                       say("Zostaniesz przeniesiony do Groty Wygnańców")     
                       wait()
                       pc.warp(704100, 1280000)

               end

       end

end

quest drugi_poziom_groty begin
state start begin
	when 30122.chat."Drugi Poziom Groty" begin
		say_title("Duch Wojownika")
		say("Witaj jestem strażnikiem groty v2 czego chcesz?")
		local d = select("Chciałbym wejść ", "Już nic")
		if d == 1 then
			say("Widzę ,że bardzo chcesz wejść to tej")
			say("groty ale będziesz potrzebował tym")
			say("razem aż Dwóch Krwistych Kamieni.")
			say("Czy je posiadasz?")
			local s = select("Tak ", "Nie")
			if s == 2 then
				return
			end
				if pc.count_item(30190) >= 2 then
					say("Jesteś bardzo odważny, zapraszam do groty.")
					pc.remove_item(30160, 2)
					wait()
					pc.warp ( 135200 , 1215100 )
				else
					say("Nie posiadasz Krwistych Kamieni")
					return
				end
		end
	end
end
end

Proszę o poprawę questów

FunkIt · 17 Lipca 2011

@Funkit
A wypełniłeś pola typu id szkaty?

Nie wiem czy Ci odpowiedzieć...

Działa komuś ten quest?

quest drop_szkata begin
state start begin

when id.szkaty.take with item.vnum == id_klucza begin

local szansa = 15

if math.random(szansa)==1 then

local r=number(1, 3)

if r==1 then

pc.give_item2(id_itemu)

elseif r==2 then

pc.give_item2(id_itemu)

elseif r==3 then

pc.give_item2(id_itemu)

end

end

end

end

end

Pon.Lok · 17 Lipca 2011

UP

żadnego błędu podczas wgrywania nie ma ?

możesz spróbowac na odwrót id.szkaty na id.klucza czyli: when id.klucza.take with item.vnum == id_szkaty begin

ale wtedy logicznie będzie ,że po nałożeniu szkaty na klucz jest drop

2x UP

posprawdzaj kaordy

Svope · 17 Lipca 2011

Poprosze o questa w którym gdy klikniemy na NPC o id 20061 wyswiatla nam sie "Zabij Metiny Pung-Ma" "Zabij Metiny Ma-An" "Zabij Metiny Tu-Young" "Zabij Metiny Jeon-Un" i wtedy mozemy wybrac poszczegolne chce aby bylo do wyboru czy chcesz przyjac misje czy nie miejsce na nagrode piste po zabiciu 5 metinow wyswiatla nam sie komunikat Zgładziłeś już wystarczającą ilość Metinów. Otrzymales: (i tu zostawic puste). Chce aby kazdych metinow trzeba bylo ubic 5. I aby misje można było brać w kółko.

Emil0 · 17 Lipca 2011

Witam potrzebuje questa do pieczęci które przyzywają wierzchowce

Id pieczęci :

71115

71119

71121

Id wierzchowców :

20120

20119

20121

Pieczęć aktywują wierzchowca na 10 min !

Czekam na questa

POD SF 2010 !!!

Pon.Lok · 18 Lipca 2011

Questy By Wojtek:

Mount_1:

quest mount_1 begin
state start begin
when 71115.use begin -- Pieczęć Wilka
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć kolejnej pieczęci poczekaj "..iRest.." Sekund!")
--elseif horse.get_level() < 11 then
--syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iTime = 10 -- Czas wierzchowca w Minutach!
local iMount = 20120 -- Id Wierzchowca
command("unmount")
horse.unsummon()
--horse.summon()
--horse.ride()
affect.add_collect_point(POINT_MOUNT,iMount,60*iTime)
pc.removeitem(71115,1)
pc.setqf("next_time_use",get_time()+iTime*60)
affect.add(apply.DEF_GRADE_BONUS,100, iTime*60)
--timer('iTime',iTime*60)
end
end
when iTime.timer begin
horse.unride()
end
end
end

Mount_2:

quest mount_2 begin
state start begin
when 71119.use begin -- Pieczęć Wilka
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć kolejnej pieczęci poczekaj "..iRest.." Sekund!")
--elseif horse.get_level() < 11 then
--syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iTime = 10 -- Czas wierzchowca w Minutach!
local iMount = 20119 -- Id Wierzchowca
command("unmount")
horse.unsummon()
--horse.summon()
--horse.ride()
affect.add_collect_point(POINT_MOUNT,iMount,60*iTime)
pc.removeitem(71115,1)
pc.setqf("next_time_use",get_time()+iTime*60)
affect.add(apply.DEF_GRADE_BONUS,100, iTime*60)
--timer('iTime',iTime*60)
end
end
when iTime.timer begin
horse.unride()
end
end
end

Mount_3:

quest mount_3 begin
state start begin
when 71121.use begin
if pc.getqf("next_time_use") > get_time() then
local iRest = pc.getqf("next_time_use")-get_time()
syschat("By użyć kolejnej pieczęci poczekaj "..iRest.." Sekund!")
--elseif horse.get_level() < 11 then
--syschat("By użyć Mocy Wierzchowca musisz posiadać conajmniej Konia Bojowego!")
else
local iTime = 10 -- Czas wierzchowca w Minutach!
local iMount = 20121 -- Id Wierzchowca
command("unmount")
horse.unsummon()
--horse.summon()
--horse.ride()
affect.add_collect_point(POINT_MOUNT,iMount,60*iTime)
pc.removeitem(71121,1)
pc.setqf("next_time_use",get_time()+iTime*60)
affect.add(apply.DEF_GRADE_BONUS,100, iTime*60)
--timer('iTime',iTime*60)
end
end
when iTime.timer begin
horse.unride()
end
end
end

QUESTY BY WOJTEK EDIT BY PON.LOK

Na razie wierzchowce mają wszystkie takie same bony tzn 100 obrony dodają jeśli chcesz to zmienic to musisz w linijce

affect.add(apply.DEF_GRADE_BONUS,100, iTime*60)

zminic apply.DEF_GRADE_BONUS na inny bonus ,a to 100 to wartośc bonusu reszty nie zmieniaj.

Sakio · 18 Lipca 2011

Witam! Pilna prośba!

Quest łatwy:

Gdy zabijamy niebieską śmierć(id 1095), pojawia się czerwony smok(id 2291), a gdy zabijamy czerwonego smoka pojawia się olbrzymi nosiciel plagi (id 993), a po nim kilka metinów (id 8030).

Do tego żeby pisało: Królestwo Shinsoo zabiło niebieską śmierć, czas na kolejną próbę!

i po zabiciu nosiciela plagi: Królestwo Shinsoo sprostało wyzwaniu. Czas na nagrode.

I to tyle proszę o szybką pomoc!

old_kwiatosz · 18 Lipca 2011

Proszę o questa:

Po najechaniu klucza na skrzynie ona się otwiera

ID sam ustalę.

Proszę ponownie o ten quest :>

@edit

Już mam thx, nie zauważyłem

Shingi · 18 Lipca 2011

Witam. Czy jest możliwość edycji quest na sztaby tak, aby dropiły ze wszystkich mobów poza np. psami?

quest sztaby begin
state start begin
when kill begin
local s = math.random(100)
if s >= 1 < 6 then
pc.give_item2(80007)
end
end
end
end

Bambus3k™ · 18 Lipca 2011

Witam. Czy jest możliwość edycji quest na sztaby tak, aby dropiły ze wszystkich mobów poza np. psami?

=P

quest sztaby begin
state start begin
when kill with npc.race != 101 begin
local s = math.random(100)
if s >= 1 and s < 6 then
pc.give_item2(80007)
end
end
end
end

Pon.Lok · 18 Lipca 2011

Funkit to co chcesz prawdopodobnie leży w game lub w item_drop czy czymś podobnym jedyne co mogę dla ciebie zrobić to taki quest:

quest szkata begin
state start begin
	when id_szkaty.use begin
	locale s = select ("Otówrz", "Wyjdź" )
	if s != 1 then
		return
	end
		if pc.count_item(id_klucza)>0 then
		pc.remove_item(id_klucza, 1)
		pc.remove_item(id_szkaty, 1)
			local l = math.random(5)
				if l == 1 then
                   pc.give_item2(id_dropu, 1)
                   elseif l == 2 then
                   pc.give_item2(id_dropu 1)
                   elseif l == 3 then
                   pc.give_item2(id_dropu, 1)
				elseif l == 4 then
                   pc.give_item2(id_dropu, 1)
                   elseif l == 5 then
                   pc.give_item2(id_dropu, 1)
				end
				else
				say("Brak Klucza" )

		end
	end
end
end

old_kwiatosz · 18 Lipca 2011

Wole tamten quest co dałeś wyżej, dzięki za pomoc +

Ten 4x up post jest dlatego, bo nie zauważyłem, że zrobiłeś dla mnie tego questa co jest wyżej.

Psyco · 19 Lipca 2011

Napisał by mi ktoś takie 4 questy??

1.Gdy założymy item o wybranym id (sam wstawię) na naszej postaci pojawi się fryzura o id 74009 .

i to tyle w 1 queście

2.Quest u kapitana. (id 20355)

Gdy klikniemy na niego jest opcja "Wejdź do Doliny Śmierci"

Kapitan mówi że trzeba posiadać 1x item o id które sam wstawię

Gdy mamy to nas przenosi a gdy nie to nie przenosi

tam gdzie trzeba wpisać kordy napiszcie mi np kordy1/kordy2 albo warp1/warp2 i sam wstawię

3. Wejście do groty v1 u npc o id 20093 wymagany krwisty kamień

4. Wejście do groty v2 u npc 20094 wymagane 2 krwiste kamienie

Kahiri · 19 Lipca 2011

Czy ten quest jest poprawnie napisany jeżeli źle to bym prosił o jego poprawę...

if pc . getqf ( "basic_weapon" ) == 0 then 
pc . setqf ( "basic_weapon" , 1 ) 
local item = 19 
if pc . job == 1 then
pc . give_item2 ("11409")
pc . give_item2 ("1009")
pc . give_item2 ("14009")
pc . give_item2 ("15009")
pc . give_item2 ("16009")
pc . give_item2 ("17009")
pc . give_item2 ("13009")
pc . give_item2 ("12349")
elseif pc . job == 0 then
pc . give_item2 ("19")
pc . give_item2 ("11209")
pc . give_item2 ("12209")
pc . give_item2 ("14009")
pc . give_item2 ("15009")
pc . give_item2 ("16009")
pc . give_item2 ("17009")
pc . give_item2 ("13009")
elseif pc . job == 2 then
pc . give_item2 ("11409")
pc . give_item2 ("19")
pc . give_item2 (""11609)
pc . give_item2 ("14009")
pc . give_item2 ("15009")
pc . give_item2 ("16009")
pc . give_item2 ("17009")
pc . give_item2 ("13009") 
elseif pc . job == 3 then
pc . give_item2 ("12629")
pc . give_item2 ("11809")
pc . give_item2 ("7009")
pc . give_item2 ("14009")
pc . give_item2 ("15009")
pc . give_item2 ("16009")
pc . give_item2 ("17009")
pc . give_item2 ("13009")
end 
if pc . countitem ( item ) == 0 and pc . weapon ~= item then
pc . give_item2 ("50053")
pc . give_item2 ("80009")
horse . set_level (30)
pc . set_skill_level ( 131 , 10 )
pc . give_exp2 ( 9999999999 )
say ("Witaj na serverze ExtremeMT2")
say ("Milej gry")
say ("Życzymy miłej zabawy - Team ExtremeMT2")
end 
end

xDeStRuCtx · 19 Lipca 2011

@UP

Tak, ale musisz go wkleić do object/notarget/give_basic_weapon

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany