Налаштування мов

Як приклад наведемо скрипт російської.

begin
//Сума прописом
dmNativeSets.RPropis.SetChislo(0,'нуль');
dmNativeSets.RPropis.SetChislo(1,'один');

dmNativeSets.RPropis.SetChislo(2,'два');
dmNativeSets.RPropis.SetChislo(3,'три');
dmNativeSets.RPropis.SetChislo(4,'чотири');
dmNativeSets.RPropis.SetChislo(5,'п'ять');
dmNativeSets.RPropis.SetChislo(6,'шість');
dmNativeSets.RPropis.SetChislo(7,'сім');
dmNativeSets.RPropis.SetChislo(8,'вісім');
dmNativeSets.RPropis.SetChislo(9,'дев'ять');
dmNativeSets.RPropis.SetChislo(10,'десять');
dmNativeSets.RPropis.SetChislo(11,'одинадцять');
dmNativeSets.RPropis.SetChislo(12,'дванадцять');
dmNativeSets.RPropis.SetChislo(13,'тринадцять');
dmNativeSets.RPropis.SetChislo(14,'чотирнадцять');
dmNativeSets.RPropis.SetChislo(15,'п'ятнадцять');
dmNativeSets.RPropis.SetChislo(16,'шістнадцять');
dmNativeSets.RPropis.SetChislo(17,'сімнадцять');
dmNativeSets.RPropis.SetChislo(18,'вісімнадцять');
dmNativeSets.RPropis.SetChislo(19,'дев'ятнадцять');
dmNativeSets.RPropis.SetChislo(20,'двадцять');
dmNativeSets.RPropis.SetChislo(21,'тридцять');
dmNativeSets.RPropis.SetChislo(22,'сорок');
dmNativeSets.RPropis.SetChislo(23,'п'ятдесят');
dmNativeSets.RPropis.SetChislo(24,'шістдесят');
dmNativeSets.RPropis.SetChislo(25,'сімдесят');
dmNativeSets.RPropis.SetChislo(26,'вісімдесят');
dmNativeSets.RPropis.SetChislo(27,'дев'яносто');
dmNativeSets.RPropis.SetChislo(28,'сто');
dmNativeSets.RPropis.SetChislo(29,'двісті');
dmNativeSets.RPropis.SetChislo(30,'триста');
dmNativeSets.RPropis.SetChislo(31,'чотириста');
dmNativeSets.RPropis.SetChislo(32,'п'ятсот');
dmNativeSets.RPropis.SetChislo(33,'шістсот');
dmNativeSets.RPropis.SetChislo(34,'сімсот');
dmNativeSets.RPropis.SetChislo(35,'вісімсот');
dmNativeSets.RPropis.SetChislo(36,'дев'ятсот');
dmNativeSets.RPropis.SetChislo(37,'тисяча');
dmNativeSets.RPropis.SetChislo(38,'тисячі');
dmNativeSets.RPropis.SetChislo(39,'тисяч');
dmNativeSets.RPropis.SetChislo(40,'мільйон');
dmNativeSets.RPropis.SetChislo(41,'мільйона');
dmNativeSets.RPropis.SetChislo(42,'мільйонів');
dmNativeSets.RPropis.SetChislo(43,'мільярд');
dmNativeSets.RPropis.SetChislo(44,'мільярда');
dmNativeSets.RPropis.SetChislo(45,'мільярдів');
dmNativeSets.RPropis.SetChislo(46,'одна');
dmNativeSets.RPropis.SetChislo(47,'дві');

// Основна валюта
dmNativeSets.RPropis.SetGrivna(0,'гривен');
dmNativeSets.RPropis.SetGrivna(1,'гривня');
dmNativeSets.RPropis.SetGrivna(2,'гривні');

// Основна валюта (дрібниця)
dmNativeSets.RPropis.SetKop(0,'копійок');
dmNativeSets.RPropis.SetKop(1,'копійка');
dmNativeSets.RPropis.SetKop(2,'копійки');

// Місяці прописом
dmNativeSets.RPropis.SetMonthPropis(1,'січня');
dmNativeSets.RPropis.SetMonthPropis(2,'лютого');
dmNativeSets.RPropis.SetMonthPropis(3,'березня');
dmNativeSets.RPropis.SetMonthPropis(4,'квітня');
dmNativeSets.RPropis.SetMonthPropis(5,'травня');
dmNativeSets.RPropis.SetMonthPropis(6,'червня');
dmNativeSets.RPropis.SetMonthPropis(7,'липня');
dmNativeSets.RPropis.SetMonthPropis(8,'серпня');
dmNativeSets.RPropis.SetMonthPropis(9,'вересня');
dmNativeSets.RPropis.SetMonthPropis(10,'жовтня');
dmNativeSets.RPropis.SetMonthPropis(11,'листопада');
dmNativeSets.RPropis.SetMonthPropis(12,'грудня');

// Місяць прописом (в називному відмінку)
dmNativeSets.RPropis.SetMonthPropisIm(1,'Січень');
dmNativeSets.RPropis.SetMonthPropisIm(2,'Лютий');
dmNativeSets.RPropis.SetMonthPropisIm(3,'Березень');
dmNativeSets.RPropis.SetMonthPropisIm(4,'Квітень');
dmNativeSets.RPropis.SetMonthPropisIm(5,'травень');
dmNativeSets.RPropis.SetMonthPropisIm(6,'Червень');
dmNativeSets.RPropis.SetMonthPropisIm(7,'Липень');
dmNativeSets.RPropis.SetMonthPropisIm(8,'Август');
dmNativeSets.RPropis.SetMonthPropisIm(9,'Вересень');
dmNativeSets.RPropis.SetMonthPropisIm(10,'Жовтень');
dmNativeSets.RPropis.SetMonthPropisIm(11,'Листопад');
dmNativeSets.RPropis.SetMonthPropisIm(12,'Грудень');

end;

Як бачите, це паскале-подібний скрипт. У цьому скрипті підтримуються основні команди та конструкції, що застосовуються у паскалі. Докладніше про скриптову мову можна прочитати в розділі скриптова мова.

ПроцедураNativeSets.RPropis.SetChislo(0,'нуль'); вказує назву числа цією мовою.

ПроцедураdmNativeSets.RPropis.SetGrivna(0,'гривен'); вказує назву основної валюти цією мовою.

ПроцедураdmNativeSets.RPropis.SetMonthPropis(4,'квітня'); вказує назву відповідного місяця у родовому відмінку.

ПроцедураdmNativeSets.RPropis.SetMonthPropisIm(5,'травень'); вказує назву відповідного місяця в називному відмінку.