Atirador De Minas Subterrâneas

noobinhu
em Actions e Talkactions
  • 1
  • 2

noobinhu

Ex Administrador
avatar
Marquês
Marquês

INFOS

Grupo: MarquêsRegistrado: 01/03/06Posts: 1022Gênero: Masculino

Este script eu fiz hoje, ele simplesmente é um atirador de minas subterrâneas (você não vê a mina instalada, sprites, etc) e quando alguém pisar no tile com uma mina subterrânea perderá certa quantidade de HP, podendo morrer ou não, depende da configuração e do hit.

 

Quando instalada a mina, você perderá uma quantia de mana, ela só pode ser instalada em certos tipos de chãos, determinados pela configuração do script, também não pode ser instalada dentro de Protection Zones, nem se você tiver dentro de uma.

 

Primeiro, adicione a seguinte linhas no seu actions.xml:

 

<action itemid="7435" script="other/mines.lua" allowfaruse="1"/>

 

Agora faça um script chamado mines.lua na pasta actions/scripts/other contendo:

 

local groundsArray = {[351] = 351, [352] = 352, [353] = 353, [354] = 354, [355] = 355}

 

-- configs

local manaspent = 100

local effecterror = 2

local effectok = 3

local vocationsArray = {[0] = 0, [1] = 1, [2] = 2, [3] = 3, [4] = 4, [5] = 5, [6] = 6, [7] = 7, [8] = 8}

-- end configs

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

topos = toPosition

playerpos = getCreaturePosition(cid)

currentmana = getPlayerMana(cid)

playervoc = getPlayerVocation(cid)

 

if itemEx.actionid ~= 28900 then

if itemEx.actionid == 0 or itemEx.actionid == 100 and itemEx.actionid ~= 28900 then

if vocationsArray[playervoc] ~= nil then

if getPlayerMana(cid) >= manaspent then

if getTilePzInfo(topos) == FALSE then

if getTilePzInfo(playerpos) == FALSE then

if groundsArray[itemEx.itemid] ~= nil then

doSendMagicEffect(topos,effectok)

doSetItemActionId(itemEx.uid, 28900)

doPlayerAddMana(cid, -manaspent)

else

doPlayerSendTextMessage(cid, 20, "Você só pode implantar bombas em certos chãos.")

doSendMagicEffect(playerpos,effecterror)

end

else

doPlayerSendTextMessage(cid, 20, "Você não pode estar em uma protection zone para implantar bombas.")

doSendMagicEffect(playerpos,effecterror)

end

else

doPlayerSendTextMessage(cid, 20, "Você não pode implantar bombas em áreas de protection zone.")

doSendMagicEffect(playerpos,effecterror)

end

else

doPlayerSendTextMessage(cid, 20, "Você não tem mana suficiente.")

doSendMagicEffect(playerpos,effecterror)

end

else

doPlayerSendTextMessage(cid, 20, "Sua vocação não tem suporte para implantar bombas.")

doSendMagicEffect(playerpos,effecterror)

end

else

doPlayerSendTextMessage(cid, 20, "Você não pode implantar bombas neste SQM.")

doSendMagicEffect(playerpos,effecterror)

end

else

doPlayerSendTextMessage(cid, 20, "Uma bomba já está implantada neste SQM.")

doSendMagicEffect(playerpos,effecterror)

end

end

 

Configure os tiles que poderão ser implantados as bombas em negrito.

 

Adicione as seguintes linhas em movements.xml localizado na pasta movements:

 

<!-- Mine System -->

<movevent event="StepIn" actionid="28900" script="mineactive.lua"/>

 

Agora faça um script chamado mineactive.lua em movements/scripts contendo:

 

function onStepIn(cid, item, position, fromPosition)

if isPlayer(cid) then

-- configs

local maykill = 0

local hit = math.random(4000,5000)

local talk = "OUCH!"

local minimumlevel = 20

-- end configs

currenthealth = getCreatureHealth(cid)

if currenthealth <= hit and maykill == 0 then

hit = currenthealth-1

end

playerlevel = getPlayerLevel(cid)

playerpos = getCreaturePosition(cid)

 

if playerlevel >= minimumlevel then

doCreatureAddHealth(cid, -hit)

doSendAnimatedText(playerpos, talk, 180)

doSendAnimatedText(playerpos, hit, 180)

doSendMagicEffect(playerpos,5)

doSetItemActionId(item.uid, 0)

end

end

end

 

Para implantar uma bomba, basta dar use with na arma do itemid 7435 e clicar em algum chão que não está restrito pelo script de implantação, ex.: 351, 352, 353, 354, 355; então quando algum player pisar no SQM que seja de level maior que o configurado no script, tomará o dano, podendo morrer ou não.

 

Screenshoot, tomando dano:

minatp6.png

 

Bom proveito,

Yunie.

Darth Sidious

Em chamas...
avatar
Banidos
Banidos

INFOS

Grupo: BanidosRegistrado: 31/07/07Posts: 533Char no Tibia: Kninght'Danilo

Cada vez mais se superando, ótimo script realmente muito inspirador a criar um ot com sistemas novos e revolucionarios, meus parabéns :smile_positivo: .


Xtibia 2006 ~ 2009!
Eu não to mais aguentando e a vida tá passando...





Quots :
QUOTE
17:24 Ulryx Shadowseeker [13]: eu acessava site pedofilo ~ Leo94
17:26 Next Shadowseeker [7]: SELL THAIS SWORD ~ Christian
'      Léo 1OO     diz:
ngm come minha xaninha
'      Léo 1OO     diz:
se nao tive
'      Léo 1OO     diz:
eu do meu cu

BillyBola

Ex-Imprensa XTibia
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 08/06/08Posts: 676Char no Tibia: Kimera De Pegasus

Mais um,Po esse script ai e interessante para por em hunts...

 

Pena que nao tenho OT se nao colocava eles..

 

Serio mesmo

DaNDaNrOxX

oi mosso
avatar
Marquês
Marquês

INFOS

Grupo: MarquêsRegistrado: 18/01/08Posts: 1455Char no Tibia: Saint Claire

Mais um script muito bom, parabéns noobinhu (:

É legal fazer coisas deste tipo, e por base neste, podemos fazer muiiitas² outras modificações e deixar bem daora mesmo ^^

Obrigado por compartilhar com a comunidade !

Abraço

 

 

Entrada na equipe: 23/10/2008 Cargo: Estagiário

Promoção: 25/11/2008 Cargo: Moderador

Promoção: 21/10/2009 Cargo: Coordenador

Remoção: 09/05/2010 Motivo: Estudos

Retorno: 15/11/2010 Cargo: Moderador

Remoção: 20/12/2012.

 

 

alissonlinneker

ñ frite bacon sem kmiza xP
avatar
Barão
Barão

INFOS

Grupo: BarãoRegistrado: 15/12/07Posts: 239

muito bom mesmo...

isso é um TRAP?

 

a mina sai de lah quando alguem passa emcima dela?

tipo

..

todo mundo que passar la, leva hit?

ou é apenas uma vez?

 

 

 

vlw ae pelo script



Devo esquecer aqueles que me impuseram obstáculos infundados e agradecer àqueles que me impulsionaram adiante. É hora, mais do que nunca, de valorizar as amizades e os conhecimentos adquiridos aqui. Agradeço a todos que me apoiaram. Vlw xTibia!
Amais!
[Retired]



~~>Meus Trabalhos:

---Sistema De Domínio De Castelos. (Action)
---Sistema De Mineraçao (Action)
---Scroll Que Da X Exp Quando é Usada (Action)
---Portas Não Abrem? Venha Aqui Ver Como Arruma! (Action)
---Crie Suas Quest´s De Uma Maneira Rapida E Facil. (Action)
---The Demon OaK Quest (Action)

---Addon Por Item, Com Todos Os Outfits. (Npc)

---Aprenda a colocar suas quests no Quest Log (Tutorial+scripts _ data/xml/quests.xml)
---Conhecendo Melhor A Pasta Globalevents (Tutorial+scripts)
---Gerencie O Seu Mysql Como Se Fosse Sqlite (Tutorial)
---Multi World Sistem - Como Funciona. (Tutorial)

---Projeto de tradução do TFS 8.31 SQL - Inglês para o Portugês (Server 8.31)

---2 Templantes para Web Site de OT (Websites de OTserv)
---Atualização de sites do Gesior para sistema de mult-world (Websites de OTserv)

---Thyrania editado (Map)
---Yalahar Global Completo (Map)

---Pic Editor para Tibia 8.2+ (Programa)
---Ztracker - Clone mapas 8.4 (Programa)



Tprocheira

WOOOOW
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 23/12/07Posts: 566Char no Tibia: Tprocheira soldier

Script interessante, só achei legal aquele monte de 'enchessão' de linguiça =D

local groundsArray = {[351] = 351, [352] = 352, [353] = 353, [354] = 354, [355] = 355}

local vocationsArray = {[0] = 0, [1] = 1, [2] = 2, [3] = 3, [4] = 4, [5] = 5, [6] = 6, [7] = 7, [8] = 8}

Era mais fácil você colocar:

local groundsArray =

{

351,

352,

353,

354,

353

}

=D

Mas mesmo assim, parabéns!

 

Tprocheira

Skyblade

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 20/06/08Posts: 76Char no Tibia: Yahuu

Q ROXXXXXXXXXXXXX

 

mto daora

AUhauhahuh

 

 

nota 10

^^

ºº A erva é mais importante pra quem não conhece ela ºº

ºº Nós olhamos pra ela e falamos... A erva...ºº

Bob Marley



ATS Com sistemas unicos como:

Carros,Skate, Quests únicas

Forja de items, mais de 15 sports para jogar

areas de treino e de caça

Items totalmente editados

Tutoriais explicando como jogar no site

Eventos Diários.

Entre agora mesmo!



Esperamos Você la!

inforce

Status: OFF motivo? Treinando skill ;]
avatar
Visconde
Visconde

INFOS

Grupo: ViscondeRegistrado: 14/09/08Posts: 362Char no Tibia: Furios Roxyn

Nossa ownante curti demais no novo projeto que estou participando vou falar com a equipe para por isso no nosso novo ot

Last Sign



----------Prefiro Morrer Do que perder a Vida---------




PRO69 2008/2009 XTibia member


Outfit - Faz fakes? fique a vontade em me usar nelas ;)

funniesk

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 12/11/08Posts: 70

Cara muito bom o script, vou colocar ele aqui no meu ot, continue assim dispondo suas ideias para nossa comunidade valeu!!

cpsfute

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 07/01/09Posts: 53Char no Tibia: Tekio-san

Mt Legal Hehehe =]~ Bom para fazer eventos de chegar a um lugar sem morrer pisando nas minas e talz ;]~

Olá XTibiano!

Sua assinatura foi movida para a area "Sobre mim", pois um erro contido na mesma estava danificando o layout do fórum.

Grato pela atenção,
Henrique Moura.

guilhermes26

avatar
Visconde
Visconde

INFOS

Grupo: ViscondeRegistrado: 25/05/08Posts: 1432Char no Tibia: Akhumura

MARA!!

:) bem criativo o script, da pra usar de abse para outras traps bem interessantes e descoladas :)~

  • 1
  • 2