Ошибка при вызове функции: POP()

[kirihor]

$HWnd = 0

while($HWnd = 0)
   $HWnd = WNDFIND("Everve | Социальное продвижение 80-го уровня - Mozilla Firefox")
   waitms(500)
end_cyc


WNDSIZE ($HWnd, 1150, 800)
waitms(250)
WndPos ($HWnd, 0, 0)
waitms(250)

WNDGETINFO ($HWnd, $var1, $var2, $var3, $var4)
print($var3)
print($var4)

print("Номер вікна - ", $HWnd)
$HSET ($HWnd,1)

Sait:
wait(10)
GETSCREEN ($HWnd)
print("Сторінка перегляду сайтів ")
IF_PICTURE_IN (700, 450, 1100,800, "sait.bmp")
   move ($_return1, $_return2)
   wait(5)
   lclick($_return1, $_return2)
   print("Перегдял сайту")
   Wait(3)
   
   $check = 0
   WHILE($check = 0)
      GETSCREEN  ($HWnd)
      IF_PICTURE_IN (400, 450, 750, 610, "goo.bmp")
         $check = 1
         move ($_return1, $_return2)
         print ("Вихід")
         LCLICK($_return1, $_return2)
         GOTO(Sait)
         WAITMS(100)
         
      ELSE
         WAITMS(50)
      END_IF
      END_IF
   END_CYC

Выскакивает такая ошибка при вмполнении сценария:
"Ошибка при вызове функции: POP()"
Подскажите в чем я напортачил.

[dramster]

Потому что ошибки. Если это весь скрипт, то так скорее всего правильно. Если нет, то прокомментируй свой задуманный алгоритм, поправлю.

Code: (clickermann) [Select]

while($HWnd = 0)
   $HWnd = WNDFIND("Everve | Социальное продвижение 80-го уровня - Mozilla Firefox")
   waitms(500)
end_cyc


WNDSIZE ($HWnd, 1150, 800)
waitms(250)
WndPos ($HWnd, 0, 0)
waitms(250)

WNDGETINFO ($HWnd, $var1, $var2, $var3, $var4)
print($var3)
print($var4)

print("Номер вікна - ", $HWnd)
$HSET ($HWnd,1)


wait(10)

WHILE(1)

   print("Сторінка перегляду сайтів ")
   GETSCREEN   
   IF_PICTURE_IN (700, 450, 1100,800, "sait.bmp")
      move ($_return1, $_return2)
      wait(5)
      lclick($_return1, $_return2)
      print("Перегдял сайту")
      Wait(3)
     
      $check = 0
      WHILE($check = 0)
     
         GETSCREEN
         IF_PICTURE_IN (400, 450, 750, 610, "goo.bmp")
            $check = 1
            move ($_return1, $_return2)
            print ("Вихід")
            LCLICK($_return1, $_return2)
            WAITMS(100)         
         ELSE
            WAITMS(50)
         END_IF
         
      END_CYC
     
   END_IF
   
END_CYC

[Hito]

Это что такое...?

GETSCREEN  ($HWnd)

А это что...?

$HSET ($HWnd,1)

IF_PICTURE_IN (который ищет goo.bmp) почему-то закрывает END_CYC, а цикл WHILE($check = 0) закрывает END_IF...

Code: (clickermann) [Select]

$HWnd = WNDFIND("Everve | Социальное продвижение 80-го уровня - Mozilla Firefox") // Ищем окно с заданным заголовком
IF($HWnd) // Если такое окно найдено
   WNDGETINFO ($HWnd, $var1, $var2, $var3, $var4) // Получаем о нем информацию
   IF(($var3 ! 1150) | ($var4 ! 800)) // Если его размеры не соответствуют нужным
      WNDSIZE ($HWnd, 1150, 800) // То задаем ему размеры
   else // Иначе (если размеры окна соответствуют нужным)
      IF(($var1 ! 0) | ($var2 ! 0)) // Проверяем - если координаты окна не соответствуют нужным
         WndPos ($HWnd, 0, 0) // То перемещаем его в нужные координаты
      else // Иначе (если координаты окна соответствуют нужным)
         print("Номер вікна - ", $HWnd)
         // До этого момента можешь удалить все свое и поставить этот скрипт
         // Дальше я просто не понимаю, что происходит у тебя...
      END_IF
   END_IF
END_IF

WAITMS(50)

[kirihor]

Sait:
wait(10)
GETSCREEN ($HWnd)     делаю снимок нужного окна
print("Сторінка перегляду сайтів ")
IF_PICTURE_IN (700, 450, 1100,800, "sait.bmp")   ищу нужную кнопку
   move ($_return1, $_return2)
   wait(5)
   lclick($_return1, $_return2)
   print("Перегдял сайту")
   Wait(3)
После нажатия открывается новое окно, а в предыдущем запускается таймер до 30с.
Через 30с новое окно закрывается само а в предыдущем  появляется нужная кнопка   "goo.bmp"

   $check = 0
   WHILE($check = 0)
      GETSCREEN  ($HWnd)        делаю повторный снимок чтоб поймать кнопку
      IF_PICTURE_IN (400, 450, 750, 610, "goo.bmp")
         $check = 1
         move ($_return1, $_return2)
         print ("Вихід")
         LCLICK($_return1, $_return2)
         GOTO(Sait)
WAITMS(100)
Дальше нужно все повторить, пока есть кнопка     "sait.bmp"    
      ELSE
         WAITMS(50)
      END_IF
      END_IF
   END_CYC
   

[Hito]

GETSCREEN ($HWnd)     делаю снимок нужного окна

Я может не знаю чего-то...? У нас есть такая функция...? Откуда ты ее взял? Я вот сейчас открыл справку и вот, что в ней написано:

Code: (xml) [Select]

Синтаксис
GETSCREEN ([x1, y1, x2, y2] )

Параметры
x1, y1, x2, y2 - параметры, описывающие область экрана; необязательны

А вот это замечание ни о чем тебе не сказало...?

IF_PICTURE_IN (который ищет goo.bmp) почему-то закрывает END_CYC, а цикл WHILE($check = 0) закрывает END_IF...

Я понимаю, когда человеку нужна помощь, но когда человек полностью игнорит при этом что ему говорят - мне не понятно. Тебе просто нужен готовый скрипт рабочий? Тогда почему бы тебе не написать в биржу труда...?

[kirihor]

Спасибо за помощь. Разобрался