Estou com alguns erros no console, e provavelmente eles estão derrubando meu servidor
Quem souber arrumar vai me ajudar muito.
Obs: uso uma vps

Se precisar que eu poste algum arquivo, eu posto, Vlw
Obs²: Uso a base xCyan do Senhor

Editado Março 22, 2015 10 anos por Liru (veja o histórico de edições)

Poste seu login.lua

erro da pokedex vc pode botar isso

 

if isPlayer(item2.uid) then

return doPlayerSendCancel(cid, "Você só pode usar pokedex só em pokemons!")

end

 

isso vai bloquear caso o player usa a pokedex no outro players evitando erro no console.

 

 

em configuration em LIB acha useKpdoDlls = false  se tiver true deixa false e veja se melhora um pouco

Editado Março 22, 2015 10 anos por alexxxxxxx (veja o histórico de edições)

Vlw alexxxxxx, daqui a pouco eu vou testar aqui, se melhorar eu te aviso aqui

Meu login.lua:

local config = {

loginMessage = getConfigValue('loginMessage'),

useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))

}

 

function onLogin(cid)

 

local accountManager = getPlayerAccountManager(cid)

   if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 80 then

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 90)

doCreatureSetDropLoot(cid, false)

end

   if getPlayerLevel(cid) >= 81 and getPlayerLevel(cid) <= 149 then

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 80)

doCreatureSetDropLoot(cid, false)

end

   if getPlayerLevel(cid) >= 150 then

doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 75)

doCreatureSetDropLoot(cid, false)

end

 

if(accountManager == MANAGER_NONE) then

local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage

if(lastLogin > 0) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."

else

str = str

end

 

doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

 

elseif(accountManager == MANAGER_NAMELOCK) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, it appears that your character has been namelocked, what would you like as your new name?")

elseif(accountManager == MANAGER_ACCOUNT) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")

else

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")

end

 

if getCreatureName(cid) == "Account Manager" then

local outfit = {}

if accountManagerRandomPokemonOutfit then

outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}

else

outfit = accountManagerOutfit

end

 

doSetCreatureOutfit(cid, outfit, -1)

return true

end

 

if(not isPlayerGhost(cid)) then

doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)

end

 

local outfit = {}

 

if getPlayerVocation(cid) == 0 then

doPlayerSetMaxCapacity(cid, 0)

doPlayerSetVocation(cid, 1)

setCreatureMaxMana(cid, 6)

doPlayerAddSoul(cid, -getPlayerSoul(cid))

setPlayerStorageValue(cid, 19898, 0)

if getCreatureOutfit(cid).lookType == 128 then

outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}

elseif getCreatureOutfit(cid).lookType == 136 then

outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}

end

doCreatureChangeOutfit(cid, outfit)

end

 

registerCreatureEvent(cid, "dropStone")

    registerCreatureEvent(cid, "ShowPokedex") --alterado v1.6

    registerCreatureEvent(cid, "ClosePokedex") --alterado v1.6

registerCreatureEvent(cid, "WatchTv")

registerCreatureEvent(cid, "StopWatchingTv")

registerCreatureEvent(cid, "WalkTv")

registerCreatureEvent(cid, "RecordTv")

registerCreatureEvent(cid, "PlayerLogout")

registerCreatureEvent(cid, "WildAttack")

registerCreatureEvent(cid, "Idle")

registerCreatureEvent(cid, "PokemonIdle")

registerCreatureEvent(cid, "EffectOnAdvance")

registerCreatureEvent(cid, "GeneralConfiguration")

registerCreatureEvent(cid, "ReportBug")

registerCreatureEvent(cid, "LookSystem")

registerCreatureEvent(cid, "T1")

registerCreatureEvent(cid, "T2")

registerCreatureEvent(cid, "task_count")

registerCreatureEvent(cid, "pokemons")

 

 

addEvent(doSendAnimatedText, 500, getThingPosWithDebug(cid), "Bem Vindo!!", COLOR_BURN)

 

if getPlayerStorageValue(cid, 99284) == 1 then

setPlayerStorageValue(cid, 99284, -1)

end

 

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then

       setPlayerStorageValue(cid, 6598754, -1)

       setPlayerStorageValue(cid, 6598755, -1)

       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v1.9 \/

       doTeleportThing(cid, posBackPVP, false)

       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))

    end

 

doChangeSpeed(cid, -(getCreatureSpeed(cid)))

 

--///////////////////////////////////////////////////////////////////////////--

    local storages = {17000, 63215, 17001, 13008, 5700}

    for s = 1, #storages do

        if not tonumber(getPlayerStorageValue(cid, storages)) then

           if s == 3 then

              setPlayerStorageValue(cid, storages, 1)

           elseif s == 4 then

              setPlayerStorageValue(cid, storages, -1)

           else

              if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then

                 setPlayerStorageValue(cid, storages, 1)

              else

                 setPlayerStorageValue(cid, storages, -1)

              end

           end

           doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")

        end

    end

    --/////////////////////////////////////////////////////////////////////////--

if getPlayerStorageValue(cid, 17000) >= 1 then -- fly

 

local item = getPlayerSlotItem(cid, 8)

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

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

doRemoveCondition(cid, CONDITION_OUTFIT)

doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

 

local apos = getFlyingMarkedPos(cid)

    apos.stackpos = 0

 

if getTileThingByPos(apos).itemid <= 2 then

doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)

doCreateItem(460, 1, getFlyingMarkedPos(cid))

end

 

doTeleportThing(cid, apos, false)

if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then

       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v1.8

    end

 

    local posicao = getTownTemplePosition(getPlayerTown(cid))

    markFlyingPos(cid, posicao)

 

elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

 

local item = getPlayerSlotItem(cid, 8)

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

doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1) --alterado v1.6

doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then

           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v1.8

        end

 

elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride

 

local item = getPlayerSlotItem(cid, 8)

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

 

 

if rides[poke] then

  doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))

  doRemoveCondition(cid, CONDITION_OUTFIT)

  doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

  if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then

              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v1.8

           end

else

  setPlayerStorageValue(cid, 17001, -1)

  doRegainSpeed(cid)

end

 

   local posicao2 = getTownTemplePosition(getPlayerTown(cid))

        markFlyingPos(cid, posicao2)

 

elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive

       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then

setPlayerStorageValue(cid, 13008, 0)

doRegainSpeed(cid)

doRemoveCondition(cid, CONDITION_OUTFIT)

return true

end

 

       if getPlayerSex(cid) == 1 then

          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)

       else

          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)

       end

       doChangeSpeed(cid, 800)

 

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike

        doChangeSpeed(cid, -getCreatureSpeed(cid))

        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v1.8

        if getPlayerSex(cid) == 1 then

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

        else

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

        end

 

     elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v1.9 \/

        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)

        setPlayerStorageValue(cid, 75846, -1)

        sendMsgToPlayer(cid, 20, "You have been moved to your town!")

else

doRegainSpeed(cid)

end

 

if getPlayerStorageValue(cid, 22545) >= 1 then

  setPlayerStorageValue(cid, 22545, -1)

  doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)

       setPlayerRecordWaves(cid)

    end

 

if useKpdoDlls then

  doUpdateMoves(cid)

  doUpdatePokemonsBar(cid)

  onPokeHealthChange(cid)

end

registerCreatureEvent(cid, "Senha")

doPlayerChangeModeIcon(cid)

return true

end

Pra evitar double post achei esses aqui também:

Essa base xCyan, tem vários bugs :/
Ja tirei muitos, depois que tirar tudo vou postar no TK a versão

@UP
Já postei o login.lua

Editado Março 22, 2015 10 anos por Liru (veja o histórico de edições)

primeiro esse error da dex para arrumar ele tem que dar uma olhada no some functions.lua e não na pokedex.lua

 

agora a do waterfall você tera que mudar sua spell para esta:

 

 

elseif spell == "Electro Field" or spell == "Petal Tornado" or spell == "Flame Wheel" or spell == "Waterfall" then

 

local p = getThingPos(cid)

local pos1 = {

[1] = {{x = p.x, y = p.y+4, z = p.z}, {x = p.x+1, y = p.y+4, z = p.z}, {x = p.x+2, y = p.y+3, z = p.z}, {x = p.x+3, y = p.y+2, z = p.z}, {x = p.x+4, y = p.y+1, z = p.z}, {x = p.x+4, y = p.y, z = p.z}},

[2] = {{x = p.x, y = p.y+3, z = p.z}, {x = p.x+1, y = p.y+3, z = p.z}, {x = p.x+2, y = p.y+2, z = p.z}, {x = p.x+3, y = p.y+1, z = p.z}, {x = p.x+3, y = p.y, z = p.z}},

[3] = {{x = p.x, y = p.y+2, z = p.z}, {x = p.x+1, y = p.y+2, z = p.z}, {x = p.x+2, y = p.y+1, z = p.z}, {x = p.x+2, y = p.y, z = p.z}},

[4] = {{x = p.x, y = p.y+1, z = p.z}, {x = p.x+1, y = p.y+1, z = p.z}, {x = p.x+1, y = p.y, z = p.z}},

}

 

local pos2 = {

[1] = {{x = p.x, y = p.y-4, z = p.z}, {x = p.x-1, y = p.y-4, z = p.z}, {x = p.x-2, y = p.y-3, z = p.z}, {x = p.x-3, y = p.y-2, z = p.z}, {x = p.x-4, y = p.y-1, z = p.z}, {x = p.x-4, y = p.y, z = p.z}},

[2] = {{x = p.x, y = p.y-3, z = p.z}, {x = p.x-1, y = p.y-3, z = p.z}, {x = p.x-2, y = p.y-2, z = p.z}, {x = p.x-3, y = p.y-1, z = p.z}, {x = p.x-3, y = p.y, z = p.z}},

[3] = {{x = p.x, y = p.y-2, z = p.z}, {x = p.x-1, y = p.y-2, z = p.z}, {x = p.x-2, y = p.y-1, z = p.z}, {x = p.x-2, y = p.y, z = p.z}},

[4] = {{x = p.x, y = p.y-1, z = p.z}, {x = p.x-1, y = p.y-1, z = p.z}, {x = p.x-1, y = p.y, z = p.z}},

}

 

local pos3 = {

[1] = {{x = p.x+4, y = p.y, z = p.z}, {x = p.x+4, y = p.y-1, z = p.z}, {x = p.x+3, y = p.y-2, z = p.z}, {x = p.x+2, y = p.y-3, z = p.z}, {x = p.x+1, y = p.y-4, z = p.z}, {x = p.x, y = p.y-4, z = p.z}},

[2] = {{x = p.x+3, y = p.y, z = p.z}, {x = p.x+3, y = p.y-1, z = p.z}, {x = p.x+2, y = p.y-2, z = p.z}, {x = p.x+1, y = p.y-3, z = p.z}, {x = p.x, y = p.y-3, z = p.z}},

[3] = {{x = p.x+2, y = p.y, z = p.z}, {x = p.x+2, y = p.y-1, z = p.z}, {x = p.x+1, y = p.y-2, z = p.z}, {x = p.x, y = p.y-2, z = p.z}},

[4] = {{x = p.x+1, y = p.y, z = p.z}, {x = p.x+1, y = p.y-1, z = p.z}, {x = p.x, y = p.y-1, z = p.z}},

}

 

local pos4 = {

[1] = {{x = p.x-4, y = p.y, z = p.z}, {x = p.x-4, y = p.y+1, z = p.z}, {x = p.x-3, y = p.y+2, z = p.z}, {x = p.x-2, y = p.y+3, z = p.z}, {x = p.x-1, y = p.y+4, z = p.z}, {x = p.x, y = p.y+4, z = p.z}},

[2] = {{x = p.x-3, y = p.y, z = p.z}, {x = p.x-3, y = p.y+1, z = p.z}, {x = p.x-2, y = p.y+2, z = p.z}, {x = p.x-1, y = p.y+3, z = p.z}, {x = p.x, y = p.y+3, z = p.z}},

[3] = {{x = p.x-2, y = p.y, z = p.z}, {x = p.x-2, y = p.y+1, z = p.z}, {x = p.x-1, y = p.y+2, z = p.z}, {x = p.x, y = p.y+2, z = p.z}},

[4] = {{x = p.x-1, y = p.y, z = p.z}, {x = p.x-1, y = p.y+1, z = p.z}, {x = p.x, y = p.y+1, z = p.z}},

}

 

local atk = {

--[atk] = {distance, eff, damage}

["Electro Field"] = {41, 207, ELECTRICDAMAGE},

["Petal Tornado"] = {14, 54, GRASSDAMAGE},

["Waterfall"] = {2, 154, WATERDAMAGE},

["Flame Wheel"] = {-1, 6, FIREDAMAGE}, --alterado v1.9

}

 

local function sendDist(cid, posi1, posi2, eff, delay)

if posi1 and posi2 and isCreature(cid) then

 addEvent(sendDistanceShootWithProtect, delay, cid, posi1, posi2, eff) 

end

end

 

local function sendDano(cid, pos, eff, delay, min, max)

if pos and isCreature(cid) then

 addEvent(doDanoWithProtect, delay, cid, atk[spell][3], pos, 0, -min, -max, eff)

end

end

 

local function doAeroblast(cid)

if isCreature(cid) then

for j = 1, 4 do

 for i = 1, 6 do--41/207-- 14/54

 addEvent(sendDist, 350, cid, pos1[j], pos1[j][i+1], atk[spell][1], i*330)

 addEvent(sendDano, 350, cid, pos1[j], atk[spell][2], i*300, min, max)

 addEvent(sendDano, 350, cid, pos1[j], atk[spell][2], i*310, 0, 0)

 ---

 addEvent(sendDist, 350, cid, pos2[j], pos2[j][i+1], atk[spell][1], i*330)

 addEvent(sendDano, 350, cid, pos2[j], atk[spell][2], i*300, min, max)

 addEvent(sendDano, 350, cid, pos2[j], atk[spell][2], i*310, 0, 0)

 ----

 addEvent(sendDist, 800, cid, pos3[j], pos3[j][i+1], atk[spell][1], i*330)

 addEvent(sendDano, 800, cid, pos3[j], atk[spell][2], i*300, min, max)

 addEvent(sendDano, 800, cid, pos3[j], atk[spell][2], i*310, 0, 0)

 ---

 addEvent(sendDist, 800, cid, pos4[j], pos4[j][i+1], atk[spell][1], i*330)

 addEvent(sendDano, 800, cid, pos4[j], atk[spell][2], i*300, min, max)

 addEvent(sendDano, 800, cid, pos4[j], atk[spell][2], i*310, 0, 0)

 end

end

end

end

 

if spell == "Electro Field" then

 addEvent(doMoveInArea2, 1000, cid, 0, electro, ELECTRICDAMAGE, 0, 0, spell)

end

 

if spell == "Flame Wheel" then 

 doAeroblast(cid)

else

for b = 0, 2 do

addEvent(doAeroblast, b*1500, cid)

end

end

 

 

poste seu some functions.

Editado Abril 10, 2015 10 anos por tioj (veja o histórico de edições)