Здравствуйте, гость ( Вход | Регистрация )

> Переписывание скрипта на lua
lnaqqa
сообщение 3.8.2020, 6:50
Сообщение #1


*

Registred
Сообщений: 7
Регистрация: 26.1.2016
Группа: Пользователи
Наличность: 0
Пользователь №: 17.818
Возраст: 30



Пытаюсь переписать скрипт для браузерки на lua и на части отвечающим за поиск зоны с пикселями нужного цвета возникла сложность, т.к. не нашел аналогов gosub попытки переписать скрипт без этого приводят к его зависанию, скорее из-за не понимания как это нужно делать.
Вот часть скрипта на пилоте:
code
Код

:color
if_not 973, 712  16711653   and 979, 706  16711653   and   985, 713 16645860 // белые пиксели
set #color 9932392
gosub zona
end_if
if_not 973, 712  16711653   and 979, 706  16711653   and   985, 713 16645860 // белые пиксели
set #color 10783022
gosub zona
end_if
//таких ещё штук 20
:zona
set #t 4  //кол-во точек нужного цвета во второй областе поиска
set #m 1 //кол-во пикселей для смещения

if 118, 242 7554320 and 59, 246 7554320 //кнопка home
set #a findcolor (190 250 820 585 5 5 (#color) %a) //ищем координаты цветов
if #a > 1                          
    for #i 1 size(%a)
        if 243, 602 16753445  and 198, 599 16753445   //синий пиксель ready
        sort_array %a dec
set #x %a [#i 1]
set #y %a [#i 2]
set #x1 #x - #m
set #y1 #y - #m
set #x2 #x + #m
set #y2 #y + #m
set #zn findcolor (#x1, #y1   #x2, #y2   1 1 (#color) %arr 2)
if #zn >= #t
        move 77, 653
        wait 500
        kleft_down 77, 653
        wait 500
    wait 500
    move  #x #y
    wait 500
    kleft_up  #x #y
    wait 500
        wait 100
        end_if
        end_if
    end_for
end_if
end_if
gosub over
return

Суть этой части: находим координату с нужным цветом, (начиная с последней найденной) и вокруг неё в зоне +1 пиксель вверх и вниз ищем наличие 4 и более таких же, если есть делаем несколько кликов. Если с первым цветом таких зон не находится ищет со следующем и так около 20 раз.
Подскажите как это написать используя lua и возможно избавиться от такого кол-ва строчек с цветами.

Сообщение отредактировал Fors1k - 3.8.2020, 15:27
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
 
Ответить в эту темуОткрыть новую тему
Ответов
lnaqqa
сообщение 4.8.2020, 10:55
Сообщение #2


*

Registred
Сообщений: 7
Регистрация: 26.1.2016
Группа: Пользователи
Наличность: 0
Пользователь №: 17.818
Возраст: 30



Благодарю, проблема решилась
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения



Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия | Версия для КПК Сейчас: 29.4.2024, 17:18
Designed by Nickostyle