Code:
sub start()
uo.Print("Стартую.")
wait(1000)
mana:
if UO.Mana<UO.Int then
wait(1000)
goto mana
else
goto recall
endif
recall:
uo.Print("Полетели в первый дом.")
wait(1000)
go:
UO.Exec("cast 'Recall' '0x7EB63D8D'");
wait(3000)
if UO.Injournal ("Points not gained") then
UO.deletejournal()
goto go
else
uo.Exec('exec dom1')
endif
end sub
sub dom1()
wait(10000)
uo.set( 'finddistance', 2 )
start:
if uo.countground('0x00CF')<1 then
goto end
else
UO.Exec("waittargetground 0x00CF")
UO.Exec("usetype 0x0F51")
wait(400)
goto start
endif
end:
uo.Print("В этом доме больше некого стричь.")
wait(1000)
uo.Exec('exec recall')
end sub
sub recall()
mana:
if UO.Mana<UO.Int then
wait(1000)
goto mana
else
goto recall
endif
recall:
uo.Print("Полетели во второй дом.")
wait(1000)
go:
UO.Exec("cast 'Recall' '0x7EB63E0D'");
if UO.Injournal ("Points not gained") then
wait(3000)
UO.deletejournal()
goto go
else
uo.Exec('exec dom2')
endif
end sub
sub dom2()
wait(10000)
uo.set( 'finddistance', 2 )
start:
if uo.countground('0x00CF')<1 then
goto end
else
UO.Exec("waittargetground 0x00CF")
UO.Exec("usetype 0x0F51")
wait(400)
goto start
endif
end:
uo.Print("В этом доме больше некого стричь.")
wait(1000)
uo.Exec('exec recall_dom')
end sub
sub recall_dom()
mana:
if UO.Mana<UO.Int then
wait(1000)
goto mana
else
goto recall
endif
recall:
uo.Print("Полетели домой.")
wait(1000)
go:
UO.Exec("cast 'Recall' '0x7EB63E42'");
wait(3000)
if UO.Injournal ("Points not gained") then
UO.deletejournal()
goto go
else
uo.Exec('exec dom')
endif
end sub
sub dom()
wait(10000)
uo.Print("Начинаю переработку шерсти.")
start:
if uo.count('0x0DF8')<1 then
wait(10000)
uo.Print("Шерсть кончилась.")
goto klubky
else
UO.Exec("waittargetground 0x1015")
UO.Exec("usetype 0x0DF8")
wait(4000)
goto start
endif
klubky:
uo.Print("Начинаю переработку клубков в ткань.")
start1:
if uo.count('0x0E1F')<5 then
wait(10000)
uo.Print("ОТЛИЧНО! У нас теперь много ткани! :)")
goto end
else
UO.Exec("waittargetground 0x105F")
UO.Exec("usetype 0x0E1F")
wait(300)
goto start1
endif
end:
uo.Exec('exec drop_and_wait')
end sub
sub drop_and_wait()
wait(10000)
uo.Print("Скидываю ткань под ноги.")
wait(300)
UO.Exec("waittargetobject '^0x0F95'")
UO.Say(",drop")
uo.Print("Ждём респавна шерсти на овечках.")
wait(300000)
uo.Exec('exec start')
end sub
sub eda()
start:
UO.Exec("usetype 0x097B")
wait(20000)
goto start
end sub
писал для себя, скидывать на форум своего шарда как то стрёмно
у меня 2 дома набитых овечками, боюсь что столб воткнут на снос суть скрипта
летит по первой руне, стрежот всех овец в радиусе 2 тайлов, летит во 2 дом, стрежёт там всё, потом домой, дома перерабатывает шерсть на станке, потом клубки, скидывает рулоны на пол, ждёт 5 минут и опять по овечкам
3 руны в пак:
1 в дом рядом с станками для переработки шерсти
2 в первый дом набитый овечками
3 во второй дом набитый овечками
реколиться не по свитка, а по регам
скрипт делал для шарда middle-earth
пс: я не акхти какой скриптер, тупо нарезал из того что понял. у меня работает без сбоев
