Pisanie / Poprawa Questów !

Stelios · 8 Października 2011

a jakoś tak było

ale działa

aha to jak nie musze dawac state run w 1 quescie, to normalnie mi się odpali następny po ukończeniu tego??

i w następnych wszędzie state runy ładować i bedzie git?

@edit

a jak zrobić takie coś

mam to:
when 8026.kill begin
ale chce dorzucić kilka mobów do tego

to pisze tak?
when 8026 and 8027 and 8028.kill begin
czy tak?
when 8026, 8027, 8028.kill begin
@edit2

dobra juz wiem, ze tak i tak nie działa

mogły ktoś pokazać jak to zapisać??

czy inaczej??

Spróbuj takiej kombinacji. Heh.

when kill with mob_vnum() == 8026 and mob_vnum() == 8027 begin

Ale nie wiem czy to będzie działać...

Chociaż kiedyś prosiłem o coś takiego xDeStRuCtx -

o pomoc przy wyróżnieniu grupy mobów i działało.

wacik999 · 8 Października 2011

potrzebuje kogoś kto napisze mi parę questów.Jeśli ktoś chętny proszę pisać

Wisz · 8 Października 2011

quest boar begin
   state start begin
       when 71114.use begin 
           horse.ride()
           pc.mount(20114,900) 
	pc.unmount()
           pc.mount_bonus(apply.ATT_GRADE_BONUS,290,900)
           pc.mount_bonus(apply.DEF_GRADE_BONUS,150,900)  
       end
   end
end

Poprawi mi ktoś zebym mógł wsiac i zsaidac z wierzchowców ? Bo moge tylko wsiadać ;x

Xan_2209 · 8 Października 2011

Siemka może ktoś poprawić mi ten quest bo nie chce działać:

quest move_ring begin

state start begin

when 80009.use begin

say_title ( "Pierscien Teleportacji:" )

say (pc.get_name().. " Moge cie przeniesc do :" )

say ( "" )

local s = select ( "Miasta" , "Expowiska" , "Expowiska Cz.2" , "Inne" , "Anuluj" )

if s = 1 then

say ( pc.get_name().." Do którego miasta chcesz sie wybrac??" )

local x == select ( "Jinno" , "Shinsoo" , "Chunjo" , "Jinno M2" , "Shinsoo M2" , "Chunjo M2" , "Anuluj" )

if x == 1 then

pc.warp ( 959900 , 269200 )

elseif x == 2 then

pc.warp ( 474300 , 954800 )

elseif x == 3 then

pc.warp ( 63800 , 166400 )

elseif x == 4 then

pc.warp ( 863900 , 246000 )

elseif x == 5 then

pc.warp ( 353100 , 882900 )

elseif x == 6 then

pc.warp ( 145500 , 240000 )

elseif x == 7 then

return

end

if s = 2 then

say_title ( pc.get_name().." Gdzie chcesz poexpić?")

local z = select ( "Dolina" , "Pustynia" , "Góra Sohan" , "Ognista Ziema" , "Loch Pająków v1" , "Loch Pająków v2" , "Anuluj" )

if z == 1 then

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 402100 , 673900 )

elseif empire == 2 then

pc.warp ( 270400 , 739900 )

elseif empire == 3 then

pc.warp ( 321300 , 808000 )

end

elseif z == 2 then

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 217800 , 627200 )

elseif empire == 2 then

pc.warp ( 221900 , 502700 )

elseif empire == 3 then

pc.warp ( 344000 , 502500 )

end

elseif z == 3 then

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 434200 , 290600 )

elseif empire == 2 then

pc.warp ( 375200 , 174900 )

elseif empire == 3 then

pc.warp ( 491800 , 173600 )

end

elseif z == 4 then

local empire = pc . get_empire ( )

if empire == 1 then

pc.warp ( 599400 , 756300 )

elseif empire == 2 then

pc.warp ( 597800 , 622200 )

elseif empire == 3 then

pc.warp ( 730700 , 689800 )

end

elseif z == 5 then

pc.warp ( 60000 , 496000 )

elseif z = 6 then

pc.warp ( 704100 , 464100 )

elseif z = 7 then

return

end

if s = 3 then

say_title ( pc.get_name().." Gdzie chcesz poexpić?")

local a = select ( "Loch Pająków v3 Lv.65" , "Atlantyda v1 Lv.75" , "Atlantyda v2 Lv.80" , "Atlantyda v3 Lv.90" , "Mroczne Wyspy Lv.100" , "Anuluj" )

elseif a == 1 then

if pc.get_level() < 64 then

pc.warp ( 563200 , 435200 )

end

elseif a == 2 then

if pc.get_level() < 74 then

pc.warp ( 9800 , 1215100 )

end

elseif a == 3 then

if pc.get_level() < 79 then

pc.warp ( 153600 , 1203200 )

end

elseif a == 4 then

if pc.get_level() < 89 then

pc.warp ( 153600 , 1356800 )

end

elseif a == 5 then

if pc.get_level() < 99 then

pc.warp ( 444400 , 444400 )

end

elseif a == 6 then

return

end

if s = 4 then

say ( pc.get_name().." Może coś innego cie zainteresuje:)" )

local p == select ( "DT" , "Ziemia Olbrzymów" , "Mapa Handlowa" , "Mapa Eventowa" , "Labirynt Minotaura Lv.100" , "Anuluj" )

elseif p == 1 then

pc.warp ( 590500 , 110500 )

elseif p == 2 then

pc.warp ( 845100 , 745900 )

elseif p == 3 then

pc.warp ( 911100 , 911100 )

elseif p == 4 then

pc.warp ( 104080 , 0 )

elseif p == 5 then

if pc.get_level() < 99 then

pc.warp ( 791100 , 791100 )

end

elseif p == 6 then

return

end

sfUSERmsql · 8 Października 2011

poproszę questa u npc 283834

po klik nieciu mamy do wyboru :

Magiczny metal 100kk

Peleryny mesta 10kk <---200szt

Marmur blogoslawienstwa 50kk

i jak ktos kliknie w to to odchodzi mu tyle kasy i dostaje jeden wybrany item

kopson44 · 8 Października 2011

prubowałem sobie questa zrobić

takie cóś

