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

Pages: [1]
1
Предложения / Скриптовый менеджер
« on: February 06, 2017, 02:26:07 PM »
Предлагаю сделать скриптовый менеджер, (дизайн может кто предложить, или на усмотрение автора), там будет список (или кнопки, или еще чего) из открытых скриптов, возле каждого скрипта будут кнопочки Старт, Стоп, Обновить (обновляет скрипт с диска) и индикатор привязки(при наведении покажет к чему привязано), но самой привязки нет никакой, только из текста скрипта можно привязаться, никаких горячих клавиш и прочего не потребуется. Можно еще добавить кнопочку Открыть в редакторе.
Такое будет удобно любителям запускать несколько скриптов разом. Чтоб не морочить себе голову с графическим буфером, как вариант, запускать скрипты с помощью того же кликермана, но как скрытый процесс, чтоб и его окна видно небыло.

2
а нельзя ли ввести функцию поиска pid по типу;
$p1=PIDFIND ("notepad.exe",1)
$p2=PIDFIND ("notepad.exe",2)
в $p1 запишется первый встреченный в списке запущенный notepad.exe, а $p2 - второй
чтоб с readmem/writemem удобней работать

3
(Можно на кликере, думаю смогу перевести, математические операции ведь везде одинаковы).
Дано:
Переменная PSD (в начале может иметь любое значение)
Переменная BU (в начале цикла может принимать значения 0, 1 или 2)
Переменная BL (в начале цикла может принимать значения 0, 1 или 2)
Инструменты:
 стандартные операторы сравнения
 IncVal(PSD, X) - увеличивает PSD  на Х (если Х отрицательное, то уменьшает естественно).
 Можно добавлять другие переменные, и производить с ними любые математические операции, PSD менять можно только через IncVal(PSD, X)

Задача:
Если BU равно 2, ModVal(PSD, BUX), где BUX=15
Если BU равно 1, ModVal(PSD, BUX), где BUX=10
Если BU равно 0, ModVal(PSD, BUX) где BUX -10 или -15 ... вобщем отменить прибавку к PSD

Если BL равно 2, ModVal(PSD, BLX), где BLX=25
Если BL равно 1, ModVal(PSD, BLX), где BLX=20
Если BL равно 0, ModVal(PSD, BLX) где BLX -20 или -25 ... вобщем отменить прибавку к PSD

Например:
цикл 1
оригинальное PSD = 50
 BU = 2
 BL = 2
  ( PSD должно быть 90 -(50+15+25))
цикл 2
оригинальное PSD = 10 (с нашей прибавкой от пред цикла PSD =  50)
 BU = 0
 BL = 1
  ( PSD должно быть 20 -(10+10, прибавку от BU отменяем))
цикл 3
оригинальное PSD = 20 (с нашей прибавкой от пред цикла PSD =30)
 BU = 0
 BL = 0
  ( PSD должно быть 20 - отменяем все свои прибавки)

Сложность у меня в том, что PSD не должно меняться моей процедурой если BU/BL не менялись от предыдущего цикла, при этом PSD не статично, его может изменить другая процедура в начале цикла, и нужно работать с новым уже (устанавливать/отменять свои прибавки). По сути мы не знаем значения PSD в начале цикла, надо добавить/отнять прибавку для PSD в зависимости изменилась ли переменная BU или BL

4
Предложения / #name "New Script"
« on: September 03, 2016, 09:54:33 AM »
Code: (Clickermann) [Select]
// 03.09.2016
#name "New Script"


print("Hello, world!")
добавить бы HALT в конце. ато если случайно нажать запуск комп..., ну не то чтобы зависает, но тяжко ему приходится без задержек и остановок выполнять это произведение.

5
Общие вопросы / 3 в 1
« on: June 18, 2016, 10:08:28 PM »
кто может из 3 потоков сделать 1 чтоб работало?
ато 3 потока убивают 1-ядерный проц какие задержки не ставь
Code: (Clickermann) [Select]
thread(ctrlset,1)
   IF((iskeydown(110)=1)) //NumPad .
      IF ($st=0)
         $st=1
         $stx=$_xmouse
         $sty=$_ymouse
         HINTPOPUP("Set")
      END_IF
   END_IF
   WAITMS(50)
end_thread
thread(altunset,1)
   IF((iskeydown(96)=1)) //NumPad 0
      IF ($st=1)
         $st=0
         HINTPOPUP("Unset")
      END_IF
      WAITMS(50)
   END_IF
end_thread
thread(clicktoset,1)
   IF ($st=1)
      RCLICK($stx,$sty)
      //HINTPOPUP("click")
      WAIT(2)
   END_IF
   WAITMS(50)
end_thread


6
есть два файла t1.тхт и t2.тхт. файлы почти одинаковые, структура одинаковая
структура примерно:
------
1 //(всегда порядковая цифра)
разные цифры //(всегда 1 строка)
разные буквы 1/2  //(бывает от одной до нескольких строк)
                      //(всегда пустая строка)
2 //(всегда порядковая цифра)
разные цифры //(всегда 1 строка)
разные буквы 1/2  //(бывает от одной до нескольких строк)
                      (всегда пустая строка)
3 //(всегда порядковая цифра)
разные цифры //(всегда 1 строка)
разные буквы 1/2  //(бывает от одной до нескольких строк)
--//--
                    // (всегда пустая строка)
N //(всегда порядковая цифра)
разные цифры //(всегда 1 строка)
разные буквы 1/2  //(бывает от одной до нескольких строк)
------

Задача - из файла 1 считать строки с разными буквами 1 и вставить их в файл 2 после строки с разными буквами 2 в соответствующей секции порядковых чисел, чтоб вышло
------
1 //(всегда порядковая цифра)
разные цифры //(всегда 1 строка)
разные буквы 1  //(бывает от одной до нескольких строк)
разные буквы 2  //(бывает от одной до нескольких строк)
                      //(всегда пустая строка)
--//--
N   //(всегда порядковая цифра)
разные цифры (всегда 1 строка)
разные буквы 1  //(бывает от одной до нескольких строк)
разные буквы 2  //(бывает от одной до нескольких строк)
                      //(всегда пустая строка)
------
Алгоритм примерно понимаю, - найти строку с числом N в t1, найти строку с числом N в t2, скопировать текст что находится ниже строки на 2(само число и строка с цифрами), Но вот текста под одинаковыми числами разное количество строк бывает, и когда пытаюсь придумать как сделать у меня выйдет быстрей вручную перекопировать эти тонны букафф

файлы для примера/теста вложены

7
Кто умеет\может запилить файл для модуля раскраски синтаксиса Clickermann в AkelPad ?

http://akelpad.sourceforge.net/files/plugs/Coder/ тут примеры

(а может готовый есть у кто, поделитесь пжалста)

8
У меня есть схожая задача. Нужно построить ряды чисел от 1 до Х, количеством Х, но числа в ряду повторяться не должны и ряды повторяться тоже не должны. например ряд 1 до 3 в лог должно выдать примерно:
123
132
213
231
312
321

9
Общие вопросы / POSTMESSAGE
« on: June 07, 2015, 09:35:04 PM »
Code: (Clickermann) [Select]
$whwnd=656190
POSTMESSAGE($whwnd,0x0100,0x09,0)   //keydown tab
waitms(10)
POSTMESSAGE($whwnd,0x0101,0x09,0)   //keyup tab

//---//
POSTMESSAGE($whwnd,0x0102,0x09,1)  //keypress tab

не работает
не могу понять как выставить lParam, пробовал 0,1, ничего не помогает
надо нажать в привязанном окне TAB. без альтов и контролов, просто TAB.

пробовал с устанавливать фокус на окно
POSTMESSAGE($whwnd,0x0006,1,0) //WM_SETFOCUS
и
POSTMESSAGE($whwnd,0x0007,1,0) //WM_ACTIVATE
тоже не работает

10
Предложения / Междумордие
« on: May 29, 2015, 10:37:09 PM »
Отвяжите окно редактора от главного окна, как было раньше, раз уж нельзя сохранять в ini координаты и размеры окна, то верните как было. Часто надо главное окно держать вверху экрана, но при этом нельзя вызвать редактор, он вылезает тогда за пределы экрана.
А может имеет уже смысл вообще отказаться от основного окна, тем более от него кроме небольшого размера практической пользы и нет. Вместо этого редактор сделать основным и прикрутить кнопку, чтоб сворачивала его в мини-панель, состоящее из кнопок старт/пауза, стоп, поверх всех окон, и развернуть в редактор, для удобства работы.

11
Предложения / ****BOX
« on: October 17, 2014, 11:15:59 AM »
Предлагаю расширить функционал и ввести как продолжение для INPUTBOX и DIALOGBOX - COMBOBOX и CHECKBOX




12
Общие вопросы / об окнах
« on: October 04, 2014, 11:57:06 PM »
Можно ли средствами программы взять окно, изменить его положение и размер (как это сделать я знаю), а потом (внимание!!) Вернуть на место как было

13
Code: (clickermann) [Select]
$h = hget(640,200)
LOGWRITE ("hget=", $h)
HSET($h,1)

$htxt=HGETTEXT($h)
$htxtorig=$htxt
$htxtnew=$htxt+" hset"
LOGWRITE ("HGETTEXT=", $htxt)
hsettext($h, $htxtnew)

m1:

LCLICK(1030,505)  // ok
FOR($a, $a < 60)
   WAIT(1)
   IF ( iskeydown(#space)=1 ) //ñòîï âûïîëíåíèÿ ïðè íàæàòèè ïðîáåëà
      hsettext($h, $htxtorig)
      HSET($h,0)
      halt
   END_IF
END_CYC

GOTO(m1)


скрипт привязывается к окну, переименовывает его (для удобства) и жмет мышу в нужном месте раз в минуту, при нажатии Пробела окну возвращается оригинальное название, отвязывается от окна и скрипт останавливается...
...НО...
скрипт реагирует на нажатие Пробела вообще в системе, в другом окне или просто так.
Можно ли сделать чтоб скрипт реагировал на нажатии клавиши в привязанном окне, или нажатие мыши? В общем надо интерактивно среагировать на действие в привязанном окне, как видно из скрипта, просто остановить работу нажав Паузу или Стоп не вариант.

14
Предложения / multi monitor
« on: September 08, 2014, 11:58:51 PM »
Если возможно, нужна поддержка нескольких мониторов, например GETSCREEN(#2), а без указателя основной монитор по-умолчанию. Иногда нужен экранный анализатор без привязки к окну (да и не работает у меня с привязкой), и при этом делать что-то в другом окне, так проще перетащить на другой экран окно, пусть себе там анализирует.

15
Предложения / Немного для интерфейса
« on: September 05, 2014, 08:15:40 AM »
Доброго времени суток.
Нужна кнопочка (в виде мишени, например), кликнув по которой мы делаем привязку к следующему выделенному окну.
Или кнопку "Привязка" в окошко Менеджера окон.
А лучше и то и другое сразу.
И еще, к трем системным кнопкам (свернуть, развернуть, закрыть) нужна кнопочка "Уменьшить", которая превращает окно программы в мини окошко с тремя кнопками (начать/пауза, стоп, запись), размером можно на примерно 30% больше тех которые в главном окне, чтоб не потерялось на экране, но и чтоб не было слишком большим, и самое главное чтоб было Поверх Всех Окон. В системной полоске нужно имя текущего сценария, чтоб различать окна, и разумеется возврат в обычное состояние.
Это все для того чтоб удобней было управлять сценариями, не переключаясь между окнами, и при этом не занимать много рабочего пространства монитора, так как горячие клавиши работают только для первого запущенного экземпляра программы.
И насчет окна редактора. Пусть оно сворачивается как обычные окна, а не в левый нижний угол экрана, ато неудобно оно там место занимает без всякой пользы, маячит кусок окна.

Pages: [1]