Pisanie / Poprawa Questów !

XaviPrawdziwy · 14 Stycznia 2011

chmod +x qc

Kierownik ! · 14 Stycznia 2011

-Zbroja Hwang

-90

-Siema

Czego czarny kutasie ?

Zrobie ci

Co ??

No !

Zbroje ?

Tak !

A oki !

-Kowal /11972

adm · 14 Stycznia 2011

zadziałało dziękuje bardzo. Co zbierasz + czy -

Stelios · 14 Stycznia 2011

Witom witom i o zdrowie się nie pytom...

A więc tak, jako stały bywalec po raz drugi potrzebuję questa na wejście do atlantydy v2 (poprzedni niestety nie działał ;/ )

No wiec tak

NPC: 20093

Potrzebny przedmiot 30191 sztuk 1

minimalny lvl aby przejść: 85

;P

Niby proste ale sam pisałem i źle napisałem ;/

podaje przykład mojego ŹLE napisanego questa...

quest wejscie_v2 begin

state start begin

when ID_NPC.chat."Chcę Wejść " with pc.level >= 90 begin

say("Witaj! Skoro przychodzisz do mnie,")

say("to pewnie chcesz wejsc do Groty")

say("Wygnańców poziom 2, czy tak?")

wait ()

say ("Jesli chesz wejsc potrzebujesz:")

say ("Poziom 90 oraz")

say_reward("Krwisty Kamien!")

say_item ( "Krwisty Kamień" , 30190 , "" )

wait ( )

local s = select(locale.yes, locale.no)

if s == 2 then

return

end

if s == 1 then

if pc . count_item ( 30190 ) > 0 then

say ( "" .. mob_name ( 20093 ) .. ":" )

say ( "Masz Krwisty Kamien!" )

say ( "Zostaniesz przeniesiony!" )

say ( "" )

pc . remove_item ( 30190 )

local x = 241300 --

local y = 1275400 --

pc.warp(x, y)

else

say ( "" .. mob_name ( 20093 ) .. ":" )

say ( "Nie moge Ciebie przeniesc!" )

say ( "Potrzebujesz Krwisty Kamień!" )

say_item ( "Krwisty Kamień" , 30190 , "" )

return

end

a tu poprawiony i tez nie dzialajacy ;/

quest wejscie_v2 begin

state start begin

when ID_NPC.chat."Chcę Wejść " with pc.level >= 90 begin

say("Nazwa NPC")

say("Możesz wejść do groty v2 po ukazaniu Krwistego Kamienia.")

say_item_vnum(30190)

say("")

say_reward("Czy chcesz wejść teraz do Groty Wygnańców?")

local s = select(locale.yes, locale.no)

if s == 2 then

return

end

if s == 1 then

if pc.count_item(30190) > 0 then

pc.remove_item(30190, 1)

say_title("Nazwa NPC")

say("Zostaniesz Przeniesiony !")

wait()

local x = 2413*100

local y =12754*100

pc.warp(x, y)

else

say_title("Nazwa NPC")

say("Nie posiadasz Krwistego Kamienia")

end

Kojak · 14 Stycznia 2011

A więc tak:

LVL 95

NPC 20093

Dialogi

"Witaj zapewne myslisz, ze osiagnales juz wszystko... Niestety jest to dopiero twoj poczatek postaraj sie bardziej rozwijac swe umiejetnosci oraz ekwipunek... Podaruje Ci teraz drobny prezent... Tak! Dostajesz skrzynie Winstona!"

Po wbiciu 95 lvl w lewej stronie ekranu wyskakuje list o tytule "Skrzynia" po otwarciu piszę "Udaj sie do moja_nazwa! Ma on Ci coś do powiedzenia." No i idziemy do tego npc i otrzymujemy skrzynie (ID sam wpisze)

14 Stycznia 2011

@Refresh

quest kon_militar begin
       state start begin
           when 50050.use begin
           pc.remove_item("50050", 1)
           horse.set_level ( 21 )
           end
       end
end

quest halloween begin
       state start begin
               when kill with game.get_event_flag("Event_Halloween") > 0 begin
                               local warunek = math.random(2000)
                                       if warunek >= 47 and warunek < 50 then
                                               game.drop_item(50095)
                                       end
               end

               when 50095.use begin
                       item.remove()
                       local przedmiot = math.random(15)

                               if przedmiot == 1 then
                                       pc.change_gold(1000000)
                               elseif przedmiot == 2 then
                                       pc.give_item2(25040)
                               elseif przedmiot == 3 then
                                       pc.give_item2(27989)
                               elseif przedmiot == 4 then
                                       pc.give_item2(71036)
                               elseif przedmiot == 5 then
                                       pc.give_item2(71045)
                               elseif przedmiot == 6 then
                                       pc.give_item2(71046)
                               elseif przedmiot == 7 then
                                       pc.give_item2(71048)
                               elseif przedmiot == 8 then
                                       pc.change_gold(2000000)
                               elseif przedmiot == 9 then
                                       pc.give_item2(71049)
                               elseif przedmiot == 10 then
                                       pc.give_item2(71050)
                               elseif przedmiot == 11 then
                                       pc.give_item2(71080)
                               elseif przedmiot == 12 then
                                       pc.give_item2(50061)
                               elseif przedmiot == 13 then
                                       pc.give_item2(30097)
                               elseif przedmiot == 14 then
                                       pc.change_gold(500000)
                               elseif przedmiot == 15 then
                                       syschat("Dynia była zepsuta..")
                               end
               end

               when 20004.chat."GM: Event Halloween" with pc.is_gm() begin
                       local s = select("Wlacz Event", "Wylacz Event", locale.cancel)
                               if s == 1 then
                                       game.set_event_flag("Event_Halloween", 1)
                                       say_reward("Event Aktywowano!")
                               elseif s == 2 then
                                       game.set_event_flag("Event_Halloween", 0)
                                       say_reward("Event Zdezaktywowano!")
                               else
                                       return
                               end
               end

       end
end

ToBe · 15 Stycznia 2011

@Kojak :

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

	state info begin
		when letter begin
			send_letter("Skrzynia")
			local v = find_npc_by_vnum(20093)
                       if v != 0 then
                               target.vid("__TARGET__", v, "20093")
	end

when button or info begin
		say("Udaj sie do moja_nazwa! Ma on Ci coś do powiedzenia.")
		end

when 20093.chat."Skrzynka" begin
			target.delete("__TARGET__")
			say("Witaj zapewne myslisz, ze osiagnales juz wszystko... ")
			say("Niestety jest to dopiero twoj poczatek postaraj sie bardziej rozwijac swe umiejetnosci oraz ekwipunek... ")
			say("Podaruje Ci teraz drobny prezent... ")
			say("Tak! Dostajesz skrzynie Winstona!")
			pc.give_item2(ID_Skrzyni)
			set_state(__COMPLETE__)
			end
	end

	state __COMPLETE__ begin
	end
end

mam nadzieje , że zadziała

Hmm · 15 Stycznia 2011

1 quest

Dostepna od lvl'a ; 95
Misja od NPC 20091
Tresc : obojetne ;D
Trzeba dropnac 25 Stron Pamiętnika dropi z moobow w atlantydzie
Po odddaniu 25 stron pamietnika trzeba zabic Umarlego Rozpruwacza i misja zaliczona
Nagroda : teczowy kamien (50512) oraz

2 quest

Dostepne od lvl'a ; 100
Misja od NPC 20091
Tresc : to co wyzej ; D obojetne
Trzeba zabic po 2 bossy takie jak
Zjawa , 9 ogonow , ognisty krol , zolw , umarly rozpruwacz , wiedzma (tylko ze ta 1191)
Po zabicu tych bossow dostajemy nagrode ;
Stal +5 dla wybranej klasy postaci , czyli woj dostaje dla woja ninnja dla ninjy itd
Teczowy kamien x1 (50512)
Broszurke szermierki x2
120kk yang

Za 1 dobrze zrobiony quest dam full + lub -

Gamdohar · 15 Stycznia 2011

Potrzebuję questa na 5 lvl

Czyli trening postaci..

Wbijamy 5 i wyskakuje liscik i w zaleznosci od klasy postaci pojawia sie np mam woja to Do wyboru: Body, Mental itd..

Wiem że jest quest na trening ale zadnego trenera niema i nie pojawia sie trening HELP dam Full + i 5*

Stelios · 15 Stycznia 2011

@to chyba nie dubel? ;P

A więc tak, potrzebuję questa na wejście do atlantydy v2 (poprzedni niestety nie działał ;/ )

No wiec tak:

1 Quest:

NPC: 20093

Potrzebny przedmiot 30191 albo 30190 sztuk 1

minimalny lvl aby przejść: 85

;P

Niby proste ale sam pisałem i źle napisałem ;/

podaje przykład mojego ŹLE napisanego questa...

quest wejscie_v2 begin

state start begin

when ID_NPC.chat."Chcę Wejść " with pc.level >= 90 begin

say("Witaj! Skoro przychodzisz do mnie,")

say("to pewnie chcesz wejsc do Groty")

say("Wygnańców poziom 2, czy tak?")

wait ()

say ("Jesli chesz wejsc potrzebujesz:")

say ("Poziom 90 oraz")

say_reward("Krwisty Kamien!")

say_item ( "Krwisty Kamień" , 30190 , "" )

wait ( )

local s = select(locale.yes, locale.no)

if s == 2 then

return

end

if s == 1 then

if pc . count_item ( 30190 ) > 0 then

say ( "" .. mob_name ( 20093 ) .. ":" )

say ( "Masz Krwisty Kamien!" )

say ( "Zostaniesz przeniesiony!" )

say ( "" )

pc . remove_item ( 30190 )

local x = 241300 --

local y = 1275400 --

pc.warp(x, y)

else

say ( "" .. mob_name ( 20093 ) .. ":" )

say ( "Nie moge Ciebie przeniesc!" )

say ( "Potrzebujesz Krwisty Kamień!" )

say_item ( "Krwisty Kamień" , 30190 , "" )

return

end

a tu poprawiony i tez nie dzialajacy ;/

quest wejscie_v2 begin

state start begin

when ID_NPC.chat."Chcę Wejść " with pc.level >= 90 begin

say("Nazwa NPC")

say("Możesz wejść do groty v2 po ukazaniu Krwistego Kamienia.")

say_item_vnum(30190)

say("")

say_reward("Czy chcesz wejść teraz do Groty Wygnańców?")

local s = select(locale.yes, locale.no)

if s == 2 then

return

end

if s == 1 then

if pc.count_item(30190) > 0 then

pc.remove_item(30190, 1)

say_title("Nazwa NPC")

say("Zostaniesz Przeniesiony !")

wait()

local x = 2413*100

local y =12754*100

pc.warp(x, y)

else

say_title("Nazwa NPC")

say("Nie posiadasz Krwistego Kamienia")

end

2 Quest.

Trzeba wydropić 30185 sztuk 10 z 2603 2607 2608 2609 2610 2611

(wiem coś z możliwością użycia w queście opcji or ale nie wiem jak ją użyć ;/

Chodzi mi o to, że może dropić z 2603 or 2607 or 2608 itd... )

NPC: 9007

LVL: 125

Nagroda: 70031 (sztuk 4 trzeba (to jest broszurka))

50kk yang i 200kk expa

WIELKI + / - dla twórcy questa

G33K · 15 Stycznia 2011

Proszę o poprawienie. Zabijam rippera i nic dalej się nie dzieje.

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

state info begin
when letter begin
local v = find_npc_by_vnum(20016)
if v != 0 then
target.vid("__TARGET__", v, "Kowal")
end
send_letter("Umarły Rozpruwacz")
end

when button or info begin
say_title("Umarły rozpruwacz")
say("Witaj udaj się do Kowala ma on dla Ciebie zadanie.")
end

when __TARGET__.target.click or
20016.chat."Kowal:" begin
target.delete("__TARGET__")
say("Witaj ! ")
say("Ostatnio naszą wioske nachodzi Umarły Rozpruwacz ! ")
say("Chodzi po mieście i ludzi straszy ")
say("Idź do wierzy demonów i daj mu nauczke ! ")
say("Wzamian za to dostaniesz odemnie przepustke do nowego świata.")
set_state(kill)
end
end

state kill begin
when letter begin
send_letter("Udaj się!")
end
when button or info begin
say("Udaj się do demonicznej wierzy aby zabić umarłego rozpruwacza.")
end

when 1093.kill with pc.countitem(50082)==0 begin
local random = math.random(3)
if random == 1 then
pc.give_item2(50082, 1)
say("Blabla...")
local v = find_npc_by_vnum(20016)
if v != 0 then
target.vid("__TARGET__", v, "Kowal")
end
end
end
when ID_NPC.chat."Ramka" with pc.countitem(ID_ITEMU)>0 begin
say_title("Kowal:")
target.delete("__TARGET__")
say("Hmm Więc pokonałeś umarłego rozpruwacza...W nagrodę dostaniesz przepustkę do nowego świata!")
pc.remove_item(50082, 1)
pc.give_item2(30190 , 1)
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end

Stelios · 15 Stycznia 2011

@UP

when ID_NPC.chat."Ramka" with pc.countitem(ID_ITEMU)>0 begin

Jeśli dobrze mi się wydaje to masz źle ;P

cos kolo 50 linijki to jest ;P (tak na oko ;D)

(nie patrzylem do końca ;/ nie mam teraz zbytnio czasu ;/ ;P )

@EDIT UP

state kill begin

when letter begin

send_letter("Udaj się!")

end

when button or info begin

say("Udaj się do demonicznej wierzy aby zabić umarłego rozpruwacza.")

end

a jakbyś zrobił:

state kill begin

when letter begin

send_letter("Udaj się!")

when button or info begin

say("Udaj się do demonicznej wierzy aby zabić umarłego rozpruwacza.")

end

(nie znam się na pisaniu questów ale staram się pomóc ;D )

@MarioBase (down)

Mam nadzieje, że tym razem będzie działać ;P

@MarioBase Bóg ci za to zapłać dobry człowieku! ;D

Działa jak należy + leci do ciebie ;D

MarioBase · 15 Stycznia 2011

@stelios

quest wejscie_grota begin
state start begin
when 20093.chat."Chcę wejść na 2 piętro " with pc.level >= 85 begin
say("NPC")
say("Możesz wejść do groty po ukazaniu Krwistego Kamienia.")
say_item_vnum(30191)
say("")
say_reward("Czy chcesz wejść teraz do Groty Wygnańców v2?")

local s = select(locale.yes, locale.no)
if s == 2 then 
return
end
if s == 1 then
if pc.count_item(30191) > 0 then
pc.remove_item(30191, 1)
say_title("NPC:")
say("Zostaniesz Przeniesiony !")
wait()
local x = --kordy
local y = --kordy
pc.warp(x, y)

else
say_title("Seon-Hae:")
say("Nie posiadasz Krwistego Kamienia")
end
end
end
end
end

Ten quest na 100% działa ponieważ sam go używam

Kejsi · 16 Stycznia 2011

Potrzebuje skomplikowanego questa, a więc powyżej 93 lvl nie wpadaja pkt statusu :huh: i chciałbym żeby ktoś napisał mi takie coś np

Wbijam lvl 94 wyskakuje informacja "fajnie wbiłeś kolejny lvl masz 3 pkt do wykorzystania" i będą 4 okienka z funkcjami dodaj do -wit -int -sila -zwin po kliknięciu któregoś z funkcji ma dodać 3 pkt do tego co wybraliśmy, zamknąć list i pojawić się dopiero po wbiciu kolejnego lvl

Stelios · 16 Stycznia 2011

To znowu ja! ;D

Nie cieszcie się za szybko ;P

No więc tak...

Chciałbym zapytać czy poprawnie napisałem quest:

quest wymiana_dyn begin

state start begin

when 20083.chat."Chcoddac dynie!" with pc.level >= 2 begin

say("A wiec chcesz oddac dynie?")

say("Mmyslisz ze bedziesz cos z tego mial?")

say("Hahahaha! To dobrze myslisz przyjacielu!")

say("Ale jest jeden warunek!")

say("Musisz ich miec 1200!")

say_item_vnum(50095)

say("")

say_reward("Czy chcesz oddac 1200 dyn?")

local s = select(locale.yes, locale.no)

if s == 2 then

return

end

if s == 1 then

if pc.count_item(50095) > 0 then

pc.remove_item(50095, 1200)

say_title("Kolekjoner:")

say("Dostaniesz losowy przedmiot!!")

wait()

if pc.job == 0

pc.give_item2(70031, 1) or

pc.give_item2(70042, 1) or

pc.give_item2(70030, 1) or

pc.give_item2(69010, 1) or

pc.give_item2(11284, 1) or

pc.give_item2(11276, 1) or

pc.give_item2(12246, 1) or

pc.give_item2(13062, 1) or

pc.give_item2(13082, 1) or

pc.give_item2(13102, 1) or

pc.give_item2(13122, 1)

if pc.job == 1

pc.give_item2(70031, 1) or

pc.give_item2(70042, 1) or

pc.give_item2(70030, 1) or

pc.give_item2(69010, 1) or

pc.give_item2(11484, 1) or

pc.give_item2(11476, 1) or

pc.give_item2(12386, 1) or

pc.give_item2(13062, 1) or

pc.give_item2(13082, 1) or

pc.give_item2(13102, 1) or

pc.give_item2(13122, 1)

if pc.job == 2

pc.give_item2(70031, 1) or

pc.give_item2(70042, 1) or

pc.give_item2(70030, 1) or

pc.give_item2(69010, 1) or

pc.give_item2(11684, 1) or

pc.give_item2(11676, 1) or

pc.give_item2(12526, 1) or

pc.give_item2(13062, 1) or

pc.give_item2(13082, 1) or

pc.give_item2(13102, 1) or

pc.give_item2(13122, 1)

elseif pc.job == 3

pc.give_item2(70031, 1) or

pc.give_item2(70042, 1) or

pc.give_item2(70030, 1) or

pc.give_item2(69010, 1) or

pc.give_item2(11884, 1) or

pc.give_item2(11876, 1) or

pc.give_item2(12666, 1) or

pc.give_item2(13062, 1) or

pc.give_item2(13082, 1) or

pc.give_item2(13102, 1) or

pc.give_item2(13122, 1)

else

say_title("Kolekcjoner:")

say("Nie posiadasz 1200 dyn!")

end

16 Stycznia 2011

@Refresh

quest kon_militar begin
       state start begin
           when 50050.use begin
           pc.remove_item("50050", 1)
           horse.set_level ( 21 )
           end
       end
end

quest halloween begin
       state start begin
               when kill with game.get_event_flag("Event_Halloween") > 0 begin
                               local warunek = math.random(2000)
                                       if warunek >= 47 and warunek < 50 then
                                               game.drop_item(50095)
                                       end
               end

               when 50095.use begin
                       item.remove()
                       local przedmiot = math.random(15)

                               if przedmiot == 1 then
                                       pc.change_gold(1000000)
                               elseif przedmiot == 2 then
                                       pc.give_item2(25040)
                               elseif przedmiot == 3 then
                                       pc.give_item2(27989)
                               elseif przedmiot == 4 then
                                       pc.give_item2(71036)
                               elseif przedmiot == 5 then
                                       pc.give_item2(71045)
                               elseif przedmiot == 6 then
                                       pc.give_item2(71046)
                               elseif przedmiot == 7 then
                                       pc.give_item2(71048)
                               elseif przedmiot == 8 then
                                       pc.change_gold(2000000)
                               elseif przedmiot == 9 then
                                       pc.give_item2(71049)
                               elseif przedmiot == 10 then
                                       pc.give_item2(71050)
                               elseif przedmiot == 11 then
                                       pc.give_item2(71080)
                               elseif przedmiot == 12 then
                                       pc.give_item2(50061)
                               elseif przedmiot == 13 then
                                       pc.give_item2(30097)
                               elseif przedmiot == 14 then
                                       pc.change_gold(500000)
                               elseif przedmiot == 15 then
                                       syschat("Dynia była zepsuta..")
                               end
               end

               when 20004.chat."GM: Event Halloween" with pc.is_gm() begin
                       local s = select("Wlacz Event", "Wylacz Event", locale.cancel)
                               if s == 1 then
                                       game.set_event_flag("Event_Halloween", 1)
                                       say_reward("Event Aktywowano!")
                               elseif s == 2 then
                                       game.set_event_flag("Event_Halloween", 0)
                                       say_reward("Event Zdezaktywowano!")
                               else
                                       return
                               end
               end

       end
end

16 Stycznia 2011

@srry double

adm · 17 Stycznia 2011

