Code:
quest marken_shop begin
state start begin
function get_marks()
local m = mysql_query("select marken from account.account where id = '"..pc.get_accountid().."';")[1][1]
return tonumber(m) or 0
end
function price(arg)
local tab = {
[11870] = 1000, -- 54 schami
[11670] = 1000, -- 54 sura
[11470] = 1000, -- 54 ninja
[11270] = 1000, -- 54 krieger
[11860] = 1000, -- 48 schami
[11660] = 1000, -- 48 sura
[11460] = 1000, -- 48 ninja
[11260] = 1000, -- 48 krieger
[99993] = 100, -- lila perle
[99992] = 100, -- gelbe perle
[99991] = 100, -- grüne perle
[99990] = 100, -- orange perle
[27992] = 100, -- weiße perle
[27993] = 100, -- blaue perle
[27994] = 100, -- rote perle
[27987] = 30, -- muschel
[82829] = 100, -- lila g stein
[82828] = 100, -- blauer g stein
[82827] = 100, -- gelber g stein
[82826] = 100, -- grauer g stein
[82825] = 100, -- grüner g stein
[82824] = 100, -- roter g stein
[82823] = 100, -- oranger g stein
[82822] = 100, -- lila edelstein
[82821] = 100, -- oranger edelstein
[82820] = 100, -- gelber edelstein
[82819] = 100, -- weißer edelstein
[82818] = 100, -- roter edelstein
[82817] = 100, -- blauer edelstein
[82816] = 100, -- grüner edelstein
[82815] = 30, -- riesenmuschel
[82800] = 100, -- Pinke Glaskugel
[82801] = 100, -- Lila Glaskugel
[82802] = 100, -- Orange Glaskugel
[82803] = 100, -- Gelbe Glaskugel
[82804] = 100, -- Grüne Glaskugel
[82805] = 100, -- Olivgrüne Glaskugel
[82806] = 100, -- Blaue Glaskugel
[82807] = 100, -- Himmelblaue Glaskugel
[82808] = 100, -- Rote Glaskugel
[99994] = 100, -- lila kristall
[82809] = 100, -- Roter Kristall
[82810] = 100, -- Weißer Kristall
[82811] = 100, -- Grüner Kristall
[82812] = 100, -- Oranger Kristall
[82813] = 100, -- Gelber Kristall
[82814] = 100 -- Blauer Kristall
}
return tab[arg] or 0
end
function menu()
say_title("Markenshop")
say("Guten Tag, "..pc.get_name())
say("Hier kannst du deine Marken gegen Items eintauschen")
say("Dies ist der gleiche Shop, welchen du auch")
say("auf der Homepage finden kannst.")
say()
say_reward("Sie besitzen momentan "..marken_shop.get_marks().." Marken")
say()
say("Welche Kategorie wählen sie?")
say()
local s = select("Rüstungen","Uppitems","Nichts")
if s == 3 then return
elseif s == 1 then
marken_shop.armor()
elseif s == 2 then
marken_shop.refine()
end
end
function armor()
say_title("Markenshop - Rüstungen")
say("Wähle aus:")
say()
local s = select("Lvl 48 Rüstungen","Lvl 54 Rüstungen","Zurück","Abbrechen")
if s == 4 then return
elseif s == 3 then
marken_shop.menu()
elseif s == 2 then
marken_shop.armor_54()
elseif s == 1 then
marken_shop.armor_48()
end
end
function armor_48()
say_title("Markenshop - Rüstungen - Level 48")
say("Wähle aus:")
say()
say_reward("In der Klammer steht der Preis in Marken")
say()
local s = select("Schuppenplattenpanzer+0 (100)","Jungdrachenanzug+0 (100)","Nebelplattenpanzer+0 (100)","Kleidung der Moral+0 (100)","Zurück","Zurück ins Menu","Abbrechen")
if s == 7 then return -- abbrechen
if s == 6 then -- menu
marken_shop.menu()
elseif s == 5 then -- zurück
marken_shop.armor_48()
elseif s == 1 then
marken_shop.buy_item(11260)
elseif s == 2 then
marken_shop.buy_item(11460)
elseif s == 3 then
marken_shop.buy_item(11660)
elseif s == 4 then
marken_shop.buy_item(11860)
end
end
function armor_54()
say_title("Markenshop - Rüstungen - Level 54")
say("Wähle aus:")
say()
say_reward("In der Klammer steht der Preis in Marken")
say()
local s = select("Goldplattenpanzer+0 (100)","Mörderwindanzug+0 (100)","Geistermaskenpanzer+0 (100)","Orangenes Katzenkleid+0 (100)","Zurück","Zurück ins Menu","Abbrechen")
if s == 7 then return
elseif s == 6 then
marken_shop.menu()
elseif s == 5 then
marken_shop.armor_54()
elseif s == 1 then
marken_shop.buy_item(11270)
elseif s == 2 then
marken_shop.buy_item(11470)
elseif s == 3 then
marken_shop.buy_item(11670)
elseif s == 4 then
marken_shop.buy_item(11870)
end
end
function refine()
local names = {
"Lila Perle",
"Gelbe Perle",
"Grüne Perle",
"Orange Perle",
"Weiße Perle",
"Blaue Perle",
"Rote Perle",
"Muschel",
"Lila Geisterstein",
"Blauer Geisterstein",
"Gelber Geisterstein",
"Grauer Geisterstein",
"Grüner Geisterstein",
"Roter Geisterstein",
"Oranger Geisterstein",
"Lila Edelstein",
"Oranger Edelstein",
"Gelber Edelstein",
"Weißer Edelstein",
"Roter Edelstein",
"Blauer Edelstein",
"Grüner Edelstein",
"Riesenmuschel",
"Pinke Glaskugel",
"Lila Glaskugel",
"Orange Glaskugel",
"Gelbe Glaskugel",
"Grüne Glaskugel",
"Olivgrüne Glaskugel",
"Blaue Glaskugel",
"Himmelblaue Glaskugel",
"Rote Glaskugel",
"lila kristall",
"Roter Kristall",
"Weißer Kristall",
"Grüner Kristall",
"Oranger Kristall",
"Gelber Kristall",
"Blauer Kristall"
}
local vnum = {
99993,
99992,
99991,
99990,
27992,
27993,
27994,
27987,
82829,
82828,
82827,
82826,
82825,
82824,
82823,
82822,
82821,
82820,
82819,
82818,
82817,
82816,
82815,
82800,
82801,
82802,
82803,
82804,
82805,
82806,
82807,
82808,
99994,
82809,
82810,
82811,
82812,
82813,
82814
}
local menu = {}
for i = 1, table.getn(names) do
if names[i] ~= nil then
table.insert(menu, names[i])
end
end
table.insert(menu, "Zurück")
table.insert(menu, "Abbrechen")
local s = select3(menu)
-- Etwas ausgewählt --
if s < (table.getn(menu)-2) then
marken_shop.buy_item(vnum[s])
-- Abbrechen/Zurück --
else
if s == table.getn(menu) then return
elseif s == (table.getn(menu) - 1) then
marken_shop.menu()
end
end
end
function buy_item(vnum)
if vnum == 0 or vnum == nil then
say_title("Markenshop")
say("Es ist ein unbekannter Fehler aufgetreten")
say()
return
end
local marks = marken_shop.get_marks()
local price = marken_shop.price(vnum)
price = price or 0
say_title("Markenshop - Item kaufen")
if price > marks then
say("Du besitzst nicht genügend Marken")
say("Dir fehlen "..(price - marks).." Marken")
say()
return
end
say_reward("Ausgewhältes Item: "..item_name(vnum))
say_reward("Preis: "..price.." Marken")
say_reward("Verfügbare Marken: "..marks)
say()
say_reward("Marken nach dem Kauf: "..(marks - price))
say()
say("Möchtest du das Item kaufen?")
if select("Ja","Nein") == 2 then return end
mysql_query("update account.account set marken = marken - "..price.." where id = '"..pc.get_accountid().."';")
pc.give_item2(vnum)
chat("Das Item wurde erfolgreich gekauft")
end
when 20095.chat."Markenshop" begin
marken_shop.menu()
end
end
end
