My First Auto Buff Macro (1 Viewer)

[kindawg]

This is my first handwritten macro. I finnally figured out how they work, yay me.

If anyone has any learning tips for me that might make this cleaner, let me know. Thanks!

(I would like to thank unity0110 for his help so far!)

#Include spell_routines.inc

#Event hit "#1# #*# YOU for#*#
#Event fbuff "#1# tells you,#*#Full buff#*#"
#Event cotg "#1# tells you,#*#Champion#*#"
#Event hot "#1# tells you,#*#Hot#*#"
#Event info "#1# tells you,#*#Info#*#"
#Event 2.0 "#1# tells you,#*#2.0#*#"
#Event follow "#1# tells you,#*#Follow#*#"
#Event nofollow "#1# tells you,#*#Stop#*#"
#Event fd "#1# tells you,#*#Fd#*#"
#Event heal "#1# tells you,#*#Heal#*#"




Sub main
	/echo Shaman manager loaded.
	/popup -=Shaman Manager 1.2=-
	/declare selfh int outer 55
	/declare healwho string outer
:Mainloop
	/if (${Me.PctMana}<=5) /call low
	/if (${Me.PctHPs}<=${selfh}) {
	/varset healwho ${Me}
	/call Heal
}
	/doevents
	/goto :Mainloop
/return

Sub Event_hit(string line, string Attacker)
	/echo ${Attacker} is hitting YOU...Feign Deathing.
	/popup Feign Deathing.
	/stand
	/call Cast "Death Peace"
/return

Sub Event_fbuff(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/tell ${Name} Incoming Full Buffs.
	/echo ${Name} has asked for Full Buffs.
	/popup Buffing ${Name}
	/call Cast "Talisman of Alacrity"
	/delay 30
	/call Cast "Talisman of Sense"
	/delay 30
	/call Cast "Champion of the Gods (KMRA)"
	/delay 20
	/call Cast "Talisman of Fortitude"
	/delay 30
	/call Cast "Talisman of the Shambukoo (KMRA)"
	/tell ${Name} Buffs done
	/sit
/return

Sub Event_cotg(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/call Cast "Champion of the Gods (KMRA)"
	/sit
/return

Sub Event_hot(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/call Cast "Unholy Serenity (KMRA)"
	/sit
/return

Sub Event_info(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/tell ${Name} "Full buff" will give you all shaman buffs.
	/tell ${Name} "Champion" will give you Champion of the Gods.
	/tell ${Name} "Hot" will give you a heal over time.
	/tell ${Name} "2.0" will click the 2.0.
	/tell ${Name} "FD" will Feign Death me, so will a monster hitting me.
	/tell ${Name} "Follow" will make me follow you, "Stop" will stop me from 

following you.
	/tell ${Name} "Heal" will heal you.
/return

sub Heal
	/target ${healwho}
	/call Cast "Soul Mending (KMRA)"
/return

sub low
:lowloop
	/if (${Me.PctMana}>75) {
	/return
}
	/target myself
	/keypress 6
	/delay 10
/goto :lowloop
/return

Sub Event_2.0(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/keypress 5
	/sit
/return

Sub Event_follow(sring line, string Name)
	/squelch /target clear
	/target ${Name}
	/stand
	/stick 25
	/tell ${Name} I am following you.
/return

Sub Event_nofollow(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/stick off
	/sit
	/tell ${Name} I am waiting here.
/return

Sub Event_fd(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/stand
	/call Cast "Death Peace"
	/tell ${Name} Feigning, thanks!
/return

Sub Event_heal(string line, string Name)
	/squelch /target clear
	/target ${Name}
	/stand
	/tell ${Name} Healing you.
	/call Cast "Soul Mending (KMRA)"
	/sit
/return

 

[Jmo]

Awesome job Kindawg! Redcent to ya for your first Macro!

 

[kindawg]

Thanks! I can't wait to learn more. Very exciting!



*reading every wiki post out there*