16
Добавлена тема оформления "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.
что не так???
последовательность клавиш: "Ctrl+k", "Up", "Enter"
// Забавляемся с калькулятором
$hwnd = WNDFIND("Калькулятор")
// получаем информацию
WNDGETINFO($hwnd, $var1, $var2, $var3, $var4)
// смотрим в Логе на полученную информацию
LOGWRITE ("$x = ", $var1)
LOGWRITE ("$y = ", $var2)
LOGWRITE ("Ширина окна = ", $var3)
LOGWRITE ("Высота окна = ", $var4)
// перезаписываем размер окна
$var3 = 100
$var4 = 100
// обновляем информацию
WNDSETINFO($hwnd, $var1, $var2, $var3, $var4)
// перемещаем окно куда нам нужно
WNDPOS($hwnd, 10, 10)
HALT
TOCLIP(STRREPLACE(FROMCLIP(), "94.33.45.36", ""))
LOGCLEAR
TFREADARR("input.txt",$arr)
FOR($a = ARRSIZE($arr) - 1, $a > -1, -1)
$n = RND(0,$a)
LOGWRITE ($arr[$n]) // $arr[$n] - рандомная строка (без повторов) из файла "input.txt" (см. Лог)
$arr[$n] = $arr[$a]
$del = ARRPOP($arr)
END_CYC
HALT
LOGCLEAR
TFReadArr("colors.txt",$colors_arr)
$count = RND(1,137) // Количество цветов
LOGWRITE ("Количество выбранных цветов - ", $count)
LOGWRITE ("------------------")
FOR($a = ARRSIZE($colors_arr) - 1, $a > -1, -1)
$n = RND(0,$a)
LOGWRITE ($colors_arr[$n])
$colors_arr[$n] = $colors_arr[$a]
$del = ARRPOP($colors_arr)
INC($count,-1)
IF($count = 0)
$a = 0
END_IF
END_CYC
HALT