Simple Cleric, Nothing in VIP works.

Have a macro idea but not sure where to start? Ask here.

Moderator: MacroQuest Developers

adakos
decaying skeleton
decaying skeleton
Posts: 7
Joined: Sat Dec 24, 2005 5:12 pm

Simple Cleric, Nothing in VIP works.

Post by adakos » Fri Dec 12, 2008 7:05 pm

I currently play on the Eqemu servers and finding macro's has been a tedious job, and not only finding working macros, fixing them to work with the 2005 build is pretty drat tough, I was hoping someone here might be able to help me with this very simple request.

What I need is a cleric bot. All it needs to do is check party health and heal at a set %, and manstone at %health and %mana limits.

My friend whom is fairly good at this helped me create this little nugget of joy, but not being in contact with him I was hoping that someone could help me put in a manastone check, or maybe see if there are any improvements that can be made.

I know this is just a straight out beg, but I am hoping someone will take mercy on me and just add in a manastone check at the very least, thank you very much.

Code: Select all


#include spell_routines.inc
#turbo


| ################## 
Sub Main
   /declare counter int outer 0
/declare count_grp int outer 0 
/declare HealAt   int   outer 59
/declare TargetName string outer 
/declare LastTargetName string outer 
   /declare SpellHeal          outer "Ethereal Light"
:loop
   /doevents


:InternalLoop
/call checkheals
/if  (!${Me.Casting.ID}) {
/if (${Me.Standing}) /sit
/delay 1
}
/goto :InternalLoop

/return

sub checkheals
/for count_grp 0 to ${Group}
 
/varset TargetName ${Group.Member[${count_grp}].Name}
| -- |  /echo Member: # ${count_grp} Name: <- ${TargetName} -> HP: ${Group.Member[${count_grp}].PctHPs} %
/if (${Group.Member[${count_grp}].PctHPs}<${HealAt}) {
/target ${TargetName}
/delay 5 
/g ${TargetName} I will heal you. You are at  ${Group.Member[${count_grp}].PctHPs} .
/call cast ${SpellHeal} gem1 5s
}
/next count_grp
/return
If you are feeling generous because of the holiday spirit you can clean it up, or add in whatever you like, I will admit I am at the very, very, very basic intro level macro creating and having someone add in any features would be awesome.

Thank you in advance.

adakos
decaying skeleton
decaying skeleton
Posts: 7
Joined: Sat Dec 24, 2005 5:12 pm

Post by adakos » Sat Dec 13, 2008 3:20 pm

got what I need working, A little try and you can do anything with MQ and the guide and wiki... here is my working code...


Code: Select all




#include spell_routines.inc
#turbo


| ################## 
Sub Main
/declare DrainTillHP int outer 60
 /declare DrainTillMANA int outer 90

   /declare counter int outer 0
/declare count_grp int outer 0 
/declare HealAt   int   outer 59
/declare TargetName string outer 
/declare LastTargetName string outer 
   /declare SpellHeal          outer "Ethereal Light"
:loop
   /doevents


:InternalLoop
/call checkheals
/call checkmana
/goto :InternalLoop

/return

sub checkheals
/for count_grp 0 to ${Group}
 
/varset TargetName ${Group.Member[${count_grp}].Name}
| -- |  /echo Member: # ${count_grp} Name: <- ${TargetName} -> HP: ${Group.Member[${count_grp}].PctHPs} %
/if (${Group.Member[${count_grp}].PctHPs}<${HealAt}) {
/target ${TargetName}
/delay 5 
/g ${TargetName} I will heal you. You are at  ${Group.Member[${count_grp}].PctHPs} .
/call cast ${SpellHeal} gem1 5s
}
/next count_grp
/return

Sub checkmana
/if (${Me.PctMana}<=${DrainTillMANA} && ${Me.PctHPs}>=${DrainTillHP}) {
/cast item "improved manastone"
}
/delay 1
/return


Chocolate_Rain
a lesser mummy
a lesser mummy
Posts: 76
Joined: Thu Mar 06, 2008 3:01 pm

Post by Chocolate_Rain » Wed Dec 24, 2008 7:13 pm

i cannot seem to get this to work i can share some macros i have made for my eqemu server if you wish

imanlyman
orc pawn
orc pawn
Posts: 14
Joined: Sat Oct 26, 2002 8:17 pm

Post by imanlyman » Mon Jan 05, 2009 9:14 pm

What version of spell_routines are you using with this?

xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 3:27 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 3:28 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 3:30 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:07 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:08 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:09 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:10 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:11 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:12 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:14 am


xyilla
naggy
naggy
Posts: 29514
Joined: Sun Feb 23, 2025 5:36 am

Re: Simple Cleric, Nothing in VIP works.

Post by xyilla » Thu Sep 04, 2025 4:15 am