Puxar/tirar o pokémon se for usar a bike

[Gerson Silva 2]

Pessoal alguém ai pode me ajudar a tirar o comando desse script que não da para puxar/tirar o pokémon se for usar a bike  ?

 

ele é assim: quando to com o pokémon para fora, se eu for clicar na bike para usar ela fala que não pode.

 

e se eu tiver em cima dela e tentar chamar o pokémon para fora não da :C alguém ajuda ae.

 

E se for possível AGRADEÇO!! Uma edição nesse script mesmo que só de para usar a bike se ela estiver dentro da bag

 

TEXTO: Só é possível usar a bike se tiver dentro da PokéBag

 

( Pra que você só quer que tenha como usar a bike dentro da Bag ? ) RESP: Por que tem como buga e usar a bike no chão, Então pode juntar um monte de pessoa para usar uma só BIKE.

 

 

---------------------------------------------------------{ SCRIPT }----------------------------------------------------------------

 

local function BikeSpeedOn(cid, t)                  

setPlayerStorageValue(cid, t.s, t.speed) 

doChangeSpeed(cid, -getCreatureSpeed(cid)) 

doChangeSpeed(cid, t.speed) 

end 

 

local function BikeSpeedOff(cid, t)

setPlayerStorageValue(cid, t.s, -1) 

doRegainSpeed(cid) 

end 

 

local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000}

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

local pos = getThingPos(cid) 

 

if #getCreatureSummons(cid) >= 1 then

return doPlayerSendCancel(cid, "Retorna seu Pokemon.")

end

if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or 

getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 or

getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then   --alterado v1.9

   return doPlayerSendCancel(cid, "You can't do that right now.")

end

 

if getPlayerStorageValue(cid, t.s) <= 0 then

   doSendMagicEffect(pos, 177)

   doCreatureSay(cid, t.text, 19)

   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')

   BikeSpeedOn(cid, t)

   if getPlayerSex(cid) == 1 then

      doSetCreatureOutfit(cid, {lookType = 1787}, -1)

   else

       doSetCreatureOutfit(cid, {lookType = 1619}, -1)

   end

else

   doSendMagicEffect(pos, 177)

   doCreatureSay(cid, t.dtext, 19)

   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')

   BikeSpeedOff(cid, t)

   doRemoveCondition(cid, CONDITION_OUTFIT)

end

return true

end

Editado Setembro 6, 2014 por Gerson Silva (veja o histórico de edições)

[Alencar123 35]

local function BikeSpeedOn(cid, t)                  
setPlayerStorageValue(cid, t.s, t.speed) 
doChangeSpeed(cid, -getCreatureSpeed(cid)) 
doChangeSpeed(cid, t.speed) 
end 
 
local function BikeSpeedOff(cid, t)
setPlayerStorageValue(cid, t.s, -1) 
doRegainSpeed(cid) 
end 
 
local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000}
 
function onUse(cid, item, fromPosition, itemEx, toPosition)
 
local pos = getThingPos(cid) 
 
if getPlayerItemCount(cid, iddabikeaqui) <= 0 then
return doPlayerSendCancel(cid, "Você precisa ter a bike na sua bag.")
end
if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or 
getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 or
getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then   --alterado v1.9
   return doPlayerSendCancel(cid, "You can't do that right now.")
end
 
if getPlayerStorageValue(cid, t.s) <= 0 then
   doSendMagicEffect(pos, 177)
   doCreatureSay(cid, t.text, 19)
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')
   BikeSpeedOn(cid, t)
   if getPlayerSex(cid) == 1 then
      doSetCreatureOutfit(cid, {lookType = 1787}, -1)
   else
       doSetCreatureOutfit(cid, {lookType = 1619}, -1)
   end
else
   doSendMagicEffect(pos, 177)
   doCreatureSay(cid, t.dtext, 19)
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')
   BikeSpeedOff(cid, t)
   doRemoveCondition(cid, CONDITION_OUTFIT)
end
return true
end

Nessa parte coloque o id da bike: if getPlayerItemCount(cid, iddabikeaqui) <= 0 then

Acho que com essa função deve solucionar seu problema pra soltar poke com a bike e para só usa-la se ela estiver na bag.

Pra poder usar pokemon quando estiver usando ela será preciso que você poste seu goback.lua(creio eu que seja esse).

Editado Setembro 6, 2014 por Alencar123 (veja o histórico de edições)

[Gerson Silva 2]

local function BikeSpeedOn(cid, t)                  setPlayerStorageValue(cid, t.s, t.speed) doChangeSpeed(cid, -getCreatureSpeed(cid)) doChangeSpeed(cid, t.speed) end  local function BikeSpeedOff(cid, t)setPlayerStorageValue(cid, t.s, -1) doRegainSpeed(cid) end  local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000} function onUse(cid, item, fromPosition, itemEx, toPosition) local pos = getThingPos(cid)  if getPlayerItemCount(cid, iddabikeaqui) <= 0 thenreturn doPlayerSendCancel(cid, "Você precisa ter a bike na sua bag.")endif getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 orgetPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then   --alterado v1.9   return doPlayerSendCancel(cid, "You can't do that right now.")end if getPlayerStorageValue(cid, t.s) <= 0 then   doSendMagicEffect(pos, 177)   doCreatureSay(cid, t.text, 19)   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')   BikeSpeedOn(cid, t)   if getPlayerSex(cid) == 1 then      doSetCreatureOutfit(cid, {lookType = 1787}, -1)   else       doSetCreatureOutfit(cid, {lookType = 1619}, -1)   endelse   doSendMagicEffect(pos, 177)   doCreatureSay(cid, t.dtext, 19)   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')   BikeSpeedOff(cid, t)   doRemoveCondition(cid, CONDITION_OUTFIT)endreturn trueend

Nessa parte coloque o id da bike: if getPlayerItemCount(cid, iddabikeaqui) <= 0 then

Acho que com essa função deve solucionar seu problema pra soltar poke com a bike e para só usa-la se ela estiver na bag.

Pra poder usar pokemon quando estiver usando ela será preciso que você poste seu goback.lua(creio eu que seja esse).

Aqui meu goback.lua do actions

local EFFECTS = {

--[OutfitID] = {Effect}

["Magmar"] = 35,

["Jynx"] = 17, --alterado v1.5

["Shiny Jynx"] = 17,

["Piloswine"] = 205, --alterado v1.8

["Swinub"] = 205,

}

function onUse(cid, item, frompos, item2, topos)

if exhaustion.get(cid, 6666) and exhaustion.get(cid, 6666) > 0 then return true end

if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1

or getPlayerStorageValue(cid, 75846) >= 1 or getPlayerStorageValue(cid, 5700) >= 1 then --alterado v1.9 <<

return true

end

local ballName = getItemAttribute(item.uid, "poke")

local btype = getPokeballType(item.itemid)

local usando = pokeballs[btype].use

local effect = pokeballs[btype].effect

if not effect then

effect = 21

end

unLock(item.uid) --alterado v1.8

if item.itemid == usando then

if getPlayerStorageValue(cid, 990) == 1 then -- GYM

doPlayerSendCancel(cid, "You can't return your pokemon during gym battles.")

return true

end

if #getCreatureSummons(cid) > 1 and getPlayerStorageValue(cid, 212124) <= 0 then --alterado v1.6

if getPlayerStorageValue(cid, 637501) == -2 or getPlayerStorageValue(cid, 637501) >= 1 then

BackTeam(cid)

end

end

if #getCreatureSummons(cid) == 2 and getPlayerStorageValue(cid, 212124) >= 1 then

doPlayerSendCancel(cid, "You can't do that while is controling a mind")

return true --alterado v1.5

end

if #getCreatureSummons(cid) <= 0 then

if isInArray(pokeballs[btype].all, item.itemid) then

doTransformItem(item.uid, pokeballs[btype].off)

doItemSetAttribute(item.uid, "hp", 0)

doPlayerSendCancel(cid, "This pokemon is fainted.")

return true

end

end

local cd = getCD(item.uid, "blink", 30)

if cd > 0 then

setCD(item.uid, "blink", 0)

end

local z = getCreatureSummons(cid)[1]

if getCreatureCondition(z, CONDITION_INVISIBLE) and not isGhostPokemon(z) then

return true

end

doReturnPokemon(cid, z, item, effect)

elseif item.itemid == pokeballs[btype].on then

if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then

doPlayerSendCancel(cid, "You must put your pokeball in the correct place!")

return TRUE

end

local thishp = getItemAttribute(item.uid, "hp")

if thishp <= 0 then

if isInArray(pokeballs[btype].all, item.itemid) then

doTransformItem(item.uid, pokeballs[btype].off)

doItemSetAttribute(item.uid, "hp", 0)

doPlayerSendCancel(cid, "This pokemon is fainted.")

return true

end

end

local pokemon = getItemAttribute(item.uid, "poke")

if not pokes[pokemon] then

return true

end

----------------------- Sistema de nao poder carregar mais que 3 pokes lvl baixo e + q 1 poke de lvl medio/alto ---------------------------------

if not isInArray({5, 6}, getPlayerGroupId(cid)) then

local balls = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)

local low = {}

local lowPokes = {"Rattata", "Caterpie", "Weedle", "Oddish", "Pidgey", "Paras", "Poliwag", "Bellsprout", "Magikarp", "Hoppip", "Sunkern"}

if #balls >= 1 then

for _, uid in ipairs(balls) do

local nome = getItemAttribute(uid, "poke")

if not isInArray(lowPokes, pokemon) and nome == pokemon then

return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry two pokemons equals!")

else

if nome == pokemon then

table.insert(low, nome)

end

end

end

end

if #low >= 3 then

return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry more than three pokemons equals of low level!")

end

end

---------------------------------------------------------------------------------------------------------------------------------------------------

local x = pokes[pokemon]

local boost = getItemAttribute(item.uid, "boost") or 0

if getPlayerLevel(cid) < (x.level+boost) then

doPlayerSendCancel(cid, "You need level "..(x.level+boost).." to use this pokemon.")

return true

end

---------------------------- Sistema pokes de clan --------------------------------------

local shinysClan = {

["Shiny Fearow"] = {4, "Wingeon"},

["Shiny Flareon"] = {1, "Volcanic"},

["Shiny Vaporeon"] = {2, "Seavel"},

["Shiny Jolteon"] = {9, "Raibolt"},

["Shiny Hypno"] = {7, "Psycraft"},

["Shiny Golem"] = {3, "Orebound"},

["Shiny Vileplume"] = {8, "Naturia"},

["Shiny Nidoking"] = {5, "Malefic"},

["Shiny Hitmontop"] = {6, "Gardestrike"}, --alterado v1.4

}

if shinysClan[pokemon] and (getPlayerGroupId(cid) < 4 or getPlayerGroupId(cid) > 6) then --alterado v1.9 \/

if getPlayerClanNum(cid) ~= shinysClan[pokemon][1] then

doPlayerSendCancel(cid, "You need be a member of the clan "..shinysClan[pokemon][2].." to use this pokemon!")

return true

elseif getPlayerClanRank(cid) ~= 5 then

doPlayerSendCancel(cid, "You need be atleast rank 5 to use this pokemon!")

return true

end

end

--------------------------------------------------------------------------------------

doSummonMonster(cid, pokemon)

local pk = getCreatureSummons(cid)[1]

if not isCreature(pk) then return true end

------------------------passiva hitmonchan------------------------------

if isSummon(pk) then --alterado v1.8 \/

if pokemon == "Shiny Hitmonchan" or pokemon == "Hitmonchan" then

if not getItemAttribute(item.uid, "hands") then

doSetItemAttribute(item.uid, "hands", 0)

end

local hands = getItemAttribute(item.uid, "hands")

doSetCreatureOutfit(pk, {lookType = hitmonchans[pokemon][hands].out}, -1)

end

end

-------------------------------------------------------------------------

---------movement magmar, jynx-------------

if EFFECTS[getCreatureName(pk)] then

markPosEff(pk, getThingPos(pk))

sendMovementEffect(pk, EFFECTS[getCreatureName(pk)], getThingPos(pk))

end

--------------------------------------------------------------------------

if getCreatureName(pk) == "Ditto" or getCreatureName(pk) == "Shiny Ditto" then --edited

local left = getItemAttribute(item.uid, "transLeft")

local name = getItemAttribute(item.uid, "transName")

if left and left > 0 then

setPlayerStorageValue(pk, 1010, name)

doSetCreatureOutfit(pk, {lookType = getItemAttribute(item.uid, "transOutfit")}, -1)

addEvent(deTransform, left * 1000, pk, getItemAttribute(item.uid, "transTurn"))

doItemSetAttribute(item.uid, "transBegin", os.clock())

else

setPlayerStorageValue(pk, 1010, getCreatureName(pk) == "Ditto" and "Ditto" or "Shiny Ditto") --edited

end

end

if isGhostPokemon(pk) then doTeleportThing(pk, getPosByDir(getThingPos(cid), math.random(0, 7)), false) end

doCreatureSetLookDir(pk, 2)

adjustStatus(pk, item.uid, true, true, true)

doAddPokemonInOwnList(cid, pokemon)

doTransformItem(item.uid, item.itemid+1)

local pokename = getPokeName(pk) --alterado v1.7

local mgo = gobackmsgs[math.random(1, #gobackmsgs)].go:gsub("doka", pokename)

doCreatureSay(cid, mgo, TALKTYPE_SAY)

doSendMagicEffect(getCreaturePosition(pk), effect)

if useOTClient then

doPlayerSendCancel(cid, '12//,show') --alterado v1.7

end

else

doPlayerSendCancel(cid, "This pokemon is fainted.")

end

if useKpdoDlls then

doUpdateMoves(cid)

end

return true

end

Olha eu coloquei o ID action da bike naquele lugar e agora ainda ta aquele problema de poder usar foda da bag, e não ta dando para puxar o pokémon para volta da pokébola, Mais ta dando para usar a bike com o pokémon do lado de fora xD.

13:18 You see a pokemon trainer backpack. (Vol:32).

ItemID: [1987]

Editado Setembro 6, 2014 por Gerson Silva (veja o histórico de edições)

[Alencar123 35]

local function BikeSpeedOn(cid, t)
setPlayerStorageValue(cid, t.s, t.speed)
doChangeSpeed(cid, -getCreatureSpeed(cid))
doChangeSpeed(cid, t.speed) 
end 

local function BikeSpeedOff(cid, t)
setPlayerStorageValue(cid, t.s, -1)
doRegainSpeed(cid) 
end 

local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000}

function onUse(cid, item, fromPosition, itemEx, toPosition)

local pos = getThingPos(cid) 

if getPlayerItemCount(cid, iddabikeaqui) <= 0 then
doPlayerSendCancel(cid, "Você precisa ter a bike na sua bag.")
return true
end
if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or
getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 or
getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then --alterado v1.9
return doPlayerSendCancel(cid, "You can't do that right now.")
end

if getPlayerStorageValue(cid, t.s) <= 0 then
doSendMagicEffect(pos, 177)
doCreatureSay(cid, t.text, 19)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')
BikeSpeedOn(cid, t)
if getPlayerSex(cid) == 1 then
doSetCreatureOutfit(cid, {lookType = 1787}, -1)
else
doSetCreatureOutfit(cid, {lookType = 1619}, -1)
end
else
doSendMagicEffect(pos, 177)
doCreatureSay(cid, t.dtext, 19)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')
BikeSpeedOff(cid, t)
doRemoveCondition(cid, CONDITION_OUTFIT)
end
return true
end

o da bike /\

o goback.lua \/

 

local EFFECTS = {
--[OutfitID] = {Effect}
["Magmar"] = 35, 
["Jynx"] = 17, --alterado v1.5
["Shiny Jynx"] = 17, 
["Piloswine"] = 205, --alterado v1.8
["Swinub"] = 205, 
}

function onUse(cid, item, frompos, item2, topos)

if exhaustion.get(cid, 6666) and exhaustion.get(cid, 6666) > 0 then return true end

if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 
or getPlayerStorageValue(cid, 75846) >= 1 then --alterado v1.9 <<
return true 
end

local ballName = getItemAttribute(item.uid, "poke")
local btype = getPokeballType(item.itemid)
local usando = pokeballs[btype].use

local effect = pokeballs[btype].effect
if not effect then
effect = 21
end

unLock(item.uid) --alterado v1.8

if item.itemid == usando then 

if getPlayerStorageValue(cid, 990) == 1 then -- GYM
doPlayerSendCancel(cid, "You can't return your pokemon during gym battles.")
return true
end
if #getCreatureSummons(cid) > 1 and getPlayerStorageValue(cid, 212124) <= 0 then --alterado v1.6
if getPlayerStorageValue(cid, 637501) == -2 or getPlayerStorageValue(cid, 637501) >= 1 then 
BackTeam(cid) 
end
end 
if #getCreatureSummons(cid) == 2 and getPlayerStorageValue(cid, 212124) >= 1 then
doPlayerSendCancel(cid, "You can't do that while is controling a mind")
return true --alterado v1.5
end
if #getCreatureSummons(cid) <= 0 then
if isInArray(pokeballs[btype].all, item.itemid) then
doTransformItem(item.uid, pokeballs[btype].off)
doItemSetAttribute(item.uid, "hp", 0)
doPlayerSendCancel(cid, "This pokemon is fainted.")
return true
end
end

local cd = getCD(item.uid, "blink", 30)
if cd > 0 then
setCD(item.uid, "blink", 0)
end

local z = getCreatureSummons(cid)[1]

if getCreatureCondition(z, CONDITION_INVISIBLE) and not isGhostPokemon(z) then
return true
end
doReturnPokemon(cid, z, item, effect)

elseif item.itemid == pokeballs[btype].on then

if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then
doPlayerSendCancel(cid, "You must put your pokeball in the correct place!")
return TRUE
end

local thishp = getItemAttribute(item.uid, "hp")

if thishp <= 0 then
if isInArray(pokeballs[btype].all, item.itemid) then
doTransformItem(item.uid, pokeballs[btype].off)
doItemSetAttribute(item.uid, "hp", 0)
doPlayerSendCancel(cid, "This pokemon is fainted.")
return true
end
end

local pokemon = getItemAttribute(item.uid, "poke")

if not pokes[pokemon] then
return true
end

----------------------- Sistema de nao poder carregar mais que 3 pokes lvl baixo e + q 1 poke de lvl medio/alto ---------------------------------
if not isInArray({5, 6}, getPlayerGroupId(cid)) then
local balls = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)
local low = {}
local lowPokes = {"Rattata", "Caterpie", "Weedle", "Oddish", "Pidgey", "Paras", "Poliwag", "Bellsprout", "Magikarp", "Hoppip", "Sunkern"}
if #balls >= 1 then
for _, uid in ipairs(balls) do
local nome = getItemAttribute(uid, "poke")
if not isInArray(lowPokes, pokemon) and nome == pokemon then
return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry two pokemons equals!")
else
if nome == pokemon then
table.insert(low, nome)
end
end
end
end
if #low >= 3 then
return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry more than three pokemons equals of low level!")
end 
end
---------------------------------------------------------------------------------------------------------------------------------------------------

local x = pokes[pokemon]
local boost = getItemAttribute(item.uid, "boost") or 0

if getPlayerLevel(cid) < (x.level+boost) then
doPlayerSendCancel(cid, "You need level "..(x.level+boost).." to use this pokemon.")
return true
end

---------------------------- Sistema pokes de clan --------------------------------------
local shinysClan = {
["Shiny Fearow"] = {4, "Wingeon"},
["Shiny Flareon"] = {1, "Volcanic"},
["Shiny Vaporeon"] = {2, "Seavel"}, 
["Shiny Jolteon"] = {9, "Raibolt"},
["Shiny Hypno"] = {7, "Psycraft"}, 
["Shiny Golem"] = {3, "Orebound"},
["Shiny Vileplume"] = {8, "Naturia"},
["Shiny Nidoking"] = {5, "Malefic"},
["Shiny Hitmontop"] = {6, "Gardestrike"}, --alterado v1.4
}

if shinysClan[pokemon] and (getPlayerGroupId(cid) < 4 or getPlayerGroupId(cid) > 6) then --alterado v1.9 \/
if getPlayerClanNum(cid) ~= shinysClan[pokemon][1] then
doPlayerSendCancel(cid, "You need be a member of the clan "..shinysClan[pokemon][2].." to use this pokemon!")
return true 
elseif getPlayerClanRank(cid) ~= 5 then
doPlayerSendCancel(cid, "You need be atleast rank 5 to use this pokemon!")
return true
end
end
--------------------------------------------------------------------------------------

doSummonMonster(cid, pokemon)

local pk = getCreatureSummons(cid)[1]
if not isCreature(pk) then return true end

------------------------passiva hitmonchan------------------------------
if isSummon(pk) then --alterado v1.8 \/
if pokemon == "Shiny Hitmonchan" or pokemon == "Hitmonchan" then
if not getItemAttribute(item.uid, "hands") then
doSetItemAttribute(item.uid, "hands", 0)
end
local hands = getItemAttribute(item.uid, "hands")
doSetCreatureOutfit(pk, {lookType = hitmonchans[pokemon][hands].out}, -1)
end
end
-------------------------------------------------------------------------
---------movement magmar, jynx-------------
if EFFECTS[getCreatureName(pk)] then 
markPosEff(pk, getThingPos(pk))
sendMovementEffect(pk, EFFECTS[getCreatureName(pk)], getThingPos(pk)) 
end
-------------------------------------------------------------------------- 

if getCreatureName(pk) == "Ditto" or getCreatureName(pk) == "Shiny Ditto" then --edited

local left = getItemAttribute(item.uid, "transLeft")
local name = getItemAttribute(item.uid, "transName")

if left and left > 0 then
setPlayerStorageValue(pk, 1010, name)
doSetCreatureOutfit(pk, {lookType = getItemAttribute(item.uid, "transOutfit")}, -1)
addEvent(deTransform, left * 1000, pk, getItemAttribute(item.uid, "transTurn"))
doItemSetAttribute(item.uid, "transBegin", os.clock())
else
setPlayerStorageValue(pk, 1010, getCreatureName(pk) == "Ditto" and "Ditto" or "Shiny Ditto") --edited
end
end

if isGhostPokemon(pk) then doTeleportThing(pk, getPosByDir(getThingPos(cid), math.random(0, 7)), false) end

doCreatureSetLookDir(pk, 2)

adjustStatus(pk, item.uid, true, true, true)
doAddPokemonInOwnList(cid, pokemon)

doTransformItem(item.uid, item.itemid+1)

local pokename = getPokeName(pk) --alterado v1.7 

local mgo = gobackmsgs[math.random(1, #gobackmsgs)].go:gsub("doka", pokename)
doCreatureSay(cid, mgo, TALKTYPE_SAY)

doSendMagicEffect(getCreaturePosition(pk), effect)

if useOTClient then
doPlayerSendCancel(cid, '12//,show') --alterado v1.7
end

else

doPlayerSendCancel(cid, "This pokemon is fainted.")

end

if useKpdoDlls then
doUpdateMoves(cid)
end
return true
end

Editado Setembro 6, 2014 por Alencar123 (veja o histórico de edições)

[Gerson Silva 2]

Manow aconteceu um erro aqui na bike agora ;-; tentei editar não achei o problema

 

[06/09/2014 14:40:10] [Error - LuaScriptInterface::loadFile] data/actions/scripts/bike.lua:1: unexpected symbol near 'ï'

[06/09/2014 14:40:10] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/bike.lua)

[06/09/2014 14:40:10] data/actions/scripts/bike.lua:1: unexpected symbol near 'ï'

[Alencar123 35]

Você deve ter esbarrado no teclado, verifica se não tem algum letra i na linha 1.

[Cat 2605]

Eu editei o título do tópico, preste atenção ao criar o tópico, não utilize títulos como "Ajuda aqui", "Urgente", etc

[Gerson Silva 2]

tem não manow

 

 

citar:

 

local function BikeSpeedOn(cid, t)

setPlayerStorageValue(cid, t.s, t.speed)

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, t.speed) 

end 

 

local function BikeSpeedOff(cid, t)

setPlayerStorageValue(cid, t.s, -1)

doRegainSpeed(cid) 

end 

 

local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000}

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

local pos = getThingPos(cid) 

 

if getPlayerItemCount(cid, iddabikeaqui) <= 0 then

doPlayerSendCancel(cid, "Você precisa ter a bike na sua bag.")

return true

end

if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or

getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 or

getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then --alterado v1.9

return doPlayerSendCancel(cid, "You can't do that right now.")

end

 

if getPlayerStorageValue(cid, t.s) <= 0 then

doSendMagicEffect(pos, 177)

doCreatureSay(cid, t.text, 19)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')

BikeSpeedOn(cid, t)

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1787}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1619}, -1)

end

else

doSendMagicEffect(pos, 177)

doCreatureSay(cid, t.dtext, 19)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')

BikeSpeedOff(cid, t)

doRemoveCondition(cid, CONDITION_OUTFIT)

end

return true

end

[Alencar123 35]

 

tem não manow

 

 

citar:

 

local function BikeSpeedOn(cid, t)

setPlayerStorageValue(cid, t.s, t.speed)

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, t.speed) 

end 

 

local function BikeSpeedOff(cid, t)

setPlayerStorageValue(cid, t.s, -1)

doRegainSpeed(cid) 

end 

 

local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000}

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

local pos = getThingPos(cid) 

 

if getPlayerItemCount(cid, iddabikeaqui) <= 0 then

doPlayerSendCancel(cid, "Você precisa ter a bike na sua bag.")

return true

end

if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or

getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 or

getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then --alterado v1.9

return doPlayerSendCancel(cid, "You can't do that right now.")

end

 

if getPlayerStorageValue(cid, t.s) <= 0 then

doSendMagicEffect(pos, 177)

doCreatureSay(cid, t.text, 19)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')

BikeSpeedOn(cid, t)

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1787}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1619}, -1)

end

else

doSendMagicEffect(pos, 177)

doCreatureSay(cid, t.dtext, 19)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')

BikeSpeedOff(cid, t)

doRemoveCondition(cid, CONDITION_OUTFIT)

end

return true

end

 

Tu trocou onde tá de vermelho?

[Gerson Silva 2]

Agora sim, mais ainda ta o mesmo erro

 

SCRIPT:

 

local function BikeSpeedOn(cid, t)

setPlayerStorageValue(cid, t.s, t.speed)

doChangeSpeed(cid, -getCreatureSpeed(cid))

doChangeSpeed(cid, t.speed) 

end 

 

local function BikeSpeedOff(cid, t)

setPlayerStorageValue(cid, t.s, -1)

doRegainSpeed(cid) 

end 

 

local t = {text='Mount, bike!', dtext='Demount, bike!', s=5700, speed = 1000}

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

local pos = getThingPos(cid) 

 

if getPlayerItemCount(cid, 12774) <= 0 then

doPlayerSendCancel(cid, "Você precisa ter a bike na sua bag.")

return true

end

if getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 or

getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 75846) >= 1 or

getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then --alterado v1.9

return doPlayerSendCancel(cid, "You can't do that right now.")

end

 

if getPlayerStorageValue(cid, t.s) <= 0 then

doSendMagicEffect(pos, 177)

doCreatureSay(cid, t.text, 19)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce Montou na bike.')

BikeSpeedOn(cid, t)

if getPlayerSex(cid) == 1 then

doSetCreatureOutfit(cid, {lookType = 1787}, -1)

else

doSetCreatureOutfit(cid, {lookType = 1619}, -1)

end

else

doSendMagicEffect(pos, 177)

doCreatureSay(cid, t.dtext, 19)

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'Voce saio da bike.')

BikeSpeedOff(cid, t)

doRemoveCondition(cid, CONDITION_OUTFIT)

end

return true

end

 

af parece que ta tudo certo mais tem algo errado