Bom sou novo no fórum, não sei se pode fazer isto ou estou no local errado. Mas gostaria de pedir 4 Spells. Como funciona as spells: Uma spell funcionaria assim, o player X teleportaria para atras do target(player ou monstros) causando dano ao target. A segunda spell funcionaria da seguinte maneira, O player X empurra o target (player ou monstros) para longe ,causando dano ao target,e depois surge ao lado dele. Outra Spell seria uma paralizia que funciona assim o player usa o spell e seu próximo hit(spell ou ataque) paraliza o alvo. E por último mas não menos importante uma skill que desse um buff ao player X ,assim ele ganha + velocidade de ataque por um certo tempo. Todas essas spell iriam ter um certo tempo de colldown. Espero AJUDA! Utilizo um servidor derivado de dbo!

Spell 01 local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -3.2, -0 , -2.2, -0) function onCastSpell(cid, var) local waittime = 0.5 -- Tempo de exhaustion local storage = 1000 local efeito = 3 -- efeito da spell if exhaustion.check(cid, storage) then doPlayerSendCancel(cid, "You are exhausted") return false end local position1 = {x=getThingPosition(getCreatureTarget(cid)).x, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z} local target = {x=getThingPosition(getCreatureTarget(cid)).x, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z} doSendMagicEffect(position1, efeito) doTeleportThing(cid, target) exhaustion.set(cid, storage, waittime) return doCombat(cid, combat, var) end Spell 02 -- crédito xWhiteWolf local function doPushCreature(target, cid) if target > 0 then if not isNpc(target) then local position = getThingPosition(cid) local fromPosition = getThingPosition(target) local x = ((fromPosition.x - position.x) < 0 and -1 or ((fromPosition.x - position.x) == 0 and 0 or 1)) local y = ((fromPosition.y - position.y) < 0 and -1 or ((fromPosition.y - position.y) == 0 and 0 or 1)) local toPosition = {x = fromPosition.x + x, y = fromPosition.y + y, z = fromPosition.z} if doTileQueryAdd(target, toPosition) == 1 and getTileInfo(toPosition).house == false then doTeleportThing(target, toPosition, true) end end end end local spell = {} spell.config = { [3] = { damageType = 1, areaEffect = 2, area = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 1, 0, 0, 2, 0, 0, 1, 0, 0}, {0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, } }, [2] = { damageType = 1, areaEffect = 2, area = { {0, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 1, 0, 0, 0, 1, 0}, {0, 1, 0, 2, 0, 1, 0}, {0, 1, 0, 0, 0, 1, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0} } }, [1] = { damageType = 1, areaEffect = 2, area = { {0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 1, 2, 1, 0, 0}, {0, 0, 1, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0} } } } spell.combats = {} for _, config in ipairs(spell.config) do local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, config.damageType) setCombatParam(combat, COMBAT_PARAM_EFFECT, config.areaEffect) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -4, 0, -4.7, 0) function onTargetCreature(cid, target) doPushCreature(target, cid) end setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature") setCombatArea(combat, createCombatArea(config.area)) table.insert(spell.combats, combat) end function onCastSpell(cid, var) for n = 1, #spell.combats do local alvo = {x=getThingPosition(getCreatureTarget(cid)).x, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z} addEvent(doCombat, (n * 120), cid, spell.combats[n], var) addEvent(doTeleportThing, 3000, cid, alvo) end return true end Spell 03 Spell script Agora vá em creaturescripts Creaturescripts.xml e registre a tag <event type="think" name="Paralize" event="script" value="paralize.lua"/> Crie um arquivo.lua na pasta creaturescrips/scripts e cole isso dentro function onThink(cid, interval) local storage = 23432 -- deixe a mesma que na script da spell if getPlayerStorageValue(cid, storage) == 1 then doCreatureSetNoMove(cid, true) doPlayerSendTextMessage(cid, 22, "voce esta paralisado") return true end end Abra o login.lua na msm pasta e registre a tag. registerCreatureEvent(cid, "Paralize")

(Resolvido)[PEDIDO] Spells

Responder

Postado Outubro 22, 2017 7 anos

@TheKiler

na tag da primeira spell você deixa needtarget="1"

na spell2 deixa isso:

Mostrar conteúdo oculto


local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 2)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -9.0, -30, -10.0, 4)

local arr = {
				{1,1,1},
				{1,3,1},
				{1,1,1}
}

local area = createCombatArea(arr)
setCombatArea(combat, area)



function canWalk(pos, creature, pz, proj) -- nord
	if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then
		return false
	end
	local creature = getTopCreature(pos)
	if creature.type > 0 then
		return false
	end
	if getTilePzInfo(pos) and not pz then
		return false
	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)) and (hasProperty(tile.uid, n) or hasProperty(tile.uid, 7)) then
				return false
		end
	end
	return true
end


function onCastSpell(cid)
	for x=-1,1 do
		for y =-1,1 do
			local pos = getThingPos(cid)
			pos.x = pos.x + x
			pos.y = pos.y + y
			local m = getTopCreature(pos).uid
			if m ~= 0 then
				pos.x = pos.x + x
				pos.y = pos.y + y
				if canWalk(pos) == true then
					doTeleportThing(m,pos)
				end
			end
		end
	end
	doCombat(cid, combat, var)
	return true
end

Editado Outubro 22, 2017 7 anos por antharaz (veja o histórico de edições)

Citar

Mention

Respostas 7
Visualizações 1.2k
Created 7 anos7 anos
Última resposta 7 anos7 anos

Popular Days

Most Popular Posts

PedroSTT

Julho 20, 2017 7 anos

Spell 01 local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -3.2, -0 , -2.2, -0) function onC

Postado Outubro 22, 2017 7 anos

Autor

Em 22/10/2017 em 17:11, antharaz disse:

@TheKiler

na tag da primeira spell você deixa needtarget="1"

na spell2 deixa isso:

Mostrar conteúdo oculto



local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 2)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -9.0, -30, -10.0, 4)

local area = {
				{1,1,1},
				{1,3,1},
				{1,1,1}
}

local area = createCombatArea(arr)
setCombatArea(combat, area)



function canWalk(pos, creature, pz, proj) -- nord
	if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then
		return false
	end
	local creature = getTopCreature(pos)
	if creature.type > 0 then
		return false
	end
	if getTilePzInfo(pos) and not pz then
		return false
	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)) and (hasProperty(tile.uid, n) or hasProperty(tile.uid, 7)) then
				return false
		end
	end
	return true
end


function onCastSpell(cid)
	for x=-1,1 do
		for y =-1,1 do
			local pos = getThingPos(cid)
			pos.x = pos.x + x
			pos.y = pos.y + y
			local m = getTopCreature(pos).uid
			if m ~= 0 then
				pos.x = pos.x + x
				pos.y = pos.y + y
				if canWalk(pos) == true then
					doTeleportThing(m,pos)
				end
			end
		end
	end
	doCombat(cid, combat, var)
	return true
end

VLW MANO! REP+, Mas aonde está o needtarget?

@antharaz

Em 22/10/2017 em 17:11, antharaz disse:

@TheKiler

na tag da primeira spell você deixa needtarget="1"

na spell2 deixa isso:

Mostrar conteúdo oculto



local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 2)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -9.0, -30, -10.0, 4)

local area = {
				{1,1,1},
				{1,3,1},
				{1,1,1}
}

local area = createCombatArea(arr)
setCombatArea(combat, area)



function canWalk(pos, creature, pz, proj) -- nord
	if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then
		return false
	end
	local creature = getTopCreature(pos)
	if creature.type > 0 then
		return false
	end
	if getTilePzInfo(pos) and not pz then
		return false
	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)) and (hasProperty(tile.uid, n) or hasProperty(tile.uid, 7)) then
				return false
		end
	end
	return true
end


function onCastSpell(cid)
	for x=-1,1 do
		for y =-1,1 do
			local pos = getThingPos(cid)
			pos.x = pos.x + x
			pos.y = pos.y + y
			local m = getTopCreature(pos).uid
			if m ~= 0 then
				pos.x = pos.x + x
				pos.y = pos.y + y
				if canWalk(pos) == true then
					doTeleportThing(m,pos)
				end
			end
		end
	end
	doCombat(cid, combat, var)
	return true
end

Na 2° Spell deu isto:

[Error - Spell Interface]
[15:43:13.030] data/spells/scripts/teste/2spell.lua
[15:43:13.031] Description:
[15:43:13.031] (luaSetCombatArea) Area not found

Editado Outubro 22, 2017 7 anos por TheKiler (veja o histórico de edições)

Citar

Mention

Postado Outubro 22, 2017 7 anos

@TheKiler

Se não tiver, você coloca na tag do xml. na 2º usa esse daqui:

Mostrar conteúdo oculto


local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 2)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -9.0, -30, -10.0, 4)

local arr = {
				{1,1,1},
				{1,3,1},
				{1,1,1}
}

local area = createCombatArea(arr)
setCombatArea(combat, area)



function canWalk(pos, creature, pz, proj) -- nord
	if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then
		return false
	end
	local creature = getTopCreature(pos)
	if creature.type > 0 then
		return false
	end
	if getTilePzInfo(pos) and not pz then
		return false
	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)) and (hasProperty(tile.uid, n) or hasProperty(tile.uid, 7)) then
				return false
		end
	end
	return true
end


function onCastSpell(cid)
	for x=-1,1 do
		for y =-1,1 do
			local pos = getThingPos(cid)
			pos.x = pos.x + x
			pos.y = pos.y + y
			local m = getTopCreature(pos).uid
			if m ~= 0 then
				pos.x = pos.x + x
				pos.y = pos.y + y
				if canWalk(pos) == true then
					doTeleportThing(m,pos)
				end
			end
		end
	end
	doCombat(cid, combat, var)
	return true
end

Citar

Mention

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.

https://tibiaking.com/topic/82519-resolvidopedido-spells/

Seguidores

Ir para a lista de tópicos

Nenhum usuário registrado visualizando esta página.

Tópicos 96.9k
Posts 519.6k

Respostas 7
Visualizações 1.2k
Created 7 anos7 anos
Última resposta 7 anos7 anos

Entrar

(Resolvido)[PEDIDO] Spells

Featured Replies

Top Posters In This Topic

Popular Days

Most Popular Posts

PedroSTT

Participe da conversa

Quem Está Navegando 0

Estatísticas dos Fóruns

Top Posters In This Topic

Popular Days

Most Popular Posts

PedroSTT

Informação Importante

Account

Navigation

Pesquisar