#cs ----------------------------------------------------------------------------

	AutoIt Version: 3.3.8.1
	Author:         Skilkor	(Pascal Vollenweider)

	Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------
#region ### #include ###
#include <GuiConstants.au3>
#include <GdiPlus.au3>
#include <Array.au3>
#include <Misc.au3>
#include <Date.au3>
#include <Constants.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#endregion ### #include ###
;====================
#region ### OnAutoItExitRegister ###
OnAutoItExitRegister("_end")
#endregion ### OnAutoItExitRegister ###
;====================
#region ### Global ###
;==========
#region ### Time ###
Global $Hour = @HOUR
Global $Minute = @MIN
Global $Secunde = @SEC
#endregion ### Time ###
;==========
#region ### Coords ###
$x = 0
$y = 0
Global $width = 1060
Global $height = 480
#endregion ### Coords ###
;==========
#region ### Groesse ###
Global $Groesse[7][2] = [[6],['1', '6'],['2', '5'],['3', '4'],['4', '3'],['5', '2'],['6', '1']]
Global $IniReadGr = IniRead('opt.ini', 'Display', 'Groesse', '')
Global $IniReadSys = IniRead('opt.ini', 'Stunden System', 'Sys', '')
If $IniReadGr = '' Then
	Global $ComboGr = InputBox('Display Grösse', 'Wählen Sie die Display Grösse' & @CRLF & '1 = Klein bis 6 = Gross', '4')
	IniWrite('opt.ini', 'Display', 'Groesse', $ComboGr)
Else
	$ComboGr = $IniReadGr
EndIf
If $IniReadSys = '' Then
	Global $Sys = InputBox('Zeit Format', 'Wählen Sie das zeit Format' & @CRLF & '12 o. 24 Std Anzeige', '24')
	IniWrite('opt.ini', 'Stunden System', 'Sys', $Sys)
Else
	$Sys = $IniReadSys
