Request Shadow Clones Jutsu

[DerianX]

Hii, i need the spell like u say Shadow Clones Justu and appear yours clones

;DD Repp ++ If u help me ;D

 

[Nux]

lol.. that would be hard..

 

[DerianX]

yes, but whit exp, you can do it, my exp is to little, so i can't make it

;/

 

[Jano]

i got this from long time ago

local function getPlayerHealth(cid)
    if isPlayer(cid) then
        return getCreatureHealth(cid)
    end
end

local removeTime = 10
local HAVE_CLONE = 55554
local arr = {
    {
        {1},
        {2}
    },
 
    {
        {1, 0, 1},
        {0, 2, 0}
    },
     
    {
        {1, 0, 1},
        {0, 2, 0},
        {1, 0, 1}
    },
     
    {
        {1, 0, 1},
        {1, 2, 1},
        {1, 0, 1}
    },
     
    {
        {1, 1, 1},
        {1, 2, 1},
        {1, 1, 1}
    },
     
    {
        {1, 1, 0, 1, 1},
        {1, 0, 1, 0, 1},
        {0, 1, 2, 1, 0},
        {1, 0, 1, 0, 1},
        {1, 1, 0, 1, 1}
    }
}

local function removeCreatures(p)
    setPlayerStorageValue(p.cid, HAVE_CLONE, 0)
    if isCreature(p.creature) == TRUE then
        doRemoveCreature(p.creature)
    end
end

function onTargetTile(cid, pos)
    local creature = doSummonCreature("demon", pos) --look here
    doConvinceCreature(cid, creature)
    doCreatureAddHealth(creature, getPlayerHealth(cid) + 5000)
    doSetCreatureOutfit(creature, getCreatureOutfit(cid), -1)
    addEvent(removeCreatures, removeTime * 1000, {cid=cid, creature=creature})
    return TRUE
end

local combat = {}
for i = 1, 6 do
    combat[i] = createCombatObject()
    setCombatParam(combat[i], COMBAT_PARAM_EFFECT, 59)
    setCombatArea(combat[i], createCombatArea(arr[i]))
    _G["onTargetTile" .. i] = onTargetTile
    setCombatCallback(combat[i], CALLBACK_PARAM_TARGETTILE, "onTargetTile" .. i)
end
 
function onCastSpell(cid, var)
    local level = getPlayerLevel(cid)
    if getPlayerStorageValue(cid, HAVE_CLONE) ~= 1 then
        if level < 30 then
            doCombat(cid, combat[1], var)
        elseif level < 60 then
            doCombat(cid, combat[2], var)
        elseif level < 80 then
            doCombat(cid, combat[3], var)
        elseif level < 95 then
            doCombat(cid, combat[4], var)
        elseif level < 120 then
            doCombat(cid, combat[5], var)
        else
            doCombat(cid, combat[6], var)
        end
        setPlayerStorageValue(cid, HAVE_CLONE, 1)
    else
        doPlayerSendCancel(cid, "Mensaje si tiene clones...")
    end
end

 

[DerianX]

errores xD

[30/07/2009 02:54:58] Lua Script Error: [Spell Interface]
[30/07/2009 02:54:58] data/spells/scripts/clone.luanCastSpell

[30/07/2009 02:54:58] luaDoCreateMonster(). Monster with name '268455951' not found
[30/07/2009 02:54:58] [Warning - Npc::loadFromXml] Cannot load npc file (data/npc/268455951.xml).
[30/07/2009 02:54:58] Info: failed to load external entity "data/npc/268455951.xml"



[30/07/2009 02:54:58] Lua Script Error: [Spell Interface]
[30/07/2009 02:54:58] data/spells/scripts/clone.luanCastSpell

[30/07/2009 02:54:58] luaDoCreateNpc(). Npc name(268455951) not found

[30/07/2009 02:54:58] Lua Script Error: [Spell Interface]
[30/07/2009 02:54:58] data/spells/scripts/clone.luanCastSpell

[30/07/2009 02:54:58] luaDoConvinceCreature(). Creature not found

[30/07/2009 02:54:58] Lua Script Error: [Spell Interface]
[30/07/2009 02:54:58] data/spells/scripts/clone.luanCastSpell

[30/07/2009 02:54:58] luaDoCreatureAddHealth(). Creature not found

[30/07/2009 02:54:58] Lua Script Error: [Spell Interface]
[30/07/2009 02:54:58] data/spells/scripts/clone.luanCastSpell

[30/07/2009 02:54:58] luaDoCreatureChangeOutfit(). Creature not found




Ojala y puedas arreglarlo xD

 

[Martiimeus]

i got this from long time ago

local function getPlayerHealth(cid)
    if isPlayer(cid) then
        return getCreatureHealth(cid)
    end
end

local removeTime = 10
local HAVE_CLONE = 55554
local arr = {
    {
        {1},
        {2}
    },
 
    {
        {1, 0, 1},
        {0, 2, 0}
    },
     
    {
        {1, 0, 1},
        {0, 2, 0},
        {1, 0, 1}
    },
     
    {
        {1, 0, 1},
        {1, 2, 1},
        {1, 0, 1}
    },
     
    {
        {1, 1, 1},
        {1, 2, 1},
        {1, 1, 1}
    },
     
    {
        {1, 1, 0, 1, 1},
        {1, 0, 1, 0, 1},
        {0, 1, 2, 1, 0},
        {1, 0, 1, 0, 1},
        {1, 1, 0, 1, 1}
    }
}

local function removeCreatures(p)
    setPlayerStorageValue(p.cid, HAVE_CLONE, 0)
    if isCreature(p.creature) == TRUE then
        doRemoveCreature(p.creature)
    end
end

function onTargetTile(cid, pos)
    local creature = doSummonCreature("demon", pos) --look here
    doConvinceCreature(cid, creature)
    doCreatureAddHealth(creature, getPlayerHealth(cid) + 5000)
    doSetCreatureOutfit(creature, getCreatureOutfit(cid), -1)
    addEvent(removeCreatures, removeTime * 1000, {cid=cid, creature=creature})
    return TRUE
end

local combat = {}
for i = 1, 6 do
    combat[i] = createCombatObject()
    setCombatParam(combat[i], COMBAT_PARAM_EFFECT, 59)
    setCombatArea(combat[i], createCombatArea(arr[i]))
    _G["onTargetTile" .. i] = onTargetTile
    setCombatCallback(combat[i], CALLBACK_PARAM_TARGETTILE, "onTargetTile" .. i)
end
 
function onCastSpell(cid, var)
    local level = getPlayerLevel(cid)
    if getPlayerStorageValue(cid, HAVE_CLONE) ~= 1 then
        if level < 30 then
            doCombat(cid, combat[1], var)
        elseif level < 60 then
            doCombat(cid, combat[2], var)
        elseif level < 80 then
            doCombat(cid, combat[3], var)
        elseif level < 95 then
            doCombat(cid, combat[4], var)
        elseif level < 120 then
            doCombat(cid, combat[5], var)
        else
            doCombat(cid, combat[6], var)
        end
        setPlayerStorageValue(cid, HAVE_CLONE, 1)
    else
        doPlayerSendCancel(cid, "Mensaje si tiene clones...")
    end
end

would you do this for TFS 0.2.4 (MS) pls?^^

 

[Ecstacy]

i got this from long time ago

that's awesome , do you got a naruto ot?

 

[Fragdonut]

oh that's a nice script nahruto

 

[hodleo]

-.- yea is cooler than mine