[Encerrado] [Pokemon] Dúvidas? - Pda

BRDominik · Janeiro 28, 2012

@all

Duvida : Add o sytem de !dive mas n sei (na vdd nem procurei ainda/preguiça e sono) onde muda que o player toma hit debaixo dagua...alguem sabe configurar?

E alguem sabe se teria como fazer alguma funcao sei la que pokes de agua se movessem mais rapido em sqm de sea?

Vlw indo dormir aqui

Tinha algum aqui que tava fazendo testes nao sei se ele disponibilizou. To saindo so agora(5:30). D=

pocotozinho · Janeiro 28, 2012

eu tentei add o bike sistem apareceu isso

[28/01/2012 02:33:19] [Error - LuaScriptInterface::loadFile] data/actions/scripts/bike.lua:6: unfinished string near '']' [28/01/2012 02:33:19] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/bike.lua) [28/01/2012 02:33:19] data/act

nem sei mais o que tentar aqui ja reistalei ja mudei o id do item mais da esse erro

notle · Janeiro 28, 2012

MAP POKEFLAY AKE

http://www.mediafire...w2jy8vd4bomdjq4

baixei aqui de boa e notei que quando dono do pokeflay não quer compartilhar ai galera da uma força " o.O "

Pflay Hacked

hehehe

FD CODE · Janeiro 28, 2012

eu tentei add o bike sistem apareceu isso

[28/01/2012 02:33:19] [Error - LuaScriptInterface::loadFile] data/actions/scripts/bike.lua:6: unfinished string near '']' [28/01/2012 02:33:19] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/bike.lua) [28/01/2012 02:33:19] data/act

nem sei mais o que tentar aqui ja reistalei ja mudei o id do item mais da esse erro

Eu tinha pego quando o otal2012 posto mais eu nem avia testado, fui ver agora deu o mesmo erro mais era so um erro pequeno, ta ai embaixo o script arrumado lek : ) :

function onUse(cid, item, fromPosition, itemEx, toPosition)
local sBike = 5701
local t = {
[2547] = {article='a', name='bike', text='Mount, bike!', dtext='Demount, bike!', s=5700, condition=bikeCondition}, } function BikeSpeedOn(cid,nSpeed) setPlayerStorageValue(cid,sBike,getCreatureSpeed(cid)) doChangeSpeed(cid,-getCreatureSpeed(cid)) doChangeSpeed(cid,nSpeed) end function BikeSpeedOff(cid) doChangeSpeed(cid,-getCreatureSpeed(cid)) doChangeSpeed(cid,getPlayerStorageValue(cid,sBike)) end local v, r = getCreaturePosition(cid), t[item.itemid]
local s = r.s
local pos = {x = v.x, y = v.y, z = v.z}
if r then
if getPlayerStorageValue(cid, 25000) == 5 then
return
end
if getPlayerStorageValue(cid, 23000) == 5 then
return
end
if #getCreatureSummons(cid) >= 1 then
return
end

if getPlayerStorageValue(cid, 17001) == 1 or getPlayerStorageValue(cid, 63215) == 1 or getPlayerStorageValue(cid, 17000) == 1 then
doPlayerSendCancel(cid, "You can't use bike while ride/fly/surf.")
return true
end
if getPlayerStorageValue(cid, s) <= 0 then
doSendMagicEffect(pos, 177)
doCreatureSay(cid, r.text, 19)
setPlayerStorageValue(cid, s, 1)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'You have mounted ' .. r.article .. ' '.. r.name .. '.')
BikeSpeedOn(cid,500)
if getPlayerSex(cid) == 1 then
doSetCreatureOutfit(cid, {lookType = 1394, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, -1)
else
doSetCreatureOutfit(cid, {lookType = 1393, lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, -1)
end

elseif getPlayerStorageValue(cid, s) == 1 then
doSendMagicEffect(pos, 177)
doCreatureSay(cid, r.dtext, 19)
setPlayerStorageValue(cid, s, 0)
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, 'You haven demouted ' .. r.article .. ' '.. r.name .. '.')
BikeSpeedOff(cid)
return doRemoveCondition(cid, CONDITION_OUTFIT)
else
return doPlayerSendCancel(cid, 'You can\'t do this.')
end
else
return doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_BLUE, 'Report bugs in Bike system.')
end
end

Abraços

Editado Janeiro 28, 2012 por felipedaniel

ninu · Janeiro 28, 2012

Olá alguem ja tem o npc que troca hitmonlee+20 +200k por Shiny ou Elite Hitmonlee ?

Eu achei no Forum um topico com esse script mais é antigo tem como alguem editar o script?

Script

local focus = 0

local talk_start = 0

local target = 0

local following = false

local attacking = false

local talkState = {}

function onThingMove(creature, thing, oldpos, oldstackpos)

end

function onCreatureAppear(creature)

end

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('Good bye sir!')

focus = 0

talk_start = 0

end

function onCreatureTurn(creature)

end

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

function sellPokemon(cid, name, price)

local pokename = name

local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)

local itemsball = getItemsInContainerById(bp.uid, 2222)

local itemsultra = getItemsInContainerById(bp.uid, 2220)

for _, pok in pairs(itemsball) do

if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then

if(doPlayerRemoveMoney(cid, 20000000)) then

doRemoveItem(pok, 1)

local health = 7800 -- Health do poke

local maxhealth = 7800 -- Maximo de health do poke

local description = "Contains a Elite Hitmonlee."

local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]"

item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", poke1)

doItemSetAttribute(item, "nome", "Elite Hitmonlee")

doItemSetAttribute(item, "description", description)

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, 2222)

selfSay('Thank You for letting me train him.')

return true

end

for _, pok in pairs(itemsultra) do

if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then

if(doPlayerRemoveMoney(cid, 20000000)) then

doRemoveItem(pok, 1)

local health = 7800 -- Health do poke

local maxhealth = 7800 -- Maximo de health do poke

local description = "Contains a Elite Hitmonlee."

local poke1 = "This is Elite Hitmonlee's pokeball. HP = ["..health.."/"..maxhealth.."]"

item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", poke1)

doItemSetAttribute(item, "nome", "Elite Hitmonlee")

doItemSetAttribute(item, "description", description)

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, 2220)

selfSay('Thank You for letting me train him.')

return true

end

selfSay('Hey, you do not have that pokemon or the amount of money we agreed!')

end

function sellPokemonn(cid, name, price)

local pokename = name

local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)

local itemsball = getItemsInContainerById(bp.uid, 2222)

local itemsultra = getItemsInContainerById(bp.uid, 2220)

for _, pok in pairs(itemsball) do

if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then

if(doPlayerRemoveMoney(cid, 20000000)) then

doRemoveItem(pok, 1)

local health = 7800 -- Health do poke

local maxhealth = 7800 -- Maximo de health do poke

local description = "Contains a Elite Hitmonchan."

local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]"

item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", poke1)

doItemSetAttribute(item, "nome", "Elite Hitmonchan")

doItemSetAttribute(item, "description", description)

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, 2222)

selfSay('Thank You for letting me train him.')

return true

end

for _, pok in pairs(itemsultra) do

if string.lower(getItemAttribute(pok, "poke"):sub(9, findLetter(getItemAttribute(pok, "poke"), "'")-1)) == pokename then

if(doPlayerRemoveMoney(cid, 20000000)) then

doRemoveItem(pok, 1)

local health = 7800 -- Health do poke

local maxhealth = 7800 -- Maximo de health do poke

local description = "Contains a Elite Hitmonchan."

local poke1 = "This is Elite Hitmonchan's pokeball. HP = ["..health.."/"..maxhealth.."]"

item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", poke1)

doItemSetAttribute(item, "nome", "Elite Hitmonchan")

doItemSetAttribute(item, "description", description)

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, 2220)

selfSay('Thank You for letting me train him.')

return true

end

selfSay('Hey, you do not have that pokemon or the amount of money we agreed!')

end

function onCreatureSay(cid, type, msg)

local msg = string.lower(msg)

local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid

if (msgcontains(msg, 'bye') and focus == cid) then

selfSay('See you around then!')

focus = 0

elseif (msgcontains(msg, 'hi') and (focus == 0) and (focus ~= cid) and (getDistanceToCreature(cid) <= 4)) then

selfSay('Welcome! I train pokemons fighters, you have a fighter pokemon?.')

focus = cid

talkState[talkUser] = 1

talk_start = os.clock()

elseif (msgcontains(msg, 'machamp') and talkState[talkUser] == 1 and focus == cid) then

selfSay('It is impossible to defend against punches and chops distributed by his four arms. It has a great fighting spirit.')

elseif (msgcontains(msg, 'thx') and talkState[talkUser] == 1 and focus == cid) then