Pisanie / Poprawa Questów !

kopson44 · 25 Grudnia 2011

hmm jakby to napisać

w questach na końcu musisz dać takie coś

set_quest_state("nazwa_questa","run")

dajmy na to że końcowka questa będzie wyglądać tak

pc.change_money(100000000)
				pc.give_exp2(70000000)
				clear_letter()
				set_quest_state("nazwa_questa","run")
				set_state(__COMPLETE__)
			end
	end
end

state __COMPLETE__ begin
end
end

potem następny quest który ma być po tym musisz rozpocząć przez dodanie state run, mniejwiecej to wygląda tak

quest nazwa_questa begin
state start begin
end
	state run begin
when login  with pc.level >= 89 begin
		set_state(information)
	end

end

farmerro · 25 Grudnia 2011

W którym miejscu mam wkleić drugą część ???

Tak właściwie to pierwsza część jest już wpisana w queście

CZĘŚĆ 1

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

CZĘŚĆ 2

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

Ps. Nieaktualne... Wystarczyło zmienić z __complete na __COMPLETE__

LamS · 26 Grudnia 2011

Mam Questa

quest wie begin
state start begin
	when 6767 .use begin
		say_title("Witaj ".. pc.get_name() ..".")
		say("Chciałbyś Wierzchowca?")
		local s = select("Dzik","Lew","Tygrys","Wilk","NIESPODZIANKA","EXIT")
	if s == 1 then
		say_reward("Uwaga to Dzik")
		pc.mount(20110)
		end
	if s == 2 then
		say_reward("Uwaga to Lew")
		pc.mount(20113)
		end
	if s == 3 then
		say_reward("Uwaga to Tygrys")
		pc.mount(20111)
		end
	if s == 4 then
		say_reward("Uwaga to Wilk")
		pc.mount(20112)
		end
   if s == 5 then
		say_reward("Niespodzianka !")
		pc.mount(20114)
		end
	end
end
end

Proszę o jego Przeróbkę Tak aby Po kliknięciu

Wilka/Lwa/Tygrysa/Dzika/Niespodzianki Ten zwój bo to jest zwój o id 6767

założył się jak buty wiatru [zwój trwa 480H] jak zejdziemy czas się nie liczy

na każdym wierzchowcu czas się liczy

Tylko zamiast klikania prawym to trzeba sobie wybrać Obdaruje 15x Lubię TO !

A 2 Quest jaki proszę to ten z bonusami już wam zaczą sunshi któremu bardzo dziękuje i dałem mu 7/8 Lubię TO

o co chodzi w tym quescie co ma w nim być daje tu w spoilerku

Proszę o Questa Będzie on na bogato bo Dużo Pisania

Nazwa - Bonus/Bonusy ID Npc - 1234

Nazwy bonusów pochodzą z tematu xdestructx

affect.add_collect(apply.STR, xxx, 60*60*24*365*60) --- sila
affect.add_collect(apply.INT, xxx, 60*60*24*365*60) --- inteligencja
affect.add_collect(apply.CON, xxx, 60*60*24*365*60) --- energia zyciowa
affect.add_collect(apply.DEX, xxx, 60*60*24*365*60) --- zrecznosc
affect.add_collect(apply.ATT_SPEED, xxx, 60*60*24*365*60) --- szybkosc ataku
affect.add_collect(apply.MOV_SPEED, xxx, 60*60*24*365*60) --- szybkosc poruszania sie
affect.add_collect(apply.CAST_SPEED, xxx, 60*60*24*365*60) --- szybkosc magi
affect.add_collect(apply.HP_REGEN, xxx, 60*60*24*365*60) --- regeneracja pz
affect.add_collect(apply.SP_REGEN, xxx, 60*60*24*365*60) --- regeneracja pe
affect.add_collect(apply.POISON_PCT, xxx, 60*60*24*365*60) --- otrucie
affect.add_collect(apply.STUN_PCT, xxx, 60*60*24*365*60) --- omdlenie
affect.add_collect(apply.SLOW_PCT, xxx, 60*60*24*365*60) --- spowolnienie
affect.add_collect(apply.CRITICAL_PCT, xxx, 60*60*24*365*60) --- krytyk
affect.add_collect(apply.PENETRATE_PCT, xxx, 60*60*24*365*60) --- przeszywka
affect.add_collect(apply.ATTBONUS_HUMAN, xxx, 60*60*24*365*60) --- na ludzi
affect.add_collect(apply.BLOCK, xxx, 60*60*24*365*60) --- blok ciosow
affect.add_collect(apply.IMMUNE_STUN, xxx, 60*60*24*365*60) --- nno
affect.add_collect(apply.IMMUNE_SLOW, xxx, 60*60*24*365*60) --- nns



MAX_HP --- pukty zycia
MAX_SP --- pukty energi
CON --- energia zyciowa
INT --- inteligencja
STR --- sila
DEX --- zrecznosc
ATT_SPEED --- szybkosc ataku
MOV_SPEED --- szybkosc poruszania sie
CAST_SPEED --- szybkosc magi
HP_REGEN --- regeneracja puktow zycia
SP_REGEN --- regeneracja puktow energi
POISON_PCT --- szansa na otrucie
STUN_PCT --- szansa na omdlenie
SLOW_PCT --- szansa na spowolnienie
CRITICAL_PCT --- szansa na krytyczne uderzenie
PENETRATE_PCT --- szansa na przyszywajace uderzenie
ATTBONUS_HUMAN --- silny przeciwko ludzia
ATTBONUS_ANIMAL --- silny przeciwko zwierzeta
ATTBONUS_ORC ---  silny przeciwko orka
ATTBONUS_MILGYO --- silny przeciwko mistyka
ATTBONUS_UNDEAD --- silny przeciwko nieumarlym
ATTBONUS_DEVIL --- silny przeciwko diabla
STEAL_HP --- szansa na kradziez putkow zycia
STEAL_SP --- szansa na kradziez putkow energi
MANA_BURN_PCT --- nie mam pojecia
DAMAGE_SP_RECOVER --- nie wiem
BLOCK --- szansa na blok ciosow
DODGE --- szansa na unikniecie ciosu
RESIST_SWORD --- odpornosc na miecze
RESIST_TWOHAND --- odpornosc na miecze dwureczne
RESIST_DAGGER --- odpornosc na sztylety
RESIST_BELL --- odpornosc na dzwony
RESIST_FAN --- odpornosc na wachlarze
RESIST_BOW --- odpornosc na luki
RESIST_FIRE --- odpornosc na ogien
RESIST_ELEC --- odpornosc na blyskawice
RESIST_MAGIC --- odpornosc na magie
RESIST_WIND --- odpornosc na wiatr
REFLECT_MELEE --- szansa na odbiecie ???
REFLECT_CURSE --- szansa na odbiecie klatwy ( ??? )
POISON_REDUCE --- odpornosc na otrucie
KILL_SP_RECOVER  --- obrazenia absorbowane przez pukty energi
EXP_DOUBLE_BONUS ---  szansa na podwojna ilosc doswiadczenia
GOLD_DOUBLE_BONUS --- szansa na podwojna ilosc yang  
ITEM_DROP_BONUS --- szansa na bonus doswiadczenia
POTION_BONUS --- mikstury iles % efekt podniesiony
KILL_HP_RECOVER --- obrazenia absorbowane przez pukty zycia
IMMUNE_STUN --- nie wrazliwy na omdlenie
IMMUNE_SLOW --- nie wrazliwy na spowolnienie
IMMUNE_FALL --- nie wrazliwe na upadek
BOW_DISTANCE --- dlugosc zasiegu zluku ( chyba )
ATT_GRADE_BONUS --- wartosc ataku
DEF_GRADE_BONUS --- obrona
MAGIC_ATT_GRADE --- wartosc magicznego ataku
MAGIC_DEF_GRADE --- obrona magicza
CURSE_PCT --- szansa na klatwe ( ??? )
MAX_STAMINA --- pukty wytrzymalosci
ATT_BONUS_TO_WARRIOR --- silny przeciwko wojownika
ATT_BONUS_TO_ASSASSIN --- silny przeciwko ninja
ATT_BONUS_TO_SURA --- silny przeciwko sura
ATT_BONUS_TO_SHAMAN --- silny przeciwko szmananem
ATT_BONUS_TO_MONSTER --- silny przeciwko potwora
RESIST_WARRIOR --- odpornosc na wojownika
RESIST_ASSASSIN --- odpornosc na ninje
RESIST_SURA --- odpornosc na sure
RESIST_SHAMAN --- odpornosc na szamna

