Ir para conteúdo
  • Cadastre-se

Posts Recomendados

Pessoal da uma olhada!

 

t0n2gw.png

 

for1.lua

-- Annihilator script by GriZzm0
 -- Room check and monster removal by Tworn
 
 --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.
 --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:
 
 --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 == 7003 then
 if item.itemid == 1946 then
 
 player1pos = {x=32975, y=31721, z=2, stackpos=253}
 player1 = getThingfromPos(player1pos)
 
 player2pos = {x=32974, y=32721, z=2, stackpos=253}
 player2 = getThingfromPos(player2pos)
 
 player3pos = {x=32973, y=32721, z=2, stackpos=253}
 player3 = getThingfromPos(player3pos)
 
 player4pos = {x=32972, y=32721, z=2, 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 = 150
 
  if player1level >= questlevel and player2level >= questlevel and player3level >= questlevel and player4level >= questlevel then
 
	  queststatus1 = getPlayerStorageValue(player1.uid,101)
	  queststatus2 = getPlayerStorageValue(player2.uid,101)
	  queststatus3 = getPlayerStorageValue(player3.uid,101)
	  queststatus4 = getPlayerStorageValue(player4.uid,101)
 
	  if queststatus1 == -1 and queststatus2 == -1 and queststatus3 == -1 and queststatus4 == -1 then
	--if 1==1 then
	demon1pos = {x=32975, y=31735, z=9}
	demon2pos = {x=32973, y=31735, z=9}
	demon3pos = {x=32976, y=31739, z=9}
	demon4pos = {x=32974, y=31739, z=9}
	demon5pos = {x=32977, y=31737, z=9}
	demon6pos = {x=32978, y=31737, z=9}
 
   doSummonCreature("Soul Wizard", demon1pos)
   doSummonCreature("Soul Wizard", demon2pos)
   doSummonCreature("Soul Wizard", demon3pos)
   doSummonCreature("Soul Wizard", demon4pos)
   doSummonCreature("Maze Boss", demon5pos)
   doSummonCreature("Maze Boss", demon6pos)
 
	nplayer1pos = {x=32976, y=31737, z=9}
	nplayer2pos = {x=32975, y=31737, z=9}
	nplayer3pos = {x=32974, y=31737, z=9}
	nplayer4pos = {x=32973, y=31737, z=9}
 
   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,1945)
 
	else
	 doPlayerSendCancel(cid,"Sorry, not possible.")
	end
   else
	doPlayerSendCancel(cid,"Sorry, not possible.")
   end
  else
  doPlayerSendCancel(cid,"Sorry, not possible.")
  end
 end
 if item.itemid == 1945 then
-- Here is the code start:
starting={x=32970, y=31726, z=9, stackpos=253}
checking={x=starting.x, y=starting.y, z=starting.z, stackpos=starting.stackpos}
ending={x=32995, y=31740, z=9, stackpos=253}
players=0
totalmonsters=0
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=33002, y=31718, z=9}
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 == 5016 then
 queststatus = getPlayerStorageValue(cid,101)
 if queststatus == -1 then
  doPlayerSendTextMessage(cid,22,"You have found a Lavos Armor.")
  doPlayerAddItem(cid,8877,1)
  setPlayerStorageValue(cid,101,1)
 else
  doPlayerSendTextMessage(cid,22,"It is empty.")
 end
end
if item.uid == 5017 then
 queststatus = getPlayerStorageValue(cid,101)
 if queststatus ~= 1 then
  doPlayerSendTextMessage(cid,22,"You have found a Divine Plate.")
  doPlayerAddItem(cid,8885,1)
  setPlayerStorageValue(cid,101,1)
 else
  doPlayerSendTextMessage(cid,22,"It is empty.")
 end
end
if item.uid == 5018 then
 queststatus = getPlayerStorageValue(cid,101)
 if queststatus ~= 1 then
  doPlayerSendTextMessage(cid,22,"You have found a Crystal Staff.")
  doPlayerAddItem(cid,7880,1)
  setPlayerStorageValue(cid,101,1)
 else
  doPlayerSendTextMessage(cid,22,"It is empty.")
 end
end
 return 1
end
Link para o post
Compartilhar em outros sites

Vê se as coordenadas informadas estão corretas. Pq aqui na minha annihi são diferentes.

 

 

player1pos = {x=32975, y=31721, z=2, stackpos=253}

player2pos = {x=32974, y=32721, z=2, stackpos=253}

player3pos = {x=32973, y=32721, z=2, stackpos=253}

player4pos = {x=32972, y=32721, z=2, stackpos=253}

 

starting={x=32970, y=31726, z=9, stackpos=253}

