Скрипт Мининг Бот Под Инжект, продам Опции

[ProZaC]

копает в шахте минока носит в банк, берет кирки в банке, лечится бинтами под инжект в Асю

835-086

P.S. скрипт продается, стучать по делу только

[Flammeble]

set %spot2 998
set %bankspotend 1007
set %whatwedrop ENK_TWS_AXS_GXS_VWS_UWS_ZWS_EVF_GVF_HVF_BVF_UVF
set %forgeid MYNCKMD
set %shovelid WWF_twf_QPF_WMF
set %OREid DWJ_EWJ_GWJ
set %ingotid ENK
set %prospector #true
set %smeltspot 0

set %getshovel #false
set %back #false

gosub setrail
gosub checkingots

event macro 32
if Always_Run_is_now_off. in #sysmsg
{
event macro 32
}

main:
gosub walknextspot
gosub dig
goto main

sub walknextspot
movenext:
if %spot = %endspot
{
set %spot 0
}

if %back = #false
{
set %spot %spot + 1
}

if %back = #true
{
repeat
{
event pathfind %x . %smeltspot %y . %smeltspot %z . %smeltspot
wait 1s
if #charposx <> %x . %smeltspot || #charposy <> %y . %smeltspot
set %next #false
else
set %next #true
}
until %next = #true

gosub smelt

set %next #false
set %back #false
gosub checkingots

if %ingots => 300 || %getshovel = #true
{
repeat
{
set %spot2 %spot2 + 1
gotobank:
event pathfind %x . %spot2 %y . %spot2 %z . %spot2
wait 1s
if #charposx <> %x . %spot2 || #charposy <> %y . %spot2
goto gotobank
}
until %spot2 = 1007

gosub bankprocedure

repeat
{
set %spot2 %spot2 - 1
gofrombank:
event pathfind %x . %spot2 %y . %spot2 %z . %spot2
wait 1s
if #charposx <> %x . %spot2 || #charposy <> %y . %spot2
goto gofrombank
}
until %spot2 = 998
}
}

gotospot:
event pathfind %x . %spot %y . %spot %z . %spot













































































































































































wait 2s

if #WEIGHT > #MAXWEIGHT
{
repeat
{
findItem %OREid c_ , #backpackid
Exevent Drag #findid 1
Exevent Dropg #charposx #charposy #charposz
}
until #findKind <> -1 || #WEIGHT > #MAXWEIGHT
}

if #charposx <> %x . %spot || #charposy <> %y . %spot
{
if %spot < 0
set %spot 0
goto gotospot
}

return


sub dig
set %nightdaybred 0
if %back = #true
return

if %event . %spot = #false
return

set %digerror 0
predigging:
set %jstart #jindex

finditem %shovelid c_ , #backpackid
if #findkind = 0
{
set #lobjectID #findID
}
else
{
set %getshovel #true
set %back #true
return
}

set #LTARGETX #CHARPOSX
set #LTARGETY #CHARPOSY
set #LTARGETZ #CHARPOSZ
set #LTARGETKIND 3
set #LTARGETTILE %digtile . %spot

digging:
if %nightdaybred > 30
{
return
}

set %nightdaybred %nightdaybred + 1
event macro 17 ;last object
target 4s
event macro 22 ;last target
wait 3s
scanjournal 1

if #jindex > %jstart
{
set %jend #jindex
for %i %jstart %jend
{
scanjournal 1

if WORN in #journal
{
goto predigging
}

if IS_FULL in #journal
{
wait 1s
set %back %true
return
}

if YOU_CAN in #journal
{
if %digerror > 5
{
wait 1s
return
}
set %digerror %digerror + 1
goto predigging
}

if BE_SEEN in #journal
{
if %digerror > 5
{
wait 1s
return
}
set %digerror %digerror + 1
goto predigging
}

if IS_TOO in #journal
{
if %digerror > 5
{
wait 1s
return
}
set %digerror %digerror + 1
goto predigging
}


if IS_NO_METAL in #journal
{
return
}
}
set %jstart #jindex
}
else
{
set %jstart #jindex
}

if #WEIGHT >= #MAXWEIGHT - 20
{
wait 1s
deletejournal
set %back #true
return
}

finditem %shovelid c_ , #backpackid
if #findkind = 0
{
set #lobjectID #findID
}
else
{
goto predigging
}

deletejournal
goto digging

sub smelt
findItem %forgeid g
if #findid = %forgeid
{
set #lTargetID #findID
set #lTargetKind 1
}

smeltprocedure:
findItem %OREid c
if #findKind <> -1
{
set #lObjectID #findID
event Macro 17 0
event Macro 22 0
goto smeltprocedure
}
return

sub setrail
set %endspot 75

set %x0 2572
set %y0 476
set %z0 0

set %x1 2564
set %y1 480
set %z1 0
set %DIGTILE1 1353

set %x2 2565
set %y2 480
set %z2 0
set %DIGTILE2 1339

set %x3 2566
set %y3 480
set %z3 0
set %DIGTILE3 1339

set %x4 2567
set %y4 480
set %z4 0
set %DIGTILE4 1339

set %x5 2568
set %y5 480
set %z5 0
set %DIGTILE5 1339

set %x6 2569
set %y6 480
set %z6 0
set %DIGTILE6 1340

set %x7 2570
set %y7 480
set %z7 0
set %DIGTILE7 1339

set %x8 2571
set %y8 480
set %z8 0
set %DIGTILE8 1339

set %x9 2572
set %y9 480
set %z9 0
set %DIGTILE9 1339

set %x10 2573
set %y10 480
set %z10 0
set %DIGTILE10 1340

set %x11 2574 ;emr
set %y11 480
set %z11 0
set %DIGTILE11 1339

set %x12 2575
set %y12 480
set %z12 0
set %DIGTILE12 1339

set %x13 2576
set %y13 480
set %z13 0
set %DIGTILE13 1339

set %x14 2577
set %y14 480
set %z14 0
set %DIGTILE14 1339

set %x15 2578
set %y15 480
set %z15 0
set %DIGTILE15 1342

set %x16 2579
set %y16 480
set %z16 0
set %DIGTILE16 1339

set %x17 2580
set %y17 480
set %z17 0
set %DIGTILE17 1339

set %x18 2581
set %y18 480
set %z18 0
set %DIGTILE18 1352

set %x19 2581
set %y19 481
set %z19 0
set %DIGTILE19 1348

set %x20 2580
set %y20 481
set %z20 0
set %DIGTILE20 1339

set %x21 2579
set %y21 481
set %z21 0
set %DIGTILE21 1339

set %x22 2578
set %y22 481
set %z22 0
set %DIGTILE22 1339

set %x23 2577
set %y23 481
set %z23 0
set %DIGTILE23 1339

set %x24 2576
set %y24 481
set %z24 0
set %DIGTILE24 1342

set %x25 2575
set %y25 481
set %z25 0
set %DIGTILE25 1339

set %x26 2574
set %y26 481
set %z26 0
set %DIGTILE26 1339

set %x27 2573
set %y27 481
set %z27 0
set %DIGTILE27 1339

set %x28 2572 ;amt
set %y28 481
set %z28 0
set %DIGTILE28 1339

set %x29 2571
set %y29 481
set %z29 0
set %DIGTILE29 1339

set %x30 2570
set %y30 481
set %z30 0
set %DIGTILE30 1339

set %x31 2569
set %y31 481
set %z31 0
set %DIGTILE31 1339

set %x32 2568
set %y32 481
set %z32 0
set %DIGTILE32 1339

set %x33 2567
set %y33 481
set %z33 0
set %DIGTILE33 1339

set %x34 2566
set %y34 481
set %z34 0
set %DIGTILE34 1342

set %x35 2565
set %y35 481
set %z35 0
set %DIGTILE35 1339

set %x36 2564
set %y36 481
set %z36 0
set %DIGTILE36 1339

set %x37 2563
set %y37 481
set %z37 0
set %DIGTILE37 1353

set %x38 2562
set %y38 482
set %z38 0
set %DIGTILE38 1353

set %x39 2563
set %y39 482
set %z39 0
set %DIGTILE39 1339

set %x40 2564
set %y40 482
set %z40 0
set %DIGTILE40 1339

set %x41 2565
set %y41 482
set %z41 0
set %DIGTILE41 1340

set %x42 2566
set %y42 482
set %z42 0
set %DIGTILE42 1339

set %x43 2567
set %y43 482
set %z43 0
set %DIGTILE43 1339

set %x44 2568
set %y44 482
set %z44 0
set %DIGTILE44 1340

set %x45 2569
set %y45 482
set %z45 0
set %DIGTILE45 1339

set %x46 2570
set %y46 482
set %z46 0
set %DIGTILE46 1342

set %x47 2571
set %y47 482
set %z47 0
set %DIGTILE47 1339

set %x48 2572
set %y48 482
set %z48 0
set %DIGTILE48 1341 ;sha

set %x49 2573
set %y49 482
set %z49 0
set %DIGTILE49 1339

set %x50 2574
set %y50 482
set %z50 0
set %DIGTILE50 1340 ;iron

set %x51 2575
set %y51 482
set %z51 0
set %DIGTILE51 1339 ;iron

set %x52 2576
set %y52 482
set %z52 0
set %DIGTILE52 1339 ;iron

set %x53 2577
set %y53 482
set %z53 0
set %DIGTILE53 1339

set %x54 2578
set %y54 482
set %z54 0
set %DIGTILE54 1339

set %x55 2579
set %y55 482
set %z55 0
set %DIGTILE55 1339

set %x56 2580
set %y56 482
set %z56 0
set %DIGTILE56 1339

set %x57 2581
set %y57 482
set %z57 0
set %DIGTILE57 1344

set %x58 2580
set %y58 483
set %z58 0
set %DIGTILE58 1344

set %x59 2579
set %y59 483
set %z59 0
set %DIGTILE59 1339

set %x60 2578
set %y60 483
set %z60 0
set %DIGTILE60 1342

set %x61 2577
set %y61 483
set %z61 0
set %DIGTILE61 1339

set %x62 2576
set %y62 483
set %z62 0
set %DIGTILE62 1339 ;ruby

set %x63 2575
set %y63 483
set %z63 0
set %DIGTILE63 1339

set %x64 2574
set %y64 483
set %z64 0
set %DIGTILE64 1342

set %x65 2573
set %y65 483
set %z65 0
set %DIGTILE65 1339

set %x66 2572
set %y66 483
set %z66 0
set %DIGTILE66 1342

set %x67 2571
set %y67 483
set %z67 0
set %DIGTILE67 1339

set %x68 2570
set %y68 483
set %z68 0
set %DIGTILE68 1339

set %x69 2568
set %y69 483
set %z69 0
set %DIGTILE69 1339

set %x70 2567
set %y70 483
set %z70 0
set %DIGTILE70 1339

set %x71 2566
set %y71 483
set %z71 0
set %DIGTILE71 1340

set %x72 2565
set %y72 483
set %z72 0
set %DIGTILE72 1340

set %x73 2564
set %y73 483
set %z73 0
set %DIGTILE73 1341

set %x74 2563
set %y74 483
set %z74 0
set %DIGTILE74 1339

set %x75 2562
set %y75 483
set %z75 0
set %DIGTILE75 1354

set %x998 2572
set %y998 476
set %z998 0

set %X999 2563
set %Y999 488
set %Z999 0

set %X1000 2559
set %Y1000 501
set %Z1000 0

set %X1001 2551
set %Y1001 501
set %Z1001 15

set %X1002 2539
set %Y1002 501
set %Z1002 30

set %X1003 2527
set %Y1003 504
set %Z1003 15

set %X1004 2520
set %Y1004 516
set %Z1004 0

set %X1005 2509
set %Y1005 520
set %Z1005 0

set %X1006 2506
set %Y1006 531
set %Z1006 0

set %X1007 2505
set %Y1007 542
set %Z1007 0
return


sub checkingots
set %totalingots 0
set %ingots 0
findagain:
finditem %ingotid c_, #backpackid
if #findkind <> -1
{
set %totalingots %totalingots + 1
set %ingotid . %totalingots #findid
set %ingotcol . %totalingots #findcol
set %ingotstack . %totalingots #findstack
ignoreitem #findid ingots
set %ingots %ingots + #findstack
goto findAgain
}
ignoreitem reset ingots

chooseSkill Mini
set %showIngots %Ingots + %realIngots
SetUOTitle Ingots: %showIngots Mining: #skill
return

sub bankprocedure
set %realIngots %realIngots + %Ingots
set %Ingots 0
repeat
{
msg bank$
wait 2s
}
until ( #CONTTYPE = HIF && #CONTNAME = container_gump && #CONTSIZE = 180_240 )
set %bankid #CONTID

repeat
{
finditem %whatwedrop c_ , #backpackid
exevent drag #findid #findstack
exevent dropc %bankid
}
until #findkind = -1

if %dragprospector = #true
{
finditem GBG c_ , %bankid
if #findkind = 0
{
exevent drag #findid #findstack
exevent dropc #backpackid
wait 1s
}
set %dragprospector #false
}

if %getshovel = #true
{
for %qq 1 2
{
finditem %shovelid c_ , %bankid
if #findkind = 0
{
exevent drag #findid #findstack
exevent dropc #backpackid
wait 1s
}
}
set %getshovel #false
}
return

sub waitforgump
set %waitforgumperror 1

repeat
{
if %waitforgumperror = 25
{
finditem KTL c_ , #backpackid
set #LOBJECTID #findid
set #ltargetkind 1
event macro 17 0
}

finditem #LOBJECTID c_ , #backpackid
if #findkind <> 0
{
finditem KTL c_ , #backpackid
set #LOBJECTID #findid
set #ltargetkind 1
event macro 17 0
}
wait 1s
set %waitforgumperror %waitforgumperror + 1
}
until #contname = generic_gump

if #contposx <> 40 || #contposy <> 40
{
contpos 40 40
wait 1s
}
return


под изю. берет лопаты с банка.
1.встать в шахту минока (должна быть одна лопата в паке)
2.нажать плей и все !

[Рустам]

копает в шахте минока носит в банк, берет кирки в банке, лечится бинтами под инжект в Асю

835-086

P.S. скрипт продается, стучать по делу только

Ну и че ты не отвечаешь в асю?