Pisanie / Poprawa Questów !

MarioBase · 12 Stycznia 2011

@Stelios

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
end
end
end
end

Wole +'y

Stelios · 12 Stycznia 2011

@UP Bóg zapłać ;P + - ?

A w tym co jest nie tak? ;/ same jakieś lewe questy mam

Problem polega na tym ze w ogole sie nei pokazuje w grze ;/

quest smok begin

state start begin

when login or levelup with pc.get_level > 94 begin

set_state(info)

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("Czerwony Smok")

when button or info begin

say_title("Kowal:")

say("Witaj koleszko!")

say("Mam dla ciebie ciekawa misje.")

say("Przyjdz do mnie to zdradze")

say("ci jej szczegoly!")

end

when __TARGET__.target.click or

20016.chat."Czerwony Smok" begin

target.delete("__TARGET__")

say_title("Czerwony Smok")

say("Witaj koleszko!")

say("Mam dla ciebie ciekawa misje.")

say("Musisz zabic Czerwonego Smoka.")

say("Nie jest to latwa misja")

say("ale nie jest tez zbyt trudna!")

say("Na twoim poziomie zabijesz go")

say("bez problemu!")

say("")

wait()

say("Znajdziesz go w Atlantydzie")

say("na poziomie drugim")

say("Powiem ci takze o tym, ze")

say("dzialaja na niego bonusy:")

say("Zwierzeta, daibly, nieumarli...")

say("Wiecej nic nie pomoge,")

say("nic wiecej nie wiem...")

say("Powodzenia!")

say_reward("Nagroda:")

say_reward("Exp: 400kk")

say_reward("Yang: 300kk")

set_state(kolejny_state)

end

state kolejny_state begin

when letter begin

send_letter("Czerwony Smok")

end

when button or info begin

say("Czerwony Smok")

end

when 2411.kill with pc.countitem(70031)==0 begin

local random = math.random(3)

if random == 1 then

pc.give_item2(70031, 100)

say("Zdobyles Broszure!")

say("Wracaj do kowala!")

local v = find_npc_by_vnum(20016)

if v != 0 then

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

end

when 20016.chat."Czerwony Smok"

with pc.countitem(70031)>0 begin

target.delete("__TARGET__")

say_title("Kowal:")

say("Dziekuje za pomoc!")

say("Obiecana nagroda ")

say_reward("Exp: 400kk")

say_reward("Yang: 300kk")

pc . change_money ( 300000000 )

pc . give_exp2 ( 400000000 )

say_reward("")

pc.remove_item(70031, 100)

pc.give_item2(70031)

set_state(__COMPLETE__)

end

end end

state __COMPLETE__ begin

end

@DOWN Ale max lvl na serwerze mam 255 ;P

@EDIT DOWN Chodziło mi o to, że maksymalny lvl który można mieć na moim serwerze to 255 ;P

A poprawiałeś coś w tym queście? Czy tylko lvl zmieniłeś? ;P

MarioBase · 12 Stycznia 2011

@UP Bóg zapłać ;P + - ?

A w tym co jest nie tak? ;/ same jakieś lewe questy mam

Problem polega na tym ze w ogole sie nei pokazuje w grze ;/

quest smok begin

state start begin

when login or levelup with pc.get_level > 94 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("Czerwony Smok")

when button or info begin

say_title("Kowal:")

say("Witaj koleszko!")

say("Mam dla ciebie ciekawa misje.")

say("Przyjdz do mnie to zdradze")

say("ci jej szczegoly!")

end

when __TARGET__.target.click or

20016.chat."Czerwony Smok" begin

target.delete("__TARGET__")

say_title("Czerwony Smok")

say("Witaj koleszko!")

say("Mam dla ciebie ciekawa misje.")

say("Musisz zabic Czerwonego Smoka.")

say("Nie jest to latwa misja")

say("ale nie jest tez zbyt trudna!")

say("Na twoim poziomie zabijesz go")

say("bez problemu!")

say("")

wait()

say("Znajdziesz go w Atlantydzie")

say("na poziomie drugim")

say("Powiem ci takze o tym, ze")

say("dzialaja na niego bonusy:")

say("Zwierzeta, daibly, nieumarli...")

say("Wiecej nic nie pomoge,")

say("nic wiecej nie wiem...")

say("Powodzenia!")

say_reward("Nagroda:")

say_reward("Exp: 400kk")

say_reward("Yang: 300kk")

set_state(kolejny_state)

end

end

state kolejny_state begin

when letter begin

send_letter("Czerwony Smok")

end

when button or info begin

say("Czerwony Smok")

end

when 2411.kill with pc.countitem(70031)==0 begin

local random = math.random(3)

if random == 1 then

pc.give_item2(70031, 100)

say("Zdobyles Broszure!")

say("Wracaj do kowala!")

local v = find_npc_by_vnum(20016)

if v != 0 then

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

end

end

end

when 20016.chat."Czerwony Smok"

with pc.countitem(70031)>0 begin

target.delete("__TARGET__")

say_title("Kowal:")

say("Dziekuje za pomoc!")

say("Obiecana nagroda ")

say_reward("Exp: 400kk")

say_reward("Yang: 300kk")

pc . change_money ( 300000000 )

pc . give_exp2 ( 400000000 )

say_reward("")

pc.remove_item(70031, 100)

