Выложу скрипты, на которых качался недавно, все скрипты проверенные, некоторые немножко кривые, но все свои функции выполняют. Как я замтил на разных версиях пилота, некоторые вещи, особенно ластмсг'и по разному читаются (не читаются), так что делал я на uopilot v2.14, скачать мона с фв сайта или нашего) Так для начала факу по пилоту, если захотите разобраться сами - пжста http://theabyss-lord.clan.su/forum/7-6-1
Далее - возможны проблемы из-за шрифта, если будете копировать отсюда прямо в пилот. Если возникнут обращайтесь, залью файлами)
Еще одно - я не в курсе от чего это зависит, но иногда бывают очевидные фейлы пилота с lastmsg, если у кого будет, напишу как лечить.
Ну и конечно, если у когото будут идеи и конструктивные предложения как и что поправить, пишите. Только я не люблю пустое "ДОБАВЬ ЕЩЕ 50 СТРОК И СТАНЕТ ЛУЧШЕ", все работает и так, а вот если сделаете это сами или скажите как добавить 2 строки чтоб все было лучше, велкам)
Фишинг. Чар стоит на месте и рыбачит 13*13 тайлов вокруг себя. На F1 забит lastobject waitfortarget lasttragetВ САМОЙ УО.Рыбачить лучше на лошади или ламе, вместо x x введите координаты тайла под собой, тогда выловленнуюю рыбу будет класть в пак
Code
set $s1 There are no fish here.
set $s2 have no line
set $s3 try fishing in water
set $s4 too far away
set $s5 has changed
set $s6 loosen some rocks
set $s7 has increased
set $s8 you pull out
set $s9 Where would you like to fish?
for #x -6 6 1
for #y -6 6 1
set lasttargetx charposx +#x
set lasttargety charposy +#y
set lasttargetkind 2
:second
wait 500
send F1
wait 1000
if (lastmsg There are) or (lastmsg have no line) or (lastmsg try fishing in water) or (lastmsg too far away)
wait 1000
goto first
else
while (lastmsg Where would you)
wait 100
end_while
goto second
end_if
:first
drag x x
end_for
end_for
Добавлено (28.01.2010, 06:29)
---------------------------------------------
ЛамберДжекинг. На F1 забито в асисте - поюзать топор, стоя с восточной стороны дерева, таргетом на дерево, после стоп таргет заменить на target relative. На F11 забиваете в В САМОЙ УО 4 walk s(bottomleft) и 1 walk w(topleft). Самостоятельно придется отключать антимакрос систему, и водить чара если он уткнется в препятствие. Дописывать смысла не вижу, т. к. мне за 15 мин попадается по 3 гварда, как их адекватно убивать пилотом пока не знаю)
Code
send F1
wait 1300
if (lastmsg no logs) or (lastmsg try chopping) or (lastmsg have no line) or (lastmsg get there) or (lastmsg you can't)
send F11
wait 1000
else
while (lastmsg What do you want)
wait 100
end_while
end_if
Мининг. Чар идет по прямой и копает под собой, полностью выкапывая каждый тайл. На F1 забито копать под себя, и сменить таргет на Target relative, В САМОЙ УО забито F11, walk а сторону куда будет идти чар выберете сами. Дл мининга возможно написать макр и посложнее, так что как только появится желаение займусь)
Code
:proverka
send F1
wait 1000
if (lastmsg no ore) or (lastmsg mining in rock) or (lastmsg have no line) or (lastmsg get there) or (lastmsg you can't)
send F11
else
while (lastmsg Where do you want)
wait 100
end_while
end_if
Добавлено (28.01.2010, 06:32)
---------------------------------------------
Как только появится загон чтоб потестить скрипт на таминг, запосчу скрипт на таминг) Различные несложные скрипты можете обучиться делать самостоятельно, прочитав факу которое выше.
