Leaderboard

HMW - Hide my Windows Current Version: v4 (2024-Oct-18) HMW is a free program to stash away the Windows on your desktop. With HMW you can set any program Window as hidden, while the program itself will run silently in the background. Additionally all the Hotkeys used can be customized to your needs. [*] With HMW you can improve your “Visual Privacy”. No-one looking at your desktop will see instantly what programs you’re running anymore. [*] You can hide away programs which have long processing runs, cluttering your desktop and impairing the overall usability. [*] HMW is fully portable, the settings are stored in a "hmw.ini" file created in the scriptdir. It works fine on my XP-32bit, Win7-64bit, Win8(.1)-64bit and Win10 machines. If you find bugs please let me know. The source and executable can be downloaded from my site: https://funk.eu Kudos to Ascend4nt, Prog@ndy, UEZ, Yashied, Tuape & wraithdu for parts of the code. Please let me know if you found some piece of code in the source for which I forgot to mention a credit. Enjoy, let me know what you think of HMW and with Best Regards

Permanent block. Really don't feel like dealing with the user further.

May try using the ASCII Character code for # Chr(35)

Yes that's it. Anyone noticed that this is possible now: $i64bitNum = 0xFFFFFFFFFFFFFFFF ConsoleWrite($i64bitNum & @CRLF) I'm saying that because functions for bitwise operations should follow the changes with special care for backward compatibility. That said, functions that could be problematic are BitShift() and BitRotate(). wraithdu you had a stub or two into bitwise operations. Any thoughts on this? Or anyone else maybe? What are the expectations?

Here is another script I made using this GUI frame, it's a childish little thing I made for teh lulz. I was motivated to create this after reading an email from Google concerning a new privacy policy change and got the idea of creating a sort of rouge Googlebot that pops up after blurring out your screen and continues to chant things in a robotic voice concerning a user agreement violation and dispatching a googlebot to your location, you can exit the script by pressing escape. #NoTrayIcon #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=G.ico #AutoIt3Wrapper_Outfile=.Google.exe #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_UseUpx=n #AutoIt3Wrapper_Res_Description=Rouge GoogleBot #AutoIt3Wrapper_Res_Fileversion=1.0.0.38 #AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y #AutoIt3Wrapper_Res_LegalCopyright=Nobody #AutoIt3Wrapper_Res_Language=1033 #AutoIt3Wrapper_Res_File_Add=sound.wav,10,SND #AutoIt3Wrapper_Res_File_Add=.chrome.png,10,IMG #AutoIt3Wrapper_AU3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 #AutoIt3Wrapper_Run_Obfuscator=y #Obfuscator_Parameters=/so #AutoIt3Wrapper_Run_After=del /f /q "%scriptdir%%scriptfile%_Obfuscated.au3" #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #Include <WindowsConstants.au3> #include <ScreenCapture.au3> #include <WinAPI.au3> #include <GDIPlus.au3> HotKeySet("{ESC}","close") Global $Img = @TempDir & "chrome.png" Global $Snd = @TempDir & "sound.wav" Global $aM_Mask, $GUI, $CHROME Global $IMAGE_BITMAP = 0 Global $STM_SETIMAGE = 0x0172 Global $DType, $DType2 If Random(1,2,1) = 2 Then $DType = 45 Else $DType = 15 EndIf If Random(1,2,1) = 2 Then $DType2 = 45 Else $DType2 = 15 EndIf Switch Random(0,1,1) Case 0 Init() Case 1 Init2() EndSwitch Func Init() _GDIPlus_Startup() Local $o, $rangle, _ $cx = 600, $cy = 400, $wrad = 250 Local $hBitmap1 = _ScreenCapture_Capture("",0,0,-1,-1,False) Local $hBitmap = _GDIPlus_BitmapCreateFromHBITMAP($hBitmap1) ;convert to GDI+ bitmap _WinAPI_DeleteObject($hBitmap1) ;delete image object because not needed anymore Local $hBitmap_Blur = _GDIPlus_ImageBlur($hBitmap, 15) _GDIPlus_BitmapDispose($hBitmap) ;dispose bitmap because not needed anymore Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap_Blur) ;convert GDI+ bitmap to WinAPI bitmap (reuse of same variable) _GDIPlus_BitmapDispose($hBitmap_Blur) ;dispose bitmap because not needed anymore $GUI = GUICreate('MyGUI', @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP,'',GUICreate("ghost")) Local $CTRL = GUICtrlCreatePic('', 0, 0, @DesktopWidth, @DesktopHeight) _WinAPI_DeleteObject(GUICtrlSendMsg($CTRL, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBITMAP)) WinSetTrans($GUI,'',1) GUISetState() For $I = 0 to 255 Step 5 Sleep(200) WinSetTrans($GUI,'',$I) Next Local $CHROME = GUICreate("Test", 300, 300, $cx - 150, $cy - 150 - $wrad,$WS_POPUP,$WS_EX_TOPMOST,GUICreate("ghost")) GUISetBkColor(0x000000,$CHROME) GUISetState() Local $graphics = _GDIPlus_GraphicsCreateFromHWND($CHROME) Local $bitmap = _GDIPlus_BitmapCreateFromGraphics(300, 300, $graphics) Local $backbuffer = _GDIPlus_ImageGetGraphicsContext($bitmap) If @Compiled Then $o = FileOpen($Img,2) FileWrite($o,_ResourceGetAsRaw(10, "IMG", 0, @ScriptFullPath,1)) FileClose($o) $o = FileOpen($Snd,2) FileWrite($o,_ResourceGetAsRaw(10, "SND", 0, @ScriptFullPath,1)) FileClose($o) Else $Img = @ScriptDir & "chrome.png" $Snd = @ScriptDir & "sound.wav" EndIf Local $image = _GDIPlus_ImageLoadFromFile($Img) Local $matrix = _GDIPlus_MatrixCreate() _GDIPlus_MatrixTranslate($matrix, 150, 150);True) AdlibRegister("close",27800) SoundPlay($Snd,0) setTrans($CHROME) $rangle = 0 Local $Speed = 25, _ $Up = False Do If $Up Then $Speed = 1 $rangle += 0.70 If $rangle > 360 Then $rangle -= 360 WinMove($CHROME, "", $cx + $wrad * Sin($rangle * ATan(1) / $DType) - 150, $cy - $wrad * Cos($rangle * ATan(1) / $DType2) - 150) Else $Speed -= 0.27 If $Speed < 0 Then $Up = True EndIf _GDIPlus_GraphicsClear($backbuffer, 0xff000000) _GDIPlus_MatrixRotate($matrix, $Speed) _GDIPlus_GraphicsSetTransform($backbuffer, $matrix) _GDIPlus_GraphicsDrawImageRect($backbuffer, $image, -150, -150, 300, 300);-150,-150) _GDIPlus_GraphicsDrawImageRect($graphics, $bitmap, -13, -15, 335, 335) Sleep(20) Until 0 Return EndFunc Func Init2() _GDIPlus_Startup() Local $o, $rangle, _ $cx = 600, $cy = 400, $wrad = 250 Local $hBitmap1 = _ScreenCapture_Capture("",0,0,-1,-1,False) Local $hBitmap = _GDIPlus_BitmapCreateFromHBITMAP($hBitmap1) ;convert to GDI+ bitmap _WinAPI_DeleteObject($hBitmap1) ;delete image object because not needed anymore Local $hBitmap_Blur = _GDIPlus_ImageBlur($hBitmap, 15) _GDIPlus_BitmapDispose($hBitmap) ;dispose bitmap because not needed anymore Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBitmap_Blur) ;convert GDI+ bitmap to WinAPI bitmap (reuse of same variable) _GDIPlus_BitmapDispose($hBitmap_Blur) ;dispose bitmap because not needed anymore $GUI = GUICreate('MyGUI', @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP,'',GUICreate("ghost")) Local $CTRL = GUICtrlCreatePic('', 0, 0, @DesktopWidth, @DesktopHeight) _WinAPI_DeleteObject(GUICtrlSendMsg($CTRL, $STM_SETIMAGE, $IMAGE_BITMAP, $hHBITMAP)) WinSetTrans($GUI,'',1) GUISetState() For $I = 0 to 255 Step 5 Sleep(200) WinSetTrans($GUI,'',$I) Next $CHROME = GUICreate("Test", 300, 300, $cx - 150, $cy - 150 - $wrad,$WS_POPUP,$WS_EX_TOPMOST,GUICreate("ghost")) GUISetBkColor(0x000000,$CHROME) GUISetState() _GDIPlus_Startup() Local $graphics = _GDIPlus_GraphicsCreateFromHWND($CHROME) Local $bitmap = _GDIPlus_BitmapCreateFromGraphics(300, 300, $graphics) Local $backbuffer = _GDIPlus_ImageGetGraphicsContext($bitmap) If @Compiled Then $o = FileOpen($Img,2) FileWrite($o,_ResourceGetAsRaw(10, "IMG", 0, @ScriptFullPath,1)) FileClose($o) $o = FileOpen($Snd,2) FileWrite($o,_ResourceGetAsRaw(10, "SND", 0, @ScriptFullPath,1)) FileClose($o) Else $Img = @ScriptDir & "chrome.png" $Snd = @ScriptDir & "sound.wav" EndIf Local $image = _GDIPlus_ImageLoadFromFile($Img) Local $matrix = _GDIPlus_MatrixCreate() _GDIPlus_MatrixTranslate($matrix, 150, 150);True) AdlibRegister("close",27800) SoundPlay($Snd,0) setTrans($CHROME) $rangle = 0 Local $Speed = 1, _ $Up = False Do If $Up Then $Speed += 0.15 If $Speed > 10 Then $Up = False Else $Speed -= 0.15 If $Speed < -10 Then $Up = True EndIf _GDIPlus_GraphicsClear($backbuffer, 0xff000000) _GDIPlus_MatrixRotate($matrix, $Speed) _GDIPlus_GraphicsSetTransform($backbuffer, $matrix) _GDIPlus_GraphicsDrawImageRect($backbuffer, $image, -150, -150, 300, 300);-150,-150) _GDIPlus_GraphicsDrawImageRect($graphics, $bitmap, -13, -15, 335, 335) $rangle += 0.70 If $rangle > 360 Then $rangle -= 360 WinMove($CHROME, "", $cx + $wrad * Sin($rangle * ATan(1) / $DType) - 150, $cy - $wrad * Cos($rangle * ATan(1) / $DType2) - 150) Sleep(20) Until 0 Return close() EndFunc Func close() SoundPlay("",0) GUIDelete($CHROME) Local $I = 255 While $I > 10 $I -= 5 Sleep(200) WinSetTrans($GUI,'',$I) WEnd _GDIPlus_Shutdown() If @Compiled Then FileDelete($Snd) If @Compiled Then FileDelete($Img); For some reason this one is never deleted :/ Exit EndFunc ;==>close Func setTrans($hW) Local $x, $Startx, $Endx $aM_Mask = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", 0, "long", 0, "long", 460, "long", 460) For $y = 0 To 300 $x = Abs((150 * 150 - (150 - $y) * (150 - $y)) ^ 0.5) $Startx = 150 + $x $Endx = 300 addRegion($Startx, $y, $Endx, $y) $Startx = 0 $Endx = 150 - $x addRegion($Startx, $y, $Endx, $y) Next DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $hW, "long", $aM_Mask[0], "int", 1) EndFunc ;==>setTrans Func addRegion($a, $b, $c, $d) Local $aMask = DllCall("gdi32.dll", "long", "CreateRectRgn", "long", $a, "long", $b, "long", $c + 1, "long", $d + 1) DllCall("gdi32.dll", "long", "CombineRgn", "long", $aM_Mask[0], "long", $aMask[0], "long", $aM_Mask[0], "int", 3) EndFunc ;==>addRegion Func _GDIPlus_ImageBlur($hBitmap, $iStrenght = 3, $i_WinAPIBMP = False) If $iStrenght <= 1 Then $iStrenght = 1.01 $iStrenght = 1/$iStrenght Local $hGraphics = _GDIPlus_GraphicsCreateFromHWND(_WinAPI_GetDesktopWindow()), _ $hBitmapWidth = _GDIPlus_ImageGetWidth($hBitmap), _ $hBitmapHeight = _GDIPlus_ImageGetHeight($hBitmap) Local $hBmpSmall = _GDIPlus_BitmapCreateFromGraphics($hBitmapWidth, $hBitmapHeight, $hGraphics) Local $hGfxSmall = _GDIPlus_ImageGetGraphicsContext($hBmpSmall) DllCall($ghGDIPDll, "uint", "GdipSetPixelOffsetMode", "hwnd", $hGfxSmall, "int", 2) Local $hBmpBig = _GDIPlus_BitmapCreateFromGraphics($hBitmapWidth, $hBitmapHeight, $hGraphics) Local $hGfxBig = _GDIPlus_ImageGetGraphicsContext($hBmpBig) DllCall($ghGDIPDll, "uint", "GdipSetSmoothingMode", "hwnd", $hGfxBig, "int", 7) DllCall($ghGDIPDll, "uint", "GdipSetSmoothingMode", "hwnd", $hGfxSmall, "int", 7) DllCall($ghGDIPDll, "uint", "GdipSetPixelOffsetMode", "hwnd", $hGfxBig, "int", 2) DllCall($ghGDIPDll, "uint", "GdipScaleWorldTransform", "hwnd", $hGfxSmall, "float", $iStrenght, "float", $iStrenght, "int", 0) DllCall($ghGDIPDll, "uint", "GdipSetInterpolationMode", "hwnd", $hGfxSmall, "int", 7) DllCall($ghGDIPDll, "uint", "GdipScaleWorldTransform", "hwnd", $hGfxBig, "float", 1 / $iStrenght, "float", 1 / $iStrenght, "int", 0) DllCall($ghGDIPDll, "uint", "GdipSetInterpolationMode", "hwnd", $hGfxBig, "int", 7) _GDIPlus_GraphicsDrawImageRect($hGfxSmall, $hBitmap, 0, 0, $hBitmapWidth, $hBitmapHeight) _GDIPlus_GraphicsDrawImageRect($hGfxBig, $hBmpSmall, 0, 0, $hBitmapWidth, $hBitmapHeight) _GDIPlus_GraphicsDispose($hGraphics) _GDIPlus_BitmapDispose($hBmpSmall) _GDIPlus_GraphicsDispose($hGfxSmall) _GDIPlus_GraphicsDispose($hGfxBig) If $i_WinAPIBMP = True Then Local $hHBITMAP = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hBmpBig) ;convert GDI+ bitmap to WinAPI hbitmap _GDIPlus_BitmapDispose($hBmpBig) Return $hHBITMAP Else Return $hBmpBig EndIf EndFunc ;==>_GDIPlus_ImageBlur Func _ResourceGetAsRaw($iResType, $iResName, $iResLang, $sModule, $iMode = 0, $iSize = 0) Local $iLoaded Local $a_hCall = DllCall("kernel32.dll", "hwnd", "GetModuleHandleW", "wstr", $sModule) If @error Then Return SetError(1, 0, "") EndIf If Not $a_hCall[0] Then $a_hCall = DllCall("kernel32.dll", "hwnd", "LoadLibraryExW", "wstr", $sModule, "hwnd", 0, "int", 34) If @error Or Not $a_hCall[0] Then Return SetError(2, 0, "") EndIf $iLoaded = 1 EndIf Local $hModule = $a_hCall[0] Switch IsNumber($iResType) + 2 * IsNumber($iResName) Case 0 $a_hCall = DllCall("kernel32.dll", "hwnd", "FindResourceExW", _ "hwnd", $hModule, _ "wstr", $iResType, _ "wstr", $iResName, _ "int", $iResLang) Case 1 $a_hCall = DllCall("kernel32.dll", "hwnd", "FindResourceExW", _ "hwnd", $hModule, _ "int", $iResType, _ "wstr", $iResName, _ "int", $iResLang) Case 2 $a_hCall = DllCall("kernel32.dll", "hwnd", "FindResourceExW", _ "hwnd", $hModule, _ "wstr", $iResType, _ "int", $iResName, _ "int", $iResLang) Case 3 $a_hCall = DllCall("kernel32.dll", "hwnd", "FindResourceExW", _ "hwnd", $hModule, _ "int", $iResType, _ "int", $iResName, _ "int", $iResLang) EndSwitch If @error Or Not $a_hCall[0] Then If $iLoaded Then Local $a_iCall = DllCall("kernel32.dll", "int", "FreeLibrary", "hwnd", $hModule) If @error Or Not $a_iCall[0] Then Return SetError(7, 0, "") EndIf EndIf Return SetError(3, 0, "") EndIf Local $hResource = $a_hCall[0] $a_iCall = DllCall("kernel32.dll", "int", "SizeofResource", "hwnd", $hModule, "hwnd", $hResource) If @error Or Not $a_iCall[0] Then If $iLoaded Then $a_iCall = DllCall("kernel32.dll", "int", "FreeLibrary", "hwnd", $hModule) If @error Or Not $a_iCall[0] Then Return SetError(7, 0, "") EndIf EndIf Return SetError(4, 0, "") EndIf Local $iSizeOfResource = $a_iCall[0] $a_hCall = DllCall("kernel32.dll", "hwnd", "LoadResource", "hwnd", $hModule, "hwnd", $hResource) If @error Or Not $a_hCall[0] Then If $iLoaded Then $a_iCall = DllCall("kernel32.dll", "int", "FreeLibrary", "hwnd", $hModule) If @error Or Not $a_iCall[0] Then Return SetError(7, 0, "") EndIf EndIf Return SetError(5, 0, "") EndIf Local $a_pCall = DllCall("kernel32.dll", "ptr", "LockResource", "hwnd", $a_hCall[0]) If @error Or Not $a_pCall[0] Then If $iLoaded Then $a_iCall = DllCall("kernel32.dll", "int", "FreeLibrary", "hwnd", $hModule) If @error Or Not $a_iCall[0] Then Return SetError(7, 0, "") EndIf EndIf Return SetError(6, 0, "") EndIf Local $tOut Switch $iMode Case 0 $tOut = DllStructCreate("char[" & $iSizeOfResource + 1 & "]", $a_pCall[0]) Case 1 $tOut = DllStructCreate("byte[" & $iSizeOfResource & "]", $a_pCall[0]) EndSwitch Local $sReturnData = DllStructGetData($tOut, 1) If $iLoaded Then $a_iCall = DllCall("kernel32.dll", "int", "FreeLibrary", "hwnd", $hModule) If @error Or Not $a_iCall[0] Then Return SetError(7, 0, "") EndIf EndIf Switch $iSize Case 0 Return SetError(0, 0, $sReturnData) Case Else Switch $iMode Case 0 Return SetError(0, 0, StringLeft($sReturnData, $iSize)) Case 1 Return SetError(0, 0, BinaryMid($sReturnData, 1, $iSize)) EndSwitch EndSwitch EndFunc ;==>_ResourceGetAsRaw Rouge Googlebot.htm