Ajuda Nesse Script De Montaria...

[hique86 15]

Estou usando esse script de montaria:

 

 

function onSay(cid, words, param)

 

local cfg = {

storage = 6679,

monster = "War Wolf",

speed = 600,

lookType = 4,

time = 600 * 6000 * 1000000

}

 

local summon = getPlayerStorageValue(cid, cfg.storage)

 

if param:lower() == "go" then

if summon <= 1 then

if (getTilePzInfo(getCreaturePosition(cid)) == LUA_ERROR) then

local m = doCreateMonster(cfg.monster, getCreaturePosition(cid))

doConvinceCreature(cid, m)

setPlayerStorageValue(cid, cfg.storage, m)

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You Can'Not Summon Your Creature In Pz Zone.")

end

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You have already summoned a horse.")

end

 

elseif param:lower() == "mount" then

if isCreature(summon) then

local outfit = getCreatureOutfit(cid)

outfit.lookType = cfg.lookType

doRemoveCreature(summon)

doChangeSpeed(cid, cfg.speed)

doSetCreatureOutfit(cid, outfit, cfg.time)

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need to summon a horse.")

end

 

elseif param:lower() == "ride" then

if summon > 1 then

local outfit = getCreatureOutfit(cid)

if outfit.lookType ~= cfg.lookType then

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need Horse To Riding.")

end

 

if (getTilePzInfo(getCreaturePosition(cid)) == LUA_ERROR) then

doRemoveCondition(cid, CONDITION_OUTFIT)

doChangeSpeed(cid, -cfg.speed)

local m = doCreateMonster(cfg.monster, getCreaturePosition(cid))

doConvinceCreature(cid, m)

setPlayerStorageValue(cid, cfg.storage, m)

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You Can'Not Summon Your Creature In Pz Zone.")

end

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You're not riding a horse.")

end

 

elseif param:lower() == "back" then

if isCreature(summon) then

doRemoveCreature(summon)

setPlayerStorageValue(cid, cfg.storage, 0)

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You do not summoned a horse.")

end

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")

end

 

return TRUE

end

 

 

Esta funcionando perfeitamente, só que eu queria fazer algumas modificações e estar adicionando mais coisas nesse script.

 

Primeiro: Quero colocar esse script só pra vip poder usar, como fasso?!?

 

Segundo: Quero que quando o player montar na invocação, não mude a outfit dele.

 

Terceiro: Quero que quando o player estiver com a montaria, ele ganhe 10k de hp e 10k de mana.

 

 

Me ajudem ai pessoal... Obrigado!!!