Moderator: MacroQuest Developers








Code: Select all
/declare checker local
:resist
/if n @checker!=1 /if n $target(distance)<=70 {
/sit
/delay 0
/sit off
/activate altnerate or /click hotkey#
}
/if n $target(animation)=!34 {
/varset checker 2
/goto :resist
}
Code: Select all
/varadd ObstCount 1
/if n @ObstCount>=3 {
/call CheckObst
}
/goto :fastmoveloop
/return
Code: Select all
/varadd ObstCount 1
/if n @ObstCount>=3 {
/call CheckObst
}
/face fast
/goto :fastmoveloop
/return
Code: Select all
sub CheckBuffs
/if n $char(buff,"arcane rune")==0 {
/cast "arcane rune"
:casting_ar
/if $char(casting)=="TRUE" {
/echo CASTING
/goto :casting_ar
}
/delay 25
}
/if n $char(buff,"voice of quellious")==0 {
/press ESC
/press F1
/echo VoQ on $target(name)
/cast "voice of quellious"
:casting_voq
/if $char(casting)=="TRUE" {
/echo CASTING
/goto :casting_voq
}
/delay 25
}
/delay 25
/if n $char(buff,"levitation")==0 {
/press ESC
/press F1
/echo Levitation on $target(name)
/cast "levitation"
:casting_lev
/if $char(casting)=="TRUE" {
/echo CASTING
/goto :casting_lev
}
/delay 25
}
Code: Select all
/if $char(class)==Enchanter {
/echo Tab Target $target(name)
/press TAB
/delay 2
/press ESC
/delay 2
/press F1
/delay 2
/press F1
/delay 2
/echo target pet $target(name)
/if $target()=="FALSE" {
/echo "Pet down"
/endmacro
}
/press ESC
/delay 2
/press F1
/delay 2
/press TAB
/echo kill target $target(name)
/pet kill
}
Code: Select all
sub GetTarget
:Acquire
/echo Acquiring...
/target nopcnear @KSRadius npc "@MainArray(2,$rand(@MobArraySize))"
/echo How about $target(name)
/varset MyTarget $target(id)
/varset TargetDead 0
/if n $target(id)==0 /goto :Acquire
/if $target()=="False" /goto :Acquire
/if n $target(distance)>@MaxTargDist {
/echo Too Far $target(distance)
/goto :Acquire
}
/varset HasTarget 1
/echo Distance $target(distance)
/varset MobToHunt $target(name)
/return
Code: Select all
sub MoveToOrig
/if n $distance(@OrigLocY,@OrigLocX)>@MaxDistFromOrig {
/call moveto @OrigLocY @OrigLocX
}
/return