FlavioHulk

Cara, ai é um sistema mais complexo, não posso te ajudar no momento... Alguém que veja meu script, já é um passo pra implementar da sua maneira.
 
function onLogin(cid) if getPlayerLastLoginSaved(cid) <= 0 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Seja Bem-Vindo ao X server e tenha um bom jogo") return true end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Bem-Vindo novamente, espero que esteja gostando do nosso servidor") return true end  

local config = { targetList = { [1] = 'purching bag' }, access = 3 -- Gamemaster } function onPush(cid, target) if getPlayerAccess(cid) >= config.access then return true end if target == cid or not isPlayer(target) then return true end if (getCreatureTarget(target) > 0 and isInArray(config.targetList, getCreatureName(getCreatureTarget(target)):lower())) then doPlayerSendCancel(cid, "You cannot move this player.") return false end return true end  

local chest = { [8049] = { name = '[Event] BOX', container = 1738, items = { [1] = { chance = 100, itemId = 2160, amountMax = 10 } } } } function onUse(cid, item, frompos, item2, topos) local tmpConfig = chest[item.actionid] if not tmpConfig then return true end local container, str = doPlayerAddItem(cid, tmpConfig.container, 1), 'BackPack from '.. tmpConfig.name ..', Your Rewards:\n' for i = 1, #tmpConfig.items do local items = tmpConfig.items[i] if items.chance >= math.random(1, 100) then local amountRandom = math.random(1, items.amountMax) str = str .. amountRandom .. ' ' .. getItemNameById(items.itemId) .. ' '..(i ~= #tmpConfig.items and ', ' or '.') doAddContainerItem(container, items.itemId, amountRandom) else return true end end doSendMagicEffect(getPlayerPosition(cid), math.random(28, 30)) doRemoveItem(item.uid, 1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,'You have found a '.. str) return true end Puts, erro meu! Não havia reparado, mas tudo bem, vida que segue... @KotZletY @Vodkart marcação aleatória, só saudades

local config = { cooldown = 20, -- tempo entre uma magia e outra duration = 10, --- duração storage = 3482101, effect = 34 --- efeito que vai sair } function onCastSpell(cid, var) if os.time() - getPlayerStorageValue(cid, 55695) >= config.cooldown then setPlayerStorageValue(cid, 55695, os.time()) for i = 1, config.duration do addEvent(function(cid, effect) if not isCreature(cid) then return false end local pos = {x=getPlayerPosition(cid).x+2, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z} doSendMagicEffect(pos, effect) end, 1000 * i, cid, config.effect) end doPlayerSendTextMessage(cid, 27, "Seu kaiten vai durar ".. config.duration .." segundos.") setPlayerStorageValue(cid, config.storage, os.time() + config.duration) else doPlayerSendChannelMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Voce tem que esperar "..(config.cooldown - (os.time() - getPlayerStorageValue(cid, 55695))).." segundos para usar novamente.", TALKTYPE_CHANNEL_O, CHANNEL_SPELL) return false end return true end  

Virus Total Scan
Monsters.rar

local skillids = { ["shielding"] = 5, ["sword"] = 2, ["axe"] = 3, ["club"] = 1, ["distance"] = 4, ["fishing"] = 6, ["fist"] = 0, } function onSay(cid, words, param) if not (L_LvlPoints.vocPoints[getPlayerVocation(cid)]) then return false end local param = param:lower() local p2 = string.explode(param, ",") if (getPlayerStorageValue(cid, 14574) < 0) then setPlayerStorageValue(cid, 14574, 0) end if (param == "check") then doPlayerPopupFYI(cid, "~*~*~ Level Points System by MaXwEllDeN ~*~*~\n\nPontos disponíveis: ".. getPlayerStorageValue(cid, 14574) .."\nPontos por level: ".. L_LvlPoints.vocPoints[getPlayerVocation(cid)]) elseif (p2[1] and p2[1] == "add") and (L_LvlPoints.attributes[p2[2]]) and (tonumber(p2[3])) then if getCreatureCondition(cid, CONDITION_ATTRIBUTES) then doPlayerSendCancel(cid, "Você não pode usar esse comando enquanto está com buff.") return doSendMagicEffect(getThingPos(cid), 2) end if (getPlayerStorageValue(cid, 14574) < tonumber(p2[3]) * L_LvlPoints.attributes[p2[2]].np) then doPlayerSendCancel(cid, "Você não tem pontos suficientes para distribuir!") return doSendMagicEffect(getThingPos(cid), 2) end if (p2[2] == "hp") then setCreatureMaxHealth(cid, getCreatureMaxHealth(cid) + L_LvlPoints.attributes[p2[2]].vl * tonumber(p2[3])) doCreatureAddHealth(cid, L_LvlPoints.attributes[p2[2]].vl * tonumber(p2[3])) elseif (p2[2] == "mp") then setCreatureMaxMana(cid, getCreatureMaxMana(cid) + L_LvlPoints.attributes[p2[2]].vl * tonumber(p2[3])) doCreatureAddMana(cid, L_LvlPoints.attributes[p2[2]].vl * tonumber(p2[3])) elseif (p2[2] == "magic") then doPlayerAddMagLevel(cid, 1) elseif(skillids[p2[2]]) then for a = 1, tonumber(p2[3]) do doPlayerAddSkillTry(cid, skillids[p2[2]], getPlayerRequiredSkillTries(cid, skillids[p2[2]], getPlayerSkillLevel(cid, skillids[p2[2]]) + 1) - getPlayerSkillTries(cid, skillids[p2[2]]), false) end end doSendMagicEffect(getThingPos(cid), 29) doSendMagicEffect(getThingPos(cid), 30) doSendAnimatedText(getThingPos(cid), "-" .. tonumber(p2[3]) * L_LvlPoints.attributes[p2[2]].np, 180) setPlayerStorageValue(cid, 14574, getPlayerStorageValue(cid, 14574) - tonumber(p2[3]) * L_LvlPoints.attributes[p2[2]].np) else local msgx = "" for i, v in pairs(L_LvlPoints.attributes) do local add = (v.np > 1) and "s" or "" msgx = msgx .. string.upper(i:sub(1,1)) .. i:sub(2, #i) .. " - ".. v.np .. " ponto".. add .. " ~ " .. v.vl .. " ".. v.nm .. "\n" end doPlayerPopupFYI(cid, "~*~*~ Level Points System by MaXwEllDeN ~*~*~\n\nPontos necessários para aumentar os stats:\n\n".. msgx .. "\nExemplo de uso: ".. words .." add, vitalidade, 5\n\nPontos disponíveis: ".. getPlayerStorageValue(cid, 14574)) end return true end  

1 - Procure uma aba escrito SQL
2 - Cole o comando na área
3 - Execute o comando, e enjoy !

local conditions = { CONDITION_ATTRIBUTES, CONDITION_FREEZING, CONDITION_DAZZLED, CONDITION_CURSED, CONDITION_REGENERATION, CONDITION_DRUNK, CONDITION_OUTFIT, CONDITION_INVISIBLE, CONDITION_LIGHT, CONDITION_MANASHIELD, CONDITION_POISON, CONDITION_FIRE, CONDITION_ENERGY, CONDITION_PHYSICAL, CONDITION_HASTE, CONDITION_PARALYZE } local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HEALING) setCombatParam(combat, COMBAT_PARAM_EFFECT, 49) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) setHealingFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 5, 5, 29.5, 36.5) function onCastSpell(cid, var) for i = 1, #conditions do local types = conditions[i] doRemoveCondition(cid, types) end return doCombat(cid, combat, var) end  

Dá uma olhada em data/events/creature.lua, provalvemente haverá uma função igual a essa abaixo:
if ADVANCED_SECURE_MODE ~= 0 then if self:isPlayer() and target:isPlayer() then if self:hasSecureMode() then return RETURNVALUE_YOUMAYNOTATTACKTHISPLAYER end end end Basta comentar ela, e me retorna se funcionou...