chciałem dać quest do sprawdzenia. po zrobieniu np zębów orka uriel wysyła nas do Baek-Go po nagrodę. i mamy do wyboru np dla woja nimfa lub bojowy:

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 Zeba 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¦~	
									if pc.job==0 then
                                                say("Wybierz bron!")
                       local s=select("Bojowy miecz +7" , "Nimfa +7" , "Anuluj")
                       if s==1 then
                       pc.give_item2("147")
                       elseif s==2 then
                       pc.give_item2("169")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang") 
                                       end
                                       if pc.job==1 then
                                               say("Wybierz bron!")
                       local s=select("Smoczy noz +7" , "Nimfa +7" , "Boski Luk Moreli +7" , "Olbrzymi Luk Zoltego Smoka +7" , "Anuluj")
                       if s==1 then
                       pc.give_item2("1107")
                       elseif s==2 then
                       pc.give_item2("1117")
					elseif s==3 then
                       pc.give_item2("2137")
					elseif s==4 then
                       pc.give_item2("2147")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang") 
                                       end
                                       if pc.job==2 then
                                               say("Wybierz bron!")
                       local s=select("Miecz Szponu Ducha +7" , "Miecz Egzorcysty +7" , "Anuluj")
                       if s==1 then
                       pc.give_item2("157")
                       elseif s==2 then
                       pc.give_item2("247")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang") 
                                       end
                                       if pc.job==3 then               
                                               say("Wybierz bron!")
                       local s=select("Dzwon Burzowego Ptaka +7" , "Dzwon Nieba i Ziemi +7" , "Niebianski Ptasi Wachlarz" , "Wachlarz Zbawienia" , "Anuluj")
                       if s==1 then
                       pc.give_item2("5097")
                       elseif s==2 then
                       pc.give_item2("5107")
					elseif s==3 then
                       pc.give_item2("7139")
					elseif s==4 then
                       pc.give_item2("7149")
                                                                                               say_reward("Otrzymujesz 50.000.000 yang")   
                                       end     
                        pc.change_money(50000000)

		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

LoveEver · 17 Stycznia 2011

Potrzebuję takiego questa

Przychodzi gracz do Kowala i jak nacisnie w niego to wyskakuje mu taka opcja:

Daj kowalowi prezent

i jak naciśnie w tą opcję to wyskakuje mu

5.000 Yang

lub

50.000 yang

lub

500.000 yang

lub

5kk yang

j jak naciśnie w jakąś sumę to odbiera z ekwipunky mu yang iwyskakuje komunikat:

Kowal dziękuję ci za twoje pieniądze.

a np jezeli gosciu nie ma tyle kasy to kowal mowi:

Niestety masz za mało Yang,aby mi je podarować.

Mam nadzieję że ktoś zrobi taki quest oczywiscie quest od 1 lvl

MarioBase · 17 Stycznia 2011

@LoveEver

quest kowal_prezent begin
       state start begin
               when 20016.chat."Daj kowalowi prezent" begin
               say_title("Witaj,")
               say("Słyszałem że chcesz mi ofiarować ")
               say("trochę yang")
               say("")
               say("Ile yang chcesz mi dać")

               local s = select("5.000", "50.000", "500.000", "5.000.000", "Nie mam kasy",  locale.cancel)
		if s == 1 then with pc.get_gold >= 5000 then begin
			pc.change_gold(-5000)
		elseif s == 2 then with pc.get_gold >= 50000 then begin
			pc.change_gold(-50000)
		elseif s == 3 then with pc.get_gold >= 500000 then begin
			pc.change_gold(-500000)
		elseif s == 4 then with pc.get_gold >= 5000000 then begin
			pc.change_gold(-5000000)
		elseif s == 5 then
			say ("Rozumiem, kryzys jest" )
			say ("i każdy grosz się liczy")
			return
		end
		say_title("Kowal")
		say("Kowal dziękuję ci za twoje pieniądze.")
		say_reward("Quest od MarioBase dla SAstunderAD")
			else
			return
		end
	end
end
end

Chyba będzie hulać bo nie jestem pewny co do warunku

elseif s == 4 then with pc.get_gold >= 5000000 then begin

Stelios · 18 Stycznia 2011

Hy Hy Hy...

Zrobiłem quest na podstawie skryptu (jakoś tak to się chyba nazywa ;P)

Link do pliku: http://www.multiupload.com/J1MN5AV0Q7

SKAN: http://www.virustotal.com/file-scan/report.html?id=e38c468f82a7a40e77eb11b441138e09d3a0c04a0a8f829631ff71b2c8bfb1df-1295355522

Zrobiłem to na 20083, chodzi o wymianę dyń na przedmioty, nie mam zielonego pojęcia jak pisze się np "pc.give_item2(19, 1) or pc.give_item2(29, 1) itd...

