• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!

Windows anihilator not working...!

miszczu1455

New Member
Joined
Jan 21, 2010
Messages
22
Reaction score
0
hey my anihlator not working !
I do not know what's going on but the lever does not move! help!

actions/scripts/anii...
-- CONFIG --

local room = { -- room with demons
fromX = 33219,
fromY = 31657,
fromZ = 13,
--------------
toX = 33222,
toY = 31661,
toZ = 13
}

local monster_pos = {
[1] = {pos = {33219, 31657, 13}, monster = "Demon"},
[2] = {pos = {33221, 31657, 13}, monster = "Demon"},
[3] = {pos = {33220, 31661, 13}, monster = "Demon"},
[4] = {pos = {33222, 31661, 13}, monster = "Demon"},
[5] = {pos = {33223, 31659, 13}, monster = "Demon"},
[6] = {pos = {33224, 31659, 13}, monster = "Demon"}
}

local players_pos = {
{x = 33222, y =31671, z = 13, stackpos = 253},
{x = 33223, y =31671, z = 13, stackpos = 253},
{x = 33224, y =31671, z = 13, stackpos = 253},
{x = 33225, y =31671, z = 13, stackpos = 253}
}

local new_player_pos = {
{x = 33219, y = 31659, z = 13},
{x = 33220, y = 31659, z = 13},
{x = 33221, y = 31659, z = 13},
{x = 33222, y = 31659, z = 13}
}

local playersOnly = "no"
local questLevel = 101

------------------------------------------------------
--- 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 = 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
 
Error - LuaScriptInterface::loadFile] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/annihilator.lua)
[03/06/2010 13:01:57] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Error - LuaScriptInterface::loadFile] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/annihilator.lua)
[03/06/2010 13:01:57] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Error - LuaScriptInterface::loadFile] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/annihilator.lua)
[03/06/2010 13:01:57] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Error - LuaScriptInterface::loadFile] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/annihilator.lua)
[03/06/2010 13:01:57] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Error - LuaScriptInterface::loadFile] cannot open data/actions/scripts/annihilator.lua: No such file or directory
[03/06/2010 13:01:57] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/annihilator.lua)
[03/06/2010 13:01:57] cannot open data/actions/scripts/annihilator.lua: No such file or directory
 
You should to make that:
Create a new file in data/actions/scripts named 'annihilator.lua' and add this:
Code:
-- Annihilator script v2.1 by GriZzm0.
--
-- Variables used:
--
-- player?pos = The position of the players before teleport.
-- player? = Get the thing from playerpos.
-- player?level = Get the players levels.
-- questslevel = The level you have to be to do this quest.
-- questtatus? = Get the quest status of the players.
-- demon?pos = The position of the demons.
-- nplayer?pos = The position where the players should be teleported too.
--
-- UniqueIDs used:
--
-- 5000 = The switch.
-- 5001 = Demon Armor chest.
-- 5002 = Magic Sword chest.
-- 5003 = Stonecutter Axe chest.
-- 5004 = Present chest.
--
 
