Ir para conteúdo

Preciso de Ajuda com Erros no Console

Por ZoR
em Suporte Tibia OTServer

Featured Replies

Postado

GALERA SUAVE ? ENTAO PRECISO DE AJUDA COM ALGUNS BUGS NO MEU CONSOLE!

 

597d6b7956187_Bugsgame.thumb.png.f3994c66f31ef4a3eec228fb1a21956e.png

 

Scripts

 

Habateku Chidori

Spoiler 

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_HITCOLOR, 101)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -100.2, 1, -100.2, 1)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_HITCOLOR, 101)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -5.3, 2)

local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat4, COMBAT_PARAM_HITCOLOR, 101)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -11.2, 1)

function onCastSpell(cid, var)
local waittime = 3.0 -- Tempo de exhaustion
local storage = 115829

if exhaustion.check(cid, storage) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Aguarde " .. exhaustion.get(cid, storage) .. " segundos para usar a spell novamente.")
return false
end
   local pos1 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
   local pos2 = {x=getThingPosition(getCreatureTarget(cid)).x+3, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
   local pos3 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
   local pos4 = {x=getThingPosition(getCreatureTarget(cid)).x-1, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
   
   local t1 = 1
   local t2 = 1000
   local t3 = 2000
   local t4 = 2000
   addEvent(doSendMagicEffect,t1,pos1,293)
   addEvent(doSendMagicEffect,t2,pos2,426) 
   addEvent(doSendMagicEffect,t3,pos3,275) 
   addEvent(doSendMagicEffect,t4,pos4,275) 
   addEvent(doCombat, 1000, cid,combat,var)
   addEvent(doCombat3, 2000, cid,combat3,var)
   addEvent(doCombat4, 2500, cid,combat4,var)
   exhaustion.set(cid, storage, waittime)
   return true
end

 

 

Tsuk

 

Spoiler 

local time = 15 -- tempo em segundos para voltar
local points = 10 -- o tanto de skills ele ficara mais forte

local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, time*1000)
setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, points)
setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, points)
setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, points)
setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, points)
setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, points)
setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, points)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, points)

function onCastSpell(cid, var)

local waittime = 15 -- Tempo de exhaustion
local storage = 15288

if exhaustion.check(cid, storage) then
return false
end

exhaustion.set(cid, storage, waittime)
local pos = getCreaturePosition(cid)
local target = getCreatureTarget(cid)
local targetpos = getCreaturePosition(target)

local Tile1 = {x=1509, y=1255, z=7} -- position onde o player sera teleportado
local Tile2 = {x=1509, y=1259, z=7} -- position onde o target sera teleportado
local from,to = {x=979, y=911, z=7},{x=994, y=918, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado
local from,to1 = {x=1504, y=1253, z=7},{x=1514, y=1263, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado
local from,to2 = {x=1553, y=1253, z=7},{x=1562, y=1262, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado
local from,to3 = {x=1160, y=1176, z=7},{x=1168, y=1190, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado
local from,to4 = {x=664, y=1099, z=7},{x=685, y=1104, z=7},{ -- ponto 1 ao ponto 2 da area em que ele sera teleportado


if isInRange(pos, from, to) and isInRange(pos, from1, to1) and isInRange(pos, from2, to2) and isInRange(pos, from3, to3) and isInRange(pos, from4, to4) then
doPlayerSendCancel(cid, "Você nao pode usar o Tsukuyomi World aqui!")
return FALSE
end

if not isPlayer(target) then
doPlayerSendCancel(cid, "Você so pode usar essa magia em players!")
return FALSE
end

local function Teleport_Player(cid)
doTeleportThing(cid,pos)
end

local function Teleport_Target(target)
doCreatureSetNoMove(target, 0)
doTeleportThing(target,targetpos)
end

doAddCondition(cid, condition)
doCreatureSetNoMove(target, 1)
doTeleportThing(cid,Tile1)
doTeleportThing(target,Tile2)
doSendMagicEffect(targetpos, 252)
addEvent(Teleport_Player, time*1000, cid)
addEvent(Teleport_Target, time*1000, target)
return TRUE
end

 

  

O rei de seu proprio destino é aquele que luta pela gloria do amanhã!
Discord : ZoR#9373


 

  • Citar
  • Mention
    • Respostas 5
    • Visualizações 394
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Most Popular Posts

    • quemtuacha
      quemtuacha

      tsu   habateku     da uma olhada na pasta mods, tem um arquivo config.xml nela que não é um mod.

    Posted Images

    Postado

    tsu

    Spoiler

    local time = 15 -- tempo em segundos para voltar
    local points = 10 -- o tanto de skills ele ficara mais forte

    local condition = createConditionObject(CONDITION_ATTRIBUTES)
    setConditionParam(condition, CONDITION_PARAM_TICKS, time*1000)
    setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, points)

    function onCastSpell(cid, var)

    local waittime = 15 -- Tempo de exhaustion
    local storage = 15288

    if exhaustion.check(cid, storage) then
    return false
    end

    exhaustion.set(cid, storage, waittime)
    local pos = getCreaturePosition(cid)
    local target = getCreatureTarget(cid)
    local targetpos = getCreaturePosition(target)

    local Tile1 = {x=1509, y=1255, z=7} -- position onde o player sera teleportado
    local Tile2 = {x=1509, y=1259, z=7} -- position onde o target sera teleportado
    local from,to = {x=979, y=911, z=7},{x=994, y=918, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to1 = {x=1504, y=1253, z=7},{x=1514, y=1263, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to2 = {x=1553, y=1253, z=7},{x=1562, y=1262, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to3 = {x=1160, y=1176, z=7},{x=1168, y=1190, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to4 = {x=664, y=1099, z=7},{x=685, y=1104, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado


    if isInRange(pos, from, to) and isInRange(pos, from1, to1) and isInRange(pos, from2, to2) and isInRange(pos, from3, to3) and isInRange(pos, from4, to4) then
    doPlayerSendCancel(cid, "Você nao pode usar o Tsukuyomi World aqui!")
    return FALSE
    end

    if not isPlayer(target) then
    doPlayerSendCancel(cid, "Você so pode usar essa magia em players!")
    return FALSE
    end

    local function Teleport_Player(cid)
    doTeleportThing(cid,pos)
    end

    local function Teleport_Target(target)
    doCreatureSetNoMove(target, 0)
    doTeleportThing(target,targetpos)
    end

    doAddCondition(cid, condition)
    doCreatureSetNoMove(target, 1)
    doTeleportThing(cid,Tile1)
    doTeleportThing(target,Tile2)
    doSendMagicEffect(targetpos, 252)
    addEvent(Teleport_Player, time*1000, cid)
    addEvent(Teleport_Target, time*1000, target)
    return TRUE
    end

     

    habateku

     

    Spoiler

    local combat = createCombatObject()
    setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -100.2, 1, -100.2, 1)

    local combat2 = createCombatObject()
    setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat2, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -5.3, 2)

    local combat4 = createCombatObject()
    setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat4, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -11.2, 1)

    function onCastSpell(cid, var)
    local waittime = 3.0 -- Tempo de exhaustion
    local storage = 115829

    if exhaustion.check(cid, storage) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Aguarde " .. exhaustion.get(cid, storage) .. " segundos para usar a spell novamente.")
    return false
    end
       local pos1 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos2 = {x=getThingPosition(getCreatureTarget(cid)).x+3, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos3 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos4 = {x=getThingPosition(getCreatureTarget(cid)).x-1, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       
       local t1 = 1
       local t2 = 1000
       local t3 = 2000
       local t4 = 2000
       addEvent(doSendMagicEffect,t1,pos1,293)
       addEvent(doSendMagicEffect,t2,pos2,426) 
       addEvent(doSendMagicEffect,t3,pos3,275) 
       addEvent(doSendMagicEffect,t4,pos4,275) 
       addEvent(doCombat, 1000, cid,combat,var)
       addEvent(doCombat2, 2000, cid,combat2,var)
       addEvent(doCombat4, 2500, cid,combat4,var)
       exhaustion.set(cid, storage, waittime)
       return true
    end

     

    da uma olhada na pasta mods, tem um arquivo config.xml nela que não é um mod.

     

    Host bom para hospedar seu jogo => https://shre.ink/OminiHost

     

  • Citar
  • Mention
    • Postado
    • Autor
    1 minuto atrás, quemtuacha disse:

    tsu

      Ocultar conteúdo

    local time = 15 -- tempo em segundos para voltar
    local points = 10 -- o tanto de skills ele ficara mais forte

    local condition = createConditionObject(CONDITION_ATTRIBUTES)
    setConditionParam(condition, CONDITION_PARAM_TICKS, time*1000)
    setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, points)

    function onCastSpell(cid, var)

    local waittime = 15 -- Tempo de exhaustion
    local storage = 15288

    if exhaustion.check(cid, storage) then
    return false
    end

    exhaustion.set(cid, storage, waittime)
    local pos = getCreaturePosition(cid)
    local target = getCreatureTarget(cid)
    local targetpos = getCreaturePosition(target)

    local Tile1 = {x=1509, y=1255, z=7} -- position onde o player sera teleportado
    local Tile2 = {x=1509, y=1259, z=7} -- position onde o target sera teleportado
    local from,to = {x=979, y=911, z=7},{x=994, y=918, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to1 = {x=1504, y=1253, z=7},{x=1514, y=1263, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to2 = {x=1553, y=1253, z=7},{x=1562, y=1262, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to3 = {x=1160, y=1176, z=7},{x=1168, y=1190, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to4 = {x=664, y=1099, z=7},{x=685, y=1104, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado


    if isInRange(pos, from, to) and isInRange(pos, from1, to1) and isInRange(pos, from2, to2) and isInRange(pos, from3, to3) and isInRange(pos, from4, to4) then
    doPlayerSendCancel(cid, "Você nao pode usar o Tsukuyomi World aqui!")
    return FALSE
    end

    if not isPlayer(target) then
    doPlayerSendCancel(cid, "Você so pode usar essa magia em players!")
    return FALSE
    end

    local function Teleport_Player(cid)
    doTeleportThing(cid,pos)
    end

    local function Teleport_Target(target)
    doCreatureSetNoMove(target, 0)
    doTeleportThing(target,targetpos)
    end

    doAddCondition(cid, condition)
    doCreatureSetNoMove(target, 1)
    doTeleportThing(cid,Tile1)
    doTeleportThing(target,Tile2)
    doSendMagicEffect(targetpos, 252)
    addEvent(Teleport_Player, time*1000, cid)
    addEvent(Teleport_Target, time*1000, target)
    return TRUE
    end

     

    habateku

     

      Ocultar conteúdo

    local combat = createCombatObject()
    setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -100.2, 1, -100.2, 1)

    local combat2 = createCombatObject()
    setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat2, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -5.3, 2)

    local combat4 = createCombatObject()
    setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat4, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -11.2, 1)

    function onCastSpell(cid, var)
    local waittime = 3.0 -- Tempo de exhaustion
    local storage = 115829

    if exhaustion.check(cid, storage) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Aguarde " .. exhaustion.get(cid, storage) .. " segundos para usar a spell novamente.")
    return false
    end
       local pos1 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos2 = {x=getThingPosition(getCreatureTarget(cid)).x+3, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos3 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos4 = {x=getThingPosition(getCreatureTarget(cid)).x-1, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       
       local t1 = 1
       local t2 = 1000
       local t3 = 2000
       local t4 = 2000
       addEvent(doSendMagicEffect,t1,pos1,293)
       addEvent(doSendMagicEffect,t2,pos2,426) 
       addEvent(doSendMagicEffect,t3,pos3,275) 
       addEvent(doSendMagicEffect,t4,pos4,275) 
       addEvent(doCombat, 1000, cid,combat,var)
       addEvent(doCombat2, 2000, cid,combat2,var)
       addEvent(doCombat4, 2500, cid,combat4,var)
       exhaustion.set(cid, storage, waittime)
       return true
    end

     

    da uma olhada na pasta mods, tem um arquivo config.xml nela que não é um mod.

    TOOOOP!!! Vlw caraaa!!!!! Te Amo s2!

    7 horas atrás, quemtuacha disse:

    tsu

      Mostrar conteúdo oculto

    local time = 15 -- tempo em segundos para voltar
    local points = 10 -- o tanto de skills ele ficara mais forte

    local condition = createConditionObject(CONDITION_ATTRIBUTES)
    setConditionParam(condition, CONDITION_PARAM_TICKS, time*1000)
    setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, points)
    setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, points)

    function onCastSpell(cid, var)

    local waittime = 15 -- Tempo de exhaustion
    local storage = 15288

    if exhaustion.check(cid, storage) then
    return false
    end

    exhaustion.set(cid, storage, waittime)
    local pos = getCreaturePosition(cid)
    local target = getCreatureTarget(cid)
    local targetpos = getCreaturePosition(target)

    local Tile1 = {x=1509, y=1255, z=7} -- position onde o player sera teleportado
    local Tile2 = {x=1509, y=1259, z=7} -- position onde o target sera teleportado
    local from,to = {x=979, y=911, z=7},{x=994, y=918, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to1 = {x=1504, y=1253, z=7},{x=1514, y=1263, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to2 = {x=1553, y=1253, z=7},{x=1562, y=1262, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to3 = {x=1160, y=1176, z=7},{x=1168, y=1190, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado
    local from,to4 = {x=664, y=1099, z=7},{x=685, y=1104, z=7} -- ponto 1 ao ponto 2 da area em que ele sera teleportado


    if isInRange(pos, from, to) and isInRange(pos, from1, to1) and isInRange(pos, from2, to2) and isInRange(pos, from3, to3) and isInRange(pos, from4, to4) then
    doPlayerSendCancel(cid, "Você nao pode usar o Tsukuyomi World aqui!")
    return FALSE
    end

    if not isPlayer(target) then
    doPlayerSendCancel(cid, "Você so pode usar essa magia em players!")
    return FALSE
    end

    local function Teleport_Player(cid)
    doTeleportThing(cid,pos)
    end

    local function Teleport_Target(target)
    doCreatureSetNoMove(target, 0)
    doTeleportThing(target,targetpos)
    end

    doAddCondition(cid, condition)
    doCreatureSetNoMove(target, 1)
    doTeleportThing(cid,Tile1)
    doTeleportThing(target,Tile2)
    doSendMagicEffect(targetpos, 252)
    addEvent(Teleport_Player, time*1000, cid)
    addEvent(Teleport_Target, time*1000, target)
    return TRUE
    end

     

    habateku

     

      Mostrar conteúdo oculto

    local combat = createCombatObject()
    setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -100.2, 1, -100.2, 1)

    local combat2 = createCombatObject()
    setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat2, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -5.3, 2)

    local combat4 = createCombatObject()
    setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
    setCombatParam(combat4, COMBAT_PARAM_HITCOLOR, 101)
    setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -1.5, 2, -11.2, 1)

    function onCastSpell(cid, var)
    local waittime = 3.0 -- Tempo de exhaustion
    local storage = 115829

    if exhaustion.check(cid, storage) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Aguarde " .. exhaustion.get(cid, storage) .. " segundos para usar a spell novamente.")
    return false
    end
       local pos1 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos2 = {x=getThingPosition(getCreatureTarget(cid)).x+3, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos3 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       local pos4 = {x=getThingPosition(getCreatureTarget(cid)).x-1, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z}
       
       local t1 = 1
       local t2 = 1000
       local t3 = 2000
       local t4 = 2000
       addEvent(doSendMagicEffect,t1,pos1,293)
       addEvent(doSendMagicEffect,t2,pos2,426) 
       addEvent(doSendMagicEffect,t3,pos3,275) 
       addEvent(doSendMagicEffect,t4,pos4,275) 
       addEvent(doCombat, 1000, cid,combat,var)
       addEvent(doCombat2, 2000, cid,combat2,var)
       addEvent(doCombat4, 2500, cid,combat4,var)
       exhaustion.set(cid, storage, waittime)
       return true
    end

     

    da uma olhada na pasta mods, tem um arquivo config.xml nela que não é um mod.

    ainda ta com erro amigo,o erro só tinha desaparecido mas quando uso in-game aparece isso

    597de13ad311b_maiserros.png.e43d0622882aad46e6e9b85c1520b857.png

     

    Kisame protect

    Spoiler 
    
local tempo = 60 -- tempo em segundos.
local effect = {13} -- effect no player, caso queira apenas 1, basta remover os outros numeros.
     
local ml = 70 -- quantos ira aumentar o skill de ML
local skillfist = 70 -- quantos ira aumentar o skill de Fist
local skillsword = 70 -- quantos ira aumentar o skill de Sword
local skillaxe = 70 -- quantos ira aumentar o skill de Axe
local skillclub = 70 -- quantos ira aumentar o skill de Club
local skilldistance = 70 -- quantos ira aumentar o skill de Distance
local skillshield = 70 -- quantos ira aumentar o skill de Shield
local health = 200 -- A cada 1 segundo quantos aumentar de vida
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)
     
local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml)
setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, skillfist)
setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, skillsword)
setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, skillaxe)
setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, skillclub)
setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, skilldistance)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield)
setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_HASTE)
setConditionParam(condition, CONDITION_PARAM_SPEED, 250)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_REGENERATION)
setConditionParam(condition, CONDITION_PARAM_SUBID, 1)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health)
setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 1000)
setCombatCondition(combat, condition)
            
function magicEffect1(tempo2,tempo3,cid)
if (isCreature(cid)) then
    if getPlayerStorageValue(cid, 102011) > 0 and getCreatureCondition(cid, CONDITION_REGENERATION, 1) then
        for i=1, #effect do
        local position = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
doSendMagicEffect(position, effect[i])  
        end
    end
end
end
                  
function onCastSpell(cid, var)
local position127 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
if getPlayerStorageValue(cid, 102011) ~= 1 or getCreatureCondition(cid, CONDITION_REGENERATION, 1) == false then
    doCombat(cid, combat, var)
    tempo2 = 0
    while (tempo2 ~= (tempo*1000)) do
        addEvent(magicEffect231, tempo2, tempo2, tempo*1000, cid)
        tempo2 = tempo2 + 300
    end
    setPlayerStorageValue(cid, 102011,1) -- storage verifica transformado, quando = 1 player esta transformado.
    doCreatureSay(cid, "Suiton Protect", TALKTYPE_MONSTER)
doSendMagicEffect(position127, 13)
else
end
end

     

     

    http://prntscr.com/g26shf

    Bugs

    Spoiler 
    
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 358)
setCombatParam(combat1, COMBAT_PARAM_HITCOLOR, 210)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -40.2, 1, -40.2, 1)

function onCastSpell(cid, var)
local waittime = 20 -- Tempo de exhaustion
local storage = 115829

if exhaustion.check(cid, storage) then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Aguarde " .. exhaustion.get(cid, storage) .. " segundos para usar a spell novamente.")
return false
end
local target = getCreatureTarget(cid)
local storage = 102053
if isPlayer(target) then
if getPlayerStorageValue(target, storage) == 1 then
setPlayerStorageValue(target, storage, 0)
exhaustion.set(cid, storage, waittime)
return doCombat(cid, combat, var)
else 
doPlayerSendTextMessage(cid, 20, "O Player já está sem Buff.")
end
else 
doPlayerSendTextMessage(cid, 20, "Você só pode usar este poder em Players, pois monstros não tem Buff.")
end
end

     

    Boost

    Spoiler 
    
addSkills = function(cid)
if boost.getSkillBoosts(cid) > 0 then
if getCreatureCondition(cid, CONDITION_ATTRIBUTE, boost_Lib.cond_subId) then
 doRemoveCondition(cid, CONDITION_ATTRIBUTE, boost_Lib.cond_subId)
end


boost_system  = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(boost_system, CONDITION_PARAM_TICKS, -1)
setConditionParam(boost_system, CONDITION_PARAM_STAT_MAGICPOINTS, boost.getSkillBoosts(cid))
setConditionParam(boost_system, CONDITION_PARAM_SKILL_SWORD, boost.getSkillBoosts(cid))
setConditionParam(boost_system, CONDITION_PARAM_SKILL_CLUB, boost.getSkillBoosts(cid))
setConditionParam(boost_system, CONDITION_PARAM_SKILL_DISTANCE, boost.getSkillBoosts(cid))
setConditionParam(boost_system, CONDITION_PARAM_SKILL_SHIELD, boost.getSkillBoosts(cid))
setConditionParam(boost_system, CONDITION_PARAM_SUBID, boost_Lib.cond_subId)
return doAddCondition(cid, boost_system)
else
return false
end
end

     

    Look

    Spoiler 
    
