Куплю за разумные деньги мининг на нуби остров)
Чтобы копал и в банк относил
|
Posted 10 January 2017 - 07:03
Куплю за разумные деньги мининг на нуби остров)
Чтобы копал и в банк относил
Posted 11 January 2017 - 00:49
в разделе скрпиты - search сделай. Найдеш бесплатный
Posted 11 January 2017 - 06:34
в разделе скрпиты - search сделай. Найдеш бесплатный
Да нашел но проблема)) Банк бокс прописал он не скидывает руду а крашит уо)
потом с ходьбой беда...
Не поможешь с настройкой за оплату?)
Posted 11 January 2017 - 16:16
С банком я разобрался) И с ходилкой вроде как тоже.
Но он как выкапает указаное колво веса он не идет а копает дальше(
Posted 11 January 2017 - 16:33
; Set Up The Following Variables:
set %maxWeight 470 ; ???????????? ???
set %box ZIMXJMD ; ????? ? ????? ? ?????
set %xCoord 5904 ; ?????????? ????? ????? ?
set %yCoord 2850 ; Y ?????????? ????? ?????
set %dropmarganece #true ; #true - ????????? ????????
set %dropBronze #true ; #true - ????????? ????????
set %dropiron #true ; #true - ????????? ????????
set %dropcopper #true ; #true - ????????? ????????
set %dropcorrundum #true ; #true - ????????? ????????
set %droptourmaline #true ; #true - ????????? ????????
set %skillItemChange #False; #true - ??????????? ????? ??????, #false - ?? ???????????
set %recall #false ; #true - ?????? ?? ???????, #false - ????? ??????
; ??? ?? ?????, ???? ?? ???????????? ????? ?????? %skillItemChange #false
set %skillRobe PXXBKMD ; Skill Roba (ID)
set %skillCloak BFKNKMD ; Skill Cloack (ID)
set %skillMask YZSQLMD ; Skill Mask (ID)
set %simpleRobe VTIPKMD ; Parasta Roba (ID)
set %simpleCloak XJWWKMD ; Parastais cloack (ID)
set %simpleMask OSH ; ring helm (ID)
; End Of Changable Clothes List
; ?? ????? ???? %recall #false
set %runebookID BSJJLMD ; ?????? ID
set %runeNumberToHome 4 ; ????? ???? ? ???
set %runeNumberToCave 4 ; ????? ???? ? ??????
set %amountRecalls 10 ; ??????? ???????? ?????
set %repairwep #false ; false = ?? ????? ????????????? ??????
set %weapon BGJIKMD ; ?????? (ID)
set %ings RMK ; ?????? (Type, ??????????? ?????? ???? ? ????? ? ?????, ?? ?????? ?? ???????? ??????!)
set %repairTool XXHTKMD ; repair tool (ID)
; Do Not Set These Variables If %tracking #false
; End Of Set Up Part
set %item DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_UJG
set %loot DCI_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL
if %recall
{
gosub Instalyze runeNumberToHome 1
gosub Instalyze runeNumberToCave 2
}
finditem QRM_FJM_GKM C_ , #backpackid
if #findcnt <> 0
{
set #lobjectid #findid
event macro 17 0
wait 30
}
start:
GOSUB LJING 5490 2925 1351 0
GOSUB LJING 5490 2924 1354 0
GOSUB LJING 5490 2923 1356 0
GOSUB LJING 5490 2922 1355 0
GOSUB LJING 5490 2921 1354 0
GOSUB LJING 5491 2926 1351 0
GOSUB LJING 5491 2925 1343 0
GOSUB LJING 5491 2924 1343 0
GOSUB LJING 5491 2923 1343 0
GOSUB LJING 5491 2921 1343 0
GOSUB LJING 5491 2920 1343 0
GOSUB LJING 5491 2919 1386 0
GOSUB LJING 5492 2918 1386 0
GOSUB LJING 5492 2919 1342 0
GOSUB LJING 5492 2920 1343 0
GOSUB LJING 5492 2921 1342 0
GOSUB LJING 5492 2922 1343 0
GOSUB LJING 5492 2923 1343 0
GOSUB LJING 5492 2924 1343 0
GOSUB LJING 5492 2925 1343 0
GOSUB LJING 5492 2926 1343 0
GOSUB LJING 5492 2927 1351 0
GOSUB LJING 5493 2928 1351 0
GOSUB LJING 5493 2927 1343 0
GOSUB LJING 5493 2926 1343 0
GOSUB LJING 5493 2925 1343 0
GOSUB LJING 5493 2924 1343 0
GOSUB LJING 5493 2923 1343 0
GOSUB LJING 5493 2922 1343 0
GOSUB LJING 5493 2921 1343 0
GOSUB LJING 5493 2920 1343 0
GOSUB LJING 5493 2919 1343 0
GOSUB LJING 5493 2918 1357 0
GOSUB LJING 5494 2918 1357 0
GOSUB LJING 5494 2919 1343 0
GOSUB LJING 5494 2920 1343 0
GOSUB LJING 5494 2921 1343 0
GOSUB LJING 5494 2922 1343 0
GOSUB LJING 5494 2923 1343 0
GOSUB LJING 5494 2924 1343 0
GOSUB LJING 5494 2925 1343 0
GOSUB LJING 5494 2926 1343 0
GOSUB LJING 5494 2927 1343 0
GOSUB LJING 5494 2928 1343 0
GOSUB LJING 5494 2929 1351 0
GOSUB LJING 5495 2930 1351 0
GOSUB LJING 5495 2928 1343 0
GOSUB LJING 5495 2927 1343 0
GOSUB LJING 5495 2926 1343 0
GOSUB LJING 5495 2924 1343 0
GOSUB LJING 5495 2923 1343 0
GOSUB LJING 5495 2922 1343 0
GOSUB LJING 5495 2921 1343 0
GOSUB LJING 5495 2920 1343 0
GOSUB LJING 5495 2919 1343 0
GOSUB LJING 5495 2918 1359 0
GOSUB LJING 5496 2918 1358 0
GOSUB LJING 5496 2919 1343 0
GOSUB LJING 5496 2920 1343 0
GOSUB LJING 5496 2921 1343 0
GOSUB LJING 5496 2922 1343 0
GOSUB LJING 5496 2923 1343 0
GOSUB LJING 5496 2924 1343 0
GOSUB LJING 5496 2925 1343 0
GOSUB LJING 5496 2926 1343 0
GOSUB LJING 5496 2927 1343 0
GOSUB LJING 5496 2928 1343 0
GOSUB LJING 5496 2929 1343 0
GOSUB LJING 5496 2930 1345 0
GOSUB LJING 5497 2930 1347 0
GOSUB LJING 5497 2929 1343 0
GOSUB LJING 5497 2928 1343 0
GOSUB LJING 5497 2927 1343 0
GOSUB LJING 5497 2926 1343 0
GOSUB LJING 5497 2925 1343 0
GOSUB LJING 5497 2924 1343 0
GOSUB LJING 5497 2923 1343 0
GOSUB LJING 5497 2922 1343 0
GOSUB LJING 5497 2921 1343 0
GOSUB LJING 5497 2920 1343 0
GOSUB LJING 5497 2919 1343 0
GOSUB LJING 5497 2918 1357 0
GOSUB LJING 5498 2918 1359 0
GOSUB LJING 5498 2919 1343 0
GOSUB LJING 5498 2920 1343 0
GOSUB LJING 5498 2921 1343 0
GOSUB LJING 5498 2922 1343 0
GOSUB LJING 5498 2923 1343 0
GOSUB LJING 5498 2924 1343 0
GOSUB LJING 5498 2925 1343 0
GOSUB LJING 5498 2926 1343 0
GOSUB LJING 5498 2927 1343 0
GOSUB LJING 5498 2928 1343 0
GOSUB LJING 5498 2929 1343 0
GOSUB LJING 5498 2930 1343 0
GOSUB LJING 5498 2931 1351 0
GOSUB LJING 5499 2931 1345 0
GOSUB LJING 5500 2931 1361 0
GOSUB LJING 5500 2930 1343 0
GOSUB LJING 5501 2929 1343 0
GOSUB LJING 5502 2929 1346 0
GOSUB LJING 5503 2929 1347 0
GOSUB LJING 5503 2928 1343 0
GOSUB LJING 5503 2927 1343 0
GOSUB LJING 5503 2926 1343 0
GOSUB LJING 5503 2925 1343 0
GOSUB LJING 5503 2924 1343 0
GOSUB LJING 5503 2923 1343 0
GOSUB LJING 5503 2922 1343 0
GOSUB LJING 5503 2921 1343 0
GOSUB LJING 5503 2920 1343 0
GOSUB LJING 5503 2919 1343 0
GOSUB LJING 5503 2918 1343 0
GOSUB LJING 5503 2917 1343 0
GOSUB LJING 5503 2916 1343 0
GOSUB LJING 5503 2915 1358 0
GOSUB LJING 5504 2915 1357 0
GOSUB LJING 5504 2916 1343 0
GOSUB LJING 5504 2917 1343 0
GOSUB LJING 5504 2918 1343 0
GOSUB LJING 5504 2919 1343 0
GOSUB LJING 5504 2920 1343 0
GOSUB LJING 5504 2921 1343 0
GOSUB LJING 5504 2922 1343 0
GOSUB LJING 5504 2923 1343 0
GOSUB LJING 5504 2924 1343 0
GOSUB LJING 5504 2925 1343 0
GOSUB LJING 5504 2927 1343 0
GOSUB LJING 5504 2928 1343 0
GOSUB LJING 5505 2928 1346 0
GOSUB LJING 5505 2927 1343 0
GOSUB LJING 5505 2926 1343 0
GOSUB LJING 5505 2925 1343 0
GOSUB LJING 5505 2924 1343 0
GOSUB LJING 5505 2923 1343 0
GOSUB LJING 5505 2922 1343 0
GOSUB LJING 5505 2921 1343 0
GOSUB LJING 5505 2920 1343 0
GOSUB LJING 5505 2919 1343 0
GOSUB LJING 5505 2918 1342 0
GOSUB LJING 5505 2917 1343 0
GOSUB LJING 5505 2916 1343 0
GOSUB LJING 5506 2916 1363 0
GOSUB LJING 5506 2917 1343 0
GOSUB LJING 5506 2918 1343 0
GOSUB LJING 5506 2919 1343 0
GOSUB LJING 5506 2920 1343 0
GOSUB LJING 5506 2921 1343 0
GOSUB LJING 5506 2922 1343 0
GOSUB LJING 5506 2923 1343 0
GOSUB LJING 5506 2924 1343 0
GOSUB LJING 5506 2925 1343 0
GOSUB LJING 5506 2926 1343 0
GOSUB LJING 5506 2927 1343 0
GOSUB LJING 5506 2928 1361 0
GOSUB LJING 5507 2927 1345 0
GOSUB LJING 5507 2925 1343 0
GOSUB LJING 5507 2924 1343 0
GOSUB LJING 5507 2923 1343 0
GOSUB LJING 5507 2922 1343 0
GOSUB LJING 5507 2921 1343 0
GOSUB LJING 5507 2920 1343 0
GOSUB LJING 5507 2919 1343 0
GOSUB LJING 5507 2918 1343 0
GOSUB LJING 5507 2917 1363 0
GOSUB LJING 5508 2917 1353 0
GOSUB LJING 5508 2918 1343 0
GOSUB LJING 5508 2919 1343 0
GOSUB LJING 5508 2920 1343 0
GOSUB LJING 5508 2921 1343 0
GOSUB LJING 5508 2922 1343 0
GOSUB LJING 5508 2923 1343 0
GOSUB LJING 5508 2924 1343 0
GOSUB LJING 5508 2925 1343 0
GOSUB LJING 5508 2926 1343 0
GOSUB LJING 5509 2925 1343 0
GOSUB LJING 5510 2924 1343 0
GOSUB LJING 5510 2922 1343 0
GOSUB LJING 5510 2921 1343 0
GOSUB LJING 5510 2920 1343 0
GOSUB LJING 5510 2919 1343 0
GOSUB LJING 5510 2918 1343 0
GOSUB LJING 5510 2917 1343 0
GOSUB LJING 5510 2916 1343 0
GOSUB LJING 5510 2915 1353 0
GOSUB LJING 5511 2915 1357 0
GOSUB LJING 5511 2916 1343 0
GOSUB LJING 5511 2917 1343 0
GOSUB LJING 5511 2918 1343 0
GOSUB LJING 5511 2919 1343 0
GOSUB LJING 5511 2920 1343 0
GOSUB LJING 5511 2921 1343 0
GOSUB LJING 5511 2922 1343 0
GOSUB LJING 5511 2923 1343 0
GOSUB LJING 5511 2924 1345 0
GOSUB LJING 5512 2924 1345 0
GOSUB LJING 5512 2923 1343 0
GOSUB LJING 5512 2922 1343 0
GOSUB LJING 5512 2921 1343 0
GOSUB LJING 5512 2920 1343 0
GOSUB LJING 5512 2919 1343 0
GOSUB LJING 5512 2918 1343 0
GOSUB LJING 5512 2917 1343 0
GOSUB LJING 5512 2916 1343 0
GOSUB LJING 5512 2915 1357 0
GOSUB LJING 5513 2915 1352 0
GOSUB LJING 5513 2916 1343 0
GOSUB LJING 5513 2917 1342 0
GOSUB LJING 5513 2918 1343 0
GOSUB LJING 5513 2919 1343 0
GOSUB LJING 5513 2920 1343 0
GOSUB LJING 5513 2921 1343 0
GOSUB LJING 5513 2922 1343 0
GOSUB LJING 5513 2923 1343 0
GOSUB LJING 5513 2924 1347 0
GOSUB LJING 5514 2924 1347 0
GOSUB LJING 5514 2923 1343 0
GOSUB LJING 5514 2922 1343 0
GOSUB LJING 5514 2921 1343 0
GOSUB LJING 5514 2920 1343 0
GOSUB LJING 5514 2919 1343 0
GOSUB LJING 5514 2918 1343 0
GOSUB LJING 5514 2917 1343 0
GOSUB LJING 5514 2916 1352 0
GOSUB LJING 5515 2916 1353 0
GOSUB LJING 5515 2917 1343 0
GOSUB LJING 5515 2918 1343 0
GOSUB LJING 5515 2919 1343 0
GOSUB LJING 5515 2920 1343 0
GOSUB LJING 5515 2921 1343 0
GOSUB LJING 5515 2922 1343 0
GOSUB LJING 5515 2923 1343 0
GOSUB LJING 5515 2924 1345 0
GOSUB LJING 5516 2924 1345 0
GOSUB LJING 5516 2923 1343 0
GOSUB LJING 5516 2922 1343 0
GOSUB LJING 5516 2921 1343 0
GOSUB LJING 5516 2920 1343 0
GOSUB LJING 5516 2919 1343 0
GOSUB LJING 5516 2918 1343 0
GOSUB LJING 5516 2917 1343 0
GOSUB LJING 5516 2916 1359 0
GOSUB LJING 5517 2915 1353 0
GOSUB LJING 5517 2916 1343 0
GOSUB LJING 5517 2917 1343 0
GOSUB LJING 5517 2918 1343 0
GOSUB LJING 5517 2919 1343 0
GOSUB LJING 5517 2920 1343 0
GOSUB LJING 5516 2923 1343 0
goto start
sub ljing
gosub ghost
gosub checkHP
gosub element
gosub checkWeight
move %1 %2 1 40s
finditem NPF_QPF C
if #findcnt = 0
{
display ok Pickaxe wasn't found!
pause
}
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 + 40
gosub scan
return
sub checkWeight
if #weight > %maxWeight
{
if ! %dropMarganece
{
if %recall
gosub port
if ! %recall
gosub moveItems
}
if %dropMarganece
{
gosub dropMarganece
return
}
}
return
sub scan
scan:
gosub element
scanjournal
gosub checkHP
if ( ( THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg ) || ( You_stop_Mining in #journal )
+ || ( 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 in #journal ) || ( You_cannot_mine_so_close_to_yourself in #journal ) )
+ || ( You_can't_use_that in #journal ) || ( That_is_too_far in #journal )
return
gosub checkHP
if #scnt >= %overtime
return
goto scan
return
sub port
msg .arm$
gosub checkHP
gosub element
if G in #charstatus
event macro 6 0
event macro 6 0
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
repeat
{
click %x1 %y1
wait 10
}
until #contname <> generic_gump && #contsize <> 577_426
event macro 13 21
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
gosub moveItems
gosub back
goto start
return
sub moveItems
ignoreitem reset 1
gosub runToBox
msg Bank $
wait 1s
msg BANK $
finditem %box ZTF
wait 10
if #findcnt = 0
{
event Sysmessage Box Not Found!
halt
}
repeat
{
finditem %item c_ , #backpackid
if #findcnt <> 0
{
exevent Drag #Findid #findstack
exevent Dropc %box
wait 25
}
}
until #findcnt = 0
msg $
wait 35
if %repairwep
{
msg T $
gosub repairWeapon
}
if %recall
gosub recalls
move 5878 2885 ;?????????? ?? ?????? ?? ????? ? ?????, ?????? ????? ?? ???????
wait 1
move 5864 2891 ;?????????? ?? ?????? ?? ????? ? ?????, ?????? ????? ?? ???????
wait 1
move 5823 2891
wait 1
move 5752 2912
wait 1
move 5544 2812
wait 1
move 5536 2917
wait 1
move 5515 2917
wait 1
return
sub back
gosub checkHP
set %oldPosX #charposx
set %oldPosY #charposy
for %i 1 2
{
gosub openRunebook
click 261 215 ; Recharge runebook 2x
wait 10
}
gosub openRunebook
repeat
{
click %x2 %y2
wait 20
}
until #contname <> generic_gump && #contsize <> 577_426
event macro 13 21
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
return
sub runToBox
move 5526 2917 ;?????????? ?? ?????? ? ?????, ?????? ????? ?? ???????
wait 1
move 5549 2917 ;?????????? ?? ?????? ? ?????, ?????? ????? ?? ???????
wait 1
move 5727 2907 ;?????????? ?? ?????? ? ?????, ?????? ????? ?? ???????
wait 1
move 5821 2890
wait 1
move 5862 2890
wait 1
move 5885 2877
wait 1
move 5903 2852
repeat
{
move %xCoord %yCoord 0 3s
wait 10
}
until #charposx = %xCoord && #charposy = %yCoord
return
sub follow&kill
msg .arm$
set %charX #charposx
set %charY #charposy
set %charz #charposz
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
}
until #findcnt = 0
wait 20
gosub loot
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
return
sub checkHP
if #hits < #maxhits
{
msg .arm$
sound
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
gosub follow&kill
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
if hungry in #sysmsg
{
gosub eat
return
}
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
wait 20
}
until #findcnt = 0
repeat
{
finditem %2 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %2 C_ , #backpackid
wait 20
}
until #findcnt = 0
repeat
{
Finditem %3 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %3 C_ , #backpackid
wait 20
}
until #findcnt = 0
return
sub eat
finditem ZBM C
set #lobjectid #findid
event macro 17 0
wait 10
finditem GND C
set #lobjectid #findid
event macro 17 0
wait 10
event macro 17 0
wait 15s
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
{
wait 5s
if #weight >= %maxweight
{
if %recall
gosub port
if ! %recall
gosub moveItems
return
}
if #weight < %maxweight
return
}
if #findcol = 1325 || #findcol = 1218 || #findcol = 1160
+ || #findcol = 2125 || #findcol = 1548
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 50
}
ignoreitem #findid 1
goto dropLoop
return
sub loot
set %lootTime #scnt + 30
finditem YFM G_4
if #findcnt > 0
{
set #lobjectid #findid
event macro 17 0
while #contkind <> ASEB && #contsize <> 144_212 && %lootTime > #scnt
wait 2s
wait 20
if #conttype = YFM
set %corpse #contid
repeat
{
finditem %loot C_ , %corpse
if #findcnt = 0 || #scnt > %lootTime
{
ignoreitem %corpse 2
return
}
exevent drag #findid #findstack
exevent dropc #backpackid
wait 35
}
until #false
}
return
sub element
finditem ED G
if #findcnt <> 0
{
msg .arm$
set %charX #charposx
set %charY #charposy
set %charz #charposz
sound
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
finditem ED G
set %element #findid
msg .arm$
set #ltargetid %element
event macro 27 0
repeat
{
finditem %element
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
}
until #findcnt = 0
wait 20
gosub loot
msg Uh, kak ja ego! Ubit, padla! $
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
}
return
sub recalls
finditem WTL C_ , #backpackid
if #findstack <= 2 || #findcnt = 0
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
finditem WTL C_ , %box
exevent drag #findid %amountRecalls
exevent dropc #backpackid
wait 20
}
return
sub repairWeapon
repeat {
put1:
repeat
{
finditem %weapon C_ , #charid
exevent drag #findid
exevent dropc #backpackid
wait 25
finditem %weapon C_ , #charid
}
until #findcnt = 0
finditem %weapon C_ , #backpackid
if #findcnt = 0
goto put1
take1:
set #lobjectid %box
event macro 17 0
wait 25
finditem %ings C_, %box
exevent drag #findid 5
exevent dropc #backpackid
wait 25
finditem %ings C_, #backpackid
if #findcnt = 0
goto take1
_repair:
set #lobjectid %repairTool
set #ltargetid %weapon
set #ltargetkind 1
set %lag #scnt + 10
event macro 17 0
wait 20
target
while #targcurs <> 1 && #scnt < %lag
wait 1
event macro 22 0
wait 20
finditem %ings C_, #backpackid
until You_fully_repaired || Your in #sysmsg
msg repaired sucessfully! $
take2:
set #lobjectid %box
event macro 17 0
wait 10
finditem %ings C_, #backpackid
exevent drag #findid #findstack
exevent dropc %box
wait 25
finditem %ings C_, #backpackid
if #findcnt > 0
{ goto take2 }
msg resursi polozhil nazad, snova v put! $
return
поменяй ид сундука в банке и запускай в пещере
немного тупит когда идёт после банка назад в пещеру) но работает на ура)
Posted 11 January 2017 - 21:13
поменяй ид сундука в банке и запускай в пещере
немного тупит когда идёт после банка назад в пещеру) но работает на ура)
Спасибо. Черкани в ЛС скайп ) Чем смогу помогу.
Posted 04 April 2017 - 22:47
0 members, 0 guests, 0 anonymous users