Sistema TFS 0.X Addon System - (PDA)

[El Reverso 5]

teria como adaptar para poder usar o mesmo item em varios pokes? exemplo: o item addon flower ser usado tanto no venusaur quanto no charizard!

[frajolaguh 1]

o frajolinha vai ajudar aqueles que usa pokebar quando estão tendo o problema de quando solta o poke da bar vcs perde a addon, vao no seu pokebar na pasta talkion

e cole esse lembrando que e pra PDA

 

 

local EFFECTS = {

    ["Perfect Zygarde Full"] = 45,

    ["Mystic Mewtwo"] = 136,

    ["Groudon"] = 34,

    ["Shiny Groudon"] = 44,

    ["Arch Heatran"] = 105,

    ["Obscure Arceus"] = 55,

    ["Zygarde M1"] = 45,

    ["Zygarde M2"] = 45,

    ["Zygarde M3"] = 105,

    ["Tornadus"] = 152,

    ["Landorus"] = 152,

    ["Thundurus"] = 152,

    ["Majestic Lugia M1"] = 136,

    ["Majestic Lugia M2"] = 136,

    ["Majestic Lugia M3"] = 136,

    ["Mew"] = 136,

    ["Mewtwo"] = 136,

    ["Shiny Mew"] = 136,

    ["Shiny Mewtwo"] = 136,

    ["Giratina Star"] = 55,

    ["Giratina Star M1"] = 55,

    ["Giratina Star M2"] = 55,

    ["Giratina Star M3"] = 55,

    ["Raikou"] = 360,

    ["Kyogre"] = 17,

    ["Shiny Kyogre"] = 17,

    ["Rayquaza"] = 17,

    ["Suicune"] = 17,

    ["Ditto"] = 17,

    ["Phione"] = 17,

    ["Zoroak"] = 55,

    ["Shiny Zoroak"] = 55,

    ["Zygard"] = 55,

    ["Regigigas"] = 35,

    ["Shiny Regigigas"] = 26,

    ["Genesect"] = 26,

    ["Zekrom"] = 26,

    ["Shiny Zekrom"] = 26,    

    ["Black Zygarde"] = 55,  

    ["Black Alpha Zekrom"] = 55,

    ["Black Groudon"] = 55,  

    ["Deoxys Lunar"] = 55,      

}

 

local cd = 1

 

local function volta(cid, init)

 

exhausted = 10

storage = 31332

 

if(getPlayerStorageValue(cid, storage) > os.time() and getPlayerStorageValue(cid, storage) < 100+os.time()) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "You must wait another " .. getPlayerStorageValue(cid, storage) - os.time() .. ' second' .. ((getPlayerStorageValue(cid, storage) - os.time()) == 1 and "" or "s") .. " to use new pokemon.")

   return true

end

 

    -- if getPlayerStorageValue(cid, 69891) >= 1 then

       -- doPlayerSendCancel(cid, "Voce nao pode chamar seu pokemon enquanto usa seu pet.")

      -- return false     --alterado v1.5

    -- end

   

    if getPlayerSlotItem(cid, CONST_SLOT_FEET).uid > 0 then

        local item = getPlayerSlotItem(cid, CONST_SLOT_FEET)

       

if getPlayerStorageValue(cid, 912351) > os.time () then

        doPlayerSendCancel(cid, "Espere "..getPlayerStorageValue(cid, 912351) - os.time ().." segundo(s) para usar novamente")

        return true

        end

 

    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

   

if not getItemAttribute(item.uid, "tadport") and ballName then

    doItemSetAttribute(item.uid, "tadport", fotos[ballName])

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)

   

        end

 

        if init then

            if 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

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

 

    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

   

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

 

    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)

--    doCureWithY(getCreatureMaster(pk), pk)

 

    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_ORANGE_1)

    if getItemAttribute(item.uid, "ballorder") then

        doPlayerSendCancel(cid, "KGT,"..getItemAttribute(item.uid, "ballorder").."|".."0")

    end

setPlayerStorageValue(cid, 912351, os.time () + cd)

    doSendMagicEffect(getCreaturePosition(pk), effect)

 

    local pk = getCreatureSummons(cid)[1]

    if not isCreature(pk) then return true end

 

    local slot = getPlayerSlotItem(cid, CONST_SLOT_FEET)

 

    local addon = getItemAttribute(slot.uid, "pokeaddon")

     

    addonTransformOutfit(cid, addon, pokemon)

 

    if useOTClient then

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

    end

 

 

        end

    end

end

 

    if useKpdoDlls then

        doUpdateMoves(cid)

    end

return true

end

 

function onSay(cid, words, param, channel)

    if getPlayerSlotItem(cid, CONST_SLOT_FEET).uid > 0 then

        if getItemAttribute(getPlayerSlotItem(cid, CONST_SLOT_FEET).uid, "ballorder") == tonumber(param) then

            volta(cid, true)

            return true

        else

            volta(cid, false)

        end

 

    end

    doMoveBar(cid, tonumber(param))

    volta(cid, true)

    return true

end