[+ $day +]. [+ $mesiac{$month} +] [+ $year +]    [- $hour = 6 -] [$ while $hour<=20 $] [- $min = 00 -] [$ while $min <= 30 $] [$ if ($min == 0) $] [$ else $] [$ endif $] [- $min += 30 -] [$ endwhile $] [- $hour += 1 -] [$ endwhile $]

[+ $hour +]:[+ $min +][+ $min +]

[+ $hour +]:[+ $min +]

Back on the week