pc.give_item2(70031)

set_state(__COMPLETE__)

end

end end

state __COMPLETE__ begin

end

end

Nie sprawdzałem tego questa do końca ale poprostu może masz za duży lvl :P Ten quest jest do 94 lvla

Masz tu do 255 lvla

quest smok begin
               state start begin
                               when login or levelup with pc.get_level >= 255 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("Czerwony Smok")
when button or info begin
                                               say_title("Kowal:")
                                               say("Witaj koleszko!")
                                               say("Mam dla ciebie ciekawa misje.")
                                               say("Przyjdz do mnie to zdradze")
					say("ci jej szczegoly!") 
                               end
when __TARGET__.target.click or 
                                               20016.chat."Czerwony Smok" begin
                                               target.delete("__TARGET__")
                                               say_title("Czerwony Smok")
                                               say("Witaj koleszko!")
                                               say("Mam dla ciebie ciekawa misje.")
                                               say("Musisz zabic Czerwonego Smoka.")
					say("Nie jest to latwa misja")
					say("ale nie jest tez zbyt trudna!")
					say("Na twoim poziomie zabijesz go")
					say("bez problemu!")
					say("")
					wait()
					say("Znajdziesz go w Atlantydzie")
					say("na poziomie drugim")
					say("Powiem ci takze o tym, ze")
					say("dzialaja na niego bonusy:")
					say("Zwierzeta, daibly, nieumarli...")
					say("Wiecej nic nie pomoge,")
					say("nic wiecej nie wiem...")
					say("Powodzenia!")
                                               say_reward("Nagroda:")
                                               say_reward("Exp: 400kk")
                                               say_reward("Yang: 300kk") 
                                               set_state(kolejny_state)
                                               end
                               end
state kolejny_state begin
                               when letter begin
                                       send_letter("Czerwony Smok")
                       end
                       when button or info begin
                                       say("Czerwony Smok")
                       end

                     when 2411.kill with pc.countitem(70031)==0 begin
                          local random = math.random(3)
                          if random == 1 then
                          pc.give_item2(70031, 100)
                          say("Zdobyles Broszure!")
                          say("Wracaj do kowala!")
                       local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Kowal")
                       end
               end
       end
			when 20016.chat."Czerwony Smok"
			with pc.countitem(70031)>0 begin
                               target.delete("__TARGET__")
                               say_title("Kowal:")
                               say("Dziekuje za pomoc!")
			say("Obiecana nagroda ")
			say_reward("Exp: 400kk")
			say_reward("Yang: 300kk")
			pc . change_money ( 300000000 )
			pc . give_exp2 ( 400000000 )
                               say_reward("")
                       pc.remove_item(70031, 100)
                       pc.give_item2(70031)
                                               set_state(__COMPLETE__)
                                               end
                               end        end
       state __COMPLETE__  begin
       end
end

globasek · 12 Stycznia 2011

Witam prosiłbym o napisanie questa na rangę

A dokładniej takiego , aby szybciej ranga rosła . Jak jest teraz , że , np. ' z 1 moba leci 1 rangi ' to żeby było , np. ' z 1 moba leci 100 rangi '

Rozumiecie ?;>

Z góry dzięki

Sensual · 12 Stycznia 2011

Hmm.. Powiększenie otrzymywanej rangi.. To gdzieś w plikach , ale cóż możesz zrobić takiego questa

quest sensual begin
state start begin
when kill begin
local s = math.random(100)
if s >= 1 < 1 then
pc.change_alignment ( 100 )
end
end
end
end

MarioBase · 12 Stycznia 2011

Hmm.. Powiększenie otrzymywanej rangi.. To gdzieś w plikach , ale cóż możesz zrobić takiego questa
quest sensual begin
state start begin
when kill begin
local s = math.random(100)
if s >= 1 < 1 then
pc.change_alignment ( 100 )
end
end
end
end

Ten quest nie zadziała... dlaczego?

when kill begin

Ale co? kowala? -.-

Ponadto nie będzie zwiększało rangi tylko ustawiało ją na 100 ( neutralny )

Sensual · 13 Stycznia 2011

@UP

Będzie wstawiał Sprawdzałem. Tak samo jest w pierścieniu , który niby zmienia a tak naprawdę zwiększa.

Stelios · 13 Stycznia 2011

Kiedy wgrywam questa cd/usr..... pozniej ./qc smok.quest (nazwalem questa smok ;p)

wywala mi błąd, że w linijce 6 i 47 jest błąd w 6 when (którego tam nie ma) a w 47 nie wiem jakiś duble czy jakoś tak... ;/

@EDIT

wywala coś takiego:

http://img46.imageshack.us/i/bladbladbladp.png/

quest smok begin

state start begin

when login or levelup with pc.get_level >= 255 begin

set_state(info)

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("Czerwony Smok")

when button or info begin

say_title("Kowal:")

say("Witaj koleszko!")

say("Mam dla ciebie ciekawa misje.")

say("Przyjdz do mnie to zdradze")

say("ci jej szczegoly!")

end

when __TARGET__.target.click or

20016.chat."Czerwony Smok" begin

target.delete("__TARGET__")

say_title("Czerwony Smok")

say("Witaj koleszko!")

say("Mam dla ciebie ciekawa misje.")

say("Musisz zabic Czerwonego Smoka.")

say("Nie jest to latwa misja")

say("ale nie jest tez zbyt trudna!")

say("Na twoim poziomie zabijesz go")

say("bez problemu!")

say("")

wait()

say("Znajdziesz go w Atlantydzie")

say("na poziomie drugim")

say("Powiem ci takze o tym, ze")

say("dzialaja na niego bonusy:")

say("Zwierzeta, daibly, nieumarli...")

say("Wiecej nic nie pomoge,")

say("nic wiecej nie wiem...")

say("Powodzenia!")

say_reward("Nagroda:")

say_reward("Exp: 400kk")

say_reward("Yang: 300kk")

set_state(kolejny_state)

end

state kolejny_state begin

when letter begin

send_letter("Czerwony Smok")

end

when button or info begin

say("Czerwony Smok")

end

when 2411.kill with pc.countitem(70031)==0 begin

local random = math.random(3)

if random == 1 then

pc.give_item2(70031, 100)

say("Zdobyles Broszure!")

say("Wracaj do kowala!")

local v = find_npc_by_vnum(20016)

if v != 0 then

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

end

when 20016.chat."Czerwony Smok"

with pc.countitem(70031)>0 begin

target.delete("__TARGET__")

say_title("Kowal:")

say("Dziekuje za pomoc!")

say("Obiecana nagroda ")

say_reward("Exp: 400kk")

say_reward("Yang: 300kk")

pc . change_money ( 300000000 )

pc . give_exp2 ( 400000000 )

say_reward("")

pc.remove_item(70031, 100)

pc.give_item2(70031)

set_state(__COMPLETE__)

end

end end

state __COMPLETE__ begin

end

@DOWN Problem w tym ze zmienilem tylko spacje na taby i nic wiecej...

@EDIT 47 linijka to end ;P

co tam mogłem zepsuć ? ;P

@EDIT Nie sadziłem ze na to wpadne

Było za duzo end

(pozniej wywalilo mi jeszcze blad w 82 i 85 linijce (same end:P))

Dziękuje za pomoc

NiePodxpiie · 13 Stycznia 2011

@Stelios

Zepsułeś coś w 47 linijce questu.

Ela · 13 Stycznia 2011

Mozna prosić o info jak można edytować questa tak by był dostępny tylko w grupie oraz by był rozpoznawany sred lvl grupy?

np.

gracz 1; 75 lvl- lider grupy

gracz 2; 70 lvl

gracz 3; 60 lvl }sred lvl 60

gracz 4; 55 lvl

i w ten sposób otrzymują zadanie na sred poziom i to tyczy się rożnych lvl czym wyższy tym trudniejsze zadanie.

Hmm · 14 Stycznia 2011

Potrzebuje misji biologa

No wiec tak ;

Dostepne od lvl'a 90

Misja od NPC ; 20091

Tresc : to juz obojetne

No wiec tak trzeba dropnac 50 notatek przywodcy

Nagroda do wyboru to :

1,5k hp

75 Wartosci ataku

150defa

Mozna tylko 1 nagrode wybrac

2 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

3quest

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 -

StraiGht · 14 Stycznia 2011

UP wądpie zeby Ci ktos takie questy napisał, no chyba ze Bambus3k

Stelios · 14 Stycznia 2011

@UP Żebyś się nie zdziwił, mi pomógł z questami zupełnie kto inny niż Bambus3k...

Nie tylko on tu jest, o ile jeszcze w ogóle zagląda do tego tematu.

Ja się pisaniem questów nie zajmuję, widać po wcześniejszych postach

ale na pewno jest tu wiele osób które piszą questy.

(Mi pomógł np: MarioBase za co jestem mu bardzo wdzięczny ;D)

adm · 14 Stycznia 2011

witam.

Podczas dodawania Questów pokazuje mi się taki błąd i dalej nic nie idzie:

http://img195.imageshack.us/f/questvi.png/

z tych komend korzystam

cd /usr/rain/channel/share_data/locale/english/quest/

./qc demon.quest

ToBe · 14 Stycznia 2011

@UP nadaj prawa questu 777 (FilleZilla) lub 0777 (WinSCP)

Siemka możecie mi powiedzieć co w tym queście jest nie tak? ( nie ma go, w grze , wgrywa sie normalnie)

ew. możecie go przerobić tak , żeby działał

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

	state info begin
		when letter begin
			send_letter("Witaj!")
			local v = find_npc_by_vnum(20354)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Strażnik Miejski")
	end

when button or info begin
		say("Witaj na serwerze Tosiger! [ENTER]Na początku udaj sie do Strażnika Miasta ")
		end

when ID_NPC.chat."Pierwsza Misja" begin
		say("Chcesz dostać 61 lvl i troche rzeczy na start?")
		local s = select ("Oczywiscie" , "Nie ma mowy")
		if 2 == s then
		say("Nie to Nie. Idz sam se expić IDIOTO!")
		return
		end
		elseif 1 == s then
		say("To wspaniale ! [ENTER]Udaj sie do kowala on czekoś chce od ciebie")
		set_state(info2)
		end

state info2 begin
		when letter begin
			send_letter("Idz do kowala!")
			local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Kowal")
	end

when button or info begin
		say("Idz do kowala , on ma dla ciebie zadanie")
		end

