Mateus Robeerto

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function lowerTable(table) local lowerCaseTable = {} for key, value in pairs(table) do lowerCaseTable[key:lower()] = value end retur

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if (not npcHandler:isFocused(cid)) then return false end if getPlayerStorageValue(cid, 100

local rewards = { {itemid = 2160, count = 300}, {itemid = 2383, count = 1}, {itemid = 2390, count = 1}, {itemid = 10518, count = 1}, {itemid = 2471, count = 1}, {itemid = 2646, count = 1}, {itemid = 2469, count = 1}, {itemid = 2523, count = 1}, {itemid = 2494, count = 1}, {itemid = 8926, count = 1}, {itemid = 7431, count = 1}, {itemid = 7368, count = 1}, {itemid = 8910, count = 1}, {itemid = 2789, count = 100} } function onUse(cid, item, frompos, item2, topos) if item.uid == 1664 then

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) function lowerTable(tabela) -- by vodkart local tab = {} for var, ret in pairs(tabela) do

Ok, muito obrigado. Vou atualizar o post fixo. Não há commit pelo GitHub. Apenas baixei o TFS 1.5 7.72, peguei alguns códigos e coloquei no 8.6 e compilei de boa... Mas não é difícil, foi menos de 5 minutos. :)

Olá Luciano, eu tinha esquecido desse commit da Sarah. Obrigado! Vou atualizar o post fixo com este link... heheh

local damageTable = { {4, -3}, {9, -2}, {20, -1} } local function createExplosion() local explosion = createConditionObject(CONDITION_FIRE) setConditionParam(explosion, CONDITION_PARAM_DELAYED, 1) for i = 1, #damageTable do local t = damageTable[i] addDamageCondition(explosion, t[1], 1000, t[2]) -- tempo end return explosion end local function explodeCreature(creature) if isCreature(creature) then local explosion = createExplosion() local area = createCombatArea({{1, 1, 1}}) doAreaCombatHealth(creature, 1, getThing

Serve sim, basta entrar no meu perfil e você verá que está escrito 'TFS 1.5 8.6'. Ao entrar, baixe apenas a source ou executável teste o servidor do Luciano. Depois, você deve baixar o arquivo 'mount.xml' e enviá-lo para o Luciano. No OTClient, ative via feature e teste. Pronto!

Depende do seu gosto... Se for Znote ou MyAcc, é melhor para UniServer. Se for Gesior limpo, é melhor para a antiga versão do XAMPP 7.x. Particularmente, prefiro Gesior com XAMPP... Já estou satisfeito. espero ter ajudado!

Estou usando o Windows 11 e o executável é de 64 bits, mas estou usando uma versão antiga do XAMPP 7.x. Eu acredito que esteja faltando alguns DLLs no seu computador. Isso já aconteceu comigo quando formatei o meu computador e tentei abrir o executável e o OTClient, mas nada aconteceu. Eu resolvi o problema baixando um programa que automaticamente detecta DLLs corrompidas ou ausentes e as substitui por versões novas. Após usar esse programa, o cliente abriu normalmente e o executável do servidor tambem. https://www.baixesoft.com/download/all-in-one-runtimes

Bom dia! Você resolveu o problema? Qual arquivo você está usando, config.lua.dist ou config.lua? Se for 'dist', basta remover 'dist' e deixar apenas config.lua. Assim, ele abrirá normalmente.

function onLogin(cid) local playerStorageValue = getPlayerStorageValue(cid, 848484) local mlBuffLevel = 0 if playerStorageValue >= 0 and playerStorageValue < 5 then mlBuffLevel = 1 elseif playerStorageValue >= 5 and playerStorageValue < 15 then mlBuffLevel = 2 elseif playerStorageValue >= 15 then mlBuffLevel = 3 end doPlayerAddManaSpent(cid, mlBuffLevel) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você recebeu um buff de Magic Level: " .. mlBuffLevel) end Será que é parecido assim?

Você só abriu o executável e mais nada, certo? Não instalou o XAMPP? Apenas o que apareceu de erro? Diz que está faltando DLLs? Essa parada do Erro 0xc0000017?

