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

 
Ответить в эту темуОткрыть новую тему
> Скрипт на Денс после Сонга, определение по картинке
ScriptsForBD
сообщение 24.11.2012, 20:52
Сообщение #1


*

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



Cкрипт для Bladedancer в пачке с свс 77+.
Дает денс после того как свс сделает медитацию(для данного скрипта).
Во время денса делает проверку и в случае если нету одного из денса его повторяет.


Код

set #X1 711  // X 1ой координаты
set #Y1 52   // Y 1ой координаты
set #X2 1025  // X 2ой координаты
set #Y2 83   // Y 2ой коориднаты
set $path C:\Games\UoPilot\Image\  // папка где картинки
set %picMed[1] sMeditation  // Song of Meditation
set %picFury[1] bFury       // Dance of Fury
set %picFire[1] bFire       // Dance of Fire
set %picWar[1] bWarrior     // Dance of Warrior

:start
  set #a 0
  set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picMed[1].bmp) %crds 2)
  wait 100
  set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picMed[1].bmp) %crds 2)

while #a > 0  // если картинка найдена, дать денс

  set linedelay 1
  while 1 = 1
     set #timeoff  timer + 4000
     send {num_6}
     set #a 0
     while ( #a <= 0 ) and ( timer < #timeoff )
        wait 100
        set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)
     end_while
     if #a > 0
        break
     end_if
  end_while
  
  while 1 = 1
     set #timeoff  timer + 4000
     send {num_7}
     set #a 0
     while ( #a <= 0 ) and ( timer < #timeoff )
        wait 100
        set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFire[1].bmp) %crds 2)
     end_while
     if #a > 0
        break
     end_if
  end_while
  
  while 1 = 1
     set #timeoff  timer + 4000
     send {num_8}
     set #a 0
     while ( #a <= 0 ) and ( timer < #timeoff )
        wait 100
        set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picWar[1].bmp) %crds 2)
     end_while
     if #a > 0
        break
     end_if
  end_while
  wait 100s
  set #a 0
  wait 5s
end_while

while_not #a > 0   // если картинка не найдена, искать её
   wait 100
   set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picMed[1].bmp) %crds 2)
end_while

goto start


Прикрепленные файлы
Прикрепленный файл  Image.rar ( 20,65 килобайт ) Кол-во скачиваний: 394
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
ScriptsForBD
сообщение 25.11.2012, 2:49
Сообщение #2


*

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



Добавлено: Проверка на денс.
Исправлено: Денс давался неправильно при некоторых обстоятельствах.
Исправлено: Время проверки для денса.
Добавлено: Более удобная и быстрая проверка на денс.
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
Vimko
сообщение 12.11.2013, 12:31
Сообщение #3


*

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



Цитата(ScriptsForBD @ 25.11.2012, 3:49) *

Добавлено: Проверка на денс.
Исправлено: Денс давался неправильно при некоторых обстоятельствах.
Исправлено: Время проверки для денса.
Добавлено: Более удобная и быстрая проверка на денс.

Можно поподробнее о скрипте? какие параметры, что указывать (IMG:style_emoticons/default/rolleyes.gif)
А то юзать приходится простенький))
send f5
wait 1s
send f6
wait 1s
send f7
wait 1s
send f8
wait 1s
send f9
wait 1s
send f9
wait 500
send f9
wait 113s
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
DarkMaster
сообщение 12.11.2013, 18:59
Сообщение #4


***********

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



вместо сендов видимо подставить свои бинды.


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


*

Registred
Сообщений: 2
Регистрация: 24.1.2015
Группа: Пользователи
Наличность: 0
Пользователь №: 17.258
Возраст: 28



set #X1 474 // X 1ой координаты на 3 панели-каки нужны координаты писать точней плиз
set #Y1 899 // Y 1ой координаты на 3 панели
set #X2 546 // X 2ой координаты на 3 панели
set #Y2 906 // Y 2ой коориднаты на 3 панели
set $path D:\игры\La2\dens // папка где картинки
set %picFury[1] bFury
set %picConcentration[1] dConcentration
set %picMystic[1] dMystic
set %picSiren[1] dSiren

:start
set #a 0
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)

while #a > 0 // если картинка найдена, дать денс

set linedelay 1
while 1 = 1
set #timeoff timer + 4000
send {num_6}
set #a 0
while ( #a <= 0 ) and ( timer < #timeoff )
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picConcentration[1].bmp) %crds 2)
end_while
if #a > 0
break
end_if
end_while

while 1 = 1
set #timeoff timer + 4000
send {num_7}
set #a 0
while ( #a <= 0 ) and ( timer < #timeoff )
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picMystic[1].bmp) %crds 2)
end_while
if #a > 0
break
end_if
end_while

while 1 = 1
set #timeoff timer + 4000
send {num_8}
set #a 0
while ( #a <= 0 ) and ( timer < #timeoff )
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picSiren[1].bmp) %crds 2)
end_while
if #a > 0
break
end_if
end_while
wait 100s
set #a 0
wait 5s
end_while

while_not #a > 0 // если картинка не найдена, искать её
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)
end_while
goto start

Сделал так но всё равно не работает помогите
Я играю за БД в Маг пати и мне надаа давать дес именно ток как я прописал
такое возможно чтоб проверял тенсы у всех 9 человек и если нету чтоб денсил
зарание сиб
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
DarkMaster
сообщение 25.1.2015, 11:25
Сообщение #6


***********

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



Цитата
Что именно не так со скриптом?
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)
зачем 2 раза один и тот же поиск?

Дальше читать не стал - используйте тег code - ломать глаза не хочу.


Цитата
Цитата
while_not #a > 0 // если картинка не найдена, искать её
wait 100
set #a findimage (#X1 #Y1 #X2 #Y2 ($path%picFury[1].bmp) %crds 2)
end_while

не работает эта часть скрипта она просто клацает
И я не понимаю какие кординаты куда ставить пробывал всё

Что есть "клацает"?
Крутит постоянно? Не находит изображение в таком случае.

Сообщение отредактировал DarkMaster - 25.1.2015, 11:25


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


*

Registred
Сообщений: 2
Регистрация: 24.1.2015
Группа: Пользователи
Наличность: 0
Пользователь №: 17.258
Возраст: 28



Цитата(DarkMaster @ 25.1.2015, 12:25) *

не работает эта часть скрипта она просто клацает
И я не понимаю какие кординаты куда ставить пробывал всё
Что есть "клацает"?
Крутит постоянно? Не находит изображение в таком случае.

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


***********

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



Руофф?

Вообще либо координаты изображения ошибочны либо изображение не соответствует.


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

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

 

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