Hiraishin Jutsu Seal 1

local s = {5668,5669,5667}

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)
function x(p, d)
local t = {{x=p.x,y=p.y-1,z=p.z},{x=p.x+1,y=p.y,z=p.z},{x=p.x,y=p.y+1,z=p.z},{x=p.x-1,y=p.y,z=p.z}}
return t[d+1]
end
function onCastSpell(cid, var)
local position1 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
local pos = getCreaturePosition(cid)
local item = 2335 --id da kunai
doCreateItem(item, getCreaturePosition(cid))
local mystr = "return {x=xx,y=yy,z=zz}"
local mystr = string.gsub(mystr, "xx", pos.x)
local mystr = string.gsub(mystr, "yy", pos.y)
local mystr = string.gsub(mystr, "zz", pos.z)
local position112 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
setPlayerStorageValue(cid, s[1], mystr)
setPlayerStorageValue(cid, s[2], os.time()+0)
setPlayerStorageValue(cid, s[3], 1)
for i = 1, 5 do
end
doCombat(cid, combat, var)
return true
end

 

Hiraishin Jutsu Seal 2

local s = {5698,5699,5697}

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)
function x(p, d)
local t = {{x=p.x,y=p.y-1,z=p.z},{x=p.x+1,y=p.y,z=p.z},{x=p.x,y=p.y+1,z=p.z},{x=p.x-1,y=p.y,z=p.z}}
return t[d+1]
end
function onCastSpell(cid, var)
local position1 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
local pos = getCreaturePosition(cid)
local item = 2335 --id da kunai
doCreateItem(item, getCreaturePosition(cid))
local mystr = "return {x=xx,y=yy,z=zz}"
local mystr = string.gsub(mystr, "xx", pos.x)
local mystr = string.gsub(mystr, "yy", pos.y)
local mystr = string.gsub(mystr, "zz", pos.z)
local position112 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
setPlayerStorageValue(cid, s[1], mystr)
setPlayerStorageValue(cid, s[2], os.time()+0)
setPlayerStorageValue(cid, s[3], 1)
for i = 1, 5 do
end
doCombat(cid, combat, var)
return true
end

 

Hiraishin Jutsu Seal 3

local s = {5688,5689,5687}

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)
function x(p, d)
local t = {{x=p.x,y=p.y-1,z=p.z},{x=p.x+1,y=p.y,z=p.z},{x=p.x,y=p.y+1,z=p.z},{x=p.x-1,y=p.y,z=p.z}}
return t[d+1]
end
function onCastSpell(cid, var)
local position1 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
local pos = getCreaturePosition(cid)
local item = 2335 --id da kunai
doCreateItem(item, getCreaturePosition(cid))
local mystr = "return {x=xx,y=yy,z=zz}"
local mystr = string.gsub(mystr, "xx", pos.x)
local mystr = string.gsub(mystr, "yy", pos.y)
local mystr = string.gsub(mystr, "zz", pos.z)
local position112 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
setPlayerStorageValue(cid, s[1], mystr)
setPlayerStorageValue(cid, s[2], os.time()+0)
setPlayerStorageValue(cid, s[3], 1)
for i = 1, 5 do
end
doCombat(cid, combat, var)
return true
end

 

Hiraishin Jutsu 1

local s = {5668,5669,5667}

function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
k = getPlayerStorageValue(cid, s[2]) - os.time()
if k <= 0 then
t = loadstring(getPlayerStorageValue(cid, s[1]))()
local position1 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
local position2 = {x=t.x+1, y=t.y+1, z=t.z}
doTeleportThing(cid, t)
doSendMagicEffect(position1, 82)
addEvent(doSendMagicEffect, 0, position2,186)
addEvent(doSendMagicEffect, 500, t, 131)
setPlayerStorageValue(cid, s[3], -1)
else
doPlayerSendTextMessage(cid, 19, "Aguarde "..k.." segundos.")
end
return true
end

 

Hiraishin Jutsu 2

local s = {5698,5699,5697}

function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
k = getPlayerStorageValue(cid, s[2]) - os.time()
if k <= 0 then
t = loadstring(getPlayerStorageValue(cid, s[1]))()
local position1 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
local position2 = {x=t.x+1, y=t.y+1, z=t.z}
doTeleportThing(cid, t)
doSendMagicEffect(position1, 82)
addEvent(doSendMagicEffect, 0, position2,186)
addEvent(doSendMagicEffect, 500, t, 131)
setPlayerStorageValue(cid, s[3], -1)
else
doPlayerSendTextMessage(cid, 19, "Aguarde "..k.." segundos.")
end
return true
end

 

Hiraishin Jutsu 3

local s = {5688,5689,5687}

function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
k = getPlayerStorageValue(cid, s[2]) - os.time()
if k <= 0 then
t = loadstring(getPlayerStorageValue(cid, s[1]))()
local position1 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
local position2 = {x=t.x+1, y=t.y+1, z=t.z}
doTeleportThing(cid, t)
doSendMagicEffect(position1, 82)
addEvent(doSendMagicEffect, 0, position2,186)
addEvent(doSendMagicEffect, 500, t, 131)
setPlayerStorageValue(cid, s[3], -1)
else
doPlayerSendTextMessage(cid, 19, "Aguarde "..k.." segundos.")
end
return true
end

 

o que eu entendi é assim. faz tres pra tres. tenta ae. e tb os tres primeiro pode marca quantas vezes for mas o que importa é o ultimo.

Editado Julho 21, 2015 9 anos por xADMx (veja o histórico de edições)

Não entendi o que faço com tudo isso de script ?

fas 6 script. Hiraishin Jutsu Seal 1,Hiraishin Jutsu Seal 2,Hiraishin Jutsu Seal 3 e mas tres Hiraishin Jutsu 1, Hiraishin Jutsu 2, Hiraishin Jutsu 3. Hiraishin Jutsu Seal 1 vai marca uma kunai, se usa Hiraishin Jutsu 1. vai teleporta pra a primeira. Hiraishin Jutsu Seal 2 marca a segunda kunai se usa Hiraishin Jutsu 2 vai pra a segunda e a tres faz a msm coisa.

Sim deu certo porém agora ela não some e também posso marcar infinitas kunais no mapa sendo ela 1 ou 2 ou 3 eu gostaria de ter um target para marcar essas kunais por que se não ficaria um teleport infinito no servidor e gostaria que o Hiraishin no Jutsu fosse apenas 1 skill que teleporta-se para as adagas porém em sequencia sendo ela Seal 1 ou Seal 2 ou Seal 3 sendo ela colocada na sequencia como no vídeo

amigo eu acho que vc n esta vendo o video direto. pq eu fiz igual no video. pode nota quando ele teleporta pra cima das kunai aparece os nome Hiraishin Jutsu 1, Hiraishin Jutsu 2 e Hiraishin Jutsu 3.