Editado por danihcv (veja o histórico de edições)

Te ajudei?? REP + e ficamos quites... <ahttp://www.tibiaking.com/forum/uploads/emoticons/default_happyy.png' alt=';D'>

Atenciosamente,

Daniel.

Abraços!

Link para o post
Compartilhar em outros sites

Tenta assim:

-- Annihilator script by GriZzm0
 -- Room check and monster removal by Tworn
 
 --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.
 --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:
 
 --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 == 7003 then
 if item.itemid == 1946 then
 
 player1pos = {x=32975, y=31721, z=2, stackpos=253}
 player1 = getThingFromPosition(player1pos)
 
 player2pos = {x=32974, y=32721, z=2, stackpos=253}
 player2 = getThingFromPosition(player2pos)
 
 player3pos = {x=32973, y=32721, z=2, stackpos=253}
 player3 = getThingFromPosition(player3pos)
 
 player4pos = {x=32972, y=32721, z=2, stackpos=253}
 player4 = getThingFromPosition(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 = 150
 
  if player1level >= questlevel and player2level >= questlevel and player3level >= questlevel and player4level >= questlevel then
 
	  queststatus1 = getPlayerStorageValue(player1.uid,101)
	  queststatus2 = getPlayerStorageValue(player2.uid,101)
	  queststatus3 = getPlayerStorageValue(player3.uid,101)
	  queststatus4 = getPlayerStorageValue(player4.uid,101)
 
	  if queststatus1 == -1 and queststatus2 == -1 and queststatus3 == -1 and queststatus4 == -1 then
	--if 1==1 then
	demon1pos = {x=32975, y=31735, z=9}
	demon2pos = {x=32973, y=31735, z=9}
	demon3pos = {x=32976, y=31739, z=9}
	demon4pos = {x=32974, y=31739, z=9}
	demon5pos = {x=32977, y=31737, z=9}
	demon6pos = {x=32978, y=31737, z=9}
 
   doSummonCreature("Soul Wizard", demon1pos)
   doSummonCreature("Soul Wizard", demon2pos)
   doSummonCreature("Soul Wizard", demon3pos)
   doSummonCreature("Soul Wizard", demon4pos)
   doSummonCreature("Maze Boss", demon5pos)
   doSummonCreature("Maze Boss", demon6pos)
 
	nplayer1pos = {x=32976, y=31737, z=9}
	nplayer2pos = {x=32975, y=31737, z=9}
	nplayer3pos = {x=32974, y=31737, z=9}
	nplayer4pos = {x=32973, y=31737, z=9}
 
   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,1945)
 
	else
	 doPlayerSendCancel(cid,"Sorry, not possible.")
	end
   else
	doPlayerSendCancel(cid,"Sorry, not possible.")
   end
  else
  doPlayerSendCancel(cid,"Sorry, not possible.")
  end
 end
 if item.itemid == 1945 then
-- Here is the code start:
starting={x=32970, y=31726, z=9, stackpos=253}
checking={x=starting.x, y=starting.y, z=starting.z, stackpos=starting.stackpos}
ending={x=32995, y=31740, z=9, stackpos=253}
players=0
totalmonsters=0
monster = {}
repeat
creature= getThingFromPosition(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=33002, y=31718, z=9}
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 == 5016 then
 queststatus = getPlayerStorageValue(cid,101)
 if queststatus == -1 then
  doPlayerSendTextMessage(cid,22,"You have found a Lavos Armor.")
  doPlayerAddItem(cid,8877,1)
  setPlayerStorageValue(cid,101,1)
 else
  doPlayerSendTextMessage(cid,22,"It is empty.")
 end
end
if item.uid == 5017 then
 queststatus = getPlayerStorageValue(cid,101)
 if queststatus ~= 1 then
  doPlayerSendTextMessage(cid,22,"You have found a Divine Plate.")
  doPlayerAddItem(cid,8885,1)
  setPlayerStorageValue(cid,101,1)
 else
  doPlayerSendTextMessage(cid,22,"It is empty.")
 end
end
if item.uid == 5018 then
 queststatus = getPlayerStorageValue(cid,101)
 if queststatus ~= 1 then
  doPlayerSendTextMessage(cid,22,"You have found a Crystal Staff.")
  doPlayerAddItem(cid,7880,1)
  setPlayerStorageValue(cid,101,1)
 else
  doPlayerSendTextMessage(cid,22,"It is empty.")
 end
end
 return 1
end

Te ajudei?? REP + e ficamos quites... <ahttp://www.tibiaking.com/forum/uploads/emoticons/default_happyy.png' alt=';D'>

Atenciosamente,

Daniel.

Abraços!

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo