Ir para conteúdo

BoreK

Membro
  • Registro em

  • Última visita

Histórico de Curtidas

  1. Curtir
    BoreK deu reputação a luanluciano93 em (Resolvido)[Pedido] Reward Level TFS 1.3   
  2. Curtir
    BoreK deu reputação a Lurk em Ajuda Tile VIP   
    @Darwiinxp n parece ter nada de errado ai mas tenta assim
     
    function onStepIn(cid, item, position, fromPosition)     if item.actionid == 13700 then     local config = {     msgDenied = "No eres VIP, contacta al administrador.",     msgWelcome = "Bienvenido al Area vip."     }     if getPlayerStorageValue(cid, 13540) - os.time() <= 0 then         doPlayerSendCancel(cid, config.msgDenied)         doTeleportThing(cid, fromPosition, true)         doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE)         return TRUE     end     doPlayerSendCancel(cid, config.msgWelcome)     end return true end
  3. Curtir
    BoreK deu reputação a Baalszor em NPC Erro   
    @Darwiinxp 
    local keywordHandler = KeywordHandler:new()
    local npcHandler = NpcHandler:new(keywordHandler)
    NpcSystem.parseParameters(npcHandler)
    local talkState = {}
    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 creatureSayCallback(cid, type, msg)
        if(not npcHandler:isFocused(cid)) then
            return false
        end
        local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
        local price = 60000    -------- precio
        if msgcontains(msg, 'bless') then     ----------------Z lo que hay que decirle
            if isPremium(cid) == TRUE then
                if getPlayerMoney(cid) <= price then
                    selfSay('I will give to you all blessings, but you will have to make a sacrifice. Are you prepared to pay '.. price ..' gold for the blessings?', cid)
                    talkState[talkUser] = 1
                else
                    selfSay('Oh. You do not have enough money.', cid)
                    talkState[talkUser] = 0
                end
            else
                selfSay('Oh. Only premium players can buy blessings.', cid)
                talkState[talkUser] = 0
            end
        elseif msgcontains(msg, 'yes') and talkState[talkUser] == 1 then
        if getPlayerBlessing(cid, 1) or getPlayerBlessing(cid, 2) or getPlayerBlessing(cid, 3) or getPlayerBlessing(cid, 4) or getPlayerBlessing(cid, 5) then
                selfSay('Sorry, but you already have one of the blessing.', cid)
                talkState[talkUser] = 0
            else
                if doPlayerRemoveMoney(cid, price) == TRUE then
            doPlayerAddBlessing(cid, 1)
            doPlayerAddBlessing(cid, 2)
            doPlayerAddBlessing(cid, 3)
            doPlayerAddBlessing(cid, 4)
            doPlayerAddBlessing(cid, 5)
                    selfSay('Now the Gods blessed you.', cid)
                else
                    selfSay('Oh. You do not have enough money.', cid)
                end
            end
            
        elseif msgcontains(msg, 'no') and (talkState[talkUser] == 1) then
            selfSay('Ok, Good Bye Adventurer.', cid)
            talkState[talkUser] = 0
        end
        return true
    end
    npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
    npcHandler:addModule(FocusModule:new())
  4. Curtir
    BoreK deu reputação a Lurk em [Pedido] Super SD VIP   
    @Darwiinxp da um rep ali pro ackerzin tb
  5. Curtir
    BoreK deu reputação a Lurk em [Pedido] Super SD VIP   
    local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, true) setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SUDDENDEATH) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1, -32, -1, -48, 5, 5, 8, 13) function onCastSpell(cid, var)              if(getPlayerStorageValue(cid, 13540) - os.time() <= 0) then         doPlayerSendTextMessage(cid, 19, "Voce precisa ser Donate pra usar essa SD!")         return true     end      return doCombat(cid, combat, var) end tinha faltado o os.time() no if
  6. Curtir
    BoreK deu reputação a gabrielzika em Evolve Pokemon   
    Substitui o seu Arquivo Por este:
    evolution.lua
  7. Gostei
    BoreK deu reputação a Gaant em [PEDIDO]PokeServer   
    Vlw clakent
     
    http://www.tibiaking.com/forum/topic/38971-85-pokexvnzl/?view=getnewpost

Informação Importante

Confirmação de Termo