[Quest] HP_FIX

Usama Su kocken · 8 Listopada 2012

Pierscien TP ze sklepikiem duzo osob chce to:

quest pierscien_tp begin
 state start begin
		 when 80009.use with pc.get_level() >= 30 begin
local q = select ( "Teleportacja", "Sklep", "Wyjdź " )
if q == 1 then
local w = select ( "Wioski", "Miejsca specjalne", "Expowiska", "Wyjdź ")
if w == 1 then
local r = select ( "Shinsoo" , "Chunjo" , "Jinno" , "Wyjdź " )
if r == 1 then
local miasto = select ("Shinsoo M1", "Shinsoo M2", "Wyjdź ")
if miasto == 1 then
pc.warp ( 474300 , 954800 )
elseif miasto == 2 then
pc.warp ( 353100 , 882900 )
end
elseif r == 2 then
local miasto = select ("Chunjo M1", "Chunjo M2", "Wyjdź ")
if miasto == 1 then
pc.warp ( 63800 , 166400 )
elseif miasto == 2 then
pc.warp ( 145500 , 240000 )
end
elseif r == 3 then
local miasto = select ("Jinno M1", "Jinno M2", "Wyjdź ")
if miasto == 1 then
pc.warp ( 959900 , 269200 )
elseif miasto == 2 then
pc.warp ( 863900 , 246000 )
end
end
elseif w == 2 then
local y = select ( "Pod Wieżę Demonów - 60 LvL", "Ziemia Gigantów - 75 LvL", "Wyjdź " )
if y == 1 then
if pc.level >= 60 then
pc.warp ( 590500 , 110500 )
elseif pc.level < 60 then
syschat("Pod Wieżę Demonów możesz zostać przeniesiony od 60 poziomu")
end

elseif y == 2 then
if pc.level >= 75 then
pc.warp ( 845100 , 745900 )
elseif pc.level < 75 then
syschat("Na Ziemię Gigantów możesz zostać przeniesiony od 75 poziomu")
end
end
elseif w == 3 then
local u = select("Łatwe", "Średnie", "Trudne", "Wyjdź ")
if u == 1 then
local i = select ( "Dolina Orków" , "Świątynia Hwang", "Pustynia Yongbi" , "Góra Sohan" , "Loch Pająków V1" , "Ognista Ziema" , "Wyjdź " )
if i == 1 then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 402100 , 673900 )
elseif empire == 2 then
pc.warp ( 270400 , 739900 )
elseif empire == 3 then
pc.warp ( 321300 , 808000 )
end

elseif i == 2 then
pc.warp ( 16100 , 94300 )

elseif i == 3 then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 217800 , 627200 )
elseif empire == 2 then
pc.warp ( 221900 , 502700 )
elseif empire == 3 then
pc.warp ( 344000 , 502500 )
end

elseif i == 4 then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 434200 , 290600 )
elseif empire == 2 then
pc.warp ( 375200 , 174900 )
elseif empire == 3 then
pc.warp ( 491800 , 173600 )
end

elseif i == 5 then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 60000 , 496000 )
elseif empire == 2 then
pc.warp ( 60000 , 496000 )
elseif empire == 3 then
pc.warp ( 60000 , 496000 )
end

elseif i == 6 then
local empire = pc . get_empire ( )
if empire == 1 then
pc.warp ( 599400 , 756300 )
elseif empire == 2 then
pc.warp ( 597800 , 622200 )
elseif empire == 3 then
pc.warp ( 730700 , 689800 )
end
end

elseif u == 2 then
local p = select ( "Loch Pająków V2 - 60LvL & przepustka" , "Czerwony Las - 80LvL", "Wyjdź " )
if p == 1 then
if pc.level >= 60 and pc.count_item(71095) > 0 then
pc.remove_item(71095, 1)
pc.warp ( 704100 , 464100 )
elseif pc.level < 60 then
syschat("Nie posiadasz 60 poziomu, nie mogę Cię przenieść ")
elseif pc.level >= 60 and pc.count_item(71095) == 0 then
syschat("Nie posiadasz przepustki, nie mogę Cię przenieść ")
end

elseif p == 2 then
if pc.level >= 80 then
pc.warp ( 1119900 , 70800 )
elseif pc.level < 80 then
syschat("Nie posiadasz 80 poziomu, nie mogę Cię przenieść ")
end
end
elseif u == 3 then
local a = select ( "Grota Wygnańców V1 - 75 LvL & Krwisty Kamień ", "Grota Wygnańców V2 - 75 LvL & Krwisty Kamień ", "Wyjdź ")
if a == 1 then --30190 id krwistego kamienia
if pc.level >= 75 and pc.count_item(30190) > 0 then
pc.remove_item(30190, 1)
pc.warp ( 9800 , 1215100 ) -- wpisac ID na doline orkow pod teleportera do V1
elseif pc.level < 75 then
syschat("Nie posiadasz 75 poziomu, nie mogę Cię przenieść ")
elseif pc.level >=75 and pc.count_item(30190) == 0 then
syschat("Nie posiadasz Krwistego Kamienia, nie mogę Cię przenieść ")
end
elseif a == 2 then
if pc.level >= 75 and pc.count_item(30190) > 0 then
pc.remove_item(30190, 1)
pc.warp ( 241300, 1735100 )
elseif pc.level < 75 then
syschat("Nie posiadasz 75 poziomu, nie mogę Cię przenieść ")
elseif pc.level >=75 and pc.count_item(30190) == 0 then
syschat("Nie posiadasz Krwistego Kamienia, nie mogę Cię przenieść ")
end
end
end
end
elseif q == 2 then
say_green ( "Drogi " ..pc.get_name()..", co chciałbyś kupić?" )
local s = select ( "1000 Czerwonych Miksturek" , "400 Niebieskich Miksturek" , "200 pelerynek męstwa" , "Bryłę złota" , "Wyjdź " )
if s == 1 and pc.get_money() >= 20000000 then
say_green("Czy chcesz kupić 1000 czerwonych miksturek za 20kk?")
local a = select("Tak", "Nie")
if a == 1 then
if pc.get_money() >= 20000000 then
pc.change_money(-20000000)
pc.give_item2(27003, 200)
pc.give_item2(27003, 200)
pc.give_item2(27003, 200)
pc.give_item2(27003, 200)
pc.give_item2(27003, 200)
else
syschat("Nie masz odpowiedniej ilości yang.")
end
end
elseif s == 2 then
say_green("Czy chcesz kupić ")
say_green("400 niebieskich miksturek za 20kk?")
local a = select("Tak", "Nie")
if a == 1 then
if pc.get_money() >= 20000000 then
pc.change_money(-20000000)
pc.give_item2(27006, 200)
pc.give_item2(27006, 200)
else
syschat("Nie masz odpowiedniej ilości yang.")
end
end
elseif s == 3 then
say_green("Czy chcesz kupić 200 pelerynek męstwa za 20kk?")
local a = select("Tak", "Nie")
if a == 1 then
if pc.get_money() >= 20000000 then
pc.change_money(-20000000)
pc.give_item2(70038, 200)
else
syschat("Nie masz odpowiedniej ilości yang.")
end
end
elseif s == 4 then
say_green("Czy chcesz zmienić 420kk za bryłkę złota?")
local a = select("Tak", "Nie")
if a == 1 then
if pc.get_money() >= 420000000 then
pc.change_money(-420000000)
pc.give_item2(80008)
else
syschat("Nie masz odpowiedniej ilości yang.")
end
end

end
end
end
end
end

Quest na regeny

quest regen begin
state start begin
when 20011.chat."Stwórz regen" with pc.is_gm() begin

local sciezka = "/usr/home/game/share/locale/germany/quest/"

say_blekit("New file name :")
say()
say_yellow("Example : regen.txt")
say()
local newfile = input()
if newfile == "" then
say_red("Name can not be empty.")
return
end
if io.open(sciezka..newfile, "r") != nil then
say_red("File "..newfile.." exist now.")
else
say_blekit("Great ! Next step.")
local xx = select("Next")
if xx == 1 then

say_title("Minimum value x :")
local x_min = tonumber(input())
if x_min == "" then
say_red("This value can not be empty.")
return
end

say_title("Maximum value x :")
local x_max = tonumber(input())
if x_max == "" then
say_red("This value can not be empty.")
return
end

say_title("Minimum value y :")
local y_min = tonumber(input())
if y_min == "" then
say_red("This value can not be empty.")
return
end

say_title("Maximum value y :")
local y_max = tonumber(input())

if y_max == "" then
say_red("This value can not be empty.")
return
end

say_title("Group ID :")
local id_grupy = tonumber(input())
if id_grupy == "" then
say_red("This value can not be empty.")
return
else
say_title("Amount of groups on this cords :")
local max_count = 150
local count = tonumber(input())
if count <= 0 then
say_red("Value of this field must be higher than 0.")
return
elseif count >= max_count then
say_red("To large value of this field. Must be lower than "..max_count.." loop circulation.")
else
say_title("Seconds to next respawn : ")
say()
say_red("Just number, without \'s\'")
local time = tonumber(input())
if time <= 0 then
say_red("This field must be higher than 0.")
return
else
io.output(sciezka..newfile)
for i = 1, count do
local liczx = number(x_min, x_max)
local liczy = number(y_min, y_max)

io.write("r\t"..liczx.."\t"..liczy.."\t5\t5\t0\t0\t"..time.."s\t100\t1\t"..id_grupy)
io.write("\\n")
end

io.close()
say_blekit("File saved.")
end
end
end
end
end
end
end
end

Evelen · 8 Listopada 2012

O tak, fix na HP Bambuska, już nie masz co kraść?

z4z0l · 9 Listopada 2012

http://www.mpcforum.pl/topic/398547-quest-32hp-przy-logowaniu-postaci/

+ mój quest na regeny :

http://www.elitepvpers.com/forum/metin2-pserver-guides-strategies/1965282-quest-regen-creator.html

lopes564 · 9 Listopada 2012

Matuszny sella te questy xD xD xD

Usama Su kocken · 9 Listopada 2012

O tak, fix na HP Bambuska, już nie masz co kraść?

Wez spierdalaj uczciwie zaplacilem

co do questa fix hp to sorry

PrO^^KoKS · 9 Listopada 2012

Pierscien TP ze sklepikiem duzo osob chce to:

Co to ?

Evelen · 9 Listopada 2012

Wez spierdalaj uczciwie zaplacilem

co do questa fix hp to sorry

Nie rób z siebie większego idioty niż już jesteś.

OstatniRaz · 9 Listopada 2012

Nie rób z siebie większego idioty niż już jesteś.

a ty skończ wyzywać w każdym poście kogoś kto opublikował coś lepszego niż jakiś syf z epvp (pewnie sam kapuche za to ciągniesz a teraz nikt już nie kupi albo sam kupiłeś i wkurzony jesteś że tera każdy to bd miał)

Evelen · 9 Listopada 2012

a ty skończ wyzywać w każdym poście kogoś kto opublikował coś lepszego niż jakiś syf z epvp (pewnie sam kapuche za to ciągniesz a teraz nikt już nie kupi albo sam kupiłeś i wkurzony jesteś że tera każdy to bd miał)

O tak, kupiłem quest udostępniony przez Bambuska rok (?) jak nie więcej czasu temu...

OstatniRaz · 9 Listopada 2012

...

W 1 poście już dawno nie ma tego questa tylko jest inny. Ogar kolo ...

Alkoholic · 9 Listopada 2012

i co Ci to dało, że usunąłeś miszczuniu ?

I tak w chuj osób już to ma ).

/btw. ten regen quest jest dobry ;3

lopes564 · 9 Listopada 2012

i co Ci to dało, że usunąłeś miszczuniu ?

I tak w chuj osób już to ma ).

xD xD

/btw. ten regen quest jest dobry ;3

xD xD xD xD

http://www.elitepvpers.com/forum/metin2-pserver-guides-strategies/1965282-quest-regen-creator.html

a ty skończ wyzywać w każdym poście kogoś kto opublikował coś lepszego niż jakiś syf z epvp (pewnie sam kapuche za to ciągniesz a teraz nikt już nie kupi albo sam kupiłeś i wkurzony jesteś że tera każdy to bd miał)

Tylko co tu kupować/sprzedawać, skoro wszystko było udostępnione?

OstatniRaz · 9 Listopada 2012

xD xD

xD xD xD xD
http://www.elitepvpers.com/forum/metin2-pserver-guides-strategies/1965282-quest-regen-creator.html
Tylko co tu kupować/sprzedawać, skoro wszystko było udostępnione?

deseń się liczy

Usama Su kocken · 9 Listopada 2012

Nie opublikuje kazdego questa bo ktos wywala mi temat i endy sie spina

xamizo · 9 Listopada 2012

Zamykam na prośbę autora.

Zaloguj się

👋 Witaj na MPCForum!

[Quest] HP_FIX

Rekomendowane odpowiedzi

Usama Su kocken

Usama Su kocken

Evelen

Evelen

z4z0l

z4z0l

lopes564

lopes564

Usama Su kocken

Usama Su kocken

PrO^^KoKS

PrO^^KoKS

Evelen

Evelen

OstatniRaz

OstatniRaz

Evelen

Evelen

OstatniRaz

OstatniRaz

Alkoholic

Alkoholic

lopes564

lopes564

OstatniRaz

OstatniRaz

Usama Su kocken

Usama Su kocken

xamizo

xamizo

Zarchiwizowany