action [Action] Mina

[Faisher 6]

Primeiro, va para actions / scripts e crie um arquivo chamado mina.lua e adhicionar o seguinte:

function isWalkable(pos, creature, proj, pz)-- by Nord
       if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
       if getTopCreature(pos).uid > 0 and creature then return false end
       if getTileInfo(pos).protection and pz then return false, true end
       local n = not proj and 3 or 2
       for i = 0, 255 do
               pos.stackpos = i
               local tile = getTileThingByPos(pos)
               if tile.itemid ~= 0 and not isCreature(tile.uid) then
                       if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
                               return false
                       end
               end
       end
       return true
end
function getTime(s)
       local n = math.floor(s / 60)
       s = s - (60 * n)
       return n, s
end
local items = {
[2554] = {
storagetime = 6423356224333, 
time = 13,
aid = 4444
}
}
local bombstorage = 3847757422
function onUse(cid, item, fromPosition, itemEx, toPosition) -- Script by Xafterin
local m = items[item.itemid]
if m then
	if not isWalkable(toPosition, false, false, false) then
		return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"You cannot throw the ".. getItemNameById(item.itemid) .." here!.")
	end
	if getTilePzInfo(getCreaturePosition(cid)) or getTilePzInfo(toPosition) then 
		return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE,"You cannot use this weapon in a protection zone!.")
	end
	local time = m.time
	if os.time()-getPlayerStorageValue(cid, m.storagetime)+1 <= time then
		minutes,seconds = getTime(time-(os.time()-getPlayerStorageValue(cid, m.storagetime)))
		return  doPlayerSendTextMessage(cid, 27, "Wait "..seconds.." seconds.")
	end		
	doItemSetAttribute(itemEx.uid, "aid", m.aid)
	doItemSetAttribute(itemEx.uid, "description", getPlayerName(cid))
	setPlayerStorageValue(cid, m.storagetime, os.time())
	doPlayerAddSkillTry(cid, 5, 1)   
end
return true
end

 

 

Va para actions.xml

<action itemid="2554" event="script" value="mina.lua" allowfaruse="1"/>

 

Movement:

local mina = {
[4444] = 	{delay  = 1, -- seconds
mindamage = -14434, 
maxdamage = -304343, 
damagetype = COMBAT_FIREDAMAGE}
}

function onStepIn(cid, item, position, fromPosition)
local m = mina[item.actionid]
local function boom(cid, min, max, damagetype, pos)
-- COMBAT FUNCTION --	
local area = {
	{x = pos.x+1, y = pos.y, z = pos.z},
	{x = pos.x, y = pos.y+1, z = pos.z},
	{x = pos.x-1, y = pos.y, z = pos.z},
	{x = pos.x+1, y = pos.y+1, z = pos.z},
	{x = pos.x-1, y = pos.y-1, z = pos.z},
	{x = pos.x, y = pos.y-1, z = pos.z},
	{x = pos.x+1, y = pos.y-1, z = pos.z},
	{x = pos.x-1, y = pos.y+1, z = pos.z},
	{x = pos.x, y = pos.y, z = pos.z}
	}
for i = 1,#area do
	doAreaCombatHealth(0, damagetype, area[i], 0, min, max, 0) 
end
return true
end
if getPlayerName(cid) == getItemAttribute(item.uid, "description") then
	return doPlayerSendCancel(cid, "This is your bomb.")
end
addEvent(boom, m.delay * 1000, cid, m.min, m.max, m.damagetype, position)
doItemEraseAttribute(item.uid, "aid")
return true
end

 

 

movements.xml

<movevent type="StepIn" actionid="4444" event="script" value="mina.lua"/>

Editado Fevereiro 20, 2011 por Faisher

[Vampiresco 35]

Explica melhor o que o Script faz e como funciona? e em qual versão ela e compativel? GRATO.

[Henrique Moura 193]

Andar por cima do tile, ele "explode". Certo?

[Faisher 6]

Yes, exactly.

 

More comments

 

 

PD: I forgot the movement script sorry!

 

Movement:

local mina = {
[4444] = 	{delay  = 1, -- seconds
mindamage = -14434, 
maxdamage = -304343, 
damagetype = COMBAT_FIREDAMAGE}
}

function onStepIn(cid, item, position, fromPosition)
local m = mina[item.actionid]
local function boom(cid, min, max, damagetype, pos)
-- COMBAT FUNCTION --	
local area = {
	{x = pos.x+1, y = pos.y, z = pos.z},
	{x = pos.x, y = pos.y+1, z = pos.z},
	{x = pos.x-1, y = pos.y, z = pos.z},
	{x = pos.x+1, y = pos.y+1, z = pos.z},
	{x = pos.x-1, y = pos.y-1, z = pos.z},
	{x = pos.x, y = pos.y-1, z = pos.z},
	{x = pos.x+1, y = pos.y-1, z = pos.z},
	{x = pos.x-1, y = pos.y+1, z = pos.z},
	{x = pos.x, y = pos.y, z = pos.z}
	}
for i = 1,#area do
	doAreaCombatHealth(0, damagetype, area[i], 0, min, max, 0) 
end
return true
end
if getPlayerName(cid) == getItemAttribute(item.uid, "description") then
	return doPlayerSendCancel(cid, "This is your bomb.")
end
addEvent(boom, m.delay * 1000, cid, m.min, m.max, m.damagetype, position)
doItemEraseAttribute(item.uid, "aid")
return true
end

 

 

movements.xml

<movevent type="StepIn" actionid="4444" event="script" value="mina.lua"/>

Editado Fevereiro 20, 2011 por Faisher

[linkay 0]

1º Isso aqui é tópico BR, não gringo...

2º Já que é um sistema novo, podia postar umas SSs, e explicar o que ele fas.

 

Depois dizem que brasileiro é preguiçoso.

[Faisher 6]

Gringo is an expression that is used to denominate the mexican people, I am not mexican, I am spanish, then, BE QUIET PLEASE

And I think the idea of a mine is pretty clear, you plant the mine and if someone steps on it, BOOM, it explodes. Remember this: Do not judge without knowing.

 

br:

 

Gringo é uma expressão que é usada para denominar o povo mexicano, eu não sou mexicana, eu sou espanhol, então, fique quieto por favor;)

E eu acho que a idéia de uma mina é muito claro, que você planta da mina e os passos, se alguém sobre ele, BOOM, ele explode.

 

Lembre-se disto: Não julgue sem saber.

Editado Fevereiro 25, 2011 por Faisher

[749676 2]

concordo com nosso amigo é aki site br, então fale PORTUGUES e gringo é uma giria e pode ser usada para qualquer extranjero ANIMAL !

[pintopinto 0]

Pois é!

você não vê br falando português em fórum de gringo,é falado geralmente o inglês,mexicano burro!

[Faisher 6]

Sorry to say this but ... XTIBIA is a hive of IDIOTS.

 

 

@DirTh

You are the best idiot on all XTibia, IM NOT MEXICAN, IM SPANISH ..

[Michy1 0]

Olha preguiçosa corda Português ....

Cave maldita merda bandido ...

Ele está trazendo um novo script para usar o maldito noob que não importa o que a vida usada para aprender a apreciar um roteiro de onde vem bastardos bastardo estúpido

 

PORTUGUÊS ódio merda como você

Miren malditos portugueses cuerda de vagos ....

Cueva de malditos malandro de mierda...

El está trayendo un script nuevo para ustedes malditos noob que igual lo utilizaran no tienen vida aprendan a apreciar un script venga de donde venga idiotas malparidos hijos de puta

 

Odio los PORTUGUESES de mierda como ustedes :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley: :angrysmiley:

Editado Março 1, 2011 por 132820

[Demonbholder 420]

AHEUAHUEAHUEHAUHEAU, eu ri; ah foda-se, deixa os caras, se a moderação se manifestar, eles vão saber o que fazer.

[victorpuntel 7]

Por exemplo, o @132820 falou qe odeia os portugueses... Oque ele está fazendo aqui entao? que eu saiba Xtibia não é americana

:XTibia_smile:

[Faisher 6]

XTibia si é americana noob

[linkay 0]

PORRA QUE GRINGO OTÁRIO

AEUHAUHAUHEUHAEHUAEHUAEHUAEHUAE

Nunca ri tanto na minha vida.

 

Amigão, gringo é uma gíria, que quer dizer estrangeiro.

 

FODA-SE de onde você é, ou o que seu script faz, estou dizendo para você falar em PORTUGUÊS,

que é a língua do fórum.

 

Pro outro gringo otário ai, se você não gosta de BRs, tá fazendo o quê no fórum ?

Rapá daqui seu lixo, minguem te quer aqui.

 

To cansando desses gringos sempre xingando os brasileiros, tratando agente como se fossemos inferiores,

tá na hora de parar de tratar ele como normais, e tratar eles como eles nos tratam...

Afinal, alguns dos maiores programadores, e OTServers do mundo, adivinha ? São brasileiros.

Editado Setembro 20, 2011 por linkay