Ir para conteúdo

[DÚVIDA] Como colocar o nome dos ataques em laranja?

Por Zendedd
em Suporte Tibia OTServer

Featured Replies

Postado
4 minutos atrás, Zendedd disse:

Não encontrei, o arquivo tá assim:

 

local msgs = {"use ", ""}



function doAlertReady(cid, id, movename, n, cd)
if movename == "Mega Evolution" then return true end
    if not isCreature(cid) then return true end
    local myball = getPlayerSlotItem(cid, 8)
    if myball.itemid > 0 and getItemAttribute(myball.uid, cd) == "cd:"..id.."" then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(myball.uid).." - "..movename.." (m"..n..") is ready!")
    return true
    end
    local p = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)
    if not p or #p <= 0 then return true end
    for a = 1, #p do
        if getItemAttribute(p[a], cd) == "cd:"..id.."" then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(p[a]).." - "..movename.." (m"..n..") is ready!")
        return true
        end
    end
end

function onSay(cid, words, param, channel)


    if param ~= "" then return true end
    if string.len(words) > 3 then return true end

    if #getCreatureSummons(cid) == 0 then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to use moves.")
    return 0
    end
                      --alterado v1.5
local mypoke = getCreatureSummons(cid)[1]

    if getCreatureCondition(cid, CONDITION_EXHAUST) then return true end
    if getCreatureName(mypoke) == "Evolution" then return true end

    if getCreatureName(mypoke) == "Ditto" or getCreatureName(mypoke) == "Shiny Ditto" then
       name = getPlayerStorageValue(mypoke, 1010)   --edited
    else
       name = getCreatureName(mypoke)
    end  
    
    --local name = getCreatureName(mypoke) == "Ditto" and getPlayerStorageValue(mypoke, 1010) or getCreatureName(mypoke)

local it = string.sub(words, 2, 3)
local move = movestable[name].move1
if getPlayerStorageValue(mypoke, 212123) >= 1 then
   cdzin = "cm_move"..it..""
else
   cdzin = "move"..it..""       --alterado v1.5
end

    if it == "2" then
        move = movestable[name].move2
    elseif it == "3" then
        move = movestable[name].move3
    elseif it == "4" then
        move = movestable[name].move4
    elseif it == "5" then
        move = movestable[name].move5
    elseif it == "6" then
        move = movestable[name].move6
    elseif it == "7" then
        move = movestable[name].move7
    elseif it == "8" then
        move = movestable[name].move8
    elseif it == "9" then
        move = movestable[name].move9
    elseif it == "10" then
        move = movestable[name].move10
    elseif it == "11" then
        move = movestable[name].move11
    elseif it == "12" then
        move = movestable[name].move12
    elseif it == "13" then
        move = movestable[name].move13
    end

if not move then
        local isMega = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "megaStone")
        if not isMega or name:find("Mega") then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")
            return true
        end
        local moveTable, index = getNewMoveTable(movestable[name]), 0
        for i = 1, 12 do
            if not moveTable then
                index = i
                break
            end
        end
        if tonumber(it) ~= index then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")
            return true
        end
        local needCds = true                   --Coloque false se o pokémon puder mega evoluir mesmo com spells em cooldown.
        if needCds then
            for i = 1, 12 do
                if getCD(getPlayerSlotItem(cid, 8).uid, "move"..i) > 0 then
                    return doPlayerSendCancel(cid, "To mega evolve, all the spells of your pokemon need to be ready.")
                end
            end
        end
local megaEvoClans = {
    --[mega_stone_id] = {"clan_name", "clan_name", etc},
    [14643] = {"Volcanic", "Gardestrike"},
    [14654] = {"Seavell", "Orebound"},
    [14640] = {"Volcanic"},
    [14639] = {"Seavell"},
    [14647] = {"Naturia"},
    [14642] = {"Malefic"},
    [14638] = {"Psycraft"},
    [14648] = {"Orebound"},
    --etc,
}
if megaEvoClans[isMega] then
    if not isInArray(megaEvoClans[isMega], getPlayerClanName(cid)) then
        return doPlayerSendCancel(cid, "You can't mega evolve this pokemon.")
    end
