Не подумайте что я придираюсь - мне просто реально интересно.
Code:
while uo.mana<22 ; вот ЭТО зачем тут? Мана копится сама разве?
wait(500)
wend
зачем в касте ворта пауза цикличная пока маны меньше 13 и 20 с чемто? Если сделать ЕСЛИ маны столько то И нет элема и ПК то медитируем или пьем тоталку и кастуем ворта дальше.
Могу ошибиться. но помоему алгоритм каста вортексов немного не в порядке.
У автора:
до тех пор пока есть элем
кастуем вортекса
в касте идет каст со свитка если мало маны или каст с книги если маны много ЗАТЕМ проверка маны
Если не ошибаюсь каст ворта достаточно маноемкое заклинание и если например вызвать 2 то на 3 может маны не хватить. НО проверка то стоит ПОСЛЕ каста а не перед.
PS
из косметики можно ввести 2 функции для "взять item\положить item" и использовать в скрипте просто GET(type)\PUT(type)
Code:
sub main()
put(ore1, sund)
put(ore2, sund)
put(ore3, sund)
put(ore4, sund)
get(eda, backpack, 1, 50)
eda()
put(eda, sund)
get(kirka, backpack, 2, 1)
get(kirka, backpack, 2, 1)
end sub
Sub GET(item, cont, min, max) ; предмет, откуда, минимум, сколько брать
If UO.Count( item ) < min Then
# UO.Print("Кончилось сырье в рукзаке")
UO.FindType( item, '-1', cont )
if UO.FindCount() > 0 Then
# UO.Print('Сырья в сундуке: ' + Str( UO.FindCount( item ) ) )
uo.moveitem('finditem', max, 'backpack')
checklag()
else
# UO.Print( 'Полностью кончилось сырье' )
UO.CancelMenu()
return
endif
Endif
end sub
Sub PUT(item, cont)
while UO.Count( item ) > 0
UO.FindType( item, -1, -1 )
UO.MoveItem( 'finditem', 0, cont )
checklag()
wend
end sub
PPS вы только не подумайте что я придираюсь или просто так болтаю - могу предложить свои решения некоторых проблем. А так скрипт классный (жаль не для моего шарда)
