Author Topic: пауза в скрипте для получения координаты и цвета курсора  (Read 3449 times)

0 Members and 1 Guest are viewing this topic.

Credo

  • Зашел в гости
  • *
  • Posts: 3
    • View Profile
1, Что то типа такого: в процессе выполнения скрипта - окошко с вводом( запросом, сообщением) или еще как, при клике мышки в скрипт записывается переменная х.у и цвет в точке клика мышки, а если не надо то клик правой кнопкой мыши.

Вторая задача.
в скрипте 1 сделать запуск другого скрипта 2 и остановить скрипт 1 (#include возвращает в работу скрипт1 после выполнения скрипта 2)
« Last Edit: March 21, 2017, 02:28:25 PM by Credo »

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Re: Взможно ли такое реализовать?
« Reply #1 on: March 21, 2017, 01:24:42 PM »
Чёт ты понаписал непонятного. Alt+Q уже не вариант?


Credo

  • Зашел в гости
  • *
  • Posts: 3
    • View Profile
Re: Взможно ли такое реализовать?
« Reply #2 on: March 21, 2017, 01:57:29 PM »
Разъясню:
Есть скрипт выполняющий постоянные действия, в какой то момент надо указать, ( автоматом сложно, тк много цифр из них необходимо выбирать), координаты объекта, послечего выполнить еще действия.

Alt+Q - при написании - да, но не в процессе выполнения скрипта.

"всё это возможно" ну так помогите идеей.
« Last Edit: March 21, 2017, 01:59:03 PM by Credo »

Vint

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3935
  • Лечу куда хочу. cman 4.13.014x32, 4.14.003 W10
    • View Profile
Это?
Code: (clickermann) [Select]
SUB(set_coord) //== Задаём координаты ==========================================
    $wait_time = 0
    $set = 0
    WHILE($set = 0)
        IF($wait_time < $_time_t)
            HINTPOPUP("Укажите координаты...", "Внимание!")
            $wait_time = $_time_t + 10
            WAITMS(50)
        END_IF
       
        IF(ISKEYDOWN(1) = 1)
            $vx = $_xmouse
            $vy = $_ymouse
            GETSCREEN($vx,$vy, $vx,$vy)
            $vc = PXL($vx,$vy)

            WHILE(ISKEYDOWN(1) = 1)
                WAITMS(50)
            END_CYC
            $set = 1
        END_IF
        WAITMS(50)
    END_CYC
END_SUB

// так используем
set_coord()
LOGWRITE("Заданы координаты X/Y  ", $vx, " / ", $vy, "  цвет: ", $vc)
HINTPOPUP(STRCONCAT($vx, " / ", $vy, " цвет: ", $vc), "Заданы координаты:")

HALT
« Last Edit: March 21, 2017, 02:41:09 PM by Vint »


Credo

  • Зашел в гости
  • *
  • Posts: 3
    • View Profile
Vint
Да, ОГРОМНОЕ спасибо, то что нужно.