Pisanie / Poprawa Questów !

shiner. · 16 Maja 2012

@CraiNs, spróbuj:
http://wklej.to/b4QWi
@Memento mori, może napisz jakie błędy, co poprawiłeś, bo ja nic nie widzę...

@Shiner, spróbuj:
http://wklej.to/dMQTG 

Ok dzieki, zadzialalo. A ktos ma moze wzor na dungeona do dt ? Wzor po prostu, z coordami, zabij to i to, idziesz dalej

Andraf · 16 Maja 2012

@JohnyNawa1ony

To czas kupić sobie okulary mocium panie - przypatrz się lepiej Wywaliłem 1 znak równości i zmieniłem położenie 1 end'a (oba błędy uniemożliwiały kompilację questa)

Kubaman · 17 Maja 2012

 quest metek begin
state start begin
when login or levelup with pc.level >= 70 begin
set_state(start)
end
end

state start begin
when letter begin
local v = find_npc_by_vnum(20355)
if v != 0 then
target.vid("__TARGET__", v, "Kapitan")
end
send_letter("Metin Ma-An")
end
when button or info begin
say_title("Metin Ma-An")
say("Kapitan potrzebuje pomocy.")
say("Udaj się do niego.")
say_reward("Kapitana znajdziesz na mapie.")
end

when __TARGET__.target.click or
20355.chat."To straszne!" begin
target.delete("__TARGET__")
say_title("Kapitan:")
say("Dlaczego bóg smoka zasłał na nas")
say("tak wielkie nieszczęście?")
say("Świat staje się co raz to bardziej niebezpieczny...")
wait()
say_title("Kapitan:")
say("Posłuchaj. Jest pewna sprawa.")
say("Ten potężny kamień zabija nam mieszkańców")
wait()
say_title("Metin Ma-An")
say_title("Poziom: 80")
say_title("Może cię zaskoczyć...")
wait()
say_reward("Kamień metin możesz znaleźć w M1")
say_reward("bądź udać się na mapę kamieni metin.")
say_reward("Zniszcz jednego.")
say_reward("Do tej pory zniszczyłeś".." "..pc.getqf("collect_count").."  

Metinów Ma-An.")
say("")
set_state(kill)
end
end
state kill begin
when 8025.kill begin
local count = pc.getqf("Czarny Ork") + 1

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

say_title("Kapitan:")
say("O tak, doskonała robota.")
say("Wioska będzie ci niezmiernie wdzięczna.")
say("Otrzymujesz nagrodę...")
wait()
say_title("100.000.000 yang")
say_title("100.000.000 PD")
pc.change_money(100000000)
pc.give_exp2("100000000")
pc.setqf("kill_count", pc.getqf("kill_count")+1)
set_state(__THEEND__)
end
end
end
end
state __THEEND__ begin
end
end

Normalnie się wgrywa, w grze też jest, ale gdy klikam w "To Straszne!" wyłącza okno rozmowy z NPC i nic się nie dzieje

CraiNs · 17 Maja 2012

Mógłby ktoś napisać questa:

Level Up 30>Wola xxx npc i chce abys przyniosl mu 50 xxx a potem odniosl nagrode dla Beak-Go On da ci skladnik jezeli wykonasz dla niego polowanie na xxx Mob.po Wykonaniu misji dostajesz nagrode xxx.

(Xxx)sam sobie edytuje=]

maniek1310 · 17 Maja 2012

@Kubaman poprawiłem ci tego questa , i trochę tego zoptymalizowałem

quest metek begin
state start begin
	when login or levelup with pc.level >= 70 begin
		set_state(start)
	end
end

