wiki:UoPilot/makr/fishing

Version 1 (modified by sskrd, 12 years ago) (diff)

--

Качается с пирса в городе Cove

:fishingsub //fishing sub
for #y -6 6 1 // !!!воот тут, если копаете с берега, а не с моста,
for #x -6 6 1 // !!!надо подправить макс координаты по X и Y.
:fishing подпрограмма вылова рыбы
set lasttargetx charposx + #x
set lasttargety charposy + #y
set lasttargetkind 2
send F5 1000 // LastObject, WaitForTarget, LastTarget
set timer 0
while_not (lastmsg pull) or (lastmsg fail) or (lastmsg Try) or (lastmsg quick) or (lastmsg no fish) or (timer > 6000)
end_while
if (lastmsg Try) or (lastmsg quick) or (lastmsg no fish) or (lastmsg fail)
wait 1500 // задержка после неудачного использования на удочке.
end_if

if lastmsg destroer //сломалась удочка
send f6 500 //!!! в ассисте - target type на удочку
double_left 870, 153 //!!! координаты удочки в руке. Надежнее, чем брать из пака.
wait 500
end_if
if_not (lastmsg are no fish) or (lastmsg Try) or (lastmsg pull)
//!!! последний or - ловля будет продолжаться только один раз вместо ловли до no fish
//если длина берега достаточная, это ускоряет процесс ловли и прокачки.
//Если скилл меньше 60, то имеет смысл поставить
перед or (lastmsg pull)
goto fishing процедура вылова рыбы.
end_if
end_for
end_for
return fishing