-
Notifications
You must be signed in to change notification settings - Fork 1
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Fix to work with new window titles, make hotkeys also work in STS window
- Loading branch information
Showing
2 changed files
with
287 additions
and
284 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -1,111 +1,114 @@ | ||
| #include <WinAPI.au3>;used to play default beep | ||
| Dim $Buffers[1];Each element will be a nested array containing all lines of a monitored window, this will be redimmed at initialisation | ||
| $WhichBuffer=0 | ||
| $BufferCursor=0 | ||
| $BufferKeysActive=0 | ||
| Func BufferNavigate() | ||
| If IsArray($Buffers[$WhichBuffer]) then | ||
| select | ||
| case @HotkeyPressed="!{up}" | ||
| If $BufferCursor>0 then | ||
| $BufferCursor=$BufferCursor-1 | ||
| If $bufferCursor>UBound(($Buffers[$WhichBuffer]))-1 then $BufferCursor=UBound(($Buffers[$WhichBuffer]))-1 | ||
| ;Going up in a shrunken buffer while the cursor is out of bounds. | ||
| else | ||
| _WinAPI_MessageBeep(0) | ||
| EndIf | ||
| case @HotkeyPressed="!{down}" | ||
| If $BufferCursor<UBound($Buffers[$WhichBuffer])-1 then | ||
| $bufferCursor=$BufferCursor+1 | ||
| else ;Out of bounds due to reading in a larger buffer before and switching to a smaller one | ||
| _WinAPI_MessageBeep(0) | ||
| $BufferCursor=UBound(($buffers[$WhichBuffer]))-1 | ||
| EndIf | ||
| Case @HotkeyPressed="!{home}" | ||
| $BufferCursor=0 | ||
| Case @HotkeyPressed="!{end}" | ||
| $BufferCursor=UBound($Buffers[$WhichBuffer])-1 | ||
|
|
||
| EndSelect | ||
| If ($Buffers[$WhichBuffer])[$BufferCursor]="" then | ||
| speak("blank") | ||
| else | ||
| speak(($Buffers[$WhichBuffer])[$BufferCursor]) | ||
| EndIf | ||
| else;Buffer is not a nested array which means the buffer is empty | ||
| speak("empty") | ||
| EndIf | ||
| EndFunc | ||
| Func BufferSwitch() | ||
| Select | ||
| Case @HotkeyPressed="!{right}" | ||
| If $WhichBuffer<UBound($WindowList)-1 then | ||
| $WhichBuffer=$WhichBuffer+1 | ||
| else ;Last buffer, so wrap around to the first | ||
| $WhichBuffer=0 | ||
| EndIf | ||
| Case @HotkeyPressed="!{left}" | ||
| If $WhichBuffer>0 then | ||
| $WhichBuffer=$WhichBuffer-1 | ||
| else ;First Buffer, so wrap around to the last | ||
| $WhichBuffer=UBound($WindowList)-1 | ||
| EndIf | ||
| EndSelect | ||
| ;Now do Alt+Numbers | ||
| For $i=1 to 9 step 1 | ||
| If @HotkeyPressed="!"&$i then | ||
| If $i<=UBound($buffers) then | ||
| $WhichBuffer=$i-1 | ||
| else;No buffer with that number | ||
| _WinAPI_MessageBeep(0) | ||
| EndIf | ||
| EndIf | ||
| next | ||
| Speak($WindowList[$WhichBuffer]) | ||
| EndFunc | ||
| Func BufferCopy() | ||
| If ClipPut(($Buffers[$WhichBuffer])[$BufferCursor]) then | ||
| Speak("Copied " & (($Buffers[$WhichBuffer])[$BufferCursor])) | ||
| EndIf | ||
| EndFunc | ||
| Func RegisterBufferKeys($OnOrOff) | ||
| If $OnOrOff=1 then | ||
| HotkeySet("!{down}", "BufferNavigate") | ||
| HotkeySet("!{up}", "BufferNavigate") | ||
| HotkeySet("!{home}", "BufferNavigate") | ||
| HotkeySet("!{end}", "BufferNavigate") | ||
| HotKeySet("!{right}", "BufferSwitch") | ||
| HotKeySet("!{left}", "BufferSwitch") | ||
| For $i=1 to 9 step 1 | ||
| HotKeySet("!"&$i, "BufferSwitch") | ||
| next | ||
| HotKeySet("!c", "BufferCopy") | ||
| return | ||
| else | ||
| HotkeySet("!{down}") | ||
| HotkeySet("!{up}") | ||
| HotkeySet("!{home}") | ||
| HotkeySet("!{end}") | ||
| HotKeySet("!{right}") | ||
| HotKeySet("!{left}") | ||
| For $i=1 to 9 step 1 | ||
| HotKeySet("!"&$i) | ||
| next | ||
|
|
||
| HotKeySet("!c") | ||
| EndIf | ||
| EndFunc | ||
|
|
||
| func IsInGame() | ||
| For $i=0 to UBound($WindowList)-1 step 1 | ||
| If WinGetHandle("[ACTIVE]")=$HandleList[$i][0] then | ||
| Return true | ||
| ExitLoop | ||
| EndIf | ||
| next | ||
| If WinActive("Prompt") then | ||
| return true | ||
| else | ||
| return false | ||
| EndIf | ||
| #include <WinAPI.au3>;used to play default beep | ||
| Dim $Buffers[1];Each element will be a nested array containing all lines of a monitored window, this will be redimmed at initialisation | ||
| $WhichBuffer=0 | ||
| $BufferCursor=0 | ||
| $BufferKeysActive=0 | ||
| Func BufferNavigate() | ||
| If IsArray($Buffers[$WhichBuffer]) then | ||
| select | ||
| case @HotkeyPressed="!{up}" | ||
| If $BufferCursor>0 then | ||
| $BufferCursor=$BufferCursor-1 | ||
| If $bufferCursor>UBound(($Buffers[$WhichBuffer]))-1 then $BufferCursor=UBound(($Buffers[$WhichBuffer]))-1 | ||
| ;Going up in a shrunken buffer while the cursor is out of bounds. | ||
| else | ||
| _WinAPI_MessageBeep(0) | ||
| EndIf | ||
| case @HotkeyPressed="!{down}" | ||
| If $BufferCursor<UBound($Buffers[$WhichBuffer])-1 then | ||
| $bufferCursor=$BufferCursor+1 | ||
| else ;Out of bounds due to reading in a larger buffer before and switching to a smaller one | ||
| _WinAPI_MessageBeep(0) | ||
| $BufferCursor=UBound(($buffers[$WhichBuffer]))-1 | ||
| EndIf | ||
| Case @HotkeyPressed="!{home}" | ||
| $BufferCursor=0 | ||
| Case @HotkeyPressed="!{end}" | ||
| $BufferCursor=UBound($Buffers[$WhichBuffer])-1 | ||
|
|
||
| EndSelect | ||
| If ($Buffers[$WhichBuffer])[$BufferCursor]="" then | ||
| speak("blank") | ||
| else | ||
| speak(($Buffers[$WhichBuffer])[$BufferCursor]) | ||
| EndIf | ||
| else;Buffer is not a nested array which means the buffer is empty | ||
| speak("empty") | ||
| EndIf | ||
| EndFunc | ||
| Func BufferSwitch() | ||
| Select | ||
| Case @HotkeyPressed="!{right}" | ||
| If $WhichBuffer<UBound($WindowList)-1 then | ||
| $WhichBuffer=$WhichBuffer+1 | ||
| else ;Last buffer, so wrap around to the first | ||
| $WhichBuffer=0 | ||
| EndIf | ||
| Case @HotkeyPressed="!{left}" | ||
| If $WhichBuffer>0 then | ||
| $WhichBuffer=$WhichBuffer-1 | ||
| else ;First Buffer, so wrap around to the last | ||
| $WhichBuffer=UBound($WindowList)-1 | ||
| EndIf | ||
| EndSelect | ||
| ;Now do Alt+Numbers | ||
| For $i=1 to 9 step 1 | ||
| If @HotkeyPressed="!"&$i then | ||
| If $i<=UBound($buffers) then | ||
| $WhichBuffer=$i-1 | ||
| else;No buffer with that number | ||
| _WinAPI_MessageBeep(0) | ||
| EndIf | ||
| EndIf | ||
| next | ||
| Speak($WindowList[$WhichBuffer]) | ||
| EndFunc | ||
| Func BufferCopy() | ||
| If ClipPut(($Buffers[$WhichBuffer])[$BufferCursor]) then | ||
| Speak("Copied " & (($Buffers[$WhichBuffer])[$BufferCursor])) | ||
| EndIf | ||
| EndFunc | ||
| Func RegisterBufferKeys($OnOrOff) | ||
| If $OnOrOff=1 then | ||
| HotkeySet("!{down}", "BufferNavigate") | ||
| HotkeySet("!{up}", "BufferNavigate") | ||
| HotkeySet("!{home}", "BufferNavigate") | ||
| HotkeySet("!{end}", "BufferNavigate") | ||
| HotKeySet("!{right}", "BufferSwitch") | ||
| HotKeySet("!{left}", "BufferSwitch") | ||
| For $i=1 to 9 step 1 | ||
| HotKeySet("!"&$i, "BufferSwitch") | ||
| next | ||
| HotKeySet("!c", "BufferCopy") | ||
| return | ||
| else | ||
| HotkeySet("!{down}") | ||
| HotkeySet("!{up}") | ||
| HotkeySet("!{home}") | ||
| HotkeySet("!{end}") | ||
| HotKeySet("!{right}") | ||
| HotKeySet("!{left}") | ||
| For $i=1 to 9 step 1 | ||
| HotKeySet("!"&$i) | ||
| next | ||
|
|
||
| HotKeySet("!c") | ||
| EndIf | ||
| EndFunc | ||
|
|
||
| func IsInGame() | ||
| For $i=0 to UBound($WindowList)-1 step 1 | ||
| If WinGetHandle("[ACTIVE]")=$HandleList[$i][0] then | ||
| Return true | ||
| ExitLoop | ||
| EndIf | ||
| next | ||
| If WinGetHandle("[ACTIVE]")=$STSHandle then | ||
| return true | ||
| EndIf | ||
| If WinActive("Prompt") then | ||
| return true | ||
| else | ||
| return false | ||
| EndIf | ||
| EndFunc |
Oops, something went wrong.