end
        move = {name = "Mega Evolution", level = 0, cd = 0, dist = 1, target = 0, f = 0, t = "?"}
    end
    
    if getPlayerLevel(cid) < move.level then
       doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need be atleast level "..move.level.." to use this move.")
       return true
    end

    if getCD(getPlayerSlotItem(cid, 8).uid, cdzin) > 0 and getCD(getPlayerSlotItem(cid, 8).uid, cdzin) < (move.cd + 2) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..getCD(getPlayerSlotItem(cid, 8).uid, cdzin).." seconds to use "..move.name.." again.")
    return true
    end

    if getTileInfo(getThingPos(mypoke)).protection then
        doPlayerSendCancel(cid, "Your pokemon cannot use moves while in protection zone.")
    return true
    end
    
   if getPlayerStorageValue(mypoke, 3894) >= 1 then
      return doPlayerSendCancel(cid, "You can't attack because you is with fear") --alterado v1.3
   end
                                  --alterado v1.6                  
    if (move.name == "Team Slice" or move.name == "Team Claw") and #getCreatureSummons(cid) < 2 then       
        doPlayerSendCancel(cid, "Your pokemon need be in a team for use this move!")
    return true
    end
                                                                     --alterado v1.7 \/\/\/
if isCreature(getCreatureTarget(cid)) and isInArray(specialabilities["evasion"], getCreatureName(getCreatureTarget(cid))) then 
   local target = getCreatureTarget(cid)                                                                                       
   if math.random(1, 100) <= passivesChances["Evasion"][getCreatureName(target)] then 
      if isCreature(getMasterTarget(target)) then   --alterado v1.6                                                                   
         doSendMagicEffect(getThingPos(target), 211)
         doSendAnimatedText(getThingPos(target), "TOO BAD", 215)                                
         doTeleportThing(target, getClosestFreeTile(target, getThingPos(mypoke)), false)
         doSendMagicEffect(getThingPos(target), 211)
         doFaceCreature(target, getThingPos(mypoke))            
         return true       --alterado v1.6
      end
   end
end


if move.target == 1 then

    if not isCreature(getCreatureTarget(cid)) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")
    return 0
    end

    if getCreatureCondition(getCreatureTarget(cid), CONDITION_INVISIBLE) then
    return 0
    end

    if getCreatureHealth(getCreatureTarget(cid)) <= 0 then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your have already defeated your target.")
    return 0
    end

    if not isCreature(getCreatureSummons(cid)[1]) then
    return true
    end

    if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > move.dist then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to use this move.")
    return 0
    end

    if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then
    return 0
    end
end

    local newid = 0
    
    -- Cooldown -- 
