Tiket

Прошу помочь в скрипте, не летает через рун бук.В скрипте поставлен максимальный вес 500 т е после 500 веса он должен летать к дому и всё скидывать, но когда проходит грань 500 он продолжает копать.
ЗЫ инфлейм помоему твой скрипт.
Вот сам скрипт.



; Set Up The Following Variables:
set %maxWeight 450; Maksimalnij ves
set %box NENZKMD; ID karobki kuda lazhitj itemi i drugie veshi
set %xCoord 1848; X koordinati prjama u karobki
set %yCoord 2490; Y koordinati prjama u karobki
set %dropMarganece #false; #true - kidaet Marganece rudu, #false - nekidaet
set %skillItemChange #false; #true - minatj odezhdu, #false - nemenatj
set %recall #true; #true - letit po runebook, #false - pobezhit
; Do Not Set These Items If %skillItemChange #false
set %skillRobe ISXELMD; Skill Roba (ID)
set %skillCloak ERWELMD; Skill Cloack (ID)
set %skillMask OLXELMD; Skill Mask (ID)
set %simpleRobe WVJMLMD; Prastaja Roba (ID)
set %simpleCloak ODUWKMD; Prastoj cloack (ID)
set %simpleMask GOJRJMD; Platemail helms (ID)
; End Of Changable Clothes List
; Do Not Set These Numbers If %recall #true
set %runebookID QATFLMD; Runebook ID
set %runeNumberToHome 11; Nomer runi v dom
set %runeNumberToCave 12; Nomer runi v pesheru
; End Of Set Up Part

set %item DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG
set %loot DCI_TVJ_FWL_GWJ_EWJ_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG

if %recall
{
gosub Instalyze runeNumberToHome 1
gosub Instalyze runeNumberToCave 2
}

start:


ТУТ ИДУТ КООРДИНАТЫ.




goto start

sub ljing
gosub ghost
gosub checkHP
gosub checkWeight
move %1 %2 1 30s
finditem NPF_QPF C_
if #findcnt = 0
{
display ok Pickaxe wasn't found!
halt
}
set #lobjectid #findid
event macro 17 0
target 7s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 10
set %overtime #scnt + 25
gosub scan
return

sub checkWeight
if #weight > %maxWeight
{
if ! %dropMarganece
{
if %recall
gosub port
if ! %recall
gosub moveItems
}
if %dropMarganece
{
gosub dropMarganece
if #result = drop
{
if %recall
gosub port
if ! %recall
gosub moveItems
}
if #result = mine
return
}
}
return

sub scan
scan:
scanjournal
gosub checkHP
if hungry in #sysmsg
gosub eat
if ( ( THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg ) || ( You_stop_Mining in #sysmsg )
+ || ( YOU_CAN'T_REACH_THIS in #sysmsg ) || ( You_fail_to_do_that in #sysmsg )
+ || ( Try_mining_elsewhere in #sysmsg ) || ( You_have_no_line_of_sight_to_that_location in #sysmsg )
+ || ( You_can't_use_the ) )
return
gosub checkHP
if #scnt >= %overtime
return
goto scan
return

sub port
msg .arm$
wait 20
gosub checkHP
finditem ED G
if #findcnt <> 0
{
msg .arm$
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
finditem ED G
set #ltargetid #findid
event macro 27 0
wait 10
gosub follow&kill
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
click 261 215 ;Recharge runebook
wait 20
gosub openRunebook
click %x1 %y1
wait 5s
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
gosub moveItems
gosub back
return

sub moveItems
ignoreitem reset 1
gosub runToBox
finditem %box G_3
wait 20
if #findcnt = 0
{
event Sysmessage Box Not Found!
halt
}
drop:
finditem %item c_ , #backpackid
if #findkind = -1
return
exevent Drag #Findid #findstack
exevent Dropc %box
wait 20
goto drop
return

sub back
gosub checkHP
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
click 261 215
wait 20
gosub openRunebook
click %x2 %y2
wait 5s
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
return

sub runToBox
repeat
{
move %xCoord %yCoord 0 3s
wait 10
}
until #charposx = %xCoord && #charposy = %yCoord
return

sub follow&kill
msg .arm$
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
}
until #findcnt = 0
gosub loot
return

sub checkHP
if #hits < #maxhits
{
msg .arm$
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
gosub follow&kill
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
return

sub openRunebook
finditem %runebookID C_ , #backpackid
if #findcnt = 0
{
event sysmessage Runebook not found!
halt
}
set #lobjectid #findid
event macro 17 0
while #contname <> generic_gump && #contsize <> 577_426
wait 1
return

sub ghost
if #charGhost = YES
{
terminate uo
halt
}
return

sub changeClothesTo
repeat
{
finditem %1 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %1 C_ , #backpackid
}
until #findcnt = 0
repeat
{
finditem %2 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %2 C_ , #backpackid
}
until #findcnt = 0
repeat
{
Finditem %3 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %3 C_ , #backpackid
}
until #findcnt = 0
return

sub eat
finditem ZBM C
if #findcnt > 1
{
set #lobjectid #findid
event macro 17 0
wait 5
}
finditem GND C
if #findcnt > 1
{
set #lobjectid #findid
event macro 17 0
wait 5
event macro 17 0
}
wait 10
return

sub Instalyze
if % . %1 <= 8
set %x . %2 260
else
set %x . %2 420
if % . %1 = 1 || % . %1 = 9
set %y . %2 260
if % . %1 = 2 || % . %1 = 10
set %y . %2 275
if % . %1 = 3 || % . %1 = 11
set %y . %2 290
if % . %1 = 4 || % . %1 = 12
set %y . %2 305
if % . %1 = 5 || % . %1 = 13
set %y . %2 320
if % . %1 = 6 || % . %1 = 14
set %y . %2 335
if % . %1 = 7 || % . %1 = 15
set %y . %2 350
if % . %1 = 8 || % . %1 = 16
set %y . %2 365
return

sub dropMarganece
dropLoop:
finditem DWJ C_ , #backpackid
if #findcnt = 0
{
if #weight >= %maxweight
return drop
if #weight < %maxweight
return mine
}
if #findcol = 1750
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 20
}
ignoreitem #findid 1
goto dropLoop
return

sub loot
finditem YFM G_4
if #findcnt > 0
{
set #lobjectid #findid
event macro 17 0
while #contkind <> ASEB && #contsize <> 144_212
wait 1
_loot:
finditem %loot C_ , #contID
if #findcnt = 0
{
ignoreitem #contID 2
return
}
exevent drag #findid #findstack
exevent dropc #backpackid
wait 20
goto _loot
}
return

Fire wand - это скипитр и (ИМХО) никак не может исползовать скилл fencing, мб переменить на mace fighting?