Ir para conteúdo

MaXwEllDeN

Héroi
  • Registro em

  • Última visita

Tudo que MaXwEllDeN postou

  1. Amigo, você já tem um tópico parecido com esse, por favor não fique postando tópicos com conteúdos iguais, se for para adicionar alguma informação nova use o botão EDIT.
  2. Amigo, o criador do tópico já deu o "up", não precisa ficar postando comentários desnecessários. Dessa vez só deixo o aviso verbal.
  3. MaXwEllDeN postou uma resposta no tópico em Suporte & Pedidos
    UP!
  4. Aí você teria que fazer umas modificações na source do seu servidor, seria mais complicado.
  5. 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
  6. 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
  7. 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.
  8. 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
  9. 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
  10. 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.
  11. 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
  12. Nunca testei cara :S. Só instalando pra ver!
  13. 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
  14. 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
  15. 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.
  16. 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á!
  17. MaXwEllDeN postou uma resposta no tópico em Suporte Tibia OTServer
    Já existe algo assim, chama-se Health Potion.
  18. 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);
  19. 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.
  20. Área errada amigo. QUando tiver uma dúvida poste em Suporte OTServ. Dúvida sanada, tópico movido.
  21. 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
  22. 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
  23. Fixado.
  24. Só é substituir o <look type="108" por <look typeex="2160"

Informação Importante

Confirmação de Termo