Teddy
SweStream.se
MY 8 palyers anni dont work 
Code:
-- 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.
--trash= position to send the demons to when clearing, 1 sqm in middle of nowhere is enough
-- starting = Upper left point of the annihilator room area.
-- ending = Bottom right point of the annihilator room area.
--UniqueIDs used:
--6000 = The switch.
--6001 = Demon Armor chest.
--6002 = Magic Sword chest.
--6003 = Stonecutter Axe chest.
--6004 = Present chest.
function onUse(cid, item, frompos, item2, topos)
if item.uid == 6000 then
if item.itemid == 1946 then
player1pos = {x=129, y=342, z=6, stackpos=253}
player1 = getThingfromPos(player1pos)
player2pos = {x=128, y=342, z=6, stackpos=253}
player2 = getThingfromPos(player2pos)
player3pos = {x=127, y=342, z=6, stackpos=253}
player3 = getThingfromPos(player3pos)
player4pos = {x=126, y=342, z=6, stackpos=253}
player4 = getThingfromPos(player4pos)
player5pos = {x=129, y=341, z=6, stackpos=253}
player5 = getThingfromPos(player4pos)
player6pos = {x=128, y=341, z=6, stackpos=253}
player6 = getThingfromPos(player4pos)
player7pos = {x=127, y=341, z=6, stackpos=253}
player7 = getThingfromPos(player4pos)
player8pos = {x=126, y=341, z=6, stackpos=253}
player8 = getThingfromPos(player4pos)
if player1.itemid > 0 and player2.itemid > 0 and player3.itemid > 0 and player4.itemid > 0 and player5.itemid > 0 and player6.itemid > 0 and player7.itemid > 0 and player8.itemid > 0 then
player1level = getPlayerLevel(player1.uid)
player2level = getPlayerLevel(player2.uid)
player3level = getPlayerLevel(player3.uid)
player4level = getPlayerLevel(player4.uid)
player5level = getPlayerLevel(player5.uid)
player6level = getPlayerLevel(player6.uid)
player7level = getPlayerLevel(player7.uid)
player8level = getPlayerLevel(player8.uid)
questlevel = 300
if player1level >= questlevel and player2level >= questlevel and player3level >= questlevel and player4level >= questlevel and player5level >= questlevel and player6level >= questlevel and player7level >= questlevel and player8level >= questlevel then
queststatus1 = getPlayerStorageValue(player1.uid,49500)
queststatus2 = getPlayerStorageValue(player2.uid,49500)
queststatus3 = getPlayerStorageValue(player3.uid,49500)
queststatus4 = getPlayerStorageValue(player4.uid,49500)
queststatus5 = getPlayerStorageValue(player5.uid,49500)
queststatus6 = getPlayerStorageValue(player6.uid,49500)
queststatus7 = getPlayerStorageValue(player7.uid,49500)
queststatus8 = getPlayerStorageValue(player8.uid,49500)
if queststatus1 == -1 and queststatus2 == -1 and queststatus3 == -1 and queststatus4 == -1 and queststatus5 == -1 and queststatus6 == -1 and queststatus7 == -1 and queststatus8 == -1 then
--if 1==1 then
demon1pos = {x=148, y=328, z=8}
demon2pos = {x=148, y=329, z=8}
demon3pos = {x=149, y=329, z=8}
demon4pos = {x=149, y=328, z=8}
demon5pos = {x=146, y=326, z=8}
demon6pos = {x=144, y=326, z=8}
demon7pos = {x=145, y=331, z=8}
demon8pos = {x=147, y=331, z=8}
doSummonCreature("ghazbaran", demon1pos)
doSummonCreature("ghazbaran", demon2pos)
doSummonCreature("ghazbaran", demon3pos)
doSummonCreature("ghazbaran", demon4pos)
doSummonCreature("ghazbaran", demon5pos)
doSummonCreature("ghazbaran", demon6pos)
doSummonCreature("ghazbaran", demon7pos)
doSummonCreature("ghazbaran", demon8pos)
nplayer1pos = {x=147, y=329, z=8}
nplayer2pos = {x=146, y=329, z=8}
nplayer3pos = {x=145, y=329, z=8}
nplayer4pos = {x=144, y=329, z=8}
nplayer5pos = {x=147, y=328, z=8}
nplayer6pos = {x=146, y=328, z=8}
nplayer7pos = {x=145, y=328, z=8}
nplayer8pos = {x=144, y=328, z=8}
doSendMagicEffect(player1pos,2)
doSendMagicEffect(player2pos,2)
doSendMagicEffect(player3pos,2)
doSendMagicEffect(player4pos,2)
doSendMagicEffect(player5pos,2)
doSendMagicEffect(player6pos,2)
doSendMagicEffect(player7pos,2)
doSendMagicEffect(player8pos,2)
doTeleportThing(player1.uid,nplayer1pos)
doTeleportThing(player2.uid,nplayer2pos)
doTeleportThing(player3.uid,nplayer3pos)
doTeleportThing(player4.uid,nplayer4pos)
doTeleportThing(player5.uid,nplayer5pos)
doTeleportThing(player6.uid,nplayer6pos)
doTeleportThing(player7.uid,nplayer7pos)
doTeleportThing(player8.uid,nplayer8pos)
doSendMagicEffect(nplayer1pos,10)
doSendMagicEffect(nplayer2pos,10)
doSendMagicEffect(nplayer3pos,10)
doSendMagicEffect(nplayer4pos,10)
doSendMagicEffect(nplayer5pos,10)
doSendMagicEffect(nplayer6pos,10)
doSendMagicEffect(nplayer7pos,10)
doSendMagicEffect(nplayer8pos,10)
doTransformItem(item.uid,1945)
else
doPlayerSendCancel(cid,"Someone has already done this quest")
end
else
doPlayerSendCancel(cid,"Your level is too low")
end
else
doPlayerSendCancel(cid,"You need 8 players in your team.")
end
end
if item.itemid == 1945 then
-- Here is the code start:
starting={x=143, y=325, z=8, stackpos=253}
checking={x=starting.x, y=starting.y, z=starting.z, stackpos=starting.stackpos}
ending={x=150, y=331, z=8, stackpos=253}
players=8
totalmonsters=8
monster = {}
repeat
creature= getThingfromPos(checking)
if creature.itemid > 0 then
if getPlayerAccess(creature.uid) == 0 then
players=players+1
end
if getPlayerAccess(creature.uid) ~= 0 and getPlayerAccess(creature.uid) ~= 3 then
totalmonsters=totalmonsters+1
monster[totalmonsters]=creature.uid
end
end
checking.x=checking.x+1
if checking.x>ending.x then
checking.x=starting.x
checking.y=checking.y+1
end
until checking.y>ending.y
if players==0 then
trash= {x=15, y=15, z=7}
current=0
repeat
current=current+1
doTeleportThing(monster[current],trash)
until current>=totalmonsters
doTransformItem(item.uid,1946)
end
-- Here is the end of it
end
end
if item.uid == 6001 then
queststatus = getPlayerStorageValue(cid,100)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found a sweddy dress.")
doPlayerAddItem(cid,2494,1)
setPlayerStorageValue(cid,100,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
end
if item.uid == 6002 then
queststatus = getPlayerStorageValue(cid,100)
if queststatus ~= 1 then
doPlayerSendTextMessage(cid,22,"You have found a cock boots.")
doPlayerAddItem(cid,2400,1)
setPlayerStorageValue(cid,100,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
end
if item.uid == 6003 then
queststatus = getPlayerStorageValue(cid,100)
if queststatus ~= 1 then
doPlayerSendTextMessage(cid,22,"You have found a anni legs.")
doPlayerAddItem(cid,2431,1)
setPlayerStorageValue(cid,100,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
end
if item.uid == 6004 then
queststatus = getPlayerStorageValue(cid,100)
if queststatus ~= 1 then
doPlayerSendTextMessage(cid,22,"You have found a present.")
doPlayerAddItem(cid,2326,1)
setPlayerStorageValue(cid,100,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
end
return 1
end