Здравствуйте, гость ( Вход | Регистрация )

> Помогите доработать
Скуб
сообщение 18.7.2012, 21:46
Сообщение #1


**

Neophyte
Сообщений: 13
Регистрация: 14.4.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 14.865



:mine
set lastobjectid #pickaxe
for #x -2 2 1
for #y -2 2 1
set lasttargetx charposx +#x
set lasttargety charposy +#y
set lasttargetkind 2

:repeat
send f1 500
set timer
while_not (lastmsg = $s1) or (lastmsg = $s2) or (lastmsg = $s3) or (lastmsg = $s4) or (timer > 800)
while_not (lastmsg = $s5) or (lastmsg = $s6) or (lastmsg = $s7) or (lastmsg = $s8) or (timer > 2500)
if lastmsg = $s13
goto base
end_if
if wght > #maxweight
goto base1
end_if
end_while
end_if
goto repeat
end_while
end_for
end_for
wait 1000
goto start


:unload
set #backpackx1 #backpackx + 20
set #backpacky1 #backpacky + 30
set #backpackx2 #backpackx + 130
set #backpacky2 #backpacky + 100
wait 500
set #unloada #backpackx1
set #unloadb #backpacky1
while #unloadb < #backpacky2
while #unloada < #backpackx2
move #unloada, #unloadb
set lastobjecttype 3701
double_left #unloada, #unloadb
set timer 0
if wght < 50
goto load
end_if
if lastmsg = $s10
wait 1000
drag #unloada, #unloadb #chestx, #chesty all
wait 100
say Wow
end_if
set #unloada #unloada + #step
end_while
set #unloadb #unloadb + #step
set #unloada #backpackx
end_while
goto load


короче 2 части, суть... не пойму, почему 1й круг, он летает по точкам, всё копает, летит на базу для разгрузки, собирает реги потраченные и вуаля, начинается типа с начала макрос, и показывает ошибку в команде for #x -2 2 1 for #y -2 2 1 стопорится пилот, подскажите, что добавить надо, чтобы он фор норм воспринимал
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

Сообщений в этой теме
Скуб   Помогите доработать   18.7.2012, 21:46
DarkMaster   Пожалуйста, используйте тег code, отредактируйте с...   18.7.2012, 22:13
Скуб   изменил, разницы нет) всёравно пишет ошибку   18.7.2012, 22:49
Zeleax   похоже проблема из-за того, что нельзя из цикла fo...   18.7.2012, 22:53
Скуб   это как?) я из него не выхожу вообще-то, 1й круг т...   18.7.2012, 23:29
Скуб   хм... действительно, какой-то из готов проверящих ...   18.7.2012, 23:41
Zeleax   вот, например, выход из цикла if wght > #maxwe...   19.7.2012, 6:56
Скуб   ты имеешь в виду сделать? set lastobjectid #picka...   19.7.2012, 11:52
DarkMaster   что-то вроде. но ты не учел, что синтаксис у while...   19.7.2012, 14:22
Скуб   :mine set lastobjectid #pickaxe for #x -2 2 1 for ...   19.7.2012, 14:38
Скуб   Еще вопрос, попробовал с репитом: :body set #ore...   19.7.2012, 16:03
DarkMaster   Я не вижу текста ошибки. return у вас для чего ис...   19.7.2012, 16:11
Скуб   Да уже разобрался))), DarkMaster я скинул вам полн...   19.7.2012, 16:39
Zeleax   DarkMaster приказ принял? ))   19.7.2012, 16:42
Скуб   Это не приказ, это просьба посмотреть полный макро...   19.7.2012, 16:50
DarkMaster   в скинутой простыне for не обнаружил. Вы не полени...   19.7.2012, 17:39
Скуб   да я прочитал, но не понял всё равно, в ЛС просмот...   19.7.2012, 17:45
DarkMaster   а зачем вам break в while? Повторюсь.   19.7.2012, 18:08
Microsoft   Помогите с таргетом. Скрипт на мининг, копает вокр...   16.9.2012, 22:03
WKnight   Проверь чему равно LastStaticType, LastObjectType,...   18.9.2012, 3:10
Microsoft   Нашел в чем проблема, она была все таки в пилоте. ...   18.9.2012, 20:16


Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия | Версия для КПК Сейчас: 21.5.2024, 21:59
Designed by Nickostyle