Ir para conteúdo

Arranca Prega

Campones
  • Total de itens

    51
  • Registro em

  • Última visita

Posts postados por Arranca Prega

  1. Brtibia


    Eae galera vim trazer para vocês um dos melhores ots que eu ja joguei e jogo ate hoje, o brtibia e um servidor que está aberto já a alguns anos e recentemente foi resetado para algumas mudanças, trouxeram conteúdos antigos(Pets por exemplo) e novas mudanças como eventos novos etc...
    o Brtibia e um servidor para aqueles que nao gostam muito da dificuldade de up no global mas ao mesmo tempo não gostam da facilidade de muitos outros otservers por ai, tem uma exp rate boa e decrescente, se nao me engano lvl 160 a rate fica x1.
     

    Mapa próprio*

    caso você nunca tenha ouvido falar do brtibia no site existem algumas hunts disponíveis para quem não conhece o mapa
    http://www.brtibia.com.br/?subtopic=tutorialfree < cidades free

    http://www.brtibia.com.br/?subtopic=tutorialvip < cidades vip

    http://www.brtibia.com.br/?subtopic=tutorialsea < cidade principal do jogo


    o servidor conta com todas as quests clássicas (poi, inqui, dh, anihi, etc...) 
    e quests próprias um exemplo é a super inquisition.

    o servidor possui um client próprio e um automap disponíveis para download no site
     

    Site do servidor:
    http://www.brtibia.com.br


    entre crie sua conta e divirta-se!
    qualquer duvida deixe nos comentários que se possível tento ajuda-los 

  2.  

    Bom nao sei se essa seria a area correta mas vamos la 

     

     

     

     

     

    13315581_837174679746076_838120807195942

     

     

     

     

    Eae galera, criei um grupo no face de design, para galera se interagir mais, tirar duvidas, pedir recursos etc... postagem diversificada des de desenhos a mão até intros etc... qualquer tipo de trabalho relacionado a Design 
    Link do grupo
    Design ZonE

     

     

    Grupo fechado só pedir a solicitação que vou aceitar o mais rápido possível

    Grupo novo :3

     

     

  3. Em 14/04/2016 at 08:37, klipstyle disse:

    usa o Ditto system = PXG com comando !revert? caso sim, reinstale pois o sistema não possui essa falha.

    Caso não use, faça oque o nosso amigo dalvorsn disse bloqueando fly se atributo do ditto estiver presente.

     

    sim uso igual do pxg tem o comando !revert, mas sempre q puxa para a pokeball o ditto volta ao normal e quando desloga tb por isso ta bugando, vou tentar fazer isso

  4. Agora, Caronte disse:

     

    Ok, vou deixar do jeito que está, e vou me cadastrar para você me responder lá.

     

     

     

    a vontade pode mandar no chat , mensg privada como quiser 

  5. 17 minutos atrás, Caronte disse:

     

    Já chega causando, seu dlç...

    Hue

    As8j7lJ.png

     

     não e rip '-' eu sou designer daquele fórum e tenho como provar......

  6. Bom como o nome ja diz o ditto no meu servidor não segura a transformação, ele transforma no poke que você quiser mas quando puxa ele pra pokeball ele volta ao normal, eu queria que ele fosse igual o do pxg que não volta ao normal so volta quando usa o comando alguem pode ajudar ?

  7. 2 horas atrás, danihcv disse:

    Aparece algum erro na distro?

     

    aparece esse

     

    Citar

    [07/04/2016 23:59:01] [Error - CreatureScript Interface] 

    [07/04/2016 23:59:01] data/creaturescripts/scripts/exp2.0.lua:onStatsChange

    [07/04/2016 23:59:01] Description: 

    [07/04/2016 23:59:01] data/lib/clan system.lua:286: attempt to index field '?' (a nil value)

    [07/04/2016 23:59:01] stack traceback:

    [07/04/2016 23:59:01]     data/lib/clan system.lua:286: in function 'getClanPorcent'

    [07/04/2016 23:59:01]     data/creaturescripts/scripts/exp2.0.lua:392: in function <data/creaturescripts/scripts/exp2.0.lua:63>

     

     

  8. Bom meu ot ta com um bug que o quando o player desloga em cima do ditto o char buga e não consegue conectar mais, gostaria de saber se tem como dar um "rollback" so no player bugado ou um jeito de tirar ele de cima do ditto, (ele estava de fly e deslogou quando entrou de novo bugou pois o ditto volta ao normal quando desloga)

     

    Por favor me ajudem, agradeço des de ja

  9. eu coloco mas não funfa :x

     

    você vai no no-ip, do lado do ip fixo q vc criou vai ter o ip em numeros aquele você coloca na pasta config.lua do seu ot, ai vc liga o servidor e tals, ai você vai no menu inicar e coloca "cmd" vari abrir uma tela, escreve ipconfig e da enter. O ip que você vai colocar no client e o Endereço ipv4.

     

    caso não de certo msm esse aqui e o meu entergame:

     

     

     

    EnterGame = { }

    G.host = "SEU IP"
    G.port = 7171
    G.protocolVersion = 854
    G.clientVersion = 854
    -- private variables
    local loadBox
    local enterGame
    local motdWindow
    local motdButton
    local enterGameButton
    local motdEnabled = true
    -- private functions
    local function onError(protocol, message, errorCode)
    if loadBox then
    loadBox:destroy()
    loadBox = nil
    end
    -- if not errorCode then
    -- EnterGame.clearAccountFields()
    -- end
    local errorBox = displayErrorBox(tr('Login Error'), message)
    connect(errorBox, { onOk = EnterGame.show })
    end
    local function onMotd(protocol, motd)
    G.motdNumber = tonumber(motd:sub(0, motd:find("\n")))
    G.motdMessage = motd:sub(motd:find("\n") + 1, #motd)
    if motdEnabled then
    motdButton:show()
    end
    end
    local function onCharacterList(protocol, characters, account)
    if enterGame:getChildById('rememberPasswordBox'):isChecked() then
    local account = g_crypt.encrypt(G.account)
    local password = g_crypt.encrypt(G.password)
    g_settings.set('account', account)
    g_settings.set('password', password)
    g_settings.set('autologin', enterGame:getChildById('autoLoginBox'):isChecked())
    else
    EnterGame.clearAccountFields()
    end
    loadBox:destroy()
    loadBox = nil
    CharacterList.create(characters, account)
    CharacterList.show()
    if motdEnabled then
    local lastMotdNumber = g_settings.getNumber("motd")
    if G.motdNumber and G.motdNumber ~= lastMotdNumber then
    g_settings.set("motd", motdNumber)
    motdWindow = displayInfoBox(tr('Message of the day'), G.motdMessage)
    connect(motdWindow, { onOk = function() CharacterList.show() motdWindow = nil end })
    CharacterList.hide()
    end
    end
    end
    local function onUpdateNeeded(protocol, signature)
    loadBox:destroy()
    loadBox = nil
    if EnterGame.updateFunc then
    local continueFunc = EnterGame.show
    local cancelFunc = EnterGame.show
    EnterGame.updateFunc(signature, continueFunc, cancelFunc)
    else
    local errorBox = displayErrorBox(tr('Update needed'), tr('Your client needs updating, try redownloading it.'))
    connect(errorBox, { onOk = EnterGame.show })
    end
    end
    -- public functions
    function EnterGame.init()
    enterGame = g_ui.displayUI('entergame')
    enterGameButton = modules.client_topmenu.addCustomLeftButton('enterGameButton', tr('Login') .. ' (Ctrl + G)', '/images/ui/pxg/topMenu_icons/entrar_icon', EnterGame.openWindow, false)
    motdButton = modules.client_topmenu.addCustomLeftButton('motdButton', tr('Message of the day'), '/images/ui/pxg/topMenu_icons/news_icon', EnterGame.displayMotd, false)
    motdButton:hide()
    g_keyboard.bindKeyDown('Ctrl+G', EnterGame.openWindow)
    if motdEnabled and G.motdNumber then
    motdButton:show()
    end
    local account = g_settings.get('account')
    local password = g_settings.get('password')
    local autologin = g_settings.getBoolean('autologin')
    EnterGame.setAccountName(account)
    EnterGame.setPassword(password)
    enterGame:getChildById('autoLoginBox'):setChecked(autologin)
    enterGame:hide()
    -- só usa quando recarrega o module
    -- if g_app.isRunning() and not g_game.isOnline() then
    -- enterGame:show()
    -- end
    end
    function EnterGame.firstShow()
    EnterGame.show()
    local account = g_crypt.decrypt(g_settings.get('account'))
    local password = g_crypt.decrypt(g_settings.get('password'))
    local autologin = g_settings.getBoolean('autologin')
    if #password > 0 and #account > 0 and autologin then
    addEvent(function()
    if not g_settings.getBoolean('autologin') then return end
    EnterGame.doLogin()
    end)
    end
    end
    function EnterGame.terminate()
    g_keyboard.unbindKeyDown('Ctrl+G')
    enterGame:destroy()
    enterGame = nil
    enterGameButton:destroy()
    enterGameButton = nil
    if motdWindow then
    motdWindow:destroy()
    motdWindow = nil
    end
    if motdButton then
    motdButton:destroy()
    motdButton = nil
    end
    if loadBox then
    loadBox:destroy()
    loadBox = nil
    end
    if protocolLogin then
    protocolLogin:cancelLogin()
    protocolLogin = nil
    end
    EnterGame = nil
    end
    function EnterGame.show()
    if loadBox then return end
    enterGame:show()
    enterGame:raise()
    enterGame:focus()
    end
    function EnterGame.hide()
    enterGame:hide()
    end
    function EnterGame.openWindow()
    if g_game.isOnline() then
    CharacterList.show()
    elseif not g_game.isLogging() and not CharacterList.isVisible() then
    EnterGame.show()
    end
    end
    function EnterGame.setAccountName(account)
    local account = g_crypt.decrypt(account)
    enterGame:getChildById('accountNameTextEdit'):setText(account)
    enterGame:getChildById('accountNameTextEdit'):setCursorPos(-1)
    enterGame:getChildById('rememberPasswordBox'):setChecked(#account > 0)
    end
    function EnterGame.setPassword(password)
    local password = g_crypt.decrypt(password)
    enterGame:getChildById('accountPasswordTextEdit'):setText(password)
    end
    function EnterGame.clearAccountFields()
    enterGame:getChildById('accountNameTextEdit'):clearText()
    enterGame:getChildById('accountPasswordTextEdit'):clearText()
    enterGame:getChildById('accountNameTextEdit'):focus()
    g_settings.remove('account')
    g_settings.remove('password')
    end
    function EnterGame.doLogin()
    G.account = enterGame:getChildById('accountNameTextEdit'):getText()
    G.password = enterGame:getChildById('accountPasswordTextEdit'):getText()
    EnterGame.hide()
    if g_game.isOnline() then
    local errorBox = displayErrorBox(tr('Login Error'), tr('Cannot login while already in game.'))
    connect(errorBox, { onOk = EnterGame.show })
    return
    end
    protocolLogin = ProtocolLogin.create()
    protocolLogin.onLoginError = onError
    protocolLogin.onMotd = onMotd
    protocolLogin.onCharacterList = onCharacterList
    protocolLogin.onUpdateNeeded = onUpdateNeeded
    loadBox = displayCancelBox(tr('Please wait'), tr('Connecting to login server...'))
    connect(loadBox, { onCancel = function(msgbox)
    loadBox = nil
    protocolLogin:cancelLogin()
    EnterGame.show()
    end })
    g_game.chooseRsa(G.host)
    g_game.setClientVersion(G.clientVersion)
    g_game.setProtocolVersion(G.protocolVersion)
    if modules.game_things.isLoaded() then
    protocolLogin:login(G.host, G.port, G.account, G.password)
    else
    loadBox:destroy()
    loadBox = nil
    EnterGame.show()
    end
    end
    function EnterGame.displayMotd()
    if not motdWindow then
    motdWindow = displayInfoBox(tr('Message of the day'), G.motdMessage)
    motdWindow.onOk = function() motdWindow = nil end
    end
    end
    function EnterGame.disableMotd()
    motdEnabled = false
    motdButton:hide()
    end

     

     

  10. Tenta colocar o ip da sua maquina em vez de colocar o ip do no-ip, no meu servidor eu não consigo conectar pelo do no-ip so os outros players, ai o meu client eu uso o ip da minha maquina mas o client q eu coloquei pra downlaod e o ip do no-ip

     

    se der certo comenta ai :biggrin:

  11. Curti demais haha, tem do the flash ae? faz uma do deadpool pra mim :3

     

    do flahs n kk , assim que eu tiver tempo eu tento fazer uma do pool te mando :3 kkk

  12. Tô pelo cell. Mas abra seu actions em um editor de texto(de preferência o Notepad).

    E procure isso;

     

     

     

     

    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

     

     

     

    E remova.

    [Faça um backup antes]

     

    não deu certo

  13. Posta seu login, e o goback da actions

     

    Loguin :

     

    local config = {

    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
    }
    function onLogin(cid)
    if getPlayerLevel(cid) >= 1 and getPlayerLevel(cid) <= 10 then --alterado v1.8
    doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 0)
    else
    doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, (getPlayerLevel(cid) >= 200 and 100 or math.floor(getPlayerLevel(cid)/2)) )
    end
    doCreatureSetDropLoot(cid, false)
    local accountManager = getPlayerAccountManager(cid)
    if(accountManager == MANAGER_NONE) then
    local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
    if(lastLogin > 0) then
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
    str = "Sua ultima visita foi em " .. 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")
    registerCreatureEvent(cid, "ClosePokedex")
    registerCreatureEvent(cid, "WatchTv")
    registerCreatureEvent(cid, "StopWatchingTv")
    registerCreatureEvent(cid, "WalkTv")
    registerCreatureEvent(cid, "RecordTv")
    registerCreatureEvent(cid, "PlayerLogout")
    registerCreatureEvent(cid, "WildAttack")
    registerCreatureEvent(cid, "Idle")
    registerCreatureEvent(cid, "EffectOnAdvance")
    registerCreatureEvent(cid, "GeneralConfiguration")
    registerCreatureEvent(cid, "SaveReportBug")
    registerCreatureEvent(cid, "LookSystem")
    registerCreatureEvent(cid, "T1")
    registerCreatureEvent(cid, "T2")
    registerCreatureEvent(cid, "task_count")
    registerCreatureEvent(cid, "KillAlavanca")
    registerCreatureEvent(cid, "ExpVip")
    registerCreatureEvent(cid, "HouseTranslation")
    registerCreatureEvent(cid, "UpAbsolute")
    registerCreatureEvent(cid, "CheckVip")
    registerCreatureEvent(cid, "PlayerInformation")
    registerCreatureEvent(cid, "OpenChannelDialog")
    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)
    end
    if getCreatureSpeed(cid) ~= getCreatureBaseSpeed(cid) then
    local delta = ( (getCreatureBaseSpeed(cid)) - (getCreatureSpeed(cid)) )
    doChangeSpeed(cid, delta)
    end
    return true
    end

     

     

    goback:

     

     

    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, "Desculpe, mas voce nao pode carregar dois pokemons iguais!")
    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 = {
    ["Dark Articuno"] = {4, "Wingeon"},
    ["Dark Celebi"] = {1, "Volcanic"},
    ["Reshiram"] = {2, "Seavel"},
    ["Shiny Darkrai"] = {9, "Raibolt"},
    ["Shiny Lucario"] = {7, "Psycraft"},
    ["Shiny Riolu"] = {3, "Orebound"},
    ["Zekrom"] = {8, "Naturia"},
    ["Shiny Regirock"] = {5, "Malefic"},
    ["Shiny Registeel"] = {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
    local pk = getCreatureSummons(cid)[1]
    local pb = getPlayerSlotItem(cid, 8).uid
    local look = getItemAttribute(pb,"addon")
    if not look then
    doSetItemAttribute(pb,"addon",0)
    return false
    end
    if look > 0 then
    doSetCreatureOutfit(pk, {lookType = look}, -1)
    return true
    end
    else
    doPlayerSendCancel(cid, "Esse pokemon desmaiou.")
    end
    if useKpdoDlls then
    doUpdateMoves(cid)
    end
    return true
    end
  • Quem Está Navegando   0 membros estão online

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