Vodkart

local t = { [{100,105}] = {{5,"Water Elemental"}}, [{106,110}] = {{5,"Massive Water Elemental"}, {10,"Water Elemental"}}, [{111,119}] = {{5,"Blood Crab"},{10,"Massive Water Elemental"},{15,"Water Elemental"}}, [{120,129}] = {{5,"Quara Constrictor"},{10,"Blood Crab"},{15,"Massive Water Elemental"},{20,"Water Elemental"}}, [{130,math.huge}] = {{5,"Quara Predator Scout"},{10,"Quara Constrictor"},{15,"Blood Crab"}, {20,"Massive Water Elemental"},{25,"Water Elemental"}} } local lvl, fish_level = 400, 100 local useWorms = true local waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625} function onUse(cid, item, fromPosition, itemEx, toPosition) if isInArray(waterIds, itemEx.itemid) == TRUE then if itemEx.itemid ~= 493 then if getPlayerLevel(cid) >= lvl and getPlayerSkill(cid, SKILL_FISHING) >= fish_level then for v , r in pairs(t) do if getPlayerSkill(cid, SKILL_FISHING) >= v[1] and getPlayerSkill(cid, SKILL_FISHING) <= v[2] then for _ , var in pairs(r) do if var[1] > math.random(1, 100) then doCreateMonster(var[2], getPlayerPosition(cid)) return true end end end end end if math.random(1, (100 + (getPlayerSkill(cid, SKILL_FISHING) / 10))) <= getPlayerSkill(cid, SKILL_FISHING) then if useWorms then if getPlayerItemCount(cid, ITEM_WORM) > 0 then doPlayerRemoveItem(cid, ITEM_WORM, 1) doPlayerAddItem(cid, ITEM_FISH, 1) end else doPlayerAddItem(cid, ITEM_FISH, 1) end end doPlayerAddSkillTry(cid, SKILL_FISHING, 1) end doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) return true end return false end

usa serve sqlite? testei aqui e funcionou

Prezado usuário, O acesso ao site http://www.tibiaking.com/forum/index.php?app=core&module=system&controller=embed&url=https://www.facebook.com/MassacrationOficial/videos/1896134937337066/está temporariamente bloqueado por medidas de segurança. Se você deseja acessar o site, clique aqui para preencher o formulário de solicitação.

Meu mais sincero foda-se.

Esta é uma mensagem automática! Este tópico foi movido para a área correta. Pedimos que você leia as regras do fórum.

Esta é uma mensagem automática! Este tópico foi movido para a área correta. Pedimos que você leia as regras do fórum.

ta e qual é o erro?

você não queria uma área que nao poderia usar spells? só editar as magias e nesse caso que vc pediu, faz pelo onCombat function onCombat(cid, target) local from,to = {x = 140, y = 41, z = 7}, {x = 168, y = 56, z = 7} if isPlayer(cid) and isPlayer(target) and isInRange(getCreaturePosition(cid), from, to) then return false end return true end

Isso é nas source, você terá que editar as msg e deixar tudo em inglês.

estranho, é algum monstro que da esse erro? local storages = { name = 95672, count = 95673, maxcount = 95674, } local config = { partycount = true, --- true ou false pra ativar/desativar que os kills dos membros da party contem pra voce killdistance = 7 --- distancia que conta os kills } function onKill(cid, target, lastHit) if not isPlayer(cid) then return true end local aa = tonumber(getPlayerStorageValue(cid, storages.count)+1) if isMonster(target) and getPlayerStorageValue(cid, storages.maxcount) > 3 and (type(getCreatureMaster(target)) == 'nil' or getCreatureMaster(target) == target) and (not(isInParty(cid)) or config.partycount ~= true) then if not tonumber(getPlayerStorageValue(cid, storages.name)) and getCreatureName(target):lower() == string.lower(getPlayerStorageValue(cid, storages.name)) then setPlayerStorageValue(cid, storages.count, aa) if getPlayerStorageValue(cid, storages.count) == getPlayerStorageValue(cid, storages.maxcount) then doPlayerSendTextMessage(cid, 19, "You finished your task.") elseif getPlayerStorageValue(cid, storages.count) < getPlayerStorageValue(cid, storages.maxcount) then doPlayerSendTextMessage(cid, 20, "Killed ".. getCreatureName(target) .."s [".. getPlayerStorageValue(cid, storages.count) .."/".. getPlayerStorageValue(cid, storages.maxcount) .."].") end end elseif isMonster(target) and (type(getCreatureMaster(target)) == 'nil' or getCreatureMaster(target) == target) and isInParty(cid) and config.partycount == true then leader = getPartyLeader(cid) party = getPartyMembers(leader) for i = 1, #party do pid = party[i] if getDistanceBetween(getThingPos(target), getThingPos(pid)) < config.killdistance then if getPlayerStorageValue(pid, storages.maxcount) > 3 then if not tonumber(getPlayerStorageValue(cid, storages.name)) and getCreatureName(target):lower() == string.lower(getPlayerStorageValue(pid, storages.name)) then setPlayerStorageValue(pid, storages.count, getPlayerStorageValue(pid, storages.count)+1) if getPlayerStorageValue(pid, storages.count) == getPlayerStorageValue(pid, storages.maxcount) then doPlayerSendTextMessage(pid, 19, "You finished your task.") elseif getPlayerStorageValue(pid, storages.count) < getPlayerStorageValue(pid, storages.maxcount) then doPlayerSendTextMessage(pid, 20, "Killed ".. getCreatureName(target) .."s [".. getPlayerStorageValue(pid, storages.count) .."/".. getPlayerStorageValue(pid, storages.maxcount) .."].") end end end end end end return true end

é pq a exp está tudo configurada como 0 na lib

Parabéns, seu tópico de conteúdo foi aprovado! Muito obrigado pela sua contribuição, nós do Tibia King agradecemos. Seu conteúdo com certeza ajudará à muitos outros, você recebeu +1 REP.

nome do seu script.lua function HaveCreatureFromArea(area) for x = area[1].x - 1, area[2].x + 1 do for y = area[1].y - 1, area[2].y + 1 do local pos = {x=x, y=y, z=area[1].z} local m = getTopCreature(pos).uid if m ~= 0 and isMonster(m) then doRemoveCreature(m) end end end end function onStepIn(cid, item, position, fromPosition) local positions = {{x=110,y=297,z=7},{x=145,y=321,z=7}} -- area total começo e final HaveCreatureFromArea(positions) return true end TAG <movevent type="StepIn" actionid="46897" event="script" value="nome do seu script.lua"/> ai no colocar no aid do tile = 46897

você tem que adaptar no seu código né, eu só fiz a função...

function HaveCreatureFromArea(area) for x = area[1].x - 1, area[2].x + 1 do for y = area[1].y - 1, area[2].y + 1 do local pos = {x=x, y=y, z=area[1].z} local m = getTopCreature(pos).uid if m ~= 0 and isMonster(m) then doRemoveCreature(m) end end end end local positions = {{x=110,y=297,z=7},{x=145,y=321,z=7}} -- area começo e final HaveCreatureFromArea(positions)

que estranho dar esse erro. registerCreatureEvent(cid,"tasksystem") if tonumber(getPlayerStorageValue(cid, 95673)) and getPlayerStorageValue(cid, 95673) < 0 then setPlayerStorageValue(cid, 95673, 0) end if tonumber(getPlayerStorageValue(cid, 95674)) and getPlayerStorageValue(cid, 95674) < 0 then setPlayerStorageValue(cid, 95674, 0) end

Qual erro dá? e coloca o script

@Skydangerous Testei aqui e funcionou 100% Eu tinha feito uma versão para 8.7 quando saiu as mounts... kkk

Esta é uma mensagem automática! Este tópico foi movido para a área correta. Pedimos que você leia as regras do fórum.

--[[ Gems System By Maxwell Denisson(MaXwEllDeN) V 1.0 --]] function onThink(cid) if not isCreature(cid) then return LUA_ERROR end local gemid = getPlayerStorageValue(cid, 71473) if (getPlayerStorageValue(cid, 45783) > 0) and (checkGemTimeFinish(cid, gemid)) then deAtiveGem(cid, gemid) doRemoveCondition(cid, CONDITION_ATTRIBUTES) end return true end function onLogin(cid) local gemid = getPlayerStorageValue(cid, 71473) if (getPlayerStorageValue(cid, 45783) > 0) and (checkGemTimeFinish(cid, gemid)) then deAtiveGem(cid, gemid) end if (gemid > 0) and (not checkGemTimeFinish(cid, gemid)) then local pedra = pedras_add[gemid] if not (pedra) then return true end local skills = pedra.skills doAddCondition(cid, pedras_add_c[gemid]) doPlayerSendTextMessage(cid, 27, "O efeito da gema mágica foi retomado.") doPlayerSetExperienceRate(cid, pedra.xp) registerCreatureEvent(cid, "EffectCheck") sendGemEffect(cid, gemid) end registerCreatureEvent(cid, "EffectDeath") return true end

Não é que o CreatureScript pesa mais, é que geralmente é o mais chamado, porque acontece ao atacar, combat, target, death, preparedeath, kill, etc... E como você falou, depende do que o código vai fazer, imagina ele fazer um loop no banco de dados para pegar todas as death's dos jogadores e fazer um rank para ver qual morreu mais? Se o servidor tiver 1k de jogadores no banco de dados e ir fazendo as contas 1 por 1, vai da um certo lagzinho.

Parabéns, seu tópico de conteúdo foi aprovado! Muito obrigado pela sua contribuição, nós do Tibia King agradecemos. Seu conteúdo com certeza ajudará à muitos outros, você recebeu +1 REP.

Pela source seria bem mais pratico, mas no caso como não sei, resolvi fazer esse método acima.

Parabéns, seu tópico de conteúdo foi aprovado! Muito obrigado pela sua contribuição, nós do Tibia King agradecemos. Seu conteúdo com certeza ajudará à muitos outros, você recebeu +1 REP.