local config, players = { actionId = 1225, -- Action ID da quest. healthLose = 50, -- Quantidade de life perdido a cada clique. healthTotal = 300, -- Quantidade a ser alcançada de life. reward = { [1] = {itemId = 2160, amount = 100} -- Recompensa itemId e quantidade }, globalStorage = 52220, -- Storage global storagePlayer = 52221, -- Storage do player storageTime = 52222, -- Storage do Tempo time = 10 -- Tempo em segundos }, {} function onUse(player, item, fromPosition, target, toPosition, isHotkey) if item.actionid ~= config.actionId then return false end if Game.getStorageValue(config.globalStorage) > 0 then player:sendCancelMessage('The daily quest has already been made.') return true end if player:getStorageValue(config.storagePlayer) > 0 then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'The chest is empty.') return true end local difference = config.healthLose player:addHealth( - difference) if player:getExhaustion(config.storageTime) <= 0 then if players[player:getId()] then players[player:getId()] = nil player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'Your sacrifice was reseted.') end player:setExhaustion(config.storageTime, config.time) end players[player:getId()] = ((players[player:getId()] == nil and 0 or players[player:getId()]) + config.healthLose) if players[player:getId()] == config.healthTotal then if not player then return false end for i = 1, #config.reward do local rewards = config.reward[i] player:addItem(rewards.itemId, rewards.amount) end Game.setStorageValue(config.globalStorage, 1) player:setStorageValue(config.storagePlayer, 1) player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'You did the quest.') for k in pairs(players) do players[k] = nil end end return true end Cara, testei totalmente esse script, e funciona como deveria.. Lembra-se de não dar reload no script, senão a tabela irá resetar !

local bixos = {"Jack Sparrow", "Catatau", "Belmont's Revenge"} local positions = {{x = 386, y = 154, z = 7}, {x = 388, y = 154, z = 7}, {x = 390, y = 154, z = 7}} -- Posicao q os bixos nascem local price = 1 -- Preco para jogar local cassinoCoin = 6527 function onUse(cid, item, fromPosition, itemEx, toPosition) local first = math.random(1, #bixos) local second = math.random(1, #bixos) local third = math.random(1, #bixos) local tab = {} local recheck = 0 if getGlobalStorageValue(82192) > os.time() then doPlayerSendCancel(cid, "Aguarde um pouco para apostar.") return true end if getPlayerItemCount(cid, cassinoCoin) < 1 then doPlayerSendCancel(cid, "Você precisa de " .. price .. " " .. getItemNameById(cassinoCoin) .." para jogar.") return true end setGlobalStorageValue(82192, os.time() + 6) for i = 1, (#positions) do doSendMagicEffect(positions, 37) end doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) doPlayerRemoveItem(cid, cassinoCoin, price) doCreateMonster(bixos[first], positions[1]) doSendMagicEffect(positions[1], 26) addEvent(doSendMagicEffect, 100, positions[1], 37) table.insert(tab, first) setGlobalStorageValue(bixos[first], getGlobalStorageValue(bixos[first])+1) addEvent(function() doCreateMonster(bixos[second], positions[2]) doSendMagicEffect(positions[2], 26) addEvent(doSendMagicEffect, 100, positions[2], 37) table.insert(tab, second) end, 1700) addEvent(function() doCreateMonster(bixos[third], positions[3]) doSendMagicEffect(positions[3], 26) addEvent(doSendMagicEffect, 100, positions[3], 37) setGlobalStorageValue(bixos[third], getGlobalStorageValue(bixos[third])+1) table.insert(tab, third) end, 2000) addEvent(function() doRemoveCreature(getTopCreature(positions[1]).uid) doRemoveCreature(getTopCreature(positions[2]).uid) doRemoveCreature(getTopCreature(positions[3]).uid) doSendMagicEffect(positions[1], 61) doSendMagicEffect(positions[2], 61) doSendMagicEffect(positions[3], 61) if tab[1] == tab[2] and tab[1] == tab[3] then doPlayerAddItem(cid, cassinoCoin, 10) doSendAnimatedText(getThingPos(cid), "VOCE", 25) addEvent(doSendAnimatedText, 800, getThingPos(cid), "GANHOU", 25) addEvent(doSendAnimatedText, 1600, getThingPos(cid), "30", 25) addEvent(doSendAnimatedText, 3000, getThingPos(cid), "EVENTCOINS", 25) doSendMagicEffect(getThingPos(cid), 30) doSendMagicEffect(positions[1], 30) doSendMagicEffect(positions[2], 30) doSendMagicEffect(positions[3], 30) addEvent(doSendMagicEffect, 800, getThingPos(cid), 29) addEvent(doSendMagicEffect, 800, positions[1], 29) addEvent(doSendMagicEffect, 800, positions[2], 29) addEvent(doSendMagicEffect, 800, positions[3], 29) addEvent(doSendMagicEffect, 1600, getThingPos(cid), 28) addEvent(doSendMagicEffect, 1600, positions[1], 28) addEvent(doSendMagicEffect, 1600, positions[2], 28) addEvent(doSendMagicEffect, 1600, positions[3], 28) else doSendAnimatedText(getThingPos(cid), "VOCE", 200) addEvent(doSendAnimatedText, 800, getThingPos(cid), "PERDEU", 200) addEvent(doSendAnimatedText, 1600, getThingPos(cid), "HAHA", 200) end end, 4200) return true end  

local config = { pos = {x = 1034, y = 1028, z = 7}, lever = {x = 1034, y = 1019, z = 7, stackpos = 1}, pos1 = {x = 1034, y = 1020, z = 7, stackpos = 253} } function onUse(cid, item, fromPosition, itemEx, toPosition) local lever1pos, player1pos = getThingFromPos(config.lever), getThingFromPos(config.pos1) if item.itemid ~= 1945 then doPlayerSendTextMessage(cid, 25, "Alguem ja esta fazendo a quest.") doSendMagicEffect(getCreaturePosition(cid), 2) return true end if player1pos.itemid < 1 then doPlayerSendTextMessage(cid, 25, "Voce nao esta na posicao correta.") doSendMagicEffect(getCreaturePosition(cid), 2) return true end if getPlayerItemCount(cid, 12661) < 1 then doPlayerSendTextMessage(cid, 25, "Voce nao tem o Token.") doSendMagicEffect(getCreaturePosition(cid), 2) return true end doPlayerRemoveItem(cid, 12661, 1) doTeleportThing(cid, config.pos) doTransformItem(item.uid, item.itemid + 1) addEvent (function() doTransformItem(getThingfromPos(toPosition).uid, 1945) end, 20 * 1000) return true end Obs,: Não manjo de 0.4 haha, testa aê!

<item fromid="179" toid="180" article="a" name="muralha wall" /> <item id="181" article="a" name="muralha pillar" /> <item id="12468" article="a" name="[Donate] BaiakME Doll"> <attribute key="description" value="Use o Item Para Ganhar o [DONATE] BaiakME Outfit." /> <attribute key="weight" value="50" /> </item>  

local combat = Combat() combat:setParameter(COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) combat:setParameter(COMBAT_PARAM_BLOCKARMOR, true) combat:setParameter(COMBAT_PARAM_BLOCKSHIELD, true) combat:setFormula(COMBAT_FORMULA_SKILL, 0, 0, 1, 0) function onUseWeapon(player, variant) local target = player:getTarget() target:say('Cure me irmaos!', TALKTYPE_MONSTER_SAY) return true end  

local config = { playerPositions = { Position(1067, 55, 15), Position(1068, 55, 15), Position(1069, 55, 15) }, newPositions = { Position(932, 186, 15), Position(943, 186, 15), Position(954, 186, 15) }, } function onUse(player, item, fromPosition, target, toPosition, isHotkey) if item.itemid == 1945 then local storePlayers, playerTile = {} for i = 1, #config.playerPositions do playerTile = Tile(config.playerPositions[i]):getTopCreature() if not playerTile or not playerTile:isPlayer() then player:sendTextMessage(MESSAGE_STATUS_SMALL, "You need 4 players.") return true end storePlayers[#storePlayers + 1] = playerTile end local players for i = 1, #storePlayers do players = storePlayers[i] players:teleportTo(config.newPositions[i]) config.newPositions[i]:sendMagicEffect(CONST_ME_BLOCKHIT) end end item:transform(item.itemid == 1946 and 1945 or 1946) return true end function onUse(player, item, fromPosition, target, toPosition, isHotkey) if item.uid ~= 60145 then return false end if player:getStorageValue(60145) > 0 then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'Voce já recebeu seu item.') return true end player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'mensagem!') player:addItem(14332, 1) player:setStorageValue(60145, 1) return true end  

function onUse(player, item, fromPosition, target, toPosition, isHotkey) if player:getLevel < 20 then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'Infelizmente você não passou para o próximo nível.') return true end player:sendTextMessage(MESSAGE_EVENT_ADVANCE, 'Você acaba de passar para o próximo nível.') player:teleportTo(Position(1214, 1245, 5)) -- Posição para onde o player será teleportado... X,Y,Z return true end  

doDecayItem(uid) Utiliza essa função, onde você cria um item temporário, utilizando talvez o doCreateItem, seta o decayItem, e após entrega o item ao player...
 
local key = doCreateItemEx(2091, 1) doPlayerAddItemEx(cid, key, true) doDecayItem(key)  

local config = { lvl_min = 60 } function onUse(player, item, fromPosition, target, toPosition, isHotkey) if item.uid ~= 16049 then return false end if player:getStorageValue(16049) > 0 then player:sendTextMessage(MESSAGE_EVENT_ADVANCE, "Você já pegou o pertence!") return true end if player:getLevel() < config.lvl_min then player:sendCancelMessage("Você não tem experiencia suficiente para pegar este item. Voltei quando estiver no mínimo nível ".. lvl_min ..".") return true end if player:getCondition(CONDITION_INFIGHT, CONDITIONID_DEFAULT) or player:isPzLocked() then player:sendCancelMessage('Você precisa estar sem battle.') return true end player:sendTextMessage(MESSAGE_EVENT_ADVANCE, "Você achou uma piece of archer armor!") player:addItem(12439, 1) item:getPosition():sendMagicEffect(CONST_ME_MAGIC_BLUE) player:setStorageValue(16049, 1) return true end  

local config = { {chance = {from = 0, to = 30.5}, itemId = 123, count = 2}, {chance = {from = 30.5, to = 60}, itemId = 123, count = 2}, {chance = {from = 60, to = 100}, itemId = 123, count = 2}, } function onUse(cid, item) if getPlayerStorageValue(cid, STORAGE) > 0 then doRemoveItem(item.uid, 1) doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Você já recebeu seu prêmio.") return false end local chance = math.random(0, 10000) / 100 for i = 1, #config do local reward = config[i] if chance >= reward.chance.from and chance < reward.chance.to then doPlayerAddItem(cid, reward.itemId, reward.count) doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "Você encontrou ".. reward.count .." ".. reward.itemId .. ".") setPlayerStorageValue(cid, STORAGE, 1) doSendMagicEffect(getThingPos(cid), 13) doRemoveItem(item.uid, 1) end end return true end  

local items = { [9306] = {value = SKILL_SWORD}, [1449] = {value = SKILL_AXE}, [8834] = {value = SKILL_MAGLEVEL}, [8616] = {value = SKILL_CLUB}, [3739] = {value = SKILL_DISTANCE} } function onUse(cid, item, fromPosition, itemEx, toPosition) local item = items[item.itemid] if not item then return false end if not vip.hasVip(cid) then doPlayerSendCancel(cid, 'You need be a vip account.') return true end setPlayerStorageValue(cid, 62669, item.value) doRemoveCreature(cid) return true end  

remove essa linha
doItemSetAttribute(itemEx.uid,'name', getItemNameById(itemEx.itemid)..' +'..(level+1))  

Não entendi bem esse "na hora" kkkkk, eu faço a longo prazo

Mas tá aí, cara haha
local ITEM_IDS = { [11693] = 11682, [11682] = 11693, [11687] = 11695, [11695] = 11687, [11691] = 11680, [11680] = 11691, [11692] = 11681, [11681] = 11692, [11690] = 11679, [11679] = 11690, [11688] = 11696, [11696] = 11688, [11689] = 11697, [11697] = 11689, [11686] = 11694, [11694] = 11686 } function onUse(cid, item, fromPosition, itemEx, toPosition) if not ITEM_IDS[item.itemid] then return false end if fromPosition.x == CONTAINER_POSITION then doPlayerSendCancel(cid, "Put the item on the floor first.") return true end doTransformItem(item.uid, ITEM_IDS[item.itemid]) doDecayItem(item.uid) doSendMagicEffect(getCreaturePosition(cid), CONST_ME_MAGIC_BLUE) return true end

Tentei kk, não manjo de 0.4 kk
local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, true) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED) local condition = createConditionObject(CONDITION_PARALYZE) setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) setConditionFormula(condition, -0.9, 0, -0.9, 0) setCombatCondition(combat, condition) function onCastSpell(cid, var) setPlayerStorageValue(cid, 12019, 1) addEvent(function(id) if not isPlayer(id) then return end setPlayerStorageValue(id, 12019, -1) end, 500, cid) return doCombat(cid, combat, var) end  

local storage = 502154 function onSay(player, words, param) if player:getExhaustion(storage) > 0 then player:sendCancelMessage(RETURNVALUE_YOUAREEXHAUSTED) return false end if player:stopLiveCast(param) then player:setExhaustion(storage, 5) player:sendTextMessage(MESSAGE_INFO_DESCR, "You have stopped casting your gameplay.") else player:sendCancelMessage("You're not casting your gameplay.") end return false end  

Clica com o botão direito em forgottenserver e vai em propriedades... E depois vai em linker, includes e adicione a pasta pugin