Протестировал свой вариант, работает без сбоев.
3::
MouseClick, left, 619, 385, , ,D ;Верхний левый угол списка
Sleep, 100
MouseMove, 879, 610
Sleep, 100
MouseClick, left, 879, 610, , ,U ;Нижний правый угол списка
Sleep, 100
Send, ^{vk43} ; Ctrl-C, копирование.
Sleep, 100
StringReplace, spisok, clipboard, %A_Space%, _, all ;замена пробелов подчеркиванием
StringReplace, spisok, spisok, кормовая_свёкла, 3.95, all
StringReplace, spisok, spisok, цветная_капуста, 3.69, all
StringReplace, spisok, spisok, Козье_молоко, 100, all
StringReplace, spisok, spisok, зерно, 0.5, all
StringReplace, spisok, spisok, кукуруза, 1.1, all
StringReplace, spisok, spisok, клевер, 1.34, all
StringReplace, spisok, spisok, рапс, 2.75, all
StringReplace, spisok, spisok, ботва, 8.05, all
StringReplace, spisok, spisok, яйца, 15, all
StringReplace, spisok, spisok, молоко, 80, all
StringReplace, spisok, spisok, подсолнух, 17.8, all
StringReplace, spisok, spisok, василёк, 18.5, all
StringReplace, spisok, spisok, морковь, 0.16, all
StringReplace, spisok, spisok, огурцы, 0.52, all
StringReplace, spisok, spisok, редиска, 1.02, all
StringReplace, spisok, spisok, клубника, 1.44, all
StringReplace, spisok, spisok, помидоры, 1.96, all
StringReplace, spisok, spisok, лук, 2.28, all
StringReplace, spisok, spisok, шпинат, 3.8, all
StringReplace, spisok, spisok, шерсть, 49, all
StringReplace, spisok, spisok, мёд, 70, all
StringReplace, spisok, spisok, майонез, 40, all
StringReplace, spisok, spisok, сыр, 300, all
StringReplace, spisok, spisok, рыбка, 250, all
StringReplace, spisok, spisok, картофель, 4.38, all
StringReplace, spisok, spisok, спаржа, 12.4, all
StringReplace, spisok, spisok, кабачки, 3.3, all
StringReplace, spisok, spisok, Герань, 10.12, all
StringReplace, spisok, spisok, Маргаритка, 3.72, all
StringReplace, spisok, spisok, Йогурт, 300, all
StringReplace, spisok, spisok, Кетчуп, 290, all
pos = 1
price := ""
;msgbox % spisok
while pos := regexmatch(spisok, "([0-9]*)x_([0-9]*.[0-9]*)", found, pos+StrLen(found))
{
price += found1*found2
}
MouseClick, left, 691, 648, , , D ;
Sleep, 100
MouseMove, 814, 637
Sleep, 100
MouseClick, left, 814, 637, , , U
Sleep, 100
Send, ^{vk43} ; Ctrl-C, копирование.
Sleep, 100
StringReplace, clipboard, clipboard, ., , all
StringReplace, clipboard, clipboard, ",", ., all
regexmatch(clipboard, "(^[0-9]*)", ceha)
otvet = net
x = 893
if (ceha > price)
{
otvet = da
x := 619
}
MouseClick, left, %x%, 703
;msgbox % spisok "`n" price "`n" ceha "`n" otvet " " x
Вышло несколько громоздка.
Вместо ([0-9]) пытался ставить (\d), почему то не срабатывало.
В переменную записывалось пустое значение.
Пытался найти описание функции regexmatch, не нашёл!
Если знаете где есть дайте пожалуйста ссылку.
Еще раз спасибо всем за помощь!