Postado Abril 21, 2023 2 anos salve rapaziada alguem pode me ajuda a coloca pra vim mais bicho com as poerinhas da forja ? ja tentei de tudo nada . tem esses 2 codigos , mas n tenho certeza se e aki q meche . local createMonster = TalkAction("/m") function createMonster.onSay(player, words, param) if not player:getGroup():getAccess() or player:getAccountType() < ACCOUNT_TYPE_GOD then return true end -- Usage: "/m monstername, fiendish" for create a fiendish monster (/m rat, fiendish) -- Usage: "/m monstername, [1-5]" for create a influenced monster with specific level (/m rat, 2) if param == "" then player:sendCancelMessage("Monster name param required.") Spdlog.error("[createMonster.onSay] - Monster name param not found.") return false end local split = param:split(",") local monsterName = split[1] local monsterForge = nil if split[2] then split[2] = split[2]:gsub("^%s*(.-)$", "%1") --Trim left monsterForge = split[2] end -- Check dust level local setFiendish = false local setInfluenced if type(monsterForge) == "string" and monsterForge == "fiendish" then setFiendish = true end local influencedLevel if not setFiendish then influencedLevel = tonumber(monsterForge) end if influencedLevel and influencedLevel > 0 then if influencedLevel > 5 then player:sendCancelMessage("Invalid influenced level.") return false end setInfluenced = true end local position = player:getPosition() local monster = Game.createMonster(monsterName, position) if monster then monster:getPosition():sendMagicEffect(CONST_ME_TELEPORT) position:sendMagicEffect(CONST_ME_MAGIC_RED) if setFiendish then local monsterType = monster:getType() if monsterType and not monsterType:isForgeCreature() then player:sendCancelMessage("Only allowed monsters can be fiendish.") return false end monster:setFiendish(position, player) end if setInfluenced then local influencedMonster = Monster(ForgeMonster:pickInfluenced()) -- If it's reached the limit, we'll remove one to add the new one. if ForgeMonster:exceededMaxInfluencedMonsters() then if influencedMonster then Game.removeInfluencedMonster(influencedMonster:getId()) end end Game.addInfluencedMonster(monster) monster:setForgeStack(influencedLevel) end else player:sendCancelMessage("There is not enough room.") position:sendMagicEffect(CONST_ME_POFF) end return false end createMonster:separator(" ") createMonster:register() if not ForgeMonster then ForgeMonster = { timeLeftToChangeMonsters = {}, names = { [FORGE_NORMAL_MONSTER] = 'normal', [FORGE_INFLUENCED_MONSTER] = 'influenced', [FORGE_FIENDISH_MONSTER] = 'fiendish' }, chanceToAppear = { fiendish = 80, influenced = 20 }, maxFiendish = 3, eventName = 'ForgeMonster' } end function getFiendishMinutesLeft(leftTime) local secLeft = leftTime - os.time() local desc = "This monster will stay fiendish for less than" if math.floor(secLeft / 60) >= 1 then desc = desc .. " " .. math.floor(secLeft / 60) .. " minutes and" secLeft = secLeft - math.floor(secLeft / 60) * 60 end if secLeft < 60 then desc = desc .. " " .. secLeft .. " seconds." end return desc end function ForgeMonster:getTimeLeftToChangeMonster(creature) local monster = Monster(creature) if monster then local leftTime = monster:getTimeToChangeFiendish() leftTime = leftTime or 0 return getFiendishMinutesLeft(leftTime) end return 0 end function ForgeMonster:onDeath(creature, corpse, killer, mostDamageKiller, unjustified, mostDamageUnjustified) if not creature then return true end local stack = creature:getForgeStack() if stack > 0 then local party = nil if killer then if killer:isPlayer() then party = killer:getParty() elseif killer:getMaster() and killer:getMaster():isPlayer() then party = killer:getMaster():getParty() end end if party and party:isSharedExperienceEnabled() then local killers = {} local partyMembers = party:getMembers() for pid, _ in pairs(creature:getDamageMap()) do local creatureKiller = Creature(pid) if creatureKiller and creatureKiller:isPlayer() then if not isInArray(killers, creatureKiller) and isInArray(partyMembers, creatureKiller) then table.insert(killers, creatureKiller) end end end for i = 1, #killers do local playerKiller = killers[i] if playerKiller then -- Each stack can multiplied from 1x to 3x -- Example monster with 5 stack and system randomize multiplier 3x, players will receive 15x dusts local amount = math.random(stack, 3 * stack) local totalDusts = playerKiller:getForgeDusts() local limitDusts = playerKiller:getForgeDustLevel() if totalDusts < limitDusts then if totalDusts + amount > limitDusts then playerKiller:addForgeDusts(limitDusts - totalDusts) else playerKiller:addForgeDusts(amount) end local actualTotalDusts = playerKiller:getForgeDusts() playerKiller:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You received " .. amount .. " dust" .. " for the Exaltation Forge. You now have " .. actualTotalDusts .. " out of a maximum of " .. limitDusts .. " dusts.") else playerKiller:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You did not receive " .. amount .. " dust" .. " for the Exaltation Forge because you have already reached the maximum of " .. limitDusts .. " dust.") end end end else local playerKiller = nil if killer then if killer:isPlayer() then playerKiller = killer elseif killer:getMaster() and killer:getMaster():isPlayer() then playerKiller = killer:getMaster() end end if playerKiller then -- Each stack can multiplied from 1x to 3x -- Example monster with 5 stack and system randomize multiplier 3x, players will receive 15x dusts local amount = math.random(stack, 3 * stack) local totalDusts = playerKiller:getForgeDusts() local limitDusts = playerKiller:getForgeDustLevel() if totalDusts < limitDusts then if totalDusts + amount > limitDusts then playerKiller:addForgeDusts(limitDusts - totalDusts) else playerKiller:addForgeDusts(amount) end local actualTotalDusts = playerKiller:getForgeDusts() playerKiller:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You received " .. amount .. " dust" .. " for the Exaltation Forge. You now have " .. actualTotalDusts .. " out of a maximum of " .. limitDusts .. " dusts.") else playerKiller:sendTextMessage(MESSAGE_EVENT_ADVANCE, "You did not receive " .. amount .. " dust" .. " for the Exaltation Forge because you have already reached the maximum of " .. limitDusts .. " dust.") end end end end return true end function ForgeMonster:onSpawn(creature) local monster = Monster(creature) if not monster then return false end local monsterType = monster:getType() if not monsterType then return false end local pos = monster:getPosition() local tile = Tile(pos) if tile and tile:hasFlag(TILESTATE_NOLOGOUT) then return false end Game.addInfluencedMonster(monster) end function ForgeMonster:pickFiendish() for _, cid in pairs(Game.getFiendishMonsters()) do if Monster(cid) then return cid end end return 0 end function ForgeMonster:pickInfluenced() for _, cid in pairs(Game.getInfluencedMonsters()) do if Monster(cid) then return cid end end return 0 end function ForgeMonster:pickClosestFiendish(creature) local player = Player(creature) if not player then return 0 end local creatures = {} local playerPosition = player:getPosition() for _, cid in pairs(Game.getFiendishMonsters()) do if (Monster(cid)) then creatures[#creatures + 1] = {cid = cid, distance = Monster(cid):getPosition():getDistance(playerPosition)} end end if (#creatures == 0) then return false end table.sort(creatures, function(a, b) return a.distance < b.distance end) return creatures[1].cid end function ForgeMonster:exceededMaxInfluencedMonsters() local totalMonsters = 0 for _, cid in pairs(Game.getInfluencedMonsters()) do if Monster(cid) then totalMonsters = totalMonsters + 1 end end local configMaxMonsters = configManager.getNumber(configKeys.FORGE_INFLUENCED_CREATURES_LIMIT) if totalMonsters >= configMaxMonsters then return true end return false end
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.