local Tiers = {
[113] = {bonus = Cdown1},
[114] = {bonus = Cdown2},
[115] = {bonus = Cdown3},
}
local Tier = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "heldx")
local cdzao = {}
if Tier and Tier > 112 and Tier < 116 then
cdzao = math.ceil(move.cd - (move.cd * Tiers[Tier].bonus))
else
cdzao = move.cd
end
-- Cooldown -- 

        if isSleeping(mypoke) or isSilence(mypoke) then  --alterado v1.5
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry you can't do that right now.")
            return 0
        else
            newid = setCD(getPlayerSlotItem(cid, 8).uid, cdzin, cdzao) 
        end
        
    local spellMessage = msgs[math.random(#msgs)]..""..move.name.."!"
if move.name == "Mega Evolution" then
    spellMessage = "Mega Evolve!"
end
doCreatureSay(cid, getPokeName(mypoke)..", "..spellMessage, TALKTYPE_SAY)
    
    local summons = getCreatureSummons(cid) --alterado v1.6

    addEvent(doAlertReady, move.cd * 1000, cid, newid, move.name, it, cdzin)
    
    for i = 2, #summons do
       if isCreature(summons) and getPlayerStorageValue(cid, 637501) >= 1 then
          docastspell(summons, move.name)        --alterado v1.6
       end
    end 

    docastspell(mypoke, move.name)
    doCreatureAddCondition(cid, playerexhaust)

    if useKpdoDlls then
        doUpdateCooldowns(cid)
    end

return 0
end
 

 

Tenta ai:

  

local msgs = {"use ", ""}
function doAlertReady(cid, id, movename, n, cd)
    if movename == "Mega Evolution" then return true end
    if not isCreature(cid) then return true end
    local myball = getPlayerSlotItem(cid, 8)
    if myball.itemid > 0 and getItemAttribute(myball.uid, cd) == "cd:"..id.."" then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(myball.uid).." - "..movename.." (m"..n..") is ready!")
        return true
    end
    local p = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)
    if not p or #p <= 0 then return true end
    for a = 1, #p do
        if getItemAttribute(p[a], cd) == "cd:"..id.."" then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(p[a]).." - "..movename.." (m"..n..") is ready!")
            return true
        end
    end