state start begin
	when letter begin
		local v = find_npc_by_vnum(20355)
		if v != 0 then
			target.vid("__TARGET__", v, "Kapitan")
		end
		send_letter("Metin Ma-An")
	end

	when button or info begin
		say_title("Metin Ma-An")
		say("Kapitan potrzebuje pomocy.")
		say("Udaj się do niego.")
		say_reward("Kapitana znajdziesz na mapie.")
	end

	when __TARGET__.target.click or
	20355.chat."To straszne!" begin
		target.delete("__TARGET__")
		say_title("Kapitan:")
		say("Dlaczego bóg smoka zasłał na nas")
		say("tak wielkie nieszczęście?")
		say("Świat staje się co raz to bardziej niebezpieczny...")
		wait()
		say_title("Kapitan:")
		say("Posłuchaj. Jest pewna sprawa.")
		say("Ten potężny kamień zabija nam mieszkańców")
		wait()
		say_title("Metin Ma-An")
		say_title("Poziom: 80")
		say_title("Może cię zaskoczyć...")
		wait()
		say_reward("Kamień metin możesz znaleźć w M1")
		say_reward("bądź udać się na mapę kamieni metin.")
		say_reward("Zniszcz jednego.")
		say("")
	end

	when 8025.kill begin
		say_title("Kapitan:")
		say("O tak, doskonała robota.")
		say("Wioska będzie ci niezmiernie wdzięczna.")
		say("Otrzymujesz nagrodę...")
		wait()
		say_title("100.000.000 yang")
		say_title("100.000.000 PD")
		pc.change_money(100000000)
		pc.give_exp2(100000000)
		set_state(__THEEND__)
	end
end

state __THEEND__ begin
end
end

CraiNs · 17 Maja 2012

Elosia

szukam questa na drop zmianek i dodan od 1lv z wszystkich mobów.Zmianki dość duży % ale dodania maly.Niestety nie kumam mod_drop_item a po 2 to bardzo duzo roboty.jak mozecie to podstawice tylko szablon questa a ja edytuje id itp.

Kubaman · 18 Maja 2012

@Kubaman poprawiłem ci tego questa , i trochę tego zoptymalizowałem

quest metek begin
state start begin
	when login or levelup with pc.level >= 70 begin
		set_state(start)
	end
end

state start begin
	when letter begin
		local v = find_npc_by_vnum(20355)
		if v != 0 then
			target.vid("__TARGET__", v, "Kapitan")
		end
		send_letter("Metin Ma-An")
	end

	when button or info begin
		say_title("Metin Ma-An")
		say("Kapitan potrzebuje pomocy.")
		say("Udaj się do niego.")
		say_reward("Kapitana znajdziesz na mapie.")
	end

	when __TARGET__.target.click or
	20355.chat."To straszne!" begin
		target.delete("__TARGET__")
		say_title("Kapitan:")
		say("Dlaczego bóg smoka zasłał na nas")
		say("tak wielkie nieszczęście?")
		say("Świat staje się co raz to bardziej niebezpieczny...")
		wait()
		say_title("Kapitan:")
		say("Posłuchaj. Jest pewna sprawa.")
		say("Ten potężny kamień zabija nam mieszkańców")
		wait()
		say_title("Metin Ma-An")
		say_title("Poziom: 80")
		say_title("Może cię zaskoczyć...")
		wait()
		say_reward("Kamień metin możesz znaleźć w M1")
		say_reward("bądź udać się na mapę kamieni metin.")
		say_reward("Zniszcz jednego.")
		say("")
	end

	when 8025.kill begin
		say_title("Kapitan:")
		say("O tak, doskonała robota.")
		say("Wioska będzie ci niezmiernie wdzięczna.")
		say("Otrzymujesz nagrodę...")
		wait()
		say_title("100.000.000 yang")
		say_title("100.000.000 PD")
		pc.change_money(100000000)
		pc.give_exp2(100000000)
		set_state(__THEEND__)
	end
end

state __THEEND__ begin
end
end

Gdy idę do kapitana na początku, nie ma strzałki nad nim. Jakiś błąd?

Stelios · 18 Maja 2012

Elosia

szukam questa na drop zmianek i dodan od 1lv z wszystkich mobów.Zmianki dość duży % ale dodania maly.Niestety nie kumam mod_drop_item a po 2 to bardzo duzo roboty.jak mozecie to podstawice tylko szablon questa a ja edytuje id itp.

---------------------------------------
--- Misja by Czarny dla MPCForum  ---
--- Proszę o nie przypisywanie sobie---
--- cudzej pracy! Pozdrawiam 		---
---------------------------------------

quest drop begin
state start begin
	when kill with not npc.is_pc() begin
		local v = number(1, 200)
			if v >= 30 and v <= 90 then
				pc.give_item2( id, 1 )
			end
			if v >= 130 and v <= 145 then
				pc.give_item2( id2, 1 )
			end
	end
