sub main()
var num_of_potions, type_of_work, side_of_recipe, num_of_page, num_4_make, cast_bless
var x_rlist, y_rlist, x_lbtn, y_lbtn, x_rbtn, y_rbtn,x_okbtn, y_okbtn, i, k
num_of_potions = 1000 ; количество поушенов для изготовления
type_of_work = "numr" ; тип работы скрипта: для изготовления определенного количества указать nump, для работы, пока не кончаться реги numr
side_of_recipe = 1 ; 0 - левая страница, 1 - правая страница
num_of_page = 0 ; номер страницы. 0 это первая страница
num_4_make = "20" ; сколько делать поушенов (вводиться в строку после выбора типа поушена)
cast_bless = 0 ; кастовать ли bless на себя
x_rlist = 462 ; x - координата правого листа, для переворачивания страниц
y_rlist = 165 ; y - координата правого листа, для переворачивания страниц
x_lbtn = 294 ; x - координата левой кнопки приготовления поушена
y_lbtn = 282 ; y - координата левой кнопки приготовления поушена
x_rbtn = 451 ; x - координата правой кнопки приготовления поушена
y_rbtn = 280 ; y - координата правой кнопки приготовления поушена
x_okbtn = 320 ; x - координата кнопки "ОК"
y_okbtn = 307 ; y - координата кнопки "ОК"
if ((cast_bless == 1) and (UO.Count(0x0F84) > 0) and (UO.Count(0x0F86) > 0)) or (cast_bless == 0) then
###################### Часть выполнения, если тип работы по количеству регов и бутылок ################################
if type_of_work == "numr" then
While (UO.Count(0x0F88) > 19)
# книга рецептов
UO.Exec("usetype 0x0fbd")
wait(500)
# если первая страница, то не переворачиваем
if (num_of_page <> 0) then
# если не первая, то нажимаем на уголок страницы нужное количество раз
for i=0 to num_of_page
UO.LClick(x_rlist, y_rlist)
Wait(300)
next
endif
# кликаем на кнопку приготовления
if side_of_recipe == 0 then
UO.LClick(x_lbtn, y_lbtn)
wait(500)
endif
# кликаем на кнопку приготовления
if side_of_recipe == 1 then
UO.LClick(x_rbtn, y_rbtn)
wait(500)
endif
# говорим, сколько сделать поушенов и ждем
UO.Say(num_4_make)
UO.LClick(x_okbtn, y_okbtn)
wait(10000)
while uo.life < uo.str
uo.exec("bandageself")
wait(5000)
wend
wend
endif
end sub