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.


Topics - Aleksandr123

Pages: [1]
1
Общие вопросы / Масштабирование картинки
« on: September 15, 2018, 01:03:08 PM »
Нужно решение, размеры снимка 2560х 1600 рх, через стороннюю программу записываю в файл нужные координаты ху для копирования на другом рисунке с уменьшенным масштабом на 30%. Делаю снимок экрана GETSCREEN 1920х 1080 рх, через функцию PXLREPLACE копирую  рисунок с новым масштабом см. скриншот. Линии небольшого размера соединяются в одну линию, после подсчета линий на новом рисунке их меньше. Как перенести все линии ?

2
Нужна помощь правильного деления отрезка на равные части, мой вариант $i_4=INT($var2/($i_3+$i_1))  при увеличении длины принимает не правильную форму, [/img]
Code: (clickermann) [Select]
$x1 = 10
$y1 = 10
$x2 = 20
$y2 = 30

if($x1<$x2 & $y1<$y2 & $y2>=$x2)     // направление с верху в низ   $y2>$x2
   $x2=$x2+$x1
   $y2=$y2+$y1

   $var1=$x2-$x1                    // количество рх длина
   $var2=$y2-$y1                    // колличество рх высота
   
   $i_1=INT($var2/$var1) 
   $i_3=$var2-($i_1*$var1) 
   $i_4=INT($var2/($i_3+$i_1))   
   $i_5=INT($var1/$i_3)


   for($i=0, $i<$var1)
      $i_2=0
      while($i_2<$i_1)
          PXLREPLACE ($x1,$y1, $x1,$y1, -1, 0)
          $y1=$y1+1
          $i_2=$i_2+1
      end_cyc
     
      if(($i==$i_4-1 & $i_4!=0))   
  if($i_3>0)
             PXLREPLACE ($x1,$y1, $x1,$y1, -1, 0)
             $y1=$y1+1
             $i_3=$i_3-1
         end_if
         $i_4=$i_4+$i_5
      end_if
         
      $i++
      x1=$x1+1
   end_cyc   
   SCREENSHOT 
end_if
 
WNDBUMP (WNDFIND ("Clickermann - New Script"))
WAIT (600)

3
В какой папке хранится скриншот с экрана, папку Skreens с для хранения скриншота не нашел!
При запуске Большой тест v1.0 в лог выводится текст IF_PIXEL_IN: Пиксел не найден! Тест IF_PICTURE_IN: Картинка не найдена!

Pages: [1]