Ir para conteúdo

MaXwEllDeN

Héroi
  • Registro em

  • Última visita

Tudo que MaXwEllDeN postou

  1. Aí você teria que fazer umas modificações na source do seu servidor, seria mais complicado.
  2. local pos = {x = 160, y = 54, z = 7} -- Posição a qual o player vai ser levado function onUse(cid) doTeleportThing(cid, pos) return true end
  3. local max = 3 function onCastSpell(cid, var) if #getCreatureSummons(cid) >= max then return doPlayerSendCancel(cid, "Você tem sumons demais meu fí. Que isso!") end ----Player Status local playerpos = getPlayerPosition(cid) local cloth = getCreatureOutfit(cid) local health = getCreatureHealth(cid) local maxhp = getCreatureMaxHealth(cid) local summon = doSummonCreature("Clone", playerpos) ----Clone do Player doConvinceCreature(cid, summon) setCreatureMaxHealth(summon, maxhp) doCreatureAddHealth(summon, health) doSetCreatureOutfit(summon, cloth, -1) doSendMagicEffect(playerpos, 2) return true end
  4. Cara, isso é algo que tem que ser feito no sistema que vai rodar o servidor, porque pra compilar você tem que ter umas bibliotecas instaladas, ou seja: Se outra pessoa compilar, e você não tiver a biblioteca, o servidor não vai rodar no seu pc.
  5. local max = 3 function onCastSpell(cid, var) if #getCreatureSummons(cid) >= max then return doPlayerSendCancel(cid, "Você tem sumons demais meu fí. Que isso!") end ----Player Status local playerpos = getPlayerPosition(cid) local cloth = getCreatureOutfit(cid) local health = getCreatureHealth(cid) local maxhp = getCreatureMaxHealth(cid) local summon = doSummonCreature("Clone", playerpos) ----Clone do Player doConvinceCreature(cid, summon) setCreatureMaxHealth(summon, maxhp) doCreatureAddHealth(summon, health) doSetCreatureOutfit(summon, cloth, -1) doSendMagicEffect(playerpos, 2) return end
  6. local dirs = { [0] = {0, -1}, [1] = {1, 0}, [2] = {0, 1}, [3] = {-1, 0}, } local function push(cid, target) local dir = dirs[getCreatureLookDirection(cid)] local pos = getCreaturePosition(target) pos.x = pos.x + dir[1] pos.y = pos.y + dir[2] if doTileQueryAdd(target, pos) == RETURNVALUE_NOERROR then doTeleportThing(target, pos, true) end return true end function onTargetCreature(cid, target) if not isNpc(target) then addEvent(push, 100, cid, target) end return true end local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_FIREAREA) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -399.5, -399975, -399.5, -399975) setCombatArea(combat, createCombatArea({{3}})) setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature") local function onCastSpell1(cid, var) return isCreature(cid) and doCombat(cid, combat, var) or false end function onCastSpell(cid, var) for a = 1, 8 do addEvent(onCastSpell1, a * 100, cid, var) end return true end
  7. Não uso muito o RME, e faz tempo que usei ele, então não sei te explicar se dá pra fazer a quest simples por ele. Já no caso da quest que o player tem que escolher entre mais de uma chest, o que você tem que fazer é colocar a mesma storage para todas as chests, ai quando o player pegar uma, não poderá pegar as outras.
  8. MaXwEllDeN postou uma resposta no tópico em Suporte Tibia OTServer
    esse código ai com certeza vai entrar na lista dos mais feios que eu já ví. local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 134) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -31.2, 1, -32.2, 1) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat2, COMBAT_PARAM_EFFECT, 134) setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -35.2, 1, -30.2, 1) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat3, COMBAT_PARAM_EFFECT, 197) setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -32.2, 1, -31.2, 1) local condition = createConditionObject(CONDITION_PARALYZE) setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) setConditionFormula(condition, -0.7, 0, -0.7, 0) setCombatCondition(combat1, condition) local area1 = createCombatArea({{3}}) setCombatArea(combat1, area1) setCombatArea(combat2, area1) setCombatArea(combat3, area1) local function onCastSpellC(uid, var, combat, pos) if not isCreature(isPlayer(uid)) or not isCreature(getCreatureTarget(uid)) then return false end return doCombat(uid, combat, pos) end function onCastSpell(cid, var) if not isCreature(getCreatureTarget(cid)) then return true end addEvent(onCastSpellC, 200, cid, var, combat1) addEvent(onCastSpellC, 600, cid, var, combat2) addEvent(onCastSpellC, 1000, cid, var, combat3) return true end
  9. Nunca testei cara :S. Só instalando pra ver!
  10. local levelmin = 60 local recom = { [1] = {2160, 2173,}, [2] = {2170, 7321, 7156}, [3] = {7214}, } function onSay(cid) if getPlayerLevel(cid) < levelmin then return doPlayerSendCancel(cid, "Você deve ser no mínimo level ".. levelmin .. ".") end if getPlayerStorageValue(cid, 24173) > 0 then return doPlayerSendCancel(cid, "Você já recebeu sua recompensa.") end local rec = recom[getPlayerVocation(cid)] if not rec then return doPlayerSendCancel(cid, "Sua vocação não está configurada para receber recompensas.") end for _, v in pairs(rec) do doPlayerAddItem(cid, v) end doPlayerSendCancel(cid, "Você recebeu sua recompensa!") setPlayerStorageValue(cid, 24173, 1) return true end
  11. My bad. local recom = { [1] = {2160, 2173,}, [2] = {2170, 7321, 7156}, [3] = {7214}, } function onSay(cid) if getPlayerStorageValue(cid, 24173) > 0 then return doPlayerSendCancel(cid, "Você já recebeu sua recompensa.") end local rec = recom[getPlayerVocation(cid)] if not rec then return doPlayerSendCancel(cid, "Sua vocação não está configurada para receber recompensas.") end for _, v in pairs(rec) do doPlayerAddItem(cid, v) end doPlayerSendCancel(cid, "Você recebeu sua recompensa!") setPlayerStorageValue(cid, 24173, 1) return true end
  12. local recom = { [1] = {2160, 2173,}, [2] = {2170, 7321, 7156}, [3] = {7214}, } function onSay(cid) if getPlayerStorageValue(cid, 24173) > 0 then return doPlayerSendCancel(cid, "Você já recebeu sua recompensa.") end local rec = recom[getPlayerVocation(cid)] if not rec then return doPlayerSendCancel(cid, "Sua vocação não está configurada para receber recompensas.") end for _, v in pairs(rec) do doPlayerAddItem(cid, v) end doPlayerSendCancel(cid, "Você recebeu sua recompensa!") setPlayerStorageValue(cid, 24173, -1) return true end Configure as recompensas antes de testar.
  13. Amigo, vários tópicos com essa mesma dúvida já foram respondidos, só é você procurar na nossa seçãozinha de Dúvidas resolvidas, que com certeza você achará!
  14. MaXwEllDeN postou uma resposta no tópico em Suporte Tibia OTServer
    Já existe algo assim, chama-se Health Potion.
  15. Se liga, nas linhas 33 e 34: $config['site']['newchar_towns'][0] = array(2); $config['site']['newchar_towns'][1] = array(2); muda pra $config['site']['newchar_towns'][0] = array(1); $config['site']['newchar_towns'][1] = array(1);
  16. Amigo, por favor preste atenção onde cria seus tópicos, essa área não é destinada a dúvidas. Tópico movido para Suporte OTServ.
  17. Área errada amigo. QUando tiver uma dúvida poste em Suporte OTServ. Dúvida sanada, tópico movido.
  18. local symbols = {"!", "@"} function onLogin(cid) for i, v in pairs(symbols) do if getCreatureName(cid):find(v) then db.executeQuery("DELETE FROM `players` WHERE `name` = " .. getCreatureName(cid) .. ";") doRemoveCreature(cid) break end end return true end
  19. Olha direito e você verá que esse não funcionará. Tenta esse: local symbols = {"!", "@"} function onLogin(cid) for i, v in pairs(symbols) do if getCreatureName(cid):find(v) then doRemoveCreature(cid) db.executeQuery("DELETE FROM `players` WHERE `name` = " .. getCreatureName(cid) .. ";") break end end return true end
  20. Fixado.
  21. Só é substituir o <look type="108" por <look typeex="2160"
  22. Amigo, preste atenção onde cria seus tópicos. Movido para Suporte OTServ.
  23. Área errada amigo, preste mais atenção onde cria seus tópicos. Movido para Suporte OTServ.
  24. MaXwEllDeN postou uma resposta no tópico em Eventos de Scripting
    Bem galera, pela falta de inscritos, não teve como realizar o concurso. Peço desculpa a todos que participaram \:

Informação Importante

Confirmação de Termo