olá galera do tibiaking,eu queria por o fly do meu servidor para free porque ele está para premium

 

O tópico foi movido para a área correta, preste mais atenção da próxima vez!

Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680

Este tópico foi movido:

De: "Tibia King → Atendimento Geral → Apresentação"

Para: "OTServ → Suporte OTServ → Suporte de Scripts"

Desculpe!eu sou novo e não sei muito BEM

Poste o script do sistema de fly né amigo!

Data/movments/fly.lua

local del = {'460', '1022', '1023', '1024'}

 

function onStepIn(cid, item, position, lastPosition, fromPosition, toPosition, actor)

 

local premium = false

 

position.stackpos = 0

 

if isPlayer(cid) and getCreatureOutfit(cid).lookType == 814 then return false end -- TV

 

if getPlayerStorageValue(cid, 17000) <= 0 then

doTeleportThing(cid, fromPosition, false)

doRemoveItem(getTileThingByPos(position).uid, 1)

doPlayerSendCancel(cid, "You can't fly.")

return true

end

 

doAreaCombatHealth(cid, FLYSYSTEMDAMAGE, getThingPos(cid), splash, 0, 0, 255)

 

 

local pos = getThingPos(cid)

if pos.z == 7 then return true end

pos.z = pos.z + 1

 

    for i = 0, 255 do

        pos.stackpos = i

        local tile = getTileThingByPos(pos)

        if tile.itemid ~= 0 and not isCreature(tile.uid) then

            if hasProperty(tile.uid, 3) or hasProperty(tile.uid, 7) or tile.itemid == 919 then

                doTransformItem(item.uid, 11677)

            end

        end

    end

 

return true

end

 

function onStepOut(cid, item, position, lastPosition, fromPosition, toPosition, actor)

 

if isPlayer(cid) and getCreatureOutfit(cid).lookType == 814 then return false end -- TV

 

local effect = 2

 

if toPosition.z == fromPosition.z and getCreatureOutfit(cid).lookType ~= 316 and getCreatureOutfit(cid).lookType ~= 648 then

doSendMagicEffect(fromPosition, effect)

end

 

local oldtpos = fromPosition

oldtpos.stackpos = STACKPOS_GROUND

 

 

if getTileThingByPos(oldtpos).itemid >= 1 then

doRemoveItem(getTileThingByPos(oldtpos).uid, 1)

end

 

return true

end    

 

Data/lib/order.lua

elseif skill == "fly" then

   

        --if not isPremium(cid) then

        --doPlayerSendCancel(cid, "Only premium members are allowed to fly.")

   --return true

   --end

local pokemon = flys[getPokemonName(getCreatureSummons(cid)[1])]

doPlayerSendTextMessage(cid, 27, "Type \"up\" or \"h1\" to fly/levitate higher and \"down\" or \"h2\" to fly/levitate lower.") --alterado v2.8

doChangeSpeed(cid, -getCreatureSpeed(cid))

local speed = 500 + PlayerSpeed/5 + getSpeed(sid) * 6 * speedRate

doChangeSpeed(cid, speed)

setPlayerStorageValue(cid, 54844, speed)

doSetCreatureOutfit(cid, {lookType = pokemon[1] + 351}, -1)

doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "hp", getCreatureHealth(getCreatureSummons(cid)[1]) / getCreatureMaxHealth(getCreatureSummons(cid)[1]))

doRemoveCreature(getCreatureSummons(cid)[1])

setPlayerStorageValue(cid, 17000, 1)

if getCreatureOutfit(cid).lookType == 667 or getCreatureOutfit(cid).lookType == 999 then

           markPosEff(cid, getThingPos(cid))

           sendMovementEffect(cid, 136, getThingPos(cid))     --edited efeito quando anda com o porygon

        end

        local item = getPlayerSlotItem(cid, 8) --alteraod v2.8

        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) <= 0 then  

  sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])              --alterado v2.8

        end

        

        if useOTClient then

      doPlayerSendCancel(cid, '12//,hide') --alterado v2.8

        end

return true

Fly,ride,teleport,tá pra PREMIUM