2020-05-05 14:01:41 +02:00
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Translations" script:language="StarBasic" script:moduleType="normal">Function getTranslation(identifier As String) As String
Globalscope.BasicLibraries.LoadLibrary( "Tools" )
Dim lang As String
lang = GetStarOfficeLocale().Language
Select Case lang
Case "ru"
getTranslation = getRussian(identifier)
Exit Function
Case Else
getTranslation = getEnglish(identifier)
Exit Function
End Select
End Function
Function getRussian(identifier As String) As String
Select Case identifier
Case "buttonOk"
getRussian = "Применить"
Exit Function
Case "buttonCancel"
getRussian = "Отмена"
Exit Function
Case "configText1"
getRussian = "Введите в поле число от 0 до 10"
Exit Function
Case "configText2"
getRussian = "0 - возврат к автоматической нумерации"
Exit Function
Case "configText3"
getRussian = "Начать нумерацию сноско заново"
Exit Function
Case "configText4"
getRussian = "после заголовков"
Exit Function
Case "configText5"
getRussian = "уровня"
Exit Function
Case "footnotesConfigDialogTitle"
getRussian = "Применение нумерации сносок"
Exit Function
Case "statusNumberingInProcess"
getRussian = "Производится нумерация сносок"
Exit Function
Case "numberingInputOutOfRange"
getRussian = "Введенное число вне допустимого диапазона. Введите число от 0 до 10."
Exit Function
Case "statusNumberingFinished"
getRussian = "Нумерация сносок успешно завершена."
Exit Function
Case "replaceParaStyleDialogTitle"
2020-05-05 14:20:11 +02:00
getRussian = "Заменить стиль параграфа (с
Exit Function
Case "bidirectLinkSuggestion"
getRussian = "Нужно выделить два объекта для связывания"
Exit Function
Case "convertIndesignPageBreaksConfirmation"
getRussian = "Запустить восстановление разрывов страниц?"
Exit Function
Case "convertIndesignPageBreaksFinish"
getRussian = "Восстановление разрывов страниц завершено."
Exit Function
Case "convertIndesignFoonotesConfirmation"
getRussian = "Запустить восстановление сносок из текста?"
Exit Function
Case "convertIndesignFootnotesFinish"
getRussian = "Восстановление сносок завершено."
Exit Function
Case "replaceParaStyleStylesEqualsNotification"
getRussian = "Стиль параграфа и выбраный для замены стиль не различаются."
Exit Function
Case "replaceParaStyleCurrentStyleIsStandard"
getRussian = "Текущий стиль параграфа является стандратным и не может быть заменен."
Exit Function
Case "unrecoverableError"
getRussian = "Произошла ошибка. Пожалуйста, сообщите разработчику https://litvinovg.pro/pages/about.html"
Exit Function
Case "albumRotationCheckPageSettings"
getRussian = "Проверьте размеры колонтитулов и снова запустите данную функцию"
Exit Function
Case "albumRotationPageIsAlreadyAlbum"
getRussian = "Страница уже имеет портретную ориентацию. Ничего не делаем."
Exit Function
Case "albumRotationBackupStyleNotFound1"
getRussian = "Стиль страницы с
Exit Function
Case "albumRotationBackupStyleNotFound2"
getRussian = "не был найден."
Exit Function
Case "albumRotationDynamicHeaderHeight"
getRussian = "Высота верхнего колонтитула была задана динамической. Невозможно вычислить рельную высоту. Отключаем динамическую высоту. Проверьте настройки страницы."
Exit Function
Case "albumRotationDynamicHeaderOffset"
getRussian = "Отступ верхнего колонтитула от тела страницы был задан динамическим. Отключаем. Невозможно вычислить реальный отступ. Проверьте настройки страницы."
Exit Function
Case "albumRotationDynamicFooterHeight"
getRussian = "Высота нихнего колонтитула была задана динамической. Невозможно вычислить рельную высоту. Отключаем динамическую высоту. Проверьте настройки страницы."
Exit Function
Case "albumRotationDynamicFooterOffset"
getRussian = "Отступ нижнего колонтитула от тела страницы был задан динамическим. Отключаем. Невозможно вычислить рельный отступ. Проверьте настройки страницы."
Exit Function
Case "hyphenationsFailed"
getRussian = "Конвертация переносов завершилась ошибкой. Сообщите разработчику https://litvinovg.pro/pages/about.html"
Exit Function
Case "hyphenationsSuccess"
getRussian = "Конвертация переносов успешно завершена."
Exit Function
Case "hyphenationsInProgress"
getRussian = "Производится конвертация переносов. Подождите."
Exit Function
Case "hyphenationConfirmation"
getRussian = "Запустить конвертацию автоматических переносов в ручные?"
Exit Function
Case "TOCErrorNoHeadings1"
getRussian = "Н е
Exit Function
2020-05-05 15:33:25 +02:00
Case "TOCErrorNoHeadings2"
2020-05-05 14:20:11 +02:00
getRussian = "уровня не найдено."
Exit Function
Case "TOCErrorNoContents1"
getRussian = "Н е с о
Exit Function
Case "TOCErrorNoContents2"
getRussian = "не найдено."
Exit Function
Case "TOCErrorContentsNotMatchHeadings1"
getRussian = "Число параграфов с о
Exit Function
Case "TOCErrorContentsNotMatchHeadings2"
getRussian = ") не кратно числу Заголовоков"
Exit Function
Case "TOCErrorContentsNotMatchHeadings3"
getRussian = "уровня ("
Exit Function
Case "complileJournalIssueConfirmation"
getRussian = "Вы уверены, что хотите запустить сборку выпуска ?"
Exit Function
Case "compileJournalIssueNoCurFilename"
2020-05-05 15:33:25 +02:00
getRussian = "Шаблон выпуска нужно сохранить в директории с
2020-05-05 14:20:11 +02:00
Exit Function
Case "compileJournalIssueStatusInProgerss"
getRussian = "Сборка выпуска начата, подождите"
Exit Function
Case "compileJournalIssueFinished"
getRussian = "Сборка выпуска завершена."
Exit Function
Case "lastPageNumNotFound"
getRussian = "Произошла ошибка при нахождении последней страницы статьи"
Exit Function
Case "compileJournalIssueSetUDKDummyText"
getRussian = "Задать УДК"
Exit Function
Case "compileJournalIssueCopyrightDummyText"
getRussian = "© Фамилия И.О
Exit Function
Case "compileJournalIssueAuthorDummyText"
getRussian = "Фамилия И.О
Exit Function
Case "compileJournalIssueArticleTitleDummyText"
getRussian = "Название статьи"
Exit Function
Case "compileJournalIssueSectionDummyText"
getRussian = "Название раздела"
Exit Function
Case "saveVersionCommentInsertPageBreak"
getRussian = "Вставка разрыва страниц"
Exit Function
Case "compileJournalIssueStatusUpdateLastPageNumbers"
getRussian = "Производится обновление полей последних номеров страниц статей, подождите."
Exit Function
Case "compileJournalIssueInitialsAuthorDummyText"
getRussian = "И.О
Exit Function
2020-05-06 16:20:51 +02:00
Case "PageConfigDialogTranslations"
getRussian = "Размеры задаются в мм. Выберите стили страниц для изменения и укажите в целевых полях размеры в формате 12.34"
Exit Function
Case "PageConfigDialogTitle"
getRussian = "Массовая настройка стилей страниц"
Exit Function
Case "PageConfigDialogCancelButton"
getRussian = "Закрыть"
Exit Function
Case "PageConfigDialogOkButton"
getRussian = "Применить"
Exit Function
Case "pageStylesNoStyleSelected"
getRussian = "Ни одного стиля страниц не выбрано"
Exit Function
Case "pageStylesNoSettingsSet"
getRussian = "Настройки не заданы"
Exit Function
Case "PageConfigSettingsApplied"
getRussian = "Настройки применены"
Exit Function
2020-05-06 19:22:33 +02:00
Case "PageConfigPageHeight"
getRussian = "Высота страницы"
Exit Function
Case "PageConfigPageWidth"
getRussian = "Ширина страницы"
Exit Function
Case "PageConfigLeftPageMargin"
getRussian = "Отступ слева"
Exit Function
Case "PageConfigTopPageMargin"
getRussian = "Отступ сверху"
Exit Function
Case "PageConfigRightPageMargin"
getRussian = "Отступ справа"
Exit Function
Case "PageConfigBottomPageMargin"
getRussian = "Отступ снизу"
Exit Function
Case "PageConfigHeaderHeight"
getRussian = "Высота верхнего колонтитула"
Exit Function
Case "PageConfigHeaderOffset"
getRussian = "Отступ от верхнего колонтитула до текста"
Exit Function
Case "PageConfigFooterHeight"
getRussian = "Высота нижнего колонтитула"
Exit Function
Case "PageConfigFooterOffset"
getRussian = "Отступ от сносок до нижнего колонтитула"
Exit Function
Case "PageConfigFootnoteAreaHeight"
getRussian = "Максимальная высота области сносок"
Exit Function
Case "PageConfigFootnoteAreaOffset"
getRussian = "Отступ от линии сноски до области сносок"
Exit Function
Case "PageConfigTextToLine"
getRussian = "Отступ от текста до линии сноски"
Exit Function
2020-05-07 12:20:56 +02:00
Case "PageConfigMM"
getRussian = "мм"
Exit Function
2020-05-05 14:01:41 +02:00
Case Else
getRussian = "Перевод не найден"
End Select
End Function
Function getEnglish(identifier As String) As String
Select Case identifier
Case "buttonOk"
getEnglish = "Apply"
Exit Function
Case "buttonCancel"
getEnglish = "Cancel"
Exit Function
Case "configText1"
getEnglish = "Insert 0 to 10 number in the field below"
Exit Function
Case "configText2"
getEnglish = "0 –
Exit Function
Case "configText3"
getEnglish = "Restart footnote numbering"
Exit Function
Case "configText4"
getEnglish = "after heading with"
Exit Function
Case "configText5"
getEnglish = "level"
Exit Function
Case "footnotesConfigDialogTitle"
getEnglish = "Apply footnotes numbering"
Exit Function
Case "statusNumberingInProcess"
getEnglish = "Numbering in process"
Exit Function
Case "numberingInputOutOfRange"
getEnglish = "Input is out of range. Insert number from 0 to 10."
Exit Function
Case "statusNumberingFinished"
getEnglish = "Footnotes numbering finished successfully."
Exit Function
Case "replaceParaStyleDialogTitle"
2020-05-05 14:20:11 +02:00
getEnglish = "Replace paragraph style (with removal) by choosen one"
Exit Function
Case "bidirectLinkSuggestion"
getEnglish = "You should select two objects to link"
Exit Function
Case "convertIndesignPageBreaksConfirmation"
getEnglish = "Start page break conversion from text?"
Exit Function
Case "convertIndesignPageBreaksFinish"
getEnglish = "Page break conversion successfully completed."
Exit Function
Case "convertIndesignFoonotesConfirmation"
getEnglish = "Start footnotes conversion from text?"
Exit Function
Case "convertIndesignFootnotesFinish"
getEnglish = "Footnotes conversion successfully completed."
Exit Function
Case "replaceParaStyleStylesEqualsNotification"
getEnglish = "Current paragraph style and choosen replacement style are equal."
Exit Function
Case "replaceParaStyleCurrentStyleIsStandard"
getEnglish = "Current paragraph style is standard and couldn't be repaced or removed."
Exit Function
Case "unrecoverableError"
getEnglish = "Error. Notify developer, please. https://litvinovg.pro/pages/about.html"
Exit Function
Case "albumRotationCheckPageSettings"
getEnglish = "Check header and footer heigths and restart this function"
Exit Function
Case "albumRotationPageIsAlreadyAlbum"
getEnglish = "Page is already album. Nothing to do."
Exit Function
Case "albumRotationBackupStyleNotFound1"
getEnglish = "Portrait page style"
Exit Function
Case "albumRotationBackupStyleNotFound2"
getEnglish = "wasn't found."
Exit Function
Case "albumRotationDynamicHeaderHeight"
getEnglish = "Header height was dynamic. Can't caclulate real height. Turned off dynamic height. Check page settings to verify height is valid."
Exit Function
Case "albumRotationDynamicHeaderOffset"
getEnglish = "Header offset was set dynamic. Can't calculate real offset. Turned off dynamic offset. Check page settgins to verify offset is valid."
Exit Function
Case "albumRotationDynamicFooterHeight"
getEnglish = "Footer height was dynamic. Can't caclulate real height. Turned off dynamic height. Check page settings to verify height is valid."
Exit Function
Case "albumRotationDynamicFooterOffset"
getEnglish = "Footer offset was set dynamic. Can't calculate real offset. Turned off dynamic offset. Check page settgins to verify offset is valid."
Exit Function
Case "hyphenationsFailed"
getEnglish = "Hyphenation conversion failed. Please notify developer https://litvinovg.pro/pages/about.html"
Exit Function
Case "hyphenationsSuccess"
getEnglish = "Hyphenation conversion successfully completed."
Exit Function
Case "hyphenationsInProgress"
getEnglish = "Hyphenation conversion in progress. Wait a bit."
Exit Function
Case "hyphenationConfirmation"
getEnglish = "Do you really want to convert all automatic hyphenations to manual hyphenations?"
Exit Function
Case "TOCErrorNoHeadings1"
getEnglish = "Can't create links in table of contents. No headings with "
Exit Function
2020-05-05 15:33:25 +02:00
Case "TOCErrorNoHeadings2"
2020-05-05 14:20:11 +02:00
getEnglish = "level found."
Exit Function
Case "TOCErrorNoContents1"
getEnglish = "Can't create links in table of contents. No paras with style Contents "
Exit Function
Case "TOCErrorNoContents2"
getEnglish = "found."
Exit Function
Case "TOCErrorContentsNotMatchHeadings1"
getEnglish = "Number of paras with style Contents "
Exit Function
Case "TOCErrorContentsNotMatchHeadings2"
getEnglish = ") dosn't match number of headings with "
Exit Function
Case "TOCErrorContentsNotMatchHeadings3"
getEnglish = "level ("
Exit Function
Case "complileJournalIssueConfirmation"
getEnglish = "Compile journal issue from articles?"
Exit Function
Case "compileJournalIssueNoCurFilename"
2020-05-05 15:33:25 +02:00
getEnglish = "Save issue template in the same directory where are the articles."
2020-05-05 14:20:11 +02:00
Exit Function
Case "compileJournalIssueStatusInProgerss"
getEnglish = "Issue compilation in progress"
Exit Function
Case "compileJournalIssueFinished"
getEnglish = "Issue compilation finished."
Exit Function
Case "lastPageNumNotFound"
getEnglish = "Error. Last article page not found."
Exit Function
Case "compileJournalIssueSetUDKDummyText"
getEnglish = "Set UDK"
Exit Function
Case "compileJournalIssueCopyrightDummyText"
getEnglish = "© Copyright"
Exit Function
Case "compileJournalIssueAuthorDummyText"
getEnglish = "Author should be here"
Exit Function
Case "compileJournalIssueArticleTitleDummyText"
getEnglish = "Article title should be here"
Exit Function
Case "compileJournalIssueSectionDummyText"
getEnglish = "Section name should be here"
Exit Function
Case "saveVersionCommentInsertPageBreak"
getEnglish = "Insert page break"
Exit Function
Case "compileJournalIssueStatusUpdateLastPageNumbers"
getEnglish = "Last article page numbers updating"
Exit Function
Case "compileJournalIssueInitialsAuthorDummyText"
getEnglish = "И.О
Exit Function
2020-05-06 16:20:51 +02:00
Case "PageConfigDialogTranslations"
getEnglish = "Dimensions are set in mm. Choose page styles and fill in target fields in format 12.34"
Exit Function
Case "PageConfigDialogTitle"
getEnglish = "Page styles batch settings"
Exit Function
Case "PageConfigDialogCancelButton"
getEnglish = "Cancel"
Exit Function
Case "PageConfigDialogOkButton"
getEnglish = "Ok"
Exit Function
Case "pageStylesNoStyleSelected"
getEnglish = "No page styles selected. Select at least one."
Exit Function
Case "pageStylesNoSettingsSet"
getEnglish = "No settings set. Set at least one."
Exit Function
Case "PageConfigSettingsApplied"
getEnglish = "Settings saved."
Exit Function
2020-05-06 19:22:33 +02:00
Case "PageConfigPageHeight"
getEnglish = "Page height"
Exit Function
Case "PageConfigPageWidth"
getEnglish = "Page width"
Exit Function
Case "PageConfigLeftPageMargin"
getEnglish = "Left margin"
Exit Function
Case "PageConfigTopPageMargin"
getEnglish = "Top margin"
Exit Function
Case "PageConfigRightPageMargin"
getEnglish = "Rigth margin"
Exit Function
Case "PageConfigBottomPageMargin"
getEnglish = "Bottom margin"
Exit Function
Case "PageConfigHeaderHeight"
getEnglish = "Header height"
Exit Function
Case "PageConfigHeaderOffset"
getEnglish = "Indent from header to text body"
Exit Function
Case "PageConfigFooterHeight"
getEnglish = "Footer height"
Exit Function
Case "PageConfigFooterOffset"
getEnglish = "Indent from footnotes to footer"
Exit Function
Case "PageConfigFootnoteAreaHeight"
getEnglish = "Footnotes maximum height"
Exit Function
Case "PageConfigFootnoteAreaOffset"
getEnglish = "Indent from footnote line to footnote area"
Exit Function
Case "PageConfigTextToLine"
getEnglish = "Indent from text to footnote line"
Exit Function
2020-05-07 12:20:56 +02:00
Case "PageConfigMM"
getEnglish = "mm"
Exit Function
2020-05-05 14:01:41 +02:00
Case Else
getEnglish = "No translation"
End Select
End Function
</script:module>
