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 - Viktor77

Pages: [1]
1
Общие вопросы / цикл
« on: April 27, 2021, 04:46:03 PM »
подскажите как можно в таком цикле добавить еще условие, если условие не выполняется в течении 10 минут, выйти и выполнять дальше скрипт.
Code: (clickermann) [Select]
$check = 0
WHILE($check = 0)
   GETSCREEN
   COLORMODE(8)
   IF_PICTURE_IN (0,0,$_xmax,$_ymax, "1.bmp", -1, 100)
      LCLICK($_return1, $_return2)
      wait(1000)
      GETSCREEN
      COLORMODE(8)
      IF_PICTURE_IN (0,0,$_xmax,$_ymax, "2.bmp", -1, 100)
         $check=1
         MOVE($_return1, $_return2)
         WAITMS(3000)
         GETSCREEN
         COLORMODE(8)
         IF_PICTURE_IN (0,0,$_xmax,$_ymax, "3.bmp", -1, 100)
            LCLICK($_return1, $_return2)
            wait(1000)
         END_IF
      else
         GETSCREEN
         COLORMODE(8)
         IF_PICTURE_IN (0,0,$_xmax,$_ymax, "4.bmp", -1, 100)
            LCLICK($_return1, $_return2)
            wait(1000)
         END_IF
      END_IF
   END_IF
END_CYC
HALT

2
Общие вопросы / Работа с ссылками
« on: October 16, 2020, 04:25:56 PM »
так все работает, но стоит добавить в верху пару команд на свернуть все окна и запуск браузера с рабочего стола то получается совсем другой результат, верхние команды так же запускаются повторно. что приводит к некорректной работе.
Code: (clickermann) [Select]
SUB(клик,$par1,$par2,$par3) // подпрограмма с параметрами
   LCLICK($par1,$par2)
   WAITMS($par3)
END_SUB
SUB(картинка,$par4,$par5,$par6,$par7,$par8,$par9,$par10,$par11)
   GETSCREEN($par4,$par5,$par6,$par7)
   IF_PICTURE_IN ($par4,$par5,$par6,$par7,$par8, -1, 100)
      $check = 1
      клик($_return1+$par9,$_return2+$par10,$par11)
   END_IF
END_SUB
SUB(ожидание_картинки,$par21,$par22,$par23,$par24,$par25,$par26,$par27,$par28,$par29)
   $check = 0
   WHILE($check = 0)
      GETSCREEN($par21,$par22,$par23,$par24)
      IF_PICTURE_IN ($par21,$par22,$par23,$par24,$par25, -1,$par26)
         $check = 1
         клик($_return1+$par27,$_return2+$par28,$par29)
      ELSE    // если не найдена  11.bmp
         клик(309,610,2000) // сменить главу
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
LCLICK(370,55) //клик по панель поиска
WAIT(2)
INC($num,1) // накручиваем номер строки каждый проход
IF($num > TFCOUNT ("servera_1.txt"))
   HALT // стоп
END_IF
TOCLIP (TFREAD ("servera_1.txt", $num)) // копируем строку в буфер
WAITMS(50)
KEYDOWN (#CTRL) // Ctrl+V
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (100)
KEYPRESS(#ENTER) // Enter
WAIT (15)
картинка(0,0,$_xmax,$_ymax,"1.bmp",2,2,2000)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PIXEL_IN(0,0,$_xmax,$_ymax, 16777215)
   клик($_return1, $_return2,2000)
END_IF
WAIT(30)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "2.bmp", - 1, 100)
   клик($_return1+15,$_return2+15,2000)
ELSE
   $check = 0
   WHILE($check = 0)
      KEYPRESS(#F5)  // обновить страницу
      WAIT(30)
      картинка(0,0,$_xmax,$_ymax,"2.bmp",15,15,2000)
   END_CYC
END_IF
WAIT(3)
картинка(0,0,$_xmax,$_ymax,"3.bmp",2,2,2000)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PIXEL_IN(0,0,$_xmax,$_ymax, 16777215)
   клик($_return1, $_return2,2000)
END_IF
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"7.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"8.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"4.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"32.bmp",10,8,2000)
картинка(0,0,$_xmax,$_ymax,"5.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"33.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"15.bmp",2,2,5000)//
картинка(0,0,$_xmax,$_ymax,"16.bmp",2,2,3000)//
картинка(0,0,$_xmax,$_ymax,"17.bmp",2,2,2000)//
клик(527,190,2000) //
клик(518,370,2000)//
клик(564,585,2000)//
клик(654,188,2000) //
клик(571,310,2000) //
картинка(0,0,$_xmax,$_ymax,"20.bmp",2,2,2000) //
картинка(0,0,$_xmax,$_ymax,"21.bmp",2,2,2000) //
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax, "22.bmp",15,15,2000)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "23.bmp", - 1, 100)//
   клик($_return1+2, $_return2+2,2000)
   клик(567,493,2000)  //
END_IF
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "24.bmp", - 1, 100)//
   клик($_return1+5, $_return2+5,2000)
   GETSCREEN(0,0,$_xmax,$_ymax)
   IF_PICTURE_IN (0,0,$_xmax,$_ymax, "25.bmp", - 1, 100)//
      клик($_return1+5, $_return2+5,2000)
      картинка(0,0,$_xmax,$_ymax, "26.bmp",5,5,2000)//
   END_IF
END_IF
WAIT(1)
KEYPRESS(#B)
WAIT(3)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "27.bmp", - 1, 100)
   DBLCLICK($_return1+15, $_return2+15)
   WAIT(1)
   картинка(0,0,$_xmax,$_ymax, "34.bmp",5,5,2000)
END_IF
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "28.bmp", - 1, 100)
   MOVE($_return1+15, $_return2+15)
   WAIT(1)
   IF(FExists(STRCONCAT("C:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
      FCreate(STRCONCAT("C:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin1\6-11-2019  на сегодняшний день
   END_IF
   SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT ("C:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
   inc($n)
END_IF
WAIT(1)
KEYPRESS(#B)
WAIT(1)
картинка(0,0,$_xmax,$_ymax,"29.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"30.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"31.bmp",2,2,3000)//
картинка(0,0,$_xmax,$_ymax,"31.bmp",2,2,3000)//
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
Code: (clickermann) [Select]
SUB(клик,$par1,$par2,$par3) // подпрограмма с параметрами
   LCLICK($par1,$par2)
   WAITMS($par3)
END_SUB
SUB(картинка,$par4,$par5,$par6,$par7,$par8,$par9,$par10,$par11)
   GETSCREEN($par4,$par5,$par6,$par7)
   IF_PICTURE_IN ($par4,$par5,$par6,$par7,$par8, -1, 100)
      $check = 1
      клик($_return1+$par9,$_return2+$par10,$par11)
   END_IF
END_SUB
SUB(ожидание_картинки,$par21,$par22,$par23,$par24,$par25,$par26,$par27,$par28,$par29)
   $check = 0
   WHILE($check = 0)
      GETSCREEN($par21,$par22,$par23,$par24)
      IF_PICTURE_IN ($par21,$par22,$par23,$par24,$par25, -1,$par26)
         $check = 1
         клик($_return1+$par27,$_return2+$par28,$par29)
      ELSE         // если не найдена  11.bmp
         клик(309,610,2000) // сменить главу
      END_IF
   END_CYC
END_SUB
LOGCLEAR
WAITMS(50)
LOGWRITE ("Старт")
WAITMS(50)
клик(1271,1002,2000)
DBLCLICK(635,30) //запуск браузера
WAIT(15)
LCLICK(370,55) //клик по панель поиска
WAIT(2)
INC($num,1) // накручиваем номер строки каждый проход
IF($num > TFCOUNT ("servera_1.txt"))
   HALT // стоп
END_IF
TOCLIP (TFREAD ("servera_1.txt", $num)) // копируем строку в буфер
WAITMS(50)
KEYDOWN (#CTRL) // Ctrl+V
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS (100)
KEYPRESS(#ENTER) // Enter
WAIT (15)
картинка(0,0,$_xmax,$_ymax,"1.bmp",2,2,2000)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PIXEL_IN(0,0,$_xmax,$_ymax, 16777215)
   клик($_return1, $_return2,2000)
END_IF
WAIT(30)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "2.bmp", - 1, 100)
   клик($_return1+15,$_return2+15,2000)
ELSE
   $check = 0
   WHILE($check = 0)
      KEYPRESS(#F5)  // обновить страницу
      WAIT(30)
      картинка(0,0,$_xmax,$_ymax,"2.bmp",15,15,2000)
   END_CYC
END_IF
WAIT(3)
картинка(0,0,$_xmax,$_ymax,"3.bmp",2,2,2000)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PIXEL_IN(0,0,$_xmax,$_ymax, 16777215)
   клик($_return1, $_return2,2000)
END_IF
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"7.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"8.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"4.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"32.bmp",10,8,2000)
картинка(0,0,$_xmax,$_ymax,"5.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"33.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)
картинка(0,0,$_xmax,$_ymax,"15.bmp",2,2,5000)//
картинка(0,0,$_xmax,$_ymax,"16.bmp",2,2,3000)//
картинка(0,0,$_xmax,$_ymax,"17.bmp",2,2,2000)//
клик(527,190,2000) //
клик(518,370,2000)//
клик(564,585,2000)//
клик(654,188,2000) //
клик(571,310,2000) //
картинка(0,0,$_xmax,$_ymax,"20.bmp",2,2,2000) //
картинка(0,0,$_xmax,$_ymax,"21.bmp",2,2,2000) //
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax, "22.bmp",15,15,2000)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "23.bmp", - 1, 100)//
   клик($_return1+2, $_return2+2,2000)
   клик(567,493,2000)  //
END_IF
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "24.bmp", - 1, 100)//
   клик($_return1+5, $_return2+5,2000)
   GETSCREEN(0,0,$_xmax,$_ymax)
   IF_PICTURE_IN (0,0,$_xmax,$_ymax, "25.bmp", - 1, 100)//
      клик($_return1+5, $_return2+5,2000)
      картинка(0,0,$_xmax,$_ymax, "26.bmp",5,5,2000)//
   END_IF
END_IF
WAIT(1)
KEYPRESS(#B)
WAIT(3)
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "27.bmp", - 1, 100)
   DBLCLICK($_return1+15, $_return2+15)
   WAIT(1)
   картинка(0,0,$_xmax,$_ymax, "34.bmp",5,5,2000)
END_IF
GETSCREEN(0,0,$_xmax,$_ymax)
IF_PICTURE_IN (0,0,$_xmax,$_ymax, "28.bmp", - 1, 100)
   MOVE($_return1+15, $_return2+15)
   WAIT(1)
   IF(FExists(STRCONCAT("C:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y)) = 0)//если папки с датой нету
      FCreate(STRCONCAT("C:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y))//то создаем ее  - E:\files\twin1\6-11-2019  на сегодняшний день
   END_IF
   SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT ("C:\files\twin1\",$_date_d,"-",$_date_m,"-",$_date_y,"\file", $n,".bmp"))
   inc($n)
END_IF
WAIT(1)
KEYPRESS(#B)
WAIT(1)
картинка(0,0,$_xmax,$_ymax,"29.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"30.bmp",2,2,2000)//
картинка(0,0,$_xmax,$_ymax,"31.bmp",2,2,3000)//
картинка(0,0,$_xmax,$_ymax,"31.bmp",2,2,3000)//
картинка(0,0,$_xmax,$_ymax,"6.bmp",2,2,2000)//

3
Общие вопросы / Игра
« on: October 15, 2019, 09:51:41 PM »
Доброго вечера. помогите написать скрипт для игры. нужно найти ники и кликнуть по ним определенное количество времени. а также добавить исключения ников, которые пропускать. после появлении определенного текста кликать немного правее, затем при появлении картинки кликать по координатам. не нашел ничего на форуме по поиску текста.

Pages: [1]