226
Добавлена тема оформления "Clickermann" для кода с подсветкой синтаксиса. Выбирается из выпадающего списка "Код" (рядом с "цвет", "размер" и "шрифт") в режиме редактирования поста. Либо просто BB-тегом "code=clickermann"
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.
IF(FROMCLIP() ! TFREAD("text.txt", 1))
EXECUTE("программа.ехе")
END_IF
IF(HTTPGET("http://crapware.aidf.org/") ! "")
// Тут действия если интернет есть
END_IF
EXECUTE("программа.ехе")
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
$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
$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
$path = "data\pictures\file.bmp" // Относительный путь к картинке
GETSCREEN
IF_PICTURE_IN (0,0, $_xmax,$_ymax, $path, -1, 100)
LCLICK($_return1, $_return2)
WAITMS(100)
END_IF
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
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 // Прекращает выполнение скрипта