Иди в портал, который возле шахты, как появишься в городе у красного нпс пиши harvest, потом беги чуть левее в 1 портал-это обратно в шахту, если пользуешься инжектом то вот простенький скрипт, ах да, не забывай кормить перса, а то сила будет падать по -10.
Sub MiningTile(t, x, y, z)
var timer
repeat
uo.WaitTargetTile(Str(t), Str(x), Str(y), Str(z))
uo.UseType(0x0E85) # a Pickaxe
uo.DeleteJournal()
timer = 0
repeat
wait(1000)
timer = timer + 1
until UO.injournal("You cannot prospect any ore") or uo.injournal("There is no ore") or uo.injournal("gotov") or timer > 30
UO.Usetype("0x097B");
uo.useskill('Detect')
wait(1000)
if uo.InJournal("Found someone") or uo.InJournal("detecting has failed") or uo.InJournal("attacking you") then
if uo.InJournal("Found someone") or uo.InJournal("detecting has failed")then
uo.msg(".c *DETECT kopalka*")
else
uo.msg(".c *ATTACK kopalka*")
endif
endif
until uo.injournal("There is no ore") or uo.InJournal("line") or uo.InJournal("far away")
end sub
sub Mining()
var i, j, tile, f, b, p
f = 0
b = 0
while not uo.dead()
for i = -2 to 2
for j = -2 to 2
tile = 168
while (not uo.PrivateGetTile(uo.GetX() + i, uo.GetY() + j, 251, tile, tile)) and (tile < 1343)
if tile == 171 then
tile = 310
else
if tile == 311 then
tile = 1339
else
tile = tile + 1
endif
endif
wend
if tile < 1339 then
tile = 0
endif
if tile < 1343 then
uo.concolor(0x53)
uo.Print("Копаем тайл " + Str((i + 2) * 5 + j + 3) + " из 25...")
uo.concolor(0)
MiningTile(tile, uo.GetX() + i, uo.GetY() + j, 251)
endif
next
next
uo.Print("Завершил круг. Продолжаю.")
f = f + 1
if b == 2 then
for p=1 to 11
wait(500)
uo.press(36)
next
uo.press(34)
f = 0
b = 0
else
if f == 3 then
for p=1 to 5
wait(500)
uo.press(34)
next
f = 0
b = b + 1
endif
endif
wend
end sub