Quest zaczyna się od kliknięcia na NPC [id 1234]

Bonusy -----> (i teraz dzieli się na dwa) Bonusy PVP

-----> Bonusy EXP

Bonusy PVP ---> (Znów się dzieli ) Szaman

--> Wojownik

--> Sura

---> Ninja

I Tak Wojownik rozdziela się na 3

Wojownik ----> (Znowu rodziałka) Silny 25% za 25 nieb.znaków

---> Silny 50% za 50 nieb.znaków

----> Silny 75% za 75 nieb.znaków (Na wojowniki Oczywiśćie)

Tak samo z surą szamanem i ninją

Bonusy EXP ----> ( Rozdziałka ) -----> Główne --->Siła

Inteligęcja

Witalność

Zwinność

-----> Poboczne Atak

Obrona

Potwory

Siła/int./witalność/zwin/ Dzieli się na :

(Przykład Siła)

Siła ----> Siła (100) - 100 KK

Siła (150) - 150 KK

Siła (250) - 250 KK

Teraz weśmy atak/obrona/silny na potwory :

(Teraz tu opisze wszystkie bo każdy będzie inaczej )

Atak -----> Atak (3.000) [3K] Ataku więcej - 150KK

Atak (5.000) [5K] - 250 KK

Atak (10.000) [10K] - 500KK

Obrona ->Obr. (500) - 50KK

Obr. (1.000) [1K] - 100KK

Obr. (2.500) [2.5K] - 250KK

Silny na Potwory (%) ------> Potwory (250%) - 250KK

Potwory (500%) - 500KK

Potwory (1000%) - 1KKK

napisane niezrozumiale pisać !!! potrzebuje tego questa moge dodać (amatorską wersje graficzną xDD Paint )

P.S. Zapomniałem napisać

ID NPC 1234 Quest (nazwa) Bonus lub Bonusy ID Nieb. Znaków 123455

zapomniał bym wybrany bonus trwa 1 H !!!!!

bonusów można uzywać do woli ;p

Quest (taki zarys by sunshi) trzeba dopisać bonusy expa (głowne i poboczne) Dam LubIE TO

quest bonusy_by_sunushi begin
state start begin
 when 1234.chat."Bonus/Bonusy" begin
  say_title(mob_name(1234)..":")
  say("Wybierz rodzaj bonusu:")
  local a = select("Bonusy PVP","Bonusy EXP")
  if a == 1 then
	say_title(mob_name(1234)..":")
	local b = select("Wojownik", "Ninja", "Sura", "Szaman", "Anuluj")
	if b == 5 then
	 return
	end
	local job
	if b == 1 then
	 job = "Wojownik"
	elseif b == 2 then
	 job = "Ninja"
	elseif b == 3 then
	 job = "Sura"
	elseif b == 4 then
	 job = "Szaman"
	end
	say_title(mob_name(1234)..":")
	say("Wybierz jak mocny ma być bonus:")
	say("25% Silny przeciwko - 25 Nieb. Znaków,")
	say("50% Silny przeciwko - 50 Nieb. Znaków,")
	say("75% Silny przeciwko - 75 Nieb. Znaków.")
	local c = select("25%", "50%", "75%", "Anuluj")
	if c == 1 then
	 say_title(mob_name(1234)..":")
	 say("Wybrałeś następujący bonus:")
	 say("25% Silny przeciwko "..job.." na 1h.")
	 if pc.countitem(123455) < 25 then
	  say_notice("Nie masz wystarczającej ilości Nieb. Znaków.")
	  return
	 end
	 say("Czy na pewno chcesz ten bon?")
	 local sel = select("Tak", "Nie")
	 if sel == 2 then
	  return
	 end
	 say_title(mob_name(1234)..":")
	 say("Otrzymałeś następujący bonus:")
	 say("25% Silny przeciwko "..job.." na 1h.")
	 if b == 1 then
	  affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 25, 60*60)
	 elseif b == 2 then
	  affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 25, 60*60)
	 elseif b == 3 then
	  affect.add_collect(apply.ATT_BONUS_TO_SURA, 25, 60*60)
	 elseif b == 4 then
	  affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 25, 60*60)
	 end
	 pc.remove_item(123455, 25)
	 say("")
	elseif c == 2 then
	 say_title(mob_name(1234)..":")
	 say("Wybrałeś następujący bonus:")
	 say("50% Silny przeciwko "..job.." na 1h.")
	 if pc.countitem(123455) < 50 then
	  say_notice("Nie masz wystarczającej ilości Nieb. Znaków.")
	  return
	 end
	 say("Czy na pewno chcesz ten bon?")
	 local sel = select("Tak","Nie")
	 if sel == 2 then
	  return
	 end
	 say_title(mob_name(1234)..":")
	 say("Otrzymałeś następujący bonus:")
	 say("50% Silny przeciwko "..job.." na 1h.")
	 if b == 1 then
	  affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 50, 60*60)
	 elseif b == 2 then
	  affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 50, 60*60)
	 elseif b == 3 then
	  affect.add_collect(apply.ATT_BONUS_TO_SURA, 50, 60*60)
	 elseif b == 4 then
	  affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 50, 60*60)
	 end
	 say("")
	 pc.remove_item(123455, 50)
	elseif c == 3 then
	 say_title(mob_name(1234)..":")
	 say("Wybrałeś następujący bonus:")
	 say("75% Silny przeciwko "..job.." na 1h.")
	 if pc.countitem(123455) < 75 then
	  say_notice("Nie masz wystarczającej ilości Nieb. Znaków.")
	  return
	 end
	 say("Czy na pewno chcesz ten bon?")
	 local sel = select("Tak","Nie")
	 if sel == 2 then
	  return
	 end
	 say_title(mob_name(1234)..":")
	 say("Otrzymałeś następujący bonus:")
	 say("75% Silny przeciwko "..job.." na 1h.")
	 if b == 1 then
	  affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 75, 60*60)
	 elseif b == 2 then
	  affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 75, 60*60)
	 elseif b == 3 then
	  affect.add_collect(apply.ATT_BONUS_TO_SURA, 75, 60*60)
	 elseif b == 4 then
	  affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 75, 60*60)
	 end
	 say("")
	 pc.remove_item(123455, 75)
	else
	 return
	end
  elseif a == 2 then
	say_title(mob_name(1234)..":")
	local d = select("Główne", "Poboczne", "Anuluj")
	if d == 3 then
	 return
	elseif d == 1 then
	 say_title(mob_name(1234)..":")
	 local e = select("Witalność ", "Inteligencja", "Siła", "Zręczność ", "Anuluj")
	 if e == 5 then
	  return
	 elseif e == 1 then
	  say_title(mob_name(1234)..":")
	  say("Wybierz jak mocny ma być bonus:")
	  say("+100 witalność - 100kk,")
	  say("+150 witalność - 150kk,")
	  say("+250 witalność - 250kk.")
	  local f = select("+100", "+150", "+250", "Anuluj")
	  if f == 4 then
	   return
	  elseif f == 1 then
	   say("Wybrałeś bonus +100 witalności.")

pan.lok zajmujesz się questami ?

pls pomurz

Reisu · 26 Grudnia 2011

xxxx

@EDIT

Nie wazne juz doszedlem do tego sam.

GoGame · 26 Grudnia 2011

tee ludzie

jaka jest funkcja sprawdzająca czy jesteśmy na mouncie ?

if pc.is_mount() then -- może być taka ?

to już do innego questa ale jej potrzebuje

(chodzi o to że jeżeli jesteśmy na mouncie to najpierw musimy z niego zejść

żeby quest dalej działał)

dominikczek · 26 Grudnia 2011

poprosze o questa

gdy wbije 90lvl wyskakuje quest nie chodzi mi oto że pojawi się on na boku i dopiero że można go przeczytać tylko odrazu po wbiciu 90lvl wyświetla się quest ja go już sobie uzupełnie

Stelios · 26 Grudnia 2011

tee ludzie

jaka jest funkcja sprawdzająca czy jesteśmy na mouncie ?
if pc.is_mount() then -- może być taka ?
to już do innego questa ale jej potrzebuje

(chodzi o to że jeżeli jesteśmy na mouncie to najpierw musimy z niego zejść

żeby quest dalej działał)

Tak, zwrotne jest 1 jeśli tak, albo 0 jeśli nie jesteśmy na mouncie

GoGame · 26 Grudnia 2011

dzięki, jeszcze jedno pytanie

jaka jest rodzaj when'a sprawdzający czy nasza postać zginęłą ...

when die begin

kopson44 · 26 Grudnia 2011

poprawi mi ktoś tak aby działał?

quest play begin
	state start begin
			when login or levelup begin
					local play = pc.getplaytime() -- quest_functions
					local czas = math.floor(play/60) -- 60s = 1min
					local sname = pc.get_name() -- wiadomo
					if czas >= 1 then
									if pc.getqf('1') != 1 then
											pc.setqf('1',1)
											notice_all(string.format("Gracz %s gra już 1 minut. Otrzymuje nagrodę!", sname))
											local numerr = number(1,21)
			local itemyy = {29008,29009,29010,29011,29012,29013,29014,29015,29016,29017,29018,29019,29020,29021,29022,29023,29024,29025,29026,29027,27996}
			pc.give_item2(itemyy[numerr], 1)
									end
									end
					elseif czas >= 5 then
									if pc.getqf('5') != 1 then
											pc.setqf('5',1)
											notice_all(string.format("Gracz %s gra już 5 minut. Otrzymuje nagrodę!", sname))
											local numerr = number(1,21)
			local itemyy = {29008,29009,29010,29011,29012,29013,29014,29015,29016,29017,29018,29019,29020,29021,29022,29023,29024,29025,29026,29027,27996}
			pc.give_item2(itemyy[numerr], 1)
									end
					elseif czas >= 30 then
									if pc.getqf('30') != 1 then
											pc.setqf('30',1)
											notice_all(string.format("Gracz %s gra już 30 minut. Otrzymuje nagrodę!", sname))
											pc.give_item2(29025)
											local numerr = number(1,21)
			local itemyy = {29008,29009,29010,29011,29012,29013,29014,29015,29016,29017,29018,29019,29020,29021,29022,29023,29024,29025,29026,29027,27996}
			local numerrr = number(1,21)
			local itemyyy = {29008,29009,29010,29011,29012,29013,29014,29015,29016,29017,29018,29019,29020,29021,29022,29023,29024,29025,29026,29027,27996}
			pc.give_item2(itemyy[numerr], 2)
				pc.give_item2(itemyyy[numerrr], 2)
									end
					end
					end
			end
	end

i dobrze jest to zeedytowane? z tymi minutami? bo ja tego nie czaje zabardzo

i jak dodać kolejne elseif

błąd jest taki :

syntax error : [string "start"]:13 <eof> expected near 'elseif'
quest_minuty.quest:36 Abort (core dumped)

Xenore · 26 Grudnia 2011

Witam.

Mam pytanko odnośnie całego tego feniksa i systemu petów .

Wiem , że Sunushi tutaj mi wszystko tłumaczył ,

Ale czy nie idzie napisać jedno zwykłego questa bez żadnych funkcji z kosmosu który po prostu :

Da możliwość przywołania tego feniksa przez pieczęć (po kliknięciu na nią feniks się pojawia) i lata za nami a znów klikniemy to znika . cała filozofia . bez tego całego systemu petów ;/ ..

Bardzo proszę o Pomoc

dominikczek · 26 Grudnia 2011

xenore ten system petów jest banalny tylko ja nie mam difa na game_2455 ;/

Xenore · 26 Grudnia 2011

niby banalny ale roboty pełno a mi cały ten system jest nie potrzebny ;/

Wystarczyłby mi Quest bez żadnych kosmicznych funkcji jak pisałem wcześniej .

Stelios · 26 Grudnia 2011

dzięki, jeszcze jedno pytanie

jaka jest rodzaj when'a sprawdzający czy nasza postać zginęłą ...
when die begin

Szczerze to nie wiem czy jest taka funkcja ;p

Ale możesz sprawdzić to np przez funkcje

pc.get_hp()

która sprawdza ile mamy hp, więc możesz ją użyć np w taki sposób

...
if pc.get_hp() < 0 then
...

VVizard · 26 Grudnia 2011

Proszę o poprawę tego questu...

quest ksiega begin
state start begin
when login or levelup with pc.get_level 46
set_state(info)
end
end
state info begin
when letter begin
local v = find_npc_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, Baek-Go")
end
end
send_letter("Baek-Go Cie szuka)
when button or info begin
say_title("Baek-Go)
say("Baek-Go Cie szuka!")
say("Udaje sie z nim porozmawiac")
end
end
when__TARGET__.target.click or 20018.chat."Ksiega" begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Wreszcie sie zjawiles. Musisz mi pomoc!")
say("Podobno w wiezy demonow znajduje sie")
say("ksiazka dzieki ktorej bede mogl dalej studiowac")
say("swoje nauki")
say"(Zabij umarlego rozpruwacza i wroc do mnie z ksiazka!")
set_state(ksiega)
end
end
state ksiega begin
when letter begin
send_letter("Dalasz Nauka")
end
end
when button or info begin
say("Baek-Go poprosil Cie o odzyskanie starej ksiegi")
say("dzieki ktorej bedzie mogl poglebiac swa wiedze")
say_red("Zabij umarlego rozprowacza")
end
end
when 1093.kill with pc.countitem(69201)==0 begin
local random = math.random(1)
if random == 1 then
pc.give_item2 (69201, 1)
say("Masz przedmiot, a teraz wracaj do Baek-Go)
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__, v, "Baek-Go")
end
end
end
when 20018.chat."Mam Ksiazke!" with pc.countitem(69201)>0 begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Dziekuje Ci za pomoc!")
say("Wreszcie bede mogl nauczyc sie wiecej o swojej dziedzinie")
say_limonka("Oto Twoja nagroda:)
say_reward("20x Zwoj Blogoslawienstwa")
pc.remove_item(69201, 1)
pc.give_item2(25040, 20)
set_state(__COMPLETE__)
end
end

Problem polega na tym że list po lewo się nie otwiera i npc nie chce rozmawiać. Bardzo proszę o poprawę...

Sunushi · 27 Grudnia 2011

Stelios, prościej tą funkcją:

pc.is_dead()

kopson44 · 27 Grudnia 2011

@Wizard

sprawdz tera

quest ksiega begin
state start begin
when login or levelup with pc.get_level >= 46 begin
set_state(info)
end
end
state info begin
when letter begin
local v = find_npc_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v ,"Baek-Go")
end
send_letter("Baek-Go Cie szuka")
end
when button or info begin
say_title("Baek-Go")
say("Baek-Go Cie szuka!")
say("Udaje sie z nim porozmawiac")
end
end
when__TARGET__.target.click or 20018.chat."Ksiega" begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Wreszcie sie zjawiles. Musisz mi pomoc!")
say("Podobno w wiezy demonow znajduje sie")
say("ksiazka dzieki ktorej bede mogl dalej studiowac")
say("swoje nauki")
say"(Zabij umarlego rozpruwacza i wroc do mnie z ksiazka!")
set_state(ksiega)
end
end
state ksiega begin
when letter begin
send_letter("Dalasz Nauka")
end
end
when button or info begin
say("Baek-Go poprosil Cie o odzyskanie starej ksiegi")
say("dzieki ktorej bedzie mogl poglebiac swa wiedze")
say_red("Zabij umarlego rozpruwacza")
end
end
when 1093.kill with pc.countitem(69201)==0 begin
local random = math.random(1)
if random == 1 then
pc.give_item2 (69201, 1)
say("Masz przedmiot, a teraz wracaj do Baek-Go")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
end
when 20018.chat."Mam Ksiazke!" with pc.countitem(69201)>0 begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Dziekuje Ci za pomoc!")
say("Wreszcie bede mogl nauczyc sie wiecej o swojej dziedzinie")
say_limonka("Oto Twoja nagroda:")
say_reward("20x Zwoj Blogoslawienstwa")
pc.remove_item(69201, 1)
pc.give_item2(25040, 20)
set_state(__COMPLETE__)
end
end

nie wiem jak z endami

LamS · 27 Grudnia 2011

Mam Questa

quest wie begin
state start begin
	when 6767 .use begin
		say_title("Witaj ".. pc.get_name() ..".")
		say("Chciałbyś Wierzchowca?")
		local s = select("Dzik","Lew","Tygrys","Wilk","NIESPODZIANKA","EXIT")
	if s == 1 then
		say_reward("Uwaga to Dzik")
		pc.mount(20110)
		end
	if s == 2 then
		say_reward("Uwaga to Lew")
		pc.mount(20113)
		end
	if s == 3 then
		say_reward("Uwaga to Tygrys")
		pc.mount(20111)
		end
	if s == 4 then
		say_reward("Uwaga to Wilk")
		pc.mount(20112)
		end
   if s == 5 then
		say_reward("Niespodzianka !")
		pc.mount(20114)
		end
	end
end
end

Proszę o jego Przeróbkę Tak aby Po kliknięciu

Wilka/Lwa/Tygrysa/Dzika/Niespodzianki Ten zwój bo to jest zwój o id 6767

założył się jak buty wiatru [zwój trwa 480H] jak zejdziemy czas się nie liczy

na każdym wierzchowcu czas się liczy

Tylko zamiast klikania prawym to trzeba sobie wybrać Obdaruje 15x Lubię TO !

A 2 Quest jaki proszę to ten z bonusami już wam zaczą sunshi któremu bardzo dziękuje i dałem mu 7/8 Lubię TO

o co chodzi w tym quescie co ma w nim być daje tu w spoilerku

Proszę o Questa Będzie on na bogato bo Dużo Pisania

Nazwa - Bonus/Bonusy ID Npc - 1234

Nazwy bonusów pochodzą z tematu xdestructx

affect.add_collect(apply.STR, xxx, 60*60*24*365*60) --- sila
affect.add_collect(apply.INT, xxx, 60*60*24*365*60) --- inteligencja
affect.add_collect(apply.CON, xxx, 60*60*24*365*60) --- energia zyciowa
affect.add_collect(apply.DEX, xxx, 60*60*24*365*60) --- zrecznosc
affect.add_collect(apply.ATT_SPEED, xxx, 60*60*24*365*60) --- szybkosc ataku
affect.add_collect(apply.MOV_SPEED, xxx, 60*60*24*365*60) --- szybkosc poruszania sie
affect.add_collect(apply.CAST_SPEED, xxx, 60*60*24*365*60) --- szybkosc magi
affect.add_collect(apply.HP_REGEN, xxx, 60*60*24*365*60) --- regeneracja pz
affect.add_collect(apply.SP_REGEN, xxx, 60*60*24*365*60) --- regeneracja pe
affect.add_collect(apply.POISON_PCT, xxx, 60*60*24*365*60) --- otrucie
affect.add_collect(apply.STUN_PCT, xxx, 60*60*24*365*60) --- omdlenie
affect.add_collect(apply.SLOW_PCT, xxx, 60*60*24*365*60) --- spowolnienie
affect.add_collect(apply.CRITICAL_PCT, xxx, 60*60*24*365*60) --- krytyk
affect.add_collect(apply.PENETRATE_PCT, xxx, 60*60*24*365*60) --- przeszywka
affect.add_collect(apply.ATTBONUS_HUMAN, xxx, 60*60*24*365*60) --- na ludzi
affect.add_collect(apply.BLOCK, xxx, 60*60*24*365*60) --- blok ciosow
affect.add_collect(apply.IMMUNE_STUN, xxx, 60*60*24*365*60) --- nno
affect.add_collect(apply.IMMUNE_SLOW, xxx, 60*60*24*365*60) --- nns



MAX_HP --- pukty zycia
MAX_SP --- pukty energi
CON --- energia zyciowa
INT --- inteligencja
STR --- sila
DEX --- zrecznosc
ATT_SPEED --- szybkosc ataku
MOV_SPEED --- szybkosc poruszania sie
CAST_SPEED --- szybkosc magi
HP_REGEN --- regeneracja puktow zycia
SP_REGEN --- regeneracja puktow energi
POISON_PCT --- szansa na otrucie
STUN_PCT --- szansa na omdlenie
SLOW_PCT --- szansa na spowolnienie
CRITICAL_PCT --- szansa na krytyczne uderzenie
PENETRATE_PCT --- szansa na przyszywajace uderzenie
ATTBONUS_HUMAN --- silny przeciwko ludzia
ATTBONUS_ANIMAL --- silny przeciwko zwierzeta
ATTBONUS_ORC ---  silny przeciwko orka
ATTBONUS_MILGYO --- silny przeciwko mistyka
ATTBONUS_UNDEAD --- silny przeciwko nieumarlym
ATTBONUS_DEVIL --- silny przeciwko diabla
STEAL_HP --- szansa na kradziez putkow zycia
STEAL_SP --- szansa na kradziez putkow energi
MANA_BURN_PCT --- nie mam pojecia
DAMAGE_SP_RECOVER --- nie wiem
BLOCK --- szansa na blok ciosow
DODGE --- szansa na unikniecie ciosu
RESIST_SWORD --- odpornosc na miecze
RESIST_TWOHAND --- odpornosc na miecze dwureczne
RESIST_DAGGER --- odpornosc na sztylety
RESIST_BELL --- odpornosc na dzwony
RESIST_FAN --- odpornosc na wachlarze
RESIST_BOW --- odpornosc na luki
RESIST_FIRE --- odpornosc na ogien
RESIST_ELEC --- odpornosc na blyskawice
RESIST_MAGIC --- odpornosc na magie
RESIST_WIND --- odpornosc na wiatr
REFLECT_MELEE --- szansa na odbiecie ???
REFLECT_CURSE --- szansa na odbiecie klatwy ( ??? )
POISON_REDUCE --- odpornosc na otrucie
KILL_SP_RECOVER  --- obrazenia absorbowane przez pukty energi
EXP_DOUBLE_BONUS ---  szansa na podwojna ilosc doswiadczenia
GOLD_DOUBLE_BONUS --- szansa na podwojna ilosc yang  
ITEM_DROP_BONUS --- szansa na bonus doswiadczenia
POTION_BONUS --- mikstury iles % efekt podniesiony
KILL_HP_RECOVER --- obrazenia absorbowane przez pukty zycia
IMMUNE_STUN --- nie wrazliwy na omdlenie
IMMUNE_SLOW --- nie wrazliwy na spowolnienie
IMMUNE_FALL --- nie wrazliwe na upadek
BOW_DISTANCE --- dlugosc zasiegu zluku ( chyba )
ATT_GRADE_BONUS --- wartosc ataku
DEF_GRADE_BONUS --- obrona
MAGIC_ATT_GRADE --- wartosc magicznego ataku
MAGIC_DEF_GRADE --- obrona magicza
CURSE_PCT --- szansa na klatwe ( ??? )
MAX_STAMINA --- pukty wytrzymalosci
ATT_BONUS_TO_WARRIOR --- silny przeciwko wojownika
ATT_BONUS_TO_ASSASSIN --- silny przeciwko ninja
ATT_BONUS_TO_SURA --- silny przeciwko sura
ATT_BONUS_TO_SHAMAN --- silny przeciwko szmananem
ATT_BONUS_TO_MONSTER --- silny przeciwko potwora
RESIST_WARRIOR --- odpornosc na wojownika
RESIST_ASSASSIN --- odpornosc na ninje
RESIST_SURA --- odpornosc na sure
RESIST_SHAMAN --- odpornosc na szamna

Quest zaczyna się od kliknięcia na NPC [id 1234]

Bonusy -----> (i teraz dzieli się na dwa) Bonusy PVP

-----> Bonusy EXP

Bonusy PVP ---> (Znów się dzieli ) Szaman

--> Wojownik

--> Sura

---> Ninja

I Tak Wojownik rozdziela się na 3

Wojownik ----> (Znowu rodziałka) Silny 25% za 25 nieb.znaków

---> Silny 50% za 50 nieb.znaków

----> Silny 75% za 75 nieb.znaków (Na wojowniki Oczywiśćie)

Tak samo z surą szamanem i ninją

Bonusy EXP ----> ( Rozdziałka ) -----> Główne --->Siła

Inteligęcja

Witalność

Zwinność

-----> Poboczne Atak

Obrona

Potwory

Siła/int./witalność/zwin/ Dzieli się na :

(Przykład Siła)

Siła ----> Siła (100) - 100 KK

Siła (150) - 150 KK

Siła (250) - 250 KK

Teraz weśmy atak/obrona/silny na potwory :

(Teraz tu opisze wszystkie bo każdy będzie inaczej )

Atak -----> Atak (3.000) [3K] Ataku więcej - 150KK

Atak (5.000) [5K] - 250 KK

Atak (10.000) [10K] - 500KK

Obrona ->Obr. (500) - 50KK

Obr. (1.000) [1K] - 100KK

Obr. (2.500) [2.5K] - 250KK

Silny na Potwory (%) ------> Potwory (250%) - 250KK

Potwory (500%) - 500KK

Potwory (1000%) - 1KKK

napisane niezrozumiale pisać !!! potrzebuje tego questa moge dodać (amatorską wersje graficzną xDD Paint )

P.S. Zapomniałem napisać

ID NPC 1234 Quest (nazwa) Bonus lub Bonusy ID Nieb. Znaków 123455

zapomniał bym wybrany bonus trwa 1 H !!!!!

bonusów można uzywać do woli ;p

Quest (taki zarys by sunshi) trzeba dopisać bonusy expa (głowne i poboczne) Dam LubIE TO

quest bonusy_by_sunushi begin
state start begin
 when 1234.chat."Bonus/Bonusy" begin
  say_title(mob_name(1234)..":")
  say("Wybierz rodzaj bonusu:")
  local a = select("Bonusy PVP","Bonusy EXP")
  if a == 1 then
	say_title(mob_name(1234)..":")
	local b = select("Wojownik", "Ninja", "Sura", "Szaman", "Anuluj")
	if b == 5 then
	 return
	end
	local job
	if b == 1 then
	 job = "Wojownik"
	elseif b == 2 then
	 job = "Ninja"
	elseif b == 3 then
	 job = "Sura"
	elseif b == 4 then
	 job = "Szaman"
	end
	say_title(mob_name(1234)..":")
	say("Wybierz jak mocny ma być bonus:")
	say("25% Silny przeciwko - 25 Nieb. Znaków,")
	say("50% Silny przeciwko - 50 Nieb. Znaków,")
	say("75% Silny przeciwko - 75 Nieb. Znaków.")
	local c = select("25%", "50%", "75%", "Anuluj")
	if c == 1 then
	 say_title(mob_name(1234)..":")
	 say("Wybrałeś następujący bonus:")
	 say("25% Silny przeciwko "..job.." na 1h.")
	 if pc.countitem(123455) < 25 then
	  say_notice("Nie masz wystarczającej ilości Nieb. Znaków.")
	  return
	 end
	 say("Czy na pewno chcesz ten bon?")
	 local sel = select("Tak", "Nie")
	 if sel == 2 then
	  return
	 end
	 say_title(mob_name(1234)..":")
	 say("Otrzymałeś następujący bonus:")
	 say("25% Silny przeciwko "..job.." na 1h.")
	 if b == 1 then
	  affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 25, 60*60)
	 elseif b == 2 then
	  affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 25, 60*60)
	 elseif b == 3 then
	  affect.add_collect(apply.ATT_BONUS_TO_SURA, 25, 60*60)
	 elseif b == 4 then
	  affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 25, 60*60)
	 end
	 pc.remove_item(123455, 25)
	 say("")
	elseif c == 2 then
	 say_title(mob_name(1234)..":")
	 say("Wybrałeś następujący bonus:")
	 say("50% Silny przeciwko "..job.." na 1h.")
	 if pc.countitem(123455) < 50 then
	  say_notice("Nie masz wystarczającej ilości Nieb. Znaków.")
	  return
	 end
	 say("Czy na pewno chcesz ten bon?")
	 local sel = select("Tak","Nie")
	 if sel == 2 then
	  return
	 end
	 say_title(mob_name(1234)..":")
	 say("Otrzymałeś następujący bonus:")
	 say("50% Silny przeciwko "..job.." na 1h.")
	 if b == 1 then
	  affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 50, 60*60)
	 elseif b == 2 then
	  affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 50, 60*60)
	 elseif b == 3 then
	  affect.add_collect(apply.ATT_BONUS_TO_SURA, 50, 60*60)
	 elseif b == 4 then
	  affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 50, 60*60)
	 end
	 say("")
	 pc.remove_item(123455, 50)
	elseif c == 3 then
	 say_title(mob_name(1234)..":")
	 say("Wybrałeś następujący bonus:")
	 say("75% Silny przeciwko "..job.." na 1h.")
	 if pc.countitem(123455) < 75 then
	  say_notice("Nie masz wystarczającej ilości Nieb. Znaków.")
	  return
	 end
	 say("Czy na pewno chcesz ten bon?")
	 local sel = select("Tak","Nie")
	 if sel == 2 then
	  return
	 end
	 say_title(mob_name(1234)..":")
	 say("Otrzymałeś następujący bonus:")
	 say("75% Silny przeciwko "..job.." na 1h.")
	 if b == 1 then
	  affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 75, 60*60)
	 elseif b == 2 then
	  affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN, 75, 60*60)
	 elseif b == 3 then
	  affect.add_collect(apply.ATT_BONUS_TO_SURA, 75, 60*60)
	 elseif b == 4 then
	  affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 75, 60*60)
	 end
	 say("")
	 pc.remove_item(123455, 75)
	else
	 return
	end
  elseif a == 2 then
	say_title(mob_name(1234)..":")
	local d = select("Główne", "Poboczne", "Anuluj")
	if d == 3 then
	 return
	elseif d == 1 then
	 say_title(mob_name(1234)..":")
	 local e = select("Witalność ", "Inteligencja", "Siła", "Zręczność ", "Anuluj")
	 if e == 5 then
	  return
	 elseif e == 1 then
	  say_title(mob_name(1234)..":")
	  say("Wybierz jak mocny ma być bonus:")
	  say("+100 witalność - 100kk,")
	  say("+150 witalność - 150kk,")
	  say("+250 witalność - 250kk.")
	  local f = select("+100", "+150", "+250", "Anuluj")
	  if f == 4 then
	   return
	  elseif f == 1 then
	   say("Wybrałeś bonus +100 witalności.")

pan.lok zajmujesz się questami ?

pls pomurz

Stelios · 27 Grudnia 2011

Stelios, prościej tą funkcją:
pc.is_dead()

Ahaaa. Nie wiedziałem, że jest taka funkcja więc podałem zastosowanie innej

VVizard · 27 Grudnia 2011

quest ksiega begin
state start begin
when login or levelup with pc.get_level >= 100 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Baek-Go Cie szuka")
local v = find_npc_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v ,"Baek-Go")
end
end
when button or info begin
say_title("Baek-Go")
say("Baek-Go Cie szuka!")
say("Udaje sie z nim porozmawiac")
say("")
end
when __TARGET__.target.click or 20018.chat."Ksiega" begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Wreszcie sie zjawiles. Musisz mi pomoc!")
say("Podobno w wiezy demonow znajduje sie")
say("ksiazka dzieki ktorej bede mogl dalej studiowac")
say("swoje nauki")
say("Zabij umarlego rozpruwacza i wroc do mnie z ksiazka!")
say("")
set_state( zabij )
end
end
state zabij begin
when letter begin
send_letter("Dalasz Nauka")
end
when button or info begin
say_cegla("Informacja:")
say("Baek-Go poprosil Cie o odzyskanie starej ksiegi")
say("dzieki ktorej bedzie mogl poglebiac swa wiedze")
say_red("Zabij umarlego rozpruwacza")
say("")
end
when 1093.kill begin
local s = number(1, 100)
if s == 1 and pc.count_item(69201)==0 then
pc.give_item2 (69201, 1)
send_letter("Wroc do Baek-Go!")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when __TARGET__.target.click  or
20084.chat."Znalazlem Ksiazke!" with pc.count_item(69201) > 0  begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Oh, Znalazles!")
say("Bardzo Ci dziekuje!")
say("")
say_limonka("Oto Twoja nagroda:")
say("")
pc.remove_item(69201, 1)
pc.give_item2(25040, 20)
set_state(__COMPLETE__)
end
end
set_state(__COMPLETE__)
end
end

Mam tutaj zedytowany trochę jeszcze przez siebie ten co mi podałeś, ale wyskakuje core dumped; (.

syntax error : [string "zabij"]:10: unexpected symbol near 'when' xxx.quest:67:Abort(Core Dumped)...

Bardzo proszę o poprawienie jeszcze raz...

Xenore · 27 Grudnia 2011

Sunushi ;p

To co szło by tak jak mówiłem jednym zwykłym questem który przez pieczęć przywołuje feniksa (lata on za nami) klik znowu i odwołuje?

Czy trzeba cały ten system ;/ ?

krzywy_ · 27 Grudnia 2011

http://www.elitepvpers.com/forum/metin2-pserver-guides-strategies/1589070-release-pet-system-alternative-full.html

Poczytaj o systemach zwierząt

GoGame · 27 Grudnia 2011

@LamS

proszę 2 quest

quest gogame begin
   state start begin
       when 1234.chat."Bonusy" begin
           say_title(mob_name(1234)..":")
           say("Jaki Bonus chcesz dokupić ?")
           local a = select("Bonusy PVP","Bonusy EXP","Anuluj")
           if a == 1 then
               say_title(mob_name(1234)..":")
               local b = select("Szaman","Wojownik","Sura","Ninja","Anuluj")
               if b == 1 then
                   say_title(mob_name(1234)..":")
                   say_title("Silny Przeciwko Szamanom")
                   say_reward("Silny... 25 % - 25 Nieb. Znaków.")
                   say_reward("Silny... 50 % - 50 Nieb. Znaków.")
                   say_reward("Silny... 75 % - 75 Nieb. Znaków.")
                   local c = select("25 %","50 %","75 %","Anuluj")
                   if c == 1 then
                       if pc.count_item(123455) >= 25 then
                           affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 25, 3600)
                           pc.remove_item(123455, 25)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 25 Nieb. Znaków.")
                       end
                   elseif c == 2 then
                       if pc.count_item(123455) >= 50 then
                           affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 50, 3600)
                           pc.remove_item(123455, 50)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 50 Nieb. Znaków.")
                       end
                   elseif c == 3 then
                       if pc.count_item(123455) >= 75 then
                           affect.add_collect(apply.ATT_BONUS_TO_SHAMAN, 75, 3600)
                           pc.remove_item(123455, 75)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 75 Nieb. Znaków.")
                       end
                   elseif c == 4 then
                       return
                   end
               elseif b == 2 then
                   say_title(mob_name(1234)..":")
                   say_title("Silny Przeciwko Wojownikom")
                   say_reward("Silny... 25 % - 25 Nieb. Znaków.")
                   say_reward("Silny... 50 % - 50 Nieb. Znaków.")
                   say_reward("Silny... 75 % - 75 Nieb. Znaków.")
                   local d = select("25 %","50 %","75 %","Anuluj")
                   if d == 1 then
                       if pc.count_item(123455) >= 25 then
                           affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 25, 3600)
                           pc.remove_item(123455, 25)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 25 Nieb. Znaków.")
                       end
                   elseif d == 2 then
                       if pc.count_item(123455) >= 50 then
                           affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 50, 3600)
                           pc.remove_item(123455, 50)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 50 Nieb. Znaków.")
                       end
                   elseif d == 3 then
                       if pc.count_item(123455) >= 75 then
                           affect.add_collect(apply.ATT_BONUS_TO_WARRIOR, 75, 3600)
                           pc.remove_item(123455, 75)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 75 Nieb. Znaków.")
                       end
                   elseif d == 4 then
                       return
                   end
               elseif b == 3 then
                   say_title(mob_name(1234)..":")
                   say_title("Silny Przeciwko Sura")
                   say_reward("Silny... 25 % - 25 Nieb. Znaków.")
                   say_reward("Silny... 50 % - 50 Nieb. Znaków.")
                   say_reward("Silny... 75 % - 75 Nieb. Znaków.")
                   local e = select("25 %","50 %","75 %","Anuluj")
                   if e == 1 then
                       if pc.count_item(123455) >= 25 then
                           affect.add_collect(apply.ATT_BONUS_TO_SURA, 25, 3600)
                           pc.remove_item(123455, 25)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 25 Nieb. Znaków.")
                       end
                   elseif e == 2 then
                       if pc.count_item(123455) >= 50 then
                           affect.add_collect(apply.ATT_BONUS_TO_SURA, 50, 3600)
                           pc.remove_item(123455, 50)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 50 Nieb. Znaków.")
                       end
                   elseif e == 3 then
                       if pc.count_item(123455) >= 75 then
                           affect.add_collect(apply.ATT_BONUS_TO_SURA, 75, 3600)
                           pc.remove_item(123455, 75)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 75 Nieb. Znaków.")
                       end
                   elseif e == 4 then
                       return
                   end
               elseif b == 4 then
                   say_title(mob_name(1234)..":")
                   say_title("Silny Przeciwko Ninja")
                   say_reward("Silny... 25 % - 25 Nieb. Znaków.")
                   say_reward("Silny... 50 % - 50 Nieb. Znaków.")
                   say_reward("Silny... 75 % - 75 Nieb. Znaków.")
                   local f = select("25 %","50 %","75 %","Anuluj")
                   if f == 1 then
                       if pc.count_item(123455) >= 25 then
                           affect.add_collect(apply.ATT_BONUS_TO_NINJA, 25, 3600)
                           pc.remove_item(123455, 25)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 25 Nieb. Znaków.")
                       end
                   elseif f == 2 then
                       if pc.count_item(123455) >= 50 then
                           affect.add_collect(apply.ATT_BONUS_TO_NINJA, 50, 3600)
                           pc.remove_item(123455, 50)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 50 Nieb. Znaków.")
                       end
                   elseif f == 3 then
                       if pc.count_item(123455) >= 75 then
                           affect.add_collect(apply.ATT_BONUS_TO_NINJA, 75, 3600)
                           pc.remove_item(123455, 75)
                           chat("Bonus dodany pomyślnie.")
                       else
                           say("Niestety, lecz nie posiadasz 75 Nieb. Znaków.")
                       end
                   elseif f == 4 then
                       return
                   end
               elseif b == 5 then
                   return
               end
           elseif a == 2 then
               say_title(mob_name(1234)..":")
               local g = select("Główne","Poboczne","Anuluj")
               if g == 1 then
                   say_title(mob_name(1234)..":")
                   local h = select("Siła","Inteligencja","Witalność","Zwinność","Anuluj")
                   if h == 1 then
                       say_title(mob_name(1234)..":")
                       say_title("Siła")
                       say_reward("Siła + 100 - 100.000.000 Yang.")
                       say_reward("Siła + 150 - 150.000.000 Yang.")
                       say_reward("Siła + 250 - 250.000.000 Yang.")
                       local i = select("+ 100","+ 150","+ 250","Anuluj")
                       if i == 1 then
                           if pc.get_money() >= 100000000 then
                               affect.add_collect(apply.STR, 100, 3600)
                               pc.change_money(pc.get_money() - 100000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 100.000.000 Yang.")
                           end
                       elseif i == 2 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.STR, 150, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif i == 3 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.STR, 250, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif i == 4 then
                           return
                       end
                   elseif h == 2 then
                       say_title(mob_name(1234)..":")
                       say_title("Inteligencja")
                       say_reward("Inteligencja + 100 - 100.000.000 Yang.")
                       say_reward("Inteligencja + 150 - 150.000.000 Yang.")
                       say_reward("Inteligencja + 250 - 250.000.000 Yang.")
                       local j = select("+ 100","+ 150","+ 250","Anuluj")
                       if j == 1 then
                           if pc.get_money() >= 100000000 then
                               affect.add_collect(apply.INT, 100, 3600)
                               pc.change_money(pc.get_money() - 100000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 100.000.000 Yang.")
                           end
                       elseif j == 2 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.INT, 150, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif j == 3 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.INT, 250, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif j == 4 then
                           return
                       end
                   elseif h == 3 then
                       say_title(mob_name(1234)..":")
                       say_title("Witalność")
                       say_reward("Witalność + 100 - 100.000.000 Yang.")
                       say_reward("Witalność + 150 - 150.000.000 Yang.")
                       say_reward("Witalność + 250 - 250.000.000 Yang.")
                       local k = select("+ 100","+ 150","+ 250","Anuluj")
                       if k == 1 then
                           if pc.get_money() >= 100000000 then
                               affect.add_collect(apply.CON, 100, 3600)
                               pc.change_money(pc.get_money() - 100000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 100.000.000 Yang.")
                           end
                       elseif k == 2 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.CON, 150, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif k == 3 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.CON, 250, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif k == 4 then
                           return
                       end
                   elseif h == 4 then
                       say_title(mob_name(1234)..":")
                       say_title("Zwinność")
                       say_reward("Zwinność + 100 - 100.000.000 Yang.")
                       say_reward("Zwinność + 150 - 150.000.000 Yang.")
                       say_reward("Zwinność + 250 - 250.000.000 Yang.")
                       local l = select("+ 100","+ 150","+ 250","Anuluj")
                       if l == 1 then
                           if pc.get_money() >= 100000000 then
                               affect.add_collect(apply.DEX, 100, 3600)
                               pc.change_money(pc.get_money() - 100000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 100.000.000 Yang.")
                           end
                       elseif l == 2 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.DEX, 150, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif l == 3 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.DEX, 250, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif l == 4 then
                           return
                       end
                   elseif h == 5 then
                       return
                   end
               elseif g == 2 then
                   say_title(mob_name(1234)..":")
                   local m = select("Atak","Obrona","Silny Przeciwko Potworom","Anuluj")
                   if m == 1 then
                       say_title(mob_name(1234)..":")
                       say_title("Atak")
                       say_reward("Atak + 3000 - 150.000.000 Yang.")
                       say_reward("Atak + 5000 - 250.000.000 Yang.")
                       say_reward("Atak + 10000 - 500.000.000 Yang.")
                       local n = select("+ 3000","+ 5000","+ 10000","Anuluj")
                       if n == 1 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.DEX, 100, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif n == 2 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.DEX, 150, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif n == 3 then
                           if pc.get_money() >= 500000000 then
                               affect.add_collect(apply.DEX, 250, 3600)
                               pc.change_money(pc.get_money() - 500000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 500.000.000 Yang.")
                           end
                       elseif n == 4 then
                           return
                       end
                   elseif m == 2 then
                       say_title(mob_name(1234)..":")
                       say_title("Obrona")
                       say_reward("Obrona + 500 - 50.000.000 Yang.")
                       say_reward("Obrona + 1000 - 250.000.000 Yang.")
                       say_reward("Obrona + 2500 - 500.000.000 Yang.")
                       local o = select("+ 500","+ 1000","+ 2500","Anuluj")
                       if o == 1 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.DEX, 100, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif o == 2 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.DEX, 150, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif o == 3 then
                           if pc.get_money() >= 500000000 then
                               affect.add_collect(apply.DEX, 250, 3600)
                               pc.change_money(pc.get_money() - 500000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 500.000.000 Yang.")
                           end
                       elseif o == 4 then
                           return
                       end
                   elseif m == 3 then
                       say_title(mob_name(1234)..":")
                       say_title("Silny Przeciwko Potworom")
                       say_reward("Silny... + 250 % - 250.000.000 Yang.")
                       say_reward("Silny... + 500 % - 500.000.000 Yang.")
                       say_reward("Silny... + 1000 % - 1.000.000.000 Yang.")
                       local p = select("250 %","500 %","+1000 %","Anuluj")
                       if p == 1 then
                           if pc.get_money() >= 150000000 then
                               affect.add_collect(apply.DEX, 100, 3600)
                               pc.change_money(pc.get_money() - 150000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 150.000.000 Yang.")
                           end
                       elseif p == 2 then
                           if pc.get_money() >= 250000000 then
                               affect.add_collect(apply.DEX, 150, 3600)
                               pc.change_money(pc.get_money() - 250000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 250.000.000 Yang.")
                           end
                       elseif p == 3 then
                           if pc.get_money() >= 500000000 then
                               affect.add_collect(apply.DEX, 250, 3600)
                               pc.change_money(pc.get_money() - 500000000)
                               chat("Bonus dodany pomyślnie.")
                           else
                               say("Niestety, lecz nie posiadasz 500.000.000 Yang.")
                           end
                       elseif p == 4 then
                           return
                       end
                   elseif m == 4 then
                       return
                   end
               elseif g == 3 then
                   return
               end
           elseif a == 3 then
               return
           end
       end
   end
end

jak chcesz pierwszy to na PW pisz, bo questa nie dam wszystkim :P

Xenore · 27 Grudnia 2011

Ehh ;/

ile razy mam pytać i mówić ! :

@krzywy_ : czytaj ze zrozumieniem !

Mój Post : "...

a mi cały ten system jest nie potrzebny ;/

Wystarczyłby mi Quest bez żadnych kosmicznych funkcji jak pisałem wcześniej . Czy jest w ogóle taka możliwość z tym questem ?"

Sunushi · 27 Grudnia 2011

Xenore, gdyby się dało to by udostępnili, nie sądzisz?

kopson44 · 27 Grudnia 2011

@Wizard

powinno działać

quest ksiega begin
state start begin
when login or levelup with pc.get_level >= 100 begin
set_state(info)
end
end
state info begin
when letter begin
send_letter("Baek-Go Cie szuka")
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("Baek-Go")
say("Baek-Go Cie szuka!")
say("Udaje sie z nim porozmawiac")
say("")
end
when __TARGET__.target.click or 20018.chat."Ksiega" begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Wreszcie sie zjawiles. Musisz mi pomoc!")
say("Podobno w wiezy demonow znajduje sie")
say("ksiazka dzieki ktorej bede mogl dalej studiowac")
say("swoje nauki")
say("Zabij umarlego rozpruwacza i wroc do mnie z ksiazka!")
say("")
set_state( zabij )
end
end
state zabij begin
when letter begin
send_letter("Dalasz Nauka")
end
when button or info begin
say_cegla("Informacja:")
say("Baek-Go poprosil Cie o odzyskanie starej ksiegi")
say("dzieki ktorej bedzie mogl poglebiac swa wiedze")
say_red("Zabij umarlego rozpruwacza")
say("")
end
when 1093.kill begin
local s = number(1, 100)
if s == 1 and pc.count_item(69201)==0 then
pc.give_item2 (69201, 1)
send_letter("Wroc do Baek-Go!")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
end
when __TARGET__.target.click  or
20084.chat."Znalazlem Ksiazke!" with pc.count_item(69201) > 0  begin
target.delete("__TARGET__")
say_cegla("Baek-Go:")
say("Oh, Znalazles!")
say("Bardzo Ci dziekuje!")
say("")
say_limonka("Oto Twoja nagroda:")
say("")
pc.remove_item(69201, 1)
pc.give_item2(25040, 20)
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany