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

> Скрипт на Денс после Сонга, определение по картинке
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 килобайт ) Кол-во скачиваний: 423
Пользователь в офлайнеDelete PostОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения



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

 

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