Messages

1

Ошибки / Re: Clickerman v 4.12 на win xp sp 3 - Эмулятор выписки из БК

« on: September 06, 2016, 12:52:33 PM »

А название программы в малом клиенте пытается замениться с all на Open and Login.

Code: [Select]

#name "Open and Login"
Print("Open and Login")
wait(3)
Define($check1, 99)
WHILE($check1 > 1)
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "11.bmp", -1, 100)
      dblCLICK($_return1, $_return2)
      WAITMS(3000)
      $check1 = 0
   ELSE
      WAITMS(500)
      $check1 = $check1-1
      print("wait 0.5")
   END_IF
END_CYC


DEFINE($check1, 99)
WHILE($check1 > 0)
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "login2.bmp", -1, 100)
      LCLICK($_return1+45, $_return2+15)
      print("start login")
      WAITMS(6000)
      $check1 = 0
   ELSE
      WAITMS(500)
      Print("waite 0.5 login2.bmp")
      $check1=$check1-1
   END_IF
END_CYC
Print("Open and Login - Done")

вот эта строка по вашему мнению, для чего вами написана?
#name "Open and Login"

Понятия не имею. Я человек простой - прочитал описание функции - делаю.
Просто при запуске all.cms с периодичностью примерно в 200мс название программы пытается замениться с одного, на другое.

2

Ошибки / Clickerman v 4.12 на win xp sp 3 - Эмулятор выписки из БК

« on: September 06, 2016, 12:07:48 PM »

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

Для упрощения труда создал главный файл, с включениями разных процедур по порядку (явно излишняя затея, поскольку только 1 процедура будет использоваться повторно).
Но прикол в другом, Clickerman крашится без номера ошибки и закрывается.
А название программы в малом клиенте пытается замениться с all на Open and Login.
Конопку "применить" тоже не могу нажать - кликерман закрывается.

Подскажите, пожалуйста как этого избежать этого избежать и в чём дело?

Code: [Select]

// 06.09.2016

Print("DBO Start")
Goto(skip2)
#include "Open and Login.cms"
skip1:
#include "Pass-Gates.cms"
skip2:
#include "Main-page.cms"
skip3:
#include "Date-Pass.cms"
skip4:
#include "Export-run.cms"
skip5:
#include "Clear.cms"
skip6:
halt
#Name "All"

Code: [Select]

#name "Open and Login"
Print("Open and Login")
wait(3)
Define($check1, 99)
WHILE($check1 > 1)
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "11.bmp", -1, 100)
      dblCLICK($_return1, $_return2)
      WAITMS(3000)
      $check1 = 0
   ELSE
      WAITMS(500)
      $check1 = $check1-1
      print("wait 0.5")
   END_IF
END_CYC


DEFINE($check1, 99)
WHILE($check1 > 0)
   GETSCREEN
   IF_PICTURE_IN (0,0, $_xmax,$_ymax, "login2.bmp", -1, 100)
      LCLICK($_return1+45, $_return2+15)
      print("start login")
      WAITMS(6000)
      $check1 = 0
   ELSE
      WAITMS(500)
      Print("waite 0.5 login2.bmp")
      $check1=$check1-1
   END_IF
END_CYC
Print("Open and Login - Done")