badcoder123

The file that is used when you right-click in Explorer and New > Autoit v3 Script?

That would be C:\Windows\ShellNew\Template.au3

Interesting enough, if you replace the MsgBox with this line then the phenomenon disappear :
RunWait (@AutoItExe & ' /AutoIt3ExecuteLine "MsgBox(4096, ''Hello World!'', ''Hi!'')"')  

EDITED
 
Content of
ExtractDots.au3 #include <Array.au3> #include <CustomMsgBox.au3> #include <FastFind.au3> #include <File.au3> #include <GuiConstants.au3> #include <GUIConstantsEx.au3> #Include <GDIPlus.au3> #Include <WinAPI.au3> Global $hGui, $hgraphic Global $w = 800 Global $h = 600 Global $pos[0] Global $grid[12][2] Global $dotValues[0] Global $colorThreshold = [20000, 25000] Func ExtractDots($imgFile) Do Global $dotValues[0] $tmpFile = PrepareImg($imgFile) Gui($tmpFile) for $i = 0 to 11 FindDot(1, $i) Next for $i = 1 to 6 SetBallot($i) Local $dots[0][2] While 1 $result = FindDot() if $result == false then _ ExitLoop _ArrayAdd($dots, $result[0] & "|" & $result[1]) WEnd DotsToValue($i, $dots) Next $isDone = AdaptColors() Until $isDone _GDIPlus_Shutdown() GUIDelete() DirRemove("tmp", 1) return $dotValues EndFunc Func AdaptColors() $colorReturn = xMsgBox(16+0x200, _ "Adapt Color?", "", _ "Black <", "Done", "> Red", _ Default, $pos[1] + $pos[3] + 5) if $colorReturn = 7 then _ return true $colorIndex = ($colorReturn == 6) _ ? 0 _ : 1 $fuzzReturn = xMsgBox(16+0x200, _ "Adapt Fuzz?", "", _ "Less <", "Done", "> More", _ Default, $pos[1] + $pos[3] + 5) $factor = ($fuzzReturn == 6) _ ? -1 _ : 1 $colorThreshold[$colorIndex] += $factor * 2500 return false EndFunc Func PrepareImg($imgFile) Local $sDrive = "", $sDir = "", $sFileName = "", $sExtension = "" Local $aPathSplit = _PathSplit($imgFile, $sDrive, $sDir, $sFileName, $sExtension) $tmpFile = @ScriptDir & "\tmp\" & $sFileName & $sExtension Local $magickCmds = [ _ "magick convert """ & $imgFile & """ -fuzz " & $colorThreshold[1] & " -fill red -opaque red """ & $tmpFile & """", _ "magick convert """ & $tmpFile & """ -fuzz " & $colorThreshold[0] &" -fill black -opaque black """ & $tmpFile & """" ] DirCreate("tmp") for $cmd in $magickCmds RunWait($cmd, @ScriptDir, @SW_HIDE) Next return $tmpFile EndFunc Func Gui($tmpFile) _GDIPlus_Startup() Global $hGui $hBitmap = _GDIPlus_BitmapCreateFromFile($tmpFile) $hGui = GUICreate("ExtractDots", $w, $h, -1, -1, $WS_POPUP) GUISetState() $pos = WinGetPos("ExtractDots") $hgraphic = _GDIPlus_GraphicsCreateFromHWND($hGui) _GDIPlus_GraphicsDrawImageRect($hgraphic, $hBitmap, 0, 0, $w, $h) _GDIPlus_BitmapDispose($hBitmap) FFSetWnd($hGui) FFSnapShot() EndFunc Func DrawPoint($coords, $colorIndex = 0) Local $colors = [ _ 0xFF0ca2f0, _ 0xFFFFFF00, _ 0xFFFF0000, _ 0xFFFF00cc, _ 0xFF66FF00 _ ] $colorIndex = Mod($colorIndex, UBound($colors)) $color = $colors[$colorIndex] $hBrush = _GDIPlus_BrushCreateSolid($color) _GDIPlus_GraphicsFillEllipse($hgraphic, _ $coords[0] - 5, _ $coords[1] - 5, _ 10, 10, $hBrush) EndFunc Func DotsToValue($ballotIndex, $dots) $corners = GetCorners($ballotIndex) $first = SingleCorner($corners, 0) $second = SingleCorner($corners, 1) $third = SingleCorner($corners, 2) $fourth = SingleCorner($corners, 3) DrawPoint($first) DrawPoint($second) DrawPoint($third) DrawPoint($fourth) Local $values[0] for $i = 0 to UBound($dots) - 1 Local $dot[0] _ArrayAdd($dot, $dots[$i][0] & "|" & $dots[$i][1]) DrawPoint($dot, 1) $xVanishingPoint = GetPOI($first, $third, $second, $fourth) if Not $xVanishingPoint then $vector = VectorCalc($first, '-', $third) $xVanishingPoint = VectorCalc($dot, '+', $vector) EndIf $yVanishingPoint = GetPOI($first, $second, $third, $fourth) if Not $yVanishingPoint then $vector = VectorCalc($first, '-', $second) $yVanishingPoint = VectorCalc($dot, '+', $vector) EndIf $xPOI = GetPOI($first, $second, $dot, $xVanishingPoint) $yPOI = GetPOI($first, $third, $dot, $yVanishingPoint) ;DrawPoint($xPOI, 4) ;DrawPoint($yPOI, 4) $xVector = VectorCalc($xPOI, '-', $first) $yVector = VectorCalc($yPOI, '-', $first) $xLength = VectorCalc($xVector, '|') $top = VectorCalc($second, '-', $first) $topLength = VectorCalc($top, '|') $xPercentage = $xLength / $topLength $xDigit = Round($xPercentage * 11) $yLength = VectorCalc($yVector, '|') $left = VectorCalc($third, '-', $first) $leftLength = VectorCalc($left, '|') $yPercentage = $yLength / $leftLength $yDigit = Round($yPercentage * 11) $value = ($yDigit - 1)*10 + $xDigit _ArrayAdd($values, $value) Next _ArraySort($values) _ArrayAdd($dotValues, _ArrayToString($values, ",")) EndFunc Func GetPOI($startPoint1, $endPoint1, $startPoint2, $endPoint2) $a = $startPoint1[0] $b = $startPoint1[1] $vector1 = VectorCalc($endPoint1, '-', $startPoint1) $c = $vector1[0] $d = $vector1[1] $e = $startPoint2[0] $f = $startPoint2[1] $vector2 = VectorCalc($endPoint2, '-', $startPoint2) $m = $vector2[0] $n = $vector2[1] if $d*$m - $c*$n == 0 then _ return false $s = (-$n*($e - $a) + $m*($f - $b)) / ($d*$m - $c*$n) $x = $a + $s*$c $y = $b + $s*$d Local $result[2] = [$x, $y] return $result EndFunc Func SingleCorner($array, $index) Local $result[2] for $i = 0 to 1 $result[$i] = $array[$index][$i] Next return $result EndFunc Func SetBallot($index) $corners = GetCorners($index) SetArea( _ $corners[0][0], $corners[0][1], _ $corners[3][0], $corners[3][1]) EndFunc Func GetCorners($index) Local $corners[4] $missedSquare = Floor(($index - 1) / 3) $corners[0] = $index - 1 + $missedSquare $corners[1] = $corners[0] + 1 $corners[2] = $index + 3 + $missedSquare $corners[3] = $corners[2] + 1 Local $result[4][2] for $i = 0 to 3 $entryIndex = $corners[$i] $cornerCoordinates = GetGridEntry($entryIndex) for $j = 0 to 1 $result[$i][$j] = $cornerCoordinates[$j] Next Next return $result EndFunc Func SetGridEntry($array, $index) for $i = 0 to 1 $grid[$index][$i] = $array[$i] Next EndFunc Func GetGridEntry($index) Local $array[2] For $i = 0 to 1 $array[$i] = $grid[$index][$i] Next return $array EndFunc Func VectorCalc($par1, $operation, $par2 = 0) switch $operation case '+' Local $result[2] for $i = 0 to 1 $result[$i] = $par1[$i] + $par2[$i] Next case '-' Local $result[2] for $i = 0 to 1 $result[$i] = $par1[$i] - $par2[$i] Next case '*' Local $result[2] for $i = 0 to 1 $result[$i] = $par1 * $par2[$i] Next case '|' Local $result = Sqrt($par1[0]^2 + $par1[1]^2) EndSwitch return $result EndFunc Func SetArea($a = -1, $b = -1, $c = -1, $d = -1) FFResetExcludedAreas() if $a + $b + $c + $c == -4 then _ return ;top FFAddExcludedArea( _ 0, _ 0, _ $w, _ $b) ;left FFAddExcludedArea( _ 0, _ $b, _ $a, _ $d) ;right FFAddExcludedArea( _ $c, _ $b, _ $w, _ $d) ;bottom FFAddExcludedArea( _ 0, _ $d, _ $w, _ $h) EndFunc Func FindDot($isRed = 0, $gridIndex = -1) local $shadeVariation=0 Local $shadeVariationMax = ($isRed) _ ? 250 _ : 60 local $result Local $color = ($isRed) _ ? 0xFFFF0000 _ : 0xFF000000 if $isRed then $horizontalFactor = Mod($gridIndex, 4) $firstX = $horizontalFactor * $w/4 $secondX = $firstX + $w/4 $verticalFactor = Floor($gridIndex/4) $firstY = $verticalFactor * $h/3 $secondY = $firstY + $h/3 SetArea($firstX, $firstY, $secondX, $secondY) EndIf do $result = FFNearestSpot(20, 50, 0, 0, $color, $shadeVariation, 0) if (Not IsArray($result)) Then _ $shadeVariation += 5 until (IsArray($result) OR $shadeVariation > $shadeVariationMax) if Not IsArray($result) then _ return false if $isRed then SetGridEntry($result, $gridIndex) Else FFAddExcludedArea( _ $result[0] - 20, _ $result[1] - 20, _ $result[0] + 20, _ $result[1] + 20) EndIf return _ArrayExtract($result, 0, 1) EndFunc Can be called from another project like this:
 
#include <ExtractDots.au3> Local $files = [ _ "example3.jpg", _ "example5.jpg", _ "example9.jpg" ] Local $votes[0] for $file in $files $values = ExtractDots($file) _ArrayAdd($votes, $values) Next _ArrayDisplay($votes)  
Depending on the brightness, saturation, and illumination of the image, individual points may not or too many may be detected.
Therefore, using ImageMagick (must be installed), each image is edited to highlight red and black.
Each image is followed by a query that allows you to adjust the two colors.
Here are some files to try out.

ExtractDots.zip

 

Yes Sir.
Use Shift-Alt-s on this example.
; Modified version of "Shake Window" by Death Pax <[email protected]> from ; https://www.autoitscript.com/forum/topic/22277-new-scrap-shake-window/ ; Press Shift-Alt-a keys together and current window with focus will shake up and down. ; Press Shift-Alt-s keys together and current window with focus will shake circular. HotKeySet("{ESC}", "Terminate") HotKeySet("+!a", "_ShakeWindow") ; Shift-Alt-a HotKeySet("+!s", "_ShakeWindow2") ; Shift-Alt-s While Sleep(100) WEnd Func _ShakeWindow() Local $Window = WinGetTitle("", ""), $ShakeAmount = 5, $Win_pos = WinGetPos($Window) For $i = 0 To 100 WinMove($Window, "", $Win_pos[0], $Win_pos[1] + $ShakeAmount * Mod($i, 2)) Sleep(40) Next EndFunc ;==>_ShakeWindow Func _ShakeWindow2() Local $Window = WinGetTitle("", ""), $R = 50, $Win_pos = WinGetPos($Window), $pi = 4 * ATan(1) Local $Win_pos = WinGetPos($Window), $centerX = $Win_pos[0], $centerY = $Win_pos[1] For $i = 0 To 20 * $pi Step $pi / 8 WinMove($Window, "", $centerX + ($R * Cos($i)), $centerY + ($R * Sin($i))) Sleep(10) Next WinMove($Window, "", $centerX, $centerY) EndFunc ;==>_ShakeWindow2 Func Terminate() Exit EndFunc ;==>Terminate  

