Zerak456
Gorlex.net NEW!
- Joined
- Aug 13, 2008
- Messages
- 1,060
- Reaction score
- 6
LONG TUTOR HOPE U LIKE IT : Hello i think some guys got problem with this annih -.- so i made this thread for beginners..
so here is it
pic1:
pic2:
pic3:
create file with name annih then open this in ur server data/actions/scripts/annih.lua
and the chests
and... if u like the script rep++ gesior and if u like the tut rep++ me xD please
so here is it
pic1:

pic2:

pic3:

create file with name annih then open this in ur server data/actions/scripts/annih.lua
LUA:
local playerPosition =
{
{x = xxxx, y = yyyy, z = z, stackpos = STACKPOS_TOP_CREATURE},
{x = xxxx, y = yyyy, z = z, stackpos = STACKPOS_TOP_CREATURE},
{x = xxxx, y = yyyy, z = z, stackpos = STACKPOS_TOP_CREATURE},
{x = xxxx, y = yyyy, z = z, stackpos = STACKPOS_TOP_CREATURE}
}
local newPosition =
{
{x = xxxx, y = yyyy, z = z},
{x = xxxx, y = yyyy, z = z},
{x = xxxx, y = yyyy, z = z},
{x = xxxx, y = yyyy, z = z}
}
-- Do not modify the declaration lines below.
local player = {0, 0, 0, 0}
local failed = FALSE
function onUse(cid, item, fromPosition, itemEx, toPosition)
if item.itemid == 1945 then
for i = 1, 4 do
failed = TRUE
player[i] = getThingfromPos(playerPosition[i])
if player[i].itemid > 0 then
if isPlayer(player[i].uid) == TRUE then
if getPlayerStorageValue(player[i].uid, 30015) == -1 then
if getPlayerLevel(player[i].uid) >= 100 then
failed = FALSE
end
end
end
end
if failed == TRUE then
doPlayerSendCancel(cid, "Sorry, not possible.")
return TRUE
end
end
for i = 1, 4 do
doSendMagicEffect(playerPosition[i], CONST_ME_POFF)
doTeleportThing(player[i].uid, newPosition[i], FALSE)
doSendMagicEffect(newPosition[i], CONST_ME_ENERGYAREA)
end
doTransformItem(item.uid, item.itemid + 1)
elseif item.itemid == 1946 then
doPlayerSendCancel(cid, "Sorry, not possible.")
end
return TRUE
end
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 present.")
doPlayerAddItem(cid,1990,1)
setPlayerStorageValue(cid,6076,1)
else
doPlayerSendTextMessage(cid,MESSAGE_INFO_DESCR, "It is empty.")
end
end
return 1
end
Last edited: