Code: Select all
sub Chopper()
VAR CorpseType='0x0000' ; change this to real type
VAR CutterType='0x0000' ; and this
VAR Distance=3 ; valid distance to cut corpse
Start:
UO.FindType(CorpseType,-1,'ground')
If UO.FindCount() Then
If UO.GetDistance('finditem')<=Distance Then
UO.WaitTargetObject('finditem')
UO.UseType(CutterType)
wait(1000)
Else
Ignore('finditem)
Goto Start
End if
End if
IgnoreReset()
end subCode: Select all
sub REZ()
var body = '0x2006'
var dagger = '0x0F51'
var corpse
UO.Set('quiet','1')
;uo.ignorereset()
uo.set('finddistance', '3')
uo.findtype(body, -1, 'ground')
if uo.findcount() and Uo.GetDistance( 'finditem' ) < 3 then
var x = uo.GetGraphic(uo.ObjAtLayer('Lhand'))
var y = uo.GetGraphic(uo.ObjAtLayer('Rhand'))
uo.warmode(0)
wait(500)
corpse = uo.getSerial("finditem")
UO.WaitTargetObject(corpse)
UO.UseType(dagger)
wait(1000)
uo.Equipt('Lhand',x)
uo.Equipt('Rhand',y)
; Loot()
uo.warmode(1)
endif