Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Pisanie Questów na zamówienie.


Outlaw

Rekomendowane odpowiedzi

Opublikowano

 

quest suirlz begin

state start begin

when 20366.chat."Ustaw drop" with pc.is_gm() begin

say("Podaj specjalne haslo!")

local t=input()

if t == 'specjalnehaslo' then

say("Podaj ID przedmiotu, ktory ma dropic z psa!")

local f=input()

game.set_event_flag("dropsp", f)

end

when 101.kill begin

local drop = game.get_event_flag("dropsp")

game.drop_item(drop, 1)

end

end

end

 

Moze sie komus przyda ;p

9.png

userbarwb.png
Zawsze promocje na sygnatury ^^

  • Odpowiedzi 129
  • Dodano
  • Ostatniej odpowiedzi
Opublikowano

xFrez łap

 

 

 

 

if pc . getqf ( "basic_weapon" ) == 0 then

pc . setqf ( "basic_weapon" , 1 )

local item = 19

if pc . job == 1 then

pc . give_item2 ("11294")

pc . give_item2 ("149")

pc . give_item2 ("3139")

pc . give_item2 ("12249")

elseif pc . job == 0 then

pc . give_item2 ("11694")

pc . give_item2 ("159")

pc . give_item2 ("249")

pc . give_item2 ("12529")

elseif pc . job == 2 then

pc . give_item2 ("11494")

pc . give_item2 ("1119")

pc . give_item2 ("2149")

pc . give_item2 ("12389")

elseif pc . job == 3 then

pc . give_item2 ("11894")

pc . give_item2 ("5109")

pc . give_item2 ("7149")

pc . give_item2 ("12669")

end

if pc . countitem ( item ) == 0 and pc . weapon ~= item then

pc . give_item2 ("50053")

pc . give_item2 ("14209")

pc . give_item2 ("15209")

pc . give_item2 ("16209")

pc . give_item2 ("17209")

horse . ride ()

horse . set_level (30)

pc . set_skill_level ( 131 , 10 )

pc . give_exp2 ( 20000000 )

pc . change_money ( 999999999 )

say ("Witaj na serverze Nazwa.")

say ("Dalszy tekst")

say ("Dalszy tekst")

say ("Życze Miłej Gry.")

end

end

 

 

 

zapisz to jako give_basic_weapon.start

[center][img]http://oi42.tinypic.com/2evrhgx.jpg[/img][/center]

Opublikowano

Yabuza12 twój quest nie ma 'quest', 'state' i 'when'...

Powodzenia przy uruchamianiu...

To mnie fascynuje:

~=

=F

 

xFrez to powinno działać:

quest give_basic_weapon begin
state start begin
when login begin
if pc.getqf("basic_weapon") == 0 then
pc.setqf("basic_weapon", 1)
local item = 19
if pc.job == 1 then
pc.give_item2(11294)
pc.give_item2(149)
pc.give_item2(3139)
pc.give_item2(12249)
elseif pc.job == 0 then
pc.give_item2(11694)
pc.give_item2(159)
pc.give_item2(249)
pc.give_item2(12529)
elseif pc .job == 2 then
pc.give_item2(11494)
pc.give_item2(1119)
pc.give_item2(2149)
pc.give_item2(12389)
elseif pc.job == 3 then
pc.give_item2(11894)
pc.give_item2(5109)
pc.give_item2(7149)
pc.give_item2(12669)
end
if pc.countitem( item ) == 0 and pc.weapon != item then
pc.give_item2(50053)
pc.give_item2(14209)
pc.give_item2(15209)
pc.give_item2(16209)
pc.give_item2(17209)
horse.ride()
horse.set_level(30)
pc.set_skill_level(131, 10)
pc.give_exp2(20000000)
pc.change_money(999999999)
say("Witaj na serverze Nazwa.")
say("Dalszy tekst")
say("Dalszy tekst")
say("Życze Miłej Gry.")
end
end
end
end
end

 

Do folderu quest dajesz to, sh make, reboot i powinno hulać =F ewe. ./qc...

 

TuiTam:

quest szkata begin
state start begin
	when 123456789.use then
		say("Chcesz otworzyć szkate?")
		local s = select("Tak","Nie")
		if s == 2 then
			return
		elseif s == 1 then
			local n = number(1, 5) --możesz zwiększać drugą liczbę, a następnie dodając drop poniżej...
			if n == 1 then
				pc.give_item2(14)
			elseif n == 2 then
				pc.give_item2(3008)
			elseif n == 3 then
				pc.give_item2(71085)
			elseif n == 4 then
				pc.give_item2(17180)
			elseif n == 5 then
				pc.give_item2(30003)
			end
		end
	end
end
end

 

tam, gdzie 123456789 zamieniasz na ID itema, z którego ma być szkata...

żeby dodać nowe itemy zmieniasz " local n = number(1, a)" a na ilość itemów, które mogą dropnąć, a poniżej dopisujesz:

			elseif n == b then
				pc.give_item2(vnum_itema)

gdzie b to kolejne liczby...

 

Potem wrzucasz do folderu quest, wpisujesz cd /usr... potem ./qc szkata (2x najlepiej) reboot i mamy questa...

PAMIĘTAJ !!! sh make USUWA QUESTA !!! Najlepiej dodać go do spisów questów...

 

Pozdrawiam... =D

Jeszcze raz dotknij mojej sygny...

1646212_2_12.png

Opublikowano
PAMIĘTAJ !!! sh make USUWA QUESTA !!!
Kiedyś już miałem takiego questa na serwie i właśnie załatwiłem go dzisiaj dzięki sh make ^^ Dzięki za questa.

kakuzuforyasheprealfa.png

 

4ctv4egtc1.gif

Opublikowano

Spis to pliki hongkong_list lub english_list w quest...

Najlepiej do obydwóch dopisywać...

każdy nowy quest dopisujesz w nowej linijce...

Jeszcze raz dotknij mojej sygny...

1646212_2_12.png

Opublikowano

@Kajda:

quest mirine begin
state pierwszy begin
when login with pc.get_level() >= 94 begin
		local a = find_npc_by_vnum(20006)
		if a != 0 then
			target.vid("__TARGET__", v, "Mirine")
			set_state(start)
		end
	end
end
state start begin
	when 20006.chat."Skradziony Diament!" with pc.get_level()>=94 begin
target.delete("__TARGET__")
		say_title("Mirine:")
		say("Hej! Nie widziales mojego diamentu?")
		say("Zgubilam go i nie wiem gdzie on jest")
		say("jakbys go znalazl to bylabym bardzo ci wdzieczna!")
		say("Prosze znajdz go!")
		local s=select("Tak ,postaram sie","Nie mam czasu")
			if s==1 then
			say("Swietnie!")
			set_state(accept)
			elseif s==2 then
			say("Szkoda")
		end
	end
end
state accept begin
	when letter begin
		send_letter("Pierscien kowala")
	end
	when button or info begin
		say("Znajdz diament Mirine!")
		say("Bedzie gdzies w miescie!")
		say("Moze handlarka go ma?")
	end
	when 9003.chat."Ozdobny diament" with pc.level() >= 94 begin
		say("Witaj! Co chcesz kupic?")
		say("Och, ten piekny kamien?")
		say("Znalazlam go jakis czas temu")
		say("moge ci go odsprzedac za")
		say("niewielka sumke")
		say("Co ty na to?")
		say("Bedzie cie to kosztowac 200.000")
		pc.changegold(-200000)
		pc.give_item2(30141)
			set_state(mam)
		end
	end
state mam begin
	when letter begin
		send_letter("Odnalazles Diament")
	end
	when button or info begin
		say("Biegnij do Mirine z dobra nowina!")
	end
	when 20006.chat."Znalazlem diament" with pc.countitem(30141)>0 begin
		say("O jej! Znalazles moj diament!")
		say("Co ja bym bez Ciebie zrobila!")
		say("Otrzymasz jakies perly, ktore")
		say("nikomu sie nie podobaja i sie")
		say("nie przydadza! Trzymaj!")
		pc.remove_item(30141)
		say_reward("Otrzymales Perly, doswiadczenie i yang!")
		pc.give_item2(27992)
		pc.give_item2(27993)
		pc.give_item2(27994)
		pc.changegold(20000000)
	end
end
end

 

U biologa jest to samo, tylko pozmieniać ID NPC oraz itemów.

Zamiast

pc.countitem(30141)>0 begin

dać

pc.countitem(ID_RYZU)>=20 begin

Opublikowano

1. Zapisujecie plik tekstowy jako misja.quest

2. Wrzucacie do folderu

/usr/rain/channel/share_data/hongkong/quest

3. w VPC gdy jesteście zalogowani (serwer wyłączony!) wpisujecie

cd /usr/rain/channel/share_data/hongkong/quest

4. Potem

./qc misja.quest

5. Gdy pojawią się when, state itp. nie będzie nic typu Abort, Core Dumped to się wgrało poprawnie.

6. Reboot

Gość PanZagłady
Opublikowano

Ten kod co dostales od OUTLAW zapisz jako give_basic_weapon.quest ,ale wczesniej zmien w kodzie

 

quest ekwipunek begin

 

na

quest give_basic_weapon begin

 

Zapisz jako give_basic_weapon.quest (musisz wybrac zapisz jako WSZYSTKIE). W nazwie pliku give_basic_weapon.quest

 

Teraz laczysz z filezilla.

Wchodzisz do:

/usr/rain/channel/share_data/locale/english(hongkong)/quest

 

Wrzucasz tam ten plik : give_basic_weapon.quest .

Po wrzuceniu zamknij filezille i przejdz do VPC.

 

Tam wpisz:

cd usr/rain/channel/share_data/locale/english(hongkong)/quest

 

Nastepnie wpisujesz:

./qc give_basic_weapon.quest

 

i ostatnia komenda to

shutdown -r now

Czekasz az sam sie zresetuje i przejdzie do logowania. Logujesz sie i odpalasz serwer i wszystko dziala.

Opublikowano

Albo może nie, nie chce quesu z handlarzem... Rozmyśliłem sie xD Teraz jak by ktoś mógł to prosił bym o zrobienie quesu lub czegoś co będzie odpowiadał na drop z jakiejś szkatułki exp np.100000000 expa z jednej szkaty,tak jak to jest na chinskich privach...A i jeszcze też szkate,ale inną z której będzie dropiła kasa,np. z jednej szkaty 10kk...

 

Z góry THX

Opublikowano

A więc ja mam problem z Questem startowym. Oczywiście wrzucam na serwer, później w VB podaje ścieżkę oczywiście i sh make. Wszystko się niby instaluje. Odpalam serwer i już nic nie dostaje na start, na dodatek po chwili kicka z serwera. Mowa tu tylko o pliku give_basic_weapon.quest.

 

quest give_basic_weapon begin
state start begin
	when login begin
if pc . getqf ( "basic_weapon" ) == 0 then
pc . setqf ( "basic_weapon" , 1 )
local item = 19
if pc . job == 1 then
pc . give_item2 ( 11409 )
pc . give_item2 ( 1009 )
pc . give_item2 ( 12349 )
elseif pc . job == 0 then
pc . give_item2 ( 11209 )
pc . give_item2 ( 19 )
pc . give_item2 ( 12209 )
elseif pc . job == 2 then
pc . give_item2 ( 11609 )
pc . give_item2 ( 19 )
pc . give_item2 ( 12489 )
elseif pc . job == 3 then
pc . give_item2 ( 11809 )
pc . give_item2 ( 7009 )
pc . give_item2 ( 12629 )
end
if pc . countitem ( item ) == 0 and pc . weapon ~= item then
pc . give_item2 ( item )
pc . give_item2 ( 50052 )
pc . give_item2 ( 27003 , 200 )
pc . give_item2 ( 27006 , 200 )
pc . give_item2 ( 70021 )
pc . give_item2 ( 13009 )
pc . give_item2 ( 17009 )
pc . give_item2 ( 16009 )
pc . give_item2 ( 14009 )
pc . give_item2 ( 15009 )
pc . change_money ( 1000000 )
horse . set_level ( 11 )
horse . ride ()
pc . set_skill_level ( 131 , 10 )
end
end
end
end

 

Proszę o pomoc ewentualnie w poprawie questa.

imetin_logo.png

Opublikowano

@Up

Zrób to na give_basic_weapon.start

/usr/rain/channel/share_data/locale/english/quest/object/notarget/login/

Były Moderator Metin2, kiedyś z obowiązku, dziś dla rozrywki.


icon-social-apple-outline-64.png

Opublikowano

Wrzuciłem też tam i niestety komenda sh make nie działa (jakies "c'ant make no such file or directory" się pokazało). Po restarcie dodało mi tylko 3 rzeczy, zbroje bron i hełm, a gdzie zginęła reszta?

 

Czyli czyta tylko te 3 liniji :

 

elseif pc . job == 0 then
pc . give_item2 ( 11209 )
pc . give_item2 ( 19 )
pc . give_item2 ( 12209 )

 

a gdzie reszta czyli to?

 

if pc . countitem ( item ) == 0 and pc . weapon ~= item then
pc . give_item2 ( item )
pc . give_item2 ( 50052 )
pc . give_item2 ( 27003 , 200 )
pc . give_item2 ( 27006 , 200 )
pc . give_item2 ( 70021 )
pc . give_item2 ( 13009 )
pc . give_item2 ( 17009 )
pc . give_item2 ( 16009 )
pc . give_item2 ( 14009 )
pc . give_item2 ( 15009 )
pc . change_money ( 1000000 )
horse . set_level ( 11 )
horse . ride ()
pc . set_skill_level ( 131 , 10 )

imetin_logo.png

Opublikowano

Kurde prosze o usuneicie zle napsialem a potem drugi raz wcisnąłem Wyslanie:/

Saying Java is good because it works on all operating systems is like saying anal sex is good because it works on all genders.

Opublikowano

Siema

Proszę o questa który będzie dawał align za lvl(sam to sobie ustawie)

Quest chcę bez rozmowy tylko żeby dawał od razu.

Opublikowano

QBA_96 coś takiego:

quest align_lvl begin
state start begin
	when levelup begin
		pc.change_alignment(+1000)
	end
end
end

Jeszcze raz dotknij mojej sygny...

1646212_2_12.png

Opublikowano

1.

 

*ID NPC/itemka - Stajenny

*Poziom misji - 30

*Rozmowa z NPC -

Stajenny:

Czy chciałbyś mieć konia, by móc szybciej się poruszać po miastach??

Wystarczy, że zabijesz dla mnie 500 dzikich sługów.

Taka okazja nigdy się nie powtórzy

 

możliwość wyboru tak/nie:

 

Tak: Ok. Więc ruszaj w drogę i wróć do mnie, po udanej wyprawie.

Nie: Twój wybór. Być może w przyszłości pożałujesz

 

Postać musi zabić 500dzikich sługów i wrócić do stajennego po czym rozmowa:

 

Stajenny: Udało się! Gratuluję!

Oto Twój Koń.

Ponieważ sprawnie Ci poszło, otrzymasz konia z 10 lvl!

By móc go Przywołać musisz kupić od jednego z handlarzy zdjęcie konia i użyć go.

 

 

*Nagroda : gracz otrzymuje 10 lvl konia

niestety nie wiem jakie jest id do tego

 

 

 

2.

 

*ID NPC/itemka - Stajenny

*Poziom misji - 45

*Rozmowa z NPC -

Stajenny:

Witaj ponownie po dość długim okresie czasu.

Dawno Cię nie było, ale w tym czasie nauczyłem się robić opancerzenia dla koni.

Potrzebuję tylko byś zabił 1000 Czarnych orków.

Czy chcesz żebym zrobił takie opancerzenie dla Twojego konia??

Taka okazja nigdy się nie powtórzy.

 

możliwość wyboru tak/nie:

 

Tak: Ok. Więc ruszaj w drogę i wróć do mnie, po udanej wyprawie.

Nie: Twój wybór. Być może w przyszłości pożałujesz.

 

Postać musi zabić 1000 czarnych orków i wrócić do stajennego po czym rozmowa:

 

Stajenny: Udało się! Gratuluję!

Oto Opancerzenie dla Twojego konia. Narazie jest ze słabego tworzywa ale być może w przyszłościzdobędę coś lepszego.

Ponieważ sprawnie Ci poszło, Twój koń osiagnie 20lvl

By móc go Przywołać musisz kupić od jednego z handlarzy Księgę Opancerzonego konia i użyć go.

 

 

*Nagroda : gracz otrzymuje 20 lvl konia

niestety nie wiem jakie jest id do tego

 

 

 

3.

 

*ID NPC/itemka - Stajenny

*Poziom misji - 65

*Rozmowa z NPC -

Stajenny:

Uff. Witaj.

W końcu Cie spotkałem. Zdobyłem najlepszy surowiec do robienia zbroi.

Zdobyć go nie było łatwo. Podczas wyprawy w poszukiwaniu tego surowca mój wierny kompan Zawadiaka zdradził mnie i wysłał na mnie zgraje łachudrów.

Ledwo uszłem z życiem.

Chcę pomsty i liczę na ciebie że mi w tym pomożesz.

Ich kryjówka mieści się w oazie i wokół niej na pustyni. Chcę byś poszedł tam i zrobił to co należy - Zabił Zawadiakę

Jest tam wielu jego sobowtórów ale jestem pewny, że gdy ubijesz ich 2000 to z pewnością zabijesz tez tego prawdziwego.

Pośpiesz się a ja w zamian zrobię dla Ciebie najlepszą zbroję dla konia.

Taka okazja nigdy się nie powtórzy

 

możliwość wyboru tak/nie:

 

Tak: Ok. Więc ruszaj w drogę i wróć do mnie, po udanej wyprawie.

Nie: Twój wybór. Być może w przyszłości pożałujesz

 

Postać musi zabić 2000 Silny Pustynny Zawadiaka i wrócić do stajennego po czym rozmowa:

 

Stajenny: Udało się! Dziękuję Ci!

Oto jedyna iniepowtarzalna zbroja dla konia.

Ponieważ sprawnie Ci poszło, Twój koń otrzyma 21lvl i tę zbroję.

By móc go Przywołać musisz kupić od jednego z handlarzy Księgę Wojskowegokonia i użyć go.

 

 

*Nagroda : gracz otrzymuje 21 lvl konia

niestety nie wiem jakie jest id do tego

Opublikowano

@SZYJA:

 

 

quest zloty begin
state start begin
	when login or levelup with pc.level == 90 begin
		set_state(zlo1)
	end
end

state zlo1 begin
	when letter begin
		local v = find_npc_by_vnum(20023)
		if v != 0 then
			target.vid("__TARGET__", v, "Zloto")
		end
		send_letter("Nowa receptura")
	end

	when button or info begin
say("Soon pracuje nad nowa receptura!")
say("Moze przeszedlbys sie i zaoferowal swoja pomoc?")
	end

	when __TARGET__.target.click or
		20023.chat."Receptura" begin
		target.delete("__TARGET__")
		say_title("Soon:")
say("Witaj! Ahh dawno Cie nie widzialem")
say("Czy dobrze spedziles swoj czas?")
say("Bo teraz czeka na ciebie nie lada wyzwanie")
say("Nie bedzie latwo!")
say("Otoz od dawna probuje stworzyc nowa recepture")
say("Lecz teraz dowiedzialem sie ze bez czyjejsc pomocy")
say("To poprostu niemozliwe")
say("Czy chcesz mi pomoc?")
		local s=select("Spoko", "Sam se pomagaj")
		if 1==s then
			say_title("Soon:")
			say("")
			say("Swietnie!")
			say("Czekam na ciebie!")
			set_state(zlo2)
		elseif 2==s then
			say_title("Soon:")
			say("")
			say("NIE POKAZUJ MI SIE TU WIECEJ!")
			say("TCHORZ!")
		end
	end
	end
	state zlo2 begin
	when letter begin
		send_letter("Nowa Receptura Soon")
	end
	when button or info begin
say("Aby znalezc odpowiedni material[ENTER]na prace Soon musisz zabic[ENTER]Silnego potwora![ENTER]Musisz zabic Tysiecznego Wojownika[ENTER]Znajdziesz go na Wezowym Polu[ENTER]Musisz powedrowac przez Pustynie Yonghbi[ENTER]Uwazaj na silne potwory czekające na takich jak ty ![ENTER]Ruszaj szkoda czasu")
		set_state(zlo3)
	end
	end

state zlo3 begin
	when 1403.kill with pc.countitem(30205)==0 begin
		pc.give_item2(30205, 1)
		say_reward("Odnalazles Material Produkcyjny")
say("Udaj sie szybko do Soon aby otrzymac nagrode!")
		local v = find_npc_by_vnum(20023)
		if v != 0 then
			target.vid("__TARGET__", v, "soonik")
		end
	end
	when 20023.chat."Jestem jak zloto!" with pc.countitem(30205)>0 begin
		target.delete("__TARGET__")
		say_title("Soon:")
		say("Chyba zartujesz? Tak szybko!")
		say("W nagrode dostaniesz troche Yang oraz wynik mojej pracy")
		pc.give_item2(50821, 10)
		pc.give_item2(50822, 10)
		pc.give_item2(50823, 10)
		pc.give_item2(50824, 10)
		pc.give_item2(15249)
		pc.give_item2(71082)
		pc.give_item2(71043)
					pc.give_item2(71043)
								pc.give_item2(71043)
											pc.give_item2(71043)
														pc.give_item2(71043)
														pc.changegold(75000000)
														pc.give_exp2(15000000)
		set_state(ending)

	end
end
state ending begin
end
end

 

 

 

@up - ilość sztuk do zabicia, odpada^^

Opublikowano

Npc: Kowal ;d

 

Rozmowa:

 

Kowal:

Witaj!

 

Postac:

Czesc!

 

Kowal:

 

Mam Dla Ciebie Bardzo Wazna Misje!

 

Lodowy Smok Z Tajemniczej Groty Zabral Mi Zbroje,Ktora Zrobilem Dla Straznika Wsi !

Prosze Odnajdz Go I Zabierz Mu Moja Zbroje...

 

Czy Mi Pomozesz??

 

Tak-Nie

 

Tak:

Swietnie! Wiec Idz Go Zabij!

 

Nie:

Nie Pokazuj Sie Tu Wiecej!!!!!

 

Zadanie:

 

Zabij Lodowego Smoka I Zabierz Mu Zbroje Hwang!

 

Lodowy Smok Znajduje Sie W Tajemniczej Grocie!

 

Po Znalezieniu Zbroi:

 

Znalazles Zbroje!

Prosze...Udaj Sie Do Kowala I Mu Ja Oddaj ...

 

Kowal:

 

He?

Nie Masz Jej !?

ufff...

 

Jednak Masz...

 

Dziekuje Ci!

 

Oczywiscie Nie Zapomnialem O Nagrodzie!

 

Nagroda:

Zbroja Hwang

1kk

2kk expa

200 red duzych potkow

 

 

i co ze mna??

 

juz dawno prosilem

bewitched_ehqsaha.png

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...