quest christmas_tree begin
state start begin
when 20032.click or 20033.click or 20034.click begin
say_title("Pom de Craciun:")
say("")
local s = select("Sosete", "Informatii..", "De unde pot lua sosete", "Inchide")
if s==1 then
-- Socke aufhängen:
if pc.level >= 30 then
if pc.getqf("put_sock_count") >= 50 then
say("Dispui de 50 de sosete?")
say("in caz contrar..imi pare rau!")
else
if pc.countitem("50010") >= 1 then
pc.setqf("put_sock_count", pc.getqf("put_sock_count") + 1)
pc.removeitem("50010", 1)
say("Ai atasat o soseta corespunzator")
say("Inchide ochii pentru 3 secunde,")
say("si pune-ti o dorinta")
say("[DELAY value;400]. . .[/DELAY]")
say("Dorinta ta e indeplinita?")
say("")
say("Numarul maxim de sosete pe care")
say("le poti aduce este : 50")

pc.give_item_from_special_item_group("50010")
else
say("Nu ai adus sosete? Foarte rau..")
end
end
else
say("Salut micutule..")
say("Ce mai faci?")
say("Vad ca inca nu esti de matur")
say("Ai nevoie de nivel 30 minim")
say("revino cand ai nivel 30...")
say("In orice caz,iti urez:")
say_title("Craciun Fericit!")
end
elseif s==2 then
-- Informationen über den Baum:
say("Ai nevoie de INFO ...")
say("in privinta pomului?")
say("Ok,asculta-ma")
say("Lumea spune ca el nu lipseste ")
say("in ajunul Craciunului atunci cand")
say("lumea este fericita.")

elseif s==3 then
-- Wo bekommt man socken?:
say("Ho Ho Ho")
say("Cred ca vrei sa stii de ce sunt aici")
say("Stai linistit micutule,am sa-ti explic:")
say("")
say("Te duci intr-o mapa cu moobi")
say("apropiati de nivelul tau.")
say("Omori cat de multi poti,")
say("strangi sosete si le aduci la mine.")
say("Eu drept rasplata te voi recompensa")
say("cu premii pe masura")
say("cadouri,arme,armuri..iteme in general.")
say("")
say("Sper ca am fost destul de clar.")
say_title("Echipa Metin2Dirty iti ureaza Craciun Fericit!")

elseif s==4 then
return
end
end
end
end

quest christmas_santa begin
state start begin
when santa.click begin
local intro_msg = locale.christmas_santa.intro_msg

local skill_book_buy_cost = locale.christmas_santa.skill_book_buy_cost
local skill_book_msg = locale.christmas_santa.skill_book_msg
local skill_book_sold_out_msg = locale.christmas_santa.skill_book_sold_out_msg

local hairdye_buy_cost = locale.christmas_santa.hairdye_buy_cost
local hairdye_msg = locale.christmas_santa.hairdye_msg
local hairdye_sold_out_msg = locale.christmas_santa.hairdye_sold_out_msg

local not_enough_money = locale.christmas_santa.not_enough_money

local SKILL_BOOK_GROUP = 50300
local HAIRDYE_GROUP = 70201

say(intro_msg)
local s = select(locale.christmas_santa.want_skillbook,locale.christmas_santa.want_hairdye,locale.christmas_santa.no_need)
if s==1 then
local r = npc.get_remain_skill_book_count();
if r>0 then
say(skill_book_msg)
local s = select(locale.christmas_santa.select_buy, locale.christmas_santa.select_stop)
if s==1 then
if npc.get_remain_skill_book_count()>0 then
if pc.gold >= skill_book_buy_cost then
npc.dec_remain_skill_book_count()
pc.changegold(-skill_book_buy_cost)
pc.give_item_from_special_item_group(SKILL_BOOK_GROUP)
else
say(not_enough_money)
end
else
say(skill_book_sold_out_msg)
end
end
else
say(skill_book_sold_out_msg)
end
elseif s==2 then
local r = npc.get_remain_hairdye_count();
if r>0 then
say(hairdye_msg)
local s = select(locale.christmas_santa.select_buy, locale.christmas_santa.select_stop)
if s==1 then
if npc.get_remain_hairdye_count()>0 then
if pc.gold >= hairdye_buy_cost then
npc.dec_remain_hairdye_count()
pc.changegold(-hairdye_buy_cost)
pc.give_item_from_special_item_group(HAIRDYE_GROUP)
else
say(not_enough_money)
end
else
say(hairdye_sold_out_msg)
end
end
else
say(hairdye_sold_out_msg)
end
elseif s==3 then
say(locale.christmas_santa.bye_msg)
end
end
end
end

quest premiu begin
state start begin
when VNUM NPC.chat."Premiu" begin
say_title("Bine ai venit!")
say("Daca imi aduci 10 perle rosii")
say("Iti pot da la schimb un metal magic")
say("Doresti sa faci schimbul ? ")
local menu = select ("Da","Nu")
if menu == 2 then
say("Ok,revino cand te hotarasti")
return
elseif menu == 1 then
local items = pc.count_item(27994, 10) ---Vnum item
if items >= 10 then
say("Bravo!")
say("Aici ai premiul tau : metal magic")
pc.remove_item(27994, 10 ) ---Vnum item
pc.give_item2(25041, 1 ) ---Vnum premiu
return
elseif items < 10 then
say("Nu ai itemele necesare")
return
end
end
end
end
end