function onUse(cid, item, frompos, item2, topos)
	if item.uid == 5000 then
		if item.itemid == 1945 then
 
			player1pos = {x=224, y=207, z=7, stackpos=253}
			player1 = getThingfromPos(player1pos)
 
			player2pos = {x=223, y=207, z=7, stackpos=253}
			player2 = getThingfromPos(player2pos)
 
			player3pos = {x=222, y=207, z=7, stackpos=253}
			player3 = getThingfromPos(player3pos)
 
			player4pos = {x=221, y=207, z=7, stackpos=253}
			player4 = getThingfromPos(player4pos)
 
 
			if player1.itemid > 0 and player2.itemid > 0 and player3.itemid > 0 and player4.itemid > 0 then
 
				player1level = getPlayerLevel(player1.uid)
				player2level = getPlayerLevel(player2.uid)
				player3level = getPlayerLevel(player3.uid)
				player4level = getPlayerLevel(player4.uid)
 
				questlevel = 100
 
				if player1level >= questlevel and player2level >= questlevel and player3level >= questlevel and player4level >= questlevel then
 
					queststatus1 = getPlayerStorageValue(player1.uid,5000)
					queststatus2 = getPlayerStorageValue(player2.uid,5000)
					queststatus3 = getPlayerStorageValue(player3.uid,5000)
					queststatus4 = getPlayerStorageValue(player4.uid,5000)
 
					if queststatus1 == -1 and queststatus2 == -1 and queststatus3 == -1 and queststatus4 == -1 then
 
						demon1pos = {x=243, y=205, z=7}
						demon2pos = {x=245, y=205, z=7}
						demon3pos = {x=244, y=209, z=7}
						demon4pos = {x=246, y=209, z=7}
						demon5pos = {x=247, y=207, z=7}
						demon6pos = {x=248, y=207, z=7}
 
						doSummonCreature("Demon", demon1pos)
						doSummonCreature("Demon", demon2pos)
						doSummonCreature("Demon", demon3pos)
						doSummonCreature("Demon", demon4pos)
						doSummonCreature("Demon", demon5pos)
						doSummonCreature("Demon", demon6pos)
 
						nplayer1pos = {x=246, y=207, z=7}
						nplayer2pos = {x=245, y=207, z=7}
						nplayer3pos = {x=244, y=207, z=7}
						nplayer4pos = {x=243, y=207, z=7}
 
						doSendMagicEffect(player1pos,2)
						doSendMagicEffect(player2pos,2)
						doSendMagicEffect(player3pos,2)
						doSendMagicEffect(player4pos,2)
 
						doTeleportThing(player1.uid,nplayer1pos)
						doTeleportThing(player2.uid,nplayer2pos)
						doTeleportThing(player3.uid,nplayer3pos)
						doTeleportThing(player4.uid,nplayer4pos)
 
						doSendMagicEffect(nplayer1pos,10)
						doSendMagicEffect(nplayer2pos,10)
						doSendMagicEffect(nplayer3pos,10)
						doSendMagicEffect(nplayer4pos,10)
 
						doTransformItem(item.uid,item.itemid+1)
 
					else
						doPlayerSendCancel(cid,"Sorry, not possible.")
					end
				else
					doPlayerSendCancel(cid,"Sorry, not possible.")
				end
			else
				doPlayerSendCancel(cid,"Sorry, not possible.")
			end
		elseif item.itemid == 1946 then
			if getPlayerAccess(cid) == 3 then
				doTransformItem(item.uid,item.itemid-1)
			else
				doPlayerSendCancel(cid,"Sorry, not possible.")
			end
		end
	elseif item.uid == 5001 then
 
		queststatus = getPlayerStorageValue(cid,5000)
 
		if queststatus == -1 then
			doPlayerSendTextMessage(cid,22,"You have found a demon armor.")
			doPlayerAddItem(cid,2494,1)
			setPlayerStorageValue(cid,5000,1)
		else
			doPlayerSendTextMessage(cid,22,"It is empty.")
		end
	elseif item.uid == 5002 then
 
		queststatus = getPlayerStorageValue(cid,5000)
 
		if queststatus == -1 then
			doPlayerSendTextMessage(cid,22,"You have found a magic sword.")
			doPlayerAddItem(cid,2400,1)
			setPlayerStorageValue(cid,5000,1)
		else
			doPlayerSendTextMessage(cid,22,"It is empty.")
		end
	elseif item.uid == 5003 then
 
		queststatus = getPlayerStorageValue(cid,5000)
 
		if queststatus == -1 then
			doPlayerSendTextMessage(cid,22,"You have found a stonecutter axe.")
			doPlayerAddItem(cid,2431,1)
			setPlayerStorageValue(cid,5000,1)
		else
			doPlayerSendTextMessage(cid,22,"It is empty.")
		end
	elseif item.uid == 5004 then
 
		queststatus = getPlayerStorageValue(cid,5000)
 
		if queststatus == -1 then
			doPlayerSendTextMessage(cid,22,"You have found a present.")
			doPlayerAddItem(cid,1990,1)
			setPlayerStorageValue(cid,5000,1)
		else
			doPlayerSendTextMessage(cid,22,"It is empty.")
		end
	end
	return 1
end
 
Back
Top