Ir para conteúdo

Slicer

Príncipe
 Perfil  Explorar Conteúdo

  • Total de itens

    4014

  • Registro em

  • Última visita

  • Dias Ganhos

    47

 Tipo de Conteúdo 

Posts postados por Slicer

    Usando Opcode

    em Clients

    Postado

    eu tb nunca usei isso ae mas acredito q se seja algu +/- assim...

     

     

     

    function getPokeHealth(cid)
local z = getCreatureSummons(cid)[1]
return getCreatureMaxHealth(z)
end
 
function getPokeHealthMin(cid)
local z = getCreatureSummons(cid)[1]
return getCreatureHealth(z)
end
 
function lifecode(cid)
doSendPlayerExtendedOpcode(cid, 102, getPokeHealthMin(cid)..","..getPokeHealth(cid))
end


ProtocolGame.registerExtendedOpcode(102, function (protocol, opcode, buffer)
   local t = text:explode(',')
   local hp, maxHp = tonumber(t[1]), tonumber(t[2])
         pokeHealthBar:setText(hp .. ' / ' .. maxHp)
         healthInfoWindow:recursiveGetChildById("pokeHealthBar"):setTooltip(tr(pokeHealthTooltip, hp, maxHp))
         pokeHealthBar:setValue(hp, 0, maxHp)
end)

    Novidade: Poketibia 9.60

    em OTServer Alternativo (ATS)

    Postado

    @zipter

    no pda pelo menos eh usado essa funçao:

    function doCorrectString(str)
   local name = str:explode(" ")  
   local final = {}
   for _, s in ipairs(name) do
      table.insert(final, s:sub(1, 1):upper()..s:sub(2, #s):lower())
   end
   return table.concat(final, (name[2] and " " or ""))
end

    soh devem ter esquecido dela '--'

    [Encerrado] [Duvida] PDA

    em Tópicos Sem Resposta

    Postado · Editado por Slicer

    a passiva do crobat eh a unica exceção...

     

    creaturescript/scripts/exp2.0.lua

    --------------Passiva Lifesteal Clobat------------
if combat == COMBAT_PHYSICALDAMAGE then
   if getCreatureName(attacker) == "Crobat" then                    
      doCreatureAddHealth(attacker, math.floor(valor))
      doSendAnimatedText(getThingPos(attacker), "+ "..math.floor(valor), 30)
   end
end

    eu n botei ele ae na tabela de chances pq a passiva dele eh 100%... -mas realmente deveria de botado ali para facilitar... fail pra mim...-

    [ Pedido ] Alterar Cash Task Clan.

    em Lixeira Pública

    Postado · Editado por Slicer

    se ta usando o meu sistema entao tem q ir em lib/catch system.lua e achar isso...

    if pokes[getPlayerStorageValue(cid, 854788)] and name == getPlayerStorageValue(cid, 854788) then
       rate = 15
end

    pelo q lembro, qnt maior o numero ae mais facil fica... gl...

    Login

    em Lixeira Pública

    Postado · Editado por Slicer

    /\

    antes de 'p' e 'b' vem 'm'...

     

    pedisse uma gaMbiarra neh? entao toma..

     

     

     

    local reward_starter = {
   {12344, 1},
   {12348, 20},
   {12349, 15},
   {2394, 25},
   {2392, 2},
}


local config = {
   loginMessage = getConfigValue('loginMessage'),
   useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

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

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, "aloot_kill")
   
   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)))

   for s = 1, #storages do
      if not tonumber(getPlayerStorageValue(cid, storages[s])) then
         if s == 3 then
            setPlayerStorageValue(cid, storages[s], 1)
         elseif s == 4 then
            setPlayerStorageValue(cid, storages[s], -1)
         else
            if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
               setPlayerStorageValue(cid, storages[s], 1)
            else
               setPlayerStorageValue(cid, storages[s], -1)
            end
         end
         doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
      end
   end

   local haveBall = getPlayerSlotItem(cid, 8).uid > 1
   for s = 1, #storages-1 do
      if getPlayerStorageValue(cid, storages[s]) >= 1 and not haveBall then
         setPlayerStorageValue(cid, storages[s], -1)
         doRegainSpeed(cid)
         return true
      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
   doPlayerChangeModeIcon(cid)
return true
end

     

     

    Shop OTClient

    em Clients

    Postado

    riri agora intendem um pouco oq eu passei neh? kk'

     

    @topic

    como ja flaram, ou acha o q ta rolando pela net ou estuda o options... n eh la muito dificil.. mas bem q o esquema do options eh meio chatinhu ;p gl

    [Encerrado] Drop em todos os monstros

    em Tópicos Sem Resposta

    Postado · Editado por Slicer

    @Audisio

    1* vc fez um script onKill mas mando uma tag de onDeath

    2* tem um 'end' a + no script

    3* vc n mencionou q tem q adicionar o registerCreatureEvent no login.lua

     

    @Shoguns

    vc simplismente quis aumentar teus posts neh? u,U

     

    @topic

    tenta assim...

    local chance = 5 --chance de dropar... pode por numeros como 0.5 tb...

function onKill(cid, target)
   if math.random(1000) <= chance*10 then
      doPlayerAddItem(cid, ID do ITEM, 1)
   end
return TRUE
end

    tag:

    <event type="kill" name="Drop" script="drop.lua"/>

    poe isso no login.lua -poe perto de outras linhas parecidas-:

    registerCreatureEvent(cid, "Drop")

    Quebrar limite de effects

    em Resolvidos

    Postado

    @suja

    nao falto dizer q tem q adicionar mais 'possiveis efeitos'? na real nem sei se eh realmente preciso fazer aquela bagaça, mas aki eu fiz soh para garantir kk' no caso seria os...

    ...
MAGIC_EFFECT_RANDOM187     = 0x100,//256
...

    @all

    vcs reclamam d+... nunca vi ngm da todos os lugares q eh preciso modificar assim de mao beijada u,U n sei como o @suja acho todos mas eu demorei bastante pra achar tudo e deu mó trampo tb... eu n falaria nem fudendo tudo q ele flo ali no outro topico u,U

    Opcode Duvida

    em Clients

    Postado · Editado por Slicer

    Server-side:

    doSendPlayerExtendedOpcode(cid, 51, getPlayerStorageValue(cid, xxxxx))

    Client-side:

    ProtocolGame.registerExtendedOpcode(51, function (protocol, opcode, buffer) 
   print(buffer) 
end)

    esse eh o exemplo q tenhu aki... -nunca testei-

    [Encerrado] PDA com LEVEL SEM STATUS

    em Tópicos Sem Resposta

    Postado · Editado por Slicer

    1* acredito q 'startus' n exista...

    2* pda sem lvl eh muito mais facil de mexer q com lvl...

     

    2 - Acho que não tem como retirar os status Porquê o que diferencia o PDA com level pro Sem Level é os status..

    3* o sem lvl tb tem status u,U

     

    4* o bug na ball n eh por causa dos status... na real ngm sabe pq isso acontece mas n buga soh os status, buga o nome do poke, nick, boost e afins... simplismente some todos os atributos salvos da ball...

    5* sem status meio q n tem como tu calcular dano/def/hp dos pokes entao...

  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...