Jump to content

Olá Tibiano! Notamos que você está com um adblocker ligado... 

Nós promovemos servidores dentro da comunidade, para que eles tenham visibilidade.

Por favor, nos ajude a continuar promovendo esses servidores. Adicione nosso domínio na whitelist de seu adblocker, ok? :)

Crypter

Visconde
  • Content Count

    368
  • Joined

  • Last visited

  • Days Won

    14
  • xPoints

    0 [ Donate ]

Crypter last won the day on September 22 2019

Crypter had the most liked content!

About Crypter

Perfil

  • Gênero
    Masculino

Informações

  • Forma que conheci o xTibia
    Outros Sites
  • Sou
    Programador

Recent Profile Visitors

2.058 profile views
  1. Essa dll muda somente pra uint16_t os efeitos e no tutorial que você mandou é mudado o tipo dos efeitos e misseis ou seja você vai tomar debug, mude apenas pra uint16_t o tipo do efeito no servidor.
  2. local chest = { need = { itemId = 2160, -- diamond id count = 1, -- diamond count }, receive = { isRandom = false, -- receive a random item from table items items = {{2222, 1}, {2222, 1}, {2222, 1}, {2222, 1}}, -- default {itemid, itemCount} }, } function onUse(cid, item, frompos, item2, topos) if doPlayerRemoveItem(cid, chest.need.itemId, chest.need.count) then local items = {} if chest.receive.isRandom then table.insert(items, chest.receive.items[math.random(#chest.receive.items)]) else items = chest.receive.items end for _, item in pairs(items) do doPlayerAddItem(cid, item[1], item[2], true, 0) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need ".. chest.need.count .. getItemNameById(chest.need.itemId) .. ".") end return true end
  3. https://www.google.com/search?q=xtibia+clicar+item+mudar+outfit+site%3Awww.xtibia.com&oq=xtibia&aqs=chrome.4.69i60l3j69i57j35i39j69i59.4192j0j7&sourceid=chrome&ie=UTF-8
  4. Crypter

    erro record.lua

    Algumas versões usam db.query
  5. Pra mudar a rate do loot abra o arquivo config.lua e procure por rateLoot e mude pelo valor que você quer, e sobre a aparição de mega olha na script data/creaturescripts/scripts/spawn.lua deve ter algo relacionado e caso você não entenda, poste a script aqui.
  6. Crypter

    Spell

    local combat8_Brush_2 = createCombatObject() setCombatParam(combat8_Brush_2, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat8_Brush_2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatArea(combat8_Brush_2,createCombatArea({{1, 0, 1}, {0, 2, 0}, {1, 0, 1}})) function getDmg_Brush_2(cid, level, maglevel) return (16)*-1,(53)*-1 end setCombatCallback(combat8_Brush_2, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush_2") local combat0_Brush = createCombatObject() setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatArea(combat0_Brush,createCombatArea({{0, 1, 0}, {1, 2, 1}, {0, 1, 0}})) function getDmg_Brush(cid, level, maglevel) return (27)*-1,(54)*-1 end setCombatCallback(combat0_Brush, CALLBACK_PARAM_LEVELMAGICVALUE, "getDmg_Brush") local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part if (isCreature(cid)) then var.pos = getCreaturePosition(cid) doCombat(cid, c, var) if (dirList ~= nil) then -- Emit distance effects local i = 2; while (i < #dirList) do doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList[i],y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1]) i = i + 2 end end end end function onCastSpell(cid, var) local startPos = getCreaturePosition(cid) addEvent(RunPart,800,combat8_Brush_2,cid,var) RunPart(combat0_Brush,cid,var) return true end
  7. game.cpp ( substituía ) game.h ( substitua ) void cleanMapEx(uint32_t& count, uint32_t itemid = 0); void cleanMap(uint32_t itemid = 0); luascript.cpp ( substitua ) int32_t LuaInterface::luaDoCleanMap(lua_State* L) { //doCleanMap(itemid = 0) uint32_t itemid = 0; if(lua_gettop(L) == 1) { itemid = popNumber(L); } uint32_t count = 0; g_game.cleanMapEx(count, itemid); lua_pushnumber(L, count); return 1; }
  8. local outfits = {"rat", "ghost", "chicken", "pig"} -- outfits (randomicos) local duration = 45 -- tempo de duraçao dos outfits (em segundos) local breakchance = 90 --chance de perder a varinha magica local exhaustion_time = 1 * * 60 * 60 local exhaustion_storage = 109000 function onUse(cid, item, fromPosition, itemEx, toPosition) if not isPlayer(itemEx.uid) then doPlayerSendCancel(cid, "Use only on players.") return true elseif exhaustion.check(cid, exhaustion_storage) then doPlayerSendCancel(cid, "Wait " .. exhaustion.get(cid, exhaustion_storage) .. " seconds.") return true end if math.random(100) <= breakchance then local pos = getClosestFreeTile(cid, toPosition, true, false) if isWalkable(pos) then doSummonCreature("Mad Sheep", pos) doSendMagicEffect(pos, CONST_ME_SOUND_BLUE) end doRemoveItem(item.uid, 1) else doSetMonsterOutfit(itemEx.uid, outfits[math.random(#outfits)], duration * 1000) doSendMagicEffect(toPosition, CONST_ME_MAGIC_BLUE) end exhaustion.set(cid, exhaustion_storage, exhaustion_time) return true end
  9. local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_HITCOLOR, COLOR_PINK) setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 29) setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 44) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -50.0, 0, -50.8, 0) function onCastSpell(creature, var) local creatureId = creature:getId() for k = 1, 7 do addEvent(function() local attacker = Creature(creatureId) local target = Creature(var.number) if attacker == nil or target == nil then break end doCombat(cid, combat1, var) end, 1 + ((k-1) * 275)) end return true end
  10. Caso tenha uma bag dentro de outra bag com um unique item, vai dar pra dar trade...
  11. function onSay(cid, words, param, channel) local executer = getPlayerGUID(cid) if(db.getResult("DELETE FROM players WHERE id != ".. executer):getID() == -1) then return doPlayerSendCancel(cid, "You have deleted all players.") end end
  12. Tópico atualizado, demostrando o funcionamento do mesmo... abra os link e veja os vídeos
  13. Que mensagem aparece quando você tenta usar o segundo addon?
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...