local MAX_PLAYERS_IN_ROOM = 10 local STORAGE_COUNT_KEY = 85565 function onStepIn(cid, item, position, fromPosition) local playerCount = getPlayerStorageValue(cid, STORAGE_COUNT_KEY) or 0 if playerCount < MAX_PLAYERS_IN_ROOM then setPlayerStorageValue(cid, STORAGE_COUNT_KEY, playerCount + 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bem-vindo à sala!") return true else doPlayerSendCancel(cid, "A sala está cheia. Você não pode entrar.") return false end end function onStepOut(cid, item, position, fromPosition) lo

local MAX_PLAYERS_IN_ROOM = 10 local STORAGE_COUNT_KEY = 85565 function onStepIn(cid, item, position, fromPosition) local playerCount = getStorageValue(STORAGE_COUNT_KEY) or 0 if playerCount < MAX_PLAYERS_IN_ROOM then setStorageValue(STORAGE_COUNT_KEY, playerCount + 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bem-vindo à sala!") return true else doPlayerSendCancel(cid, "A sala está cheia. Você não pode entrar.") return false end end function onStepOut(cid, item, position, fromPosition) local playerCount = getS

Para aqueles que estão interessados em adotar a base do Nekiro, gostaria de anunciar que as montarias e a modal widow agora estão disponíveis. Se você deseja implementar sistemas como o de crafting com modal e outros recursos, sinta-se à vontade para fazer o download e testar. É importante observar que o Nekiro não incluiu mapas nesta versão. Portanto, será necessário migrar seus próprios mapas para o TFS 1.5 8.6. Alternativamente, você pode considerar utilizar a base do Luciano, conhecida como STYLLER OT. Após realizar testes, posso confirmar que essa é uma opção bastante interessante. E

local msgs = {"use ", ""} function doAlertReady(cid, id, movename, n, cd) if not isCreature(cid) then 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 strin

Vamos la: Abra seu phpmyadmin, selecione sua DB, vá em sql e execute o comando: ALTER TABLE `players` ADD `description` VARCHAR(255) NOT NULL DEFAULT '0'; Vá em data/npc/lib crie npc_resets.lua e adicione: --[[Script made 100% by Nogard, Night Wolf and Linus. You can feel free to edit anything you want, but don't remove the credits]] config = { minlevel = 150, --- Level inical para resetar price = 10000, --- Preço inicial para resetar newlevel = 20, --- Level após reset priceByReset = 0, --- Preço acrescentado por reset percent = 30, ---- Porcentagem da vida/mana que vo

local config = { p_time = 3600, } local function givePoints(cid, quant) if getCreatureStorage(cid, 5551) == 1 then if os.time() - getCreatureStorage(cid, 1219) >= config.p_time then doPlayerSendTextMessage(cid, 19, "[ONLINE BONUS] --> Por completar uma hora online você ganhou um Baiak Coin. Seu temporizador foi zerado.") doPlayerAddItem(cid, 6527, 1) doCreatureSetStorage(cid, 1219, 0) doCreatureSetStorage(cid, 1219, os.time()) end else doPlayerSendTextMessage(cid, 19, "Desculpe, você não é elegível para

É possível sim, mas não se preocupe, está aqui pronto para usar. Os sprites são do 13x que foi downgrage para o 8.6 e ainda estão junto com os items.otb e XML. Fique à vontade para usar, aproveite. Na verdade, peguei o link do cara lá da Otland. https://mega.nz/folder/5FQEnT4R#pAbmAAhpBhmcP1jaVkXm8Q Você precisa usar o programa ObjectBuilder na versão mais recente, ele está disponível aqui também. https://github.com/punkice3407/ObjectBuilder/releases/tag/v0.5.5 Espero ter ajudado. Não se esqueça de marcar como solução e deixar uma reputação positiva. Te

local ItemID = 1964 -- ID do papel function PremmyPoints(item) local points = getItemAttribute(item, "points") if points then return tonumber(points) else return 0 end end function Success(fromplayer, toplayer, points) if getPlayerItemCount(toplayer, ItemID) >= 1 and getAccountPointsTrade(fromplayer) >= points then doAccountRemovePointsTrade(fromplayer, points) doPlayerRemoveItem(toplayer, ItemID, 1) doAccountAddPointsTrade(toplayer, points) doPlayerSendTextMessage(toplayer, MESSAGE_STATUS_WARNING, "Transfer successful

Basta dar uma olhada em 'lib/compat/compat.lua'. Lá você encontrará todas as informações sobre as funções. Foi assim que aprendi muito e consegui converter um script do TFS 0.4 para as versões mais recentes do TFS 1x. aqui exemplo: function onUse(cid, item, fromPosition, itemEx, toPosition) local player = Player(cid) -- Obtém o jogador com base no ID passado para a função if player then local itemID = 1234 -- Substitua pelo ID do item que deseja adicionar local quantidade = 1 -- Substitua pela quantidade desejada if player:addItem(i

local npcName = "Mercador Vip" local npc_refiller = Action() function npc_refiller.onUse(player, item, fromPosition, target, toPosition, isHotkey) local spawnPosition = player:getPosition() local npcCode = Game.createNpc(npcName, spawnPosition) if npcCode then local despawnTime = 2 * 60 * 1000 addEvent(removeNpc, despawnTime, npcName) end return true end function removeNpc(npcName) local npcTarget = Npc(npcName) if npcTarget then npcTarget:remove() end end npc_refiller:id(10227) npc_refiller:register()

data/globalevents/efeitos/tps.lua .... Quer saber sobre o XAMPP? É correto usar o XAMPP mais antigo, o 7.x, como o 'xampp-windows-x64-7.4.29-1-VC15-installer', pois é mais compatível apenas com o GESIOR ACC.

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_BLOCKARMOR, 1) setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_LIFEDRAIN) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1, -10, -1, -20, 5, 5, 1.4, 2.1) local area = createCombatArea(AREA_CIRCLE3X3) setCombatArea(combat, area) function onCastSpell(cid, var) local pos = getCreaturePosition(cid) local creatures = getSpectators(pos, 3, 3, false) if creatures then local validTargets = {} for _, target in ipairs(creatu