[Pedido] Script Fly para Premium

[karlkalvin 73]

Ae pessoal to aqui para pedir um scrip, de pokemon DASH advanced para meu server que é o FLY , ele já olhei ele, não achei nenhuma linha como : LOCAL PREMIUM. ...ou algo assim . então para não da merda estou aqui pedindo uma ajuda a vocês para que ajudem a colocar o FLY para VIP , falta isso para o server ficar 100% OPS : falta também melhorar o dedicado que já não está suportando tantos players =x kkkkkk mais vamos lá... o meu script de fly é esse ae ...

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

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

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

Caso vocês tenham outro que funcione estejá bom para vip. e para pkm dash advanced 8.54 é so mandar ae que eu uso (: vlw ...

tá valendo um REP ++

[tonyplyson 116]

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

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

position.stackpos = 0

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

if getPlayerStorageValue(cid, 17000) <= 0 and isPremium(cid) 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

Tenta esse ai se nao funcionar informe o problema

REP+ se eu ajudei

[karlkalvin 73]

Tonyplaysson, nenhum erro no server, nenhum erro nos logs, porem o arquivo NÃO FUNCIONOU . ainda está PARA FREE.

[Sociopata 505]

data/lib abre o arquivo order.lua

procure

elseif skill == "fly" then

e add isso pra ve se da certo (resomendo fazer backup do arquivo)

if not isPremium(cid) then

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

return true

end

[karlkalvin 73]

data/lib abre o arquivo order.lua

procure

elseif skill == "fly" then

e add isso pra ve se da certo (resomendo fazer backup do arquivo)

if not isPremium(cid) then

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

return true

end

Add isso onde e como ? eu deleto essa linha e add essa ? ou apenas debaixo dessa linha ae eu acrescento essa ?

[Sociopata 505]

aoaga o q tem la na parte de fly e add esse

elseif skill == "fly" then

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

  doPlayerSendTextMessage(cid, 27, "Type \"up\" or \"h1\" to fly higher and \"down\" or \"h2\" to fly lower.")

  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 not isPremium(cid) then

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

						  return true

end