Pisanie / Poprawa Questów !

Stelios · 9 Stycznia 2012

@stelios

Mylisz się, to działa (dodaje do istniejącej rangi te punkty w nawiasie, np. 1)

pc.change_aligment(1)

Skoro się mylę to sprawdź to najpierw

Niejednego sposobu próbowałem na dodanie rangi z moba,

więc wierz mi - to nie zadziała bo tylko zmienia rangę na ustawioną w ().

Czyli mając rangę np 123450 (w grze 12345) i zabijając moba który według ciebie daje rangę

stracimy dotychczasową rangę a dostaniemy rangę 1 (w grze 0,1)

9 Stycznia 2012

@up

Jeżeli piszę, że się mylisz to najpierw to sprawdzam

To na pewno działa bo sam tak mam...

newjaa · 9 Stycznia 2012

Dobra, dzisiaj z innej beczki.

quest grota begin
state start begin
when 20093.chat."Grota" begin
say("")
say_title("Wejście do Groty")
say("A więc chciałbyś wejść do groty?")
say("Jeśli naprawdę o tym myślisz, musisz mi dać ")
say_item("Krwisty Kamień", x, "")
say("Czy chcesz wejść do Groty Wygnańców?")
say("")
local s==select("Tak", "Anuluj")
if pc.count_item(x) >= 1 then
pc.remove_item(x, 1)
pc.warp(704100, 1280000)
end
else
say("")
say("Nie posiadasz Krwistego Kamienia!")
say("")
return
end
end
end

Co tutaj jest źle? Dałem wartość "x" zamiast ID, ponieważ nie chcę, żeby niektórzy na forum widzieli

Edit: 2x UP Gdybym wiedzial, że nie dziala, to bym questa nie dawał.

Ale naprawdę pc.change_alignment(x) działa poprawnie. Tzn dodaje nam wartość, ktora jest wpisana w nawiasie, i to nawet dokładnie, nie trzeba dopisywać zera, o tym nie wiedzialem

9 Stycznia 2012

Dobra, dzisiaj z innej beczki.
quest grota begin
state start begin
when 20093.chat."Grota" begin
say("")
say_title("Wejście do Groty")
say("A więc chciałbyś wejść do groty?")
say("Jeśli naprawdę o tym myślisz, musisz mi dać ")
say_item("Krwisty Kamień", x, "")
say("Czy chcesz wejść do Groty Wygnańców?")
say("")
local s==select("Tak", "Anuluj")
if pc.count_item(x) >= 1 then
pc.remove_item(x, 1)
pc.warp(704100, 1280000)
end
else
say("")
say("Nie posiadasz Krwistego Kamienia!")
say("")
return
end
end
end
Co tutaj jest źle? Dałem wartość "x" zamiast ID, ponieważ nie chcę, żeby niektórzy na forum widzieli

Edit: 2x UP Gdybym wiedzial, że nie dziala, to bym questa nie dawał.

Ale naprawdę pc.change_alignment(x) działa poprawnie. Tzn dodaje nam wartość, ktora jest wpisana w nawiasie, i to nawet dokładnie, nie trzeba dopisywać zera, o tym nie wiedzialem


quest grota begin
state start begin
       when 20093.chat."Grota" begin
       say("")
       say_title("Wejście do Groty")
       say("A więc chciałbyś wejść do groty?")
       say("Jeśli naprawdę o tym myślisz, musisz mi dać ")
       say_item("Krwisty Kamień", x, "")
       say("Czy chcesz wejść do Groty Wygnańców?")
       say("")
       local s==select("Tak", "Anuluj")
       if pc.count_item(x) >= 1 then
       pc.remove_item(x, 1)
       pc.warp(704100, 1280000)
else
       say("")
       say("Nie posiadasz Krwistego Kamienia!")
       say("")
end
end
end
end

:>

Gizdu · 9 Stycznia 2012

quest boss begin
state start begin
	when 2206.kill begin
		notice_all(pc.get_name().." zabił Ognistego Króla!")
	end
	when 2307.kill begin
		notice_all(pc.get_name().." zabił Wladce Duchów Drzew!")
	end
	when 1304.kill begin
		notice_all(pc.get_name().." zabił Zjawę Żółtego Tygrysa!")
	end
	when 691.kill begin
		notice_all(pc.get_name().." zabił Wodza Orków!")
	end
	when 1901.kill begin
		notice_all(pc.get_name().." zabił Dziewięć Ogonów!")
	end
	when 993.kill begin
		notice_all(pc.get_name().." zabił Olbrzymiego Nosiciela Plagi!")
	end
	when 1093.kill begin
		notice_all(pc.get_name().." zabił Umarłego Rozpruwacza!")
	end
	when 1191.kill begin
		notice_all(pc.get_name().." zabił Lodową Wiedźmę! ")
	end
	when 2291.kill begin
		notice_all(pc.get_name().." zabił Czerwonego Smoka!")
	end
end
end

Dlaczego nie wyświetla wszystkiego tylko losowe mooby ?? czyli np wyświetli wodza ale wiedźmy już nie

jeszcze jeden quest który wywala taki error:

quest change_empire begin
	state start begin
			when 20090.chat."Imperium"  with game.get_event_flag("c_e") >0  begin

					local count = pc.get_change_empire_count() ;
					if count >= 1 then
							say("Nie możesz zmienić Imperium")
							say("")
							return
					end
					say_reward("Imperium")
					say("")
					say("Wybierz jedno z królestw")
					say("Przywódca Gildii nie może zmienić królestwa")
					say("Najpierw usuń gildie.")
					say("Jeżeli jesteś zamężny lub zamężna musisz wziąść rozwód")
					say("Koszt rozwodu to 500.000 Yang.")
					say("")
					say("Napewno Chcesz Zmienić Imperium?")
					say("")

					local s = select("Zmień Imperium", "Nie Zmieniaj Imperium")

					if s == 1 then
							change_empire.move_pc()
					end
			end

			when 71054.use begin
					say("Zmiana Imperium powiodła się")
					say("Władcy Nowego Imperium Zapraszają")

					if get_time() < pc.getqf("next_use_time") then
							say("Nie możesz jeszcze zmienić Imperium.")
							say("")

					if pc.is_gm() then
									say("Czy chcesz może usunąć rame czasową?")
									say("Jeśli to uczynisz będziesz mógł ")
									say("zmienić Królestwo od razu.")
									say("")
									local s = select("Tak, chce zresetować.", "Rozmyśliłem się.")
									if s == 1 then
											say_reward("Zlecono reset czasu.")
											say_reward("Możesz już zmienić Królestwo.")
											pc.setqf("next_use_time", 0)
									end
							end


							return
					end

					if change_empire.move_pc() == true then
							pc.setqf("next_use_time", get_time() + 86400 * 7)
					end
			end



			function move_pc()
					if pc.is_engaged() then
							say("Jestes zamężny/ zamężna, ")
							say("Nie możesz zmienić królestwa.")
							say("")
							return false
					end

					if pc.is_married() then
							say("Jestes zamężny/ zamężna,")
							say("Nie możesz zmienić królestwa.")
							say("")
							return false
					end

					if pc.is_polymorphed() then
							say("Jestes przemieniony")
							say("Nie możesz zmienić królestwa.")
							say("")
							return false
					end

					if pc.has_guild() then
							say("Jestes w Gildii.")
							say("Nie możesz zmienić królestwa.")
							say("")
							return false
					end
					if pc.money < 500000 then
							say("Nie masz wystarczającej ilości Yang")
							say(" żeby dokonać przeniesienia potrzebujesz 500k Yang.")
							say("")
							return false
					end
					say("Dokonaj  wyboru:")
					local s = select("Shinsoo", "Chunjo", "Jinno", "Anuluj")						
					if 4==s then
							return false
					end
					say("")
					say_reward("Napewno chcesz zmienić Imperium?")
					say_reward("Po zmianie nie ma Odwrotu!")
					say("")
					local a = select("Zmień", "Nie Zmieniaj")
					if 2== a then
							return false
					end

					local ret = pc.change_empire(s)
					local oldempire = pc.get_empire()
					if ret == 999 then
							say("Pomyślnie zmieniłeś Imperium.")
							say("Proszę się wylogować i zalogować ponownie")
							say("")
							pc.change_gold(-500000)
							pc.remove_item(71054) ;

							char_log(0, "CHANGE_EMPIRE",string.format("%d -> %d", oldempire, s))

							return  true
					else
							if ret == 1 then
									say("Jestes w tym Imperium.")
									say("Wybierz Imperium powtórnie")
									say("")
									say("")
							elseif ret == 2 then
									say("Zmiana nie jest możliwa")
									say("Nie możesz zmienić Imperium, niedawno odeszłes z Gildii")
									say("")
									say("")
							elseif ret == 3 then
									say("Zmiana nie jest możliwa")
									say("Nie możesz zmienić Imperium, niedawno byłas/es mężatką/ żonaty.")
									say("")
							end
					end
					return false
			end

	end
end

newjaa · 9 Stycznia 2012


quest grota begin
state start begin
	when 20093.chat."Grota" begin
	say("")
	say_title("Wejście do Groty")
	say("A więc chciałbyś wejść do groty?")
	say("Jeśli naprawdę o tym myślisz, musisz mi dać ")
	say_item("Krwisty Kamień", x, "")
	say("Czy chcesz wejść do Groty Wygnańców?")
	say("")
	local s==select("Tak", "Anuluj")
	if pc.count_item(x) >= 1 then
	pc.remove_item(x, 1)
	pc.warp(704100, 1280000)
else
	say("")
	say("Nie posiadasz Krwistego Kamienia!")
	say("")
end
end
end
end

:>

Nadal nie trybi:>

Btw, gdzie posiałeś return?

9 Stycznia 2012


quest grota begin
state start begin
	when 20093.chat."Grota" begin
	say("")
	say_title("Wejście do Groty")
	say("A więc chciałbyś wejść do groty?")
	say("Jeśli naprawdę o tym myślisz, musisz mi dać ")
	say_item("Krwisty Kamień", x, "")
	say("Czy chcesz wejść do Groty Wygnańców?")
	say("")
	local s==select("Tak", "Anuluj")
if s == 2 then
return
elseif s == 1 then
	if pc.count_item(x) >= 1 then
	pc.remove_item(x, 1)
	pc.warp(704100, 1280000)
else
	say("")
	say("Nie posiadasz Krwistego Kamienia!")
	say("")
end
end
end
end
end

Jaki ja głupi!

Stelios · 9 Stycznia 2012

 quest boss begin state start begin when 2206.kill begin notice_all(pc.get_name().." zabił Ognistego Króla!") end when 2307.kill begin notice_all(pc.get_name().." zabił Wladce Duchów Drzew!") end when 1304.kill begin notice_all(pc.get_name().." zabił Zjawę Żółtego Tygrysa!") end when 691.kill begin notice_all(pc.get_name().." zabił Wodza Orków!") end when 1901.kill begin notice_all(pc.get_name().." zabił Dziewięć Ogonów!") end when 993.kill begin notice_all(pc.get_name().." zabił Olbrzymiego Nosiciela Plagi!") end when 1093.kill begin notice_all(pc.get_name().." zabił Umarłego Rozpruwacza!") end when 1191.kill begin notice_all(pc.get_name().." zabił Lodową Wiedźmę! ") end when 2291.kill begin notice_all(pc.get_name().." zabił Czerwonego Smoka!") end end end

Dlaczego nie wyświetla wszystkiego tylko losowe mooby ?? czyli np wyświetli wodza ale wiedźmy już nie jeszcze jeden quest który wywala taki error:

quest change_empire begin state start begin when 20090.chat."Imperium" with game.get_event_flag("c_e") >0 begin local count = pc.get_change_empire_count() ; if count >= 1 then say("Nie możesz zmienić Imperium") say("") return end say_reward("Imperium") say("") say("Wybierz jedno z królestw") say("Przywódca Gildii nie może zmienić królestwa") say("Najpierw usuń gildie.") say("Jeżeli jesteś zamężny lub zamężna musisz wziąść rozwód") say("Koszt rozwodu to 500.000 Yang.") say("") say("Napewno Chcesz Zmienić Imperium?") say("") local s = select("Zmień Imperium", "Nie Zmieniaj Imperium") if s == 1 then change_empire.move_pc() end end when 71054.use begin say("Zmiana Imperium powiodła się") say("Władcy Nowego Imperium Zapraszają") if get_time() < pc.getqf("next_use_time") then say("Nie możesz jeszcze zmienić Imperium.") say("") if pc.is_gm() then say("Czy chcesz może usunąć rame czasową?") say("Jeśli to uczynisz będziesz mógł ") say("zmienić Królestwo od razu.") say("") local s = select("Tak, chce zresetować.", "Rozmyśliłem się.") if s == 1 then say_reward("Zlecono reset czasu.") say_reward("Możesz już zmienić Królestwo.") pc.setqf("next_use_time", 0) end end return end if change_empire.move_pc() == true then pc.setqf("next_use_time", get_time() + 86400 * 7) end end function move_pc() if pc.is_engaged() then say("Jestes zamężny/ zamężna, ") say("Nie możesz zmienić królestwa.") say("") return false end if pc.is_married() then say("Jestes zamężny/ zamężna,") say("Nie możesz zmienić królestwa.") say("") return false end if pc.is_polymorphed() then say("Jestes przemieniony") say("Nie możesz zmienić królestwa.") say("") return false end if pc.has_guild() then say("Jestes w Gildii.") say("Nie możesz zmienić królestwa.") say("") return false end if pc.money < 500000 then say("Nie masz wystarczającej ilości Yang") say(" żeby dokonać przeniesienia potrzebujesz 500k Yang.") say("") return false end say("Dokonaj wyboru:") local s = select("Shinsoo", "Chunjo", "Jinno", "Anuluj") if 4==s then return false end say("") say_reward("Napewno chcesz zmienić Imperium?") say_reward("Po zmianie nie ma Odwrotu!") say("") local a = select("Zmień", "Nie Zmieniaj") if 2== a then return false end local ret = pc.change_empire(s) local oldempire = pc.get_empire() if ret == 999 then say("Pomyślnie zmieniłeś Imperium.") say("Proszę się wylogować i zalogować ponownie") say("") pc.change_gold(-500000) pc.remove_item(71054) ; char_log(0, "CHANGE_EMPIRE",string.format("%d -> %d", oldempire, s)) return true else if ret == 1 then say("Jestes w tym Imperium.") say("Wybierz Imperium powtórnie") say("") say("") elseif ret == 2 then say("Zmiana nie jest możliwa") say("Nie możesz zmienić Imperium, niedawno odeszłes z Gildii") say("") say("") elseif ret == 3 then say("Zmiana nie jest możliwa") say("Nie możesz zmienić Imperium, niedawno byłas/es mężatką/ żonaty.") say("") end end return false end end end

Drugi quest, polskie znaki przy "

np.

("Zmień" ...

@EDIT

@UP

return nie jest konieczny.

Jeśli opcja nie jest używana 'system' bierze ją jako anulowanie wcześniejszej akcji.

newjaa · 10 Stycznia 2012


quest grota begin
state start begin
	when 20093.chat."Grota" begin
	say("")
	say_title("Wejście do Groty")
	say("A więc chciałbyś wejść do groty?")
	say("Jeśli naprawdę o tym myślisz, musisz mi dać ")
	say_item("Krwisty Kamień", x, "")
	say("Czy chcesz wejść do Groty Wygnańców?")
	say("")
	local s==select("Tak", "Anuluj")
if s == 2 then
return
elseif s == 1 then
	if pc.count_item(x) >= 1 then
	pc.remove_item(x, 1)
	pc.warp(704100, 1280000)
else
	say("")
	say("Nie posiadasz Krwistego Kamienia!")
	say("")
end
end
end
end
end

Jaki ja głupi!

Nie działa ._. nosz ja *****

Ile nie poprawiam, ile ty nie poprawiasz, ciągle przechodzi qcnięcie ale nie działa. FUUUCK ;d

znalazłem winowajcę. Jest nim "say_item" ! Być może za stare pliki mam, sorry za problem :x

CJ221 · 10 Stycznia 2012

Witam byście mogli mi napisać takiego questa na 90lv... Zabij 20 metinów na 90lv a za nagrode by się dostało 200kk i stal +0 ... Najlepiej aby ta misja była u kapitana daje 20 +

Pokplas · 10 Stycznia 2012

Witam

Prosze o quest który daje lvl.

ID NPC : 20353

chodzi mi o to ze podchodzisz naciskasz i mowisz , Daj mi np 150 lv I odrazu masz 150 lv

Chce zeby quest byl od 1 lv do 150

Stelios · 10 Stycznia 2012

Nie działa nosz ja *****

Ile nie poprawiam, ile ty nie poprawiasz, ciągle przechodzi qcnięcie ale nie działa. FUUUCK ;d

Ehh.?

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

@EDIT

Witam byście mogli mi napisać takiego questa na 90lv... Zabij 20 metinów na 90lv a za nagrode by się dostało 200kk i stal +0 ... Najlepiej aby ta misja była u kapitana daje 20 +

quest metki begin
state start begin
	when login or levelup with pc.get_level() >= 90 begin
		setstate(jeden)
	end
end
state jeden begin
	when letter begin
		send_letter("Idz do "..mob_name(20355).." ")
			local v = find_npc_by_vnum(20355)
				if v != 0 then
					target.vid("__TARGET__", v, "20355")
				end
	end
	when button or info begin
		say("Idz do "..mob_name(20355)..". ")
		say("Ma dla ciebie misje. ")
		say("")
	end
	when __TARGET__.target.click begin
		say_title(mob_name(20355)..":")
		say("Witaj... ")
		say("Tu sobie wpisz tekst jakis ")
		say("nie mam weny... ")
		say("")
		say("")
		say("")
		say("")
		setstate(dwa)
	end
end
state dwa begin
	when letter begin
		send_letter("Metiny ")
	end
	when id_metka.kill begin
		local c = pc.setqf("metki")+1
			if c < 20 then
				pc.setqf("metki", c)
			else
				setstate(trzy)
			end
	end
	when button or info begin
		say("Zniszczyles juz "..pc.getqf("metki").." z 20 ")
		say("")
	end
end
state trzy begin
	when letter begin
		local c = find_npc_by_vnum(20355)
			if c != 0 then
				target.vid("__TARGET2__", c, "20355")
			end
		send_letter("Zniszczyles metki")
	end
	when button or info begin
		say("Zniszczyles 20 metkow ")
		say("Wroc do "..mob_name(20355).." !")
		say("")
	end
	when __TARGET2__.target.click begin
		target.delete("__TARGET2__")
		say_title(mob_name(20355)..":")
		say("Gratuluje! ")
		say("")
		say("Oto nagroda ")
		say("")
		pc.change_money( 200000000 )
		if pc.get_job() == 0 then
			pc.give_item2(id, 1)
		end
		if pc.get_job() == 1 then
			pc.give_item2(id, 1)
		end
		if pc.get_job() == 2 then
			pc.give_item2(id, 1)
		end
		if pc.get_job() == 3 then
			pc.give_item2(id, 1)
		end
		setstate(koniec)
	end
end
state koniec begin
end
end

uzupełnij teksty i id itemów.

CJ221 · 10 Stycznia 2012

Witam byście mogli mi napisać takiego questa na 90lv... Zabij 20 metinów na 90lv a za nagrode by się dostało 200kk i stal +0 ... Najlepiej aby ta misja była u kapitana daje 20 +

Najsss · 10 Stycznia 2012

Chciałbym aby stworzył mi ktoś questa typu "kilku handlarzy w jednym npc". Tym npc ma być ID 20094.A Otwierać ma takie sklepy jak:

-Sura (12*)

-Wojownik(13*)

-Ninja (14*)

-Szaman (15*)

-ItemShop (16*)

-Dodatki (17*)

-Fryzury (18*)

-Fajerwerki (19*)

I jeszcze jeden quest tego typu tylko że mają być tylko dwa sklepy:

-Ksiazki (20*)

-Ksiazki2 (21*)

*ID sklepu

CJ221 · 10 Stycznia 2012

Witam byście mogli mi napisać takiego questa na 90lv... Zabij 20 metinów na 90lv a za nagrode by się dostało 200kk i stal +0 ... Najlepiej aby ta misja była u kapitana daje 20 +

Stelios · 10 Stycznia 2012

Witam byście mogli mi napisać takiego questa na 90lv... Zabij 20 metinów na 90lv a za nagrode by się dostało 200kk i stal +0 ... Najlepiej aby ta misja była u kapitana daje 20 +

Witam byście mogli mi napisać takiego questa na 90lv... Zabij 20 metinów na 90lv a za nagrode by się dostało 200kk i stal +0 ... Najlepiej aby ta misja była u kapitana daje 20 +

Nie spamuj... Podałem ci quest.

Czytaj uważnie forum.....

CJ221 · 10 Stycznia 2012

Dziękuję i masz 20+

Ehh.?

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

@EDIT

quest metki begin
state start begin
	when login or levelup with pc.get_level() >= 90 begin
		setstate(jeden)
	end
end
state jeden begin
	when letter begin
		send_letter("Idz do "..mob_name(20355).." ")
			local v = find_npc_by_vnum(20355)
				if v != 0 then
					target.vid("__TARGET__", v, "20355")
				end
	end
	when button or info begin
		say("Idz do "..mob_name(20355)..". ")
		say("Ma dla ciebie misje. ")
		say("")
	end
	when __TARGET__.target.click begin
		say_title(mob_name(20355)..":")
		say("Witaj... ")
		say("Tu sobie wpisz tekst jakis ")
		say("nie mam weny... ")
		say("")
		say("")
		say("")
		say("")
		setstate(dwa)
	end
end
state dwa begin
	when letter begin
		send_letter("Metiny ")
	end
	when id_metka.kill begin
		local c = pc.setqf("metki")+1
			if c < 20 then
				pc.setqf("metki", c)
			else
				setstate(trzy)
			end
	end
	when button or info begin
		say("Zniszczyles juz "..pc.getqf("metki").." z 20 ")
		say("")
	end
end
state trzy begin
	when letter begin
		local c = find_npc_by_vnum(20355)
			if c != 0 then
				target.vid("__TARGET2__", c, "20355")
			end
		send_letter("Zniszczyles metki")
	end
	when button or info begin
		say("Zniszczyles 20 metkow ")
		say("Wroc do "..mob_name(20355).." !")
		say("")
	end
	when __TARGET2__.target.click begin
		target.delete("__TARGET2__")
		say_title(mob_name(20355)..":")
		say("Gratuluje! ")
		say("")
		say("Oto nagroda ")
		say("")
		pc.change_money( 200000000 )
		if pc.get_job() == 0 then
			pc.give_item2(id, 1)
		end
		if pc.get_job() == 1 then
			pc.give_item2(id, 1)
		end
		if pc.get_job() == 2 then
			pc.give_item2(id, 1)
		end
		if pc.get_job() == 3 then
			pc.give_item2(id, 1)
		end
		setstate(koniec)
	end
end
state koniec begin
end
end

uzupełnij teksty i id itemów.

A byś mógł dać mi na hostingu? Bo ja nie ogarek

Warlok20 · 10 Stycznia 2012

To mój pierwszy quest(proszę się nie śmiać):

quest warrior begin
state start begin
 when login or levelup with pc.get_level >= 40
  set_state(info)
   end
 end
state info begin
when letter begin
 local v = find_npc_by_vnum(20011)
  if v != 0 then
   targer.vid("__TARGET__", v, "Uriel")
 end
  send_letter("Uriel Cię Wzywa")
when button or info begin
say_title("Zdobądź Sławę!!!")
say("Witaj!")
say("Przykro jest mi to mówić, lecz ciągle nękają mnie sny")
say("a mianowicie, co noc widzę obrazy innych potworów,")
say("które atakują nasze miasto.")
say("Słyszałem, że jesteś dzielnym wojownikiem i nie")
say("poddasz się bez walki")
say_reward("A oto twoje pierwsze zadania.")
say("Idź do doliny i zdobądź błogosławieństwo aniołów")
state potwor begin
when letter begin
 send_letter("Zabij czarne orki")
  end
when button or info begin
 say("Zdobądź błogosławieństwo aniołów od czarnych orków")
  end
when 636.kill with pc.countitem(70021)==0 begin
 local random = math.random(10)
  if random == 1 then
   pc.give_item2(70021, 1)
 say("Gratulacje!!!")
 say("Biegnij do uriela aby przekazać mu przedmiot")
  local v = find_npc_by_vnum(20011)
   if v != 0 then
    targer.vid("__TARGET__", v, "Uriel")
	 end
	  end
	   end
when 20011.chat."Test!" with pc.countitem(70021)>0 begin
 target.delete("__TARGET__")
  say_title("Misja wykonana")
  say("Dziękuję Ci, że zechciałeś mi pomóc")
  say("A teraz trzymaj tutaj nagrodę")
  say_reward("Otrzymana nagroda")
  say("20kk yang")
   pc.remove_item(70021, 1)
 pc.give_item2(112580)
  set_state(__COMPLETE__)
   end
    end
	 state __COMPLETE__ begin
	  end
	   end

Stelios · 10 Stycznia 2012

Dziękuję i masz 20+

A byś mógł dać mi na hostingu? Bo ja nie ogarek

Kopiujesz zawartość spoilera od quest do end, zapisujesz w pliku z rozszerzeniem .quest i masz plik gotowy do wgrania na serwer.

@btw, coraz więcej żółtodziobów się tym zajmuje..

Zero pojęcia, brak myślenia, a co gorsza brak pliku mózg.exe

@EDIT

@UP / DOWN

Nie miałem na myśli ciebie.

Tylko osoby które nie potrafią nawet zapisać prostego pliku na komputerze.

Warlok20 · 10 Stycznia 2012

Kopiujesz zawartość spoilera od quest do end, zapisujesz w pliku z rozszerzeniem .quest i masz plik gotowy do wgrania na serwer.

@btw, coraz więcej żółtodziobów się tym zajmuje..

Zero pojęcia, brak myślenia, a co gorsza brak pliku mózg.exe

Jak nie spróbujesz to nie będziesz wiedział

Cały quest do bani?

Edit:

Jakby ktoś mógł podać link do tutka... jak pisać questy...

4h4 · 11 Stycznia 2012

Proszę o edytowanie questa żeby posiadał :

- Przycisk "Anuluj".

-Żeby te bony można było brać tylko raz.

quest czwarty begin
   state start begin
       when 20016.chat."Dawaj bonusa, bo nie ma POMPY!" with pc.is_gm() begin
       say("Wybierz bonus, który zostanie Ci przypisany na stałe!")
       local i = select("Wartość Ataku +300 ", "HP +2500 ", "Silny przeciwko ludziom +10% ")
       if i == 1 then
       affect.add_collect(apply.ATT_GRADE_BONUS,300,60*60*24*365*60)
       say("Otrzymano bonus Wartość Ataku +300 na zawsze!")
       end
       if i == 2 then
       affect.add_collect(apply.MAX_HP,2500,60*60*24*365*60)
       say("Otrzymano bonus HP +2500 na zawsze!")
       end
       if i == 3 then
       affect.add_collect(apply.ATTBONUS_HUMAN,10,60*60*24*365*60)
       say("Otrzymano bonus Silny przeciwko ludziom +10% na zawsze!")
       end
       end
   end
end

Stelios · 11 Stycznia 2012

Proszę o edytowanie questa żeby posiadał :

- Przycisk "Anuluj".

-Żeby te bony można było brać tylko raz.

quest czwarty begin
state start begin
	when 20016.chat."Dawaj bonusa, bo nie ma POMPY!" with pc.is_gm() begin
	say("Wybierz bonus, który zostanie Ci przypisany na stałe!")
	local i = select("Wartość Ataku +300 ", "HP +2500 ", "Silny przeciwko ludziom +10% ")
	if i == 1 then
	affect.add_collect(apply.ATT_GRADE_BONUS,300,60*60*24*365*60)
	say("Otrzymano bonus Wartość Ataku +300 na zawsze!")
	end
	if i == 2 then
	affect.add_collect(apply.MAX_HP,2500,60*60*24*365*60)
	say("Otrzymano bonus HP +2500 na zawsze!")
	end
	if i == 3 then
	affect.add_collect(apply.ATTBONUS_HUMAN,10,60*60*24*365*60)
	say("Otrzymano bonus Silny przeciwko ludziom +10% na zawsze!")
	end
	end
end
end

quest czwarty begin
state start begin
	when 20016.chat."Dawaj bonusa, bo nie ma POMPY!" with pc.is_gm() begin
		say("Wybierz bonus, który zostanie Ci przypisany na stałe!")
		local i = select("Wartość Ataku +300 ", "HP +2500 ", "Silny przeciwko ludziom +10% ", "Anuluj")
			if i == 4 then
				return
			end
			if i == 1 then
				if pc.getqf("ta1") == 0 then
					pc.setqf("ta1", 1)
					affect.add_collect(apply.ATT_GRADE_BONUS,300,60*60*24*365*60)
					say("Otrzymano bonus Wartość Ataku +300 na zawsze!")
				else
					say("Dostałeś bonus. ")
				end
			end
			if i == 2 then
				if pc.getqf("ta2") == 0 then
					pc.setqf("ta2", 1)
					affect.add_collect(apply.MAX_HP,2500,60*60*24*365*60)
					say("Otrzymano bonus HP +2500 na zawsze!")
				else
					say("Dostałeś bonus. ")
				end
			end
			if i == 3 then
				if pc.getqf("ta3") == 0 then
					pc.setqf("ta3", 1)
					affect.add_collect(apply.ATTBONUS_HUMAN,10,60*60*24*365*60)
					say("Otrzymano bonus Silny przeciwko ludziom +10% na zawsze!")
				else
					say("Dostałeś bonus. ")
				end
			end
	end
end
end

@EDIT

To mój pierwszy quest(proszę się nie śmiać ):

quest warrior begin
state start begin
 when login or levelup with pc.get_level >= 40
  set_state(info)
end
 end
state info begin
when letter begin
 local v = find_npc_by_vnum(20011)
  if v != 0 then
targer.vid("__TARGET__", v, "Uriel")
 end
  send_letter("Uriel Cię Wzywa")
when button or info begin
say_title("Zdobądź Sławę!!!")
say("Witaj!")
say("Przykro jest mi to mówić, lecz ciągle nękają mnie sny")
say("a mianowicie, co noc widzę obrazy innych potworów,")
say("które atakują nasze miasto.")
say("Słyszałem, że jesteś dzielnym wojownikiem i nie")
say("poddasz się bez walki")
say_reward("A oto twoje pierwsze zadania.")
say("Idź do doliny i zdobądź błogosławieństwo aniołów")
state potwor begin
when letter begin
 send_letter("Zabij czarne orki")
  end
when button or info begin
 say("Zdobądź błogosławieństwo aniołów od czarnych orków")
  end
when 636.kill with pc.countitem(70021)==0 begin
 local random = math.random(10)
  if random == 1 then
pc.give_item2(70021, 1)
 say("Gratulacje!!!")
 say("Biegnij do uriela aby przekazać mu przedmiot")
  local v = find_npc_by_vnum(20011)
   if v != 0 then
	targer.vid("__TARGET__", v, "Uriel")
	 end
	  end
	   end
when 20011.chat."Test!" with pc.countitem(70021)>0 begin
 target.delete("__TARGET__")
  say_title("Misja wykonana")
  say("Dziękuję Ci, że zechciałeś mi pomóc")
  say("A teraz trzymaj tutaj nagrodę")
  say_reward("Otrzymana nagroda")
  say("20kk yang")
pc.remove_item(70021, 1)
 pc.give_item2(112580)
  set_state(__COMPLETE__)
   end
	end
	 state __COMPLETE__ begin
	  end
	   end

quest warrior begin
state start begin
	when login or levelup with pc.get_level() >= 40 begin
		set_state(info)
	end
end
state info begin
	when letter begin
		local v = find_npc_by_vnum(20011)
			if v != 0 then
				targer.vid("__TARGET__", v, "Uriel")
			end
		send_letter("Uriel Cię Wzywa")
	end
	when button or info begin
		say_title("Zdobądź Sławę!!!")
		say("Witaj!")
		say("Przykro jest mi to mówić, lecz ciągle nękają mnie sny")
		say("a mianowicie, co noc widzę obrazy innych potworów,")
		say("które atakują nasze miasto.")
		say("Słyszałem, że jesteś dzielnym wojownikiem i nie")
		say("poddasz się bez walki")
		say_reward("A oto twoje pierwsze zadania.")
		say("Idź do doliny i zdobądź błogosławieństwo aniołów")
		setstate(potwor)
	end
end
state potwor begin
	when letter begin
		send_letter("Zabij czarne orki")
	end
	when button or info begin
		say("Zdobądź błogosławieństwo aniołów od czarnych orków")
	end
	when 636.kill with pc.countitem(70021)==0 begin
		local random = math.random(10)
			if random == 1 then
				pc.give_item2(70021, 1)
				say("Gratulacje!!!")
				say("Biegnij do uriela aby przekazać mu przedmiot")
				local v = find_npc_by_vnum(20011)
					if v != 0 then
						targer.vid("__TARGET__", v, "Uriel")
					end
			end
	end
	when 20011.chat."Test!" with pc.countitem(70021)>0 begin
		target.delete("__TARGET__")
		say_title("Misja wykonana")
		say("Dziękuję Ci, że zechciałeś mi pomóc")
		say("A teraz trzymaj tutaj nagrodę ")
		say_reward("Otrzymana nagroda")
		say("20kk yang")
		pc.remove_item(70021, 1)
		pc.give_item2(112580)
		set_state(__COMPLETE__)
	end
end
state __COMPLETE__ begin
end
end

Diablo2 · 11 Stycznia 2012

Witam.Zrobiłem swojego pierwszego questa w życiu i nie wiem czy wgl coś rozumiem.Prosze was o poprawke i oceny

quest tygrysy begin
 state start begin
		 when login or levelup witch  pc.get_level >=20 begin
				   set_state(info)
			  end
end
		   when letter begin
									local v = find _npc_by_vnum(20011)
									if v != 0 then
														target.vid("__TARGET__",v,"Uriel")
									   end
									  send_latter("Poszukaj Uriel")
						end
						when button or info
	end
	when 20.kill with pc.countientem(114)
		local random = math.random(1)
		local v= find_npc_by_vnum(20011)
					   say(Znajdź Uriel)
								   say("Musisz znaleść Uriel,")
						say("on ma dla Ciebie pewną wiadomość!")
						say("nie każ mu długo na siebie czekać.")
						say(" ")
												  say_title("Informacja")
												  say_reward("Uriel znajduje się w Pierwszej Wiosce")
					   end
					   when 20011.chat."Znalazłem Cię!"begin
					  target.delete("__TARGET__")
											say_title("Uriel:')
											say("No Świetnie!")
											say( "Ciesze się że trafiłeś do mnie...")
											say("Tak więc jestem Uriel i chyba wiesz czym się zajmuje.")
											say("Jak będziesz chciał żebym ci w czymś pomógł")				
											say("poprostu przyjdź do mnie i mi to powiedz,")
											say_title("Mam do Ciebie jednak jedną prośbe")
											say("Od pewnego czasu denerwują mnie pewne zwierzęta")
											say("pewna istota która jest bardzo niebezpieczna...")
											say("są to tygrysy")
											say("Wiem że możesz nie mieć na to czasu...")
								say("ale widać że jesteś jedyną osobą ...")
								say("która może mi pomóc")
								say("Bardzo Cię o to prosze")
								say(Jeśli wykonasz swoje zadanie...")
											say("Zostaniesz wynagrodzony")
											say_title("Uriel")
					 say("Teraz otrzymasz odemnie małą pomoc")
					say_reward("Otrzymano 2.000.000 Yang")
						  say_reward("Otrzymano 500.000 PD")
				pc.change_money(2000000)
				pc.give_exp2(500000)
							set_state(__COMPLETE__)
						end
			end

ZAPOMNIALEM DODAC ZE CHODZI O QUESTA OD URIEL ZEBY ZABIC TYGRYSY

Stelios · 11 Stycznia 2012

Witam.Zrobiłem swojego pierwszego questa w życiu i nie wiem czy wgl coś rozumiem.Prosze was o poprawke i oceny

quest tygrysy begin
 state start begin
		 when login or levelup witch  pc.get_level >=20 begin
				   set_state(info)
			  end
end
		   when letter begin
									local v = find _npc_by_vnum(20011)
									if v != 0 then
														target.vid("__TARGET__",v,"Uriel")
									   end
									  send_latter("Poszukaj Uriel")
						end
						when button or info
	end
	when 20.kill with pc.countientem(114)
		local random = math.random(1)
		local v= find_npc_by_vnum(20011)

					   say(Znajdź Uriel)
								   say("Musisz znaleść Uriel,")
						say("on ma dla Ciebie pewną wiadomość!")
						say("nie każ mu długo na siebie czekać.")
						say(" ")
												  say_title("Informacja")
												  say_reward("Uriel znajduje się w Pierwszej Wiosce")
					   end
					   when 20011.chat."Znalazłem Cię!"begin
					  target.delete("__TARGET__")
											say_title("Uriel:')
											say("No Świetnie!")
											say( "Ciesze się że trafiłeś do mnie...")
											say("Tak więc jestem Uriel i chyba wiesz czym się zajmuje.")
											say("Jak będziesz chciał żebym ci w czymś pomógł")				  
											say("poprostu przyjdź do mnie i mi to powiedz,")
											say_title("Mam do Ciebie jednak jedną prośbe")
											say("Od pewnego czasu denerwują mnie pewne zwierzęta")
											say("pewna istota która jest bardzo niebezpieczna...")
											say("są to tygrysy")
											say("Wiem że możesz nie mieć na to czasu...")
	   						 say("ale widać że jesteś jedyną osobą ...")
	   						 say("która może mi pomóc")
	   						 say("Bardzo Cię o to prosze")
	   						 say(Jeśli wykonasz swoje zadanie...")
											say("Zostaniesz wynagrodzony")
											say_title("Uriel")
					 say("Teraz otrzymasz odemnie małą pomoc")
					say_reward("Otrzymano 2.000.000 Yang")
		   			   say_reward("Otrzymano 500.000 PD")
				pc.change_money(2000000)
				pc.give_exp2(500000)
			   			 set_state(__COMPLETE__)
				   	 end
			end

Nie wiem jak zrobić tak żeby to nie było w jednej linii tylko oddalone troche niektóre teksty :/

Daj go do spoilera i w code.

Lepiej napisz na czym ma polegać quest,

w ogóle nie rozumiem tego co napisałeś w queście...

SooP · 11 Stycznia 2012

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

state info begin
when letter begin
local v = find_npc_by_vnum(20355)
if v != 0 then
target.vid("__TARGET__", v, "Kapitan")
end
send_letter("Dalsze przygody")
end

when button or info begin
say_title("Udało Ci się wbić drugi poziom!")
say("Musisz udać się do Kapitana, ma on dla ciebie nowe zadanie!")
say("")
say("Musisz się pośpieszyć")
end

when __TARGET__.target.click or
20355.chat."[Q]Poziom drugi" begin
target.delete("__TARGET__")
say("Kapitan:")
say("Ooo... Widzę że udało wbić Ci się poziom.")
say("Dobrze, ale to jeszcze nie koniec przygód... Czeka cie wiele zadań.")
say("Musisz udać się do kowala, potrzebuję dowiedzieć się od niego kiedy dostarczy moją nową zbroję!")
set_state(kowal)

state kowal begin
when letter begin
send_letter("Wiadomość dla kowala")
end
when button or info begin
say_title("Wiadomość dla kowala.")
say("Kapitan chce, abyś przekazał wiadomość dla kowala!")
say("Idź, i dowiedz się kiedy zostanie dostarczona zbroja dla kapitana.")
end


when __TARGET__.target.click or
20016.chat."Wiadomość dla kowala" begin
target.delete("__TARGET__")

say("- Kim jesteś przybyszu?!")
say("- Przysłał mnie kapitan, mam dowiedzieć się kiedy dostarczysz mu zbroję...")
say("- Ah tak... Czegoż ten znow nieszczęśnik chce!")
say(" Ciągle zbroje i zbroje, co on z nimi robi...")
say(" Cóż, przekaż mu że prędko się nie zjawią...")
say(" Aktualnie wykuwam żelazny pas dziewicy dla handlarki.")
say("...")
say("- Dobrze, przekażę tę istotną informację kapitanowi.")
set_state(cos)

when button or info begin
say_title("Zbroja")
say("Dowiedziałeś się, że kowal nie ma czasu wykuć zbroi dla kowala")
say("ponieważ zajmuje się handlarką...")
say("Udaj się do kapitana!")
end
when __TARGET__.target.click or
20016.chat."Zbroja" begin
target.delete("__TARGET__")

say("- Niestety, kowal nie dostarczy zyt prędko zbroi, jest zajęty handlarką...")
say("- Co takiego?! Handlarką? Tą ladacznicą! Nie, to przerasta wszystko!")
say(" Niech no ja go tylko dopadne!")
say("- Co mógłbym dla Ciebie zrobić?")
say("- Już wystarczająco mi pomogłeś! To wszystko mnie przerasta!")
say(" Muszę odpocząć, przez tą całą sytuację!")
say("(uff)")
say("- Wbij następny poziom!")

set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end

Coś nie styka ;D

Tylko co ?

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Gość polskiedziecko

Gość polskiedziecko

Gość polskiedziecko

Gość polskiedziecko

Gość polskiedziecko

Gość polskiedziecko

Zarchiwizowany