Макрос на фишинг для танка(для оччень ленивого танка) под изиуо+инжект, даже не макрос а скореее полуавтоматическая удочка!
Ничего прописывать не надо, но! Обязательные условия для работы макроса:
1.Достаточное количество удочек,бинтов, еды,банок пополнения жизни и стамины в паке
2.Боевое оружие в руках при запуске макроса
3.кинжал(dagger) в паке!
4.Правильно настроенный инжект и настроенная смена оружия/брони в нем (нехватало штоб я ещо и сетдрессспиид вам настраивал вот)
5.тестил на изи уо 1.5 клиент-бритни(респект) на других хз ))
краткое описание правильной работы:
запоминает конфиг оружия , берет удочку в руки и задает прицел для ловли,
кликаете на воду начинает ловить пока все не выловит. После окончания точки срежет ножиком с земли всю рыбу и снова выдаст прицел- а вы снова на воду его ы!
приключения в процесе..если из моря выскочит монстр (мунбеты не всщот) ,чар по бырому дастает пушку запомненую в начале, и наченает кружится вокруг супостата
активно вывешивая ему люлей и подхилюя время от времени свое хилое тельце,до тех пор пока у того балда не закружится насмерть.После етого мы долечиваемся до 100%, режем монстра,лутим его(почти все кроме гадких банок),возвращаемся на позицию где ловили рыбу -срезаем рыбу где и меняем оружие на удочку опят используем прицел.Если во время ловли стамина упадет ниже 100 чар сбросит удочку,выпьет рефреш, повтыкает 8 секунд снова возьмет в руки удочку и снова выдаст прицел- с прицелом можно переходить с места на место.
За весом на чаре,количеством банок,бинтов,еды, и наличием других врагов макр не следит-бесплатная ж версия.. initevents
set #SYSMSGCOL 22
set %dg 0x00000F51
msg $,setarm 2 $
wait 15
msg ,disarm $
wait 15
msg ,equip Rhand ^0x00000DBF $
wait 1s
msg ,useobject lastequip $
target 3s
Event SysMessage Slim дает добро))
;---------------------------------------------------
begin:
set %chrx #CHARPOSX
set %chry #CHARPOSY
goSub enemys
if #STAMINA < 100
{
gosub obriv
wait 30
msg $'pc quaf refresh $
wait 7s
msg ,equip Rhand ^0x00000DBF $
wait 1s
msg ,useobject lastequip $
target 3s
Event SysMessage продолжим..
}
gosub scan
wait 1s
goto begin
;-----------------------------------------------------
enemy:
finditem OD_KI_BD G_12
If #FINDKIND = -1
{
if c in #CHARSTATUS || #HITS < #MAXHITS - 8
gosub hell
gosub corpse
gosub ribs
Event SysMessage все слутили))
msg ,disarm $
wait 1s
msg ,equip Rhand ^0x00000DBF $
wait 1s
msg ,useobject lastequip $
target 3s
Event SysMessage можеш ловить дальше...
Goto Begin
}
if #HITS = N/A || #HITS = 0
PAUSE
if #HITS < #MAXHITS - 10
{
if c in #CHARSTATUS && #HITS < #MAXHITS - 40 || #HITS < #MAXHITS / 3
{
msg 'pc quaf heal $
goto pervak
}
msg 'pc heal self $
pervak:
if #FINDX = #CHARPOSX
{
if #FINDY = #CHARPOSY
{
wait 4s
}
}
}
Move #FINDX #FINDY 0 8s
Goto enemy
;---------------------------------------------------
Sub enemys
finditem OD_KI_BD G_12
If #FINDDIST > 14
{
Event SysMessage вражина поблизости..
return
}
If #FINDKIND <> -1
{
if #FINDDIST <= 14
{
msg ,arm 2 $
wait 10
Set #LTARGETID #FINDID
Event SysMessage рыбалка в опасности!
Move #FINDX #FINDY 1 12s
Event Macro 27
Goto enemy
}
Event SysMessage враг рядом..
}
Return
sub obriv
msg $,disarm $
wait 10
return
;--------------------------------------------------------
sub corpse
CORPSE:
FINDITEM YFM G_2
if #FINDKIND <> -1
{
set %corpse #FINDID
move #FindX #FindY 1 30s
wait 1s
set #LTargetKind 1
set #LTARGETID %corpse
msg ,useobject ^ , %dg $
target 2s
Event macro 22 0
wait 3s
set #LOBJECTID %corpse
Event Macro 17 0
wait 1s
REGI:
FINDITEM WZF_JUF_ZUF_DUF_POF_LZF_IIF_HSL_KUF_VVF_JZF_WZF_RVF_SZF_JUF_RZF_ZUF_KZF_MZF C_ , %corpse
if #FINDID <> X
{
msg ,grab 0 #FINDID $
wait 1s
GoTo REGI
}
}
}
}
if YFM in #CONTTYPE
{
set %sx #CONTPOSX + 50
set %sy #CONTPOSY + 50
click %sx %sy r
wait 10
}
wait 1s
return
;---------------------------------------------------------
sub hell
hl:
IF #HITS < #MAXHITS || c in #CHARSTATUS
{
msg 'pc heal self$
wait 164
goto hl
}
return
;----------------------------------------------------------
sub ribs
move %chrx %chry 0 15s
wait 1s
rzr:
FINDITEM EQD_DQD_GQD G_3
if #FINDKIND = -1
return
set #LTARGETID #FINDID
set #LTARGETKIND 1
msg ,useobject ^ , %dg $
target 3s
event macro 22 0
wait 56
goto rzr
;----------------------------------------------------------
sub scan
scanjournal 1
if <5AB0. in #journal || 745AL in #journal || @K1C in #journal || =5G53> in #journal || 48B5AL in #journal || 1KBL in #journal
gosub next
scanjournal 2
if <5AB0. in #journal || 745AL in #journal || @K1C in #journal || =5G53> in #journal || 48B5AL in #journal || 1KBL in #journal
gosub next
scanjournal 3
if <5AB0. in #journal || 745AL in #journal || @K1C in #journal || =5G53> in #journal || 48B5AL in #journal || 1KBL in #journal
gosub next
scanjournal 4
if <5AB0. in #journal || 745AL in #journal || @K1C in #journal || =5G53> in #journal || 48B5AL in #journal || 1KBL in #journal
gosub next
return
;------------------------------------------------------------
sub next
deletejournal
goSub enemys
wait 2s
gosub ribs
msg ,useobject lastequip $
target 3s
Event SysMessage можеш ловить дальше...
return
