Messages

1

Использование / Re: Открывалка Зомбилетто

« on: February 17, 2014, 12:50:08 AM »

Товарищи. Поиск сломался?
Всё написано ещё год назад. http://crapware.aidf.org/forum/index.php?topic=69.msg1679#msg1679
Написано ещё для 4.7-4.8.
Чем соседский подарок отличается от зомбилетто?
Картинку сделать 1 минута. Ещё одна переделать под 4.9 если нужно.

Если бы я что-то в этом понимал) я рядовой пользователь) Спасибо Вам за полезные скрипты!

2

Использование / Re: Открывалка Зомбилетто

« on: February 16, 2014, 11:39:24 PM »

Для Clikermann 4.9
Необходим участок 10 х 10 зомбилетто. Весь участок должен помещаться на экране. Первый подарок ставить в верхний угол.

Code: (clickermann) [Select]

#name "Зомбилетто"
$time_1 = 1500 // Время открытия окна с подарками (мс)
$time_2 = 500 // Время закрытия окна с подарками  (мс)
$time_3 = 10  // Время между сбором и расстановкой (сек)
//--------------------------------
//--------------------------------
//--------------------------------
HINTPOPUP ("Откройте окно с подарками.", "Clickermann")
$check = 0
WHILE($check = 0) // Ждем зажатия ЛКМ
   IF(ISKEYDOWN (1) = 1)
      $x_sklad = $_xmouse
      $y_sklad = $_ymouse
      $check = 1
   END_IF
   WAITMS(30)
END_CYC
WHILE(ISKEYDOWN (1) = 1)// Ждем отпускания ЛКМ
   WAITMS(30)
END_CYC
HINTPOPUP ("Примите 1 подарок.", "Clickermann")
$check = 0
WHILE($check = 0) // Ждем зажатия ЛКМ
   IF(ISKEYDOWN (1) = 1)
      $x_podarok = $_xmouse
      $y_podarok = $_ymouse
      $check = 1
   END_IF
   WAITMS(30)
END_CYC
WHILE(ISKEYDOWN (1) = 1)// Ждем отпускания ЛКМ
   WAITMS(30)
END_CYC
HINTPOPUP ("Поставьте подарок.", "Clickermann")
$check = 0
WHILE($check = 0) // Ждем зажатия ЛКМ
   IF(ISKEYDOWN (1) = 1)
      $x = $_xmouse
      $y = $_ymouse
      $check = 1
   END_IF
   WAITMS(30)
END_CYC
WHILE(ISKEYDOWN (1) = 1)// Ждем отпускания ЛКМ
   WAITMS(30)
END_CYC
$c = 0
$d = 0
WHILE($x > 0)
   FOR($a, $a < 10)
      $kx = -48*$a
      $ky = 24*$a
      FOR($b, $b < $a + 1)
         IF($c = 0)
            MOVE($x_sklad, $y_sklad)
            WAITMS(100)
            LCLICK($x_sklad, $y_sklad)
            WAITMS($time_1)
            MOVE($x_podarok, $y_podarok)
            WAITMS(100)
            LCLICK($x_podarok, $y_podarok)
            WAITMS($time_2)
         END_IF         
         MOVE($x + $kx, $y + $ky - $d)
         WAITMS(100)
         LCLICK($x + $kx, $y + $ky - $d)
         INC($kx,96)
      END_CYC
   END_CYC
   IF($c = 0)
      $c = 1
      $d = 30
   ELSE
      $c = 0
      $d = 0
      WAIT($time_3)
   END_IF
END_CYC
HALT

А как сделать, что-бы в фоне работало?

3

Использование / Открывалка Зомбилетто

« on: February 14, 2014, 12:30:02 PM »

Привет скриптоделам! Хотелось бы узнать, можно ли написать скрипт для открытия зомбилетто?

4

Использование / Re: Зомби ферма. Пиратский скрипт.

« on: February 13, 2014, 01:59:02 AM »

А на жутком острове работает?