function onLook(cid, thing, position, lookDistance)
if isPlayer(thing.uid) and thing.uid ~= cid then
 if jin.getPlayerBijuu(thing.uid) ~= 0 then
  doPlayerSetSpecialDescription(thing.uid, "\nJinchuuriki de: ["..jin.getPlayerBijuu(thing.uid).."]\nGraduação: "..
  grad.getGradu(thing.uid).."\nPatente: "..patente.getPatentName(thing.uid)..
  "\nPatente Kills: "..patente.getkills(thing.uid))
 else
  doPlayerSetSpecialDescription(thing.uid, "\nNão é um Jinchuuriki.\nGraduação: "..
  grad.getGradu(thing.uid).."\nPatente: "..patente.getPatentName(thing.uid)..
  "\nPatente Kills: "..patente.getkills(thing.uid))
 end
 return true
elseif thing.uid == cid then
 local string = 'You see yourself.'
 if getPlayerFlagValue(cid, PLAYERFLAG_SHOWGROUPINSTEADOFVOCATION) then
  string = string..' You are '.. getPlayerGroupName(cid) ..'.'
 elseif getPlayerVocation(cid) ~= 0 then
  string = string..' You are '.. getPlayerVocationName(cid) ..'.'
 else
  string = string..' You have no vocation.'
 end
 string = string..getPlayerSpecialDescription(cid)..''

if getPlayerGuildId(cid) > 0 then 
 string = string..' You are ' .. (getPlayerGuildRank(cid) == '' and 'a member' or getPlayerGuildRank(cid)) ..' of the '.. getPlayerGuildName(cid)
 string = getPlayerGuildNick(cid) ~= '' and string..' ('.. getPlayerGuildNick(cid) ..').' or string..'.'
end 

if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEECREATUREDETAILS) then
 string = string..'\nHealth: ['.. getCreatureHealth(cid) ..' / '.. getCreatureMaxHealth(cid) ..'], Mana: ['.. getCreatureMana(cid) ..' / '.. getCreatureMaxMana(cid) ..'].'
 string = string..'\nIP: '.. doConvertIntegerToIp(getPlayerIp(cid)) ..'.'
end

if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEEPOSITION) then
 string = string..'\nPosition: [X:'.. position.x..'] [Y:'.. position.y..'] [Z:'.. position.z..'].'
end

if jin.getPlayerBijuu(cid) ~= 0 then
 string = string.."\nJinchuuriki de: ["..jin.getPlayerBijuu(cid).."]"
else
 string = string.."\nNão é um Jinchuuriki."
end

string = string.."\nGraduação: "..grad.getGradu(cid)
string = string.."\nPatente: "..patente.getPatentName(cid).."\nPatente Kills: "..patente.getkills(cid)


 doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string) 
 return false
end
 return true
end

     

    login

    Spoiler 
    
local config = {
 loginMessage = getConfigValue('loginMessage'),
 useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
boost.addSkills(cid)
 local loss = getConfigValue('deathLostPercent')
 if(loss ~= nil) then
  doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
 end


	return true
end

 local accountManager = getPlayerAccountManager(cid)
 if(accountManager == MANAGER_NONE) then
  local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
  if(lastLogin > 0) then
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
   str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
  end

  doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
 elseif(accountManager == MANAGER_NAMELOCK) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
 elseif(accountManager == MANAGER_ACCOUNT) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
 else
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
 end

 if(not isPlayerGhost(cid)) then
  doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
 end

 registerCreatureEvent(cid, "Mail")
 registerCreatureEvent(cid, "GuildMotd")

 registerCreatureEvent(cid, "Idle")
 if(config.useFragHandler) then
  registerCreatureEvent(cid, "SkullCheck")
 end
        registerCreatureEvent(cid, "ProtDeath")
           registerCreatureEvent(cid, "Biohazard")
           registerCreatureEvent(cid, "ZombieAttack")
           registerCreatureEvent(cid, "WeaponMana")
     registerCreatureEvent(cid, "showVoc")       
        registerCreatureEvent(cid, "ReportBug")
        registerCreatureEvent(cid, "AdvanceSave")
 registerCreatureEvent(cid, "Outfit")
 registerCreatureEvent(cid, "MonsteDeath")
registerCreatureEvent(cid, "ExameJouninDead")
        registerCreatureEvent(cid, "ExameJouninBoss")
setPlayerStorageValue(cid, 8855, -1)
registerCreatureEvent(cid, "Senha")
registerCreatureEvent(cid, "eventotimes")
registerCreatureEvent(cid, "report")
registerCreatureEvent(cid, "attackguild")
registerCreatureEvent(cid, "NlooT")
registerCreatureEvent(cid, "DeathHP")
registerCreatureEvent(cid, "FirstItems")
registerCreatureEvent(cid, "KamuiMuzan")
registerCreatureEvent(cid, "UP")
registerCreatureEvent(cid, "Niwdeath")
registerCreatureEvent(cid, "Izanagi")
---------- PlayerPort---------------
if getPlayerStorageValue(cid, 49708) ~= 0 then
        setPlayerStorageValue(cid, 49708, 0) 
end
        if getPlayerGuildId(cid) > 0 then
             local guild = getPlayerGuildId(cid)
            doGuildAddEnemy(guild, enemy, 0, WAR_GUILD)
        else
        end
 return true
end

     

      

    O rei de seu proprio destino é aquele que luta pela gloria do amanhã!
    Discord : ZoR#9373


     

  • Citar
  • Mention
    • Postado

    login.lua:

    Spoiler 
    
local config = {
 loginMessage = getConfigValue('loginMessage'),
 useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
boost.addSkills(cid)
 local loss = getConfigValue('deathLostPercent')
 if(loss ~= nil) then
  doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
 end



 local accountManager = getPlayerAccountManager(cid)
 if(accountManager == MANAGER_NONE) then
  local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
  if(lastLogin > 0) then
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
   str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
  end

  doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
 elseif(accountManager == MANAGER_NAMELOCK) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
 elseif(accountManager == MANAGER_ACCOUNT) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
 else
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
 end

 if(not isPlayerGhost(cid)) then
  doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
 end

 registerCreatureEvent(cid, "Mail")
 registerCreatureEvent(cid, "GuildMotd")

 registerCreatureEvent(cid, "Idle")
 if(config.useFragHandler) then
  registerCreatureEvent(cid, "SkullCheck")
 end
 
registerCreatureEvent(cid, "ProtDeath")
registerCreatureEvent(cid, "Biohazard")
registerCreatureEvent(cid, "ZombieAttack")
registerCreatureEvent(cid, "WeaponMana")
registerCreatureEvent(cid, "showVoc")       
registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, "AdvanceSave")
registerCreatureEvent(cid, "Outfit")
registerCreatureEvent(cid, "MonsteDeath")
registerCreatureEvent(cid, "ExameJouninDead")
registerCreatureEvent(cid, "ExameJouninBoss")
setPlayerStorageValue(cid, 8855, -1)
registerCreatureEvent(cid, "Senha")
registerCreatureEvent(cid, "eventotimes")
registerCreatureEvent(cid, "report")
registerCreatureEvent(cid, "attackguild")
registerCreatureEvent(cid, "NlooT")
registerCreatureEvent(cid, "DeathHP")
registerCreatureEvent(cid, "FirstItems")
registerCreatureEvent(cid, "KamuiMuzan")
registerCreatureEvent(cid, "UP")
registerCreatureEvent(cid, "Niwdeath")
registerCreatureEvent(cid, "Izanagi")
---------- PlayerPort---------------
if getPlayerStorageValue(cid, 49708) ~= 0 then
        setPlayerStorageValue(cid, 49708, 0) 
end
        if getPlayerGuildId(cid) > 0 then
             local guild = getPlayerGuildId(cid)
            doGuildAddEnemy(guild, enemy, 0, WAR_GUILD)
        else
        end
 return true
end

     

     

    kisameprotect.lua:

    Spoiler 
    
local tempo = 60 -- tempo em segundos.
local effect = {13} -- effect no player, caso queira apenas 1, basta remover os outros numeros.
     
local ml = 70 -- quantos ira aumentar o skill de ML
local skillfist = 70 -- quantos ira aumentar o skill de Fist
local skillsword = 70 -- quantos ira aumentar o skill de Sword
local skillaxe = 70 -- quantos ira aumentar o skill de Axe
local skillclub = 70 -- quantos ira aumentar o skill de Club
local skilldistance = 70 -- quantos ira aumentar o skill de Distance
local skillshield = 70 -- quantos ira aumentar o skill de Shield
local health = 200 -- A cada 1 segundo quantos aumentar de vida
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)
     
local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml)
setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, skillfist)
setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, skillsword)
setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, skillaxe)
setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, skillclub)
setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, skilldistance)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield)
setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_HASTE)
setConditionParam(condition, CONDITION_PARAM_SPEED, 250)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_REGENERATION)
setConditionParam(condition, CONDITION_PARAM_SUBID, 1)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health)
setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 1000)
setCombatCondition(combat, condition)
            
function magicEffect1(tempo2,tempo3,cid)
if (isCreature(cid)) then
    if getPlayerStorageValue(cid, 102011) > 0 and getCreatureCondition(cid, CONDITION_REGENERATION, 1) then
        for i=1, #effect do
        local position = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
doSendMagicEffect(position, effect[i])  
        end
    end
end
end
                  
function onCastSpell(cid, var)
local position127 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
if getPlayerStorageValue(cid, 102011) ~= 1 or getCreatureCondition(cid, CONDITION_REGENERATION, 1) == false then
    doCombat(cid, combat, var)
    tempo2 = 0
    while (tempo2 ~= (tempo*1000)) do		
        addEvent(function() magicEffect1(tempo2,tempo2,cid) end, tempo*1000)
        tempo2 = tempo2 + 300
    end
    setPlayerStorageValue(cid, 102011,1) -- storage verifica transformado, quando = 1 player esta transformado.
    doCreatureSay(cid, "Suiton Protect", TALKTYPE_MONSTER)
doSendMagicEffect(position127, 13)
else
end
end

     

     

    Os erros estão aparecendo devido as suas alterações, então cuidado ao mexer, não mexa no que você não sabe, muito menos onde não deve! 

                                                                  ezgif-1-98aab239f3.gif.1a897c9c3225228909e7b356a5cfb8e4.gif

  • Citar
  • Mention
    • Postado
    • Autor
    21 minutos atrás, KotZletY disse:

    login.lua:

      Ocultar conteúdo 
    