when ID_NPC.chat."Zadanie" begin
		say("Yoł mały n00bie [ENTER] Ten gruby dozorca zabrał mi mój młot [ENTER] Coś tam gadał o jakiejś bramie czy czymś takim [ENTER]Ale niedawno odkryłem superwytrzymałą stal[ENTER]potrzebuje mojego młota , żeby wykuć w tej stali braoń[ENTER]Zabierzesz dozorcy mój młot?[ENTER] Ja tu musze zostać , pilnować tej stali")
		local s = select ("Oczywiscie" , "Nie ma mowy")
		if 2 == s then
		say("Nie to Nie.")
		return
		end
		elseif 1 == s then
		say("To wspaniale ! [ENTER]Udaj sie do kowala on czekoś chce od ciebie")
		set_state(info3)
		end

state info3 begin
		when letter begin
			send_letter("Idz do Dozorcy!")
			local v = find_npc_by_vnum(9005)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Dozorca")
	end

when button or info begin
		say("Idz do Dozorcy , po młot Kowala!")
		end

when ID_NPC.chat."Młot Kowala" begin
		say_title("Dozorca:")
		say("Siema , Widze Cie pierwszy raz [ENTER]Czego Chcesz?[ENTER]")
		wait()
		say_title(say_pc_name())
		say("Przyprowadza mnie kowal , mówi , że masz jego młot.[ENTER]Oddawaj go!")
		wait()
		say_title("Dozorca:"))
		say("A no mam jego młot , ale go Ci nie oddam![ENTER]Znalazłem dziure w murze[ENTER]Muszę ją jak najszybciej naprawić , bo inaczej dzikie psy wpadną do miasta[ENTER]Tylko tym wspaniałym młotem moge naprawić tą dziure!
		say("Ale Ale ![ENTER]Jest jeszcze 1 możliwość![ENTER]Niedaleko mieszka rybak !On kiedyś uczył się [ENTER]posługiwać młotem , ale wolał ryby łowić[ENTER]Idź spytać się go czy ma ochote naprawić dziure w murze!")
		set_state(info4)
		end		

state info3 begin
		when letter begin
			send_letter("Idz do Rybaka")
			local v = find_npc_by_vnum(20013)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Rybak")
	end

when button or info begin
		say("Dozorca wysłał cie do rybaka , albyś dowiedział sie czy naprawi dziure w murze")
		end

when ID_NPC.chat."Propozycja Naprawy" begin
		say_title("Rybak:")
		say("Yoł Yoł czego chcesz?")
		wait()
		say_title(say_pc_name())
		say("Przyprowadza mnie Dozorca , mówi , że jesteś w stanie naprawić dziure w murze!")
		wait()
		say_title("Rybak:"))
		say("No kiedyś studiowałem kowalstwo , ale odkryłem , że rybki to moje życie ![ENTER]Naszczęście mam jeszcze jakiś młot")
		say("...<Szpera>...")
		say("")
		say("")
		say("TAK! Wiedziałem ,że go gdzieś mam mój młot - dostałem go od dziatka[ENTER]Który był podróżnikiem , podobno był nawet w krainie zombie![ENTER]mam naprawić dziure w płocie?[ENTER]załatwione!")
		say("Ale musisz zabić 10 psów , bo się ich boje!")
		set_state(info5)
		end		
state info5 begin
		when letter begin
			send_letter("Zabij 10 dzikich psów")
		end

	when button or info begin
			say("Rybak prosił cie o oczyszczenie okolicy z psów [ENTER]Idź zabij 10 psów")
	end

when 101.kill begin
                                               local count = pc.getqf("zjawa") + 1

                                                       if count < 1 then
                                                       pc.setqf("zjawa", count)

                                                               if count == 1 then
                                                                       say_title("Misja Wykonana!")
                                                                       say("Udało Ci się wykonać misję!.")
                                                                       say("Wróć do Rybaka.")
                                                                               set_state(back_go)
                                                               end
                                                       end
               end
       end
state back_go begin
               when letter begin
                       local v = find_npc_by_vnum(20013)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Rybak")
                       end
                       send_letter("Misja Wykonana")
               end

               when button or info begin
                   say_title("Misja Wykonana")
                   say("")
                                       say("Wróć do Rybaka i poinformuj go ,że zabiłeś 10 dzikich psów")
                                       say("")
               end
               when 20013.chat."Wykonałem Misję!" begin
                       target.delete("__TARGET__")
                       say_title("Rybak:")
                                               say("Dzięki !Ide pomóc Dozorcy naprawić tą dziure w płocie!")
                                               set_state(back_go2)
               end
       end
state back_go2 begin
		when letter begin
			send_letter("Idz do Dozorcy")
			local v = find_npc_by_vnum(9005)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Dozorca")
	end

when button or info begin
		say("Idz i powiedź dozorcy , że rybak naprawi dzure w murze")
		end

when ID_NPC.chat."Sprawa załatwiona" begin
		say_title("Dozorca:")
		say("Co Tam?")
		wait()
		say_title(say_pc_name())
		say("Rybak powiedział , że naprawi dziure w murze , więc daj mi Młot kowala")
		wait()
		say_title("Dozorca:"))
		say("No skoro rybak napawi dziure to mi młot chyba nie bedzie potrzebny")
		say("Oddaj Kowalowi jego młot i przeproś go w moim imieniu Ok?")
		say("")
		say("")
		set_state(back_go3)
		end		

