[Arquivado]Xtibia Montaria

[Antiemoxml 13]

Ola Galera Xtibiana Estou Desemvolvendo 1 systema de Montaria Por talkaction 1 Talkaction 4 Funões

Bom Algums Menbros Meajudarão aqueles que me ajudarem Tambem irei colocar os devidos creditos

Bom vamos la o systema de Montaria esta 80% A algumas coisas que Não estou conseguindo desenvolver então Postai aqui na area de desemvolvimento para terminarmos esse Xtibia Script

 

Bom Como Funciona

!animal Go <sumona a criatura

!animal Mount <monta na criatura e ganha a Outifit

!animal Hide <tira a outifit e sumona a criatura

!animal bye <retira a criatura

 

o erro que esta ocorendo e quando você esta com Outifit ele pode sumonar no !animal go e no animal ride

eu gostaria que vocês me ajudasem nesse sonho de todo Xtibiano

 

 

Script

-- [( XTibiaScript By AntiemoXml,Vodkart,Dean & Doidin )] --
local MonsterName = "horse"
local MaxSummon = 1
local speed = 700

function onSay(cid, words, param, channel) 
local summons = getCreatureSummons(cid)

   if(param == '') then
     doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
    return true
    end
    if param == "go" then
       if(table.maxn(summons) < MaxSummon) then
               doConvinceCreature(cid, doCreateMonster(MonsterName, getCreaturePosition(cid)))
                        return TRUE
               end
                    elseif param == "mount" then
                for _, pid in ipairs(summons) do
               doRemoveCreature(pid)
               doSetCreatureOutfit(cid,{lookType = 327, lookHead =  getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet, lookAddons = getCreatureOutfit(cid).lookAddons},60 * 600 * 1000000)
               doChangeSpeed(cid, speed)
        return TRUE
end
                    elseif param == "ride" then
       if(table.maxn(summons) < MaxSummon) then
               doConvinceCreature(cid, doCreateMonster(MonsterName, getCreaturePosition(cid)))
               doRemoveCondition(cid, CONDITION_OUTFIT)
                       return TRUE
               end
    elseif param == "bye" then
                for _, pid in ipairs(summons) do
               doRemoveCreature(pid)
           end
       end
       return TRUE
end

 

para Vocês Veren o Bug aconselho a test.s por que to fazendo esse script a muito tempo e Não estou conseguindo achar 1 soluçao para que não possa sumonar a criatura quando estiver com a Outifit

Editado Junho 27, 2010 por Antiemoxml

[DevilMoon 125]

n tem como adiciona outro storage value para isso?

[Antiemoxml 13]

n tem como adiciona outro storage value para isso?

eu fis isso mas o Storage Não quer funcionar Não sei por que

[DevilMoon 125]

acho entaum q ja existe o storage tenta muda para um bem eskizito q n ezista , eu acho que ja existe e por isso n funfa deve ser por isso , se nao for sei la

[Antiemoxml 13]

Mudei o id do storage arumei tudo mas mesmo assim elçe esta sumonando a creatura eu dei 1 ser e 1 get mas mesmo assim ta tendo esse erro :S

[Blinkrox 21]

Estou Desemvolvendo 1 systema de Montaria Por talkaction 1 Talkaction 4 Funões

Bom Algums Menbros Meajudarão

 

ok, e os erros de português ?

[Antiemoxml 13]

acho entaum q ja existe o storage tenta muda para um bem eskizito q n ezista , eu acho que ja existe e por isso n funfa deve ser por isso , se nao for sei la

mas o storage não funfa ja fis de tudo to pensando nun geito de fazer isso des de Onten :S

 

@Blinkrox

aqui e a seção de area de desemvolvimento Não a seÇão de erros de portugues reportado por floodar no topico

Editado Junho 27, 2010 por Antiemoxml

[Doidin 275]

Cara não entendi muito bem o erro...

Mas eu refiz o seu script, tenta esse aqui:

 

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

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

if (param == "go") then
if (table.maxn(getCreatureSummons(cid)) < MaxSummon) then
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(getCreatureSummons(cid)) < MaxSummon) then
doConvinceCreature(cid, Monster)
doChangeSpeed(cid, -speed)
doRemoveCondition(cid, 2)
return TRUE
end

elseif (param == "mount") then
if (table.maxn(getCreatureSummons(cid)) < MaxSummon) 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

Editado Junho 28, 2010 por Doidin

[Antiemoxml 13]

não acho que você entendeu erado e assim o erro e o seguinte quando você esta com a ropa de montaria você fala animal go !animal ride ele sumona a montaria entendeu

e esta dando ero na linha 19 o;

Editado Junho 28, 2010 por Antiemoxml

[Doidin 275]

Você queria que ele sumonasse e tirasse a montaria?

[Antiemoxml 13]

Você queria que ele sumonasse e tirasse a montaria?

 

exemoplo quando você esta com a montaria Não pode sumonar a criatura Novamente mas quando você fala ride com a montaria pode sumonar dinovo entende

e esse o erro e que quando você ta montado pode sumonar a criatura eu queria que não fisese isso

[matheus1000 11]

RETIRADO

Editado Junho 29, 2010 por MasterMathw

[Antiemoxml 13]

Atualização do script

 

-- [( XTibia Script By AntiemoXml,Doidin,Dean & Vodkart )] --
local MonsterName = "horse"
local MaxSummon = 1
local Speed = 700

function onSay(cid, words, param, channel)
local summons = getCreatureSummons(cid)

if(param == '') then
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
return TRUE
end

if param == "on" then
if(table.maxn(summons) < MaxSummon) then
doConvinceCreature(cid, doCreateMonster(MonsterName, getCreaturePosition(cid)))
else
doPlayerSendCancel(cid, "Sorry, you can summon only "..MaxSummon.." horse.")
end
return FALSE
end

if param == "mount" then
for _, pid in ipairs(summons) do
doRemoveCreature(pid)
getCreatureSummons(cid)
doChangeSpeed(cid, speed)
doSetCreatureOutfit(cid,{lookType = 327, lookHead =  getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet, lookAddons = getCreatureOutfit(cid).lookAddons},60 * 600 * 1000000)
return FALSE
end

if param == "hide" then
if(table.maxn(summons) < MaxSummon) then
doRemoveCondition(cid, CONDITION_OUTFIT)
doChangeSpeed(cid, -speed)
else
doPlayerSendCancel(cid, 'You cannot summon your horse in PZ.')
end
return FALSE
end

elseif param == "bye" then
for _, pid in ipairs(summons) do
doRemoveCreature(pid)
end
end
return FALSE
end

 

 

mesmo assim quando esta montado da para sumonar a creatura dinovo

[matheus1000 11]

RETIRADO

 

Foi mal D=

Editado Junho 29, 2010 por MasterMathw

[Antiemoxml 13]

RETIRADO

 

Foi mal D=

se continua assim vo te denunciar por floodar no topico