old macro I could use some help with please

[Smitty]

I have been using this macro for some time now.. I made a few changes to it to suit my tastes and needs. But with the changes to MQ system I cant seem to get this to run right anymore, and I can not find the original (yes I did search) to ask the original maker if he kept it updated.

So I made a few more changes ( and I must have screwed something up since now my Hotkeys dont work when I run the macro, please any help would be greatly appreciated.


'------------------------------------------------------------------------------
'FILE DESCRIPTION: rogue
'------------------------------------------------------------------------------
|rogue-assist.mac
|Rogue Melee assist macro.
|version 3
#Turbo 20
#Event Enraged "has become ENRAGED"
#Event Offrage "is no longer enraged"

Sub Main
/declare RangeMin global
/declare RangeMax global
/declare FastRange global
/declare Combatstatus global
/declare CastTimer timer
/declare EnrageVar global
/declare Disarm global
|--------------------------------------
|Edit this to change autoheal
|Edit this to chang auto disarm

|---------------------------------------
/varset RangeMin @Param0
/varset RangeMax @Param1
/varset FastRange @Param2
/varset Combatstatus 0
/varset EnrageVar 0
:Mainloop
/call Combatcheck
/if @Combatstatus=="1" /call RangeSub
/if @Combatstatus=="1" /call Checkbehind
/if @Combatstatus=="1" /call Evadeit
/if @Combatstatus=="1" /call Disarmit
/if @Combatstatus=="1" /call Checkbehind
/if @Combatstatus=="1" /call pickpockets
/if $cursor(id)!="NULL" /call invdrop
/doevents
/goto :Mainloop
/return


Sub invdrop
/autoinv
}
}
}
/return



Sub Checkbehind
/if n $distance($calc($target(y)-$cos($target(heading))*10),$calc($target(x)-$sin($target(heading))*10))<8 {
/if @Combatstatus=="1" /call Backstabit
}
/return

Sub Disarmit

/if @Combatstatus=="1" {
/doability "Disarm traps"
}
/return

Sub Evadeit
/if n $char(ability,"Hide")!=-2 {
/if @Combatstatus=="1" {
/attack off
/doability "Hide"
/if @EnrageVar!="1" /attack
}
}
/return


Sub pickpockets
/if n $char(ability,"pick pockets")!=-2 {
/if @Combatstatus=="1" {
/attack off
/doability "pick pockets"
/if @EnrageVar!="1" /attack
}
}
/return
Sub Backstabit
/if n $char(ability,"Backstab")!=-2 {
/if $target()=="TRUE" {
/face fast
/delay 2
/doability "backstab"
}
}
/return

Sub Combatcheck
/if @EnrageVar=="1" {
/if $target()=="TRUE" {
/return
} else {
/varset EnrageVar 0
/varset Combatstatus 0
}
}
/if $target()=="FALSE" {
/varset Combatstatus 0
/if $combat=="TRUE" {
/attack off
}
/return

}
/if $target()=="TRUE" {
/if $combat=="TRUE" {
/varset Combatstatus 1
/return
}
}
/varset Combatstatus 0
/return



Sub Rangesub
/stand
/face fast
/if n $target(distance)>=@FastRange /call Fastmove
/if n $target(distance)>@RangeMax {
/keypress up
}
/if n $target(distance)<@RangeMin {
/keypress down
}
/return


Sub Event_Enraged
/if $target()=="TRUE" {
/varset EnrageVar 1
/attack off
}
/return

Sub Fastmove
:fastmoveloop
/if $target()=="FALSE" {
/varset Combatstatus 0
/keypress up
/if $combat=="TRUE" {
/attack off
/return
}
}
/stand
/face fast
/if n $target(distance)>@FastRange {
/keypress up
/attack off
}
/if n $target(distance)<=@FastRange {
/if @Combatstatus=="1" {
/if @EnrageVar=="0" {
/attack on
}
}
/keypress up
/return
}
/goto :fastmoveloop
/return


Sub Event_Offrage
/if $target()=="TRUE" {
/varset EnrageVar 0
/attack
}
}
/return




That is what I had been using.. Thanks for the help/advice