Results 1 to 6 of 6

Thread: Ajuste em uma action!

  1. #1
    iBot User
    Join Date
    Nov 2012
    Location
    Encruzilhada do Sul, RS
    Posts
    19
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Reputation
    12
    Rep Power
    5

    Ajuste em uma action! Resolvido...

    Bom, estou com problemas com essa action, tipo ela funcina bem só que quando aparece algum player ela n fica na diagonal e nem ataca magia de area, se aguem poder ajudar...
    REP+
    PHP Code:
    if paround(2,true) == and paround(8,false) == 0 then
         
    if maround(1,false,'Sea Serpent','Young Sea Serpent') == 0 then
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    Client.SetAttackMode('offensive''chase')
         elseif 
    maround(1,false,'Sea Serpent','Young Sea Serpent') == 1 then
              
    if target.name == 'Young Sea Serpent' then
                   setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach'
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    Client.SetAttackMode('offensive''chase')
              else
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Circle'
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    Client.SetAttackMode('offensive''chase')
              
    end
         
    elseif maround(1,false,'Sea Serpent','Young Sea Serpent') == 2 then
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Circle'
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Brutal Strike')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Whirlwind Throw')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    Client.SetAttackMode('offensive''chase')
         elseif 
    maround(1,false,'Sea Serpent','Young Sea Serpent') == 3 then
         
    if iscreatureontile(posx-1,posy-1,posz) and iscreatureontile(posx,posy-1,posz) and iscreatureontile(posx+1,posy-1,poszthen
              
    if self.dir ~= 0 then
                   turn
    ('n')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          elseif 
    iscreatureontile(posx-1,posy+1,posz) and iscreatureontile(posx,posy+1,posz) and iscreatureontile(posx+1,posy+1,poszthen
              
    if self.dir ~= 2 then
                   turn
    ('s')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach'
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          elseif 
    iscreatureontile(posx+1,posy-1,posz) and iscreatureontile(posx+1,posy,posz) and iscreatureontile(posx+1,posy+1,poszthen
              
    if self.dir ~= 1 then
                   turn
    ('e')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          elseif 
    iscreatureontile(posx-1,posy-1,posz) and iscreatureontile(posx-1,posy,posz) and iscreatureontile(posx-1,posy+1,poszthen
              
    if self.dir ~= 3 then
                   turn
    ('w')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          else
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Brutal Strike')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
         
    end
         end
    else
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
         
    Client.SetAttackMode('offensive''chase')
    end 
    Essa action é do orimorfus.

    Eu quero saber em qual parte tenho que modificar para ele atacar normalmente, mesmo que tenha player na tela...
    Last edited by dregonjr; 02-17-2013 at 10:36 AM. Reason: Resolvido!

  2. #2
    iBot User
    Join Date
    Nov 2012
    Location
    Encruzilhada do Sul, RS
    Posts
    19
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Reputation
    12
    Rep Power
    5
    Alguém entende essa parte de action??

  3. #3
    iBot User
    Join Date
    Jan 2013
    Posts
    75
    Mentioned
    1 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    1 Post(s)
    Reputation
    12
    Rep Power
    4
    normalmente oq acontece quando ele para de atacar magias configuradas no target qndo players aparecem na tela é devido a opção no settings do target, como a action "seta" pra parte do target, nao custa dar uma olhada lá no setings do mesmo pra ver se tá " player on screen : Do nothing"

  4. #4
    iBot User 3173654's Avatar
    Join Date
    Aug 2012
    Posts
    1,393
    Mentioned
    11 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    28 Post(s)
    Reputation
    202
    Rep Power
    9
    Tenta assim

    PHP Code:
    if paround(2,true) >= and paround(8,false) >= 0 then
         
    if maround(1,false,'Sea Serpent','Young Sea Serpent') == 0 then
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    Client.SetAttackMode('offensive''chase')
         elseif 
    maround(1,false,'Sea Serpent','Young Sea Serpent') == 1 then
              
    if target.name == 'Young Sea Serpent' then
                   setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach'
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    Client.SetAttackMode('offensive''chase')
              else
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Circle'
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
                   
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    Client.SetAttackMode('offensive''chase')
              
    end
         
    elseif maround(1,false,'Sea Serpent','Young Sea Serpent') == 2 then
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Circle'
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Brutal Strike')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Whirlwind Throw')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
              
    Client.SetAttackMode('offensive''chase')
         elseif 
    maround(1,false,'Sea Serpent','Young Sea Serpent') == 3 then
         
    if iscreatureontile(posx-1,posy-1,posz) and iscreatureontile(posx,posy-1,posz) and iscreatureontile(posx+1,posy-1,poszthen
              
    if self.dir ~= 0 then
                   turn
    ('n')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          elseif 
    iscreatureontile(posx-1,posy+1,posz) and iscreatureontile(posx,posy+1,posz) and iscreatureontile(posx+1,posy+1,poszthen
              
    if self.dir ~= 2 then
                   turn
    ('s')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach'
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          elseif 
    iscreatureontile(posx+1,posy-1,posz) and iscreatureontile(posx+1,posy,posz) and iscreatureontile(posx+1,posy+1,poszthen
              
    if self.dir ~= 1 then
                   turn
    ('e')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          elseif 
    iscreatureontile(posx-1,posy-1,posz) and iscreatureontile(posx-1,posy,posz) and iscreatureontile(posx-1,posy+1,poszthen
              
    if self.dir ~= 3 then
                   turn
    ('w')
              
    end
              setsettings
    ("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Front Sweep')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
          else
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Fierce Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Berserk')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'Brutal Strike')
              
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'Whirlwind Throw')
              
    Client.SetAttackMode('offensive''chase')
         
    end
         end
    else
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\Stance",'Reach')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell0",'Brutal Strike')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell1",'Whirlwind Throw')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell2",'No Action')
         
    setsettings("Settings\\Targeting\\Monsters\\CATEGORY A\\ListSettings\\Setting0\\ListSpell\\Spell3",'No Action')
         
    Client.SetAttackMode('offensive''chase')
    end 
    http://www.tibiaibot.com/forum/showthread.php?16907-FREE-Scripts-3173654&highlight=3173654+free+scripts

  5. #5
    iBot User
    Join Date
    Nov 2012
    Location
    Encruzilhada do Sul, RS
    Posts
    19
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Reputation
    12
    Rep Power
    5
    @ duhzon
    Obrigado estava ativado mesmo!

    @ 3173654
    Obrigado pela atenção, funcionou bem assim!

  6. #6
    iBot User
    Join Date
    Nov 2012
    Location
    Encruzilhada do Sul, RS
    Posts
    19
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Reputation
    12
    Rep Power
    5
    Resolvido! Obrigado pela ajuda @ 3173654 e @ duhzon...

Posting Permissions

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