local room = { -- room with demons
fromX = 33229,
fromY = 31697,
fromZ = 14,
toX = 33224,
toY = 31697,
toZ = 14
}
local monster_pos = {
[1] = {pos = {33224, 31695, 14}, monster = "Demon"},
[2] = {pos = {33226, 31695, 14}, monster = "Demon"},
[3] = {pos = {33228, 31697, 14}, monster = "Demon"},
[4] = {pos = {33229, 31697, 14}, monster = "Demon"},
[5] = {pos = {33227, 31699, 14}, monster = "Demon"},
[6] = {pos = {33225, 31699, 14}, monster = "Demon"}
}
local players_pos = {
{x = 33224, y =31671, z = 13, stackpos = 253},
{x = 33223, y =31671, z = 13, stackpos = 253},
{x = 33222, y =31671, z = 13, stackpos = 253},
{x = 33221, y =31671, z = 13, stackpos = 253}
}
local new_player_pos = {
{x = 33227, y = 31697, z = 14},
{x = 33226, y = 31697, z = 14},
{x = 33225, y = 31697, z = 14},
{x = 33224, y = 31697, z = 14}
}
local playersOnly = "yes"
local questLevel = 101
function onUse(cid, item, fromPosition, itemEx, toPosition)
local all_ready, monsters, player, level = 0, 0, {}, 0
if item.itemid == 1945 then
for i = 1, #players_pos do
table.insert(player, 0)
end
for i = 1, #players_pos do
player = getThingfromPos(players_pos)
if player.itemid > 0 then
if string.lower(playersOnly) == "yes" then
if isPlayer(player.uid) == TRUE then
all_ready = all_ready+1
else
monsters = monsters+1
end
else
all_ready = all_ready+1
end
end
end
if all_ready == #players_pos then
for i = 1, #players_pos do
player = getThingfromPos(players_pos)
if isPlayer(player.uid) == TRUE then
if getPlayerLevel(player.uid) >= questLevel then
level = level+1
end
else
level = level+1
end
end
if level == #players_pos then
if string.lower(playersOnly) == "yes" and monsters == 0 or string.lower(playersOnly) == "no" then
for _, area in pairs(monster_pos) do
doSummonCreature(area.monster,{x=area.pos[1],y=area.pos[2],z=area.pos[3]})
end
for i = 1, #players_pos do
doSendMagicEffect(players_pos, CONST_ME_POFF)
doTeleportThing(player.uid, new_player_pos, FALSE)
doSendMagicEffect(new_player_pos, CONST_ME_ENERGYAREA)
doTransformItem(item.uid,1946)
end
else
doPlayerSendTextMessage(cid,19,"Only players can do this quest.")
end
else
doPlayerSendTextMessage(cid,19,"All Players have to be level "..questLevel.." to do this quest.")
end
else
doPlayerSendTextMessage(cid,19,"You need "..table.getn(players_pos).." players to do this quest.")
end
elseif item.itemid == 1946 then
local player_room = 0
for x = room.fromX, room.toX do
for y = room.fromY, room.toY do
for z = room.fromZ, room.toZ do
local pos = {x=x, y=y, z=z,stackpos = 253}
local thing = getThingfromPos(pos)
if thing.itemid > 0 then
if isPlayer(thing.uid) == TRUE then
player_room = player_room+1
end
end
end
end
end
if player_room >= 1 then
doPlayerSendTextMessage(cid,19,"There is already a team in the quest room.")
elseif player_room == 0 then
for x = room.fromX, room.toX do
for y = room.fromY, room.toY do
for z = room.fromZ, room.toZ do
local pos = {x=x, y=y, z=z,stackpos = 253}
local thing = getThingfromPos(pos)
if thing.itemid > 0 then
doRemoveCreature(thing.uid)
end
end
end
end
doTransformItem(item.uid,1945)
end
end
return TRUE
end
