Ja que vc ta desenvolvendo vo passa um Pseudocódigo, se tiver dúvidas ou não souber fazer algo é só perguntar.

função onSay()
se param == go então
	se não existe o summon "Horse" e se getStorage(player, "X") <= 0 então
		summon("Horse")
	senão
		msg("Você já possui um summon")
	fim_se
senão se param == hide então
	se existe o summon "Horse" então
		removeSummon("Horse")
		setStorage(player, "X", 1)
		changeSpeed(player)
		changeOutfit(player)
	senão
		msg("Você não possui um summon")
	fim_se
senão se param == unhide então
	se getStorage(player, "X") > 0 então
		summon("Horse")
		setStorage(player, "X", 0)
		changeSpeed(player)
		changeOutfit(player)
	senão
		msg("Você não está montado")
	fim_se
senão se param == back então
	se existe o summon "Horse" então
		removeSummon("Horse")
	senão
		msg("Você não possui o summon")
	fim_se
fim_se
returna TRUE
fim_função

Ja que vc ta desenvolvendo vo passa um Pseudocódigo, se tiver dúvidas ou não souber fazer algo é só perguntar.

função onSay()
se param == go então
	se não existe o summon "Horse" e se getStorage(player, "X") <= 0 então
		summon("Horse")
	senão
		msg("Você já possui um summon")
	fim_se
senão se param == hide então
	se existe o summon "Horse" então
		removeSummon("Horse")
		setStorage(player, "X", 1)
		changeSpeed(player)
		changeOutfit(player)
	senão
		msg("Você não possui um summon")
	fim_se
senão se param == unhide então
	se getStorage(player, "X") > 0 então
		summon("Horse")
		setStorage(player, "X", 0)
		changeSpeed(player)
		changeOutfit(player)
	senão
		msg("Você não está montado")
	fim_se
senão se param == back então
	se existe o summon "Horse" então
		removeSummon("Horse")
	senão
		msg("Você não possui o summon")
	fim_se
fim_se
returna TRUE
fim_função

eu tentei mesmo assim com o storage Não da ele dando 1 set storage ele Não consegue sumonar e quando eu arumei la e coloquei

um 1 if creature para que os storages funcione ele n sumona acreatura

mas mesmo assim ele da erro de storage playernotfund

Cara.. Como tu ajudo os Loko a Faze o Script se tu nao sabe nem colocar isso..

Tente assim Olha..

-- [( XTibia Script By AntiemoXml, Doidin, Vodkart and Dean )] --
-- [(Update By: DevilMoon )] --
function onSay(cid, words, param, channel) 

local Monster = doSummonCreature("Horse", getCreaturePosition(cid))
local speed = 700
local outfit = {lookType = 327}
local MaximoSummon = 1

if (param == "go") then
local summons = getCreatureSummons(cid)
if(table.maxn(summons) < MaximoSummon)
doConvinceCreature(cid, Monster)
doSendMagicEffect(getCreaturePosition(cid), 44)
else
doPlayerSendCancel(cid, "Sorry, you can summon only "..MaxSummon.." monster.")
end
return TRUE
end

elseif (param == "hide") then
if(table.maxn(summons) < MaximoSummon) then
doConvinceCreature(cid, Monster)
doChangeSpeed(cid, -speed)
doRemoveCondition(cid, 2)
return TRUE
end

elseif (param == "mount") then
if(table.maxn(summons) < MaximoSummon) then
doRemoveCreature(pid)
doSetCreatureOutfit(cid, outfit, 60 * 600 * 1000000)
doChangeSpeed(cid, speed)
else
doPlayerSendCancel(cid, "Sorry, you can summon only "..MaxSummon.." monster.")
return TRUE
end

elseif param == "bye" then
doRemoveCreature(pid)
doChangeSpeed(cid, -speed)
return TRUE
end

Vou ter que dar uma Saidinha, Nao testei dps vejo e faço a correçao..

Abraços..

Updache By Kydrai

function onSay(cid, words, param, channel)

local cfg = {

storage = 5800,

monster = "Horse",

speed = 700,

lookType = 327,

time = 60 * 600 * 1000000

}

local summon = getPlayerStorageValue(cid, cfg.storage)

 

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

if summon <= 0 then

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

doConvinceCreature(cid, m)

setPlayerStorageValue(cid, cfg.storage, m)

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 > 0 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'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

mesmo assim esta occorendo 1 erro muito grave No ride quando você esta Montado no cavalo você dis Ride Toda Hora assim sumona varios cavalos queria arumar isso

e tambem quando temta summonar en protection zone ele da erro no script e não da mais para uzar o script queria q tivese algo que empedise que ele sumonase a criatura en pz zone :]