Ребята помогите... Нужен макрос на лумбер чтобы рубил в городе Minoc и ложил в банк Версия EasyUO 1.22 помогите буду очень признателен если что есть макрос который рубит и ложит в дом если кто его переделает дам его =)) для переделки аська 179155690

а чего ты не хочешь настроить под дом макрос?

Выложи плз тот что у тебя есть на рубку и складывание в дом .....

tile init
set %MaxWeightD 280 ;максимальный вес, после которого пилим на доски
set %MaxWeightH 200 ;максимальный вес, после которого сносим все в дом
set %chop_delay1 30
set %chop_delay2 90
set %boards tlk_yws_xws_bwr_nws_fxs_zlk_ZVF_RVF_JZF_MZF
set %logs zlk
set %Defaultaxes ZRF_CSF_BSF_MSF_LSF_OSF_NSF_ISF_JOH_UOH_
+SMH_RMH_MPH_LPH_FSF_ASF_QCO_OFR_SFR
set %saw KGG_EGG_AGG_IGG_BIG_ZHG_WFG_

set %t_C XQJZMMD

set %too_far_error 8H:><_40
set %NoLog_error There's not enough wood here to havrest.

set %use_c 0 ;копаем по кругу(0) или один раз(1)?

set %loc_start 1
set %loc_end 12
;X-позиция_Y-позиция_X-кударубаем_Y-кударубаем_Z-кударубаем_X-кудабежать_Y-кудабежать
set %loc1 2689_639_2688_639_0_2698_634
set %loc2 2697_639_2696_639_0_2698_634
set %loc3 2697_642_2696_642_0_2698_634
set %loc4 2693_639_2692_639_0_2698_634
set %loc5 2693_642_2692_642_0_2698_634
set %loc6 2699_637_2699_636_0_2698_634
set %loc7 2699_639_2700_639_0_2698_634
set %loc8 2707_637_2708_636_0_2698_634
set %loc9 2689_641_2688_642_0_2698_634
set %loc10 2696_650_2696_651_0_2698_634
set %loc11 2707_635_2708_635_0_2698_634
set %loc12 2707_645_2708_645_0_2698_634
set %loc13 1271_1554_1272_1554_0_1261_1564
set %loc14 1267_1584_1268_1584_0_1261_1564
set %loc15 2111_1963_2112_1962_0_2107_1963
set %loc16 1907_1099_1908_1098_0_1870_1194
set %loc17 1904_1103_1904_1104_0_1870_1194
set %loc18 1900_1103_1900_1104_0_1870_1194
set %loc19 1896_1106_1896_1107_0_1870_1194
set %loc20 1366_2810_1364_2811_0_1870_1194
set %loc21 1366_2807_1364_2805_0_1870_1194
set %loc22 1366_2807_1364_2808_0_1870_1194
set %loc23 1366_2807_1368_2808_0_1870_1194
set %loc24 1366_2801_1364_2802_0_1870_1194
set %loc25 1366_2798_1364_2796_0_1870_1194

;========================= S T A R T ================




start:

set %s_start 0
for %i %loc_start %loc_end
{
set %loc %loc . %i
gosub rez_loc
set %x %pp
gosub rez_loc
set %y %pp
gosub rez_loc
set %x_d %pp
gosub rez_loc
set %y_d %pp
gosub rez_loc
set %z %pp
gosub rez_loc
set %xxx %pp
set %yyy %loc

if %s_start = 0
{

gosub gogo %xxx %yyy
set %s_start 1
}

gosub gogo %x %y
gosub chop

}

if %use_c = 0
goto start

set %use_c = -1
gosub gohome
stop

;============================= S T O P ===========


;=============== C H O P ========================
sub chop
OpenStatusDig:
if #weight = n/a
{
event macro 8 2
wait 20
if #weight = n/a
goto OpenStatusDig
}

set %Jstart #jindex
chop:
event SysMessage chop N %i
gosub hotkeycheck
if #weight > %MaxWeightD
{
gosub sawsaw
wait 10
if #weight > ( %MaxWeightH )
gosub gohome

}

finditem %Defaultaxes c_ , #charid
if #findkind = -1
{
finditem %Defaultaxes c_ , #backpackid
if #findkind = -1
gosub gohome

gosub EquipAxe
}
set #lobjectid #findid
event macro 17
target
set #ltargetx %x_d
set #ltargety %y_d
set #ltargetz %z
set #ltargetkind 3
tile Get %x_d %y_d 2 #cursKind
set #ltargettile #tileType
event macro 22

wait %chop_delay1
gosub journalcheck
;msg #journal $
if #result
{
; event SysMessage %i
wait %chop_delay2
gosub journalcheck
if #result
goto chop
}

return

;========= S A W ==== S A W =======================================
sub sawsaw
finditem %saw c_ , #backpackid
if #findkind = -1
gosub gohome

set #lobjectid #findid
event macro 17 0
gosub waitforgump
wait 5
set %xx 27 + #contposX
set %yy 90 + #contposY
click %xx %yy f
gosub waitforgump
wait 5
set %xx 240 + #contposX
set %yy 70 + #contposY
click %xx %yy f
gosub waitforgump
wait 5
set %xx 150 + #contposX
set %yy 150 + #contposY
click %xx %yy r
wait 2
return
sub waitforgump
set %waitforgumptimeout ( #scnt + 25 )
waitforgump:
if #scnt > %waitforgumptimeout
{
event SysMessage no menu for DOSKI
return
}
if #contname <> generic_gump
goto waitforgump
else
return

;============= G O H O M E ===================================
sub gohome
set %x_prom %x
set %y_prom %y
gosub gogo %xxx %yyy

gosub gogo 2700 634


nnn:
finditem %boards C_ , #BACKPACKID
if #findkind = -1
{
event SysMessage no more boards in backpack
goto nnn1
}
else
{
exevent drag #findid #findstack
wait 10
exevent Dropc %t_C
wait 10
goto nnn
}


nnn1:

if %use_c = -1
halt

finditem %Defaultaxes C_ , #BACKPACKID
set %countaxes #findcnt
if #findcnt < 10
{
finditem %t_C G_
set #lobjectid #findid
event macro 17
wait 1s

loopaxes:
finditem %Defaultaxes C_ , %t_C
if #findkind = -1
{
finditem %Defaultaxes C_ , #BACKPACKID
if #findkind = -1
{
event SysMessage no more AXES in container
halt
}
else
{
goto nnn1end
}
}
else
{
exevent drag #findid 1
wait 10
exevent Dropc #BACKPACKID
wait 10
set %countaxes ( %countaxes + 1 )
if %countaxes < 10
goto loopaxes
)
}
nnn1end:




finditem %saw C_ , #BACKPACKID
set %countaxes #findcnt
if #findcnt < 2
{
finditem %t_C G_
set #lobjectid #findid
event macro 17
wait 1s

loopsaw:
finditem %saw C_ , %t_C
if #findkind = -1
{
finditem %saw C_ , #BACKPACKID
if #findkind = -1
{
event SysMessage no more SAW in container
halt
}
else
{
goto nnn2end
}
}
else
{
exevent drag #findid 1
wait 10
exevent Dropc #BACKPACKID
wait 10
set %countaxes ( %countaxes + 1 )
if %countaxes < 2
goto loopsaw
)
}
nnn2end:
event SysMessage ugu Py6aTb!!!!



gosub gogo %xxx %yyy
gosub gogo %x_prom %y_prom
return

;*****SUB JOURNALCHECK*****
;*****SUB JOURNALCHECK*****
;*****SUB JOURNALCHECK*****
sub journalcheck
JournalCheckLoop:
set %jstart %jstart + 1
scanjournal %jstart
if %too_far_error in #journal
{
return #false
}
if %NoLog_error in #journal
{
return #false
}
if %jstart >= #jindex
{
set %jstart #jindex
return #true
}
goto JournalcheckLoop

;***** E Q U I P A X E ******************************************************
sub EquipAxe
finditem %Defaultaxes C_ , #backpackid
set #lhandid #findid
set #rhandid yc
deletejournal
set !wepjs #jindex + 1
event macro 24 1
wait 40
set !wepje #jindex + 1
for !wepji %wepjs %wepje
{
scanjournal !wepji
if one_weapon_at_a_time in #journal || you_must_have_both_hands_free in #journal
{
wait 40
event macro 24 2
}
}
if #lhandid <> #findid || #rhandid <> YC
{
set #lhandid #findid
wait 40
event macro 24 1
}
namespace clear
namespace pop
return

;*** sub GOGO *** GOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGO
sub gogo
set %x_togo %1
set %y_togo %2
loop:
event PathFind %x_togo %y_togo
wait 20 ; это секунда
if #charPosX <> %x_togo || #charPosY <> %y_togo
goto loop
wait 20 ; это секунда
if #charPosX <> %x_togo || #charPosY <> %y_togo
goto loop
return

; *************************** SUB REZ **********************************
sub rez_loc
str Pos %loc _
set %pos ( #strres - 1 )
str Left %loc %pos
set %pp #strres
set %pos ( %pos + 1 )
str del %loc 1 %pos
set %loc #strres
return

;========================== HOTKEYCHECK ========== HOTKEYCHECK ==================================================
;*****SUB HOTKEYCHECK*****
sub hotkeycheck
onhotkey a Ctrl
{
event SysMessage %i
return
}
return