Private shop (pentru mapa cu shopuri)

--------------------------------------
-- Shop - Quest
-- copyright Metin2DR
--------------------------------------
quest privateshop begin
state start begin
when login begin
local mapi1= pc.count_item(72007) -- Anti-Bug Funktion
local mapi2= pc.count_item(72007) -- Anti-Bug Funktion
pc.remove_item(72007,mapi1) -- Anti-Bug Funktion
pc.remove_item(72007,mapi2) -- Anti-Bug Funktion
affect.remove_collect() -- Anti-Bug Funktion
if pc.get_map_index() == 215 then -- Anti-Bug Funktion
command("unmount") -- Anti-Bug Funktion
horse.unsummon() -- Anti-Bug Funktion
send_letter("Close Private Shop") -- Anti-Bug Funktion
timer("shopinfo", 1)
end
end

--------------------------------------
-- Begrüßung Handelsstation
--------------------------------------

when shopinfo.timer begin
say_title("Shop")
say("")
say("Aici poti cumpara si vinde diverse iteme!")
say("Nu poti da duele")
say("in timp ce ai deschis un magazin!")
say("Acesta ar trebui sa ramana un loc de actiune!")
say("Nu poti chema calul!")
say("")
say("")
local a = select("Shop", "OK")
if a == 1 then
say_title("Urmatoarele cerinte se aplica pentru magazin:")
say("")
say_title("Taxa de intrare: 3000 Yang")
say_title("Taxa: 1000 Yang pentru 10 Minute")
say("")
say("")
end
end

--------------------------------------
-- Bündel
--------------------------------------

when 50199.use begin
if pc.get_map_index() == 215 then -- Mapa magazinelor-Pflicht für Shop
if pc.gold < 3000 then -- Anti-Bug Funktion
notice("Nu ai suficient yang pentru a deschide un magazin!")
else
cmdchat("OpenPrivateShop")
command("unmount")
pc.polymorph(30000,30758400)
affect.add_collect(apply.DEF_GRADE_BONUS,2000000,30758400) -- Anti-Bug Funktion
affect.add_collect(apply.MAGIC_DEF_GRADE,2000000,30758400) -- Anti-Bug Funktion
pc.remove_item(50199)
pc.give_item2(50200)
send_letter("Inchide Magazin")
timer("shopgebühr1", 0)
end
else
say_title("Shop")
say("")
say("Aveti posibiliatea sa deschideti")
say("doar un magazin in Mapa magazinelor!")
wait()
say_title("Vrei sa te duci in Mapa magazinelor?")
local a = select("Da", "Nu")

if a == 1 then
command("unmount") -- Anti-Bug Funktion
horse.unsummon() -- Anti-Bug Funktion
pc.warp(512300,512300)
end
end
end

when info or button begin
say("Close Private Shop")
local s = select("Yes","No")
if s == 1 then
local mapi3= pc.count_item(50199) -- Anti-Bug Funktion
pc.remove_item(50199,mapi3) -- Anti-Bug Funktion
affect.remove_collect() -- Anti-Bug Funktion
command("close_shop")
pc.remove_polymorph()
pc.remove_item(50200)
end
end

--------------------------------------
-- Shopgebühr
--------------------------------------

when shopgebühr1.timer begin
if pc.is_polymorphed(30000) then -- Beschränkung für Shop
if pc.gold < 3000 then -- Anti-Bug Funktion
local mapi3= pc.count_item(50200)
pc.remove_item(50200,mapi3)
affect.remove_collect()
command("close_shop")
pc.remove_polymorph()
return
else
pc.change_gold(-3000) -- Anfangsgebühr 3000 Yang
notice("Ai platit 3000 de yang taxa de intrare!") -- Nachricht an die User
timer("shopgebühr2", 600) -- 600 = 10 Min warten
end
else
return
end
end

when shopgebühr2.timer begin
if pc.is_polymorphed(30000) then -- Beschränkung für Shop
if pc.gold < 1000 then -- Anti-Bug Funktion
local mapi3= pc.count_item(50200)
pc.remove_item(50200,mapi3)
affect.remove_collect()
command("close_shop")
pc.remove_polymorph()
return
else
pc.change_gold(-1000) -- Fortlaufende Gebühren 1000 Yang
notice("Ai platit 1000 yang taxa de 10 minute!") -- Nachricht an die User
timer("shopgebühr3", 600) -- 600 = 10 Min warten
end
else
return
end
end

when shopgebühr3.timer begin
if pc.is_polymorphed(30000) then -- Beschränkung für Shop
if pc.gold < 1000 then -- Anti-Bug Funktion
local mapi3= pc.count_item(50199)
pc.remove_item(50199,mapi3)
affect.remove_collect()
command("close_shop")
pc.remove_polymorph()
return
else
pc.change_gold(-1000) -- Fortlaufende Gebühren 1000 Yang
notice("Ai platit 1000 yang taxa de 10 minute!") -- Nachricht an die User
timer("shopgebühr2", 600) -- 600 = 10 Min warten
end
else
return
end
end
end
end

cd /usr/rain/channel/share_data/locale/hongkong/quest
./qc privateshop.quest