Topics

1

Общие вопросы / Не работает windows server

« on: April 08, 2014, 07:31:27 PM »

На 2012 не запускается совсем.
Как то можно помочь?

Я думаю все поняли, что кликер не работает, а не винда))

2

Общие вопросы / Не выключается оконным режимом

« on: April 05, 2014, 06:58:29 PM »

Проблема следующая: хочу чтобы окно экселя помещалось в координату 200, 200.

Code: (clickermann) [Select]

   execute("excel")
   wait(2)
   $HWnd = WNDFIND ("Microsoft Excel")
   HSET ($HWnd, 0)
   WndPos ($HWnd, 200, 200)
   wndstate($HWnd, 0)
   WaitMS(200)
   wndstate($HWnd, 1)
   WaitMS(200)
результат - окно экселя остается развернутым и не перемещенным

3

Предложения / Сворачивание функций в редакторе

« on: April 05, 2014, 01:11:46 PM »

Хочу предложить прикрутить к редактору возможность сворачивания функций и условий. Что то вроде раскрываемого списка. Часто не совсем удобно искать что то в коде, когда километровая простынь. А так свернул все что не надо сейчас и работаешь с тем что надо.

4

Общие вопросы / Как сделать изменить количество повторов скрипта по умолчанию

« on: April 01, 2014, 06:50:57 PM »

Каждый раз парит заходить в менюшку и вручную переключать. В настройках копашился, не нашел. Может чего-нить подскажете?

5

Общие вопросы / Как сделать активным окно с заданным HWND

« on: March 24, 2014, 11:55:22 PM »

Т.е. после HGET как это окно поместить на передний план?

6

Общие вопросы / Копирование данных из таблицы

« on: March 24, 2014, 06:21:33 PM »

Ребят, помогите!
В браузере выдается таблица.
Как ее оптимально импортировать в эксель (или хотя бы в тхт с разделителями)?

7

Прочее / To Johnny with love!))

« on: February 27, 2014, 04:08:15 PM »

Хочу выразить благодарность от всей души автору и его помощникам за эту великолепную программу. Благодаря clickermann я окунулся в восхитительный мир программирования, где можно почувствовать себя властелином собственного маленького мира, который создал своими руками. Ничто так не радует и не вдохновляет меня как работающий и отлаженный скрипт. Желаю успешного развития проекта и его коммерческой составляющей. Ну и личных достижений тоже))

8

Общие вопросы / Что возвращает inputbox?

« on: February 21, 2014, 06:24:00 PM »

Я наверно всех уже достал, но сам не могу справится..
Для упрощения работы постороннего человека со скриптом создал режим диалога:

Code: (clickermann) [Select]

SCREENSHOTEX($_return1-3,$_return2+29, $_return1+36,$_return2+50, "label", 0)
$j1 = inputbox("Введите номер страницы в горизонтальной строке страниц $j1", "0")
WAIT(1)
$k1 = inputbox("Введите номер горизонтальной строки $k1", "0")

Но в работе скрипта выскакивает ошибка интерпритации LCLICK($XXX,$YYY)
Ошибка эта появляется тут

Code: (clickermann) [Select]

Sub(click1)
   LCLICK($XXX,$YYY)
   WaitMs(100)
End_Sub
Координаты получает отсюда:

Code: (clickermann) [Select]

// - Функция проверки загрузки страницы листов
sub(CHECK2)
   WHILE($d1 = 1)
      WAITMS($T)
      GETSCREEN
      If_Picture_In($KZX0,1,$KZX0+978,$_ymax, "textures\CHECK2.bmp")
         $d1 = 5
      END_IF
   END_CYC
   $d1 = 1
End_Sub
// - Функция поиска страницы №1
sub(CHECK3)
   WHILE($d1 = 1)
      GETSCREEN
      If_PIXEL_IN($KZX0,$KVLY0,$KZX0+978,$_ymax, 3616552)
         $KZX2 = $_return1
         $KZY2 = $_return2
         $d1 = 5
      END_IF
   END_CYC
   $d1 = 1
End_Sub

// == Копирование данных из 20ти строк страницы ==
SUB(COPY1)
   FOR ($i1, $i1 < 19)
      CHECK2()
      CHECK3()
      $XX1 = $KVLX0
      $YY1 = $YYYY0
      $XXX = $KZX2+$KZZ2*($j1)+6
      $YYY = $KZY2+$ZZ1
  LogWrite("координата строки ", $XXX ,",", $YYY)
      click1()
      LogWrite("Перешел на страницу: "$j1)
      IF($j1>0) & ($k1<1)
         CHECK5()
      END_IF
      CHECK2()
      GETSCREEN
      If_PIXEL_IN($XX1,$YY1,$KNPX0,$KNPY0, 13948116)
         $XXX = $_return1+25
         $YYY = $_return2
         LogWrite("координата пикселя ", $_return1 ,",", $_return2)
         LogWrite("координата строки ", $XXX ,",", $YYY)
         click1()
         $YYYY0 = $_return2+20
         LogWrite("Зашел в строку: "$i1)
         CHECK4()
         IF($SCR=1)
            SCREENSHOT("строка")
         END_IF
         DataCopy()
         $XXX = $KZX1+200
         $YYY = $KZY1+3
         click1()
      ELSE
         HintPopup("Не найден квадратик")
         LogWrite("Не найден квадратик! в строке"$i1)
         HALT
      END_IF
   END_CYC
END_SUB

CHECK2 и CHECK3 проходят. А координаты для клика выдает: координата строки 502+26*("1")+6,952
Т.е. введенное значение он как будто не понимает как число.
Как преобразовать строку в число что ли?

9

Общие вопросы / Не работает #include

« on: February 21, 2014, 03:46:48 PM »

Возможно что то упустил или не понимаю, но не работает..
Даже простой пример не срабатывает

Code: (clickermann) [Select]

#include "roll_subs.cms"
 
//----- body -----
 
roll()
 
if($roll_res = 1)
  print_one()
else 
  print_two()
end_if
 
halt

файл лежит в папке со скриптом и программой и зовется roll_subs.cms
содержит

Code: (clickermann) [Select]

// ----- header -----
 
sub(print_one)
  print("one!")
end_sub
 
sub(print_two)
  print("two!")
end_sub
 
sub(roll)
  $roll_res = rnd(1,2)
end_sub
Где не прав?

10

Общие вопросы / Как реализовать удаление файла?

« on: February 21, 2014, 10:18:41 AM »

Скрипт создает файлик bmp. Возможно ли чтобы скрипт его сам сначала удалял?

11

Прочее / В какой версии появилась команда SCREENSHOTEX?

« on: February 20, 2014, 10:09:12 PM »

В какой версии появилась команда SCREENSHOTEX?
Если в 4.8, подскажите где его скачать?

12

Общие вопросы / Начало цикла FOR в 4.9 всегда с нуля. Зачем?

« on: February 20, 2014, 09:38:43 PM »

У меня скрипт который ходит по сетке из ссылок. И устанавливая переменную по горизонтали и вертикали можно было начать с определенного места. В 4.9 сделали начало цикла всегда с нуля, как будто переменную нельзя обнулить непосредственно перед циклом. Кто подскажет зачем это и как быть с уже готовым скриптом?

13

Общие вопросы / Как сохранить кусочек картинки?

« on: February 20, 2014, 04:32:50 PM »

Возможно ли взять из getscreen'а кусочек с заданными координатами и сохранить его с заданным именем? Сохранять нужно в bmp, чтобы потом использовать в этом же скрипте..

14

Общие вопросы / Как изменить кодировку?

« on: February 12, 2014, 01:26:38 PM »

Возможно ли в версии 4.7 изменить кодировку?
Скрипт копирует из браузера текст и вставляет в тхт. На одном компе нормально на другом вместо русского знаки вопроса.
В браузере кодировка UTF-8 а в тхт 1251 я так думаю.

15

Общие вопросы / Не работает IF_PICTURE_IN

« on: February 10, 2014, 10:12:45 AM »

Народ, помогите пожалуйста!
есть:

Code: (clickermann) [Select]

GetScreen
If_Picture_In(1,1,$_xmax,$_ymax, "textures\CHECK1.bmp")
   HintPopup("ДА!")
Else
   HintPopup("НЕТ!")
End_If

Глубина цвета в винде 32. Картинка для поиска 24.
Почему не находит?