Ir para conteúdo

jhon992

Conde
  • Total de itens

    631
  • Registro em

  • Última visita

  • Dias Ganhos

    13

Tudo que jhon992 postou

  1. Abra o servidor em modo de compatibilidade que resolve este erro. Clique com o direito no executavel > Propriedades > Compatibilidade!
  2. Servidores 9.6 e scripts/eventos por encomenda só em ~~> http://jhon-soft.webnode.com/
  3. Servidores 9.6 e scripts/eventos por encomenda só em ~~> http://jhon-soft.webnode.com/
  4. --[[ Spell by Shawak - Edited by Jhon992. Wolf transform ]]-- local time = 120 * 1000 -- 120 * 1000 = 2 min local addShielding = 20 -- how much shielding should be added local cooldown = 30 local effect = {32, 43, 23} -- efeitos ao usar spell, caso queira só 1 remova os outros, exemplo: local effect = {32} local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, 42) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, time) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, addShielding) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat, condition) local speed = createConditionObject(CONDITION_HASTE) setConditionParam(speed, CONDITION_PARAM_TICKS, time) setConditionFormula(speed, 0.7, -56, 0.7, -56) setCombatCondition(combat, speed) function cooldownready(cid) if isPlayer(cid) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "Cooldown of Transform is ready!") end end function sendMagic(cid) if isPlayer(cid) then for i=1, #effect do doSendMagicEffect(getCreaturePosition(cid), effect[i]) end end end function onCastSpell(cid, var) local lvlMin = 20 -- lvl minimo local lvlMax = 50 -- lvl minimo if getPlayerLevel(cid) >= lvlMin and getPlayerLevel(cid) <= lvlMax then if exhaustion.check(cid, 50001) == false then exhaustion.set(cid, 50001, cooldown) addEvent(cooldownready, cooldown*1000, cid) tempo = 0 while (tempo ~= time) do addEvent(sendMagic, tempo, cid) tempo = tempo + 2000 -- se quiser diminuir o intervalo do effect, diminui de 2000 para 1000. end return doCombat(cid, combat, var) else doPlayerSendCancel(cid, "Cooldown: [" ..exhaustion.get(cid, 50001).."] seconds.") end else doPlayerSendCancel(cid, "Você só pode usar essa spell entre o level "..lvlMin.." e level "..lvlMax..".") end end
  5. O nome correto para o tópico seria: Deixando Npc 100% em português. Não acha? Reporte para moderação mudar, ou tente mudar.
  6. --[[ Spell by Shawak - Edited by Jhon992. Wolf transform ]]-- local time = 120 * 1000 -- 120 * 1000 = 2 min local addShielding = 20 -- how much shielding should be added local cooldown = 30 local effect = {32, 43, 23} -- efeitos ao usar spell, caso queira só 1 remova os outros, exemplo: local effect = {32} local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, 42) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, time) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, addShielding) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat, condition) local speed = createConditionObject(CONDITION_HASTE) setConditionParam(speed, CONDITION_PARAM_TICKS, time) setConditionFormula(speed, 0.7, -56, 0.7, -56) setCombatCondition(combat, speed) function cooldownready(cid) if isPlayer(cid) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "Cooldown of Transform is ready!") end end function sendMagic(cid) if isPlayer(cid) then for i=1, #effect do doSendMagicEffect(getCreaturePosition(cid), effect[i]) end end end function onCastSpell(cid, var) if exhaustion.check(cid, 50001) == false then exhaustion.set(cid, 50001, cooldown) addEvent(cooldownready, cooldown*1000, cid) tempo = 0 while (tempo ~= time) do addEvent(sendMagic, tempo, cid) tempo = tempo + 2000 -- se quiser diminuir o intervalo do effect, diminui de 2000 para 1000. end return doCombat(cid, combat, var) else doPlayerSendCancel(cid, "Cooldown: [" ..exhaustion.get(cid, 50001).."] seconds.") end end
  7. Todas as sources free da OtLand: http://otland.net/subversion.php?svn=public&file=listing.php&repname=forgottenserver&path=%2Ftags%2F#a2752a4ad0822c5acbda0ff9fd26a5c26
  8. jhon992

    Pedido Npc Transport

    Isso é um npc de barco, basta configurar sem custo. @edited Postei na mesma hra que o @Oneshot, tão nem vi o post dele.
  9. Tenta dá uma procurada antes de fazer o pedido. Vai nesse link na minha resposta. http://www.xtibia.com/forum/topic/185867-duvida-com-teleport/
  10. Muito bom, fiz esse mesmo sistema mais usando apenas "callbackOnBuy" e "callbackOnSell" para um item especifico mais achei muito precário. Assim ficou muito show, parabéns! Rep+
  11. Curti, li tudinho. Essas entrevistas são boas pra conhecer um pouco mais sobre os membros do XTibia.
  12. Gostei bastante do tópico, até por trazer clients que eu não fazia ideia que existia. Olha só, adiciona este no tópico também: http://client.ronit.pl/
  13. Um bom que eu conheço é esse aqui: http://www.xtibia.com/forum/topic/136543-vip-system-by-account-v10/
  14. Creio que sejam itens inválidos no mapa, você deve ir na posição correspondente do bug com seu mapa editor e verificar se tem algo incorreto nesta posição.
  15. jhon992

    Item Q Da Vocaçao

    Dae o certo é usar arrays e não assim. asdjia
  16. jhon992

    Item Q Da Vocaçao

    Sinceramente, tem um monte de coisa desnecessária neste script, use esse: function onUse(cid, item, fromPosition, itemEx, toPosition) if getPlayerStorageValue(cid,1992) == 1 then doCreatureSay(cid, "Você ja recebeu a nova vocação", TALKTYPE_ORANGE_1) return true end if getPlayerLevel(cid) >= 20 then -- 20, level minimo para usar. if getPlayerVocation(cid) == 2 then -- 2, vocação que tem que ser. doPlayerSetVocation(cid, 6) -- 6, vocação que irá transformar. doSendMagicEffect(fromPosition, 29) doRemoveItem(item.uid,1) setPlayerStorageValue(cid,1992,1) else doCreatureSay(cid, "Você não pode receber esta vocação.", TALKTYPE_ORANGE_1) end else doCreatureSay(cid, "Você deve ter level 20 ou mais para usar o Item!",TALKTYPE_ORANGE_1) end return true end Reformulei para ficar melhor a execução do mesmo. Créditos pro @Newtonnotwen.
  17. jhon992

    Item Q Da Vocaçao

    Esse que o @nbb147 postou é o login.lua...
  18. que eu saiba é exatamente isso que o script faz, só certifica que tais colocando o ip correto.
  19. Éh, não era pra estar aparecendo esse erro n, sahdua. Alguma coisa ta errada. Verifica se teu arquivo data/lib/034-exhaustion.lua, ta assim: exhaustion = { check = function (cid, storage) if(getPlayerFlagValue(cid, PLAYERFLAG_HASNOEXHAUSTION)) then return false end return getPlayerStorageValue(cid, storage) >= os.time() end, get = function (cid, storage) if(getPlayerFlagValue(cid, PLAYERFLAG_HASNOEXHAUSTION)) then return false end local exhaust = getPlayerStorageValue(cid, storage) if(exhaust > 0) then local left = exhaust - os.time() if(left >= 0) then return left end end return false end, set = function (cid, storage, time) setPlayerStorageValue(cid, storage, os.time() + time) end, make = function (cid, storage, time) local exhaust = exhaustion.get(cid, storage) if(not exhaust) then exhaustion.set(cid, storage, time) return true end return false end }
  20. jhon992

    Item Q Da Vocaçao

    @nbb147, se a vocation não for promotion de nenhuma acho que vai funcionar, mais se for quando o player deslogar vai retroceder a vocação. function onUse(cid, item, fromPosition, itemEx, toPosition) local configs = { vocationid = 5, -- id da vocação que vai virar. vocationNeed = {2,3}, -- id's das vocações que podem usar este item. level = 20 -- lvl minimo para usar o item. } if isInArray(vocationNeed, getPlayerVocation(cid)) then if getPlayerLevel(cid) >= configs.level then doPlayerSetVocation(cid, configs.vocationid) doRemoveItem(item.uid, 1) doPlayerSendTextMessage(cid, 19, "Você recebeu a vocação "..getPlayerVocation(cid)..".") doSendMagicEffect(getPlayerPosition(cid), 29) else doPlayerSendCancel(cid, "Você precisa ser level " .. configs.level .. " ou maior para adiquirir a vocação.") end else doPlayerSendCancel(cid, "Sua vocação não pode usar isto!") end return true end
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...