Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Космич

Pages: 1 ... 14 15 [16] 17 18
227
Общие вопросы / Re: Помогите реализовать
« on: January 30, 2019, 04:56:34 PM »
Code: (clickermann) [Select]
IF(FROMCLIP() ! TFREAD("text.txt", 1))
   EXECUTE("программа.ехе")
END_IF

IF(HTTPGET("http://crapware.aidf.org/") ! "")
   // Тут действия если интернет есть
END_IF

228
Общие вопросы / Re: Помогите реализовать
« on: January 30, 2019, 02:22:42 PM »
Code: (clickermann) [Select]
EXECUTE("программа.ехе")

229
Общие вопросы / Re: Вопрос про потоки
« on: January 27, 2019, 05:44:53 AM »
Выложи весь код какой он есть на самом деле

230
Я уже изменил, там дистанция между пикселями излишне

231
а я и имел ввиду цвет, хотя мона еще попробовать с разложением на RGB цвета, но это будет еще дольше)

232
Скорее всего через раз будет находить и не факт что бота  ;D

Code: (clickermann) [Select]
GETSCREEN
COLORMODE(5)
SCANPXL($array_scan, 0,0, $_xmax,$_ymax, 8339295)
$size = ARRSIZE($array_scan)
FOR($i = 0, $i < $size, 2)
   FOR($k = $i + 2, $k < $size, 2)
      $y =     $array_scan[$k+1] - $array_scan[$i+1]
      $x = ABS($array_scan[$k]   - $array_scan[$i])
      IF( ($y > - 1 & $y < 5) & ($x > 10 & $x < 50) )
         MOVE(ROUND( ($array_scan[$i] + $array_scan[$k]) / 2, 0), ROUND( ($array_scan[$i+1] + $array_scan[$k+1]) / 2, 0))
         $size = 0
      END_IF
   END_CYC
END_CYC

UNDEFINE($array_scan)

HALT

233
Выложи полную картинку игрового окна с этим ботом

234
Общие вопросы / Re: Помогите!!!
« on: January 22, 2019, 01:51:23 PM »
Code: (clickermann) [Select]
$delay_time = 150 // Значение в миллисекундах
 
FOR($i = 35, $i > - 1, - 1) // Цикл от 35 до -1
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYPRESS (#K)
   KEYUP (#CTRL)
   WAITMS($delay_time)
   KEYPRESS(#UP)
   WAITMS($delay_time)
   KEYPRESS(#ENTER)
   WAITMS($delay_time)
END_CYC
 
HALT

236
Можно что то вроде таймера сделать

Code: (clickermann) [Select]
$time = 3

INIWRITE("accounts.ini", "1", $_time_t, "accounts")

$account = INIREAD("accounts.ini", "1", "accounts")

WHILE(1)
   IF($_time_t - $account >= $time)
      PRINT("Прошло ", $_time_t - $account, " секунд'ы")
      HALT
   END_IF
END_CYC

Можешь создать рядом со скриптом папку и там всё хранить

Code: (clickermann) [Select]

$path = "data\pictures\file.bmp" // Относительный путь к картинке

GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, $path, -1, 100)
   LCLICK($_return1, $_return2)
   WAITMS(100)
END_IF

237
Общие вопросы / Re: Кликер
« on: January 16, 2019, 03:05:47 AM »
Code: (clickermann) [Select]
SUB(_CLICKS, $list)
   STRSEPARATE($list, ",", $arraylist_clicks)
   FOR($count = 0, $count < ARRSIZE($arraylist_clicks), 2)
      LCLICK($arraylist_clicks[$count], $arraylist_clicks[$count+1])
      WAITMS(500)
   END_CYC
   UNDEFINE($arraylist_clicks)
END_SUB

WHILE(1)
   
   _CLICKS("100,100,110,100,120,100")
   
   GETSCREEN
   IF(PXLCOUNT(0,0, $_xmax,$_ymax, 255) == 0)
      _CLICKS("100,100,110,100,120,100")
   END_IF
   
   IF(PXLCOUNT(0,0, $_xmax,$_ymax, 255) != 0)
      _CLICKS("100,100,110,100,120,100")
   END_IF   
     
END_CYC

238
Общие вопросы / Re: Re: Помогите новичку
« on: December 14, 2018, 10:54:48 AM »
нужно инициализировать переменную перед самим циклом или в самом цикле и убрать HALT

Code: (clickermann) [Select]

LCLICK(1050,90)
WAIT(6)
LCLICK(849,196)
WAIT(1)
KEYPRESS(#HOME)
WAIT(2)
DBLCLICK(1350,500)
WAIT(3)

FOR($i = 0 , $i < 2) // инициализация переменной внутри цикла FOR
   WHEELDOWN(9)
   WAIT(2)
   GETSCREEN
   IF_PICTURE_IN(891, 114, 937, 851, "file.bmp")
      WAIT(1)
      LCLICK($_return1, $_return2)
   ELSE
      WAIT(1)
      WHEELUP(6)
   END_IF
   WAIT(2)
END_CYC

// WAIT(1)
// HALT // Прекращает выполнение скрипта



239
Прочее / Re: Черный список для SM форума
« on: November 18, 2018, 01:10:59 AM »
Спасибо автору темы и тому кто апнул)

240
Скинь скайп в лс, я тебе за так подскажу

Pages: 1 ... 14 15 [16] 17 18