quest d_ponlok begin
       state start begin
               when 20016.chat."Wyzwanie" begin --- ID to index mapki
                               say_title(mob_name(20016)..":")
                       if pc.getqf("raz") == 0 then
                               say("Witaj "..pc.get_name().."! ")
                               say("Mozesz u mnie odbyć pewną misje. ")
                               say("")
                               say("Misja ta polega na zniszczeniu kilku kamieni ")
                               say("metin i kilku potworków. ")

                               if pc.get_level() < 50 then
                                       say("Mogę wpuszczać tylko osoby z 50 poziomem. ")
                                       party.chat("Wasz lider nie posiada 50 poziomu. ")                                  

                               else
                                       say("Spełniasz Warunki: ")
                                       say_title("Masz lvl 50 lub wiekszy ")
                                       say("")
                                       say_reward("Chcesz się przenieść aby ją wykonać? ")

                                       local s = select("Tak", "Nie")                    
                                               if s == 1 then
                                                       say_title(mob_name(20016)..":")
                                                       say("Zostaniesz przeniesiony na inna mape. ")
                                                                                                               pc.setqf("kopson", 1)
                                                       pc.setqf("raz", get_time()+1*1*1)
                                                       pc.warp(7013100, 2512600)
                                               end
                               end

                       else
                               say("Nie mozesz tego zrobić wiecej niż raz dziennie. ")
                               say("")
                       end

                       if pc.getqf("raz") <= get_time() then
                               pc.setqf("raz", 0)
                       end
               end

                               when 8004.kill begin
                       timer("metek_lv20", 6)
               end
			when metek_lv20.timer begin
			d.new_jump_all(103, 383, 640)
                                       if pc.getqf("kopson") ==1 then
                       d.spawn_mob(8003, 375, 405)        -- zrobił bym to przez d.regen_file ale nie wiem
                       d.spawn_mob(8003, 392, 405)        -- co tu za mooby mają się respić.
                       d.spawn_mob(8003, 406, 392)        -- x and y to kaordy.
                       d.spawn_mob(8003, 406, 372)
                       d.spawn_mob(8003, 393, 360)
					d.spawn_mob(8003, 374, 360)
                       d.spawn_mob(8003, 360, 373)
					d.spawn_mob(8003, 359, 394)
                       timer("wroc", 1800)   
					d.notice("Zniszcz Wszystkie Metiny aby odblokować nowe zadanie ")
					d.notice("Na tej mapie możesz przebywać nie dłużej niż 30min, pamiętaj o tym. ")
					d.notice(" Śpiesz się poł godziny to nie wiele czasu. ")
					end
               end

			when 8003.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
			 local cont = d.getf("8_kamykuf") + 1
               d.setf("8_kamykuf", cont)

               if cont >= 8 then
                       d.setf("8_kamykuf", 0)
					timer("dalej", 6)
               end     
       end
	when 8003.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin
	game.drop_item(50300, 1)
	end

			when dalej.timer begin
			d.spawn_mob(191, 383, 369)
			d.spawn_mob(192, 208, 301)
			d.spawn_mob(193, 468, 204)
			d.spawn_mob(194, 452, 578)
			d.regen_file("data/takiecos/takiecos1.txt")
			end

			when kill with mob_vnum() == 191 and mob_vnum() == 192 and mob_vnum() == 193 and mob_vnum() == 194 begin
			d.notice("Pokonaj 4 mini bosy aby odblokować coś nowego ")
			timer('event', 6)
			end

			when 191.kill begin
			d.notice("Lykos Pokonany!")
			end
			when 192.kill begin
			d.notice("Scrofa Pokonana!")
			end
			when 193.kill begin
			d.notice("Bera Pokonana!")
			end
			when 194.kill begin
			d.notice("Tigris Pokonany!")
			end

               when event.timer begin
			d.new_jump_all(103, 383, 383)
                       if pc.getqf("rip") == 0 then
						d.notice("4 Bossy Pokonane, za chwilę będzie ostatni boss i niespodzianka")
                               d.spawn_mob(591, 384, 384)
							d.regen_file("data/takiecos/takiecos2.txt")
                               pc.setqf("rip", 1*1*1)
                       end

                       if pc.getqf("rip") <= get_time() then
                               pc.setqf("rip", 0)
                       end
               end
               when logout with  pc.get_map_index() == 103 begin
                       local empire = pc.get_empire() 
                               if empire == 1 then 
                                       pc.warp(474300, 954800) 
                               elseif empire == 2 then 
                                       pc.warp(63800, 166400) 
                               elseif empire == 3 then 
                                       pc.warp(959900, 269200)
                               end
               end

               when 591.kill with pc.in_dungeon() and pc.get_map_index() == 103 begin -- rip zabity w dangeonie i na mapie
                       d.notice("Główny Boss Zniszczony. ")
					d.regen_file("data/takiecos/takiecos3.txt")
               end

               when wroc.timer begin
                          d.exit_all()
               end
       end
end

quest się wgrywa, ale nie do końca działa prawidłowo

nie pokazują się żadne informacje d.notice

ta część questa śmiga

quest d_ponlok begin
       state start begin
               when 20016.chat."Wyzwanie" begin --- ID to index mapki
                               say_title(mob_name(20016)..":")
                       if pc.getqf("raz") == 0 then
                               say("Witaj "..pc.get_name().."! ")
                               say("Mozesz u mnie odbyć pewną misje. ")
                               say("")
                               say("Misja ta polega na zniszczeniu kilku kamieni ")
                               say("metin i kilku potworków. ")

                               if pc.get_level() < 50 then
                                       say("Mogę wpuszczać tylko osoby z 50 poziomem. ")
                                       party.chat("Wasz lider nie posiada 50 poziomu. ")                                  

                               else
                                       say("Spełniasz Warunki: ")
                                       say_title("Masz lvl 50 lub wiekszy ")
                                       say("")
                                       say_reward("Chcesz się przenieść aby ją wykonać? ")

                                       local s = select("Tak", "Nie")                    
                                               if s == 1 then
                                                       say_title(mob_name(20016)..":")
                                                       say("Zostaniesz przeniesiony na inna mape. ")
                                                                                                               pc.setqf("kopson", 1)
                                                       pc.setqf("raz", get_time()+1*1*1)
                                                       pc.warp(7013100, 2512600)
                                               end
                               end

                       else
                               say("Nie mozesz tego zrobić wiecej niż raz dziennie. ")
                               say("")
                       end

                       if pc.getqf("raz") <= get_time() then
                               pc.setqf("raz", 0)
                       end
               end

                               when 8004.kill begin
                       timer("metek_lv20", 6)
               end
			when metek_lv20.timer begin
			d.new_jump_all(103, 383, 640)
                                       if pc.getqf("kopson") ==1 then
                       d.spawn_mob(8003, 375, 405)        -- zrobił bym to przez d.regen_file ale nie wiem
                       d.spawn_mob(8003, 392, 405)        -- co tu za mooby mają się respić.
                       d.spawn_mob(8003, 406, 392)        -- x and y to kaordy.
                       d.spawn_mob(8003, 406, 372)
                       d.spawn_mob(8003, 393, 360)
					d.spawn_mob(8003, 374, 360)
                       d.spawn_mob(8003, 360, 373)
					d.spawn_mob(8003, 359, 394)
                       timer("wroc", 1800)   
					d.notice("Zniszcz Wszystkie Metiny aby odblokować nowe zadanie ")
					d.notice("Na tej mapie możesz przebywać nie dłużej niż 30min, pamiętaj o tym. ")
					d.notice(" Śpiesz się poł godziny to nie wiele czasu. ")
					end
               end

dalej już chciałem dodać opcje, że trzeba ubić 8 metinów walki po czym respi się kilka bosów i to właśnie niechce działać

mógłby ktoś pomóc

tylko mnie nie berać, że zrobiony jakoś chaotycznie bo ja 1 raz wogóle jakiś quest próbowałem zrobić oczywiście mała przeróbka + dodatki

sfUSERmsql · 8 Października 2011

czesc

mam problem:

 quest wymianka begin
state start begin
when 9010.chat."Wymiana" begin
say("Za 1000 szt. sztabek otrzymasz zbroję Hwang!")
say("Chcesz się zamienić?")
local x=select(locale.yes, locale.no)
if x==1 then
if pc.count_item(50200)>=1 then
pc.remove_item(50200, 1)
pc.give_item2(80009, 1)
say("Dokonano zamiany!")
else
say("Nie masz tobolu ")
end
else
say("Nie to nie...")
end
end
end
end

moglbys mi pomoc z tym questem ?

ze kazda klasa dostaje swój hwang

ExPuma12 · 8 Października 2011

up

proszę powinno działać

quest wymiana begin
state start begin
when id_npc.chat."Wymiana" begin
say_title("Nazwa npc: ")
say("Witaj:)
say("możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga.")
say_reward("Wymieniasz się ")
local tn = select ("Tak" , "Nie")
if tn == 2 then
return
end
if tn == 1 then
if pc.count_item(id_sztabki) >= 1000 then
say_title("Nazwa npc: ")
say("Wybierz swoja klase postaci)
locale wybierz = select ("Wojownik" , "Ninja" , "Sura" , "Szaman")
if wybierz == 1 then
pc.give_item2(id_hwanga_dla_woja)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 2 then
pc.give_item2(id_hwanga_dla_ninji)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 3 then
pc.give_item2(id_hwanga_dla_sury)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 4 then
pc.give_item2(id_hwanga_dla_szamana)
pc.remove_item(id_sztabki, 1000)
else
say_title("Nazwa npc: ")
say("Nie masz sztabek")
end
end
end
end
end

Stelios · 8 Października 2011

up

proszę powinno działać

quest wymiana begin
state start begin
when id_npc.chat."Wymiana" begin
say_title("Nazwa npc: ")
say("Witaj:)
say("możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga.")
say_reward("Wymieniasz się ")
local tn = select ("Tak" , "Nie")
if tn == 2 then
return
end
if tn == 1 then
if pc.count_item(id_sztabki) >= 1000 then
say_title("Nazwa npc: ")
say("Wybierz swoja klase postaci)
locale wybierz = select ("Wojownik" , "Ninja" , "Sura" , "Szaman")
if wybierz == 1 then
pc.give_item2(id_hwanga_dla_woja)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 2 then
pc.give_item2(id_hwanga_dla_ninji)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 3 then
pc.give_item2(id_hwanga_dla_sury)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 4 then
pc.give_item2(id_hwanga_dla_szamana)
pc.remove_item(id_sztabki, 1000)
else
say_title("Nazwa npc: ")
say("Nie masz sztabek")
end
end
end
end
end

Brak "

Poprawka:

quest wymiana begin
state start begin
when id_npc.chat."Wymiana" begin
say_title("Nazwa npc: ")
say("Witaj:")
say("możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga.")
say_reward("Wymieniasz się ")
local tn = select ("Tak" , "Nie")
if tn == 2 then
return
end
if tn == 1 then
if pc.count_item(id_sztabki) >= 1000 then
say_title("Nazwa npc: ")
say("Wybierz swoja klase postaci")
locale wybierz = select ("Wojownik" , "Ninja" , "Sura" , "Szaman")
if wybierz == 1 then
pc.give_item2(id_hwanga_dla_woja)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 2 then
pc.give_item2(id_hwanga_dla_ninji)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 3 then
pc.give_item2(id_hwanga_dla_sury)
pc.remove_item(id_sztabki, 1000)
end
if wybierz == 4 then
pc.give_item2(id_hwanga_dla_szamana)
pc.remove_item(id_sztabki, 1000)
else
say_title("Nazwa npc: ")
say("Nie masz sztabek")
end
end
end
end
end

sfUSERmsql · 8 Października 2011

up błąd mam :

vps11363# cd /usr/home/Polish_SF/share/locale/germany/quest/
vps11363# ./qc wtf.quest
QUEST : wtf
STATE : start
WHEN  : 20095.chat ("Wymiana")
say_title ( "Zamieniacz: " )
say ( "Witaj:" )
say ( "możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga." )
say_reward ( "Wymieniasz się " )
local tn = select ( "Tak" , "Nie" )
if tn == 2 then
return
end
if tn == 1 then
if pc . count_item ( 80007 ) >= 1000 then
say_title ( "Nazwa npc: " )
say ( "Wybierz swoja klase postaci" )
locale wybierz = select ( "Wojownik" , "Ninja" , "Sura" , "Szaman" )
if wybierz == 1 then
pc . give_item2 ( 11971 )
pc . remove_item ( 80007 , 1000 )
end
if wybierz == 2 then
pc . give_item2 ( 11972 )
pc . remove_item ( 80007 , 1000 )
end
if wybierz == 3 then
pc . give_item2 ( 11973 )
pc . remove_item ( 80007 , 1000 )
end
if wybierz == 4 then
pc . give_item2 ( 11974 )
pc . remove_item ( 80007 , 1000 )
else
say_title ( "Zamieniacz: " )
say ( "Nie masz sztabek" )
end
end
end

syntax error : [string "start"]:13: `=' expected near `wybierz'
wtf.quest:38:Abort (core dumped)

syntax error : [string "start"]:13: `=' expected near `wybierz'
wtf.quest:38:Abort (core dumped)

quest hwang begin

state start begin

when 20095.chat."hwang" begin

say_title("Zamieniacz: ")

say("Witaj:")

say("możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga.")

say_reward("Wymieniasz się ")

local tn = select ("Tak" , "Nie")

if tn == 2 then

return

end

if tn == 1 then

if pc.count_item(80007) >= 1000 then

say_title("Zamieniacz: ")

say("Wybierz swoja klase postaci")

locale wybierz = select ("Wojownik" , "Ninja" , "Sura" , "Szaman")

if wybierz == 1 then

pc.give_item2(11971)

pc.remove_item(80007, 1000)

end

if wybierz == 2 then

pc.give_item2(11972)

pc.remove_item(80007, 1000)

end

if wybierz == 3 then

pc.give_item2(11973)

pc.remove_item(80007, 1000)

end

if wybierz == 4 then

pc.give_item2(11974)

pc.remove_item(80007, 1000)

else

say_title("Zamieniacz: ")

say("Nie masz sztabek")

end

Stelios · 9 Października 2011

up błąd mam :
vps11363# cd /usr/home/Polish_SF/share/locale/germany/quest/
vps11363# ./qc wtf.quest
QUEST : wtf
STATE : start
WHEN  : 20095.chat ("Wymiana")
say_title ( "Zamieniacz: " )
say ( "Witaj:" )
say ( "możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga." )
say_reward ( "Wymieniasz się " )
local tn = select ( "Tak" , "Nie" )
if tn == 2 then
return
end
if tn == 1 then
if pc . count_item ( 80007 ) >= 1000 then
say_title ( "Nazwa npc: " )
say ( "Wybierz swoja klase postaci" )
locale wybierz = select ( "Wojownik" , "Ninja" , "Sura" , "Szaman" )
if wybierz == 1 then
pc . give_item2 ( 11971 )
pc . remove_item ( 80007 , 1000 )
end
if wybierz == 2 then
pc . give_item2 ( 11972 )
pc . remove_item ( 80007 , 1000 )
end
if wybierz == 3 then
pc . give_item2 ( 11973 )
pc . remove_item ( 80007 , 1000 )
end
if wybierz == 4 then
pc . give_item2 ( 11974 )
pc . remove_item ( 80007 , 1000 )
else
say_title ( "Zamieniacz: " )
say ( "Nie masz sztabek" )
end
end
end

syntax error : [string "start"]:13: `=' expected near `wybierz'
wtf.quest:38:Abort (core dumped)
syntax error : [string "start"]:13: `=' expected near `wybierz'
wtf.quest:38:Abort (core dumped)
quest hwang begin

state start begin

when 20095.chat."hwang" begin

say_title("Zamieniacz: ")

say("Witaj:")

say("możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga.")

say_reward("Wymieniasz się ")

local tn = select ("Tak" , "Nie")

if tn == 2 then

return

end

if tn == 1 then

if pc.count_item(80007) >= 1000 then

say_title("Zamieniacz: ")

say("Wybierz swoja klase postaci")

locale wybierz = select ("Wojownik" , "Ninja" , "Sura" , "Szaman")

if wybierz == 1 then

pc.give_item2(11971)

pc.remove_item(80007, 1000)

end

if wybierz == 2 then

pc.give_item2(11972)

pc.remove_item(80007, 1000)

end

if wybierz == 3 then

pc.give_item2(11973)

pc.remove_item(80007, 1000)

end

if wybierz == 4 then

pc.give_item2(11974)

pc.remove_item(80007, 1000)

else

say_title("Zamieniacz: ")

say("Nie masz sztabek")

end

end

end

end

end

quest wymiana begin
state start begin
	when id_npc.chat."Wymiana" begin
		say_title("Nazwa npc: ")
		say("Witaj:")
		say("możesz u mnie wymienic 1000szt. sztabek na zbroje hwanga.")
		say_reward("Wymieniasz się ")
		local tn = select ("Tak" , "Nie")
			if tn == 2 then
				return
			end
			if tn == 1 then
				if pc.count_item(id_sztabki) >= 1000 then
					say_title("Nazwa npc: ")
					say("Wybierz swoja klase postaci")
					locale wybierz = select ("Wojownik" , "Ninja" , "Sura" , "Szaman")
						if wybierz == 1 then
							pc.give_item2(id_hwanga_dla_woja)
							pc.remove_item(id_sztabki, 1000)
						end
						if wybierz == 2 then
							pc.give_item2(id_hwanga_dla_ninji)
							pc.remove_item(id_sztabki, 1000)
						end
						if wybierz == 3 then
							pc.give_item2(id_hwanga_dla_sury)
							pc.remove_item(id_sztabki, 1000)
						end
						if wybierz == 4 then
							pc.give_item2(id_hwanga_dla_szamana)
							pc.remove_item(id_sztabki, 1000)
						end
				else
					say_title("Nazwa npc: ")
					say("Nie masz sztabek")
				end
			end
	end
end
end

sfUSERmsql · 9 Października 2011

-------------------------------------------------------------------
---		Misja by Czarny dla CzarnyMT2 oraz Czarny-questy.cba.pl	---
--- Prosze o nie przypisywanie sobie cudzej pracy! Pozdrawiam ---
---				Życzę miłej zabawy i powodzenia 				---
-------------------------------------------------------------------

quest wymiana_itemkow begin
state start begin
	when 20359.chat."Witaj!" begin
		local s = select("Pelerynki Mestwa ", "Udoskonalenie Postaci ", "Krwisty Kamien ", "Magiczny Metal ", "Anuluj")
		if s == 5 then
			return
		end
		if s == 1 then
			say_title(mob_name(20359)..":")
			say("Witaj przyjacielu! ")
			say("Co cie tu sprowadza? ")
			say("Co chciałby? wymienić? ")
			say("")
			say_reward(pc.get_name()..":")
			say("Chciałbym wymienić Sztabki na ")
			say("Peleryny Mestwa ")
			say_item("", 70038 , "Peleryna Mestwa")
			say("")
			say_title(mob_name(20359)..":")
			say("Dobrze! Zobaczmy co się da zrobić! ")
			say("")
			wait()
			say_title(mob_name(20359)..":")
			say("Aby wymienić się ze mna na ")
			say("Pelerynki potrzebujesz ")
			say("1 - Zlota Sztabka 10KK ")
			say("1 - Zlota Sztabka 10kk ")
			say("1 - Zlota Sztabka 10KK ")
			say("")
			say("Posiadasz tyle Sztabek ")
			say("")
			local s2 = select("Tak, mam tyle ", "Niestety nie.. ")
				if s2 == 2 then 
					return
				end
				if s2 == 1 then
					if pc.count_item(80007) >= 1 and pc.count_item(80007) >= 1 and pc.count_item(80007) >= 1 then
						say_title(mob_name(20359)..":")
						say("W takim razie mogę się z Toba wymienić! ")
						say("")
						pc.removeitem(80007, 1)
						pc.removeitem(80007, 1)
						pc.removeitem(80007, 1)
						pc.give_item2(70038, 200)
						wait()
						say_title(mob_name(20359)..":")
						say("Dziękuję przyjacielu! ")
						say("Do zobaczenia! ")
						say("")
					else
						say_title(mob_name(20359)..":")
						say("Nie posiadasz wystarczajšcej ilosci ")
						say("sztabek... Niestety nie wymienie się z Toba! ")
						say("")
						say("Wróc kiedy będziesz miał ich wystarczajšco dużo! ")
					end
				end
		end
		if s == 2 then
			say_title(mob_name(20359)..":")
			say("Witaj przyjacielu! ")
			say("Co cie tu sprowadza? ")
			say("Co chciałby? wymienić? ")
			say("")
			say_reward(pc.get_name()..":")
			say("Chciałbym wymienić Sztabki na ")
			say("Wybrany Item! ")
			say("")
			say_title(mob_name(20359)..":")
			say("Dobrze! Zobaczmy co się da zrobić! ")
			say("")
			wait()
			say_title(mob_name(20359)..":")
			say("Aby wymienić się ze mna na ")
			say("którys Item potrzebujesz ")
			say("3 Sztabki - Marmur Blogoslawienstwa ")
			say("3 Sztabki - Mikstura Ataku ")
			say("3 Sztabki - Mikstura Szybkosci ")
			say("")
			say("Posiadasz tyle Sztabek? ")
			say("")
			local s3 = select("Marmur Blogoslawienstwa ", "Mikstura Ataku ", "Mikstura Szybkosci", "Anuluj")
				if s3 == 4 then 
					return
				end
				if s3 == 1 with pc.count_item(80007) >= 3 then
					say_title(mob_name(20359)..":")
					say("Za 3 sztabki wymienie się z Toba na ")
					say("5 bon! ")
					say_item_vnum(70024)
					say("")
					pc.removeitem(80007, 1)
					pc.removeitem(80007, 1)
					pc.removeitem(80007, 1)
					pc.give_item2(70024, 1)

				elseif s3 == 2 with pc.count_item(80007) >= 3 then
					say_title(mob_name(20359)..":")
					say("Za 3 sztabki wymienie się z Toba na ")
					say("Miksture Ataku! ")
					say_item_vnum(71034)
					say("")
					pc.removeitem(80007, 1)
					pc.removeitem(80007, 1)
					pc.removeitem(80007, 1)
					pc.give_item2(71034, 200)

				elseif s3 == 3 with pc.count_item(80007) >= 3 then
					say_title(mob_name(20359)..":")
					say("Za 3 sztabki wymienie sie za ")
					say("Mikstura Szybkosci! ")
					say_item_vnum(27115)
					say("")
					pc.removeitem(80007, 1)
					pc.removeitem(80007, 1)
					pc.removeitem(80007, 1)
					pc.give_item2(27115, 200)
				end
		end

		if s == 3 then
			say_title(mob_name(20359)..":")
			say("Witaj przyjacielu! ")
			say("Co cie tu sprowadza? ")
			say("Co chciałby? wymienić? ")
			say("")
			say_reward(pc.get_name()..":")
			say("Chciałbym wymienić Sztabki na ")
			say("Krwisty Kamien ! ")
			say_item("", 70364 , "Krwisty Kamien ")
			say("")
			say_title(mob_name(20359)..":")
			say("Dobrze! Zobaczmy co się da zrobić! ")
			say("")
			wait()
			say_title(mob_name(20359)..":")
			say("Aby wymienić się ze mna na ")
			say("Krwisty Kamol musisz miec ")
			say("3000 zlotych sztabek ")
			say("")
			say("Posiadasz tyle Szkatułek? ")
			say("")
			local s2 = select("Tak, mam tyle ", "Niestety nie.. ")
				if s2 == 2 then 
					return
				end
				if s2 == 1 with pc.count_item(80007) >= 3000 then
					say_title(mob_name(20359)..":")
					say("Dobrze więc! Zamieńmy się! ")
					say("")
					pc.removeitem(80007, 3000)
					pc.give_item2(70364, 1)
				else
					say("Nie posiadasz tylu Sztabek ")
					say("nie wymienie się z Toba... ")
					say("")
				end
		end
		if s == 4 then
			say_title(mob_name(20359)..":")
			say("Witaj przyjacielu! ")
			say("Co cie tu sprowadza? ")
			say("Co chciałby? wymienić? ")
			say("")
			say_reward(pc.get_name()..":")
			say("Chciałbym wymienić sztabki na ")
			say("Magiczny Metal ! ")
			say_item("", 25041 , "Magiczny Metal ")
			say("")
			say_title(mob_name(20359)..":")
			say("Dobrze! Zobaczmy co się da zrobić! ")
			say("")
			wait()
			say_title(mob_name(20359)..":")
			say("Aby wymienić się ze mna na ")
			say("Magiczny metal potrzebujesz ")
			say("10 zlotych sztabek ")
			say("")
			say("Posiadasz tyle sztabek? ")
			say("")
			local s2 = select("Tak, mam tyle ", "Niestety nie.. ")
				if s2 == 2 then 
					return
				end
				if s2 == 1 with pc.count_item(80007) >= 10 then
					say_title(mob_name(20359)..":")
					say("Dobrze więc! Zamieńmy się! ")
					say("")
					pc.removeitem(80007, 10)
					pc.give_item2(25041, 1)
				else
					say("Nie posiadasz tylu Złotych Szkatułek ")
					say("nie wymienie się z Toba... ")
					say("")
				end
		end
	end
end
end

syntax error : [string "start"]:83: `then' expected near `with'
wymiana_itemkow.quest:203:Abort (core dumped)

co z tym jest nie tak ? : (

Wisz · 9 Października 2011

        ---------------------------------------------
       -- BosS 
       ---------------------------------------------
       when resp_nieb.timer begin
               d.setf("levels3", 8)
               d.spawn_mob(2493, 520, 580)
       end

       when 2493.kill with pc.in_dungeon() and pc.get_map_index() >= 30000 and pc.get_map_index() < 40000 begin
               d.kill_all()
               local m_sex = pc.get_sex()
                                   if m_sex == 0 then
               notice_all(pc.get_name().." zabił Niebiańskiego Smoka!")
                       else
               notice_all(pc.get_name().." zabiła Niebiańskiego Smoka!")
                               end

               timer("close1", 60)
       end

       when close1.timer begin
           d.exit_all()
       end

Co tutaj jest zle ze :

1. Po ubiciu 2493 nie pojawia sie komunikat

2. Nie wywala nas z mapy po ubuciu 2493

3. Jak mam zrobić zeby dopiero po wybiciu spota z .../data/dungeon/....txt/ respił sie boss np. 2493

BlondynX · 9 Października 2011

---------------------------------------------
       -- BosS 
       ---------------------------------------------
       when resp_nieb.timer begin
               d.setf("levels3", 8)
               d.spawn_mob(2493, 520, 580)
       end

       when 2493.kill begin
               d.kill_all()
               local m_sex = pc.get_sex()
                                   if m_sex == 0 then
               notice_all(pc.get_name().." zabił Niebiańskiego Smoka!")
                       else
               notice_all(pc.get_name().." zabiła Niebiańskiego Smoka!")
                               end

               timer("close1", 60)
       end

       when close1.timer begin
           d.exit_all()
       end

lap

Wisz · 9 Października 2011

@UP

Nadal po ubiciu bosas nie widać tego textu i nie wywala nas z mapy po 60 sec tak jak to jest ustawione ;<

Svope · 9 Października 2011

Po co wy dajecie przed timerem endy oO

---------------------------------------------
       -- BosS 
       ---------------------------------------------
       when resp_nieb.timer begin
               d.setf("levels3", 8)
               d.spawn_mob(2493, 520, 580)
       end

       when 2493.kill begin
               d.kill_all()
               local m_sex = pc.get_sex()
                                   if m_sex == 0 then
               notice_all(pc.get_name().." zabił Niebiańskiego Smoka!")
                       else
               notice_all(pc.get_name().." zabiła Niebiańskiego Smoka!")    
               timer("close1", 60)
       end

       when close1.timer begin
           d.exit_all()
       end

Wisz · 9 Października 2011

@UP

syntax error : [string "start"]:9: unexpected symbol near `when'

.run.quest:92:Abort (core dumped)

---------------------------------------------
       -- BosS 
       ---------------------------------------------
       when resp_nieb.timer begin
               d.setf("levels3", 8)
               d.spawn_mob(2493, 520, 580)
       end

       when 2493.kill begin
               d.kill_all()
               local m_sex = pc.get_sex()
                                   if m_sex == 0 then
               notice_all(pc.get_name().." zabił Niebiańskiego Smoka!")
                       else
               notice_all(pc.get_name().." zabiła Niebiańskiego Smoka!")    
               timer("close1", 60)
       end

       when close1.timer begin
           d.exit_all()
       end

end
end

?

Sorry ale nie moge dac całego questa ;P

Svope · 9 Października 2011

@UP 92 linijka to ktora dokladnie endy czy co xDD

Wisz · 9 Października 2011

aa ta przedostatni end

@Edit

A jak zrobić zeby można bylo wchodzic na mape od min. 110 ale max 120lvl?

if pc.get_level() < 110 then

I co tutaj dalej dodac?:>

Necromant · 9 Października 2011

Czemu jak koncze quest z zebami nie wlacza sie quest na 40 lvl u biologa ? Treść na 30 lvl jest taka : Co źle ?

----------------------------------------------------
--COLLECT QUEST_lv30
--METIN2 Collect Quest  
----------------------------------------------------
quest collect_quest_lv30  begin
state start begin
	when login or levelup with pc.level >= 30 and pc.level <= 90 begin
		set_state(information)
	end	
end

state information begin
	when letter begin
		local v = find_npc_by_vnum(20084)
		if v != 0 then
			target.vid("__TARGET__", v, "Analiza Biologa - Zeby Orka")
		end
		send_letter("Analiza Biologa - Zeby Orka")
	end

	when button or info begin
                   say_title("Analiza Biologa - Zeby Orka")
                   say("")
                   say("Biolog Chaegirab, uczen Uriela,")
                   say("wlasnie Cie szukal. Prosze idz")
                   say("do niego i zaoferuj mu swoja pomoc")
                   say("")
	end

	when __TARGET__.target.click or
		20084.chat."Znajdz Biologa" begin
		target.delete("__TARGET__")
		say("Biolog Chaegirab:")
		---                                                   l
		say("Niebiosa, prosze pomozcie mi...")
           say("Badam wszystkie rodzaje potworow w tym ")
           say("imperium. Jest bardzo duzo rzeczy,")
           say("ktore musza zostac zrobione. Nie mam")
           say("czasu abym mogl sam wybrac sie na wyprawe.")
           say("Prosze, pomoz mi.")
           wait()
           say("Aktualnie badam Zeby Orka.")
           say("Musze przeprowadzic kilka eksperymentow,")
           say("dlatego potrzebuje kilku Zebow Orka.")
           say("Czy moglbys przyniesc mi 10 Zebow Orka?")
           say("Prosze, pomoz mi! Zawsze przynos mi po jednym,")
           say("abym mial czas na ich dokladne przebadanie!")
           say("")																																				  
		set_state(go_to_disciple)
		pc.setqf("duration",0)
		pc.setqf("collect_count",0)
		pc.setqf("drink_drug",0)
	end
end

state go_to_disciple begin
	when letter begin
		send_letter("Zadanie Specjalne - Zeby Orka")

	end
	when button or info begin
		say_title("Znajdz Zeby Orka")
		---                                                   l
		say("")
		say("Biolog Chaegirab, uczen Uriela,")
		say("szuka Zebow Orka.")
		say("Zawsze przynos mu po jednym, aby mial czas")
		say("na ich dokladne przebadanie.")
		say("Zebow orka szukaj u Czarnych Orkow!")
		say("")
		say_item_vnum(30006) 
		say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Zebow Orka.")
		say("")
	end

	when 71035.use begin --°g´bĂÄ¤ô
		if get_time() < pc.getqf("duration") then
			say("")
			say("ÁŮ¤ŁĄiĄH¨ĎĄÎ°g´bĂÄ¤ô")
			say("")
			return
		end
		if pc.getqf("drink_drug")==1 then
			say("")
			say("¤w¸g¨ĎĄÎ¤F1¦¸")
			say("")

			return
		end
		if pc.count_item(30006)==0 then
			say("Biolog Chaegirab:")
			say("Co? Nie przyniosles mi zadnych")
			say("Zebow Orka?...")
			say("")
			return
		end
		item.remove()	
		pc.setqf("drink_drug",1)
	end




   	when 20084.chat."Zeby Orka" with pc.count_item(30006) >0   begin
		if get_time() > pc.getqf("duration") then
			say("Biolog Chaegirab:")
			---                                                   l
			say("Oh!! Znalazles!")
			say("Pozwol, ze rzuce okiem...")
			say("Jeszcze chwilke.")
			say("")
			pc.remove_item("30006", 1)
			pc.setqf("duration",get_time()+60*1*15)
			wait()

			local pass_percent
			if pc.getqf("drink_drug")==0 then
				pass_percent=70
			else		
				pass_percent=90
			end

			local s= number(1,100)
			if s<= pass_percent  then
			   if pc.getqf("collect_count")< 9 then     --10ÓĄH¤U 
					local index =pc.getqf("collect_count")+1 
					pc.setqf("collect_count",index)     --¨ú±o¤@ÓÉ +1 
					say("Biolog Chaegirab:")
					say("Oh!! Ten Zab Orka jest doskonalej jakosci!")
					say("Przynies mi jeszcze".." "..10-pc.getqf("collect_count").. " Zebow Orka.")
					say("Prosze, sprobuj je znalezc!")
					say("")
					pc.setqf("drink_drug",0)	 --ĂÄ¤ôŞěl¤Ć
					return
				end
				say("Biolog Chaegirab:")
				say("Oh, zebrales juz wszystkie?")
				say("Dobra robota...")
				say("Ale poczekaj!")
				say("Aby zakonczyc swoja prace, potrzebuje")	
				say("abys przyniosl dla mnie jeszcze jeden przedmiot!")
				say("")
				pc.setqf("collect_count",0)
				pc.setqf("drink_drug",0)	
				pc.setqf("duration",0) 
				set_state(key_item)
				return
			else								
			say("Biolog Chaegirab:")
			say("Ten Zab orka jest zlej jakosci!")
			say("Sprobuj przyniesc inny!")
			say("Prosze, pomoz mi!")
			pc.setqf("drink_drug",0)	 --ĂÄ¤ôŞěl¤Ć
			return
			end
    else
	  say("Biolog Chaegirab:")
	  say("Jeszcze nie skonczylem badac ostatniego Zebu Orka!")
	  say("Wroc pozniej, kiedy juz skoncze!")
	  say("")
	  return
	end

end
end


state key_item begin
	when letter begin
		send_letter("Zadanie Specjalne - Zeby Orka")

		if pc.count_item(30220)>0 then	
			local v = find_npc_by_vnum(20084)
			if v != 0 then
				target.vid("__TARGET__", v, "Analiza Biologa - Zeby Orka")
			end
		end

	end
	when button or info begin
		if pc.count_item(30220) >0 then
			say_title("Znalazles kamien duszy!")
			say("")
			---                                                   l
			say("Wroc do biologa, aby")
			say("odniesc mu kamien!")
			say("")
			return
		end
		say_title("Kamien Duszy")
		say("")
		---                                                   l
		say("Zebrales juz wszystkie 10 Zebow!")
		say("Teraz, biolog potrzebuje ostatni")
		say("przedmiot, aby zakonczyc swoje badania!")
		say_item_vnum(30220)
		say("Mozesz go znalezc zabijajac orki")
		say("w Dolinie Seungryong!")
		say("")
	end



	when 635.kill or
		 636.kill or 
		 637.kill  begin
		local s = number(1, 50)
		if s == 1 and pc.count_item(30220)==0 then
			pc.give_item2(30220, 1)
			send_letter("Wroc do biologa!")		
		end	
	end

	when __TARGET__.target.click  or
		20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30220) > 0  begin
	    target.delete("__TARGET__")
		say("Biolog Chaegirab:")
		say("Oh, Znalazles!")
		say("Bardzo Tobie dziekuje!")
		say("")
		say_reward("Mozesz teraz isc do Baek-Go po nagrode!")
		say("")
		pc.remove_item(30220,1)
		set_state(__reward)
	end

end

state __reward begin
	when letter begin
		send_letter("Analiza Biologa - Nagroda")

		local v = find_npc_by_vnum(20018)
		if v != 0 then
			target.vid("__TARGET__", v, "Baek-Go")
		end

	end
	when button or info begin
		say_title("Skonczyles analize biologa!")
		---                                                   l
		say("Biolog Chaegirab wysyla Cie")
		say("po nagrode do Baek-Go!")
		say("")
	end

	when __TARGET__.target.click  or
		20018.chat."Nagroda"  begin
	    target.delete("__TARGET__")
		say("Baek-Go:")
		say("Hmm, a wiec Biolog")
		say("wyslal Cie po nagrode?")
		say("Zobaczmy, co tam masz...")
		say("")
		say_reward("Otrzymujesz +10 szybkosci poruszania sie")
		say_reward("Na zawsze!")
		say_reward("Oraz niespodzianke!")

		affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60) --60¦~	
		pc.give_item2(50070)

		clear_letter()
		set_quest_state("collect_quest_lv40", "run")
		set_state(__complete)
	end

end


state __giveup__ begin
	when 20084.chat."Poddajesz sie?" begin
		say("Biolog Chaegirab:")
		say("Czy jestes pewien, ze chcesz sie poddac!?")
		say("Nie bedziesz mial szansy, aby zaczac")
		say("ponownie!")
     end
 end
state __complete begin
end
end

Stelios · 10 Października 2011

@Necromant A wstaw tu quest na 40lvl, ale w spoilerze...

Może w nim masz jakiś błąd.

Pro100ST · 10 Października 2011

Witam poprawi mi ktoś ten quest?

quest fasola begin
 state start begin
     when 94285.use begin
       pc.change_alignment(+1000)
say ("Twoja ranga została zwiększona o 1000 punktów")
     end
  end
end

Błąd

syntax error : [string "start"]:1: unexpected symbol near `+'
fasola.quest:6:Abort (core dumped)

old_kwiatosz · 10 Października 2011

Witam poprawi mi ktoś ten quest?

quest fasola begin
 state start begin
     when 94285.use begin
       pc.change_alignment(+1000)
say ("Twoja ranga została zwiększona o 1000 punktów")
     end
  end
end

Błąd

syntax error : [string "start"]:1: unexpected symbol near `+'
fasola.quest:6:Abort (core dumped)

Tylko jak chcesz odjąć range dodajesz -, a jak chcesz dodać to zostawiasz tylko liczbę.

pc.change_alignment(1000)

Necromant · 10 Października 2011

Witam , prosze o poprawienie tych 2 questów :

quest collect_quest_lv40  begin
       state start begin
       end
       state run begin
               when login or levelup with pc.level >= 40 and pc.level <= 127 begin
                       set_state(information)
               end     
       end

       state information begin
               when letter begin
                       local v = find_npc_by_vnum(20084)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Analiza Biologa - Ksiegi Klatw")
                       end
                       send_letter("Analiza Biologa - Ksiegi Klatw")
               end

               when button or info begin
                       say_title("Analiza Biologa - Ksiegi Klatw")
                       say("")
                       say("Biolog Chaegirab, uczen Uriela,")
                       say("wlasnie Cie szukal. Prosze idz")
                       say("do niego i zaoferuj mu swoja pomoc")
                       say("")
               end

               when __TARGET__.target.click or
                       20084.chat."Znajdz Biologa" begin
                       target.delete("__TARGET__")
                       say("Biolog Chaegirab:")
                       ---                                                   l
                       say("Niebiosa, prosze pomozcie mi...")
                       say("Badam wszystkie rodzaje potworow w tym ")
                       say("imperium. Jest bardzo duzo rzeczy,")
                       say("ktore musza zostac zrobione. Nie mam")
                       say("czasu abym mogl sam wybrac sie na wyprawe.")
                       say("Prosze, pomoz mi.")
                       say("Wynagrodze Cie za to.")
                       wait()
                       say("Aktualnie badam Ksiegi Klatw.")
                       say("Musze przeprowadzic kilka eksperymentow,")
                       say("dlatego potrzebuje kilku Ksiag Klatw.")
                       say("Czy moglbys przyniesc mi 15 Ksiag Klatw?") 
                       say("Prosze, pomoz mi! Zawsze przynos mi po jednej,")
                       say("abym mial czas na ich dokladne przebadanie!")
                       say("")                                                                                                                                                                                                                                                                                                           
                       set_state(go_to_disciple)
                       pc.setqf("duration",0)  -- ĄiĄH¸Ő¸ŐŞşÉˇ
                       pc.setqf("collect_count",0)----ˇX¨ú±oŞşŞ««~ĽĆq
                       pc.setqf("drink_drug",0) ------ˇV łÜ°g´bĂÄ¤ôŞş¸Ü 1
               end
       end

       state go_to_disciple begin
               when letter begin
                       send_letter("Zadanie Specjalne - Ksiegi Klatw")

               end
               when button or info begin
                       say_title("Znajdz Ksiegi Klatw")
                       ---                                                   l
                       say("")
                       say("Biolog Chaegirab, uczen Uriela,")
                       say("szuka Ksiag Klatw.")
                       say("Zawsze przynos mu po jednej, aby mial czas")
                       say("na ich dokladne przebadanie.")
                       say("Ksiag Klatw szukaj pod Swiatynia Hwang!")
                       say("")
                       say_item_vnum(30047) 
                       say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Ksiag Klatw")
                       say("")
               end

               when 70036.use begin --°g´bĂÄ¤ô
                       if get_time() < pc.getqf("duration") then
                               say("Musisz odczekac godzine")
                               return
                       end
                       if pc.getqf("drink_drug")==1 then
                               say("Juz przeczytales Notatke Studenta")
                               return
                       end
                       if pc.count_item(30047)==0 then
                               say("Biolog Chaegirab:")
                               say("Co? Nie przyniosles mi zadnych")
                               say("Ksiag Klatw?")
                               say("")
                               return
                       end

                       item.remove()   
                       pc.setqf("drink_drug",1)
               end




       when 20084.click with pc.count_item(30047) >0   begin
                       if get_time() > pc.getqf("duration") then
                               say("Biolog Chaegirab:")
                               ---                                                   l
                               say("Oh!! Znalazles!")
                               say("Pozwol, ze rzuce okiem...")
                               say("Jeszcze chwilke.")
                               say("")
                               pc.remove_item(30047, 1)
                               pc.setqf("duration",get_time()+60*60) -----------------------------------22?? 
                               wait()

                               local pass_percent
                               if pc.getqf("drink_drug")==0 then
                                       pass_percent=60
                               else            
                                       pass_percent=100
                               end

                               local s= number(1,100)
                               if s<= pass_percent  then
                                  if pc.getqf("collect_count")< 14 then     -15ÓĄH¤U 
                                               local index =pc.getqf("collect_count")+1 
                                               pc.setqf("collect_count",index)     -- ¨ú±o¤F¤@Ó+1 
                                               say("Biolog Chaegirab:")
                                               say("Oh!! Ta Ksiega Klatw jest doskonalej jakosci!")
                                               say("Przynies mi jeszcze".." "..15-pc.getqf("collect_count").. " Ksiag Klatw")
                                               say("Prosze, sprobuj je znalezc!")
                                               say("")
                                               pc.setqf("drink_drug",0)         --ĂÄ¤ôŞěl¤Ć
                                               return
                                       end
                                       say("Biolog Chaegirab:")
                                       say("Oh, zebrales juz wszystkie?")
                                       say("Dobra robota...")
                                       say("Ale poczekaj!")
                                       say("Aby zakonczyc swoja prace, potrzebuje")
                                       say("abys przyniosl dla mnie jeszcze jeden przedmiot!") 
                                       say("")
                                       pc.setqf("collect_count",0)
                                       pc.setqf("drink_drug",0)        
                                       pc.setqf("duration",0) 
                                       set_state(key_item)
                                       return
                               else                                                            
                               say("Biolog Chaegirab:")
                               say("Ta Ksiega Klatw jest podarta i mokra.")
                               say("Sprobuj przyniesc inna!")
                               say("Prosze, pomoz mi!")
                               pc.setqf("drink_drug",0)         --ĂÄ¤ôŞěl¤Ć
                               return
                       end
               else
                 say("Biolog Chaegirab:")
                 say("Jeszcze nie skonczylem badac ostatniej Ksiegi!")
                 say("Wroc pozniej, kiedy juz skoncze!")
                 say("")
                 return
               end

       end
end


       state key_item begin
               when letter begin
                       send_letter("Zadanie Specjalne - Ksiegi Klatw")

                       if pc.count_item(30221)>0 then  
                               local v = find_npc_by_vnum(20084)
                               if v != 0 then
                                       target.vid("__TARGET__", v, "Analiza Biologa - Ksiegi Klatw")
                               end
                       end

               end
               when button or info begin
                       if pc.count_item(30221) >0 then
                               say_title("Znalazles kamien duszy!")
                               say("")
                               ---                                                   l
                               say("Wroc do biologa, aby")
                               say("odniesc mu kamien!")
                               say("")
                               return
                       end

                       say_title("Kamien Duszy")
                       say("")
                       ---                                                   l
                       say("Zebrales juz wszystkie 15 Ksiag!")
                       say("Teraz, biolog potrzebuje ostatni")
                       say("przedmiot, aby zakonczyc swoje badania!")
                       say_item_vnum(30221)
                       say("Mozesz go znalezc zabijajac")
                       say("Elitarne Ezoty w Świątyni")      
                       say("Uważaj na Siebie może być ciężko.")
               end




               when 732.kill or
                        734.kill or
                        733.kill or
                        736.kill or
                        735.kill begin
                       local s = number(1, 50)
                       if s == 1 and pc.count_item(30221)==0 then
                               pc.give_item2(30221, 1)
                               send_letter("Wroc do biologa!")         
                       end     
               end


               when __TARGET__.target.click  or
                       20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30221) > 0  begin
                   target.delete("__TARGET__")
                       say("Biolog Chaegirab:")
                       say("Oh, Znalazles!")
                       say("Bardzo Tobie dziekuje!")
                       say("")
                       say_reward("Mozesz teraz isc do Baek-Go po nagrode!")
                       say("")
                       pc.remove_item(30221,1)
                       set_state(__reward)
               end

       end

       state __reward begin
               when letter begin
                       send_letter("Analiza Biologa - Nagroda")

                       local v = find_npc_by_vnum(20018)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Baek-Go")
                       end

               end
               when button or info begin
                       say_title("Skonczyles analize biologa!")
                       ---                                                   l
                       say("Biolog Chaegirab wysyla Cie")
                       say("po nagrode do Baek-Go!")
                       say("")
               end

               when __TARGET__.target.click  or
                       20018.chat."Nagroda"  begin
                   target.delete("__TARGET__")
                       say("Baek-Go:")
                       say("Hmm, a wiec Biolog")
                       say("wyslal Cie po nagrode?")
                       say("Zobaczmy, co tam masz...")
                       say("")
                       say_reward("Otrzymujesz +20 szybkosci ataku")
                       say_reward("Na zawsze!")
                       say_reward("Oraz Prezent!")
                       say_reward("Mam nadzieję że Ci się przyda")

                       affect.add_collect(apply.ATT_SPEED,20,60*60*24*365*60)    --- ˇV60¦~          
                       pc.give_item2(50111)
                       pc.give_item2(13048)


                       clear_letter()
                       set_quest_state("collect_quest_lv50", "run")
                       set_state(__complete)
               end

       end


       state __giveup__ begin
               when 20084.chat."Poddajesz sie?" begin
                       say("Biolog Chaegirab:")
                       say("Czy jestes pewien, ze chcesz sie poddac!?")
                       say("Nie bedziesz mial szansy, aby zaczac")
                       say("ponownie!")
            end
        end
       state __complete begin
       end
end

quest collect_quest_lv50  begin
       state start begin
       end
       state run begin
               when login or levelup with pc.level >= 50 and pc.level <= 127 begin
                       set_state(information)
               end     
       end

       state information begin
               when letter begin
                       local v = find_npc_by_vnum(20084)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Analiza Biologa - Pamiatki po Demonie")
                       end
                       send_letter("Analiza Biologa - Pamiatki po Demonie")
               end

               when button or info begin
                       say_title("Analiza Biologa - Pamiatki po Demonie")
                       say("")
                       say("Biolog Chaegirab, uczen Uriela,")
                       say("wlasnie Cie szukal. Prosze idz")
                       say("do niego i zaoferuj mu swoja pomoc")
                       say("")
               end

               when __TARGET__.target.click or
                       20084.chat."Znajdz Biologa" begin
                       target.delete("__TARGET__")
                       say("Biolog Chaegirab:")
                       ---                                                   l
                       say("Niebiosa, prosze pomozcie mi...")
                       say("Badam wszystkie rodzaje potworow w tym ")
                       say("imperium. Jest bardzo duzo rzeczy,")
                       say("ktore musza zostac zrobione. Nie mam")
                       say("czasu abym mogl sam wybrac sie na wyprawe.")
                       say("Prosze, pomoz mi.")
                       say("Wynagrodze Cie za to.")
                       wait()
                       say("Aktualnie badam Pamiatki po Demonie.")
                       say("Musze przeprowadzic kilka eksperymentow,")
                       say("dlatego potrzebuje kilku Pamiatek po Demonie.")
                       say("Czy moglbys przyniesc mi 15 Pamiatek po Demonie?")
                       say("Prosze, pomoz mi! Zawsze przynos mi po jednej,")
                       say("abym mial czas na ich dokladne przebadanie!")
                       say("")                                                                                                                                                                                                                                                                                           
                       set_state(go_to_disciple)
                       pc.setqf("duration",0)  --ĄiĄH¸Ő¸ŐŞşÉˇ
                       pc.setqf("collect_count",0)-- ¨ú±oŞşŞ««~ĽĆq
                       pc.setqf("drink_drug",0) --łÜ°g´bĂÄ¤ôŞş¸Ü1
               end
       end

       state go_to_disciple begin
               when letter begin
                       send_letter("Zadanie Specjalne - Pamiatki po Demonie")

               end
               when button or info begin
                       say_title("Znajdz Pamiatki po Demonie")
                       ---                                                   l
                       say("")
                       say("Biolog Chaegirab, uczen Uriela,")
                       say("szuka Pamiatek po Demonie.")
                       say("Zawsze przynos mu po jednej, aby mial czas")
                       say("na ich dokladne przebadanie.")
                       say("Pamiatek po Demonie szukaj w Wiezy Demonow!")
                       say("")
                       say_item_vnum(30015) 
                       say_reward("Do tej pory zebrales".." "..pc.getqf("collect_count").." Pamiatek po Demonie")
                       say("")
               end

               when 70036.use begin --°g´bĂÄ¤ô
                       if get_time() < pc.getqf("duration") then
                               say("Musisz odczekac godzine")
                               return
                       end
                       if pc.getqf("drink_drug")==1 then
                               say("Juz przeczytales Notatke Studenta")
                               return
                       end
                       if pc.count_item(30015)==0 then
                               say("Biolog Chaegirab:")
                               say("Co? Nie przyniosles mi zadnych")
                               say("Pamiatek po Demonie?")
                               say("")
                               return
                       end

                       item.remove()   
                       pc.setqf("drink_drug",1)
               end



       when 20084.click with pc.count_item(30015) >0   begin
                       if get_time() > pc.getqf("duration") then
                               say("Biolog Chaegirab:")
                               ---                                                   l
                               say("Oh!! Znalazles!")
                               say("Pozwol, ze rzuce okiem...")
                               say("Jeszcze chwilke.")
                               say("")
                               pc.remove_item(30015, 1)
                               pc.setqf("duration",get_time()+60*60) ----------------22??
                               wait()

                               local pass_percent
                               if pc.getqf("drink_drug")==0 then
                                       pass_percent=70
                               else            
                                       pass_percent=100
                               end

                               local s= number(1,100)
                               if s<= pass_percent  then
                                  if pc.getqf("collect_count")< 14 then     --15ÓĄĽşˇ 
                                               local index =pc.getqf("collect_count")+1 
                                               pc.setqf("collect_count",index)     --¨ú±o¤@ÓÉ+1 
                                               say("Biolog Chaegirab:")
                                               say("Oh!! Ta Pamiatka po Demonie jest doskonalej jakosci!")
                                               say("Przynies mi jeszcze".." "..15-pc.getqf("collect_count").. " Pamiatek po Demonie")
                                               say("Prosze, sprobuj je znalezc!")
                                               say("")
                                               pc.setqf("drink_drug",0)         --ĂÄ¤ôŞěl¤Ć
                                               return
                                       end
                                       say("Biolog Chaegirab:")
                                       say("Oh, zebrales juz wszystkie?")
                                       say("Dobra robota...")
                                       say("Ale poczekaj!")
                                       say("Aby zakonczyc swoja prace, potrzebuje")
                                       say("abys przyniosl dla mnie jeszcze jeden przedmiot!")
                                       say("")
                                       pc.setqf("collect_count",0)
                                       pc.setqf("drink_drug",0)        
                                       pc.setqf("duration",0) 
                                       set_state(key_item)
                                       return
                               else                                                            
                               say("Biolog Chaegirab:")
                               say("Ta Pamiatka po Demonie jest zlej jakosci!")
                               say("Sprobuj przyniesc inna!")
                               say("Prosze, pomoz mi!")                                   
                               pc.setqf("drink_drug",0)         --ĂÄ¤ôŞěl¤Ć
                               return
                               end
               else
                 say("Biolog Chaegirab:")
                 say("Jeszcze nie skonczylem badac ostatniej Pamiatki!")
                 say("Wroc pozniej, kiedy juz skoncze!")
                 say("")
                 return
               end

       end
end


       state key_item begin
               when letter begin
                       send_letter("Zadanie Specjalne - Pamiatki po Demonie")

                       if pc.count_item(30222)>0 then  
                               local v = find_npc_by_vnum(20084)
                               if v != 0 then
                                       target.vid("__TARGET__", v, "Analiza Biologa - Pamiatki po Demonie")
                               end
                       end

               end
               when button or info begin
                       if pc.count_item(30222) >0 then
                               say_title("Znalazles kamien duszy!")
                               say("")
                               ---                                                   l
                               say("Wroc do biologa, aby")
                               say("odniesc mu kamien!")
                               say("")
                               return
                       end

                       say_title("Kamien Duszy")
                       say("")
                       ---                                                   l
                       say("Zebrales juz wszystkie 15 Pamiatek!")
                       say("Teraz, biolog potrzebuje ostatni")
                       say("przedmiot, aby zakonczyc swoje badania!")
                       say_item_vnum(30222)----------Żu¤`ĆFĆF»îĄŰ
                       say("Mozesz go znalezc zabijajac Podle Demony") 
                       say("w Wiezy Demonow")
                       say("")
               end


               when 1031.kill or
                        1032.kill or
                        1033.kill or
                        1034.kill  begin
                       local s = number(1, 50)
                       if s == 1 and pc.count_item(30222)==0 then
                               pc.give_item2(30222, 1)
                               send_letter("Wroc do biologa!")         
                       end     
               end




               when __TARGET__.target.click  or
                       20084.chat."Znalazlem Kamien Duszy" with pc.count_item(30222) > 0  begin
                   target.delete("__TARGET__")
                       say("Biolog Chaegirab:")
                       say("Oh, Znalazles!")
                       say("Bardzo Tobie dziekuje!")
                       say("")
                       say_reward("Mozesz teraz isc do Baek-Go po nagrode!")
                       say("")
                       pc.remove_item(30222,1)
                       set_state(__reward)
               end

       end

       state __reward begin
               when letter begin
                       send_letter("Analiza Biologa - Nagroda")

                       local v = find_npc_by_vnum(20018)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Baek-Go")
                       end

               end
               when button or info begin
                       say_title("Skonczyles analize biologa!")
                       ---                                                   l
                       say("Biolog Chaegirab wysyla Cie")
                       say("po nagrode do Baek-Go!")
                       say("")
               end

               when __TARGET__.target.click  or
                       20018.chat."Nagroda"  begin
                   target.delete("__TARGET__")
                       say("Baek-Go")
                       say("Hmm, a wiec Biolog")
                       say("wyslal Cie po nagrode?")
                       say("Zobaczmy, co tam masz...")
                       say("")
                       say_reward("Otrzymujesz +120 wartosci obrony")
                       say_reward("Otrzymujesz +100 wartosci obrony magicznej")
                       say_reward("Na zawsze.")
                       say_reward("Oraz Prezent")
                       say_reward("")
                       say_reward("Mam nadzieje ze Ci sie przyda")

                       affect.add_collect(apply.DEF_GRADE_BONUS,120,60*60*24*365*60) -----ˇV60¦~     
                       affect.add_collect(apply.MAG_DEF_GRADE,100,60*60*24*365*69)
                       if pc.job == 0 then 
                       pc.give_item2 (12246, 1)
                       say_orzech("Otrzymano Upiorna Maske+6 oraz niespodzianke!)
                       end 

                       if pc.job == 1 then 
                       pc.give_item2 (12386, 1) 
                       say_orzech("Otrzymano Stalowa Maske+6 oraz niespodzianke!)
                       end 

                       if pc.job == 2 then 
                       pc.give_item2 (12526, 1) 
                       say_orzech("Otrzymano Zamkowy Helm+6 oraz niespodzianke!)
                       end 

                       if pc.job == 3 then 
                       pc.give_item2 (12666, 1)
                       say_orzech("Otrzymano Swietlista Czapke+6 oraz niespodzianke!)
                       end

                       pc.give_item2(50112, 1)



                       clear_letter()
                       set_quest_state("collect_quest_lv60", "run")
                       set_state(__complete)
               end

       end


       state __giveup__ begin
               when 20084.chat."Poddajesz sie?" begin
                       say("Biolog Chaegirab:")
                       say("Czy jestes pewien, ze chcesz sie poddac!?")
                       say("Nie bedziesz mial szansy, aby zaczac")
                       say("ponownie!")
            end
        end
       state __complete begin
       end
end

JonyNawa1ony · 10 Października 2011

Witajcie,

bardzo proszę was o napisanie takiego questa:

1.Idziesz do npc Pirata ( 1276 )
2.On tam mówi, że jest piratem, kiedyś dużo żeglował itd...
3.I w końcu mówi, że po ostatniej podróży zgubił 5 niezbędnych itemów. ( wyposażenie pirata )
4.I-Butelka z wiadomościa (61000).II-Piraci skarb(61001).III-Piracka Mapa(61002).IV-Piracka Pochodnia(61003).V-Piracka Czaszka(61004). ( Najlepiej jak każda będzie każdy przedmiot opisany na oddzielnej stronie + miejsce/mob zdobycia + say_item(61000) ( ja uzupełnie )
5.Itemy będzie można zdobyć na różnych mapach.
6.Butelkę z wiadomością na mapie Mapa M2-Nekromanty (494) / Piracki skarb Dolina Orków-Wodza Orków (691) / Piracką Mape Wódz Bajkowych Orków (693) / Piracką Pochodnie Loch Pająków-Królowa Pająków (2091) / Piracka Czaszka Grota Pająków-Król Pająków (2092)
7.Życzy: Powodzenia itp.
8.Itemy można oddawać odrazu. Na każdym poziomie.
9.Koniec questa.
10.Quest od 20 poziomu.
11.Jeżeli coś jest niejasne, napisz.

Napewno się odwdzięcze!

Pozdrawiam.

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany