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 / Poprawa Questów !

PoczatKujacy

Przez PoczatKujacy
w Metin2 - Questy, Dify, C++, Python

Rekomendowane odpowiedzi

  • Odpowiedzi 8,7 tys.
  • Dodano
  • Ostatniej odpowiedzi
z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano

@Kubaman

http://wklej.to/Zfesp

 

@Vito

http://wklej.to/L9uBB

dopisz tutaj na końcu jeden end bo mnie zabrakło :P

 

@Hannibal

http://wklej.to/f1kPa

 

umarł

Kubaman Mentor

Kubaman

Opublikowano
Mentor

Kubaman

Opublikowano

Mam problem.

http://wklej.to/KHklQ

Przenosząc się na inną mapę/logując dostaję bryłkę złota, jednak jeżeli osiągnę ilość yang równą bądź większą zabijając moby, nie dodaje mi bryły i nie zabiera yang.

누가 뭐라 해도 난 나야 난 그냥 내가 되고 싶어
I WANNA BE ME ME ME

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano 

http://wklej.to/ZRBwS

Jeżeli nie działa przy zabijaniu to najprawdopodobniej masz jeszcze drugi quest, który używa funkcji when kill, co koliguje ze sobą.

 

umarł

N3ST0 Mentor

N3ST0

Opublikowano
Mentor

N3ST0

Opublikowano

Mam problem co w tym queście jest źle napisane

quest mapa begin
    state start begin
		    when login or levelup with pc.level <= 10 begin
				    set_state(info)
		    end
    end

  state info begin
		    when letter begin
				    local v = find_npc_by_vnum(20011)
				    if v != 0 then
						    target.vid("__TARGET__", v, "Uriel")
				    end
				    send_letter("Zagubiona Mapa")
		    end

   when button or info begin
				    say_title("Udaj sie do Uriela")
  say("")
  say("Ma on do Ciebie prosbe")
   end

  when __TARGET__.target.click or
				    20011.chat."Zagubiona Mapa" begin
				    target.delete("__TARGET__")
	 say("Uriel")	 
    say("Dziki zjadly mi mape")
    say("Prowadzila mnie ona do")
    say("Doliny Orkow")
    say("")
    say("Czy moglbys ja dla mnie odzyskac?")
    say("")
    say("Oczywiscie wynagrodze twoja pomoc")
				    set_state(zabij)
					 end
		    end

state zabij begin
when letter begin
send_letter("Zagubiona Mapa")
end
when button or info begin
	  say_title("Zagubiona Mapa")
	  say("")
								    say("Dziki zjadly urielowi mape")
	  say("")
	  say("Zabijaj je az wypluja mape")
end
when ID_MOBA.kill with pc.countitem(30131)==0 begin
  local random = math.random(1)
  if random == 1 then
  pc.give_item2(30131, 1)
  chat("Zdobyles mape Uriela")
  chat("Udaj sie do niego")
local v = find_npc_by_vnum(20011)
if v != 0 then
target.vid("__TARGET__", v, "Uriel")
end
end
end
 when 20011.chat."Zagubiona Mapa" with pc.countitem(30131)>0 begin
				    say_title("Uriel:")
target.delete("__TARGET__")
say("Swietnie !")
say("")
say("Odzyskales mape , podaj mi ja")
say("")
say("Ohh")
say("Bardzo Ci dziekuje")
say("Nareszcie moge sie udac do Doliny")
say("")
say("A tak nagroda bylbym zapomnial")
say("Prosze oto i ona")
															 pc.remove_item(30131, 1)				
if pc.job == 0 then
pc.give_item2(11299)
if pc.job == 1 then
pc.give_item2(11499)
if pc.job == 2 then
pc.give_item2(11699)
if pc.job == 3 then
pc.give_item2(11899)
end
									  set_state(__COMPLETE__)
										    end
		    end
		    state __COMPLETE__  begin
		    end
end

185241494535326637230.png

Kubaman Mentor

Kubaman

Opublikowano
Mentor

Kubaman

Opublikowano 

http://wklej.to/ZRBwS

Jeżeli nie działa przy zabijaniu to najprawdopodobniej masz jeszcze drugi quest, który używa funkcji when kill, co koliguje ze sobą.

Teraz działa. Naprawdę dziękuje.

Mam teraz kolejne zlecenie dla questerów.

Czy może mi ktoś napisać takie zadanie?:

 

Udajemy się do NPC 20084, on coś tam pierdoli, potem pyta się czy chcemy wymienić 50 sztuk xxx na item(pojawia się wybór):

