Помогите с минингом. 1-2 строчки не хватает!

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Руля
Posts: 4
Joined: 2010-05-20 10:25:04

Помогите с минингом. 1-2 строчки не хватает!

Post by Руля »

Помогите с минингом. 1-2 строчки не хватает!
На сервере спрашивает сколько раз я хочу копать (loops 0-9999)
я хотел решить эту проблему таким способом

.......
UO.ServerPrint (3) \\- нужно чтобы 3 раза копал
wait (700)
UO.ServerPrint (enter) \\ тут мне нужно чтобы он нажимал Ентер, тоесть начинал копать ...
.....

только инжа не распознает "enter". какой командой мне воспользоваться?
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Помогите с минингом. 1-2 строчки не хватает!

Post by Mirage »

UO.ServerPrint (enter) тут мне нужно чтобы он нажимал Ентер, тоесть начинал копать ...
команда для произношения :)

тебе надо uo.press(код клавиши)
Руля
Posts: 4
Joined: 2010-05-20 10:25:04

Re: Помогите с минингом. 1-2 строчки не хватает!

Post by Руля »

а какой у него код?
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Помогите с минингом. 1-2 строчки не хватает!

Post by Mirage »

в редакторе скриптов вверху есть считывалка
Руля
Posts: 4
Joined: 2010-05-20 10:25:04

Re: Помогите с минингом. 1-2 строчки не хватает!

Post by Руля »

не получается у меня решить проблемку.. не вписывает он сколько раз копать и не жмет ок
помогите найти решение, или куда вписать..
вписывал вот это
UO.Print(51) - код единицы
wait(500)
UO.LClick(267,309) расположение клавижи ОК
wait(500)




Сам скрипт
sub main()
var i
uo.print("поехали")
While UO.Life>0
for i=1 to 14
kopat()
uo.press(34)
next
uo.print("GO назад ")
kopat()
for i=1 to 11
wait(500)
uo.press(36)
next
uo.press(34)
wend
end sub

sub kopat()
var where_x,where_y,coords,i
UO.DeleteJournal()
where_x=uo.getx()
where_y=uo.gety()
for i=-2 to 2
uo.print("Тайл "+str(i+3)+"/5")
coords="waittargettile "+" 1343 "+str(where_x)+" "+str(where_y+i)+" 0"
uo.exec(coords)
uo.exec("usetype '0x0E85'") # a Grandmaster Miner's Pickaxe
UO.DeleteJournal()
while (not (UO.InJournal("stop mining") or UO.InJournal("far")))
wait(1000)
wend
next
end sub
Руля
Posts: 4
Joined: 2010-05-20 10:25:04

Re: Помогите с минингом. 1-2 строчки не хватает!

Post by Руля »

проблему решил, закройте тему
Post Reply