EndIf
#endregion ### Groesse ###
;==========
#region ### Global _Segment ###
Global $Graphic, $Brush, $Brush_Greyed
Global $SegmentHour, $SegmentHour_10, $SegmentSecunde, $SegmentMin, $SegmentMin_10
;~
Global $Segment_Hour_Null, $Segment_Hour_NullEins, $Segment_Hour_NullZwei, $Segment_Hour_NullDrei, $Segment_Hour_NullVier, $Segment_Hour_NullFuenf, $Segment_Hour_NullSechs, $Segment_Hour_NullSieben, $Segment_Hour_NullAcht, $Segment_Hour_NullNeun
Global $Segment_Hour_EinsNull, $Segment_Hour_ZweiNull
Global $Segment_Min_Null, $Segment_Min_NullEins, $Segment_Min_NullZwei, $Segment_Min_NullDrei, $Segment_Min_NullVier, $Segment_Min_NullFuenf, $Segment_Min_NullSechs, $Segment_Min_NullSieben, $Segment_Min_NullAcht, $Segment_Min_NullNeun
Global $Segment_Min_EinsNull, $Segment_Min_ZweiNull, $Segment_Min_DreiNull, $Segment_Min_VierNull, $Segment_Min_FuenfNull
;~
Global $Segment_Hour_Null_Greyed, $Segment_Hour_NullEins_Greyed, $Segment_Hour_NullZwei_Greyed, $Segment_Hour_NullDrei_Greyed, $Segment_Hour_NullVier_Greyed, $Segment_Hour_NullFuenf_Greyed, $Segment_Hour_NullSechs_Greyed, $Segment_Hour_NullSieben_Greyed, $Segment_Hour_NullAcht_Greyed, $Segment_Hour_NullNeun_Greyed
Global $Segment_Hour_EinsNull_Greyed, $Segment_Hour_ZweiNull_Greyed
Global $Segment_Min_Null_Greyed, $Segment_Min_NullEins_Greyed, $Segment_Min_NullZwei_Greyed, $Segment_Min_NullDrei_Greyed, $Segment_Min_NullVier_Greyed, $Segment_Min_NullFuenf_Greyed, $Segment_Min_NullSechs_Greyed, $Segment_Min_NullSieben_Greyed, $Segment_Min_NullAcht_Greyed, $Segment_Min_NullNeun_Greyed
Global $Segment_Min_EinsNull_Greyed, $Segment_Min_ZweiNull_Greyed, $Segment_Min_DreiNull_Greyed, $Segment_Min_VierNull_Greyed, $Segment_Min_FuenfNull_Greyed
;~
Global $SegmentName[8] = [7, 'Oben', 'Linke Obere Seite', 'Rechte Obere Seite', 'Mitte', 'Linke Untere Seite', 'Rechte Untere Seite', 'Unten']
Global $SegmentHour[$SegmentName[0] + 1] = [$SegmentHour[0]]
Global $SegmentHour_10[$SegmentName[0] + 1] = [$SegmentHour_10[0]]
Global $SegmentSecunde[$SegmentName[0] + 1] = [$SegmentSecunde[0]]
Global $SegmentMin[$SegmentName[0] + 1] = [$SegmentMin[0]]
Global $SegmentMin_10[$SegmentName[0] + 1] = [$SegmentMin_10[0]]
#endregion ### Global _Segment ###
;==========
#region ### Global _Segment1 ###
Global $Segment_L_O[7][2] = [[6],[60 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[80 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[200 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[220 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[200 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]],[80 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Oben
$SegmentHour[1] = $Segment_L_O
Global $Segment_L_L_O[7][2] = [[6],[50 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[40 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[40 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[50 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[70 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[70 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Linke Obere Seite
$SegmentHour[2] = $Segment_L_L_O
Global $Segment_L_R_O[7][2] = [[6],[230 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[240 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[240 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[230 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[210 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[210 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Rechte Obere Seite
$SegmentHour[3] = $Segment_L_R_O
Global $Segment_L_M[7][2] = [[6],[60 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[80 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[200 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[220 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[200 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]],[80 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Mitte
$SegmentHour[4] = $Segment_L_M
Global $Segment_L_L_U[7][2] = [[6],[50 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[40 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[40 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[50 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[70 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[70 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Linke Untere Seite
$SegmentHour[5] = $Segment_L_L_U
Global $Segment_L_R_U[7][2] = [[6],[230 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[240 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[240 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[230 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[210 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[210 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Rechte Untere Seite
$SegmentHour[6] = $Segment_L_R_U
Global $Segment_L_U[7][2] = [[6],[60 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[80 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[200 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[220 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[200 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]],[80 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Unten
$SegmentHour[7] = $Segment_L_U
#endregion ### Global _Segment1 ###
;==========
#region ### Global _Segment2 ###
Global $Segment_L_O_2[7][2] = [[6],[310 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[330 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[450 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[470 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[450 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]],[330 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Oben 2
$SegmentHour_10[1] = $Segment_L_O_2
Global $Segment_L_L_O_2[7][2] = [[6],[300 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[290 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[290 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[300 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[320 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[320 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Linke Obere Seite 2
$SegmentHour_10[2] = $Segment_L_L_O_2
Global $Segment_L_R_O_2[7][2] = [[6],[480 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[490 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[490 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[480 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[460 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[460 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Rechte Obere Seite 2
$SegmentHour_10[3] = $Segment_L_R_O_2
Global $Segment_L_M_2[7][2] = [[6],[310 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[330 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[450 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[470 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[450 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]],[330 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Mitte 2
$SegmentHour_10[4] = $Segment_L_M_2
Global $Segment_L_L_U_2[7][2] = [[6],[300 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[290 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[290 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[300 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[320 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[320 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Linke Untere Seite 2
$SegmentHour_10[5] = $Segment_L_L_U_2
Global $Segment_L_R_U_2[7][2] = [[6],[480 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[490 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[490 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[480 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[460 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[460 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Rechte Untere Seite 2
$SegmentHour_10[6] = $Segment_L_R_U_2
Global $Segment_L_U_2[7][2] = [[6],[310 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[330 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[450 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[470 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[450 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]],[330 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]]] ;_SegmentLinks / Unten 2
$SegmentHour_10[7] = $Segment_L_U_2
#endregion ### Global _Segment2 ###
;==========
#region ### Global _Segment3 ###
Global $Segment_M_O[7][2] = [[6],[540 / $Groesse[$ComboGr][1], 160 / $Groesse[$ComboGr][1]],[550 / $Groesse[$ComboGr][1], 170 / $Groesse[$ComboGr][1]],[550 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[540 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[530 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[530 / $Groesse[$ComboGr][1], 170 / $Groesse[$ComboGr][1]]] ;_SegmentMitte / Oben
$SegmentSecunde[1] = $Segment_M_O
Global $Segment_M_U[7][2] = [[6],[540 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[550 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]],[550 / $Groesse[$ComboGr][1], 290 / $Groesse[$ComboGr][1]],[540 / $Groesse[$ComboGr][1], 300 / $Groesse[$ComboGr][1]],[530 / $Groesse[$ComboGr][1], 290 / $Groesse[$ComboGr][1]],[530 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]]] ;_SegmentMitte / Unten
$SegmentSecunde[2] = $Segment_M_U
#endregion ### Global _Segment3 ###
;==========
#region ### Global _Segment4 ###
Global $Segment_R_O[7][2] = [[6],[610 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[630 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[750 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[770 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[750 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]],[630 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Oben
$SegmentMin[1] = $Segment_R_O
Global $Segment_R_L_O[7][2] = [[6],[600 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[590 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[590 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[600 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[620 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[620 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Linke Obere Seite
$SegmentMin[2] = $Segment_R_L_O
Global $Segment_R_R_O[7][2] = [[6],[780 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[790 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[790 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[780 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[760 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[760 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Rechte Obere Seite
$SegmentMin[3] = $Segment_R_R_O
Global $Segment_R_M[7][2] = [[6],[610 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[630 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[750 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[770 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[750 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]],[630 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Mitte
$SegmentMin[4] = $Segment_R_M
Global $Segment_R_L_U[7][2] = [[6],[600 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[590 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[590 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[600 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[620 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[620 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Linke Untere Seite
$SegmentMin[5] = $Segment_R_L_U
Global $Segment_R_R_U[7][2] = [[6],[780 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[790 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[790 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[780 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[760 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[760 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Rechte Untere Seite
$SegmentMin[6] = $Segment_R_R_U
Global $Segment_R_U[7][2] = [[6],[610 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[630 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[750 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[770 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[750 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]],[630 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Unten
$SegmentMin[7] = $Segment_R_U
#endregion ### Global _Segment4 ###
;==========
#region ### Global Segmen 5 ###
Global $Segment_R_O_2[7][2] = [[6],[860 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[880 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[1000 / $Groesse[$ComboGr][1], 40 / $Groesse[$ComboGr][1]],[1020 / $Groesse[$ComboGr][1], 50 / $Groesse[$ComboGr][1]],[1000 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]],[880 / $Groesse[$ComboGr][1], 70 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Oben 2
$SegmentMin_10[1] = $Segment_R_O_2
Global $Segment_R_L_O_2[7][2] = [[6],[850 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[840 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[840 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[850 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[870 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[870 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Linke Obere Seite 2
$SegmentMin_10[2] = $Segment_R_L_O_2
Global $Segment_R_R_O_2[7][2] = [[6],[1030 / $Groesse[$ComboGr][1], 60 / $Groesse[$ComboGr][1]],[1040 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]],[1040 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[1030 / $Groesse[$ComboGr][1], 220 / $Groesse[$ComboGr][1]],[1010 / $Groesse[$ComboGr][1], 200 / $Groesse[$ComboGr][1]],[1010 / $Groesse[$ComboGr][1], 80 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Rechte Obere Seite 2
$SegmentMin_10[3] = $Segment_R_R_O_2
Global $Segment_R_M[7][2] = [[6],[860 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[880 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[1000 / $Groesse[$ComboGr][1], 210 / $Groesse[$ComboGr][1]],[1020 / $Groesse[$ComboGr][1], 230 / $Groesse[$ComboGr][1]],[1000 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]],[880 / $Groesse[$ComboGr][1], 250 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Mitte 2
$SegmentMin_10[4] = $Segment_R_M
Global $Segment_R_L_U_2[7][2] = [[6],[850 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[840 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[840 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[850 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[870 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[870 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Linke Untere Seite 2
$SegmentMin_10[5] = $Segment_R_L_U_2
Global $Segment_R_R_U_2[7][2] = [[6],[1030 / $Groesse[$ComboGr][1], 240 / $Groesse[$ComboGr][1]],[1040 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]],[1040 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[1030 / $Groesse[$ComboGr][1], 400 / $Groesse[$ComboGr][1]],[1010 / $Groesse[$ComboGr][1], 380 / $Groesse[$ComboGr][1]],[1010 / $Groesse[$ComboGr][1], 260 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Rechte Untere Seite 2
$SegmentMin_10[6] = $Segment_R_R_U_2
Global $Segment_R_U_2[7][2] = [[6],[860 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[880 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[1000 / $Groesse[$ComboGr][1], 420 / $Groesse[$ComboGr][1]],[1020 / $Groesse[$ComboGr][1], 410 / $Groesse[$ComboGr][1]],[1000 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]],[880 / $Groesse[$ComboGr][1], 390 / $Groesse[$ComboGr][1]]] ;_SegmentRechts / Unten 2
$SegmentMin_10[7] = $Segment_R_U_2
#endregion ### Global Segmen 5 ###
;==========
#region ### Global  Stunde ###
Global $Stunde_12[24][3] = [['00', '_Segment_H0_', '_Segment_H_0'],['01', '_Segment_H0_', '_Segment_H01'],['02', '_Segment_H0_', '_Segment_H02'],['03', '_Segment_H0_', '_Segment_H03'], _
		['04', '_Segment_H0_', '_Segment_H04'],['05', '_Segment_H0_', '_Segment_H05'],['06', '_Segment_H0_', '_Segment_H06'],['07', '_Segment_H0_', '_Segment_H07'], _
		['08', '_Segment_H0_', '_Segment_H08'],['09', '_Segment_H0_', '_Segment_H09'],['10', '_Segment_H10', '_Segment_H_0'],['11', '_Segment_H10', '_Segment_H01'], _
		['12', '_Segment_H10', '_Segment_H02'],['13', '_Segment_H0_', '_Segment_H01'],['14', '_Segment_H0_', '_Segment_H02'],['15', '_Segment_H0_', '_Segment_H03'], _
		['16', '_Segment_H0_', '_Segment_H04'],['17', '_Segment_H0_', '_Segment_H05'],['18', '_Segment_H0_', '_Segment_H06'],['19', '_Segment_H0_', '_Segment_H07'], _
		['20', '_Segment_H0_', '_Segment_H08'],['21', '_Segment_H0_', '_Segment_H09'],['22', '_Segment_H10', '_Segment_H_0'],['23', '_Segment_H10', '_Segment_H01']]

Global $Stunde_24[24][3] = [['00', '_Segment_H0_', '_Segment_H_0'],['01', '_Segment_H0_', '_Segment_H01'],['02', '_Segment_H0_', '_Segment_H02'],['03', '_Segment_H0_', '_Segment_H03'], _
		['04', '_Segment_H0_', '_Segment_H04'],['05', '_Segment_H0_', '_Segment_H05'],['06', '_Segment_H0_', '_Segment_H06'],['07', '_Segment_H0_', '_Segment_H07'], _
		['08', '_Segment_H0_', '_Segment_H08'],['09', '_Segment_H0_', '_Segment_H09'],['10', '_Segment_H10', '_Segment_H_0'],['11', '_Segment_H10', '_Segment_H01'], _
		['12', '_Segment_H10', '_Segment_H02'],['13', '_Segment_H10', '_Segment_H03'],['14', '_Segment_H10', '_Segment_H04'],['15', '_Segment_H10', '_Segment_H05'], _
		['16', '_Segment_H10', '_Segment_H06'],['17', '_Segment_H10', '_Segment_H07'],['18', '_Segment_H10', '_Segment_H08'],['19', '_Segment_H10', '_Segment_H09'], _
		['20', '_Segment_H20', '_Segment_H_0'],['21', '_Segment_H20', '_Segment_H01'],['22', '_Segment_H20', '_Segment_H02'],['23', '_Segment_H20', '_Segment_H03']]
#endregion ### Global  Stunde ###
;==========
#region ### Global Minute ###
Global $Min[60][3] = [['00', '_Segment_M0_', '_Segment_M_0'],['01', '_Segment_M0_', '_Segment_M01'],['02', '_Segment_M0_', '_Segment_M02'],['03', '_Segment_M0_', '_Segment_M03'], _
		['04', '_Segment_M0_', '_Segment_M04'],['05', '_Segment_M0_', '_Segment_M05'],['06', '_Segment_M0_', '_Segment_M06'],['07', '_Segment_M0_', '_Segment_M07'], _
		['08', '_Segment_M0_', '_Segment_M08'],['09', '_Segment_M0_', '_Segment_M09'],['10', '_Segment_M10', '_Segment_M_0'],['11', '_Segment_M10', '_Segment_M01'], _
		['12', '_Segment_M10', '_Segment_M02'],['13', '_Segment_M10', '_Segment_M03'],['14', '_Segment_M10', '_Segment_M04'],['15', '_Segment_M10', '_Segment_M05'], _
		['16', '_Segment_M10', '_Segment_M06'],['17', '_Segment_M10', '_Segment_M07'],['18', '_Segment_M10', '_Segment_M08'],['19', '_Segment_M10', '_Segment_M09'], _
		['20', '_Segment_M20', '_Segment_M_0'],['21', '_Segment_M20', '_Segment_M01'],['22', '_Segment_M20', '_Segment_M02'],['23', '_Segment_M20', '_Segment_M03'], _
		['24', '_Segment_M20', '_Segment_M04'],['25', '_Segment_M20', '_Segment_M05'],['26', '_Segment_M20', '_Segment_M06'],['27', '_Segment_M20', '_Segment_M07'], _
		['28', '_Segment_M20', '_Segment_M08'],['29', '_Segment_M20', '_Segment_M09'],['30', '_Segment_M30', '_Segment_M_0'],['31', '_Segment_M30', '_Segment_M01'], _
		['32', '_Segment_M30', '_Segment_M02'],['33', '_Segment_M30', '_Segment_M03'],['34', '_Segment_M30', '_Segment_M04'],['35', '_Segment_M30', '_Segment_M05'], _
		['36', '_Segment_M30', '_Segment_M06'],['37', '_Segment_M30', '_Segment_M07'],['38', '_Segment_M30', '_Segment_M08'],['39', '_Segment_M30', '_Segment_M09'], _
		['40', '_Segment_M40', '_Segment_M_0'],['41', '_Segment_M40', '_Segment_M01'],['42', '_Segment_M40', '_Segment_M02'],['43', '_Segment_M40', '_Segment_M03'], _
		['44', '_Segment_M40', '_Segment_M04'],['45', '_Segment_M40', '_Segment_M05'],['46', '_Segment_M40', '_Segment_M06'],['47', '_Segment_M40', '_Segment_M07'], _
		['48', '_Segment_M40', '_Segment_M08'],['49', '_Segment_M40', '_Segment_M09'],['50', '_Segment_M50', '_Segment_M_0'],['51', '_Segment_M50', '_Segment_M01'], _
		['52', '_Segment_M50', '_Segment_M02'],['53', '_Segment_M50', '_Segment_M03'],['54', '_Segment_M50', '_Segment_M04'],['55', '_Segment_M50', '_Segment_M05'], _
		['56', '_Segment_M50', '_Segment_M06'],['57', '_Segment_M50', '_Segment_M07'],['58', '_Segment_M50', '_Segment_M09'],['59', '_Segment_M50', '_Segment_M09']]
#endregion ### Global Minute ###
;==========
#region ### Global Secunde ###
Global $Sec[60][2] = [['00', '_SecundeON'],['01', '_SecundeOFF'],['02', '_SecundeON'],['03', '_SecundeOFF'],['04', '_SecundeON'],['05', '_SecundeOFF'],['06', '_SecundeON'],['07', '_SecundeOFF'], _
		['08', '_SecundeON'],['09', '_SecundeOFF'],['10', '_SecundeON'],['11', '_SecundeOFF'],['12', '_SecundeON'],['13', '_SecundeOFF'],['14', '_SecundeON'],['15', '_SecundeOFF'], _
		['16', '_SecundeON'],['17', '_SecundeOFF'],['18', '_SecundeON'],['19', '_SecundeOFF'],['20', '_SecundeON'],['21', '_SecundeOFF'],['22', '_SecundeON'],['23', '_SecundeOFF'], _
		['24', '_SecundeON'],['25', '_SecundeOFF'],['26', '_SecundeON'],['27', '_SecundeOFF'],['28', '_SecundeON'],['29', '_SecundeOFF'],['30', '_SecundeON'],['31', '_SecundeOFF'], _
		['32', '_SecundeON'],['33', '_SecundeOFF'],['34', '_SecundeON'],['35', '_SecundeOFF'],['36', '_SecundeON'],['37', '_SecundeOFF'],['38', '_SecundeON'],['39', '_SecundeOFF'], _
		['40', '_SecundeON'],['41', '_SecundeOFF'],['42', '_SecundeON'],['43', '_SecundeOFF'],['44', '_SecundeON'],['45', '_SecundeOFF'],['46', '_SecundeON'],['47', '_SecundeOFF'], _
		['48', '_SecundeON'],['49', '_SecundeOFF'],['50', '_SecundeON'],['51', '_SecundeOFF'],['52', '_SecundeON'],['53', '_SecundeOFF'],['54', '_SecundeON'],['55', '_SecundeOFF'], _
		['56', '_SecundeON'],['57', '_SecundeOFF'],['58', '_SecundeON'],['59', '_SecundeOFF']]

#endregion ### Global Secunde ###
;==========
#endregion ### Global ###
;====================
#region ### _GDIPlus_Startup() ###
_GDIPlus_Startup()
#endregion ### _GDIPlus_Startup() ###
;====================
#region ### $hGui ###
$hGui = GUICreate('Digi Clock', 1060 / $Groesse[$ComboGr][1], 550 / $Groesse[$ComboGr][1], -1, -1)
$Menu = GUICtrlCreateMenu('Menu')
$Optionen = GUICtrlCreateMenuItem('Optionen', $Menu)
$oGui = GUICreate('Optionen', 200, 160, -1, -1, $WS_POPUPWINDOW, $WS_EX_WINDOWEDGE)
GUICtrlCreateGroup('', 5, 5, 190, 45)
$Back = GUICtrlCreateButton('Back', 15, 20, 170, 20)
GUICtrlCreateGroup('', 5, 55, 190, 45)
$StdSysSet = GUICtrlCreateCombo('', 15, 70, 40, 20)
GUICtrlSetData($StdSysSet, '12|24', $Sys)
GUICtrlCreateLabel('Stunden System' & @CRLF & '12 o. 24 Stunden Wählen', 60, 68, 130, 30)
GUICtrlCreateGroup('', 5, 105, 190, 45)
$SchriftGr = GUICtrlCreateCombo('', 15, 120, 40, 20)
GUICtrlSetData($SchriftGr, '1|2|3|4|5|6', $ComboGr)
GUICtrlCreateLabel('Display / Segment Grösse' & @CRLF & 'Erfordert Neustart', 60, 118, 130, 30)

GUISetState(@SW_SHOW, $hGui)
GUISetState(@SW_HIDE, $oGui)
#endregion ### $hGui ###
;====================
#region ### _GDIPlus_Brush ###
$Graphic = _GDIPlus_GraphicsCreateFromHWND($hGui)
$Brush = _GDIPlus_BrushCreateSolid(0xFFFF0000)
$Brush_Greyed = _GDIPlus_BrushCreateSolid(0xFF330000)
#endregion ### _GDIPlus_Brush ###
;====================
_Background()
#region ### GUI_EVENT ###
While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Optionen
			GUISetState(@SW_SHOW, $oGui)
		Case $Back
			GUISetState(@SW_HIDE, $oGui)
		Case $StdSysSet
			IniWrite('opt.ini', 'Stunden System', 'Sys', GUICtrlRead($StdSysSet))
		Case $SchriftGr
			IniWrite('opt.ini', 'Display', 'Groesse', GUICtrlRead($SchriftGr))
	EndSwitch

	$Hour = @HOUR
	$Minute = @MIN
	$Secunde = @SEC
	$StdSys = GUICtrlRead($StdSysSet)

	If $ComboGr = GUICtrlRead($SchriftGr) Then
		Call($Sec[$Secunde][1])
		Call($Min[$Minute][1])
		Call($Min[$Minute][2])
		If $StdSys = '12' Then
			Call($Stunde_12[$Hour][1])
			Call($Stunde_12[$Hour][2])
		ElseIf $StdSys = '24' Then
			Call($Stunde_24[$Hour][1])
			Call($Stunde_24[$Hour][2])
		EndIf
		Sleep(50)
	EndIf
WEnd
#endregion ### GUI_EVENT ###
;====================
#region ### _Background() ###
Func _Background()
	_GDIPlus_GraphicsFillRect($Graphic, $x, $y, 1060, 550)
EndFunc   ;==>_Background
#endregion ### _Background() ###
;====================
#region ### _SecundeON() ###
Func _SecundeON()
	_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentSecunde[1], $Brush)
	_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentSecunde[2], $Brush)
EndFunc   ;==>_SecundeON
#endregion ### _SecundeON() ###
;====================
#region ### _SecundeOFF() ###
Func _SecundeOFF()
	_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentSecunde[1], $Brush_Greyed)
	_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentSecunde[2], $Brush_Greyed)
EndFunc   ;==>_SecundeOFF
#endregion ### _SecundeOFF() ###
;====================
#region ### _Segment_Stunden ###
;~
#region ### _Segment_H_0 ###
Func _Segment_H_0()
	Local $Segment_Hour_Null[$SegmentName[0]] = [$Segment_Hour_Null[0]] ;_Segment_HLinks / 00
	$Segment_Hour_Null[1] = $SegmentHour_10[1]
	$Segment_Hour_Null[2] = $SegmentHour_10[2]
	$Segment_Hour_Null[3] = $SegmentHour_10[3]
	$Segment_Hour_Null[4] = $SegmentHour_10[5]
	$Segment_Hour_Null[5] = $SegmentHour_10[6]
	$Segment_Hour_Null[6] = $SegmentHour_10[7]
	Local $Segment_Hour_Null_Greyed[$SegmentName[0] - 5] = [$Segment_Hour_Null_Greyed[0]]
	$Segment_Hour_Null_Greyed[1] = $SegmentHour_10[4]
;~
	For $i = 1 To UBound($Segment_Hour_Null) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_Null[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_Null_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_Null_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H_0
#endregion ### _Segment_H_0 ###
;==========
#region ### _Segment_H0_ ###
Func _Segment_H0_()
	Local $Segment_Hour_Null[$SegmentName[0]] = [$Segment_Hour_Null[0]] ;_Segment_HLinks / 00
	$Segment_Hour_Null[1] = $SegmentHour[1]
	$Segment_Hour_Null[2] = $SegmentHour[2]
	$Segment_Hour_Null[3] = $SegmentHour[3]
	$Segment_Hour_Null[4] = $SegmentHour[5]
	$Segment_Hour_Null[5] = $SegmentHour[6]
	$Segment_Hour_Null[6] = $SegmentHour[7]
	Local $Segment_Hour_Null_Greyed[$SegmentName[0] - 5] = [$Segment_Hour_Null_Greyed[0]]
	$Segment_Hour_Null_Greyed[1] = $SegmentHour[4]
;~
	For $i = 1 To UBound($Segment_Hour_Null) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_Null[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_Null_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_Null_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H0_
#endregion ### _Segment_H0_ ###
;==========
#region ### _Segment_H01 ###
Func _Segment_H01()
	Local $Segment_Hour_NullEins[$SegmentName[0] - 4] = [$Segment_Hour_NullEins[0]] ;_Segment_HLinks / 01
	$Segment_Hour_NullEins[1] = $SegmentHour_10[3]
	$Segment_Hour_NullEins[2] = $SegmentHour_10[6]
	Local $Segment_Hour_NullEins_Greyed[$SegmentName[0] - 1] = [$Segment_Hour_NullEins_Greyed[0]]
	$Segment_Hour_NullEins_Greyed[1] = $SegmentHour_10[1]
	$Segment_Hour_NullEins_Greyed[2] = $SegmentHour_10[2]
	$Segment_Hour_NullEins_Greyed[3] = $SegmentHour_10[4]
	$Segment_Hour_NullEins_Greyed[4] = $SegmentHour_10[5]
	$Segment_Hour_NullEins_Greyed[5] = $SegmentHour_10[7]
;~
	For $i = 1 To UBound($Segment_Hour_NullEins) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullEins[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullEins_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullEins_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H01
#endregion ### _Segment_H01 ###
;==========
#region ### _Segment_H02() ###
Func _Segment_H02()
	Local $Segment_Hour_NullZwei[$SegmentName[0] - 1] = [$Segment_Hour_NullZwei[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullZwei[1] = $SegmentHour_10[1]
	$Segment_Hour_NullZwei[2] = $SegmentHour_10[3]
	$Segment_Hour_NullZwei[3] = $SegmentHour_10[4]
	$Segment_Hour_NullZwei[4] = $SegmentHour_10[5]
	$Segment_Hour_NullZwei[5] = $SegmentHour_10[7]
	Local $Segment_Hour_NullZwei_Greyed[$SegmentName[0] - 4] = [$Segment_Hour_NullZwei_Greyed[0]]
	$Segment_Hour_NullZwei_Greyed[1] = $SegmentHour_10[2]
	$Segment_Hour_NullZwei_Greyed[2] = $SegmentHour_10[6]
;~
	For $i = 1 To UBound($Segment_Hour_NullZwei) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullZwei[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullZwei_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullZwei_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H02
#endregion ### _Segment_H02() ###
;==========
#region ### _Segment_H03() ###
Func _Segment_H03()
	Local $Segment_Hour_NullDrei[$SegmentName[0] - 1] = [$Segment_Hour_NullDrei[0]] ;_Segment_HLinks / 03
	$Segment_Hour_NullDrei[1] = $SegmentHour_10[1]
	$Segment_Hour_NullDrei[2] = $SegmentHour_10[3]
	$Segment_Hour_NullDrei[3] = $SegmentHour_10[4]
	$Segment_Hour_NullDrei[4] = $SegmentHour_10[6]
	$Segment_Hour_NullDrei[5] = $SegmentHour_10[7]
	Local $Segment_Hour_NullDrei_Greyed[$SegmentName[0] - 4] = [$Segment_Hour_NullDrei_Greyed[0]]
	$Segment_Hour_NullDrei_Greyed[1] = $SegmentHour_10[2]
	$Segment_Hour_NullDrei_Greyed[2] = $SegmentHour_10[5]
;~
	For $i = 1 To UBound($Segment_Hour_NullDrei) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullDrei[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullDrei_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullDrei_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H03
#endregion ### _Segment_H03() ###
;==========
#region ### _Segment_H04() ###
Func _Segment_H04()
	Local $Segment_Hour_NullVier[$SegmentName[0] - 2] = [$Segment_Hour_NullVier[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullVier[1] = $SegmentHour_10[2]
	$Segment_Hour_NullVier[2] = $SegmentHour_10[3]
	$Segment_Hour_NullVier[3] = $SegmentHour_10[4]
	$Segment_Hour_NullVier[4] = $SegmentHour_10[6]
	Local $Segment_Hour_NullVier_Greyed[$SegmentName[0] - 3] = [$Segment_Hour_NullVier_Greyed[0]]
	$Segment_Hour_NullVier_Greyed[1] = $SegmentHour_10[1]
	$Segment_Hour_NullVier_Greyed[2] = $SegmentHour_10[5]
	$Segment_Hour_NullVier_Greyed[3] = $SegmentHour_10[7]
;~
	For $i = 1 To UBound($Segment_Hour_NullVier) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullVier[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullVier_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullVier_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H04
#endregion ### _Segment_H04() ###
;==========
#region ### _Segment_H05() ###
Func _Segment_H05()
	Local $Segment_Hour_NullFuenf[$SegmentName[0] - 1] = [$Segment_Hour_NullFuenf[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullFuenf[1] = $SegmentHour_10[1]
	$Segment_Hour_NullFuenf[2] = $SegmentHour_10[2]
	$Segment_Hour_NullFuenf[3] = $SegmentHour_10[4]
	$Segment_Hour_NullFuenf[4] = $SegmentHour_10[6]
	$Segment_Hour_NullFuenf[5] = $SegmentHour_10[7]
	Local $Segment_Hour_NullFuenf_Greyed[$SegmentName[0] - 4] = [$Segment_Hour_NullFuenf_Greyed[0]]
	$Segment_Hour_NullFuenf_Greyed[1] = $SegmentHour_10[3]
	$Segment_Hour_NullFuenf_Greyed[2] = $SegmentHour_10[5]
;~
	For $i = 1 To UBound($Segment_Hour_NullFuenf) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullFuenf[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullFuenf_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullFuenf_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H05
#endregion ### _Segment_H05() ###
;==========
#region ### _Segment_H06() ###
Func _Segment_H06()
	Local $Segment_Hour_NullSechs[$SegmentName[0]] = [$Segment_Hour_NullSechs[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullSechs[1] = $SegmentHour_10[1]
	$Segment_Hour_NullSechs[2] = $SegmentHour_10[2]
	$Segment_Hour_NullSechs[3] = $SegmentHour_10[4]
	$Segment_Hour_NullSechs[4] = $SegmentHour_10[5]
	$Segment_Hour_NullSechs[5] = $SegmentHour_10[6]
	$Segment_Hour_NullSechs[6] = $SegmentHour_10[7]
	Local $Segment_Hour_NullSechs_Greyed[$SegmentName[0] - 5] = [$Segment_Hour_NullSechs_Greyed[0]]
	$Segment_Hour_NullSechs_Greyed[1] = $SegmentHour_10[3]
;~
	For $i = 1 To UBound($Segment_Hour_NullSechs) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullSechs[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullSechs_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullSechs_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H06
#endregion ### _Segment_H06() ###
;==========
#region ### _Segment_H07() ###
Func _Segment_H07()
	Local $Segment_Hour_NullSieben[$SegmentName[0] - 3] = [$Segment_Hour_NullSieben[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullSieben[1] = $SegmentHour_10[1]
	$Segment_Hour_NullSieben[2] = $SegmentHour_10[3]
	$Segment_Hour_NullSieben[3] = $SegmentHour_10[6]
	Local $Segment_Hour_NullSieben_Greyed[$SegmentName[0] - 2] = [$Segment_Hour_NullSieben_Greyed[0]]
	$Segment_Hour_NullSieben_Greyed[1] = $SegmentHour_10[2]
	$Segment_Hour_NullSieben_Greyed[2] = $SegmentHour_10[4]
	$Segment_Hour_NullSieben_Greyed[3] = $SegmentHour_10[5]
	$Segment_Hour_NullSieben_Greyed[4] = $SegmentHour_10[7]
;~
	For $i = 1 To UBound($Segment_Hour_NullSieben) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullSieben[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullSieben_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullSieben_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H07
#endregion ### _Segment_H07() ###
;==========
#region ### _Segment_H08() ###
Func _Segment_H08()
	Local $Segment_Hour_NullAcht[$SegmentName[0] + 1] = [$Segment_Hour_NullAcht[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullAcht[1] = $SegmentHour_10[1]
	$Segment_Hour_NullAcht[2] = $SegmentHour_10[2]
	$Segment_Hour_NullAcht[3] = $SegmentHour_10[3]
	$Segment_Hour_NullAcht[4] = $SegmentHour_10[4]
	$Segment_Hour_NullAcht[5] = $SegmentHour_10[5]
	$Segment_Hour_NullAcht[6] = $SegmentHour_10[6]
	$Segment_Hour_NullAcht[7] = $SegmentHour_10[7]
;~
	For $i = 1 To UBound($Segment_Hour_NullAcht) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullAcht[$i], $Brush)
	Next
EndFunc   ;==>_Segment_H08
#endregion ### _Segment_H08() ###
;==========
#region ### _Segment_H09() ###
Func _Segment_H09()
	Local $Segment_Hour_NullNeun[$SegmentName[0]] = [$Segment_Hour_NullNeun[0]] ;_Segment_HLinks / 02
	$Segment_Hour_NullNeun[1] = $SegmentHour_10[1]
	$Segment_Hour_NullNeun[2] = $SegmentHour_10[2]
	$Segment_Hour_NullNeun[3] = $SegmentHour_10[3]
	$Segment_Hour_NullNeun[4] = $SegmentHour_10[4]
	$Segment_Hour_NullNeun[5] = $SegmentHour_10[6]
	$Segment_Hour_NullNeun[6] = $SegmentHour_10[7]
	Local $Segment_Hour_NullNeun_Greyed[$SegmentName[0] - 5] = [$Segment_Hour_NullNeun_Greyed[0]]
	$Segment_Hour_NullNeun_Greyed[1] = $SegmentHour_10[5]
;~
	For $i = 1 To UBound($Segment_Hour_NullNeun) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullNeun[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_NullNeun_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_NullNeun_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H09
#endregion ### _Segment_H09() ###
;==========
#region ### _Segment_H10() ###
Func _Segment_H10()
	Local $Segment_Hour_EinsNull[$SegmentName[0] - 3] = [$Segment_Hour_EinsNull[0]] ;_Segment_HLinks / 02
	$Segment_Hour_EinsNull[1] = $SegmentHour[3]
	$Segment_Hour_EinsNull[2] = $SegmentHour[6]
	$Segment_Hour_EinsNull[3] = $SegmentHour[3]
	Local $Segment_Hour_EinsNull_Greyed[$SegmentName[0] - 1] = [$Segment_Hour_EinsNull_Greyed[0]]
	$Segment_Hour_EinsNull_Greyed[1] = $SegmentHour[1]
	$Segment_Hour_EinsNull_Greyed[2] = $SegmentHour[2]
	$Segment_Hour_EinsNull_Greyed[3] = $SegmentHour[4]
	$Segment_Hour_EinsNull_Greyed[4] = $SegmentHour[5]
	$Segment_Hour_EinsNull_Greyed[5] = $SegmentHour[7]
;~
	For $i = 1 To UBound($Segment_Hour_EinsNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_EinsNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_EinsNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_EinsNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H10
#endregion ### _Segment_H10() ###
;==========
#region ### _Segment_H20() ###
Func _Segment_H20()
	Local $Segment_Hour_ZweiNull[$SegmentName[0] - 1] = [$Segment_Hour_ZweiNull[0]] ;_Segment_HLinks / 02
	$Segment_Hour_ZweiNull[1] = $SegmentHour[1]
	$Segment_Hour_ZweiNull[2] = $SegmentHour[3]
	$Segment_Hour_ZweiNull[3] = $SegmentHour[4]
	$Segment_Hour_ZweiNull[4] = $SegmentHour[5]
	$Segment_Hour_ZweiNull[5] = $SegmentHour[7]
	Local $Segment_Hour_ZweiNull_Greyed[$SegmentName[0] - 4] = [$Segment_Hour_ZweiNull_Greyed[0]]
	$Segment_Hour_ZweiNull_Greyed[1] = $SegmentHour[2]
	$Segment_Hour_ZweiNull_Greyed[2] = $SegmentHour[6]
;~
	For $i = 1 To UBound($Segment_Hour_ZweiNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_ZweiNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Hour_ZweiNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Hour_ZweiNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_H20
#endregion ### _Segment_H20() ###
;==========
#endregion ### _Segment_Stunden ###
;====================
#region ### _Segment_Minuten ###
;~
#region ### _Segment_M0_ ###
Func _Segment_M0_()
	Local $Segment_Min_Null[$SegmentName[0]] = [$Segment_Min_Null[0]] ;_Segment_MLinks / 00
	$Segment_Min_Null[1] = $SegmentMin[1]
	$Segment_Min_Null[2] = $SegmentMin[2]
	$Segment_Min_Null[3] = $SegmentMin[3]
	$Segment_Min_Null[4] = $SegmentMin[5]
	$Segment_Min_Null[5] = $SegmentMin[6]
	$Segment_Min_Null[6] = $SegmentMin[7]
	Local $Segment_Min_Null_Greyed[$SegmentName[0] - 5] = [$Segment_Min_Null_Greyed[0]]
	$Segment_Min_Null_Greyed[1] = $SegmentMin[4]
;~
	For $i = 1 To UBound($Segment_Min_Null) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_Null[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_Null_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_Null_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M0_
#endregion ### _Segment_M0_ ###
;==========
#region ### _Segment_M_0 ###
Func _Segment_M_0()
	Local $Segment_Min_Null[$SegmentName[0]] = [$Segment_Min_Null[0]] ;_Segment_MLinks / 00
	$Segment_Min_Null[1] = $SegmentMin_10[1]
	$Segment_Min_Null[2] = $SegmentMin_10[2]
	$Segment_Min_Null[3] = $SegmentMin_10[3]
	$Segment_Min_Null[4] = $SegmentMin_10[5]
	$Segment_Min_Null[5] = $SegmentMin_10[6]
	$Segment_Min_Null[6] = $SegmentMin_10[7]
	Local $Segment_Min_Null_Greyed[$SegmentName[0] - 5] = [$Segment_Min_Null_Greyed[0]]
	$Segment_Min_Null_Greyed[1] = $SegmentMin_10[4]
;~
	For $i = 1 To UBound($Segment_Min_Null) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_Null[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_Null_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_Null_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M_0
#endregion ### _Segment_M_0 ###
;==========
#region ### _Segment_M01 ###
Func _Segment_M01()
	Local $Segment_Min_NullEins[$SegmentName[0] - 4] = [$Segment_Min_NullEins[0]] ;_SegmentLinks / 01
	$Segment_Min_NullEins[1] = $SegmentMin_10[3]
	$Segment_Min_NullEins[2] = $SegmentMin_10[6]
	Local $Segment_Min_NullEins_Greyed[$SegmentName[0] - 1] = [$Segment_Min_NullEins_Greyed[0]]
	$Segment_Min_NullEins_Greyed[1] = $SegmentMin_10[1]
	$Segment_Min_NullEins_Greyed[2] = $SegmentMin_10[2]
	$Segment_Min_NullEins_Greyed[3] = $SegmentMin_10[4]
	$Segment_Min_NullEins_Greyed[4] = $SegmentMin_10[5]
	$Segment_Min_NullEins_Greyed[5] = $SegmentMin_10[7]
;~
	For $i = 1 To UBound($Segment_Min_NullEins) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullEins[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullEins_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullEins_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M01
#endregion ### _Segment_M01 ###
;==========
#region ### _Segment_M02() ###
Func _Segment_M02()
	Local $Segment_Min_NullZwei[$SegmentName[0] - 1] = [$Segment_Min_NullZwei[0]] ;_SegmentLinks / 02
	$Segment_Min_NullZwei[1] = $SegmentMin_10[1]
	$Segment_Min_NullZwei[2] = $SegmentMin_10[3]
	$Segment_Min_NullZwei[3] = $SegmentMin_10[4]
	$Segment_Min_NullZwei[4] = $SegmentMin_10[5]
	$Segment_Min_NullZwei[5] = $SegmentMin_10[7]
	Local $Segment_Min_NullZwei_Greyed[$SegmentName[0] - 4] = [$Segment_Min_NullZwei_Greyed[0]]
	$Segment_Min_NullZwei_Greyed[1] = $SegmentMin_10[2]
	$Segment_Min_NullZwei_Greyed[2] = $SegmentMin_10[6]
;~
	For $i = 1 To UBound($Segment_Min_NullZwei) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullZwei[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullZwei_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullZwei_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M02
#endregion ### _Segment_M02() ###
;==========
#region ### _Segment_M03() ###
Func _Segment_M03()
	Local $Segment_Min_NullDrei[$SegmentName[0] - 1] = [$Segment_Min_NullDrei[0]] ;_SegmentLinks / 02
	$Segment_Min_NullDrei[1] = $SegmentMin_10[1]
	$Segment_Min_NullDrei[2] = $SegmentMin_10[3]
	$Segment_Min_NullDrei[3] = $SegmentMin_10[4]
	$Segment_Min_NullDrei[4] = $SegmentMin_10[6]
	$Segment_Min_NullDrei[5] = $SegmentMin_10[7]
	Local $Segment_Min_NullDrei_Greyed[$SegmentName[0] - 4] = [$Segment_Min_NullDrei_Greyed[0]]
	$Segment_Min_NullDrei_Greyed[1] = $SegmentMin_10[2]
	$Segment_Min_NullDrei_Greyed[2] = $SegmentMin_10[5]
;~
	For $i = 1 To UBound($Segment_Min_NullDrei) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullDrei[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullDrei_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullDrei_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M03
#endregion ### _Segment_M03() ###
;==========
#region ### _Segment_M04() ###
Func _Segment_M04()
	Local $Segment_Min_NullVier[$SegmentName[0] - 2] = [$Segment_Min_NullVier[0]] ;_SegmentLinks / 02
	$Segment_Min_NullVier[1] = $SegmentMin_10[2]
	$Segment_Min_NullVier[2] = $SegmentMin_10[3]
	$Segment_Min_NullVier[3] = $SegmentMin_10[4]
	$Segment_Min_NullVier[4] = $SegmentMin_10[6]
	Local $Segment_Min_NullVier_Greyed[$SegmentName[0] - 3] = [$Segment_Min_NullVier_Greyed[0]]
	$Segment_Min_NullVier_Greyed[1] = $SegmentMin_10[1]
	$Segment_Min_NullVier_Greyed[2] = $SegmentMin_10[5]
	$Segment_Min_NullVier_Greyed[3] = $SegmentMin_10[7]
;~
	For $i = 1 To UBound($Segment_Min_NullVier) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullVier[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullVier_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullVier_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M04
#endregion ### _Segment_M04() ###
;==========
#region ### _Segment_M05() ###
Func _Segment_M05()
	Local $Segment_Min_NullFuenf[$SegmentName[0] - 1] = [$Segment_Min_NullFuenf[0]] ;_SegmentLinks / 02
	$Segment_Min_NullFuenf[1] = $SegmentMin_10[1]
	$Segment_Min_NullFuenf[2] = $SegmentMin_10[2]
	$Segment_Min_NullFuenf[3] = $SegmentMin_10[4]
	$Segment_Min_NullFuenf[4] = $SegmentMin_10[6]
	$Segment_Min_NullFuenf[5] = $SegmentMin_10[7]
	Local $Segment_Min_NullFuenf_Greyed[$SegmentName[0] - 4] = [$Segment_Min_NullFuenf_Greyed[0]]
	$Segment_Min_NullFuenf_Greyed[1] = $SegmentMin_10[3]
	$Segment_Min_NullFuenf_Greyed[2] = $SegmentMin_10[5]
;~
	For $i = 1 To UBound($Segment_Min_NullFuenf) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullFuenf[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullFuenf_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullFuenf_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M05
#endregion ### _Segment_M05() ###
;==========
#region ### _Segment_M06() ###
Func _Segment_M06()
	Local $Segment_Min_NullSechs[$SegmentName[0]] = [$Segment_Min_NullSechs[0]] ;_SegmentLinks / 02
	$Segment_Min_NullSechs[1] = $SegmentMin_10[1]
	$Segment_Min_NullSechs[2] = $SegmentMin_10[2]
	$Segment_Min_NullSechs[3] = $SegmentMin_10[4]
	$Segment_Min_NullSechs[4] = $SegmentMin_10[5]
	$Segment_Min_NullSechs[5] = $SegmentMin_10[6]
	$Segment_Min_NullSechs[6] = $SegmentMin_10[7]
	Local $Segment_Min_NullSechs_Greyed[$SegmentName[0] - 5] = [$Segment_Min_NullSechs_Greyed[0]]
	$Segment_Min_NullSechs_Greyed[1] = $SegmentMin_10[3]
;~
	For $i = 1 To UBound($Segment_Min_NullSechs) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullSechs[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullSechs_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullSechs_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M06
#endregion ### _Segment_M06() ###
;==========
#region ### _Segment_M07() ###
Func _Segment_M07()
	Local $Segment_Min_NullSieben[$SegmentName[0] - 3] = [$Segment_Min_NullSieben[0]] ;_SegmentLinks / 02
	$Segment_Min_NullSieben[1] = $SegmentMin_10[1]
	$Segment_Min_NullSieben[2] = $SegmentMin_10[3]
	$Segment_Min_NullSieben[3] = $SegmentMin_10[6]
	Local $Segment_Min_NullSieben_Greyed[$SegmentName[0] - 2] = [$Segment_Min_NullSieben_Greyed[0]]
	$Segment_Min_NullSieben_Greyed[1] = $SegmentMin_10[2]
	$Segment_Min_NullSieben_Greyed[2] = $SegmentMin_10[4]
	$Segment_Min_NullSieben_Greyed[3] = $SegmentMin_10[5]
	$Segment_Min_NullSieben_Greyed[4] = $SegmentMin_10[7]
;~
	For $i = 1 To UBound($Segment_Min_NullSieben) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullSieben[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullSieben_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullSieben_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M07
#endregion ### _Segment_M07() ###
;==========
#region ### _Segment_M08() ###
Func _Segment_M08()
	Local $Segment_Min_NullAcht[$SegmentName[0] + 1] = [$Segment_Min_NullAcht[0]] ;_SegmentLinks / 02
	$Segment_Min_NullAcht[1] = $SegmentMin_10[1]
	$Segment_Min_NullAcht[2] = $SegmentMin_10[2]
	$Segment_Min_NullAcht[3] = $SegmentMin_10[3]
	$Segment_Min_NullAcht[4] = $SegmentMin_10[4]
	$Segment_Min_NullAcht[5] = $SegmentMin_10[5]
	$Segment_Min_NullAcht[6] = $SegmentMin_10[6]
	$Segment_Min_NullAcht[7] = $SegmentMin_10[7]
;~
	For $i = 1 To UBound($Segment_Min_NullAcht) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullAcht[$i], $Brush)
	Next
EndFunc   ;==>_Segment_M08
#endregion ### _Segment_M08() ###
;==========
#region ### _Segment_M09() ###
Func _Segment_M09()
	Local $Segment_Min_NullNeun[$SegmentName[0]] = [$Segment_Min_NullNeun[0]] ;_SegmentLinks / 02
	$Segment_Min_NullNeun[1] = $SegmentMin_10[1]
	$Segment_Min_NullNeun[2] = $SegmentMin_10[2]
	$Segment_Min_NullNeun[3] = $SegmentMin_10[3]
	$Segment_Min_NullNeun[4] = $SegmentMin_10[4]
	$Segment_Min_NullNeun[5] = $SegmentMin_10[6]
	$Segment_Min_NullNeun[6] = $SegmentMin_10[7]
	Local $Segment_Min_NullNeun_Greyed[$SegmentName[0] - 5] = [$Segment_Min_NullNeun_Greyed[0]]
	$Segment_Min_NullNeun_Greyed[1] = $SegmentMin_10[5]
;~
	For $i = 1 To UBound($Segment_Min_NullNeun) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullNeun[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_NullNeun_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_NullNeun_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M09
#endregion ### _Segment_M09() ###
;==========
#region ### _Segment_M10 ###
Func _Segment_M10()
	Local $Segment_Min_EinsNull[$SegmentName[0] - 4] = [$Segment_Min_EinsNull[0]] ;_SegmentLinks / 10
	$Segment_Min_EinsNull[1] = $SegmentMin[3]
	$Segment_Min_EinsNull[2] = $SegmentMin[6]
	Local $Segment_Min_EinsNull_Greyed[$SegmentName[0] - 1] = [$Segment_Min_EinsNull_Greyed[0]]
	$Segment_Min_EinsNull_Greyed[1] = $SegmentMin[1]
	$Segment_Min_EinsNull_Greyed[2] = $SegmentMin[2]
	$Segment_Min_EinsNull_Greyed[3] = $SegmentMin[4]
	$Segment_Min_EinsNull_Greyed[4] = $SegmentMin[5]
	$Segment_Min_EinsNull_Greyed[5] = $SegmentMin[7]
;~
	For $i = 1 To UBound($Segment_Min_EinsNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_EinsNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_EinsNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_EinsNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M10
#endregion ### _Segment_M10 ###
;==========
#region ### _Segment_M20() ###
Func _Segment_M20()
	Local $Segment_Min_ZweiNull[$SegmentName[0] - 1] = [$Segment_Min_ZweiNull[0]] ;_SegmentLinks / 20
	$Segment_Min_ZweiNull[1] = $SegmentMin[1]
	$Segment_Min_ZweiNull[2] = $SegmentMin[3]
	$Segment_Min_ZweiNull[3] = $SegmentMin[4]
	$Segment_Min_ZweiNull[4] = $SegmentMin[5]
	$Segment_Min_ZweiNull[5] = $SegmentMin[7]
	Local $Segment_Min_ZweiNull_Greyed[$SegmentName[0] - 4] = [$Segment_Min_ZweiNull_Greyed[0]]
	$Segment_Min_ZweiNull_Greyed[1] = $SegmentMin[2]
	$Segment_Min_ZweiNull_Greyed[2] = $SegmentMin[6]
;~
	For $i = 1 To UBound($Segment_Min_ZweiNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_ZweiNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_ZweiNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_ZweiNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M20
#endregion ### _Segment_M20() ###
;==========
#region ### _Segment_M30() ###
Func _Segment_M30()
	Local $Segment_Min_DreiNull[$SegmentName[0] - 1] = [$Segment_Min_DreiNull[0]] ;_SegmentLinks / 02
	$Segment_Min_DreiNull[1] = $SegmentMin[1]
	$Segment_Min_DreiNull[2] = $SegmentMin[3]
	$Segment_Min_DreiNull[3] = $SegmentMin[4]
	$Segment_Min_DreiNull[4] = $SegmentMin[6]
	$Segment_Min_DreiNull[5] = $SegmentMin[7]
	Local $Segment_Min_DreiNull_Greyed[$SegmentName[0] - 4] = [$Segment_Min_DreiNull_Greyed[0]]
	$Segment_Min_DreiNull_Greyed[1] = $SegmentMin[2]
	$Segment_Min_DreiNull_Greyed[2] = $SegmentMin[5]
;~
	For $i = 1 To UBound($Segment_Min_DreiNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_DreiNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_DreiNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_DreiNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M30
#endregion ### _Segment_M30() ###
;==========
#region ### _Segment_M40() ###
Func _Segment_M40()
	Local $Segment_Min_VierNull[$SegmentName[0] - 2] = [$Segment_Min_VierNull[0]] ;_SegmentLinks / 02
	$Segment_Min_VierNull[1] = $SegmentMin[2]
	$Segment_Min_VierNull[2] = $SegmentMin[3]
	$Segment_Min_VierNull[3] = $SegmentMin[4]
	$Segment_Min_VierNull[4] = $SegmentMin[6]
	Local $Segment_Min_VierNull_Greyed[$SegmentName[0] - 3] = [$Segment_Min_VierNull_Greyed[0]]
	$Segment_Min_VierNull_Greyed[1] = $SegmentMin[1]
	$Segment_Min_VierNull_Greyed[2] = $SegmentMin[5]
	$Segment_Min_VierNull_Greyed[3] = $SegmentMin[7]
;~
	For $i = 1 To UBound($Segment_Min_VierNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_VierNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_VierNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_VierNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M40
#endregion ### _Segment_M40() ###
;==========
#region ### _Segment_M50() ###
Func _Segment_M50()
	Local $Segment_Min_FuenfNull[$SegmentName[0] - 1] = [$Segment_Min_FuenfNull[0]] ;_SegmentLinks / 02
	$Segment_Min_FuenfNull[1] = $SegmentMin[1]
	$Segment_Min_FuenfNull[2] = $SegmentMin[2]
	$Segment_Min_FuenfNull[3] = $SegmentMin[4]
	$Segment_Min_FuenfNull[4] = $SegmentMin[6]
	$Segment_Min_FuenfNull[5] = $SegmentMin[7]
	Local $Segment_Min_FuenfNull_Greyed[$SegmentName[0] - 4] = [$Segment_Min_FuenfNull_Greyed[0]]
	$Segment_Min_FuenfNull_Greyed[1] = $SegmentMin[3]
	$Segment_Min_FuenfNull_Greyed[2] = $SegmentMin[5]
;~
	For $i = 1 To UBound($Segment_Min_FuenfNull) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_FuenfNull[$i], $Brush)
	Next
	For $ia = 1 To UBound($Segment_Min_FuenfNull_Greyed) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $Segment_Min_FuenfNull_Greyed[$ia], $Brush_Greyed)
	Next
EndFunc   ;==>_Segment_M50
#endregion ### _Segment_M50() ###
;==========
#endregion ### _Segment_Minuten ###
;====================
#region ### _SegmentAll() ###
Func _SegmentAll()
	For $i = 1 To UBound($SegmentName) - 1
		_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentHour[$i], $Brush)
		_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentHour_10[$i], $Brush)
		_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentMin[$i], $Brush)
		_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentMin_10[$i], $Brush)
	Next
	_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentSecunde[1], $Brush)
	_GDIPlus_GraphicsFillPolygon($Graphic, $SegmentSecunde[2], $Brush)
EndFunc   ;==>_SegmentAll
#endregion ### _SegmentAll() ###
;====================
#region ### _end() ###
Func _end()
	_GDIPlus_BrushDispose($Brush)
	_GDIPlus_BrushDispose($Brush_Greyed)
	_GDIPlus_GraphicsDispose($Graphic)
	_GDIPlus_Shutdown()
EndFunc   ;==>_end
#endregion ### _end() ###