' If $Schedule.EndHour
'  $SetHour = $Schedule.SetHour 
'  $EndHour = $Schedule.EndHour 
' Else
'  $SetHour = 8
'  $EndHour = 20
' EndIf
' $MaxHour = $EndHour
' Inc $MaxHour -1
' $TimeSpan = $System.TimeSpan $Schedule.Unit
' $Count = 0
' For $t = $SetHour to $MaxHour
'  Inc $Count $TimeSpan
' Next