#include <GDIPlus.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Include <WinAPI.au3>
HotKeySet("{esc}", "_EXIT")
$hGUI=WinGetHandle("My GUI", "")
$i=50 ;кол-во столбцов
$j=50 ;кол-во строк
$hGUI = GUICreate("My GUI",500,500,-1,-1,$WS_POPUP,$WS_EX_LAYERED)
GUISetBkColor(0xABCDEF)
_WinAPI_SetLayeredWindowAttributes($hGUI, 0xABCDEF, 255)
WinSetOnTop($hGUI, "", 1)
GUISetState()
_GDIPlus_Startup ()
$hGraphic = _GDIPlus_GraphicsCreateFromHWND ($hGUI)
$hPen = _GDIPlus_PenCreate(0xFFFFFFFF, 1); второй параметр - толщина линий
While 1
For $n = 1 To $j
_GDIPlus_GraphicsDrawLine ($hGraphic, 0, (0+@DesktopHeight/($j))*$n,@DesktopWidth, (0+@DesktopHeight/($j))*$n, $hPen)
Next
For $s = 1 To $i
_GDIPlus_GraphicsDrawLine ($hGraphic, (0+@DesktopWidth/($i))*$s, 0,(0+@DesktopWidth/($i))*$s, @DesktopHeight, $hPen)
Next
sleep(50)
WEnd
Func _EXIT()
_WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_INVALIDATE + $RDW_ALLCHILDREN)
_GDIPlus_GraphicsDispose($hGraphic)
_GDIPlus_PenDispose($hPen)
_GDIPlus_ShutDown ()
Exit
EndFunc