option add *Calendar.Canvas.DateFont -*-times-medium-r-normal--12-*-*-*-*-iso10646-1 widgetDefault
namespace eval clock {
array set monthNames {
-1 {ÑÎ×ÁÒÑ ÑÎ×ÁÒØ}
-2 {ÆÅ×ÒÁÌÑ ÆÅ×ÒÁÌØ}
-3 {ÍÁÒÔÁ ÍÁÒÔ}
-4 {ÁÐÒÅÌÑ ÁÐÒÅÌØ}
-5 {ÍÁÑ ÍÁÊ}
-6 {ÉÀÎÑ ÉÀÎØ}
-7 {ÉÀÌÑ ÉÀÌØ}
-8 {Á×ÇÕÓÔÁ Á×ÇÕÓÔ}
-9 {ÓÅÎÔÑÂÒÑ ÓÅÎÔÑÂÒØ}
-10 {ÏËÔÑÂÒÑ ÏËÔÑÂÒØ}
-11 {ÎÏÑÂÒÑ ÎÏÑÂÒØ}
-12 {ÄÅËÁÂÒÑ ÄÅËÁÂÒØ}
+1 {\u044f\u043d\u0432\u0430\u0440\u044f \u044f\u043d\u0432\u0430\u0440\u044c}
+2 {\u0444\u0435\u0432\u0440\u0430\u043b\u044f \u0444\u0435\u0432\u0440\u0430\u043b\u044c}
+3 {\u043c\u0430\u0440\u0442\u0430 \u043c\u0430\u0440\u0442}
+4 {\u0430\u043f\u0440\u0435\u043b\u044f \u0430\u043f\u0440\u0435\u043b\u044c}
+5 {\u043c\u0430\u044f \u043c\u0430\u0439}
+6 {\u0438\u044e\u043d\u044f \u0438\u044e\u043d\u044c}
+7 {\u0438\u044e\u043b\u044f \u0438\u044e\u043b\u044c}
+8 {\u0430\u0432\u0433\u0443\u0441\u0442\u0430 \u0430\u0432\u0433\u0443\u0441\u0442}
+9 {\u0441\u0435\u043d\u0442\u044f\u0431\u0440\u044f \u0441\u0435\u043d\u0442\u044f\u0431\u0440\u044c}
+10 {\u043e\u043a\u0442\u044f\u0431\u0440\u044f \u043e\u043a\u0442\u044f\u0431\u0440\u044c}
+11 {\u043d\u043e\u044f\u0431\u0440\u044f \u043d\u043e\u044f\u0431\u0440\u044c}
+12 {\u0434\u0435\u043a\u0430\u0431\u0440\u044f \u0434\u0435\u043a\u0430\u0431\u0440\u044c}
}
array set weekday {
-0 {×ÏÓËÒÅÓÅÎØÅ red}
-1 {ÐÏÎÅÄÅÌØÎÉË black}
-2 {×ÔÏÒÎÉË black}
-3 {ÓÒÅÄÁ black}
-4 {ÞÅÔ×ÅÒÇ black}
-5 {ÐÑÔÎÉÃÁ black}
-6 {ÓÕÂÂÏÔÁ red}
+0 {\u0432\u043e\u0441\u043a\u0440\u0435\u0441\u0435\u043d\u044c\u0435 red}
+1 {\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a black}
+2 {\u0432\u0442\u043e\u0440\u043d\u0438\u043a black}
+3 {\u0441\u0440\u0435\u0434\u0430 black}
+4 {\u0447\u0435\u0442\u0432\u0435\u0440\u0433 black}
+5 {\u043f\u044f\u0442\u043d\u0438\u0446\u0430 black}
+6 {\u0441\u0443\u0431\u0431\u043e\u0442\u0430 red}
}
-set weekDayAbbr {÷Ó ðÎ ÷Ô óÒ þÔ ðÔ óÂ}
+set weekDayAbbr {\u0412\u0441 \u041f\u043d \u0412\u0442 \u0421\u0440 \u0427\u0442 \u041f\u0442 \u0421\u0431}
proc currentMonth {} {
eval fill_calendar [clock format [clock seconds] -format "%m %Y"]
}