state back_go3 begin
		when letter begin
			send_letter("Idz do Kowala")
			local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Kowal")
	end

when button or info begin
		say("Daj kowalowi jego młot ")
		end

when ID_NPC.chat."Twój młot" begin
		say_title("Kowal:")
		say("Co Tam?")
		wait()
		say_title(say_pc_name())
		say("Oto twój Młot kowalu ![ENTER]Dozorca musiał naprawić dzure w płocie , więc go potrzebował")
		wait()
		say_title("Kowal:"))
		say("Dziure tak ?[ENTER]Dziękuje za młot , teraz moge wykuć nową zbroje... [ENTER]Kiedyś Ci ją może dam!")
		say("Idz teraz do Strażnika miejskiego ok?")
		say("")
		set_state(go_straznik)
		end				

state go_straznik begin
		when letter begin
			send_letter("Idz po nagrode")
			local v = find_npc_by_vnum(20354)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Straznik")
	end

when button or info begin
		say("Idz do strażnika miasta po swoją nagrode")
		end

when ID_NPC.chat."Misja zrobiona!" begin
		say_title("Strażnik Miasta:")
		say("Elo Elo 3...2...0[ENTER]Zrobiłeś misje?")
		wait()
		say_title(say_pc_name())
		say("Tak , przyszedłem po nagrode :]")
		wait()
		say_title("Strażnik Miasta:"))
		say("No dobra ")
		say("Jako iz jest to twoja pierwsza misja zostaniesz dobrze nagrodzony!")
		say("")
		say_reward("Otrzymałeś 61 poziom , 10 kk Yang i butem w morde!")
		pc.get_money(10000000)
		pc.set_level(61)
		set_state(__COMPLETE__)
		end	

	state __COMPLETE__ begin
	end
end

z góry dzięki

JEBANYKOZAK · 14 Stycznia 2011

@up moim zdanie zamało end

XaviPrawdziwy · 14 Stycznia 2011

Questa nie czytałem, ale poprawiłem błąd - w jednej linijce saya nie domknąłeś, było to widać nawet po tym, że kolorowanie się rozlało.

Spróbuj.

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

	state info begin
		when letter begin
			send_letter("Witaj!")
			local v = find_npc_by_vnum(20354)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Strażnik Miejski")
	end

when button or info begin
		say("Witaj na serwerze Tosiger! [ENTER]Na początku udaj sie do Strażnika Miasta ")
		end

when ID_NPC.chat."Pierwsza Misja" begin
		say("Chcesz dostać 61 lvl i troche rzeczy na start?")
		local s = select ("Oczywiscie" , "Nie ma mowy")
		if 2 == s then
		say("Nie to Nie. Idz sam se expić IDIOTO!")
		return
		end
		elseif 1 == s then
		say("To wspaniale ! [ENTER]Udaj sie do kowala on czekoś chce od ciebie")
		set_state(info2)
		end

state info2 begin
		when letter begin
			send_letter("Idz do kowala!")
			local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Kowal")
	end

when button or info begin
		say("Idz do kowala , on ma dla ciebie zadanie")
		end

when ID_NPC.chat."Zadanie" begin
		say("Yoł mały n00bie [ENTER] Ten gruby dozorca zabrał mi mój młot [ENTER] Coś tam gadał o jakiejś bramie czy czymś takim [ENTER]Ale niedawno odkryłem superwytrzymałą stal[ENTER]potrzebuje mojego młota , żeby wykuć w tej stali braoń[ENTER]Zabierzesz dozorcy mój młot?[ENTER] Ja tu musze zostać , pilnować tej stali")
		local s = select ("Oczywiscie" , "Nie ma mowy")
		if 2 == s then
		say("Nie to Nie.")
		return
		end
		elseif 1 == s then
		say("To wspaniale ! [ENTER]Udaj sie do kowala on czekoś chce od ciebie")
		set_state(info3)
		end

state info3 begin
		when letter begin
			send_letter("Idz do Dozorcy!")
			local v = find_npc_by_vnum(9005)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Dozorca")
	end

when button or info begin
		say("Idz do Dozorcy , po młot Kowala!")
		end

when ID_NPC.chat."Młot Kowala" begin
		say_title("Dozorca:")
		say("Siema , Widze Cie pierwszy raz [ENTER]Czego Chcesz?[ENTER]")
		wait()
		say_title(say_pc_name())
		say("Przyprowadza mnie kowal , mówi , że masz jego młot.[ENTER]Oddawaj go!")
		wait()
		say_title("Dozorca:"))
		say("A no mam jego młot , ale go Ci nie oddam![ENTER]Znalazłem dziure w murze[ENTER]Muszę ją jak najszybciej naprawić , bo inaczej dzikie psy wpadną do miasta[ENTER]Tylko tym wspaniałym młotem moge naprawić tą dziure!")
		say("Ale Ale ![ENTER]Jest jeszcze 1 możliwość![ENTER]Niedaleko mieszka rybak !On kiedyś uczył się [ENTER]posługiwać młotem , ale wolał ryby łowić[ENTER]Idź spytać się go czy ma ochote naprawić dziure w murze!")
		set_state(info4)
		end		