Look at function ControlGetHandle()

Typically starting a PM with "Fuck off Mother Fucker" is not the best way to plead your case...

The GUI looks like shown in the picture:

It contains a main menu, a treeview in left pane that lists UI Automation elements, a listview in right pane that displays detail information for the selected element, and a splitterbar to adjust the width of the two panes.
 
Detect element
The "Detect element" main menu is used to detect elements under the mouse with function keys F1 - F4.
See How to topics number 2.
 
Left pane
The left pane is a treeview that initially lists open programs and windows. Generally, the left pane shows UI Automation elements represented as treeview items.
 
Right pane
The right pane is a listview that displays detail information for the selected treeview element. The information is grouped into different types of information. Only the relevant information for each type is displayed.
 
Invalid elements
When a window is closed the elements in UIASpy becomes invalid. But the elements are not deleted in UIASpy and can still be handled and selected in the treeview. Detail information for an element that was calculated before the window was closed can still be seen in the listview.
In this way it's possible for UIASpy to show information for eg. a context menu that is closed as soon as it loses focus.
 
Listview features
Listview features
 
Help system
With completion of the Help system, a lot of information has been moved from this post and other posts into the Help system.
 
Sample code creation
Sample code creation is implemented through the UI element Detail info listview page and through the Sample code main menu.
Sample code creates code snippets based on data in one or more selected rows in the Detail info listview page or based on the clicked Sample code menu item.
UI Automation code is largely based on COM interface objects and thus on the function ObjCreateInterface(), which is one of the advanced functions in AutoIt.
The main purpose of Sample code functionality is to eliminate the complexity of ObjCreateInterface(). Sample code creation either through the Detail info listview page or through the Sample code main menu can create all the interface objects required in UI Automation code.
Another purpose is of course to make it easier and faster to implement code for simple automation tasks. Through Sample code creation, you can more or less create all code in a simple automation task:
Create UI Automation initial code Create condition and find application window Create condition and find control in window Get information about windows and controls Create pattern objects to perform actions Get information related to pattern objects Perform actions with pattern object methods Add a Sleep() statement if necessary Note that the UI element used in sample code is named after the selected element in the treeview.
Also note that both the Sample code menu items and the sections in the Detail info listview page are placed in approximately the order they are used in a simple automation task.
Sample code creation through Detail info listview page
Sample code creation through Sample code main menu
 