end
function onSay(cid, words, param, channel)
    
    if param ~= "" then return true end
    if string.len(words) > 3 then return true end
    if #getCreatureSummons(cid) == 0 then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to use moves.")
        return 0
    end
    --alterado v1.5
    local mypoke = getCreatureSummons(cid)[1]
    if getCreatureCondition(cid, CONDITION_EXHAUST) then return true end
    if getCreatureName(mypoke) == "Evolution" then return true end
    if getCreatureName(mypoke) == "Ditto" or getCreatureName(mypoke) == "Shiny Ditto" then
        name = getPlayerStorageValue(mypoke, 1010) --edited
    else
        name = getCreatureName(mypoke)
    end 
    
    --local name = getCreatureName(mypoke) == "Ditto" and getPlayerStorageValue(mypoke, 1010) or getCreatureName(mypoke)
    local it = string.sub(words, 2, 3)
    local move = movestable[name].move1
    if getPlayerStorageValue(mypoke, 212123) >= 1 then
        cdzin = "cm_move"..it..""
    else
        cdzin = "move"..it.."" --alterado v1.5
    end
    if it == "2" then
        move = movestable[name].move2
    elseif it == "3" then
        move = movestable[name].move3
    elseif it == "4" then
        move = movestable[name].move4
    elseif it == "5" then
        move = movestable[name].move5
    elseif it == "6" then
        move = movestable[name].move6
    elseif it == "7" then
        move = movestable[name].move7
    elseif it == "8" then
        move = movestable[name].move8
    elseif it == "9" then
        move = movestable[name].move9
    elseif it == "10" then
        move = movestable[name].move10
    elseif it == "11" then
        move = movestable[name].move11
    elseif it == "12" then
        move = movestable[name].move12
    elseif it == "13" then
        move = movestable[name].move13
    end
    if not move then
        local isMega = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "megaStone")
        if not isMega or name:find("Mega") then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")
            return true
        end
        local moveTable, index = getNewMoveTable(movestable[name]), 0
        for i = 1, 12 do
            if not moveTable then
                index = i
                break
            end
        end
        if tonumber(it) ~= index then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")
            return true
        end
        local needCds = true --Coloque false se o pokémon puder mega evoluir mesmo com spells em cooldown.
        if needCds then
            for i = 1, 12 do
                if getCD(getPlayerSlotItem(cid, 8).uid, "move"..i) > 0 then
                    return doPlayerSendCancel(cid, "To mega evolve, all the spells of your pokemon need to be ready.")
                end
            end
        end
        local megaEvoClans = {
            --[mega_stone_id] = {"clan_name", "clan_name", etc},
            [14643] = {"Volcanic", "Gardestrike"},
            [14654] = {"Seavell", "Orebound"},
            [14640] = {"Volcanic"},
            [14639] = {"Seavell"},
            [14647] = {"Naturia"},
            [14642] = {"Malefic"},
            [14638] = {"Psycraft"},
            [14648] = {"Orebound"},
            --etc,
        }
        if megaEvoClans[isMega] then
            if not isInArray(megaEvoClans[isMega], getPlayerClanName(cid)) then
                return doPlayerSendCancel(cid, "You can't mega evolve this pokemon.")
            end
        end
        move = {name = "Mega Evolution", level = 0, cd = 0, dist = 1, target = 0, f = 0, t = "?"}
    end
    
    if getPlayerLevel(cid) < move.level then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need be atleast level "..move.level.." to use this move.")
        return true
    end
    if getCD(getPlayerSlotItem(cid, 8).uid, cdzin) > 0 and getCD(getPlayerSlotItem(cid, 8).uid, cdzin) < (move.cd + 2) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..getCD(getPlayerSlotItem(cid, 8).uid, cdzin).." seconds to use "..move.name.." again.")
        return true
    end
    if getTileInfo(getThingPos(mypoke)).protection then
        doPlayerSendCancel(cid, "Your pokemon cannot use moves while in protection zone.")
        return true
    end
    
    if getPlayerStorageValue(mypoke, 3894) >= 1 then
        return doPlayerSendCancel(cid, "You can't attack because you is with fear") --alterado v1.3
    end
    --alterado v1.6 
    if (move.name == "Team Slice" or move.name == "Team Claw") and #getCreatureSummons(cid) < 2 then 
        doPlayerSendCancel(cid, "Your pokemon need be in a team for use this move!")
        return true
    end
    --alterado v1.7 \/\/\/
    if isCreature(getCreatureTarget(cid)) and isInArray(specialabilities["evasion"], getCreatureName(getCreatureTarget(cid))) then 
        local target = getCreatureTarget(cid) 
        if math.random(1, 100) <= passivesChances["Evasion"][getCreatureName(target)] then 
            if isCreature(getMasterTarget(target)) then --alterado v1.6 
                doSendMagicEffect(getThingPos(target), 211)
                doSendAnimatedText(getThingPos(target), "TOO BAD", 215) 
                doTeleportThing(target, getClosestFreeTile(target, getThingPos(mypoke)), false)
                doSendMagicEffect(getThingPos(target), 211)
                doFaceCreature(target, getThingPos(mypoke)) 
                return true --alterado v1.6
            end
        end
    end
    
    if move.target == 1 then
        if not isCreature(getCreatureTarget(cid)) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")
            return 0
        end
        if getCreatureCondition(getCreatureTarget(cid), CONDITION_INVISIBLE) then
            return 0
        end
        if getCreatureHealth(getCreatureTarget(cid)) <= 0 then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your have already defeated your target.")
            return 0
        end
        if not isCreature(getCreatureSummons(cid)[1]) then
            return true
        end
        if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > move.dist then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to use this move.")
            return 0
        end
        if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then
            return 0
        end
    end
    local newid = 0
    
    -- Cooldown -- 
    local Tiers = {
        [113] = {bonus = Cdown1},
        [114] = {bonus = Cdown2},
        [115] = {bonus = Cdown3},
    }
    local Tier = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "heldx")
    local cdzao = {}
    if Tier and Tier > 112 and Tier < 116 then
        cdzao = math.ceil(move.cd - (move.cd * Tiers[Tier].bonus))
    else
        cdzao = move.cd
    end
    -- Cooldown -- 
    if isSleeping(mypoke) or isSilence(mypoke) then --alterado v1.5
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry you can't do that right now.")
        return 0
    else
        newid = setCD(getPlayerSlotItem(cid, 8).uid, cdzin, cdzao) 
    end
    
    local spellMessage = msgs[math.random(#msgs)]..""..move.name.."!"
    if move.name == "Mega Evolution" then
        spellMessage = "Mega Evolve!"
    end
    doCreatureSay(cid, getPokeName(mypoke)..", "..spellMessage, TALKTYPE_ORANGE_1)
    
    local summons = getCreatureSummons(cid) --alterado v1.6
    addEvent(doAlertReady, move.cd * 1000, cid, newid, move.name, it, cdzin)
    
    for i = 2, #summons do
        if isCreature(summons) and getPlayerStorageValue(cid, 637501) >= 1 then
            docastspell(summons, move.name) --alterado v1.6
        end
    end 
    docastspell(mypoke, move.name)
    doCreatureAddCondition(cid, playerexhaust)
    if useKpdoDlls then
        doUpdateCooldowns(cid)
    end
    return 0
end

  • Citar
  • Mention
    • Respostas 17
    • Visualizações 998
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Most Popular Posts

    • vankk
      vankk

      emoteSpells no config.lua, coloque como true. emoteSpells no config.lua, coloque como true.

    • Noob II
      Noob II

      Pasta data/talkactions abra o move.lua e procure por:    doCreatureSay(cid, ""..getPokeName(mypoke)..", "..msgs[math.random(#msgs)]..""..move.name.."!", TALKTYPE_SAY)   e mude p

    Postado
    • Autor
    5 minutos atrás, Noob II disse:

     

    Tenta ai:

     

     

      Ocultar conteúdo

      

    

local msgs = {"use ", ""}
function doAlertReady(cid, id, movename, n, cd)
    if movename == "Mega Evolution" then return true end
    if not isCreature(cid) then return true end
    local myball = getPlayerSlotItem(cid, 8)
    if myball.itemid > 0 and getItemAttribute(myball.uid, cd) == "cd:"..id.."" then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(myball.uid).." - "..movename.." (m"..n..") is ready!")
        return true
    end
    local p = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)
    if not p or #p <= 0 then return true end
    for a = 1, #p do
        if getItemAttribute(p[a], cd) == "cd:"..id.."" then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, getPokeballName(p[a]).." - "..movename.." (m"..n..") is ready!")
            return true
        end
    end
end
function onSay(cid, words, param, channel)
    
    if param ~= "" then return true end
    if string.len(words) > 3 then return true end
    if #getCreatureSummons(cid) == 0 then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need a pokemon to use moves.")
        return 0
    end
    --alterado v1.5
    local mypoke = getCreatureSummons(cid)[1]
    if getCreatureCondition(cid, CONDITION_EXHAUST) then return true end
    if getCreatureName(mypoke) == "Evolution" then return true end
    if getCreatureName(mypoke) == "Ditto" or getCreatureName(mypoke) == "Shiny Ditto" then
        name = getPlayerStorageValue(mypoke, 1010) --edited
    else
        name = getCreatureName(mypoke)
    end 
    
    --local name = getCreatureName(mypoke) == "Ditto" and getPlayerStorageValue(mypoke, 1010) or getCreatureName(mypoke)
    local it = string.sub(words, 2, 3)
    local move = movestable[name].move1
    if getPlayerStorageValue(mypoke, 212123) >= 1 then
        cdzin = "cm_move"..it..""
    else
        cdzin = "move"..it.."" --alterado v1.5
    end
    if it == "2" then
        move = movestable[name].move2
    elseif it == "3" then
        move = movestable[name].move3
    elseif it == "4" then
        move = movestable[name].move4
    elseif it == "5" then
        move = movestable[name].move5
    elseif it == "6" then
        move = movestable[name].move6
    elseif it == "7" then
        move = movestable[name].move7
    elseif it == "8" then
        move = movestable[name].move8
    elseif it == "9" then
        move = movestable[name].move9
    elseif it == "10" then
        move = movestable[name].move10
    elseif it == "11" then
        move = movestable[name].move11
    elseif it == "12" then
        move = movestable[name].move12
    elseif it == "13" then
        move = movestable[name].move13
    end
    if not move then
        local isMega = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "megaStone")
        if not isMega or name:find("Mega") then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")
            return true
        end
        local moveTable, index = getNewMoveTable(movestable[name]), 0
        for i = 1, 12 do
            if not moveTable then
                index = i
                break
            end
        end
        if tonumber(it) ~= index then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your pokemon doesn't recognize this move.")
            return true
        end
        local needCds = true --Coloque false se o pokémon puder mega evoluir mesmo com spells em cooldown.
        if needCds then
            for i = 1, 12 do
                if getCD(getPlayerSlotItem(cid, 8).uid, "move"..i) > 0 then
                    return doPlayerSendCancel(cid, "To mega evolve, all the spells of your pokemon need to be ready.")
                end
            end
        end
        local megaEvoClans = {
            --[mega_stone_id] = {"clan_name", "clan_name", etc},
            [14643] = {"Volcanic", "Gardestrike"},
            [14654] = {"Seavell", "Orebound"},
            [14640] = {"Volcanic"},
            [14639] = {"Seavell"},
            [14647] = {"Naturia"},
            [14642] = {"Malefic"},
            [14638] = {"Psycraft"},
            [14648] = {"Orebound"},
            --etc,
        }
        if megaEvoClans[isMega] then
            if not isInArray(megaEvoClans[isMega], getPlayerClanName(cid)) then
                return doPlayerSendCancel(cid, "You can't mega evolve this pokemon.")
            end
        end
        move = {name = "Mega Evolution", level = 0, cd = 0, dist = 1, target = 0, f = 0, t = "?"}
    end
    
    if getPlayerLevel(cid) < move.level then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need be atleast level "..move.level.." to use this move.")
        return true
    end
    if getCD(getPlayerSlotItem(cid, 8).uid, cdzin) > 0 and getCD(getPlayerSlotItem(cid, 8).uid, cdzin) < (move.cd + 2) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have to wait "..getCD(getPlayerSlotItem(cid, 8).uid, cdzin).." seconds to use "..move.name.." again.")
        return true
    end
    if getTileInfo(getThingPos(mypoke)).protection then
        doPlayerSendCancel(cid, "Your pokemon cannot use moves while in protection zone.")
        return true
    end
    
    if getPlayerStorageValue(mypoke, 3894) >= 1 then
        return doPlayerSendCancel(cid, "You can't attack because you is with fear") --alterado v1.3
    end
    --alterado v1.6 
    if (move.name == "Team Slice" or move.name == "Team Claw") and #getCreatureSummons(cid) < 2 then 
        doPlayerSendCancel(cid, "Your pokemon need be in a team for use this move!")
        return true
    end
    --alterado v1.7 \/\/\/
    if isCreature(getCreatureTarget(cid)) and isInArray(specialabilities["evasion"], getCreatureName(getCreatureTarget(cid))) then 
        local target = getCreatureTarget(cid) 
        if math.random(1, 100) <= passivesChances["Evasion"][getCreatureName(target)] then 
            if isCreature(getMasterTarget(target)) then --alterado v1.6 
                doSendMagicEffect(getThingPos(target), 211)
                doSendAnimatedText(getThingPos(target), "TOO BAD", 215) 
                doTeleportThing(target, getClosestFreeTile(target, getThingPos(mypoke)), false)
                doSendMagicEffect(getThingPos(target), 211)
                doFaceCreature(target, getThingPos(mypoke)) 
                return true --alterado v1.6
            end
        end
    end
    
    if move.target == 1 then
        if not isCreature(getCreatureTarget(cid)) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You don\'t have any targets.")
            return 0
        end
        if getCreatureCondition(getCreatureTarget(cid), CONDITION_INVISIBLE) then
            return 0
        end
        if getCreatureHealth(getCreatureTarget(cid)) <= 0 then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your have already defeated your target.")
            return 0
        end
        if not isCreature(getCreatureSummons(cid)[1]) then
            return true
        end
        if getDistanceBetween(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid))) > move.dist then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Get closer to the target to use this move.")
            return 0
        end
        if not isSightClear(getThingPos(getCreatureSummons(cid)[1]), getThingPos(getCreatureTarget(cid)), false) then
            return 0
        end
    end
    local newid = 0
    
    -- Cooldown -- 
    local Tiers = {
        [113] = {bonus = Cdown1},
        [114] = {bonus = Cdown2},
        [115] = {bonus = Cdown3},
    }
    local Tier = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "heldx")
    local cdzao = {}
    if Tier and Tier > 112 and Tier < 116 then
        cdzao = math.ceil(move.cd - (move.cd * Tiers[Tier].bonus))
    else
        cdzao = move.cd
    end
    -- Cooldown -- 
    if isSleeping(mypoke) or isSilence(mypoke) then --alterado v1.5
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry you can't do that right now.")
        return 0
    else
        newid = setCD(getPlayerSlotItem(cid, 8).uid, cdzin, cdzao) 
    end
    
    local spellMessage = msgs[math.random(#msgs)]..""..move.name.."!"
    if move.name == "Mega Evolution" then
        spellMessage = "Mega Evolve!"
    end
    doCreatureSay(cid, getPokeName(mypoke)..", "..spellMessage, TALKTYPE_ORANGE_1)
    
    local summons = getCreatureSummons(cid) --alterado v1.6
    addEvent(doAlertReady, move.cd * 1000, cid, newid, move.name, it, cdzin)
    
    for i = 2, #summons do
        if isCreature(summons) and getPlayerStorageValue(cid, 637501) >= 1 then
            docastspell(summons, move.name) --alterado v1.6
        end
    end 
    docastspell(mypoke, move.name)
    doCreatureAddCondition(cid, playerexhaust)
    if useKpdoDlls then
        doUpdateCooldowns(cid)
    end
    return 0
end

    Deu erro ao iniciar o server.

     

     

    [Show Off] Zendedd - Mapping

    [Show Off] Zendedd - Design (em breve)

  • Citar
  • Mention
    • Postado
    • Autor
    3 minutos atrás, Noob II disse:

    Que erro?

    [20/01/2017 03:07:37] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/move1.lua:1: unexpected symbol near 'ï'
    [20/01/2017 03:07:37] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/move1.lua)
    [20/01/2017 03:07:37] data/talkactions/scripts/move1.lua:1: unexpected symbol near 'ï'
    [20/01/2017 03:07:43] >> Loading chat channels

    3 minutos atrás, Noob II disse:

    Que erro?

    [20/01/2017 03:07:37] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/move1.lua:1: unexpected symbol near 'ï'
    [20/01/2017 03:07:37] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/move1.lua)
    [20/01/2017 03:07:37] data/talkactions/scripts/move1.lua:1: unexpected symbol near 'ï'
    [20/01/2017 03:07:43] >> Loading chat channels

    3 minutos atrás, Noob II disse:

    Que erro?

    [20/01/2017 03:07:37] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/move1.lua:1: unexpected symbol near 'ï'
    [20/01/2017 03:07:37] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/move1.lua)
    [20/01/2017 03:07:37] data/talkactions/scripts/move1.lua:1: unexpected symbol near 'ï'
    [20/01/2017 03:07:43] >> Loading chat channels

    [Show Off] Zendedd - Mapping

    [Show Off] Zendedd - Design (em breve)

  • 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.

    Visitante
    Responder
    Ir para a lista de tópicos

    Quem Está Navegando 0

    • Nenhum usuário registrado visualizando esta página.

    Conteúdo Similar

    Estatísticas dos Fóruns

    • Tópicos 96.9k
    • Posts 519.7k

    Informação Importante

    Confirmação de Termo

    I accept