"родительский и все дочерние потоки имеют общий доступ к графическому буферу и переменным"
Ищем картинки в потоках, в результате получаем ошибки интерпритации win 10 x64 или vm xp sp3 находит одну и туже либо что-то среднее,
версия
CM4.12.001
[spoiler]
GETSCREEN
THREAD(thr_name1)
// тело потока
LOGWRITE ("Сообщение1")
SCANPICTURE($ARR_SCAN, 0,0, $_xmax,$_ymax, "PIC1.bmp", -1, 100)
$ARR_NUM = 0
WHILE ($ARR_NUM < ARRSIZE($ARR_SCAN))
$X = $ARR_SCAN [$ARR_NUM]
INC($ARR_NUM,1)
$Y = $ARR_SCAN [$ARR_NUM]
INC($ARR_NUM,1)
MOVE($X, $Y) // перемещаем курсор
LOGWRITE ("P1X: ", $X, " Y: ", $Y)
WAITMS(100)
END_CYC
UNDEFINE($ARR_SCAN)
HALT
waitms(10) // задержка для разгрузки CPU
END_THREAD
// поток
THREAD(thr_name)
// тело потока
LOGWRITE ("Сообщение2")
SCANPICTURE($ARR_SCAN1, 0,0, $_xmax,$_ymax, "PIC2.bmp", -1, 100)
$ARR_NUM1 = 0
WHILE ($ARR_NUM1 < ARRSIZE($ARR_SCAN1))
$X = $ARR_SCAN1 [$ARR_NUM1]
INC($ARR_NUM1,1)
$Y = $ARR_SCAN1 [$ARR_NUM1]
INC($ARR_NUM1,1)
MOVE($X1, $Y1) // перемещаем курсор
LOGWRITE ("P2 X1: ", $X1, " Y1: ", $Y1)
WAITMS(100)
END_CYC
UNDEFINE($ARR_SCAN1)
HALT
waitms(10) // задержка для разгрузки CPU
END_THREAD
[/spoiler]