state info3 begin
		when letter begin
			send_letter("Idz do Rybaka")
			local v = find_npc_by_vnum(20013)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Rybak")
	end

when button or info begin
		say("Dozorca wysłał cie do rybaka , albyś dowiedział sie czy naprawi dziure w murze")
		end

when ID_NPC.chat."Propozycja Naprawy" begin
		say_title("Rybak:")
		say("Yoł Yoł czego chcesz?")
		wait()
		say_title(say_pc_name())
		say("Przyprowadza mnie Dozorca , mówi , że jesteś w stanie naprawić dziure w murze!")
		wait()
		say_title("Rybak:"))
		say("No kiedyś studiowałem kowalstwo , ale odkryłem , że rybki to moje życie ![ENTER]Naszczęście mam jeszcze jakiś młot")
		say("...<Szpera>...")
		say("")
		say("")
		say("TAK! Wiedziałem ,że go gdzieś mam mój młot - dostałem go od dziatka[ENTER]Który był podróżnikiem , podobno był nawet w krainie zombie![ENTER]mam naprawić dziure w płocie?[ENTER]załatwione!")
		say("Ale musisz zabić 10 psów , bo się ich boje!")
		set_state(info5)
		end		
state info5 begin
		when letter begin
			send_letter("Zabij 10 dzikich psów")
		end

	when button or info begin
			say("Rybak prosił cie o oczyszczenie okolicy z psów [ENTER]Idź zabij 10 psów")
	end

when 101.kill begin
                                               local count = pc.getqf("zjawa") + 1

                                                       if count < 1 then
                                                       pc.setqf("zjawa", count)

                                                               if count == 1 then
                                                                       say_title("Misja Wykonana!")
                                                                       say("Udało Ci się wykonać misję!.")
                                                                       say("Wróć do Rybaka.")
                                                                               set_state(back_go)
                                                               end
                                                       end
               end
       end
state back_go begin
               when letter begin
                       local v = find_npc_by_vnum(20013)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Rybak")
                       end
                       send_letter("Misja Wykonana")
               end

               when button or info begin
                   say_title("Misja Wykonana")
                   say("")
                                       say("Wróć do Rybaka i poinformuj go ,że zabiłeś 10 dzikich psów")
                                       say("")
               end
               when 20013.chat."Wykonałem Misję!" begin
                       target.delete("__TARGET__")
                       say_title("Rybak:")
                                               say("Dzięki !Ide pomóc Dozorcy naprawić tą dziure w płocie!")
                                               set_state(back_go2)
               end
       end
state back_go2 begin
		when letter begin
			send_letter("Idz do Dozorcy")
			local v = find_npc_by_vnum(9005)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Dozorca")
	end

when button or info begin
		say("Idz i powiedź dozorcy , że rybak naprawi dzure w murze")
		end

when ID_NPC.chat."Sprawa załatwiona" begin
		say_title("Dozorca:")
		say("Co Tam?")
		wait()
		say_title(say_pc_name())
		say("Rybak powiedział , że naprawi dziure w murze , więc daj mi Młot kowala")
		wait()
		say_title("Dozorca:"))
		say("No skoro rybak napawi dziure to mi młot chyba nie bedzie potrzebny")
		say("Oddaj Kowalowi jego młot i przeproś go w moim imieniu Ok?")
		say("")
		say("")
		set_state(back_go3)
		end		

state back_go3 begin
		when letter begin
			send_letter("Idz do Kowala")
			local v = find_npc_by_vnum(20016)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Kowal")
	end

when button or info begin
		say("Daj kowalowi jego młot ")
		end

when ID_NPC.chat."Twój młot" begin
		say_title("Kowal:")
		say("Co Tam?")
		wait()
		say_title(say_pc_name())
		say("Oto twój Młot kowalu ![ENTER]Dozorca musiał naprawić dzure w płocie , więc go potrzebował")
		wait()
		say_title("Kowal:"))
		say("Dziure tak ?[ENTER]Dziękuje za młot , teraz moge wykuć nową zbroje... [ENTER]Kiedyś Ci ją może dam!")
		say("Idz teraz do Strażnika miejskiego ok?")
		say("")
		set_state(go_straznik)
		end				

state go_straznik begin
		when letter begin
			send_letter("Idz po nagrode")
			local v = find_npc_by_vnum(20354)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Straznik")
	end

when button or info begin
		say("Idz do strażnika miasta po swoją nagrode")
		end

when ID_NPC.chat."Misja zrobiona!" begin
		say_title("Strażnik Miasta:")
		say("Elo Elo 3...2...0[ENTER]Zrobiłeś misje?")
		wait()
		say_title(say_pc_name())
		say("Tak , przyszedłem po nagrode :]")
		wait()
		say_title("Strażnik Miasta:"))
		say("No dobra ")
		say("Jako iz jest to twoja pierwsza misja zostaniesz dobrze nagrodzony!")
		say("")
		say_reward("Otrzymałeś 61 poziom , 10 kk Yang i butem w morde!")
		pc.get_money(10000000)
		pc.set_level(61)
		set_state(__COMPLETE__)
		end	

	state __COMPLETE__ begin
	end
end

damomo · 14 Stycznia 2011

Uwaga, czas na hard pytanie, jaką funkcję mam dodać do questa (treść podam jeśli będzie potrzebna, póki co nie daję) możliwość używania przedmiotu co 15min na przykład ? =)