local config = {
 loginMessage = getConfigValue('loginMessage'),
 useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
boost.addSkills(cid)
 local loss = getConfigValue('deathLostPercent')
 if(loss ~= nil) then
  doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
 end



 local accountManager = getPlayerAccountManager(cid)
 if(accountManager == MANAGER_NONE) then
  local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
  if(lastLogin > 0) then
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
   str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
  end

  doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
 elseif(accountManager == MANAGER_NAMELOCK) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
 elseif(accountManager == MANAGER_ACCOUNT) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
 else
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
 end

 if(not isPlayerGhost(cid)) then
  doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
 end

 registerCreatureEvent(cid, "Mail")
 registerCreatureEvent(cid, "GuildMotd")

 registerCreatureEvent(cid, "Idle")
 if(config.useFragHandler) then
  registerCreatureEvent(cid, "SkullCheck")
 end
 
registerCreatureEvent(cid, "ProtDeath")
registerCreatureEvent(cid, "Biohazard")
registerCreatureEvent(cid, "ZombieAttack")
registerCreatureEvent(cid, "WeaponMana")
registerCreatureEvent(cid, "showVoc")       
registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, "AdvanceSave")
registerCreatureEvent(cid, "Outfit")
registerCreatureEvent(cid, "MonsteDeath")
registerCreatureEvent(cid, "ExameJouninDead")
registerCreatureEvent(cid, "ExameJouninBoss")
setPlayerStorageValue(cid, 8855, -1)
registerCreatureEvent(cid, "Senha")
registerCreatureEvent(cid, "eventotimes")
registerCreatureEvent(cid, "report")
registerCreatureEvent(cid, "attackguild")
registerCreatureEvent(cid, "NlooT")
registerCreatureEvent(cid, "DeathHP")
registerCreatureEvent(cid, "FirstItems")
registerCreatureEvent(cid, "KamuiMuzan")
registerCreatureEvent(cid, "UP")
registerCreatureEvent(cid, "Niwdeath")
registerCreatureEvent(cid, "Izanagi")
---------- PlayerPort---------------
if getPlayerStorageValue(cid, 49708) ~= 0 then
        setPlayerStorageValue(cid, 49708, 0) 
end
        if getPlayerGuildId(cid) > 0 then
             local guild = getPlayerGuildId(cid)
            doGuildAddEnemy(guild, enemy, 0, WAR_GUILD)
        else
        end
 return true
end

     

     

    kisameprotect.lua:

      Ocultar conteúdo 
    

local tempo = 60 -- tempo em segundos.
local effect = {13} -- effect no player, caso queira apenas 1, basta remover os outros numeros.
     
local ml = 70 -- quantos ira aumentar o skill de ML
local skillfist = 70 -- quantos ira aumentar o skill de Fist
local skillsword = 70 -- quantos ira aumentar o skill de Sword
local skillaxe = 70 -- quantos ira aumentar o skill de Axe
local skillclub = 70 -- quantos ira aumentar o skill de Club
local skilldistance = 70 -- quantos ira aumentar o skill de Distance
local skillshield = 70 -- quantos ira aumentar o skill de Shield
local health = 200 -- A cada 1 segundo quantos aumentar de vida
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)
     
local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml)
setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, skillfist)
setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, skillsword)
setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, skillaxe)
setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, skillclub)
setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, skilldistance)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield)
setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_HASTE)
setConditionParam(condition, CONDITION_PARAM_SPEED, 250)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_REGENERATION)
setConditionParam(condition, CONDITION_PARAM_SUBID, 1)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health)
setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 1000)
setCombatCondition(combat, condition)
            
function magicEffect1(tempo2,tempo3,cid)
if (isCreature(cid)) then
    if getPlayerStorageValue(cid, 102011) > 0 and getCreatureCondition(cid, CONDITION_REGENERATION, 1) then
        for i=1, #effect do
        local position = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
doSendMagicEffect(position, effect[i])  
        end
    end
end
end
                  
function onCastSpell(cid, var)
local position127 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
if getPlayerStorageValue(cid, 102011) ~= 1 or getCreatureCondition(cid, CONDITION_REGENERATION, 1) == false then
    doCombat(cid, combat, var)
    tempo2 = 0
    while (tempo2 ~= (tempo*1000)) do		
        addEvent(function() magicEffect1(tempo2,tempo2,cid) end tempo*1000)
        tempo2 = tempo2 + 300
    end
    setPlayerStorageValue(cid, 102011,1) -- storage verifica transformado, quando = 1 player esta transformado.
    doCreatureSay(cid, "Suiton Protect", TALKTYPE_MONSTER)
doSendMagicEffect(position127, 13)
else
end
end

     

     

    Os erros estão aparecendo devido as suas alterações, então cuidado ao mexer, não mexa no que você não sabe, muito menos onde não deve! 

     

    21 minutos atrás, KotZletY disse:

    login.lua:

      Ocultar conteúdo 
    

local config = {
 loginMessage = getConfigValue('loginMessage'),
 useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)
boost.addSkills(cid)
 local loss = getConfigValue('deathLostPercent')
 if(loss ~= nil) then
  doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
 end



 local accountManager = getPlayerAccountManager(cid)
 if(accountManager == MANAGER_NONE) then
  local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
  if(lastLogin > 0) then
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
   str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
  end

  doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
 elseif(accountManager == MANAGER_NAMELOCK) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
 elseif(accountManager == MANAGER_ACCOUNT) then
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
 else
  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
 end

 if(not isPlayerGhost(cid)) then
  doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
 end

 registerCreatureEvent(cid, "Mail")
 registerCreatureEvent(cid, "GuildMotd")

 registerCreatureEvent(cid, "Idle")
 if(config.useFragHandler) then
  registerCreatureEvent(cid, "SkullCheck")
 end
 
