Серый форум — AHK: Подсчет пути, проделанного курсом мыши.

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Wed, 19 Aug 2020 21:03:00 +0000

Alectric, спасибо.

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Alectric) — Tue, 18 Aug 2020 13:14:55 +0000

Справка пишет:

Выход из текущего потока или (если скрипт не резидентный, т.е. не содержит директиву #Persistent, и не содержит горячих клавиш) из скрипта в целом.

Этот Exit работает как Return. Условно говоря.
Тебе нужен ExitApp.

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Tue, 18 Aug 2020 03:23:03 +0000

Alectric, а выйти как из этой программы ?
Почему Exit здесь не срабатывает ?



#NoEnv
#SingleInstance,Force
SetBatchLines,-1
CoordMode,Mouse,Screen



F1::
off := 1
mousegetpos,oldx,oldy
Loop
{
  If off = 1
  {
    sleep,10
    mousegetpos,x,y
    var+=Sqrt(abs(x-oldx)**2+abs(y-oldy)**2)
    oldx:=x
    oldy:=y
    ;tooltip,% var
  }
  else
    break

}
return

F2::
off := 0


;msgbox,Замени меня на FileAppend. Мышка проехала %var% пикселей.
FileDelete %A_Scriptdir%\пробег мыши.txt
FileAppend, %var%, %A_ScriptDir%\пробег мыши.txt
Exit

;Return

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Alectric) — Mon, 17 Aug 2020 15:36:41 +0000

FileDelete

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Mon, 17 Aug 2020 06:39:40 +0000

Получился скрипт:


#NoEnv
#SingleInstance,Force
SetBatchLines,-1
CoordMode,Mouse,Screen

F1::
off := 1
mousegetpos,oldx,oldy
Loop
{
  If off = 1
  {
    sleep,10
    mousegetpos,x,y
    var+=Sqrt(abs(x-oldx)**2+abs(y-oldy)**2)
    oldx:=x
    oldy:=y
    tooltip,% var
  }
  else
    break

}
return

F2::
off := 0

;msgbox,Замени меня на FileAppend. Мышка проехала %var% пикселей.
FileAppend, %var%, %A_ScriptDir%\пробег мыши.txt
Return

Он в целом работает, но выводит результаты при периодическом использовании :
4472.7224186636.588887
То есть в одну кучу их кидает в txt.
Как поменять этот код, чтобы итоговый результат - перезаписывал бы старый результат, а после нажатия F2 и записи в файл - скрипт закрывался бы ?

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Alectric) — Sun, 16 Aug 2020 03:20:24 +0000

Второй цикл здесь лишний. И чтобы завершить цикл нужно выполнить команду break.


#NoEnv
#SingleInstance,Force
SetBatchLines,-1
CoordMode,Mouse,Screen



F1::
off := 1
mousegetpos,oldx,oldy
Loop
{
  If off = 1
  {
    sleep,10
    mousegetpos,x,y
    var+=Sqrt(abs(x-oldx)**2+abs(y-oldy)**2)
    oldx:=x
    oldy:=y
    tooltip,% var
  }
  else
    break
}
return

F2::
off := 0
msgbox,Замени меня на FileAppend. Мышка проехала %var% пикселей.
Return

Ragnar Lodbrokovitch пишет:

не по клавише F1

Потому-что в условии так написано "If off = 0" - "если переменная "off" равна нулю".

Ragnar Lodbrokovitch пишет:

записью результата в txt

Нужно выполнить FileAppend в момент выключения.

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Sun, 16 Aug 2020 02:34:57 +0000

Alectric
Вот у меня получился такой код.


#NoEnv
#SingleInstance,Force
SetBatchLines,-1
CoordMode,Mouse,Screen



F1::
off := 1
Loop
{
mousegetpos,oldx,oldy
If off = 0

loop
{
  sleep,10
  mousegetpos,x,y
  var+=Sqrt(abs(x-oldx)**2+abs(y-oldy)**2)
  oldx:=x
  oldy:=y
  tooltip,% var
}


}
return

F2::
off := 0
Return

Правда включается он не по клавише F1, а почему-то по клавише F2.
И выключить с записью результата в txt - не получается.

Подскажите - как это сделать ?

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (stealzy) — Sat, 15 Aug 2020 18:52:09 +0000

Alectric, уверены что я язвлю?
Просто отмечаю что вы дали без объяснения готовый код, который неполностью удовлетворяет заказу ТС.
Что интереснее, теперь вы сами ответили ему в духе "изучай, пробуй, показывай код".

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Alectric) — Sat, 15 Aug 2020 17:13:41 +0000

stealzy пишет:

Alectric, недоделали работу!

Если честно, надоели ваши подколки и язвление. Прекратите язвить, пожалуйста.

Ragnar Lodbrokovitch пишет:

как подключить на подсчет пути - клавиши

Изучай. Пробуй. Если не получится - показывай свой код, подскажем.

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (stealzy) — Sat, 15 Aug 2020 15:14:21 +0000

Alectric, недоделали работу!

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Sat, 15 Aug 2020 13:42:19 +0000

Alectric, а как подключить на подсчет пути - клавиши - F1 для запуска, и F2 для записи результата в txt

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Alectric) — Sat, 15 Aug 2020 09:14:00 +0000


#NoEnv
#SingleInstance,Force
SetBatchLines,-1
CoordMode,Mouse,Screen

mousegetpos,oldx,oldy

loop
{
  sleep,10
  mousegetpos,x,y
  var+=Sqrt(abs(x-oldx)**2+abs(y-oldy)**2)
  oldx:=x
  oldy:=y
  tooltip,% var
}

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (ypppu) — Sat, 15 Aug 2020 07:45:42 +0000

Ragnar Lodbrokovitch, это я и так понимаю. А цель-то какая преследуется?

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Sat, 15 Aug 2020 07:26:05 +0000

stealzy мышка ходит например - по кругу или восьмеркой.
Ну какие тут отрезки ?

Re: AHK: Подсчет пути, проделанного курсом мыши.

null@example.com (Ragnar Lodbrokovitch) — Sat, 15 Aug 2020 07:23:28 +0000

ypppu, чтобы общий пробег определить.
Вот кстати похожая программа: