Search found 3414 matches

by Rohwedder
Today, 12:20
Forum: Ich brauche Hilfe
Topic: Nachfolgende Nullen und Dezimalpunkt entfernen
Replies: 0
Views: 11

Nachfolgende Nullen und Dezimalpunkt entfernen

Läuft, aber nur mit einem RTrim für den nachfolgenden Dezimalpunkt:

Code: Select all

Zahlen =
(
-12.30
12.00
-1.
0.
0
)
Loop, Parse, Zahlen, `n
{
	Text .= "`n" A_LoopField  "`t>       "
	Text .= RTrim(RegExReplace(A_LoopField, "\.\d*?\K0+"), ".")
}
MsgBox,% Text
Kann das nicht das RegExReplace allein?
by Rohwedder
Today, 07:48
Forum: Ask For Help
Topic: send a key if another is been press for N seconds
Replies: 2
Views: 43

Re: send a key if another is been press for N seconds

Hallo, try: *MButton:: KeyWait, MButton, T2.5 ;waits maximum 2,5 seconds for release of MButton IF ErrorLevel ;maximum waiting time (2,5 seconds) was exceeded send, f Return Or: *MButton:: IF TMButton Return SetTimer, *MButton Up, -2500 TMButton := True Return *MButton Up:: SetTimer, *MButton Up, Of...
by Rohwedder
Today, 02:00
Forum: Gaming
Topic: Warbirds Freehost.
Replies: 1
Views: 24

Re: Warbirds Freehost.

Hallo, try (untested): #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases. ; #Warn ; Enable warnings to assist with detecting common errors. SendMode Input ; Recommended for new scripts due to its superior speed and reliability. SetWorkingDir %A_ScriptDir% ; Ensur...
by Rohwedder
Today, 01:02
Forum: Ask For Help
Topic: multiple fileappend
Replies: 12
Views: 249

Re: multiple fileappend

Hallo, try: FileDelete, output.txt Loop, Files, *.txt IF RegExMatch(A_LoopFileName, "\A\d+\.txt") ;(Number).txt Loop, read, %A_LoopFileName%, output.txt IfInString, A_LoopReadLine, Duration: { Contents := RegExReplace(A_LoopReadLine,"bitrate*......*") Contents := RegExReplace(Contents,".*?Duration: ...
by Rohwedder
Yesterday, 07:35
Forum: Ask For Help
Topic: Why can't MS Teams accept Alt+A as shortcut?
Replies: 1
Views: 46

Re: Why can't MS Teams accept Alt+A as shortcut?

Hallo, try (Untested): #If WinActive("ahk_exe Teams.exe") ; Microsoft Teams !a::SendInput, ^+m ; unmute Your Remapping !a::^+m is translated by Autohotkey as: *!a:: SetKeyDelay,-1 Send,{Blind}^+{m DownR} Return *!a Up:: SetKeyDelay,-1 Send,{Blind}{m Up} Return so something completely different than ...
by Rohwedder
Yesterday, 06:35
Forum: Ask For Help
Topic: Make AltGr + ESDF to Arrow Keys
Replies: 4
Views: 60

Re: Make AltGr + ESDF to Arrow Keys

Only for completion, my most elaborate version: <^>!e::SendInput, {Blind}{LCtrl up}{RAlt Up}{Up DownR}{LCtrl Down}{RAlt Down} <^>!e Up::SendInput, {Blind}{LCtrl up}{RAlt Up}{Up Up}{LCtrl Down}{RAlt Down} <^>!s::SendInput, {Blind}{LCtrl up}{RAlt Up}{Left DownR}{LCtrl Down}{RAlt Down} <^>!s Up::SendIn...
by Rohwedder
Yesterday, 05:57
Forum: Ask For Help
Topic: Make AltGr + ESDF to Arrow Keys
Replies: 4
Views: 60

Re: Make AltGr + ESDF to Arrow Keys

Hallo, try: RAlt & e::SendInput, {Up} RAlt & s::SendInput, {Left} RAlt & f::SendInput, {Right} RAlt & d::SendInput, {Down} or: <^!e::SendInput, {Up} <^!s::SendInput, {Left} <^!f::SendInput, {Right} <^!d::SendInput, {Down} or: <^!e::SendInput, {Up Down} <^!e Up::SendInput, {Up Up} <^!s::SendInput, {L...
by Rohwedder
Yesterday, 03:06
Forum: Ask For Help
Topic: multiple fileappend
Replies: 12
Views: 249

Re: multiple fileappend

Addendum:

Code: Select all

Loop, Files, *.txt
	IF RegExMatch(A_LoopFileName, "\A\d+.txt") ;(Number).txt
		Loop, read, %A_LoopFileName%, output.txt
			IfInString, A_LoopReadLine, Duration:, FileAppend, %A_LoopReadLine%`n
by Rohwedder
Yesterday, 02:16
Forum: Ask For Help
Topic: multiple fileappend
Replies: 12
Views: 249

Re: multiple fileappend