Supported applications
Most browsers including Google Chrome To be able to spy on web content in Google Chrome it's necessary to enable accessibility by entering chrome://accessibility/ in the address bar of a new tab item, and then check the five check boxes that are located in a column in upper left corner down along the left edge. Then the accessibility tab can be closed again. It's a global setting that applies to all open and new tabs until Chrome is closed.
Without accessibility enabled you are only able to investigate the outer elements of Chrome but not web content. Internet Explorer Microsoft Edge Mozilla Firefox Most Microsoft applications and applications developed with Microsoft software including Classic Windows applications based on the standard control library Modern Universal Windows Platform apps like the Windows 10 Calculator Programs implemented through .NET Framework eg. Windows Forms applications Most applications provided by major development companies  
Automation issues
Automation issues
 
How to topics
If UI Automation or the UIASpy tool is new to you, then you should read the How to topics.
 
Examples
Examples that demonstrates the features of UIASpy:
Automating Notepad. Very detailed example. Automating Notepad - Windows XP Examples about Sample code creation:
Automating Notepad with Sample code - step by step Automating Notepad with Sample code - all at once Chrome - Clicking an extension. Compact summary example. Click Save As... issue in Notepad examples:
Using Expand() instead of Invoke()  
Updates
Windows 8, Windows 8.1 and Windows 10 updates
 
Threads
UI Automation UDFs contains all include files. In Using UI Automation Code in AutoIt you can find and download examples and read information about using UIA code. UI Automation Events is about implementing event handlers and includes GUIs to detect events. IUIAutomation MS framework automate chrome, FF, IE, .... created by junkew August 2013 is the first AutoIt thread on UIA code.  
Zip-file
The zip contains source files for UIASpy GUI.
Note that UI Automation UDFs must be installed in the Includes folder.
You need AutoIt 3.3.12 or later. Tested on Windows XP, Windows 7 and Windows 10.
Comments are welcome. Let me know if there are any issues.
UIASpy.7z

After a lot of reading, it came down to the Z-Order being reset every time a topmost window is selected.
So, I just needed to run the WinSetOnTop() function for my splashtext every time I update the text.
 
;Create the progress screen $aPOS = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:MSTaskListWClass; INSTANCE:1]") if @error Then MsgBox(0, "Error", "Unable to find System Tray to build the progress screen") Exit EndIf $sMessage = "StatusBar - Starting..." SplashTextOn("SysTrayStatus", $sMessage, 340, 25, ($aPOS[0] + $aPOS[2]) - 350, @DesktopHeight - $aPOS[3] + Round(($aPOS[3] - 25) / 2, 2), 37, "Ariel", 8) WinSetOnTop("SysTrayStatus", "", 1) ;Set this as one of the Topmost windows ConsoleWrite("Initial State = " & WinGetState("SysTrayStatus", "") & @CRLF) ;initial is 3 ;Loop for 30 seconds, updating the text every 1 second For $i = 1 to 30 sleep(900) ControlSetText("SysTrayStatus", "", "Static1", "Running loop " & $i & " of 30") ConsoleWrite($i & " State = " & WinGetState("SysTrayStatus", "") & @CRLF) ;always = 3 WinSetOnTop("SysTrayStatus", "", 1) ;reset this to the top Z-Order of Topmost windows in case someone clicks the taskbar Next  

What's your problem? We need example code and what your intentions are.

Do you have a question?

based on the link a small example making red rect area (actually the hwnd with custom rect) around the notepad editable area
Hard to close the window in itself use alt+f4 or just close notepad and example will break ;-)  
#include <GuiConstants.au3> #include <guiconstantsex.au3> #include <winapi.au3> Run("notepad.exe") ; Wait 10 seconds for the Notepad window to appear. $hWnd = WinWait("[CLASS:Notepad]", "", 10) ; Retrieve the position as well as height and width of the active window. Local $aPos = WinGetPos($hWnd) ; Display the array values returned by WinGetPos. ;~ MsgBox($MB_SYSTEMMODAL, "", "X-Pos: " & $aPos[0] & @CRLF & _ ;~ "Y-Pos: " & $aPos[1] & @CRLF & _ ;~ "Width: " & $aPos[2] & @CRLF & _ ;~ "Height: " & $aPos[3]) $gW=$aPos[2] - 8 $gH=$aPos[3] - 40 $gX=$aPos[0] + 4 $gY=$aPos[1] + 48 $hGUI = GUICreate("Test", $gW, $gH, $gX, $gY , BitOr($WS_POPUP,$WS_DLGFRAME)) ;~ $hGUI = GUICreate("Test", $gW, $gH, $gX, $gY ) GUISetBkColor(0xFF0000) GUISetState() While 1 If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit ; Retrieve the position as well as height and width of the active window. $aPos = WinGetPos($hWnd) ;~ winsetontop($hgui,"",$WINDOWS_NOONTOP) $gW=$aPos[2] - 8 $gH=$aPos[3] - 60 $gX=$aPos[0] + 4 $gY=$aPos[1] + 48 _GUICreateInvRect($hGUI, 4, 4, $gW-8, $gH-8) winmove($hGui,"",$gX,$gY, $gW, $gH) winsetontop($hgui,"",$WINDOWS_ONTOP) sleep(100) Wend Func _GUICreateInvRect($hWnd, $iX, $iY, $iW, $iH) $aPos = WinGetPos($hWnd) Local $hMask_1 = _WinAPI_CreateRectRgn(0, 0, $aPos[2], $iY) Local $hMask_2 = _WinAPI_CreateRectRgn(0, 0, $iX, $aPos[3]) Local $hMask_3 = _WinAPI_CreateRectRgn($iX + $iW, 0, $aPos[2], $aPos[3]) Local $hMask_4 = _WinAPI_CreateRectRgn(0, $iY + $iH, $aPos[2], $aPos[3]) _WinAPI_CombineRgn($hMask_1, $hMask_1, $hMask_2, 2) _WinAPI_CombineRgn($hMask_1, $hMask_1, $hMask_3, 2) _WinAPI_CombineRgn($hMask_1, $hMask_1, $hMask_4, 2) _WinAPI_DeleteObject($hMask_2) _WinAPI_DeleteObject($hMask_3) _WinAPI_DeleteObject($hMask_4) _WinAPI_SetWindowRgn($hWnd, $hMask_1, 1) EndFunc  