Widziałem kiedyś jakiś inny sposób z tym ale nie pamiętam jaki, a z reguły nie piszę questów ;P (chyba ze na tp, to mi się udaje jakoś ;D)

@EDIT Zapomniałem dopisać, że nie działa, ale to chyba wiadomo skoro pytam czy dobrze napisałem ;D ;P

wawuch12 · 18 Stycznia 2011

Chciałbym aby mi ktoś napisał quest taki że...

Przed grotą stoi Koe-Pung, który wymaga od nas Tęczowy kamień (za wejście)

Oczywiście gdyby mi ktos napisał jak zablokowac wejscie normalne do groty to spoko ;d

MarioBase · 18 Stycznia 2011

Chciałbym aby mi ktoś napisał quest taki że...

Przed grotą stoi Koe-Pung, który wymaga od nas Tęczowy kamień (za wejście)

Oczywiście gdyby mi ktos napisał jak zablokowac wejscie normalne do groty to spoko ;d

Jak postawić NPC na stałe masz opisane w tym TuTku

http://www.mpcforum.pl/topic/213942-tutjak-postawic-npc-na-stale/

A tu masz quest na wejście

quest wejscie begin
state start begin
when 20093.chat."Chcę Wejść " with pc.level >= 75 begin
say("Koe-Pung")
say("Możesz wejść do groty po ukazaniu tęczowego kamienia.")
say_item_vnum(50512)
say("")
say_reward("Czy chcesz wejść teraz do Groty Wygnańców?")

local s = select(locale.yes, locale.no)
if s == 2 then 
return
end
if s == 1 then
if pc.count_item(50512) > 0 then
pc.remove_item(50512, 1)
say_title("Koe-Pung")
say("Zostaniesz Przeniesiony !")
wait()
local x = 100*100
local y = 12078*100
pc.warp(x, y)

else
say_title("Koe-Pung")
say("Nie posiadasz Tęczowego kamienia")
end
end
end
end
end

Damdus · 18 Stycznia 2011

poprosiłbym questa na kupno lvl konia

Jeśli koń ma 12lvl to u stajennego jest opcja "Ulepsz konia"

Wyskakuje informacja co potrzeba na ulepszenie konia, i jest opcja "anuluj" lub "ulepszaj"

Przy "anuluj" wiadomo co jest, a jak da się "ulepszaj" to gdy gracz ma wystarczająco materiałów to poprostu lvl konia podnosi się do 13, a materiały z ulepszenia z nikają.

Zależy mi, aby quest był z warunkami tzn. jeśli ktoś niebd miał wystarczająco dużo materiałów to bd wyskakiwał o tym komunikat, a lvl nie bd zwiększony

Co do ulepszaczy to może być 1x n. perła(27993), 1x b. perła (27992), 1x k. perła(27994), 1x kawałek kamienia(27990), 1x małż (27987) oraz 1kk yang

Bambus3k™ · 18 Stycznia 2011

quest ulepsz begin
state start begin
	when 20349.chat."Ulepsz Konia" begin

		local s = select("Ulepsz","Anuluj")
			if s == 2 then
				return
			elseif s == 1 then

				if pc.count_item(27993) >0 and pc.count_item(27992) > 0 and pc.count_item(27994) >0 and pc.count_item(27990) >0 and pc.count_item(27987) >0 and pc.money >= 1000000 then
					horse.set_level(13)
					say_title("Konik otrzymał 13 poziom.")
					pc.remove_item(27993)
					pc.remove_item(27992)
					pc.remove_item(27994)
					pc.remove_item(27990)
					pc.remove_item(27987)
					pc.change_gold(-1000000)
				else
				say_reward("Nie masz potrzebnych przedmiotów!")
					say_title("Potrzebujesz:")
						say("x1")
						say_item_vnum(27993)
						wait()
						say("x1")
						say_item_vnum(27992)
						wait()
						say("x1")
						say_item_vnum(27994)
						wait()
						say("x1")
						say_item_vnum(27990)
						wait()
						say("x1")
						say_item_vnum(27987)
						wait()
						say("1.000.000 Yang!")
				end
			end
	end
end
end

Tak.. zawsze.. nawet jak masz militara przyjdziesz i oddasz to dostaniesz nagle 13 lvl konia.

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Gość natazar95

Gość natazar95

Gość natazar95

Gość natazar95

Gość natazar95

Gość natazar95

Zarchiwizowany