#include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
   
    Global  $title , $hGUi 
    $title="Fade in/out" 
    $author="freeze_love" 
    $main=GUICreate ($title , @DesktopWidth +50 , @DesktopHeight +100 , -1 , -1 , $WS_POPUP)
   
    GUISetBkColor (0x0E6D38) 
    WinSetTrans ($title ,"" ,0)
    sleep (15)
    GUISetState (@SW_SHOW ,$title)
    For  $a=0 To  250 Step  +0.05 
      WinSetTrans ($title ,"" ,$a)
      Sleep (0.5)
    Next 
    GUISetState () 
   
    While  1 
    WinSetOnTop ($title , "" , 1)
    $msg=GUIGetMsg () 
      If  $msg=$GUI_EVENT_CLOSE Then 
      For  $a=250 To  0 Step  -0.02 
        WinSetTrans ($title ,"" ,$a)
        Sleep (0.5)
      Next 
      ExitLoop 
      EndIf 
    WEnd 
   
   

#Include<WindowsConstants.au3>
    #include <ScreenCapture.au3>
    #include <WinAPI.au3>
    #include <GDIPlus.au3>
   
    HotKeySet ("{ESC}" ,"close")
   
   
    Global  $aM_Mask , $GUI 
    Global  $IMAGE_BITMAP=0 
    Global  $STM_SETIMAGE=0x0172
   
            Init() 
   
   
    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 
   
        while  1 
            wend 
   
   
        Return  close() 
    EndFunc 
   
   
   
    Func  close() 
        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  _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