› General › Macro Help › veterinary macro › Reply To: veterinary macro
August 26, 2019 at 4:27 pm
#4290
scavengerza
Member
- Topics - 7
- Replies - 11
- Total - 18
- Neophyte
- ★
easyuo macro
set %corpse YFM
set %bandages ZLF
set %animaltype JG ; get animal type by dragging bar and check #CONTTYPE
start:
gosub kill
gosub res
goto start
sub scan
finditem %animaltype G_ , 2
if #FINDCNT > 0
{
for #FINDINDEX 1 #FINDCNT
{
event sysmessage #FINDID
event property #FINDID
event sysmessage #property
wait 20
}
}
return
sub kill
killer:
finditem %animaltype G_ , 2
if #FINDCNT > 0
{
;event sysmessage #FINDID
set %live #FINDID
set #LTARGETID #FINDID
event macro 27
wait 2s
goto killer
}
return
sub res
finditem %bandages C_ , #BACKPACKID
if #FINDCNT < 1
{
halt
}
set %bandies #FINDID
if G in #charstatus
{
event macro 6
}
resup:
finditem %corpse G_3
if #FINDCNT > 0
{
set %dead #FINDID
set #lobjectid %bandies
event macro 17 0
target 2s
set #ltargetid %dead
event macro 22 0
wait 5s
goto resup
}
return