zzz, ccc, yyy, ppp

Jeśli mamy 50 sztuk xxx, wymiana przechodzi pomyślnie, jeśli nie, NPC mówi że nie mamy wystarczającej ilości xxx.

누가 뭐라 해도 난 나야 난 그냥 내가 되고 싶어
I WANNA BE ME ME ME

!sVp Pomocnik

!sVp

Opublikowano
Pomocnik

!sVp

Opublikowano

Po zabiciu moba o id 2591 zamiast dropić item to czyści się regen, a powinien dopiero jak przeniosę ten item na posąg. Troszke dziwne.

 

when 2591.kill with d.getf("dokatakumb") > 0 begin
d.notice("Tartar został pokonany!")
game.drop_item(30312, 1)
end
when 30102.take with item.vnum == 30312 begin
item.remove()
timer("charon", 5)
npc.purge()
d.clear_regen()
d.notice("Udało się!")
end

Kubaman Mentor

Kubaman

Opublikowano
Mentor

Kubaman

Opublikowano

@ElvonPL

when ID_MOBA.kill with pc.countitem(30131)==0 begin

W miejsce ID_MOBA musisz wpisać ID potwora, z którego ma dropić mapa.

누가 뭐라 해도 난 나야 난 그냥 내가 되고 싶어
I WANNA BE ME ME ME

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano

@Elvon

http://wklej.to/LJDLk

Następnym razem podaj co jest nie tak i questy wstawiaj albo na stronę wklej.to, albo używaj spoilerów.

 

@Kubaman

http://wklej.to/M44pk

 

@down

chyba tak, nie zwróciłem uwagi ;)

 

umarł

JonyNawa1ony Znawca

JonyNawa1ony

Opublikowano
Znawca

JonyNawa1ony

Opublikowano

z4z0l, mam pytanie do tego questu od Kubaman,

Jak wybierze Anuluj to chyba też pc.remove_item(xxx, 50) się wykona.

KONIEC


-----------------------------------------


2013-08-15

dragmast16 Nowicjusz

dragmast16

Opublikowano
Nowicjusz

dragmast16

Opublikowano

mam prośbe napisze mi ktoś questa takie coś jak do biologa tylko,że oddajemy tej surze na dolinie. Musimy oddać 20 krwistych kamieni ( na pl te przepustki do groty) i jak oddamy 1 razem dostaniemy bonus : 20% na ludzi na stałe. Znowu 2 razem jak oddamy 400 defa na stałe. I 3 raz jak oddamy 800 ataku na stałe. Kto mi to napisze dostaje + bardzo proszę ;)

!sVp Pomocnik

!sVp

Opublikowano
Pomocnik

!sVp

Opublikowano

Co dopisać do questa aby sprawdzało u każdej osoby po porozmawianiu z npc w dungeonie czy posiada item o id np 999.

Ten kto posiada zostaje przeniesiony dalej, a kto nie, zostaje wyrzucony z dungeona.

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano 
if pc.count_item(999) >= 1 then
  say("WCHODZISZ")
else
  say("Nie posiadasz przedmiotu 999")
end

 

umarł

kwint Odkrywca

kwint

Opublikowano
Odkrywca

kwint

Opublikowano

Witam. Mam problem z questem. Zmodyfikowałem nieco quest, wgrałem do serwera, nadałem chmod 777 i zacząłem wgrywać poprzez funkcje ./qc nazwa.quest. Nie wiem gdzie jest problem/ Ale serwer wywalił mi błąd:

 

synstax error : [string "start"]:8: <eof> expected near 'elseif'

kupexp.quest:44:Abort (core dumped)

 

A oto quest:

------------------------------------------------

quest kupexp begin

state start begin

when 20355.chat."Chciałbym kupić Exp" begin

say("Jeżeli nie ma dialogu Kup Exp to przeczytaj informację!")

local s = select("Informacja", "Kup Exp", "Anuluj")

if s == 1 then

say("Musisz posiadać 70 sztabek złota, by kupić doświadczenie.")

say("Gdy będziesz miał 70 sztabek złota,")

say("wtedy pojawi się dialog ''Kup Exp''.")

end

elseif s == 2 then

say_title("Kapitan:")

say("Powiadasz, że chciałbyś kupić więcej doświadczenia?")

say("")

say_title(pc.get_name()..":")

say("Pewnie!")

say("")

wait()

say_title("Kapitan:")

say("Załatwione!")

say("Nie widzę w tym problemu.")

say("Musisz tylko za to zapłacić.")

say("Hmm... myślę, że 70 sztabek złota powinno wystarczyć.")

say("Wpisz ile doświadczenia chcesz dostać?")

say("")

say_title("Informacja")

say_reward("Pamiętaj!!")

say_reward("Nie przesadź z liczbami bo może Ci się ")

say_reward("postać zbugować lub Cię wyloguje.")

say("")

say("Wpisz ilość doświadczenia:")

 

local e=input()

if e == "" then

say("Musisz podać ilość doświadczenia!")

npc.unlock()

return

else

pc.give_exp2(e)

pc.remove_item(80007, 70)

say_reward("Otrzymałeś: "..e.." Punktów Doświadczenia")

end

 

end

end

end

------------------------------------------------

Prosiłbym o poprawienie go i pokazanie mi błędu.

z4z0l Bywalec

z4z0l

Opublikowano
Bywalec

z4z0l

Opublikowano 

http://wklej.to/yjfB0

Questy dodawaj w znaczniku code oraz w spoilerze, ewentualnie strona wklej.to. Błędem było zamknięcie if'a w 11 linijce.

 

umarł

kwint Odkrywca

kwint

Opublikowano
Odkrywca

kwint

Opublikowano 

http://wklej.to/yjfB0

Questy dodawaj w znaczniku code oraz w spoilerze, ewentualnie strona wklej.to. Błędem było zamknięcie if'a w 11 linijce.

 

Sory, ok, następne questy będę dodawał w spoilerach lub na wklej.to.

Dzięki za poprawienie ;]

N3ST0 Mentor

N3ST0

Opublikowano
Mentor

N3ST0

Opublikowano

Cześć , znowu jestem tu z problemem . Czy mógłby mi ktoś poprawić tego questa żeby było napisane po Polsku jakie metiny są do rozwalenia a nie jakieś szlaczki ?

Od razu proszę napisać jak to zrobić oczywiście nagradzam .

 

quest metin begin

state start begin

when login or levelup with pc.level >= 15 begin

setstate(info)

end

end

state info begin

when letter begin

send_letter("Polowanie 15 lvl")

end

when button or info begin

say_title("Polowanie 15 lvl")

say("")

say("Gratulujemy! Wlasnie wbiles 15 lvl!")

say("Twoim zadaniem jest zabicie 5: ")

say_reward("Metin Bitwy(8003)")

local s = select("Przyjmuje", "Nie chce")

if s == 2 then

setstate(koniec)

end

if s == 1 then

setstate(opk)

end

end

end

state opk begin

when letter begin

send_letter("Polowanie 15 lvl")

end

when 8003.kill begin

local count = pc.getqf("ile")+1

if count < 5 then

pc.setqf("ile", count)

q.set_counter("Pozostało ", 5 - count)

else

setstate(list)

end

end

when button or info begin

say("Zabij 5: ")

say_reward(""Metin Bitwy(8003)")

say("")

say_reward("Dotychczas zabiłeś: "..Metinow Bitwy("ile").."")

end

end

state list begin

when letter begin

send_letter("Polowanie 15 lvl")

end

when button or info begin

say_title("Polowanie 15 lvl")

say("") say("Udalo ci sie! Gratulujemy! ")

say("Zgodnie z obietnicą nagroda przyznana. ")

pc.give_item2( 1009, 1)

setstate(koniec)

end

end

state koniec begin

end

end

 

185241494535326637230.png

lopescio Weteran

lopescio

Opublikowano
Weteran

lopescio

Opublikowano

Cześć , znowu jestem tu z problemem . Czy mógłby mi ktoś poprawić tego questa żeby było napisane po Polsku jakie metiny są do rozwalenia a nie jakieś szlaczki ?

Od razu proszę napisać jak to zrobić oczywiście nagradzam .

 

quest metin begin

state start begin

when login or levelup with pc.level >= 15 begin

setstate(info)

end

end

state info begin

when letter begin

send_letter("Polowanie 15 lvl")

end

when button or info begin

say_title("Polowanie 15 lvl")

say("")

say("Gratulujemy! Wlasnie wbiles 15 lvl!")

say("Twoim zadaniem jest zabicie 5: ")

say_reward("Metin Bitwy(8003)")

local s = select("Przyjmuje", "Nie chce")

if s == 2 then

setstate(koniec)

end

if s == 1 then

setstate(opk)

end

end

end

state opk begin

when letter begin

send_letter("Polowanie 15 lvl")

end

when 8003.kill begin

local count = pc.getqf("ile")+1

if count < 5 then

pc.setqf("ile", count)

q.set_counter("Pozostało ", 5 - count)

else

setstate(list)

end

end

when button or info begin

say("Zabij 5: ")

say_reward(""Metin Bitwy(8003)")

say("")

say_reward("Dotychczas zabiłeś: "..Metinow Bitwy("ile").."")

end

end

state list begin

when letter begin

send_letter("Polowanie 15 lvl")

end

when button or info begin

say_title("Polowanie 15 lvl")

say("") say("Udalo ci sie! Gratulujemy! ")

say("Zgodnie z obietnicą nagroda przyznana. ")

pc.give_item2( 1009, 1)

setstate(koniec)

end

end

state koniec begin

end

end

 

Zapewne gdzieś w bazie masz szlaczki

dragmast16 Nowicjusz

dragmast16

Opublikowano
Nowicjusz

dragmast16

Opublikowano

mam prośbe napisze mi ktoś questa takie coś jak do biologa tylko,że oddajemy tej surze na dolinie. Musimy oddać 20 krwistych kamieni ( na pl te przepustki do groty) i jak oddamy 1 razem dostaniemy bonus : 20% na ludzi na stałe. Znowu 2 razem jak oddamy 400 defa na stałe. I 3 raz jak oddamy 800 ataku na stałe. Kto mi to napisze dostaje + bardzo proszę ;)

Gość Noresta™

Gość Noresta™

Opublikowano

Gość Noresta™

Opublikowano

Napisze mi ktoś questa :

 

-Klikamy na npc i mamy opcje przeniesienie na

 

-Musimy mieć min 3 osobowe pt i item o id xxx

 

-Po przenieseiu na kordy xxxx, xxxx znika nam te item i tepa nas na tą mapę

 

-Respią nam się tam moby o id xxx

 

-Po zabiciu tego moba wyskakuje komunikat Grupa xxx zabiła bossa xxxx.

Wojtek Budowniczy

Wojtek

Opublikowano
Budowniczy

Wojtek

Opublikowano

Nexicoll nie wiem czy dobrze myśle ale w tym quescie: http://wklej.to/XIF4A nie powinno być gdzieś dodawanie yang ??? chodzi mi o to że chyba nie doda yangow nie wiem czy się myle bo go jeszcze nie sprawdzalem ale jesli sie myle to przepraszam

 


#1 Zmiana Bonów u NPC


http://www.mpcforum.pl/topic/1069304-ss-tyria-zmiana-bonow-u-npc-1/


#2 Item Shop/Av Shop w grze


http://www.mpcforum.pl/topic/1089778-ss-tyria-itemshopavshop-w-grze-2/


#3 Nowy wybór z Tworzenia postaci z wyborem Zwierzaczka


xxx


#4 System Wiadomośći Offline


http://www.mpcforum.pl/topic/1069761-ss-tyria-system-wiadomosci-offline-4/


#5 Hazard


http://www.mpcforum.pl/topic/1076225-ss-tyria-hazard-5/


#6 MultiShopy


http://www.mpcforum.pl/topic/1089570-ss-tyria-multi-shopy-6/


#7 Kosz na Przedmioty


http://www.mpcforum.pl/topic/1100116-ss-tyria-kosz-na-przedmioty-7/


#8 System Marmurków


http://www.mpcforum.pl/topic/1103183-ss-tyria-system-marmurkow-8/


#9 Kolorowe Nazwy Sklepów


http://www.mpcforum.pl/topic/1103237-ss-kolorowe-nazwy-sklepow-9      


#10 Gui Rankingu i Statystyk postaci


http://www.mpcforum.pl/topic/1253008-ss-gui-rankingu-i-statystyk-postaci-10



 


Hardkorrek aka Gebel.

reacT Pasjonat

reacT

Opublikowano
Pasjonat

reacT

Opublikowano

Witam poszukuje questa, na fryzury.

  • ID NPC 33003

Funkcje najlepiej żeby były takie:

  • Wybór płci, rodzaj fryzury, kolor.

​A także questa, który pokazuje kto dołączył do gry.

  • np. "nick gracza" dołączył do gry. Życzymy miłej gry na serwerze .

Nie ma lipy! Pompa musi być!

 

Hardkorowy koksu, szacunek!

Zarchiwizowany

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

Tematy
×
×
  • Dodaj nową pozycję...