set %secure N/A ; hardcode this if you want
set %fountain YCQ
set %bandage ZLF
set %FountainGumpSize 168_152
set %FountainGumpName container_gump
set %total_enhanced 0
if %secure = N/A
gosub set_secure
repeat
finditem %fountain G_2
if #findCnt = 0
{
event ExMsg #charID 3 54 Finished, %total_enhanced Enhanced Bandages Collected
halt
}
gosub open_fountain
gosub get_bandages
until #false
sub open_fountain
set %current_fountain #findId
set #lobjectID %current_fountain
event macro 17 0
gosub gumpwait %FountainGumpSize %FountainGumpName
return
sub get_bandages
_get_bandages:
finditem %bandage C_ , %current_fountain
if #findCnt > 0
{
set %current_bandages #findId
event property %current_bandages
if Enhanced notin #property
{
ignoreitem %current_bandages
goto _get_bandages
}
wait 10
exevent drag #findid #findstack
wait 5
exevent dropc %secure
wait 20
set %total_enhanced ( %total_enhanced + #findstack )
}
gosub offsetclick 10 10 r
wait 5
ignoreitem %current_fountain
return
sub set_secure
display ok Click on your secure container
set #targCurs 1
while #targCurs = 1
wait 1
set %secure #ltargetID
display ok Your secure ID is %secure $Write it down if you want to hardcode it
return
;-------------------------------------------------------------------------------
sub OffsetClick
set %tempx %1 + #CONTPOSX
set %tempy %2 + #CONTPOSY
set %tempCondition %3
click %tempx %tempy %tempCondition
return
;-------------------------------------------------------------------------------
; %1 = Gumpname 1
; %2 = Gumpname 2
sub GumpWait
wait 10
namespace push
namespace GW
set !timedelay #SCNT
loopwait1:
if #CONTNAME = %1 || #CONTNAME = %2
goto GumpWait_skip1
if #SCNT > !timedelay + 7
goto GumpWait_skip1
goto loopwait1
GumpWait_skip1:
namespace pop
return
Opens Fountains of Life and grabs enhanced bandages and stores them in a secure.
You can hardcode your secure container in the first line of the script so you don't have to go through the popups to find it.