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

 
Ответить в эту темуОткрыть новую тему
> Скрипт Для Вк., findimage для автобафа
Арлекин
сообщение 20.11.2011, 17:09
Сообщение #1


*

Registred
Сообщений: 6
Регистрация: 17.11.2011
Группа: Пользователи
Наличность: 0
Пользователь №: 14.288
Возраст: 32



В общем так Скрипт для варка. кач в пати. Пользоваться просто.
картинки прикрепленные к 1 посту выкладываем в папку FindImage\L2 в корень папки с Плотом.
(возможно для корректной работы скрипта, нужно будет сделать свои и сохранить под теми же именами)
в клиенте Ладвы выставляем нужные бафы соответственно кнопкам.
полоску с бафами ставим в левый верхний уогол окна линейки. Само окно ладвы располагаем таким образом чтобы было видно на мониторе Линейку бафов, на пример из зиа окна с мейн перосом.
Код

///////////////////////////// кнопки с бафами
Set $btCov F12
set $Btvamp F11
set $btwchant F10
set $btbatl F9
set $btmov F8
set $btkrit F7
set $btacum F6
set $btfire F5
set $btshild F4
set $btsoul F3
Set $btelem 0
set $btbers 9
set $bteagl 8
set $btrev  7

///////////////////////////////// время каста бафа // настраиваем под своего перса
set #skiltime1 5000
set #skiltime2 2000


:one
send F1  // дополнительно например можно выставить мкарос следовать за мейном или асист по мейну
send F2  //если ставится асист по мейну то здесь юзать "раскалывание"
set $target findimage (0 0 444 444 (FindImage\L2\cov.bmp)%Target 2 80 1 //проверка наличия бафа
    if $target < 80            
           gosub cov // исполнение саб программы на каст бафа
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\vamp.bmp)%Target 2 80 1
    if $target < 80            
           gosub vamp
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\wchant.bmp)%Target 2 80 1
    if $target < 80          
           gosub wchant
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\batl.bmp)%Target 2 80 1
    if $target < 80          
           gosub batl
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\mov.bmp)%Target 2 80 1
    if $target < 80          
           gosub mov
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\krit.bmp)%Target 2 80 1
    if $target < 80          
           gosub krit
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\acum.bmp)%Target 2 80 1
    if $target < 80          
           gosub acum
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\fire.bmp)%Target 2 80 1
    if $target < 80          
           gosub fire
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\shild.bmp)%Target 2 80 1
    if $target < 80          
           gosub shild
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\soul.bmp)%Target 2 80 1
    if $target < 80          
           gosub soul
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\elem.bmp)%Target 2 80 1
    if $target < 80          
           gosub elem
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\bers.bmp)%Target 2 80 1
    if $target < 80          
           gosub bers
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\eagl.bmp)%Target 2 80 1
    if $target < 80          
           gosub eagl
    end_if
set $target findimage (0 0 444 444 (FindImage\L2\rev.bmp)%Target 2 80 1
    if $target < 80          
           gosub rev
    end_if
goto one
                               :COV // саб программа
                               send $btcov   #skiltime1
                               return
                               :VAMP
                               send $btvamp   #skiltime2
                               return
                               :WCHANT
                               send $btwchant   #skiltime2
                               return
                               :BATL
                               send $btbatl   #skiltime2
                               return
                               :MOV
                               send $btmov  #skiltime2
                               return
                               :KRIT
                               send $btkrit  #skiltime2
                               return
                               :ACUM
                               send $btacum  #skiltime2
                               return
                               :FIRE
                               send $btfire  #skiltime2
                               return
                               :SHILD
                               send $btshild  #skiltime2
                               return
                               :SOUL
                               send $btsoul  #skiltime2
                               return
                               :ELEM
                               send $btelem  #skiltime2
                               return
                               :BERS
                               send $btbers  #skiltime2
                               return
                               :EAGL
                               send $bteagl  #skiltime2
                               return
                               :REV
                               send $btrev  #skiltime2
                               return


Сообщение отредактировал DarkMaster - 20.11.2011, 17:13


Прикрепленные файлы
Прикрепленный файл  FindImage.rar ( 23,43 килобайт ) Кол-во скачиваний: 543
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
CEBKA
сообщение 17.9.2012, 3:10
Сообщение #2


*

Registred
Сообщений: 1
Регистрация: 17.9.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 15.295



Не работает и все тут, постоянно перекастовывает баффы, что самое интересное не все подряд а за один проход скрипта 1 баф, картинки другие пробовал вырезать не помогло, пространство для поиска картинки тоже увеличивал =/
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Artex
сообщение 7.10.2012, 17:52
Сообщение #3


**

Neophyte
Сообщений: 16
Регистрация: 5.10.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 15.354



Подскажите, как привязать файндимедж к окну? Прочитал http://uopilot.tati.pro/index.php?title=Findimage и так и не понял, что написать, чтоб скрипт работал с окном к которому вручную уже привязан скрипт?
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Artex
сообщение 7.10.2012, 22:55
Сообщение #4


**

Neophyte
Сообщений: 16
Регистрация: 5.10.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 15.354



Не понимаю в чем косяк.
вот так начинает бафать нон стоп даже если окно активно:
Код
set #window windowfromcursor
set workwindow #window
...
set $target findimage (180 0 715 60 (FindImage\battle.bmp)%Target #window 2 80 1


а так все правильно, но если активно, т.к. чекает не в окне а на экране
Код
set #window windowfromcursor
set workwindow #window
...
set $target findimage (180 0 715 60 (FindImage\battle.bmp)%Target 2 80 1

Что я делаю не так? Включаю в скрипт в окне на хоткей
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Artex
сообщение 7.10.2012, 23:09
Сообщение #5


**

Neophyte
Сообщений: 16
Регистрация: 5.10.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 15.354



обшибся в синтаксисе, вот так должно быть:
Код
set workwindow windowfromcursor
set #window workwindow
...
set $target findimage (180 0 715 60 (FindImage\battle.bmp)%Target #window 2 80 1  

А все равно 0 эффекта
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
DarkMaster
сообщение 7.10.2012, 23:39
Сообщение #6


***********

Модератор UOPilot
Сообщений: 9.467
Регистрация: 2.12.2008
Группа: Супермодераторы
Наличность: 27725
Пользователь №: 11.279



скобка вконце


--------------------
Скрипты UOPilot под заказ.
Консультации по UOpilot 15$/час.
Услуги Lua разработчика (не пилот, проекты, постоянка)
Disсоrd:
Kov____
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Artex
сообщение 8.10.2012, 10:57
Сообщение #7


**

Neophyte
Сообщений: 16
Регистрация: 5.10.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 15.354



Цитата(DarkMaster @ 7.10.2012, 23:39) *

скобка вконце

добавил, эффекта 0. Вот весь скрипт
Код

set workwindow windowfromcursor
set #window workwindow

///////////////////////////// кнопки с бафами
set $btbatl 1

///////////////////////////////// время каста бафа // настраиваем под своего перса
set #skiltime1 5000
set #skiltime2 2000

:one
set $target findimage (180 0 715 60 (FindImage\battle.bmp)%Target #window 2 80 1)
    if $target < 80          
           gosub batl
    end_if
goto one
:BATL
                               send $btbatl   #skiltime1

В даном случае, повторюсь, кастует нон стоп, если убрать в файндимедж #window, работает нормально но если окно наверху.
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
DarkMaster
сообщение 8.10.2012, 18:15
Сообщение #8


***********

Модератор UOPilot
Сообщений: 9.467
Регистрация: 2.12.2008
Группа: Супермодераторы
Наличность: 27725
Пользователь №: 11.279



Цитата
battle.bmp)%Target

Пробел забыл.

Цитата
#window 2 80 1

Искать в окне с хендлом #window, точность 2% (!!!), 80 изображений, допустимое отклонение цвета 1%.

Двойку уберите. У вас метод хендлом заданю


--------------------
Скрипты UOPilot под заказ.
Консультации по UOpilot 15$/час.
Услуги Lua разработчика (не пилот, проекты, постоянка)
Disсоrd:
Kov____
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Artex
сообщение 9.10.2012, 1:09
Сообщение #9


**

Neophyte
Сообщений: 16
Регистрация: 5.10.2012
Группа: Пользователи
Наличность: 0
Пользователь №: 15.354



Цитата(DarkMaster @ 8.10.2012, 18:15) *

Пробел забыл.
Искать в окне с хендлом #window, точность 2% (!!!), 80 изображений, допустимое отклонение цвета 1%.

Двойку уберите. У вас метод хендлом заданю

Точно, все работает. Тогда нунжно поправить пример в вики, который меня с толку сбил (findimage):

2.27
Научил 'findimage' искать картинки в перекрытых окнах. ищет не на всем экране, а в конкретном указанном окне. хэндл окна указывается в качестве типа поиска
set #w findwindow (test.bmp)
set $a FindImage ( 0 0 1300 1300 (2.bmp) %a workwindow 70 10 15)
set $a FindImage ( 0 0 1300 1300 (2.bmp) %a #w 70 10 15)
Или 15 в таком примере читается как [deviation]?
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
DarkMaster
сообщение 9.10.2012, 1:38
Сообщение #10


***********

Модератор UOPilot
Сообщений: 9.467
Регистрация: 2.12.2008
Группа: Супермодераторы
Наличность: 27725
Пользователь №: 11.279



ну по сути тут все корректно написано.
deviation позволяет избежать проблем с чуть прозрачными или переливающимися изображениями. Работает следующим образом:
Есть цвет (для удобства пишу в RGB) 234 157 18, значение deviation 5 процентов. Значит:
234*5/100=11.7=12 // округление вроде вверх идет
157*5/100=7.85=8
18*5/100=0.9=1
R
234-12=222
234+12=246
от 222 до 246
G
157-8=149
157+8=165
от 149 до 165
B
18-1=17
18+1=19
от 17 до 19

Итого получаем диапазон:
R 222-246
G 149-165
B 17-19

Весч очень удобная. В частности очень помогает при сглаживании шрифтов.


--------------------
Скрипты UOPilot под заказ.
Консультации по UOpilot 15$/час.
Услуги Lua разработчика (не пилот, проекты, постоянка)
Disсоrd:
Kov____
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
DarkMaster
сообщение 9.10.2012, 11:02
Сообщение #11


***********

Модератор UOPilot
Сообщений: 9.467
Регистрация: 2.12.2008
Группа: Супермодераторы
Наличность: 27725
Пользователь №: 11.279



Цитата
Или 15 в таком примере читается как [deviation]?

Чет неправильно первый раз прочитал и написал пост с вычислениями... Да, 15 именно [deviation].


--------------------
Скрипты UOPilot под заказ.
Консультации по UOpilot 15$/час.
Услуги Lua разработчика (не пилот, проекты, постоянка)
Disсоrd:
Kov____
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

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

 

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