Console: Расчет координат и размеров консольного окна

#Include <WinAPIEx.au3>

$hForm = GUICreate('MyGUI')
GUISetState()

$tRect = _WinAPI_GetWorkArea()
$iX = DllStructGetData($tRect, 1) + 10
$iY = DllStructGetData($tRect, 2) + 10
$iWidth = DllStructGetData($tRect, 3) - DllStructGetData($tRect, 1) - 20
$iHeight = DllStructGetData($tRect, 4) - DllStructGetData($tRect, 2) - 20
WinMove($hForm, '', $iX, $iY, $iWidth, $iHeight)

Do
Until GUIGetMsg() = -3

; BEGIN

; Настройка консольных окон под стандартные разрешения

$CONSOLE="HKEY_CURRENT_USER\Console"
$POLICIES="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer"
$S="0x001e004d"
$P="0x000d000a"

if RegRead($POLICIES,"NoDesktop")="1" then
 $D="1"
elseif RegRead($POLICIES,"NoDesktop")="0" then
 $D="0"
else
 $D="0"
endif

RegDelete($CONSOLE)

; Установка постоянных значений

RegWrite($CONSOLE,"FaceName","REG_SZ","Terminal")
RegWrite($CONSOLE,"FontFamily","REG_DWORD","0x00000030")
RegWrite($CONSOLE,"FullScreen","REG_DWORD","0x00000000")
RegWrite($CONSOLE,"FontSize","REG_DWORD","0x0012000a")
RegWrite($CONSOLE,"FontWeight","REG_DWORD","0x00000190")

; Расчет количества символов по ширине и высоте

$KW=int(@DesktopWidth/10)-4
$KH=int(@DesktopHeight/18)-3

; Составление бинарных значений размеров и координат

$S="0x"&Hex($KH,4)&Hex($KW,4)
$P="0x"&Hex(int((@DesktopHeight-18*($KH)-18)/2),4)&Hex(int((@DesktopWidth-10*($KW))/2),4)

; Установка переменных значений

RegWrite($CONSOLE,"ScreenBufferSize","REG_DWORD",$S)
RegWrite($CONSOLE,"WindowSize","REG_DWORD",$S)
RegWrite($CONSOLE,"WindowPosition","REG_DWORD",$P)

; END

Func _TaskbarHeight()

	Local $tRECT = DllStructCreate($tagRECT)
	Local $Ret = DllCall('user32.dll', 'int', 'SystemParametersInfo', 'uint', 48, 'uint', 0, 'ptr', DllStructGetPtr($tRECT), 'uint', 0)

	If (@error) Or ($Ret[0] = 0) Then
		Return SetError(1, 0, 0)
	EndIf
	Return @DesktopHeight - DllStructGetData($tRECT, 4)
EndFunc   ;==>_TaskbarHeight

$aTaskBar_Pos = WinGetPos("[CLASS:Shell_TrayWnd]")

ConsoleWrite(_TaskbarHeight() & @CRLF)
ConsoleWrite($aTaskBar_Pos[3] & @CRLF)