Code: Select all
|druidmac modified for shammy
#include SpellSub.mac
#include Spellbook.mac
#chat tell
#event RegenOff "You have stopped regenerating."
Sub Main
/varset v30 $p0
/varset v34 $p1
/tell $v30 Ready
:a
/doevents
/goto :a
/return
Sub Event_Chat
/stand
/varset v33 $p1
| Check if Tell is from the Controller, if not inform Controller
/if "$v33"!="$v30" {
/mqlog Tell from $p1 : $p2
/tell $p1 Sorry i'm really busy at the moment and not avaible for tells
/delay 2
/tell $v30 Tell from $p1 to $char(name) , i told him that i'm busy
/sit
/return
}
/target $v33
/if "$p2"~~"00slow" /call Slowsub
/if "$p2"~~"00heal" /call HealSub
/if "$p2"~~"00stamina" /call StaminaSub
/if "$p2"~~"00talisman" /call TalismanSub
/if "$p2"~~"00Regen" /call RegenSub
/if "$p2"~~"00sow" /call SoWSub
/if "$p2"~~"00root" /call RootSub
/if "$p2"~~"00come" /call GoTarget
/if "$p2"~~"00self" /call SelfBuff
/if "$p2"~~"00home" /call GoHome
/if "$p2"~~"00sheal" /call SelfHeal
/if "$p2"~~"00sregen" /call Sregen
/if "$p2"~~"00stand" /call Stand
/if "$p2"~~"00sit" /call Sit
/if "$p2"~~"00status" /call Status
/if "$p2"~~"00help" /call Help
/doevents
/return
sub Slowsub
/assist $v33
/tell $v33 slowing %t
/cast "spirit of wolf
/delay 5s
/target myself
/delay 0s
/tell $v33 Slowed %t i hope, Mana: $char(mana,pct), HP: $char(hp,pct)
/return
sub HealSub
/tell $v33 INC Heal for %T
/cast "greater healing"
/delay 6s
/target myself
/delay 0s
/tell $v33 Healing done, Mana: $char(mana,pct), HP: $char(
hp,pct)
/return
sub StaminaSub
/tell $v33 INC stamina for %T
/cast "stamina"
/delay 5s
/target myself
/delay 0s
/tell $v33 sta Buff done, Mana: $char(mana,pct), HP: $char(
hp,pct)
/return
sub TalismanSub
/tell $v33 INC Talisman for %T
/cast "talisman of altuna"
/delay 8s
/target myself
/delay 0s
/tell $v33 Talisman Buff done, Mana: $char(mana,pct), HP: $char(
hp,pct)
/return
sub RegenSub
/tell $v33 INC Regeneration for %T
/cast "chloroplast"
/delay 8s
/target myself
/delay 0s
/tell $v33 Regeneration Buff done, Mana: $char(mana,pct), HP:
$char(hp,pct)
/return
sub SoWSub
/tell $v33 INC SoW for %T
/cast "spirit of wolf"
/target myself
/delay 0s
/tell $v33 SoW Buff done, Mana: $char(mana,pct), HP: $char(
hp,pct)
/return
sub RootSub
/assist $v33
/delay 6
/tell $v33 Rooting %T
/cast "instill"
/delay 4s
/target myself
/delay 0s
/tell $v33 %T is rooted, Mana: $char(mana,pct), HP: $char(
hp,pct)
/target $v33
/return
sub SelfBuff
/press F1
/tell $v33 Casting SoW now on myself
/cast "spirit of wolf"
/delay 5s
/tell $v33 Casting Talisman now on myself
/cast "talisman of altuna"
/delay 8s
/tell $v33 Casting Stamina now on myself
/cast "stamina"
/delay 4s
/target myself
/delay 0s
/tell $v33 Selfbuffs done, Mana: $char(mana,pct), HP: $char(
hp,pct)
/target $v33
/return
sub GoHome
/stand
/sit
/tell $v33 Camping...
/camp desktop
/unload
/return
sub GoTarget
/stand
/target $v33
/face
/varset v90 $target(id)
/varset t0 5m
/tell $v33 I'm coming
:CloserAF
/doevents
/if "$target(id)"!="$v90" /goto :EndAF
/if n $target(distance)>5 /call AutoRun 1
/if n $target(distance)<10 /goto :EndAf
/face
/doevents
/if n $t0==0 /press esc
/goto :CloserAF
:EndAF
/call AutoRun 0
/tell $v33 stopped
/doevents
/return
sub AutoRun
/if $p0==$v80 /return
/varset v80 $p0
/if $p0==1 /sendkey down up
/if $p0==0 /sendkey up up
/return
sub SelfHeal
/press F1
/tell $v33 INC Heal for %T
/cast "greater healing"
/delay 5s
/target myself
/delay 0s
/tell $v33 Healing done, Mana: $char(mana,pct) HP: $char(
hp,pct)
/target $v33
/return
sub Nuke
/assist $v33
/delay 6
/tell $v33 Nuking %T
/press 3
/delay 12s
/target myself
/delay 0s
/tell $v33 Nuke on %T done, Mana: $char(mana,pct), HP: $char
(hp,pct)
/target $v33
/return
sub Sregen
/target myself
/tell $v33 Regening self
/cast "chloroplast"
/delay 8s
/target myself
/delay 0s
/tell $v33 regen done Mana: $char(mana,pct), HP: $char(hp,pct)
/target $v33
/return
sub Stand
/tell $v33 Standing, master
/delay 1s
/stand
/return
sub Sit
/tell $v33 Sitting, master
/delay 1s
/sit
/return
sub Status
/target myself
/delay 0s
/tell $v33 HP: $char(hp,pct) Mana: $char(mana,pct)
/return
sub Event_RegenOff
/tell $v33 HP Regeneration Buff needs to be recasted.
/return
sub Help
/tell $v33 heal, talisman, regen, sow, root, come, self, home, sheal, status
/tell $v33 nuke, slow that is all!
/return
Flint
