Ir para conteúdo
  • Cadastre-se

keilost1

Membro
  • Total de itens

    66
  • Registro em

  • Última visita

Sobre keilost1

  • Rank
    Dedicado

Informação de Perfil

  • Localização
    Mirassol-SP
  • Eu sou
    Scripter
  • Meu personagem
    Tony Scott
  • Bot preferido
    mage bot

Últimos Visitantes

951 visualizações
  1. local config = {
        loginMessage = getConfigValue('loginMessage'),
        useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
    }

    function onLogin(cid)

        if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then   --alterado v1.8
           doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0)
        else     
           doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )
        end
        doCreatureSetDropLoot(cid, false)

        local accountManager = getPlayerAccountManager(cid)

        if(accountManager == MANAGER_NONE) then
            local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
            if(lastLogin > 0) then
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
                str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
            else
                str = str
            end

            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            
            sendMsgToPlayer(cid, 20, "Bem-Vindo ao PokemonXjirachi.")

        elseif(accountManager == MANAGER_NAMELOCK) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")
        elseif(accountManager == MANAGER_ACCOUNT) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
        else
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
        end

        if getCreatureName(cid) == "Account Manager" then
            local outfit = {}
            if accountManagerRandomPokemonOutfit then
                outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
            else
                outfit = accountManagerOutfit
            end
        
            doSetCreatureOutfit(cid, outfit, -1)
        return true
        end

        if(not isPlayerGhost(cid)) then
            doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
        end

        local outfit = {}

        if getPlayerVocation(cid) == 0 then
            doPlayerSetMaxCapacity(cid, 7)
            doPlayerSetVocation(cid, 1)
            setCreatureMaxMana(cid, 6)
            doPlayerAddSoul(cid, -getPlayerSoul(cid))
            setPlayerStorageValue(cid, 19898, 0)
                if getCreatureOutfit(cid).lookType == 128 then
                    outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
                elseif getCreatureOutfit(cid).lookType == 136 then
                    outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
                end
            doCreatureChangeOutfit(cid, outfit)
        end

        registerCreatureEvent(cid, "dropStone")  
        registerCreatureEvent(cid, "ShowPokedex") 
        registerCreatureEvent(cid, "ClosePokedex") 
        registerCreatureEvent(cid, "WatchTv")
        registerCreatureEvent(cid, "StopWatchingTv")
        registerCreatureEvent(cid, "WalkTv")
        registerCreatureEvent(cid, "RecordTv")
        registerCreatureEvent(cid, "PlayerLogout")
        registerCreatureEvent(cid, "WildAttack")
        registerCreatureEvent(cid, "Idle")
        registerCreatureEvent(cid, "EffectOnAdvance")
        registerCreatureEvent(cid, "GeneralConfiguration")
        registerCreatureEvent(cid, "SaveReportBug")   
        registerCreatureEvent(cid, "LookSystem")
        registerCreatureEvent(cid, "T1")
        registerCreatureEvent(cid, "T2")
        registerCreatureEvent(cid, "atkz")
        registerCreatureEvent(cid, "atk")
        registerCreatureEvent(cid, "magica")
        registerCreatureEvent(cid, "Effect")
            registerCreatureEvent(cid, "Teste")
        

        if getPlayerStorageValue(cid, 99284) == 1 then
            setPlayerStorageValue(cid, 99284, -1)
        end

        if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
           setPlayerStorageValue(cid, 6598754, -1)
           setPlayerStorageValue(cid, 6598755, -1)
           doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v1.9 \/
           doTeleportThing(cid, posBackPVP, false)
           doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
        end
        
        doChangeSpeed(cid, -(getCreatureSpeed(cid)))
        
        --///////////////////////////////////////////////////////////////////////////--
        local storages = {17000, 63215, 17001, 13008, 5700}
        for s = 1, #storages do
            if not tonumber(getPlayerStorageValue(cid, storages)) then
               if s == 3 then
                  setPlayerStorageValue(cid, storages, 1)
               elseif s == 4 then
                  setPlayerStorageValue(cid, storages, -1)
               else   
                  if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                     setPlayerStorageValue(cid, storages, 1)                 
                  else
                     setPlayerStorageValue(cid, storages, -1) 
                  end
               end
               doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
            end
        end
        --/////////////////////////////////////////////////////////////////////////--
        if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
            
            local item = getPlayerSlotItem(cid, 8)
            local poke = getItemAttribute(item.uid, "poke")
            doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
            doRemoveCondition(cid, CONDITION_OUTFIT)
                    local addonfly = getPlayerSlotItem(cid, 8).uid
                    local addofly = getItemAttribute(addonfly,"addonfly")
                    if not addofly then
                                    doSetItemAttribute(addonfly,"addonfly",0) 
                                            doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                    end
                    if addofly > 0 then
                                    doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                    end

            local item = getPlayerSlotItem(cid, 8)
            local poke = getItemAttribute(item.uid, "poke")
            doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
            doRemoveCondition(cid, CONDITION_OUTFIT)
            doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

        local apos = getFlyingMarkedPos(cid)
        apos.stackpos = 0
            
                if getTileThingByPos(apos).itemid <= 2 then
                    doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                    doCreateItem(460, 1, getFlyingMarkedPos(cid))
                end 

        doTeleportThing(cid, apos, false)
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v1.8
        end  
     
        local posicao = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao)
        
        elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

            local item = getPlayerSlotItem(cid, 8)
            local poke = getItemAttribute(item.uid, "poke")
            doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v1.6
            doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
            if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
               sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v1.8
            end 

        elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
            
            local item = getPlayerSlotItem(cid, 8)
            local poke = getItemAttribute(item.uid, "poke")
            
            
            if rides[poke] then
               doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
               doRemoveCondition(cid, CONDITION_OUTFIT)
               doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)
               if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
                  sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v1.8
               end 
            else
               setPlayerStorageValue(cid, 17001, -1)
               doRegainSpeed(cid)   
            end
        
            local posicao2 = getTownTemplePosition(getPlayerTown(cid))
            markFlyingPos(cid, posicao2)
            
        elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
           if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
                setPlayerStorageValue(cid, 13008, 0)
                doRegainSpeed(cid)              
                doRemoveCondition(cid, CONDITION_OUTFIT)
            return true
            end   
              
           if getPlayerSex(cid) == 1 then
              doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
           else
              doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
           end
           doChangeSpeed(cid, 800)

         elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
            doChangeSpeed(cid, -getCreatureSpeed(cid))
            doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v1.8
            if getPlayerSex(cid) == 1 then
               doSetCreatureOutfit(cid, {lookType = 1394}, -1)
            else
               doSetCreatureOutfit(cid, {lookType = 1393}, -1)
            end
         
         elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v1.9 \/
            doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
            setPlayerStorageValue(cid, 75846, -1)
            sendMsgToPlayer(cid, 20, "You have been moved to your town!")
         else
            doRegainSpeed(cid)  
         end
        
        if getPlayerStorageValue(cid, 22545) >= 1 then
           setPlayerStorageValue(cid, 22545, -1)              
           doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
           setPlayerRecordWaves(cid)     
        end
        
        if useKpdoDlls then
            doUpdateMoves(cid)
            doUpdatePokemonsBar(cid)
        end
        return true
    end

  2. me envia o seu login, se não eu não vou poder te ajudar..
  3. Outras pessoas conseguem acessa-lo? Quando exatamente começou o erro? Alias, poderia encontrar o primeiro o erro alertado e enviar por print aqui? Envie seu código também.
  4. Envie o código aqui para eu dar uma olhada.
  5. Existe erro na distro? Você mudou algo além de ter resetado seu banco de dados?
  6. E aí galera do TK.... Estou passando meu OT para TFS 1.2 (OTXSERVER) e estou criando algumas funções para suprir a necessidade de alguns scripts.... Segue a função function getExperienceForLevel(level) level = level - 1 return ((50 * level * level * level) - (150 * level * level) + (400 * level)) / 3 end
  7. E aí galera do TK.... Estou passando meu OT para TFS 1.2 (OTXSERVER) e estou criando algumas funções para suprir a necessidade de alguns scripts, quando me deparei com o problema de listar as cidades no meu comando fly, não existia a função getTownList(), se existe alguma função que faça isso, me desculpe eu não encontrei, então segue o código: function townExists(townId) local t = Town(townId) return t ~= nil and true or false end function getTownList() local listtowns = {} setmetatable(listtowns, {__index=table}) local town while townExists(#listtowns+1) do to
  8. Esse foi um dos códigos mais feios que vi aqui no TibiaKing hoje, não está identado, todo desorganizado, além de estar sujo com caracteres do forum... A lógica que você usou é péssima, pois se o player não tiver online, e logar após ter executado esse script ele não vai estar com exp dobrada.... Hora que acaba o evento, hã? Não consegui entender o que acontece...
  9. Desculpa reviver o tópico, porém eu estava criando o evento de natal, e fui utilizar a função, e reparei que quando ela seta a primeira storage, vai tudo beleza, mas quando usa UPDATE na função, a logica e a sintaxe está incorreta: db.executeQuery("UPDATE `account_storage` SET `value` = " .. accid .. " WHERE `key`=" .. key .. " LIMIT 1');") Aonde o certo é: db.executeQuery("UPDATE `account_storage` SET `value` = " .. value .. " WHERE `key`=" .. key .. " AND `account_id` = " .. accid .. " LIMIT 1;") Repare que removi um ') do final e troquei o valor do
  10. doPlayerSendMailByName(name, item[, town[, actor]]) Tá faltando essa também
  11. E aí pessoal do Tibia King, Eu sou dono do GoldenOT e estou a procura de alguém que realmente domine a linguagem PHP para ajudar em algumas questões, se eu achar que o serviço é bom mesmo estarei pagando o mesmo. Entrem em contato pelo skype: guirocio
  12. Se não fosse pela função doResetSKRoom() do script 3, eu teria votado nele, não achei muito legal o metódo. Voto no script 2 pela lógica.
  13. Hmm.. verdade, obrigado pela sugestão Wakon!
×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo