Cod: Selectaţi tot
quest betiv begin
state start begin
-- Cand alegem sa jucam
when 20041.chat."Am ceva.." begin
-- Replicile betivului
say_title("Betivul:")
say("Eiii...Stai...aaa. Am ceva pentru tine.")
say("Aa..Vezi ce vreme minunata e afara?")
say("Hai sa jucam un joc pe bani..")
wait()
say_title("Betivul: ")
say("Te va costa doar 1.000.000 yang.")
say("Poti castiga carti, pietre ale spiritului , marmura")
say("sau chiar nimic.")
say("Garantez ca iteme furate de mine sunt")
say("de cea mai inalta calitate.")
say("Accepti?")
local s = select("Bine.", "Nu acum.")
if s == 2 then
say_title("Betivul:")
say("Ejti.. uun un las.")
say("Te voi astepta.")
return
end
-- Discutie incheiata
-- 0 = fara cadou
local items = {
0, 50401, 50402, 0, 50403, 50404, 0, 50405, 50416, 50417, 50418,
50419, 0, 50420, 50431, 50432, 0, 50433, 50434, 0, 50435, 50446,
0, 50448, 50449, 0, 50450, 50461, 50462, 50463, 50464, 50465,
50466, 50476, 50477, 50478, 50479, 50480, 0, 50481, 50491,
50492, 0, 50493, 50494, 50495, 0, 50496, 50506, 0, 50507, 50508,
50509, 0, 50510, 50511, 50513, 39004
} --ultimul element intotdeauna sa fie piatra spiritului 50513
max_items = table.getn(items)
random_n = number(1, max_items)
pc.changegold(-1000000)
if items[random_n] == 0 then
say_title("Betivul: ")
say("Ai pierdut.")
say("Toate astea raman la mine..")
say_reward("Ai pierdut 1.000.000 yang.")
return
end
if random_n == max_items then
random_n = number(1, 15)
if random_n == 7 then
item_vnum = items[max_items]
size = number(1, 2)
else
item_vnum = items[number(1, max_items - 1)]
end
else
item_vnum = items[random_n]
size = number(1, 1)
end
for variable = 1, size, 1 do
pc.give_item2(item_vnum)
end
say_title("Betivul:")
say("La naiba. Cum sa pierd eu?")
string_f = string.format("%s x %s", item_name(item_vnum), size)
say_item(string_f, item_vnum, "")
say_reward("Ai pierdut 1.000.000 yang.")
end
end
end


.
