Multumesc frumoss
quest tombola begin
state start begin
function tablica(vnum, pozitie, pozitie2)
local itemy = {
{
{90015, 1},
{90016, 1},
{90017, 1},
{90018, 1},
{90019, 1},
{90019, 1},
{27987, 30},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 3},
{90019, 1},
{90019, 1},
{90019, 1},
},
{
{90015, 1},
{90016, 1},
{90017, 1},
{90018, 1},
{90019, 1},
{90019, 1},
{90019, 30},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 3},
{90019, 1},
{90019, 1},
{90019, 1},
},
}
return itemy[vnum][pozitie][pozitie2]
end
when login begin
cmdchat("tombola "..q.getcurrentquestindex())
end
when 33008.chat."Tombola" begin
say_title("[Antharos-World2]: Tombola Orasului fiecare invartire este castigatoare.")
say("")
say("Salut! Pentru a putea juca la tombola orasului")
say("ai nevoie de zece bilete!")
say_item("Bilet pentru Tombola", 31012, "")
wait()
local vegas = number(1,2)
local str = " "
for i = 1,16 do
if i == 16 then
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2)
else
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2).."|"
end
end
cmdchat("OnPrepare"..str)
cmdchat("openTombola")
setskin(NOWINDOW)
end
when info or button begin
local vegas = number(1,2)
local str = " "
for i = 1,16 do
if i == 16 then
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2)
else
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2).."|"
end
end
cmdchat("OnPrepare"..str)
if pc.count_item(31012) < 10 then
syschat("[Antharos-World2]: Nu aveti ce va trebuie pentru a putea juca!")
return
end
cmdchat("get_input_start")
local intrare = input(cmdchat("get_input_value"))
cmdchat("get_input_end")
if intrare == "tombola|begin" then
pc.setqf("slot", number(1, 16))
cmdchat("OnRun "..number(2,3)*16+pc.getqf("slot").."|5")
elseif intrare == "tombola|end" then
cmdchat("buff_vegas") ---
syschat("[Antharos-World2]: Felicitari! Ai primit "..tombola.tablica(vegas, pc.getqf("slot")+1, 2).."x "..item_name(tombola.tablica(vegas, pc.getqf("slot")+1, 1)).."")
pc.give_item2(tombola.tablica(vegas, pc.getqf("slot")+1, 1), tombola.tablica(vegas, pc.getqf("slot")+1, 2))
pc.remove_item(31012, 10)
end
end
end
end
state start begin
function tablica(vnum, pozitie, pozitie2)
local itemy = {
{
{90015, 1},
{90016, 1},
{90017, 1},
{90018, 1},
{90019, 1},
{90019, 1},
{27987, 30},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 3},
{90019, 1},
{90019, 1},
{90019, 1},
},
{
{90015, 1},
{90016, 1},
{90017, 1},
{90018, 1},
{90019, 1},
{90019, 1},
{90019, 30},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 1},
{90019, 3},
{90019, 1},
{90019, 1},
{90019, 1},
},
}
return itemy[vnum][pozitie][pozitie2]
end
when login begin
cmdchat("tombola "..q.getcurrentquestindex())
end
when 33008.chat."Tombola" begin
say_title("[Antharos-World2]: Tombola Orasului fiecare invartire este castigatoare.")
say("")
say("Salut! Pentru a putea juca la tombola orasului")
say("ai nevoie de zece bilete!")
say_item("Bilet pentru Tombola", 31012, "")
wait()
local vegas = number(1,2)
local str = " "
for i = 1,16 do
if i == 16 then
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2)
else
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2).."|"
end
end
cmdchat("OnPrepare"..str)
cmdchat("openTombola")
setskin(NOWINDOW)
end
when info or button begin
local vegas = number(1,2)
local str = " "
for i = 1,16 do
if i == 16 then
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2)
else
str = str..tombola.tablica(vegas, i, 1).."|"..tombola.tablica(vegas, i, 2).."|"
end
end
cmdchat("OnPrepare"..str)
if pc.count_item(31012) < 10 then
syschat("[Antharos-World2]: Nu aveti ce va trebuie pentru a putea juca!")
return
end
cmdchat("get_input_start")
local intrare = input(cmdchat("get_input_value"))
cmdchat("get_input_end")
if intrare == "tombola|begin" then
pc.setqf("slot", number(1, 16))
cmdchat("OnRun "..number(2,3)*16+pc.getqf("slot").."|5")
elseif intrare == "tombola|end" then
cmdchat("buff_vegas") ---
syschat("[Antharos-World2]: Felicitari! Ai primit "..tombola.tablica(vegas, pc.getqf("slot")+1, 2).."x "..item_name(tombola.tablica(vegas, pc.getqf("slot")+1, 1)).."")
pc.give_item2(tombola.tablica(vegas, pc.getqf("slot")+1, 1), tombola.tablica(vegas, pc.getqf("slot")+1, 2))
pc.remove_item(31012, 10)
end
end
end
end