end
end

@EDIT

Jedyny problem questa z dropem (bez blokad) jest taki, że nawet na 255lvl itemki będą dropić np z dzikich psów.

Mondes · 18 Maja 2012

sam go pisałem, dałbyś chociaż lajka za robotę

Hahahaha.

Sam go pisałeś, śmieszny jesteś koleś...

--------------------------------------------
-- Wymiar Wladcow
-- Copyright © GrottoOfExile 2012.
-- All rights reserved.
--
-- Made by Matuszny1987
-- http://www.grottoofexile.pl
-- http://www.adriank.pl
-- http://www.youtube.com/adriank1410
-- Copyright ©2012. All rights reserved.
--
-- This quest and any others with comment
-- like this is GrottoOfExile private
-- Metin2 server copyright and is
-- protected by law in Poland and
-- in any other country.
--
-- If you have found or bought this file,
-- please contact us!
--
-- DO NOT REMOVE THIS COMMENT!
-- DO NOT COPY!
-- DO NOT PUBLISH!
-- DO NOT SELL!
--------------------------------------------

Kubaman · 18 Maja 2012

Gdy idę do kapitana na początku, nie ma strzałki nad nim. Jakiś błąd?

To jak, pomoże ktoś?

JonyNawa1ony · 18 Maja 2012

To jak, pomoże ktoś?

Ale ten quest jest w 100% poprawny:

quest metek begin
state start begin
when login or levelup with pc.level >= 70 begin
set_state(start)
end
end

state start begin
when letter begin
local v = find_npc_by_vnum(20355)
if v != 0 then
target.vid("__TARGET__", v, "Kapitan")
end
send_letter("Metin Ma-An")
end

when button or info begin
say_title("Metin Ma-An")
say("Kapitan potrzebuje pomocy.")
say("Udaj się do niego.")
say_reward("Kapitana znajdziesz na mapie.")
end

when __TARGET__.target.click or
20355.chat."To straszne!" begin
target.delete("__TARGET__")
say_title("Kapitan:")
say("Dlaczego bóg smoka zasłał na nas")
say("tak wielkie nieszczęście?")
say("Świat staje się co raz to bardziej niebezpieczny...")
wait()
say_title("Kapitan:")
say("Posłuchaj. Jest pewna sprawa.")
say("Ten potężny kamień zabija nam mieszkańców")
wait()
say_title("Metin Ma-An")
say_title("Poziom: 80")
say_title("Może cię zaskoczyć...")
wait()
say_reward("Kamień metin możesz znaleźć w M1")
say_reward("bądź udać się na mapę kamieni metin.")
say_reward("Zniszcz jednego.")
say("")
end

when 8025.kill begin
say_title("Kapitan:")
say("O tak, doskonała robota.")
say("Wioska będzie ci niezmiernie wdzięczna.")
say("Otrzymujesz nagrodę...")
wait()
say_title("100.000.000 yang")
say_title("100.000.000 PD")
pc.change_money(100000000)
pc.give_exp2(100000000)
set_state(__THEEND__)
end
end

state __THEEND__ begin
end
end

Może masz jeszcze wgrany stary, błędny quest.

maniek1310 · 19 Maja 2012

@Kubaman najpierw usuń stary ponieważ zmieniałem state , się wgrał podwójnie ten quest

old_kwiatosz · 19 Maja 2012

Kiedyś chyba gdzieś o to pytałem, ale nie mogę znaleźć, jak zrobić tak:

if get_time() < pc.getqf("kwiat")

say("Pozostało tobie czasu: "..czas) -- czas, jak zrobić, aby pisało, zostało 30 minut, 29 minut i tak dalej, co odświeżenie

pc.setqf("kwiat", get_time()+30*60)

end

CraiNs · 19 Maja 2012

Witam mógłby ktoś dac link do działającej komnaty smoka lub poprawić tą,aby działała na Hasło i otwierala sie co 45min?

Prosze:

quest baba begin

state start begin

when 30121.chat."Co znajduje się w komnacie" begin

say_title("Duch Sury:")

say("W komnacie zbajduje się Beran Setaou")

say("zwany Niebiańskim Smokiem")

say("Pokonać go może tylko najmężniejsza")

say("drużyna.")

end

when 30121.chat."Chce zabić tego smoka" begin

if get_time() > pc.getqf("czas") then

else

say_title("Duch Sury:")

say("Nie możesz wejść jeszcze do komnaty Smoka")

return

end

say_title("Duch Sury:")

say("Jesteś pierwszym który domaga się ")

say("dostępu do Świątyni Smoka. Wpuszczę Cię ")

say("o ile posisadasz wystarczającą ilość ")

say("Krętych Kluczy.")

local s = select ( "Jestem Gotów", "Wyjdz" )

if s != 1 then

return

end

say_title("Duch Sury:")

say("Jeśli chcesz zabiore Cię bezpośrednio")

say("do jaskini Smoka. Daj mi teraz: ")

say_item(" 3x Kręty Klucz", 30179, "")

local a = select ( "Daj Klucze", "Wyjdz" )

if a != 1 then

return

end

if pc.count_item(30179)>2 then

pc.remove_item(30179, 3)

say("Zostaniesz przeniesiony do komnaty")

pc.warp(178300, 1220400)

notice_all("Komnata Smoka została otwarta.")

pc.setqf("smok", 1)

else

say("Nie masz wystarczjącej ilości kluczy")

return

end

when 2493.kill begin

notice_all("Beran Setaou został pokonany!!... gratulujemy")

pc.setqf("czas",get_time()+60*60)

notice_all("Za minute nastąpi zamknięcie komnaty.")

timer("close", 61)

timer("close2", 30)

end

when close2.timer begin

notice_all("Za pół minuty nastąpi zamknięcie komnaty.")

end

when close.timer begin

if get_time() > pc.getqf("czas2") and

pc.getqf("smok") == 1 then

pc.warp(179900, 1220400)

else

end

when logout or login begin

if get_time() < pc.getqf("czas") and

pc.getqf("smok") == 1 then

pc.warp(179900, 1220400)

pc.setqf("smok", 0)

else

end

CraiNs · 19 Maja 2012

kwiatmix moze ty sie wypowiesz?

Znasz sie na tych rzeczach jak malo kto.

shiner. · 20 Maja 2012

Witam, wywala mi ten oto błąd

http://scr.hu/0cf/vn9he

Treść questa:

http://pastebin.pl/61493

Jeśli ktoś by go poprawił. I stylistycznie, i do działania, byłbym dozgodnie wdzięczny

Quori · 20 Maja 2012

@ shiner.

jak to ma działać skoro brakuje sporo rzeczy ;s następnym razem sprawdź czy nie brakuje Ci end'ów albo czegoś nie zjebałeś ;s

+ nie wiem czy będzie działać bo jak teraz zobaczyłem to brakuje Ci sporo rzeczy w queście, a ja Ci przerabiać go całkowicie nie będę...

http://wklej.to/DUVa6

Welnes · 20 Maja 2012

Zna ktoś może funkcję :

pc.refine_equip()

Jeśli tak to prosiłbym o jej krótkie example + opis .

JonyNawa1ony · 20 Maja 2012

@shiner., spróbuj moją poprawkę

http://wklej.to/FXDhJ

Quori · 20 Maja 2012

@shiner., spróbuj moją poprawkę
http://wklej.to/FXDhJ

aha zapomniałem na końcu przerobić z = na ==

CraiNs · 20 Maja 2012

Witam mógłby ktoś dac link do działającej komnaty smoka lub poprawić tą,aby działała na Hasło i otwierala sie co 45min?

Prosze:

quest baba begin

state start begin

when 30121.chat."Co znajduje się w komnacie" begin

say_title("Duch Sury:")

say("W komnacie zbajduje się Beran Setaou")

say("zwany Niebiańskim Smokiem")

say("Pokonać go może tylko najmężniejsza")

say("drużyna.")

end

when 30121.chat."Chce zabić tego smoka" begin

if get_time() > pc.getqf("czas") then

else

say_title("Duch Sury:")

say("Nie możesz wejść jeszcze do komnaty Smoka")

return

end

say_title("Duch Sury:")

say("Jesteś pierwszym który domaga się ")

say("dostępu do Świątyni Smoka. Wpuszczę Cię ")

say("o ile posisadasz wystarczającą ilość ")

say("Krętych Kluczy.")

local s = select ( "Jestem Gotów", "Wyjdz" )

if s != 1 then

return

end

say_title("Duch Sury:")

say("Jeśli chcesz zabiore Cię bezpośrednio")

say("do jaskini Smoka. Daj mi teraz: ")

say_item(" 3x Kręty Klucz", 30179, "")

local a = select ( "Daj Klucze", "Wyjdz" )

if a != 1 then

return

end

if pc.count_item(30179)>2 then

pc.remove_item(30179, 3)

say("Zostaniesz przeniesiony do komnaty")

pc.warp(178300, 1220400)

notice_all("Komnata Smoka została otwarta.")

pc.setqf("smok", 1)

else

say("Nie masz wystarczjącej ilości kluczy")

return

end

end

when 2493.kill begin

notice_all("Beran Setaou został pokonany!!... gratulujemy")

pc.setqf("czas",get_time()+60*60)

notice_all("Za minute nastąpi zamknięcie komnaty.")

timer("close", 61)

timer("close2", 30)

end

when close2.timer begin

notice_all("Za pół minuty nastąpi zamknięcie komnaty.")

end

when close.timer begin

if get_time() > pc.getqf("czas2") and

pc.getqf("smok") == 1 then

pc.warp(179900, 1220400)

else

end

end

when logout or login begin

if get_time() < pc.getqf("czas") and

pc.getqf("smok") == 1 then

pc.warp(179900, 1220400)

pc.setqf("smok", 0)

else

end

end

end

end

odpowie ktos?

JonyNawa1ony · 20 Maja 2012

zwracam się do was z prośbą o pomoc.

Proszę was o:

-pomysły na nowe questy

Na przykład trzeba iść do kapitana, zabić 40 psów/ udać się do handlarki, potem do ahyu zdobyć 10 map z demonów itd. -- To są przykłady wymyślone na szybko.

Chciałbym abyście podeszli do tego poważnie i dokładnie napisali tutaj swoje pomysły, co trzeba zrobić (+ najlepiej rozmowy ).

Pomysły, które mi się spodobają i skorzystam z nich, nagrodzę w formie "+" -- zależy od wyobraźni

Najlepiej, żeby to były bardzo rozbudowane, długie pomysły.

Bardzo was o to proszę, ja już wykorzystałem wszystkie swoje pomysły.

Liczę na was, na pewno macie również ciekawe.

CraiNs · 21 Maja 2012

Da ktoś link na działającą komnate?

Asti™ · 21 Maja 2012

Witam pomoże kto w napisaniu funkcji? ( lub poda wzór co dokładnie w takiej funkcji trzeba napisać aby otrzymać pożądany efekt?)

konkretnie chodzi mi o to aby coś wyciągnąć z MySQL z konkretnej tabelki

Welnes · 21 Maja 2012

Witam pomoże kto w napisaniu funkcji? ( lub poda wzór co dokładnie w takiej funkcji trzeba napisać aby otrzymać pożądany efekt?)

konkretnie chodzi mi o to aby coś wyciągnąć z MySQL z konkretnej tabelki


function query_select(sql)  -- /usr/local/bin/ przed mysql  jeśli nie działa
os.remove(var.outputfile)
local user = "mt2"
local pw = "mt2!@#"
local var = {}
var.pre = ''
var.pre = var.pre..' -u'..user
var.pre = var.pre..' -p'..pw
var.outputfile = "op_"..pc.get_name()..number(1,999)..number(2,999)..number(3,999)
local sql = string.gsub(sql,'"',"'")
var.str = "mysql -N -L "..var.pre.."  --execute='"..sql.."' > "..var.outputfile
os.execute(var.str)
local zwroc = io.open(var.outputfile)
local quer = zwroc:read()
zwroc:flush()
zwroc:close()
os.remove(var.outputfile)
return quer
end

Tym wyciągniesz informacje z konkretnej tabelki, mam jeszcze kilka podobnych funkcji. Jbc to pw.

Zaloguj się

👋 Witaj na MPCForum!

Pisanie / Poprawa Questów !

Rekomendowane odpowiedzi

Zarchiwizowany