TRANSLATE TYPE CONSTANTS_LANGUAGE - SLOVENIAN (SLOVENSKO)

[jinx17]

Hi,
I would like to add a Slovenian language (SLOVENSKO)

TYPE CONSTANTS_LANGUAGE :
STRUCT
   (* Language Setup *)
   DEFAULT : INT := 1; (* 1=english, 2=german, 3=french, 4=slovenian *)
   LMAX : INT := 4;
   WEEKDAYS : ARRAY[1..4, 1..7] OF STRING(10) :=   'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday', 'Sunday',
                                       'Montag', 'Dienstag', 'Mittwoch', 'Donnerstag', 'Freitag', 'Samstag', 'Sonntag',
                                       'Lundi', 'Mardi', 'Mercredi', 'Jeudi', 'Vendredi', 'Samedi', 'Dimanche',
                                       'Ponedeljek', 'Torek', 'Sreda', 'ÄŒetrtek', 'Petek', 'Sobota', 'Nedelja';
   WEEKDAYS2 : ARRAY[1..4, 1..7] OF STRING(2) :=   'Mo', 'Tu', 'We', 'Th', 'Fr', 'Sa', 'Su',
                                             'Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa', 'So',
                                             'Lu', 'Ma', 'Me', 'Je', 'Ve', 'Sa', 'Di',
                                             'Po', 'To', 'Sr', 'ÄŒe', 'Pe', 'So', 'Ne';
   MONTHS : ARRAY[1..4, 1..12] OF STRING(10) :=   'January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December',
                                             'Januar', 'Februar', 'März', 'April', 'Mai', 'Juni', 'Juli', 'August', 'September', 'Oktober', 'November', 'Dezember',
                                             'Janvier', 'Février', 'mars', 'Avril', 'Mai', 'Juin', 'Juillet', 'Août', 'Septembre', 'Octobre', 'Novembre', 'Decembre',
                                             'Januar', 'Februar', 'Marec', 'April', 'Maj', 'Junij', 'Julij', 'Avgust', 'September', 'Oktober', 'November', 'December';
   MONTHS3 : ARRAY[1..4, 1..12] OF STRING(3) :=   'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec',
                                             'Jan', 'Feb', 'Mrz', 'Apr', 'Mai', 'Jun', 'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez',
                                             'Jan', 'Fev', 'Mar', 'Avr', 'Mai', 'Jun', 'Jul', 'Aou', 'Sep', 'Oct', 'Nov', 'Dec',
                                             'Jan', 'Feb', 'Mar', 'Apr', 'Maj', 'Jun', 'Jul', 'Avg', 'Sep', 'Okt', 'Nov', 'Dec';
   DIRS : ARRAY[1..4,0..15] OF STRING(3) :=   'N', 'NNE', 'NE', 'ENE', 'E', 'ESE', 'SE', 'SSE', 'S', 'SSW', 'SW', 'WSW', 'W', 'WNW', 'NW', 'NNW',
                                       'N', 'NNO', 'NO', 'ONO', 'O', 'OSO', 'SO', 'SSO', 'S', 'SSW', 'SW', 'WSW', 'W', 'WNW', 'NW', 'NNW',
                                       'N', 'NNO', 'NO', 'ONO', 'O', 'OSO', 'SO', 'SSO', 'S', 'SSW', 'SW', 'WSW', 'W', 'WNW', 'NW', 'NNW',
                                       'S', 'SSV', 'SV', 'VSV', 'V', 'VJV', 'JV', 'JJV', 'J', 'JJZ', 'JZ', 'ZJZ', 'Z', 'ZSZ', 'SZ', 'SSZ';
END_STRUCT
END_TYPE

(* revision history
hm   19.10.2008   rev 1.0
   original version

hm   22.10.2008   rev 1.1
   added directions DIRS

phd 03-12-2008     rev 1.2
*)