registerCreatureEvent(cid, "ProtDeath")
registerCreatureEvent(cid, "Biohazard")
registerCreatureEvent(cid, "ZombieAttack")
registerCreatureEvent(cid, "WeaponMana")
registerCreatureEvent(cid, "showVoc")       
registerCreatureEvent(cid, "ReportBug")
registerCreatureEvent(cid, "AdvanceSave")
registerCreatureEvent(cid, "Outfit")
registerCreatureEvent(cid, "MonsteDeath")
registerCreatureEvent(cid, "ExameJouninDead")
registerCreatureEvent(cid, "ExameJouninBoss")
setPlayerStorageValue(cid, 8855, -1)
registerCreatureEvent(cid, "Senha")
registerCreatureEvent(cid, "eventotimes")
registerCreatureEvent(cid, "report")
registerCreatureEvent(cid, "attackguild")
registerCreatureEvent(cid, "NlooT")
registerCreatureEvent(cid, "DeathHP")
registerCreatureEvent(cid, "FirstItems")
registerCreatureEvent(cid, "KamuiMuzan")
registerCreatureEvent(cid, "UP")
registerCreatureEvent(cid, "Niwdeath")
registerCreatureEvent(cid, "Izanagi")
---------- PlayerPort---------------
if getPlayerStorageValue(cid, 49708) ~= 0 then
        setPlayerStorageValue(cid, 49708, 0) 
end
        if getPlayerGuildId(cid) > 0 then
             local guild = getPlayerGuildId(cid)
            doGuildAddEnemy(guild, enemy, 0, WAR_GUILD)
        else
        end
 return true
end

     

     

    kisameprotect.lua:

      Ocultar conteúdo 
    

local tempo = 60 -- tempo em segundos.
local effect = {13} -- effect no player, caso queira apenas 1, basta remover os outros numeros.
     
local ml = 70 -- quantos ira aumentar o skill de ML
local skillfist = 70 -- quantos ira aumentar o skill de Fist
local skillsword = 70 -- quantos ira aumentar o skill de Sword
local skillaxe = 70 -- quantos ira aumentar o skill de Axe
local skillclub = 70 -- quantos ira aumentar o skill de Club
local skilldistance = 70 -- quantos ira aumentar o skill de Distance
local skillshield = 70 -- quantos ira aumentar o skill de Shield
local health = 200 -- A cada 1 segundo quantos aumentar de vida
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)
     
local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml)
setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, skillfist)
setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, skillsword)
setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, skillaxe)
setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, skillclub)
setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, skilldistance)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield)
setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_HASTE)
setConditionParam(condition, CONDITION_PARAM_SPEED, 250)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setCombatCondition(combat, condition)
     
local condition = createConditionObject(CONDITION_REGENERATION)
setConditionParam(condition, CONDITION_PARAM_SUBID, 1)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000)
setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health)
setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 1000)
setCombatCondition(combat, condition)
            
function magicEffect1(tempo2,tempo3,cid)
if (isCreature(cid)) then
    if getPlayerStorageValue(cid, 102011) > 0 and getCreatureCondition(cid, CONDITION_REGENERATION, 1) then
        for i=1, #effect do
        local position = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y+1, z=getPlayerPosition(cid).z}
doSendMagicEffect(position, effect[i])  
        end
    end
end
end
                  
function onCastSpell(cid, var)
local position127 = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z}
if getPlayerStorageValue(cid, 102011) ~= 1 or getCreatureCondition(cid, CONDITION_REGENERATION, 1) == false then
    doCombat(cid, combat, var)
    tempo2 = 0
    while (tempo2 ~= (tempo*1000)) do		
        addEvent(function() magicEffect1(tempo2,tempo2,cid) end tempo*1000)
        tempo2 = tempo2 + 300
    end
    setPlayerStorageValue(cid, 102011,1) -- storage verifica transformado, quando = 1 player esta transformado.
    doCreatureSay(cid, "Suiton Protect", TALKTYPE_MONSTER)
doSendMagicEffect(position127, 13)
else
end
end

     

     

    Os erros estão aparecendo devido as suas alterações, então cuidado ao mexer, não mexa no que você não sabe, muito menos onde não deve! 

    [16:44:46.601] [Error - LuaInterface::loadFile] data/spells/scripts/summons/kisameprotect.lua:58: ')' expected near 'tempo'
    [16:44:46.601] [Warning - Event::loadScript] Cannot load script (data/spells/scripts/summons/kisameprotect.lua)
    [16:44:46.601] data/spells/scripts/summons/kisameprotect.lua:58: ')' expected near 'tempo'

    [16:44:46.709] [Error - Spell Interface]
    [16:44:46.710] data/spells/scripts/vip/minato/fuin kai.lua
    [16:44:46.710] Description:
    [16:44:46.711] (luaSetCombatParam) Combat not found
    [16:44:46.825] [Warning - Event::loadScript] Event onSay not found (data/talkactions/scripts/boost.lua)
    [16:44:46.966] [Warning - Event::loadScript] Event onLogin not found (data/creaturescripts/scripts/look.lua) 

    O rei de seu proprio destino é aquele que luta pela gloria do amanhã!
    Discord : ZoR#9373


     

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

    Informação Importante

    Confirmação de Termo

    I accept