 Сбор урожая, помогите скриптом |
  Сообщений: 2217 Рег. 26.10.2009 |
 22 октября 2013 00:39 Сообщение #1
|
Есть ли у кого скрипт на сбор урожая? Чтобы можно было внести в него несколько типов ростков. Без остановки... Чтобы в афк собирал. Заранее спасибо |
|
|
|
|
|
Сообщений: 2217 Рег. 26.10.2009 |
22 октября 2013 19:37 Сообщение #2
|
ну пожалуйста :) |
|
|
|
|
|
22 октября 2013 19:41 Сообщение #3
|
|
берешь скрипт на лут с массивов итемов, которые надо лутать. Выкидываешь оттуда резку, мув итем (граб). Остается некий макет. Изменяешь поиск нужных итемов с трупа на землю. На месте, где должна быть строчка перемещения - юсобжект (финдитем). Потом пишешь сюда, почему у тебя не работает - может и помогут |
|
|
|
|
|
Сообщений: 2217 Рег. 26.10.2009 |
22 октября 2013 19:50 Сообщение #4
|
печально( |
|
|
|
|
|
Сообщений: 2217 Рег. 26.10.2009 |
22 октября 2013 20:35 Сообщение #5
|
нашел скриптик замечательный, но прошу помощи переделать его в нон-стоп и с несколькими типами... sub farm() VAR i,dist, Exit, GrowType UO.Print('4to budem sobirat?') UO.AddObject('Grow') While UO.Targeting() wait(500) Wend GrowType=UO.GetGraphic('Grow') dist=0 While dist<25 Exit=0 While Exit<>1 UO.Set('finddistance',dist) UO.Findtype(GrowType,-1,'ground') If UO.FindCount() Then If UO.GetDistance('finditem')>3 Then SuperWalk(0,0,'finditem') dist=0 Endif UO.UseObject('finditem') Wait(1000) Else Exit=1 dist=dist+1 Endif Wend Wend UO.Print('Vse sobral!') end sub |
|
|
|
|
|
Сообщений: 2217 Рег. 26.10.2009 |
23 октября 2013 00:07 Сообщение #6
|
Mitako, I need help... |
|
|
|
|
|
23 октября 2013 09:41 Сообщение #7
|
|
Цитата: Anen Mitako, I need help... тот, скрипт, что ты нашел - хрень ) Я же тебе написал как сделать ) Проделай все вещи, что я описал, а вот потом допилим |
|
|
|
|
|
Сообщений: 2217 Рег. 26.10.2009 |
23 октября 2013 09:47 Сообщение #8
|
Mitako, да я не соображаю че там делать надо, думаешь я знаю где там резка? где там массивы какие то...) |
|
|
|
|
Последние посетители (0):
| Сейчас: 25 ноября 2024 06:45 |