
если у кого есть дайте плзззззз
Moderators: Murderator+, Murderator
Pistur wrote:на мининг скриптик нужен. типо ставиш чара в угол он капает ничего нет шаг в перёд капает и так до конца после того как у3 пераетца разворачивается делает шаг в перёд и вбор и переходит на другой таил и идёт до упора упирается разворачивается и снова на верх![]()
если у кого есть дайте плзззззз
Code: Select all
# правильно вбей все переменные!!!
# чар идет строго вверх и вниз!!!!!!!!!!!!!!!
var Kirka='0x0F39' #тип кирки
var vx=123#координата х вверху
var vy=123#координата у вверху
var nx=123# х внизу
var ny=123# у внизу
var m,n
sub main()
while not uo.dead()
while uo.getx()<>vx and uo.gety()<>vy
minround()
m=uo.getx()
n=uo.gety()
while uo.getx()<>m-1 and uo.gety()<>n-1
uo.press(38)
wait(500)
wend
wend
while uo.getx()<>nx and uo.gety()<>ny
minround()
m=uo.getx()
n=uo.gety()
while uo.getx()<>m+1 and uo.gety()<>n+1
uo.press(40)
wait(500)
wend
wend
wend
endsub
Sub minround()
VAR TileNum = '1339'
VAR x, y, t, k
VAR MaxTime = 100
VAR ms1 = "There is no ore here to mine"
VAR ms2 = "You can't use"
VAR ms3 = "You put the"
VAR ms4 = "You loosen some rocks"
VAR ms5 = "You are too far away"
VAR ms6 = "Try mining in rock"
VAR ms7 = "You can't see that"
uo.useobject('backpack')
for y=-1 to 1
for x=-1 to 1
k = 0
repeat
UO.DeleteJournal()
t = UO.Timer()
k = k + 1
wait(300)
UO.WaitTargetTile( TileNum, STR( UO.GetX() + x ), STR( UO.GetY() + y ), 0)
UO.UseType( Kirka )
uo.deletejournal()
repeat
wait(100)
until UO.InJournal(ms1) OR UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR ((t + MaxTime) < UO.Timer())
until ( NOT UO.InJournal(ms4) AND NOT UO.InJournal(ms3) OR (k > 10) )
next
next
endsub
Question_GimFlex wrote:потестил все работает удачи
Code: Select all
-Вам какого хлеба : черного или белого?
-Черного.
-А его нету.
You Must Die wrote:Question_GimFlex wrote:потестил все работает удачиCode: Select all
-Вам какого хлеба : черного или белого?
-Черного.
-А его нету.
Ты видишь что попросил автор?
Обход нужен с увеличением ширины.
1 походка: 1 ряд, длинна пещеры
2 походка: 2 ряд, длинна пещеры
3 походка: 3 ряд, длинна пещеры.
Че толку ходить туда сюда? Двигаться в бок на другой ряд тайлов ему надо-а не ходить вперёд и в зад как ты предпочитаешь.
Question_GimFlex wrote:You Must Die wrote:Question_GimFlex wrote:потестил все работает удачиCode: Select all
-Вам какого хлеба : черного или белого?
-Черного.
-А его нету.
Ты видишь что попросил автор?
Обход нужен с увеличением ширины.
1 походка: 1 ряд, длинна пещеры
2 походка: 2 ряд, длинна пещеры
3 походка: 3 ряд, длинна пещеры.
Че толку ходить туда сюда? Двигаться в бок на другой ряд тайлов ему надо-а не ходить вперёд и в зад как ты предпочитаешь.
не заметил но исправить 2 строчки тока скажите номера клавиш влево или вправо плз
Question_GimFlex wrote:You Must Die wrote:Согласен, имхо под лежачий камень не течёт.
Пишешь , распинаешься- а толку болт.
я иногда просто ради интереса пишу
You Must Die wrote:Question_GimFlex wrote:You Must Die wrote:Согласен, имхо под лежачий камень не течёт.
Пишешь , распинаешься- а толку болт.
я иногда просто ради интереса пишу
Я тоже писал, только с ошибками.
Так что старайся писать без ошибок, по возможности тестировать и по делу(10 минингов вокруг себя не нуно-лучше промодифицируй... допустим конструкция с обкопкой вокруг себя, но чтото еще добавленное(задача тайлов в файле к которым подходим и обкапываем вокруг, обкопка + перелёт в магаз + ковка + продажа + сброс выхи и денег в банк ...) -вот тогда будет ок). И всё будет окей.