Делает бутылки, готовит ГХ, берет пустую сумку с сундука, накидает в сумку 240 бутылок и кладет полную сумку во второй сундук и так дальше.
Перед запуском макроса, кладем в сумку инготы, тинкер тулс, БП и ступку.
(Тестировалось под Client 3.00c+Injection+EasyUO 1.5)
;================================================================================
;============================= by Xeon ==========================================
;================================================================================
initevents
Event macro 8 1
wait 10
contpos 808 2
Event macro 8 2
wait 10
contpos 776 290
Event macro 8 7
wait 10
contpos 788 415 set %syndyk_1 VRQODUE ;Сундук с сумками
set %syndyk_2 VXAWYTE ;Сундук для сумок
set %tinker GTL
set %ingoti ENK
set %zelye ZUF ;Какое зелье готовим(в данном случае рефреши)
;============================= Telo =============================================
Telo:
finditem WUF C_ , #BACKPACKID
wait 10
if #FINDID = X
{
GoSub Banki
}
GoSub Zelye
GoSub Sort
;============================= Banki =============================================
Sub Banki
msg $,cancelmenu$
wait 10
msg ,automenu 'Tinkering' 'Bottles'$
wait 20
msg ,automenu 'Bottles' 'Empty Bottle'$
wait 20
finditem %tinker C_ , #BACKPACKID
set #LOBJECTID #FINDID
finditem %ingoti C_ , #BACKPACKID
set #LTARGETID #FINDID
event macro 17 0
event macro 25 0
event macro 22 0
wait 3s
return
;============================= Zelye =============================================
Sub Zelye
msg $,cancelmenu$
wait 10
msg ,automenu 'Alchemy' 'Refresh Potions'$
wait 20
msg ,automenu 'Refresh Potions' 'Total refresh potion'$
wait 20
finditem RQF C_ , #BACKPACKID
set #LOBJECTID #FINDID
finditem WUF C_ , #BACKPACKID
set #LTARGETID #FINDID
event macro 17 0
event macro 25 0
event macro 22 0
wait 8s
return
;============================= Sortirovka ==========================================
Sort:
finditem ZJF C_ , #BACKPACKID
wait 10
if #FINDID = X
{
set #LOBJECTID %syndyk_1
event macro 17 0
wait 10
finditem ZJF C_ , %syndyk_1
msg ,grab 1 #FINDID $
wait 10
Goto Sort
}
finditem ZJF C_ , #BACKPACKID
wait 10
set %symka #FINDID
set #LOBJECTID %symka
event macro 17 0
finditem %zelye C_ , %symka
wait 10
if #FINDCNT >= 240 ;Количество банок в сумке
{
msg ,moveitem %symka 0 %syndyk_2 $
Goto Sort
}
finditem %zelye C_ , #BACKPACKID
msg ,moveitem #FINDID 0 %symka $
Goto Telo