Post Reply 
 
Thread Rating:
  • 2 Vote(s) - 3 Average
  • 1
  • 2
  • 3
  • 4
  • 5
My really advanced macro for rings
09-08-2016, 04:39 PM (This post was last modified: 09-08-2016 08:03 PM by Catar.)
Post: #1
My really advanced macro for rings
I made this really complex macro i use on my Demons full afk pall hexera script to switch between 3 different rings.

My macro does:
  • Checks if there are avaiable Prismatic Rings, Ring of healings and Life rings.
  • Checks combat state and PZ state.
  • Checks how many demons bot fights
  • Checks how much mana character have.
  • Puts on Prismatic Ring, if avaiable and when there are more than 3 Demons.
  • Uses Ring of Healings,if they're avaiable, and during a combat.
  • Uses Life Rings, if they are avaiable, when there is no RoH, less than 3 Demons.
  • Uses life rings when there is no Ring of Healings avaible and/or when out of combat
  • Stops using Life ring and RoH when mana is higher than 95%
  • Takes off rings when in protection zone.
  • And YES its all in just ONE macro, of 70+ lines!!!



Variables
PrismHotkey is a Virtual key code of ur prismatic ring hotkey
Code:
PrismHotkey=120

prismonID=16264
prismofID=16114
SecondaryRing=3098
SecondaryRingOn=3100
PrimRing=3052
PrimRingOn=3089


Ringi (auto: 700ms)
700 {Ringi}
PeZe:=Status.InPZ()
cmbt:=Status.Battle()
Smana:=Self.Mana%()
pringOFF:=Misc.ItemCountEx(!PrimRing!)
pringON:=Misc.ItemCountEx(!PrimRingOn!)
pring:=!pringON!
VarAdd(pring, !pringOFF!)
sndringOFF:=Misc.ItemCountEx(!SecondaryRing!)
sndringON:=Misc.ItemCountEx(!SecondaryRingOn!)
sndring:=!sndringOFF!
VarAdd(sndring, !sndringON!)
prismringOFF:=Misc.ItemCountEx(!prismofID!)
prismringON:=Misc.ItemCountEx(!prismonID!)
prismring:=!prismringOFF!
VarAdd(prismring, !prismringON!)
coAS:=Self.Inventory.Ring()
QtDem:=Creatures.ByRangeName(2, Demon)
!cmbt!<>1 [cmb]
!PeZe!<>1 [pz]
!Smana!<95 [mana1]
!coAS!<>!PrimRingOn!
Self.Equip.Ring(!PrimRing!)
exit()
{mana1}
Self.UnEquip.Ring(0)
exit()
{pz}
Self.UnEquip.Ring(0)
exit()
{cmb}
!prismring!>=1 [prsm]
!QtDem!>=3 [dem]
Self.Inventory.Ring()<>!prismonID!
Tibia.SendKey(!PrismHotkey!)
exit()
{dem}
!PeZe!<>1 [pz2]
!Smana!<95 [mana2]
!sndring!>=1 [secr]
!coAS!<>!SecondaryRingOn!
Self.Equip.Ring(!SecondaryRing!)
exit()
{secr}
!pring!>=1 [pring]
!coAS!<>!PrimRingOn!
Self.Equip.Ring(!PrimRing!)
exit()
{pring}
Self.UnEquip.Ring(0)
exit()
{mana2}
Self.UnEquip.Ring(0)
exit()
{pz2}
Self.UnEquip.Ring(0)
exit()
{prism}
!PeZe!<>1 [pz2]
!Smana!<95 [mana2]
!sndring!>=1 [secr]
!coAS!<>!SecondaryRingOn!
Self.Equip.Ring(!SecondaryRing!)
exit()
{secr}
!coAS!<>!PrimRingOn!
Self.Equip.Ring(!PrimRing!)
exit()
{mana2}
Self.UnEquip.Ring(0)
exit()
{pz2}
Self.UnEquip.Ring(0)
exit()


I use F9 hotkey as Equip for prismatic ring, because it works with 100% succes, and Self.Equip may sometimes lag,
And having prismatic ring put instant when its needed i s crucial for my macro to keep my pally alive Wink

[Image: 5hiV3Gr.png]
Give Reputation to this user

Before you PM me, READ THIS [Image: KHCf9l2.png]

[Image: naLmyGH.png]

My Scripts, Macros and Tutorials
Find all posts by this user
Quote this message in a reply
09-08-2016, 11:20 PM
Post: #2
RE: My really advanced macro for rings
wtf!! great work man!
Give Reputation to this user

Helped?Please click on "Give Reputation to This User"...Thanks.

[Image: rpPc2Sb.png?1]
[Image: Ogu21RI.png?1]

Support Skype:
nosbor00
Visit this user's website Find all posts by this user
Quote this message in a reply
09-09-2016, 11:49 AM
Post: #3
RE: My really advanced macro for rings
(09-08-2016 11:20 PM)nosbor00 Wrote:  wtf!!

What's so surprising? ;D


That's not even most complex macro I made so far.

BBot macro possibilities are huge, just ppl dont understand it Smile
Give Reputation to this user

Before you PM me, READ THIS [Image: KHCf9l2.png]

[Image: naLmyGH.png]

My Scripts, Macros and Tutorials
Find all posts by this user
Quote this message in a reply
01-05-2017, 12:04 AM
Post: #4
RE: My really advanced macro for rings
Such as? thought it was impossible to create macro in this bot, simple ones such as equiping ring barely works
Give Reputation to this user
Find all posts by this user
Quote this message in a reply
01-05-2017, 04:44 AM (This post was last modified: 01-05-2017 04:51 AM by Catar.)
Post: #5
RE: My really advanced macro for rings
(01-05-2017 12:04 AM)FelixZN Wrote:  Such as? thought it was impossible to create macro in this bot, simple ones such as equiping ring barely works

because people simply don't understand how to make them Tongue

just look at any of my videos i posted on this forum.

Without my macros, i wouldn't be able to do what i do now.
Each script i use has like 20 of them
Give Reputation to this user

Before you PM me, READ THIS [Image: KHCf9l2.png]

[Image: naLmyGH.png]

My Scripts, Macros and Tutorials
Find all posts by this user
Quote this message in a reply
Post Reply 


Forum Jump:


User(s) browsing this thread: 1 Guest(s)