Anhi dosent work plx help me
- Thread starter krille11
- Start date
Djivar
AKA Wickedviruz
Code:
<!-- Annihilator -->
<action uniqueid="7000" script="quests/annihilator.lua" />
<action uniqueid="2000" script="anni/anniquest.lua" />
<action uniqueid="2001" script="anni/anniquest.lua" />
<action uniqueid="2002" script="anni/anniquest.lua" />
<action uniqueid="2003" script="anni/anniquest.lua" />\data\actions\scripts\anni/anniquest
LUA:
function onUse(cid, item, fromPosition, itemEx, toPosition)
if item.uid == 2000 then
queststatus = getPlayerStorageValue(cid,6076)
if queststatus == -1 then
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a demon armor.")
doPlayerAddItem(cid,2494,1)
setPlayerStorageValue(cid,6076,1)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")
end
elseif item.uid == 2001 then
queststatus = getPlayerStorageValue(cid,6076)
if queststatus == -1 then
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a magic sword.")
doPlayerAddItem(cid,2400,1)
setPlayerStorageValue(cid,6076,1)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")
end
elseif item.uid == 2002 then
queststatus = getPlayerStorageValue(cid,6076)
if queststatus == -1 then
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a stonecutter axe.")
doPlayerAddItem(cid,2431,1)
setPlayerStorageValue(cid,6076,1)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")
end
elseif item.uid == 2003 then
queststatus = getPlayerStorageValue(cid,6076)
if queststatus == -1 then
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "You have found a great shield.")
doPlayerAddItem(cid,2522,1)
setPlayerStorageValue(cid,6076,1)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")
end
end
return 1
end\data\actions\scripts\quests/annihilator
LUA:
-- CONFIG --
local room = { -- room with demons
fromX = 960,
fromY = 946,
fromZ = 12,
--------------
toX = 967,
toY = 954,
toZ = 12
}
local monster_pos = {
[1] = {pos = {960, 946, 12}, monster = "Demon"}, -- where monster will be summoned
[2] = {pos = {960, 949, 12}, monster = "Demon"},
[3] = {pos = {960, 952, 12}, monster = "Demon"},
[4] = {pos = {967, 946, 12}, monster = "Demon"},
[5] = {pos = {967, 949, 12}, monster = "Demon"},
[6] = {pos = {967, 952, 12}, monster = "Demon"},
[7] = {pos = {964, 953, 12}, monster = "Demon"},
[8] = {pos = {964, 954, 12}, monster = "Demon"}
}
local players_pos = {
{x = 966, y = 949, z = 11, stackpos = 253}, -- player pos befor teleport
{x = 966, y = 950, z = 11, stackpos = 253},
{x = 966, y = 951, z = 11, stackpos = 253},
{x = 966, y = 952, z = 11, stackpos = 253}
}
local new_player_pos = {
{x = 964, y = 949, z = 12}, -- new player position
{x = 964, y = 950, z = 12},
{x = 964, y = 951, z = 12},
{x = 964, y = 952, z = 12}
}
local playersOnly = "yes"
local questLevel = 150
------------------------------------------------------
--- CONFIG END ---------------------------------------
------------------------------------------------------
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[i] = getThingfromPos(players_pos[i])
if player[i].itemid > 0 then
if string.lower(playersOnly) == "yes" then
if isPlayer(player[i].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[i] = getThingfromPos(players_pos[i])
if isPlayer(player[i].uid) == TRUE then
if getPlayerLevel(player[i].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[i], CONST_ME_POFF)
doTeleportThing(player[i].uid, new_player_pos[i], FALSE)
doSendMagicEffect(new_player_pos[i], 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