search for setwindowrgn and you will get examples on non rectangular windows. I assume you then can make forms with holes in it
 
 

I don't have a laptop but... I brought up "Power Buttons" (Control Panel\Hardware and Sound\Power Options\System Settings)  and it looks like there is a control for it
Bring up the AutoIt info on the button and you should see something similar to the attached file
Then look at the Control functions at https://www.autoitscript.com/autoit3/docs/intro/controls.htm
 
Attachment 1.

@caramen
Did you try WinSetState()?
I just tried to minimize osk.exe, and I got 23 as WinGetState() result

ExitLoop  

I have no idea on how to use any of that but I think this is what you're looking for?
$input = InputBox("Key", "Enter the numeric key.") Run(@ComSpec & " /c " & 'putty -i key.ppk -R ' & $input & ':localhost:22 [email protected] -pw testing123', "", @SW_SHOW) ;Change flag to @SW_HIDE  

Regular expressions do exactly this 
Example :
$str = "What I need to have happen is to then to go back ... and extract the number 75,689 that is listed in each string." $nbr = StringRegExp($str, '\d+(?:,\d+)?', 1) If IsArray($nbr) Then Msgbox(0,"", $nbr[0]) This code can be adapted so you might provide sample strings

there are soooo many ways to do this.  Understanding why mikell is right is a greater goal than just using his correct solutions.
#include<array.au3> $str = "What I need to have happen is to then to go back ... and extract the number 75,689 that is listed in each string." msgbox(0, '' , StringStripWS(_ArrayToString(stringsplit($str , "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ." , 2), ""), 3))  

Perfect, so it's a table that has lots of data...use this one:
_IETableWriteToArray Look at the helpfile, try to get it working, and then you can loop through the returned array, and grab your data.
Helpfile example:
; Open a browser with the table example, get a reference to the first table ; on the page (index 0) and read its contents into a 2-D array #include <Array.au3> #include <IE.au3> Local $oIE = _IE_Example("table") Local $oTable = _IETableGetCollection($oIE, 0) Local $aTableData = _IETableWriteToArray($oTable) _ArrayDisplay($aTableData) _IEQuit($oIE) Example of looping through all the tables:
#include <Array.au3> #include <IE.au3> $oIE = _IECreate("https://eggpool.net/index.php?miner=55713816bf48b85cc1b03db521c0142f99402925d05e726b476a67a4&action=miner&submit=Show") $oTables = _IETableGetCollection($oIE) For $oTable In $oTables $aTableData = _IETableWriteToArray($oTable) _ArrayDisplay($aTableData) Next  

ConsoleWrite(_GifAnimated(@ScriptDir & "\filename.gif") & @CRLF) Func _GifAnimated($_sGifFileName) If FileExists($_sGifFileName) = 0 Then Return False Local $objImage = ObjCreate("WIA.ImageFile") $objImage.LoadFile($_sGifFileName) Return $objImage.IsAnimated EndFunc  

Also
Run("C:\WINDOWS\system32\rundll32.exe shell32.dll,#61")  

@badcoder123 Nice! Should be more universal than my solution

Also
Run("C:\WINDOWS\system32\rundll32.exe shell32.dll,#61")  

Renderer,
See _arraypermute in the help file...
kylomas