Sensual · 14 Stycznia 2011

Hmm masz tutaj zobacz czy zadziała , pisałem na szybko i nie wiem czy będzie dobrze z tym dropem notatek do 50

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

       state info begin
               when letter begin
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Seon-Pyeong")
                       end
                       send_letter("Notatki Przywódcy")
               end

               when button or info begin
                       say_title("Notatki Przywódcy")
                       say("")
                       say("Idz do Seon-Pyeong")
                       say("Chodzi o ważną sprawe.")
               end

               when __TARGET__.target.click or
                       20091.chat."Notatki Przywódcy" begin
                       target.delete("__TARGET__")
                               say("Witaj")
                                       say("No! Wkoncu przybyłeś... Sluchaj. Musisz mi pomoc!")
                                       say("")
                                       say("xx")
                                       say("xxx")
                                       say("xx")
                                       say("xxx")
                                       say("xxx")
                                       say("xxx")
                                       say("xxx")
                                       say("xxx")
                               set_state(notatka)
                               end
               end

               state notatka begin
                               when letter begin
                               send_letter("Notatki Przywódcy")
                       end
                       when button or info begin
                                       say_title("Notatki Przywódcy")
                                       say("tekst o zadaniu, gdy się otworzy list.")
                                       say("xxx")
                                       say("x")
                                       say("x")
                       end

	when 2402.kill or
        	2431.kill or
        	2432.kill or
        	2433.kill or
        	2434.kill or 
        	2454.kill or 
        	2453.kill or 
        	2452.kill or
        	2451.kill or
        	2401.kill  begin
		local s = number(1, 50)
		if s == 1 and pc.count_item(30168)==0 then
			pc.give_item2(30168)
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Seon-Pyeong")
                       end
               end
       end
               when 20091.chat."Notatki Przywódcy!" with pc.countitem(30168)>0 begin
                       say_title("Seon-Pyeong")
                               target.delete("__TARGET__")
                                       say("Swietnie! Masz je. Daj mi je.")
                                       say("xx")
                                       say("xxx")
                                       say("xx")
                                       say("xx")
                                       say("xx")
                                       say("xx")
                                       say("")
                                       say("Wybierz nagrodę")
                                       say("")                         				
local s = select ("+150 Defa" , "+75 Wartości Ataku" , "+1500HP")
                       if s == 2 then
                               say("Otrzymałeś +75 Wartości Ataku na zawsze !")
                               affect.add_collect(apply.ATT_GRADE_BONUS,75,60*60*24*365*60
pc.remove_item("30168", 50)

elseif s == 1 then
                               say("Otrzymałeś +150 Defa na zawsze !")
			affect.add_collect(apply.DEF_GRADE_BONUS,150,60*60*24*365*60)
pc.remove_item("30168", 50)
                       elseif s == 3 then
                               say_title("Otrzymałeś +1500HP na zawsze !")
			affect.add_collect(apply.MAX_HP,1500,60*60*24*365*60)
pc.remove_item("30168", 50)

                                       end
                               end
       state __COMPLETE__  begin
       end
end

@down

nie modyfikowałem questu biologa sam pisałem.

MarioBase · 14 Stycznia 2011

@damomo

Wydaje mi się że można wykorzystać te funkcje która jest w questach biologa, ze item możemy oddawać co ileś czasu ( niżej akurat co godzinę )

pc.setqf("duration",get_time()+60*60*1)

Lub

timer

@up

zapewne nie pisałeś na szybko tylko poprawiłeś quest biologa :P

damomo · 14 Stycznia 2011

@damomo

Wydaje mi się że można wykorzystać te funkcje która jest w questach biologa, ze item możemy oddawać co ileś czasu ( niżej akurat co godzinę )
pc.setqf("duration",get_time()+60*60*1)
Lub
timer
@up

zapewne nie pisałeś na szybko tylko poprawiłeś quest biologa :P

Tyle to i ja wiem ;D

Ciekawi mnie właśnie ten timer, jest on wykorzystywany w spamieniu na czacie jako GM.

quest notatka  begin
       state start  begin
               when 20094.chat."Automatyczna wiadomosc" with pc.is_gm()  begin
                       say_title("Hong Hae:")
                       say("Czy chcesz uruchomic automatyczne wyswietlanie")
                       say("wiadomosci na czacie co 30 minut?")
                       local s = select("Tak", "Nie")
                       if s == 2 then
                               return
                       elseif s == 1 then
                               clear_server_timer('notice_on_chat', get_server_timer_arg())
                               server_timer('notice_on_chat', 30*60, get_server_timer_arg())
                       end
               end
               when notice_on_chat.server_timer  begin
                       notice_all("Witaj na serwerze xxx!")
                       notice_all("Zapraszamy na stronę xxx")
                       notice_all("Życzymy miłej gry.")
                       clear_server_timer('notice_on_chat', get_server_timer_arg())
                       server_timer('notice_on_chat', 30*60, get_server_timer_arg())
               end
       end
end

Także ciekawi mnie jak wykorzystać tę funkcję, bo widzę można zrobić 'podquest' ale nie jestem aż tak obeznany i jak na moje niemożliwe jest zrobić coś takiego z timerem.

Jeśli ktoś umie to proszę podzielić się tą wiedzą bądź nakierować mnie, w najgorszym wypadku zrobię tak jak MarioBase pisałeś, zapożyczę funkcje z questa biologa ;/

*quest z timerem - dałem przykład, nie przywłaszczam go sobie =)

Edit:

Zobaczyłem quest biologa, z tym duration będzie trochę zabawy, tak samo timer.

Także kto umie to proszę o pomoc =P

XaviPrawdziwy · 14 Stycznia 2011

Przecież duration jest proste jak budowa cepa.

pc.setqf("duration",get_time()+60*60) - get_time() - obecny czas + 60*60(3600sekund - 1 godzina), czyli obecny czas + 1 godzina, w sekundach, to bodajże jest timestamp najzwyklejszy.

Czyli po prostu - ustawiasz sobie wartość duration na czas kiedy będzie można użyć ponownie itemu.

Co dalej?

Sprawdzasz:

if get_time() > pc.getqf("duration") then
// tutaj kod, gdy czas jest ok
else
say("Nie mozesz jeszcze tego zrobic")
end

Co do tajmera to też proste.

Raz uruchamiasz ręcznie tajmer - po X sekund wykonuje się kod zawarty w tajmerze.

Wrzucasz tam co chcesz(pamiętaj, że jest to odpalane na uprawnieniach gejma, więc nie zadziała command("reload a") etc.) i dorzucasz znowu tajmera, żeby to się zapętliło i wykonywało cały czas co X sekund.

Na przykładzie z powyższego kodu:

server_timer('notice_on_chat', 30*60, get_server_timer_arg())

14 Stycznia 2011

Napisanie tego od nowa co jest w spoilerze lub edycja (najfaniej jakby ktoś to wrzucił na megaupload)

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

Hmm · 14 Stycznia 2011

Hmm masz tutaj zobacz czy zadziała , pisałem na szybko i nie wiem czy będzie dobrze z tym dropem notatek do 50

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

       state info begin
               when letter begin
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Seon-Pyeong")
                       end
                       send_letter("Notatki Przywódcy")
               end

               when button or info begin
                       say_title("Notatki Przywódcy")
                       say("")
                       say("Idz do Seon-Pyeong")
                       say("Chodzi o ważną sprawe.")
               end

               when __TARGET__.target.click or
                       20091.chat."Notatki Przywódcy" begin
                       target.delete("__TARGET__")
                               say("Witaj")
                                       say("No! Wkoncu przybyłeś... Sluchaj. Musisz mi pomoc!")
                                       say("")
                                       say("xx")
                                       say("xxx")
                                       say("xx")
                                       say("xxx")
                                       say("xxx")
                                       say("xxx")
                                       say("xxx")
                                       say("xxx")
                               set_state(notatka)
                               end
               end

               state notatka begin
                               when letter begin
                               send_letter("Notatki Przywódcy")
                       end
                       when button or info begin
                                       say_title("Notatki Przywódcy")
                                       say("tekst o zadaniu, gdy się otworzy list.")
                                       say("xxx")
                                       say("x")
                                       say("x")
                       end

	when 2402.kill or
        	2431.kill or
        	2432.kill or
        	2433.kill or
        	2434.kill or 
        	2454.kill or 
        	2453.kill or 
        	2452.kill or
        	2451.kill or
        	2401.kill  begin
		local s = number(1, 50)
		if s == 1 and pc.count_item(30168)==0 then
			pc.give_item2(30168)
                       local v = find_npc_by_vnum(20091)
                       if v != 0 then
                               target.vid("__TARGET__", v, "Seon-Pyeong")
                       end
               end
       end
               when 20091.chat."Notatki Przywódcy!" with pc.countitem(30168)>0 begin
                       say_title("Seon-Pyeong")
                               target.delete("__TARGET__")
                                       say("Swietnie! Masz je. Daj mi je.")
                                       say("xx")
                                       say("xxx")
                                       say("xx")
                                       say("xx")
                                       say("xx")
                                       say("xx")
                                       say("")
                                       say("Wybierz nagrodę")
                                       say("")                         				
local s = select ("+150 Defa" , "+75 Wartości Ataku" , "+1500HP")
                       if s == 2 then
                               say("Otrzymałeś +75 Wartości Ataku na zawsze !")
                               affect.add_collect(apply.ATT_GRADE_BONUS,75,60*60*24*365*60
pc.remove_item("30168", 50)

elseif s == 1 then
                               say("Otrzymałeś +150 Defa na zawsze !")
			affect.add_collect(apply.DEF_GRADE_BONUS,150,60*60*24*365*60)
pc.remove_item("30168", 50)
                       elseif s == 3 then
                               say_title("Otrzymałeś +1500HP na zawsze !")
			affect.add_collect(apply.MAX_HP,1500,60*60*24*365*60)
pc.remove_item("30168", 50)

                                       end
                               end
       state __COMPLETE__  begin
       end
end

@down

nie modyfikowałem questu biologa sam pisałem.

Jeszcze gdybys mogl tamte 2 questy napisac

adm · 14 Stycznia 2011

@UP nadaj prawa questu 777 (FilleZilla) lub 0777 (WinSCP)

wartości mam ustawione na 777 i dalej mi wyskakuje ten błąd.

http://img195.imageshack.us/i/questvi.png/

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Gość natazar95

Gość natazar95

Zarchiwizowany