Anihilator Com Alavanca

[alokk 0]

Adicione isso no actions.xml

 

<action uniqueid="7000" script="anihi.lua" /><action uniqueid="7001" script="anihi.lua" /><action uniqueid="7002" script="anihi.lua" /><action uniqueid="7003" script="anihi.lua" /><action uniqueid="7004" script="anihi.lua" />

 

Depois crie um arquivo nomeado de anihi.lua dentro da pasta scripts e cole o code abaixo.

 

-- Annihilator script v2.1 by GriZzm0 Modified by Drake, Alokk.---- Exemplo:---- player?pos  = A posição dos players antes de puxar a alavanca.-- player?  = Lugar q o kra está qnd teleporta.-- player?level = Confere o level dos players.-- questslevel  = O Level necessario para fazer a quest.-- questtatus?  = Confere os Status da quest.-- demon?pos  = Cordenada dos Demons q irão aparecer ao puxar a alvanca.-- nplayer?pos  = Posição onde cada player será teleportado.---- UniqueIDs used:---- 7000 = A Alavanca-- 7001 = Demon Armor chest.-- 7002 = Magic Sword chest.-- 7003 = Stonecutter Axe chest.-- 7004 = Present.--function onUse(cid, item, frompos, item2, topos)if item.uid == 7000 thenif item.itemid == 1946 then player1pos = {x=265, y=222, z=12, stackpos=253} player1 = getThingfromPos(player1pos) player2pos = {x=264, y=222, z=12, stackpos=253} player2 = getThingfromPos(player2pos) player3pos = {x=263, y=222, z=12, stackpos=253} player3 = getThingfromPos(player3pos) player4pos = {x=262, y=222, z=12, 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,6026)   queststatus2 = getPlayerStorageValue(player2.uid,6026)   queststatus3 = getPlayerStorageValue(player3.uid,6026)   queststatus4 = getPlayerStorageValue(player4.uid,6026)   if queststatus1 == -1 and queststatus2 == -1 and queststatus3 == -1 and queststatus4 == -1 then    demon1pos = {x=261, y=238, z=12}    demon2pos = {x=263, y=238, z=12}    demon3pos = {x=265, y=240, z=12}    demon4pos = {x=266, y=240, z=12}    demon5pos = {x=262, y=242, z=12}    demon6pos = {x=264, y=242, z=12}    doSummonCreature("Demon", demon1pos)    doSummonCreature("Demon", demon2pos)    doSummonCreature("Demon", demon3pos)    doSummonCreature("Demon", demon4pos)    doSummonCreature("Demon", demon5pos)    doSummonCreature("Demon", demon6pos)    nplayer1pos = {x=264, y=240, z=12}    nplayer2pos = {x=263, y=240, z=12}    nplayer3pos = {x=262, y=240, z=12}    nplayer4pos = {x=261, y=240, z=12}    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.") endelseif item.itemid == 1945 then if getPlayerAccess(cid) == 3 then  doTransformItem(item.uid,item.itemid-1) else  doPlayerSendCancel(cid,"Sorry, not possible.") endendelseif item.uid == 7001 thenqueststatus = getPlayerStorageValue(cid,7001)if queststatus == -1 then doPlayerSendTextMessage(cid,22,"You have found a Demon Armor.") doPlayerAddItem(cid,2494,1) setPlayerStorageValue(cid,7001,1)else doPlayerSendTextMessage(cid,22,"It is empty.")endelseif item.uid == 7002 thenqueststatus = getPlayerStorageValue(cid,7002)if queststatus == -1 then doPlayerSendTextMessage(cid,22,"You have found a Magic Sword.") doPlayerAddItem(cid,2400,1) setPlayerStorageValue(cid,7002,1)else doPlayerSendTextMessage(cid,22,"It is empty.")endelseif item.uid == 7003 thenqueststatus = getPlayerStorageValue(cid,7003)if queststatus == -1 then doPlayerSendTextMessage(cid,22,"You have found a StoneCutter's Axe.") doPlayerAddItem(cid,2431,1) setPlayerStorageValue(cid,7003,1)else doPlayerSendTextMessage(cid,22,"It is empty.")endelseif item.uid == 7004 thenqueststatus = getPlayerStorageValue(cid,7004)if queststatus == -1 then doPlayerSendTextMessage(cid,22,"You have found a Great Shield.") doPlayerAddItem(cid,2522,1) setPlayerStorageValue(cid,7004,1)else doPlayerSendTextMessage(cid,22,"It is empty.")endendreturn 1end

 

Depois edite as coordenadas dos 4 players e dos demons, pronto já tem sua anihilator.

[PiticooO 0]

ae vlw concigui ;D

[Lulu 0]

Tbm consegui vlw ae vei

FLW

[Bruno 535]

AAHsiHSUiHAu

Não Sabia que existia esse tipo de versão ainda aki no Xtibia!

[rockets 7]

Vlw vei, por conhecidencia eu vim aki no forum procura sobre anihi msm

vlw, bom trabalho

[kruxdudu 0]

7.4? Oo a galera ainda usa isso? auauah

Mas ta valendo...

Gratz!

[klaussvf 0]

issu foi em 2005...portanto é obvio que eles nao usavam 8.21 né....

 

e cara acho que vocês renasceram um topico velho sem motivo...olha o comentario "AHsiHSUiHAu

Não Sabia que existia esse tipo de versão ainda aki no Xtibia! "

[Fhrancys 0]

Como faço pro player pegar somente 1 item?