ScriptUO
Scripting Resources & Utilities => UOSteam => Topic started by: Bye-Bye on April 01, 2017, 06:46:35 PM
-
So this was just thrown together today for a friend, I have the bandages set to the color you can buy off luna vendor
and they'll pick them up from the top left of the bank box.
I prefer harm because if you stand 1 tile away it does less damage, or more if preferred.
Need to swap serial ids for whatever pet you're hitting and or resing, other than that it seems to work.
I added two bandages to poison for the purpose of healing any damage buildup from poison, but it wouldn't heal enough for gains
so I also added harm so it would at least count for something.
>
>
>
>
//change target serials to pets and put bandages in top left of bank, 1742 is color of bandages, only thing you need to change if using dif bandages.
if not listexists 'bank'
@createlist 'bank'
else
endif
if not listexists 'harm'
@createlist 'harm'
else
endif
if not listexists 'poison'
@createlist 'poison'
else
endif
if not listexists 'res'
@createlist 'res'
else
endif
@poplist 'bank' 'front'
if not @findtype 0xe21 1742 'backpack'
msg 'bank'
@movetype 0xe21 'bank' 'backpack' 18, 105, 0 1742 100
pause 600
turn 'east'
walk 'east'
turn 'west'
walk 'west'
@pushlist 'harm' 'front'
else
@pushlist 'harm' 'front'
endif
@poplist 'harm' 'front'
if not @findtype 0xe21 1742 'backpack'
@pushlist 'bank' 'front'
else
while skill 'Veterinary' < 60
cast "Harm"
pause 1250
@target 0x2671ed2
pause 1000
@usetype 0xe21 1742
waitfortarget 5000
@target 0x2671ed2
pause 1150
endwhile
else
@pushlist 'poison' 'front'
endif
@poplist 'poison' 'front'
if not @findtype 0xe21 1742 'backpack'
@pushlist 'bank' 'front'
else
if skill 'Veterinary' < 85
@clearusequeue!
cast "Poison"
waitfortarget 3000
pause 500
@target! 0x2671ed2
pause 500
cast 'Harm'
waitfortarget 2000
pause 500
@target! 0x2671ed2
pause 500
usetype 0xe21 1742
waitfortarget 2000
pause 500
@target! 0x2671ed2
pause 2000
usetype 0xe21 1742
waitfortarget 2000
pause 500
@target! 0x2671ed2
pause 1000
@clearusequeue!
endif
else
@pushlist 'res' 'front'
endif
@poplist 'res' 'front'
if not @findtype 0xe21 1742 'backpack'
@pushlist 'bank' 'front'
else
if skill 'Veterinary' < 120
@usetype 0xe21 1742
pause 750
@target! 0x2671ed2
waitfortarget 5000
endif
else
stop
endif
My first long trainer macro, any feedback would be appreciated.