;VARIABLES

set #lpc 10000 ;Scriptspeed
set %casttime 0
set %time
set %lag 0 ;If u normally cast faster then the script does, take a negative value (example -1)
set %bandagewait #scnt2
set %usetaunt yes ;;; set to no if you dont want to use them
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; dont edit these variables
set %td #scnt2
set %t 1
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;KEY SETUP

PauseLoop:
onhotkey SCROLLLOCK
{
event SysMessage Spellkeys: Enabled
wait 2
goto Start
}
if #hits < #maxhits && #scnt2 > %bandagewait
 gosub aids
goto PauseLoop:

start:
onhotkey SCROLLLOCK
{
event SysMessage Spellkeys: Disabled
wait 2
goto PauseLoop
}

;onhotkey q
;goto Paralyze

;onhotkey 1
;goto GreaterHeal

;onhotkey 1
;goto GreaterHealLT

onhotkey 1
goto Heal

;onhotkey 3
;goto cure

;onhotkey 3
;goto ArchCure

;onhotkey 4
;goto ChivHealCure

onhotkey a
goto Poison

onhotkey s
goto Fireball

onhotkey g
goto Harm

;onhotkey h
;goto EnergyBolt

onhotkey d
goto Explosion

onhotkey f
goto Flamestrike

onhotkey j
goto corpseskin

;onhotkey k
;goto PainSpike

onhotkey h
goto Painspike

;onhotkey m
;goto CorspeSkin

onhotkey j
goto poisonstrike

onhotkey v
goto strangle

onhotkey c
goto MagicArrow

onhotkey q
goto CorspeSkin

onhotkey w
goto Curse

;onhotkey 0
;goto Dispel

onhotkey e
goto EvilOmen

onhotkey r
goto bloodOath

;onhotkey 9
;goto HealCure

;onhotkey 8
;goto Bless

onhotkey t
goto Removecurse

onhotkey b
goto energybolt

;onhotkey o
;goto CloseWounds

onhotkey m
goto lightning

if #hits < #maxhits && #scnt2 > %bandagewait
gosub aids

goto start


;SPELLS

Weaken:
event macro 15 7
set %casttime 5
gosub CastLastTarget

GreaterHeal:
event macro 15 28
set %casttime 1
gosub CastSelf

GreaterHealLT:
event macro 15 28
set %casttime 2
gosub CastLastTarget

Heal:
if c in #charstatus
   goto cure
event macro 15 3
set %casttime 6
gosub CastSelf
if c in #charstatus

cure:
event macro 15 10
set %casttime 6
gosub CastSelf

ArchCure:
event macro 15 24
set %casttime 12
gosub CastSelf

ArchCureLT:
event macro 15 24
set %casttime 10
gosub CastLastTarget

Poison:
event macro 15 19
set %casttime 7
gosub CastLastTarget

Fireball:
event macro 15 4
set %casttime 3
set %time ( #Scnt2 + %casttime + %lag )
set %timex ( %time + 3 )
CastLastTargetLoop5:
if ( #Scnt2 >= %time && #targcurs > 0 )
{
event macro 22 0
}
if ( #scnt2 >= %timex && #targcurs < 1 )
  goto start2
goto CastLastTargetLoop5
if ( #scnt2 >= %timex && #targcurs < 1 )
  goto start2

start2:
event macro 15 17
set %casttime 9
gosub CastLastTarget

Harm:
event macro 15 11
set %casttime 5
gosub CastLastTarget

EnergyBolt:
event macro 15 41
set %casttime 16
gosub CastLastTarget

Explosion:
;event macro 15 42
;set %casttime 16
;gosub CastLastTarget

event macro 15 42
set %casttime 16
set %time ( #Scnt2 + %casttime + %lag )
set %timex ( %time + 3 )
CastLastTargetLoop5:
if ( #Scnt2 >= %time && #targcurs > 0 )
{
event macro 15 50

}
if ( #scnt2 >= %timex && #targcurs < 1 )
  goto start3
goto CastLastTargetLoop5
if ( #scnt2 >= %timex && #targcurs < 1 )
  goto start3

start3:
event macro 15 17
set %casttime 9
gosub CastLastTarget

Flamestrike:
event macro 15 50
set %casttime 19
gosub CastLastTarget

Explosion2:
goto Explosion
goto Flamestrike

Lightning:
event macro 15 29
set %casttime 12
gosub CastLastTarget

PainSpike:
event macro 15 109
set %casttime 4
gosub CastLastTarget

BloodOath:
event macro 15 102
set %casttime 12
gosub CastLastTarget

CorspeSkin:
event macro 15 103
set %casttime 9
gosub CastLastTarget

Curse:
event macro 15 26
set %casttime 9
gosub CastLastTarget

Mindblast:
event macro 15 36
set %casttime 12
gosub CastLastTarget

MagicArrow:
event macro 15 4
set %casttime 4
gosub CastLastTarget

Strangle:
event macro 15 111
set %casttime 13
gosub CastLastTarget

Dispel:
event macro 15 40
set %casttime 12
gosub CastLastTarget

EvilOmen:
event macro 15 105
set %casttime 6
gosub CastLastTarget

Bless:
event macro 15 16
set %casttime 6
gosub CastSelf

PoisonStrike:
event macro 15 110
set %casttime 12
gosub CastLastTarget

CleansyByFire:
event macro 15 201
set %casttime 6
gosub CastSelf

CloseWounds:
event macro 15 202
set %casttime 8
gosub CastSelf

RemoveCurse:
event macro 15 209
set %casttime 8
gosub CastSelf

ChivHealCure:
if C in #charstatus
goto CleansyByFire
goto Heal

HealCure:
if C in #charstatus
goto Cure
goto Heal

sub Aids ;; double clicks bandages
finditem ZLF C_ , #backpackid
if #findcnt < 1
     return
set #Lobjectid #findid
event macro 17 0
target
event macro 23 0
set %Bandagewait ( #sCnt2 + ( 100 - ( ( #dex - 10 ) / 20 ) * 10 ) ) + 6
gosub gettuant
return

;SUB ROUTINES

sub CastLastTarget
set %time ( #Scnt2 + %casttime + %lag )
set %timex ( %time + 3 )
CastLastTargetLoop:
if ( #Scnt2 >= %time && #targcurs > 0 )
{
event macro 22 0
goto start
}
if ( #scnt2 >= %timex && #targcurs < 1 )
  goto start
goto CastLastTargetLoop

sub CastSelf
set %time ( #Scnt2 + %casttime + %lag )
set %timex ( %time + 3 )
CastSelfLoop:
if ( #Scnt2 >= %time && #targcurs > 0 )
{
event macro 23 0
goto start
}
if ( #scnt2 >= %timex && #targcurs < 1 )
  goto start
goto CastSelfLoop

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub gettaunt
if #scnt2 < %TD || %usetaunt = no
   return
gosub %t
set %t ( %t + 1 )
if %t = 27
   set %t 1
set %TD ( #scnt2 + 40 )
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

sub 1
  event macro 1 0 you dont have a chance fatty
  return
sub 2
  event macro 1 0 try again when you bring an army
  return
sub 3
  event macro 1 0 that all you got?
  return
sub 4
  event macro 1 0 why don't you try to not suck so bad
  return
sub 5
  event macro 1 0 really? you need go get a 400 powerscroll in pvp then try again
  return
sub 6
  event macro 1 0 go-go-gadget pwn-yer-@zz
  return
sub 7
  event macro 1 0 you're not gonna cry, are you?
  return
sub 8
  event macro 1 0 if yo momma would'a had change for a 20, you'd have been a BJ
  return
sub 9
  event macro 1 0 you should just stand there and die.. get it over quicker
  return
sub 10
  event macro 1 0 you mad brah?
  return
sub 11
  event macro 1 0 need a tissue?
  return
sub 12
  event macro 1 0 damn popeye, you need a can of spinach? you suck bra
  return
sub 13
   event macro 1 0 my name is Donald and you're fired!
   return
sub 14
   event macro 1 0 you're the weakest link!
   return
sub 15
   event macro 1 0 where'd you learn that from, the new player dungeon?
   return
sub 16
   event macro 1 0 oooh.. that tickles
   return
sub 17
   event macro 1 0 my 5 year old pvp's better than you
   return
sub 18
   event macro 1 0 rage log - go ahead!
   return
sub 19
   event macro 1 0 rage much?
   return
sub 20
   event macro 1 0 you mad bro?
   return
sub 21
   event macro 1 0 just uninstall UO, you're terri-bad
   return
sub 22
   event macro 1 0 you're still holding your dildo, try using a weapon
   return
sub 23
   event macro 1 0 tree hugging hippy
   return
sub 24
   event macro 1 0 are you trying to hit me or hug me to death?
   return
sub 25
   event macro 1 0 blondie hits harder than you
   return
sub 26
    event macro 1 0 you mad you bad?
    return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;