I got:
Duration: 00:04:26.92, bitrate: 88 kb/s
Duration: 00:04:26.92, bitrate: 88 kb/s
because both files have the same duration line
by Rohwedder
Yesterday, 01:57
Forum: Ask For Help
Topic: multiple fileappend
Replies: 12
Views: 249

Re: multiple fileappend

I have tried now. Here both scripts work:
Duration: 00:04:26.92, bitrate: 88 kb/s
Duration: 00:01:00.48, bitrate: 143 kb/s
by Rohwedder
Yesterday, 01:25
Forum: Ask For Help
Topic: multiple fileappend
Replies: 12
Views: 249

Re: multiple fileappend

Then perhaps: While, FileExist(A_Index ".txt") Loop, read, %A_Index%.txt, output.txt IfInString, A_LoopReadLine, Duration:, FileAppend, %A_LoopReadLine%`n Or: Loop, 100 { IF FileExist(A_Index ".txt") { Loop, read, %A_Index%.txt, output.txt IfInString, A_LoopReadLine, Duration:, FileAppend, %A_LoopRe...
by Rohwedder
Yesterday, 01:05
Forum: Ask For Help
Topic: multiple fileappend
Replies: 12
Views: 249

Re: multiple fileappend

Hallo,
perhaps:

Code: Select all

Loop, 2
	Loop, read, %A_Index%.txt, output.txt
		IfInString, A_LoopReadLine, Duration:, FileAppend, %A_LoopReadLine%`n
by Rohwedder
27 Sep 2020, 07:36
Forum: Gaming
Topic: Macro spamming a key being interrupted
Replies: 2
Views: 47

Re: Macro spamming a key being interrupted

Hallo,
perhaps:

Code: Select all

*F13::
WinGet, HWND, ID, A
While GetKeyState("F13", "p")
{
	ControlSend,, é, ahk_Id %HWND%
	Sleep 0
}
return
by Rohwedder
27 Sep 2020, 05:57
Forum: Ask For Help
Topic: Tasklist
Replies: 9
Views: 200

Re: Tasklist

Hallo, perhaps (untested): ;teadrinker https://www.autohotkey.com/boards/viewtopic.php?t=62939 WinGet, PID, PID, ahk_exe sidebar.exe IF PID > 0 MsgBox, % GetPrivateWorkingSet(PID) . " KB" Else MsgBox, Not found! Return GetPrivateWorkingSet(PID) { bytes := ComObjGet("winmgmts:") .ExecQuery("Select * ...
by Rohwedder
27 Sep 2020, 03:35
Forum: Gaming
Topic: Macro in ARK
Replies: 1
Views: 50

Re: Macro in ARK

by Rohwedder
27 Sep 2020, 03:22
Forum: Ask For Help
Topic: Hotkey Does Not Work In Some Contexts?
Replies: 4
Views: 97

Re: Hotkey Does Not Work In Some Contexts?

Hallo,
in the Task Scheduler and Registry Editor windows your script needs admin rights. Try:

Code: Select all

SingleInstance, Force
If !A_IsAdmin
	Run *RunAs "%A_ScriptFullPath%"
#d::Run, C:\Users\user\Downloads\
by Rohwedder
27 Sep 2020, 01:36
Forum: Gaming
Topic: Auto Clicker on button press and hold
Replies: 1
Views: 47

Re: Auto Clicker on button press and hold

Hallo,
try:

Code: Select all

XButton2::
While GetKeyState("XButton2","P")
{
	Click
	Sleep, 100 ;100ms = 0.1 second
}
Return
by Rohwedder
27 Sep 2020, 01:28
Forum: Gaming
Topic: Auto Hotkey clicking
Replies: 1
Views: 53

Re: Auto Hotkey clicking

Hallo,
try:

Code: Select all

XButton2:: ;On/Off with XButton2 = mouse button 5
If !TXButton2 := !TXButton2
{
    SetTimer TXButton2, Off
    Return
}
SetTimer TXButton2, 500 ;instantly and every 500ms
TXButton2:
SendInput, {F9}
Return
by Rohwedder
26 Sep 2020, 06:19
Forum: Ask For Help
Topic: Keyboard hotkeys working, mouse hotkeys not. Topic is solved
Replies: 7
Views: 147

Re: Keyboard hotkeys working, mouse hotkeys not. Topic is solved

Hallo, try: a:: Send a Sleep 1000 GetKeyState, state, a, p if (state = "D") { Send 5 SoundBeep, 4000, 100 sleep 1000 } return rbutton:: Send {Click Right} Sleep 1000 GetKeyState, state, rbutton, p if (state = "D") { Send 5 SoundBeep, 4000, 100 sleep 1000 } return i added SoundBeeps because you can n...
by Rohwedder
26 Sep 2020, 04:38
Forum: Ask For Help
Topic: press a key after i press another
Replies: 3
Views: 116

Re: press a key after i press another

Then perhaps:

Code: Select all

~*MButton::SendInput, {Blind}{Ctrl Up}{Shift DownR}
~*MButton Up::
SendInput, {Blind}{Shift Up}{Ctrl DownR}
SetTimer, Ctrl_Up, -1000
Return
Ctrl_Up:
SendInput, {Blind}{Ctrl Up}
Return

Go to advanced search