Skymagnum

se as voc promo forem 5,6,7,8 use este: function onSay(cid, words, param) local str = "" str = "--[ Jogadores que tem promotion no servidor ]--\n\n" local qry = db.getResult("SELECT `player_id` FROM `players` WHERE `vocation` > 4 ORDER BY `level` DESC;") if (qry:getID() ~= -1) then while true do str = str .. "\n " ..getPlayerNameByGUID(qry:getDataString("player_id")) .. "." if not(qry:next()) then break end end qry:free() end doPlayerSendTextMessage(cid, 27, str) return true end se forem 8 pra cima use este: function onSay(cid, words, param) local str = "" str = "--[ Jogadores que tem promotion no servidor ]--\n\n" local qry = db.getResult("SELECT `player_id` FROM `players` WHERE `vocation` > 8 ORDER BY `level` DESC;") if (qry:getID() ~= -1) then while true do str = str .. "\n " ..getPlayerNameByGUID(qry:getDataString("player_id")) .. "." if not(qry:next()) then break end end qry:free() end doPlayerSendTextMessage(cid, 27, str) return true end

Nunca vi este erro, a conta deve estar errada mais tente aí. function onStatsChange(cid, attacker, type, combat, value) if isSummon(attacker) and getCreatureMaster(attacker) == cid and isMonster(cid) and getPlayerStorageValue(getCreatureMaster(attacker), 17823) >= 1 then if type == STATSCHANGE_HEALTHLOSS then local dano = math.floor(value/100*3) doTargetCombatHealth(attacker, cid, COMBAT_PHYSICALDAMAGE, -dano, -dano, CONST_ME_NONE) doPlayerSendTextMessage(getCreatureMaster(attacker), MESSAGE_STATUS_CONSOLE_ORANGE, "Your's ".. getCreatureName(attacker) .." deals ".. dano .." damage to " .. getCreatureName(cid) .. ".") end end return true end tu registro certin tudo? acho que quando se trata de mostro não tem que registar o evento na xml dele sla.

n entendi mto bem issaé mais amanha vejo com mais calma agora to cansado p/ pora

Spell Atualizada: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 36) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, 3) setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 5, 5, 3.5, 7) local area = createCombatArea(AREA_BEAM5) setCombatArea(combat, area) function onCastSpell(cid, var) local helmetId = 2471 -- id do helmet if getPlayerSlotItem(cid, CONST_SLOT_HEAD).itemid ~= helmetId then doPlayerSendCancel(cid, "Sorry, to cast this spell you need equip the " .. getItemNameById(helmetId) .. ".") return true or false end return doCombat(cid, combat, var) end

a terra n vai sumi

apareceria 354(terra) em todos tiles?.

putz n vou conseguir dormir hoje poh kra toma maruCUgina

cara testei aqui fazendo pra criar parede em roda e funcionou a área não tem muitos items?

anni é homen po

s editei la so copia, dúvida sanada?.

function onUse(cid, item, frompos, item2, topos) local config = { id = 4693, id2 = 4714, id3 = 4693, id4 = 4716, id5 = 4719, id6 = 4718, id7 = 4713 } if item.uid == 1509 and item2.uid == 1510 then queststatus = getPlayerStorageValue(cid,5191) if queststatus == -1 then doPlayerSendTextMessage(cid,19,"Você ativou a armadilha!") setPlayerStorageValue(cid, 5191, 1) doSummonCreature("Orc", {x=707, y=547, z=7}) doSummonCreature("Orc", {x=706, y=547, z=7}) doSendMagicEffect(topos,14) doCreateItem(4693, 1, {x=710, y=544, z=7}) doCreateItem(4714, 1, {x=709, y=543, z=7}) doCreateItem(4714, 1, {x=709, y=544, z=7}) doCreateItem(4714, 1, {x=710, y=542, z=7}) doCreateItem(4693, 1, {x=710, y=543, z=7}) doCreateItem(4719, 1, {x=712, y=542, z=7}) doCreateItem(4716, 1, {x=712, y=541, z=7}) doCreateItem(4693, 1, {x=710, y=542, z=7}) doCreateItem(4693, 1, {x=711, y=544, z=7}) doCreateItem(4693, 1, {x=711, y=543, z=7}) doCreateItem(4693, 1, {x=711, y=542, z=7}) doCreateItem(4693, 1, {x=711, y=541, z=7}) doCreateItem(4693, 1, {x=710, y=541, z=7}) doCreateItem(4693, 1, {x=709, y=542, z=7}) doCreateItem(4713, 1, {x=709, y=543, z=7}) doCreateItem(4716, 1, {x=712, y=541, z=7}) doCreateItem(4716, 1, {x=712, y=542, z=7}) doCreateItem(4719, 1, {x=712, y=540, z=7}) doCreateItem(4718, 1, {x=708, y=543, z=7}) addEvent(doRemoveItem, 10000, config.id, 1, {x=710, y=544, z=7}) addEvent(doRemoveItem, 10000, config.id, 1, {x=710, y=543, z=7}) addEvent(doRemoveItem, 10000, config.id, 1, {x=710, y=542, z=7}) addEvent(doRemoveItem, 10000, config.id, 1, {x=711, y=544, z=7}) addEvent(doRemoveItem, 10000, config.id, 1, {x=711, y=543, z=7}) addEvent(doRemoveItem, 10000, config.id, 1, {x=711, y=542, z=7}) addEvent(doRemoveItem, 10000, config.id2, 1, {x=710, y=544, z=7}) addEvent(doRemoveItem, 10000, config.id2, 1, {x=710, y=543, z=7}) addEvent(doRemoveItem, 10000, config.id4, 1, {x=712, y=542, z=7}) addEvent(doRemoveItem, 10000, config.id4, 1, {x=712, y=541, z=7}) addEvent(doRemoveItem, 10000, config.id5, 1, {x=712, y=540, z=7}) addEvent(doRemoveItem, 10000, config.id7, 1, {x=709, y=543, z=7}) addEvent(doRemoveItem, 10000, config.id6, 1, {x=708, y=543, z=7}) else doPlayerSendTextMessage(cid,19,"Você ja ativou a armadilha.") end else doPlayerPopupFYI(cid, "O baú está trancado.") end return true end a tabela tava sem vírgulas.

Fiz duas versões teste elas:

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 36) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, 3) setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 5, 5, 3.5, 7) local area = createCombatArea(AREA_BEAM5) setCombatArea(combat, area) function onCastSpell(cid, var) local helmetId = 1234 -- id do helmet if getPlayerSlotItem(cid, CONST_SLOT_HEAD).uid ~= helmetId then doPlayerSendCancel(cid, "Sorry, to cast this spell you need equip the " .. getItemNameById(helmetId) .. ".") return true or false end return doCombat(cid, combat, var) end tag exevo tera hur

só sai o som em quem leva hit? function onStatsChange(cid, attacker, type, combat, value) if isPlayer(cid) and type == STATSCHANGE_HEALTHLOSS and getPlayerStorageValue(cid, 19191) > 0 then doCreatureExecuteTalkAction(cid, "!lifesound") end return true end

@Exura Frigo @Chamas

porquê pra 9.6 não tem os programas necessários para fazer um bom servidor se alguém liberar esses programas e as sources irá ter muitos server, mais todos tem preguiça querem tudo na mão.

so pa garanti se ele edita

a = io.open("arquivo.txt", "r") b = a:read(-1) a:close() daí tu colocar aonde vai aparece oque há no arquivo.

Só usar as funções io.open/read.

local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 buyAddons(cid, message, keywords, parameters, node) --TODO: buyAddons function in modules.lua if(not npcHandler:isFocused(cid)) then return false end local addon = parameters.addon local cost = parameters.cost local premium = (parameters.premium ~= nil and parameters.premium) if isPlayerPremiumCallback == nil or (isPlayerPremiumCallback(cid) and premium) then if doPlayerRemoveMoney(cid, cost) then doPlayerAddAddons(cid, addon) npcHandler:say('There, you are now able to use all addons!', cid) else npcHandler:say('Sorry, you do not have enough money.', cid) end else npcHandler:say('I only serve customers with premium accounts.', cid) end keywordHandler:moveUp(1) return true end local node1 = keywordHandler:addKeyword({'first addon'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you want to buy the first addons set for 1000000(1kk) gold coins?'}) node1:addChildKeyword({'yes'}, buyAddons, {addon = 1, cost = 1000000, premium = false}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, moveup = 1, text = 'Too expensive, eh?'}) local node2 = keywordHandler:addKeyword({'second addon'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Would you like to buy the second addons set for 1000000(1kk) gold coins?'}) node2:addChildKeyword({'yes'}, buyAddons, {addon = 2, cost = 1000000, premium = false}) node2:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, moveup = 1, text = 'Too expensive, eh?'}) keywordHandler:addKeyword({'addon'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'I sell the first addons set for 1000000(1kk) gold coins and the second addons set for 1000000(1kk) gold coins.'}) npcHandler:addModule(FocusModule:new())

function onUse(cid, item, fromPosition, itemEx, toPosition) doSendMagicEffect(getThingPos(cid), 16) if itemEx.itemid == 2768 then doTransformItem(itemEx.uid, 6219) doCreatureSay(cid, "Cuting the arbust.", 1) end doPlayerSendCancel(cid, "This arbust not is cutable.") return true end

Te até tem só você colocar ip de todos server da otserv list, mais o método mais fácil é pelas sources mesmo.

skills seria magia? então só ir spells.xml selecionar a spell e procurar por needpremium e colocar 0;.

Eele não perdeu, pediu para sair.