Page 1 of 4 123 ... LastLast
Results 1 to 10 of 38

Thread: Actions para resolver sua vida!

  1. #1
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Actions para resolver sua vida!

    Bom pessoal , como eu sempre vejo muita gente querendo actions básicas e nunca acham
    me disponibilizei a postar algumas que eu criei e outras que simplesmente vi por aí e achei útil.
    Mas qual a finalidade disso? Sanar as duvidas de algumas pessoas que geralmente não encontram o que acham.
    Conforme eu for encontrando mais irei disponibilizando por aqui.


    Last edited by tinicius; 08-20-2013 at 09:02 PM.
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  2. #2
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Safe Exori

    PHP Code:
    local creatures = {"Dragon"}
    local qtdcreatures -- quantidade de monstros para usar a magia

    if maround(1falseunpack(creatures)) >= qtdcreatures and paround(7) == 0 then
            cast
    ("exori")
        
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  3. #3
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Minimize Equipment

    P: Pra que essa action serve?
    R: Pra quando vc precisa usar supply bp ou alguma outra e seu monitor não tem capacidade para todas, ele irá minimizar o equipamento
    e se precisar de repor spear/bolts/arrows ele irá maximizar, repor e minimizar de novo.

    PHP Code:
    if windowcount(MainBP) < 1
    then higherwindows
    ("equip")
    else
    wait (2100,2300)
    minimizewindows("equip")
    end 
    obs:

    se não funcionar, altere o MainBP para sua backpack padrão, exemplo:
    PHP Code:
    if windowcount("Backpack of holding") < 1
    then higherwindows
    ("equip")
    else
    wait (2100,2300)
    minimizewindows("equip")
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  4. #4
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Drop Vials

    PHP Code:
    local captodrop 500
    local countDropVial 
    10  

    if ((maround(4) == 0) and (lootbodies == false) and cap captodrop and ((itemcount(285) + itemcount(284) + itemcount(283)) >= countDropVial)) then dropitems(285wait(700900dropitems(284wait(700900dropitems(283wait(700900
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  5. #5
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Exit if Unjust

    Com a chegada do novo pvp creio que não precise disso, mas como vimos em um video aqui no forum, pode acontecer de ainda bugar e vc injustar
    então aconselho usar essa action, pra caso injuste alguém, irá dar exit

    PHP Code:
    local MESSAGES getnewmessages("Server Log"
    local MESSAGES_COUNT MESSAGES.count 

    for INDEX 0MESSAGES_COUNT do 
        if (
    MESSAGES[MESSAGES_COUNT INDEX].text:find("Warning! The murder of .+ was not justified.")) then 
            updateworld
    () 

                
    wait(50001000
                
    closetibia() 
        
    end 
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  6. #6
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Safe Bank

    Esta action serve pra quando o seu char não tem dinheiro pra comprar as supplies pra caçar, ele fecha o tibia.
    LEMBRE-SE: Em npcname (que está Znozel) vc deve colocar o nome do NPC do Banco da cidade da hunt.
    PHP Code:
    local npcname 'Znozel'

    local index 
    local msgs 
    getmessages("NPCs")
    local qtd msgs.count-1
    for i=0,qtd do if msgs[qtd].sender == npcname and msgs[qtd].text:find('There is not enough gold on your account.'then
          setcavebot
    ('off')
         
    wait(5000,10000)
          
    closetibia()
       
    end
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  7. #7
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Anti-Lure

    Esta action é pra caso alguém tente lurar monstros no seu char.

    PHP Code:
    local CREATURES = {"Hydra""Dragon""Giant Spider""Dragon Lord""Behemoth"}

    if 
    maround(10unpack(CREATURES)) >= 3 then settargeting('no') and stopattack() and 
    gotolabel("SavePoint")
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  8. #8
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Auto skinner with obsidian knife

    após matar os montros ele irá continuar o trajeto e se ele passar perto de monstros que precisam usar obsidian knife, ele irá usar.
    PHP Code:
    skin(7false
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  9. #9
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Safe Reconnect

    Este reconnect foi feito pelo BlakW e é muito útil, ele não pedirá senha, ele irá automaticamente relogar o último char da conta que esteve online.

    PHP Code:
    --[[
        
    NameAuto Safe Reconnect by BlakW 
        Version
    v5.0.0
    ]]--
     
     
    --
    Reopen backpacks:
    local reopenBps = ("yes")
     
     
    ----- 
    Backpack Name Settings -----
    --
    Main Backpack Name:
    local mainBackpackName = ("Fur Backpack")
     
    --
    Loot Backpack Name:
    local lootBackpackName = ("Brocade Backpack")
     
    --
    Supplies Backpack Name:
    local supBackpackName = ("Red Backpack")
     
    --
    Gold Backpack Name:
    local goldBackpackName = ("Purple Backpack")
     
     
    ----- 
    Backpacks to Use -----
    --Use 
    Main Backpack:
    local useMainBackpack = ("yes")
     
    --Use 
    Loot Backpack:
    local useLootBackpack = ("yes")
     
    --Use 
    Supplies Backpack:
    local useSuppliesBackpack = ("yes")
     
    --Use 
    Gold Backpack:
    local useGoldBackpack = ("yes")
     
     
    ----- 
    Safe Temple Settings -----
    --
    Temple NPCs:
    local templeNpcNames = {"Alia""Tyrias""Brewster""Rahkem""Kasmir""Amanda""Isimov""Yberius""Maealil""Quentin""Lynda""Lorietta""Prezil""Kjesse""Asralius"}
     
    --
    Temple Position Range (sqm):
    local templePositionRange 7
     
     
    ----- Engine [Do not edit unless you know what you are doing] -----
    if (
    connected == false)
    then
            reconnect
    ()
            
    wait(6001800)
            
    pausewalking(10000)
     
            if ((
    pzone == true) and (maround(10falseunpack(templeNpcNames)) >= 1
    or (
    pzone == true) and (islocationxyz(32787312767templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(32595327446templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(33213324541templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(32213311337templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(330043149011templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(326493192511templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(33217318148templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(32317328267templePositionRange)) 
    or (
    pzone == true) and (islocationxyz(33194328538templePositionRange)) 
    or  (
    pzone == true) and (islocationxyz(32369322417templePositionRange)) 
    or  (
    pzone == true) and (islocationxyz(32360317827templePositionRange)) 
    or  (
    pzone == true) and (islocationxyz(32957320767templePositionRange)) 
    or  (
    pzone == true) and (islocationxyz(32732316347templePositionRange))  
    or (
    pzone == true) and (islocationxyz(33447313239,  templePositionRange)))
            
    then
            wait
    (1500)
            
    closetibia()
            
    wait(1500)
            
    message("Reconnect Message: Tibia client has been closed because character was inside a temple. This is to protect your character from being killed by other players.")
        
    end  
     
        wait
    (2500)
        if ((
    reopenBps == ("yes")) and (windowcount() == 0) and (maround(7false) == 0) and (lootbodiescount == 0))
        
    then
            closewindows
    ()
            
    wait(20003500)
            while ((
    windowcount(mainBackpackName) == 0) and (useMainBackpack == ("yes")))
            do
                
    openitem(mainBackpackName"back")
                
    wait(2000)
                
    resizewindows()
            
    end
            wait
    (20003500)
            while ((
    windowcount(supBackpackName) == 0) and (windowcount(mainBackpackName) == 1) and (useSuppliesBackpack == ("yes")))
            do
                
    openitem(supBackpackNamemainBackpackNametrue)
                
    wait(2000)
                
    resizewindows()
            
    end
            wait
    (20003500)
            while ((
    windowcount(lootBackpackName) == 0) and (windowcount(mainBackpackName) == 1) and (useLootBackpack == ("yes")))
            do
                
    openitem(lootBackpackNamemainBackpackNametrue)
                
    wait(2000)
                
    resizewindows()
            
    end
            wait
    (20003500)
            while ((
    windowcount(goldBackpackName) == 0) and (windowcount(mainBackpackName) == 1) and (useGoldBackpack == ("yes")))
            do
                
    openitem(goldBackpackNamemainBackpackNametrue)
                
    wait(2000)
                
    resizewindows()
            
    end
            wait
    (20003500)
        
    end
        setcavebot
    ("yes")
        
    wait(10002500)
        
    setlooting("yes")
        
    wait(10002500)
        
    settargeting("yes")
        
    wait(20003500)
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

  10. #10
    Normal User tinicius's Avatar
    Join Date
    Nov 2012
    Location
    Minas Gerais, Brazil.
    Posts
    457
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    2 Post(s)
    Reputation
    38
    Rep Power
    5

    Re-Open Backpack

    AVISO!

    Se forem usar essa action de reabrir as backpacks, sugiro que usem esta antes do deposit
    PHP Code:
    setsettings("Settings\\Actions\\List\\NOME DA ACTION DE BPS\\Enabled""no"
    e após o deposit:
    PHP Code:
    setsettings("Settings\\Actions\\List\\NOME DA ACTION DE BPS\\Enabled""yes"
    Esta action irá reabrir as backpacks caso forem fechadas
    PHP Code:
    if windowcount() < 4 then
    pausewalking
    (20000)



    if 
    windowcount(MainBP) < and maround(2) == and not lootbodies
    then
    wait
    (500)
    openitem(MainBP"back")
    wait(1000)
    resizewindows()
    wait(1000)
    end

    if windowcount(LootBP) < and maround(2) == and not lootbodies
    then
    wait
    (500)
    openitem(LootBPMainBPtrue)
    wait(1000)
    resizewindows()
    end

    if windowcount(GoldBP) < and maround(2) == and not lootbodies
    then
    wait
    (500)
    openitem(GoldBPMainBPtrue)
    wait(1000)
    resizewindows()
    end

    wait
    (500)
    pausewalking(0)
    end 
    If i helped you rep+


    Scripter
    Selling EK 410 w/ 87 days of voucher AND 390 ED w/ 6 days of voucher BOTH PVP
    Actions That You May Need Here!

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •