Uses some old code so it works with many Emulated servers(Such as WR) and is very simple and easy to modify
Just replace SOANDSO with you're main's name and it will work flawlessly made mainly for two boxing Short and sweet
The commands can be given in group, tell or even shout, works nice if you set up hotkeys as if talking in a group.
Instances where this is useful, was 6 boxing, playing my warrior with two mages, a BL, Enchanter and Cleric, Easily modified to each charcter and each had their own commands that were easily disguised as group text and modified delays.
Future plans include random responses from the group and a safety to double check movement.
Code: Select all
#turbo
#event FollowON "followon"
#event FollowOFF "followoff"
#event sittog "sittog"
#event kill "killmytarget"
#event nuke "FireNuke"
#event nuke2 "ColdNuke"
#event nuke3 "MagicNuke"
#event buff1 "Clarityplease"
#event buff2 "Hasteplease"
Sub Main
/zapvars
/declare fv global
/declare sitvar global
/stand
/varset sitvar 0
/echo Initialiing
:Loop
/doevents
/if @fv==1 /call event_Followon
/goto :Loop
/return
Sub Event_FollowON
:followon
/varset fv 1
/doevents
/face fast
/if n $target(distance)>50 /sendkey down up
/if n $target(distance)<30 /sendkey up up
/if n @fv==1 /goto :followon
/return
Sub Event_FollowOFF
/g Stopping
/varset fv 0
/return
Sub Event_sittog
/if ($char(state)==STAND && n @sitvar==0) {
/sit
/gsay Sitting
/varset sitvar 1
/return
}
/if ($char(state)==SIT && n @sitvar==1) {
/stand
/gsay Standing
/varset sitvar 0
/return
}
/return
Sub Event_kill
/varset fv 0
/assist SOANDSO
:kill
/delay 7
/pet kill
/delay 5
/if $target(type)==NPC /target SOANDSO
/if $target(type)==NULL /target SOANDSO
/return
Sub Event_nuke
/varset fv 0
/assist SOANDSO
/delay 8
:nuke
/cast 1
/delay 4s
/if $target(type)==NPC /target SOANDSO
/if $target(type)==NULL /target SOANDSO
/return
Sub Event_nuke2
/varset fv 0
/assist SOANDSO
/delay 8
:nuke
/cast 1
/delay 4s
/if $target(type)==NPC /target SOANDSO
/if $target(type)==NULL /target SOANDSO
/return
Sub Event_nuke3
/varset fv 0
/assist SOANDSO
/delay 8
:nuke
/cast 1
/delay 4s
/if $target(type)==NPC /target SOANDSO
/if $target(type)==NULL /target SOANDSO
/return
Sub Event_buff1
/varset fv 0
/assist SOANDSO
/delay 5
/cast 7
/delay 4s
/target SOANDSO
/return
Sub Event_buff2
/varset fv 0
/assist SOANDSO
/delay 5
/cast 7
/delay 4s
/target SOANDSO
/return
