@artel/ru-artel-system 0.6.25264 → 0.6.25265

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@artel/ru-artel-system",
-  "version": "0.6.25264",
+  "version": "0.6.25265",
   "description": "*А* Артель (RU)",
   "author": "Nezaboodka Team <contact@nezaboodka.com>",
   "license": "LGPL-3.0-or-later",

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214//320/230/320/275/321/202/320/265/321/200/320/262/320/260/320/273./320/260/321/200/321/202

@@ -0,0 +1,12 @@
+
+функция интервал(начало: Целое, конец: Целое): Перебираемый<Целое>
+
+функция интервал(начало: Целое, конец: Целое, шаг: Целое): Перебираемый<Целое>
+
+функция полузамкнутый-интервал(начало: Целое, конец: Целое): Перебираемый<Целое>
+
+функция полузамкнутый-интервал(начало: Целое, конец: Целое, шаг: Целое): Перебираемый<Целое>
+
+функция интервал(начало: Число, конец: Число, шаг: Число): Перебираемый<Число>
+
+функция полузамкнутый-интервал(начало: Число, конец: Число, шаг: Число): Перебираемый<Число>

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214//320/237/320/260/320/272/320/265/321/202./320/260/321/200/321/202

@@ -0,0 +1,14 @@
+тип Пакет = объект
+{
+  всеобщие
+  {
+    чтение главный-пакет: Пакет
+    чтение свой-пакет: Пакет
+  }
+
+  конст имя: Текст
+  конст свой-переводчик: ПереводчикПакета
+
+  скрыто(в пакете)
+  создание(имя`: Текст)
+}

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214//320/237/320/265/321/200/320/265/320/262/320/276/320/264/321/213./320/260/321/200/321/202

@@ -1,14 +1,40 @@
+тип КлючПереводимогоТекста = Целое | Текст
 
-тип Переводчик = аспект
+тип ПереводчикПакета = объект
 {
-  абстрактная функция перевести-в-текст(шаблон: ШаблонТекста): Текст
+  скрыто(в пакете)
+  создание(пакет: Пакет)
+
+  функция перевести(текст: Текст, ключ: КлючПереводимогоТекста? = пусто): Текст
+  функция перевести(шаблон: ШаблонТекста, ключ: КлючПереводимогоТекста? = пусто): Текст
 }
 
-тип ШаблонТекстаПереводимый = объект ШаблонТекста
+тип Переводчик = объект
 {
-  конст переводчик: Переводчик?
+  всеобщие
+  {
+    чтение язык: Текст
+    запись язык
+  }
+
+  скрыто(в пакете)
+  создание()
+
+  всеобщие
+  {
+    функция добавить-перевод-на-язык(имя-пакета: Текст, язык: Текст, словарь-переводов: СловарьПереводов)
+    функция получить-словарь-переводов-пакета-на-язык(пакет: Пакет, язык: Текст): СловарьПереводовНаЯзык
+  }
+}
 
-  создание(фрагменты`: Массив<Текст>, значения`: Массив<Объект>, переводчик`: Переводчик? = пусто)
+тип ФункцияПеревода = функция(значения: Массив<Объект?>?): Текст
+
+тип СловарьПереводов = Словарь<КлючПереводимогоТекста, Текст | ФункцияПеревода>
+
+тип СловарьПереводовНаЯзык = объект
+{
+  конст язык: Текст
+  конст словарь: СловарьПереводов
 
-  расширенная функция в-текст(): Текст
+  создание(язык: Текст, словарь: СловарьПереводов)
 }

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214//320/242/320/265/320/272/321/201/321/202./320/260/321/200/321/202

@@ -61,6 +61,8 @@
   всеобщая функция сравнить(первый: Текст?, второй: Текст?): Целое
   всеобщая функция сравнить(первый: Текст?, второй: Текст?, режим: РежимСравненияТекстов): Целое
 
+  всеобщая функция объединить(тексты: Перебираемый<Текст>, разделитель: Текст? = пусто): Текст
+
   функция '+'(др: Текст): Текст
 }
 

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214./320/240/320/265/320/260/320/273/320/270/320/267/320/260/321/206/320/270/321/217./320/224/320/266/320/260/320/262/320/260/320/241/320/272/321/200/320/270/320/277/321/202//320/230/320/275/321/202/320/265/321/200/320/262/320/260/320/273./320/260/321/200/321/202

@@ -0,0 +1,48 @@
+подключить А = Артель
+подключить JS = Platform.JavaScript
+
+функция интервал(начало: А.Целое, конец: А.Целое): А.Перебираемый<А.Целое>
+{
+  вернуть интервал(начало, конец, 1)
+}
+
+функция интервал(начало: А.Целое, конец: А.Целое, шаг: А.Целое): А.Перебираемый<А.Целое>
+{
+  пока начало <= конец
+  {
+    выдать начало
+    начало += шаг
+  }
+}
+
+функция полузамкнутый-интервал(начало: А.Целое, конец: А.Целое): А.Перебираемый<А.Целое>
+{
+  вернуть полузамкнутый-интервал(начало, конец, 1)
+}
+
+функция полузамкнутый-интервал(начало: А.Целое, конец: А.Целое, шаг: А.Целое): А.Перебираемый<А.Целое>
+{
+  пока начало < конец
+  {
+    выдать начало
+    начало += шаг
+  }
+}
+
+функция интервал(начало: А.Число, конец: А.Число, шаг: А.Число): А.Перебираемый<А.Число>
+{
+  пока начало <= конец
+  {
+    выдать начало
+    начало += шаг
+  }
+}
+
+функция полузамкнутый-интервал(начало: А.Число, конец: А.Число, шаг: А.Число): А.Перебираемый<А.Число>
+{
+  пока начало < конец
+  {
+    выдать начало
+    начало += шаг
+  }
+}

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214./320/240/320/265/320/260/320/273/320/270/320/267/320/260/321/206/320/270/321/217./320/224/320/266/320/260/320/262/320/260/320/241/320/272/321/200/320/270/320/277/321/202//320/237/320/260/320/272/320/265/321/202./320/260/321/200/321/202

@@ -0,0 +1,23 @@
+подключить А = Артель
+подключить ВЗ = Артель.Взаимодействие
+
+тип Пакет = объект
+{
+  всеобщие
+  {
+    #ВЗ.ВстроеноВПлатформу
+    чтение главный-пакет: А.Пакет
+    #ВЗ.ВстроеноВПлатформу
+    чтение свой-пакет: А.Пакет
+  }
+
+  конст имя: А.Текст
+  конст свой-переводчик: А.ПереводчикПакета
+
+  скрыто(в пакете)
+  создание(имя`: А.Текст)
+  {
+    имя = имя`
+    свой-переводчик = ПереводчикПакета(объект как А.Пакет) как А.ПереводчикПакета
+  }
+}

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214./320/240/320/265/320/260/320/273/320/270/320/267/320/260/321/206/320/270/321/217./320/224/320/266/320/260/320/262/320/260/320/241/320/272/321/200/320/270/320/277/321/202//320/237/320/265/321/200/320/265/320/262/320/276/320/264/321/213./320/260/321/200/321/202

@@ -1,18 +1,127 @@
 подключить А = Артель
 
 скрыто(в пакете)
-тип ШаблонТекстаПереводимый = объект А.ШаблонТекста
+тип ПереводчикПакета = объект
 {
-  конст переводчик: А.Переводчик?
+  конст пакет: А.Пакет
+  скрыто текущий-словарь: А.СловарьПереводовНаЯзык?
 
-  создание(фрагменты`: А.Массив<А.Текст>, значения`: А.Массив<А.Объект?>, переводчик`: А.Переводчик? = пусто)
+  скрыто(в пакете)
+  создание(пакет`: А.Пакет)
   {
-    основа(фрагменты`, значения`)
-    переводчик = переводчик`
+    пакет = пакет`
   }
 
-  расширенная функция в-текст(): А.Текст
+  функция перевести(текст: А.Текст, ключ: А.КлючПереводимогоТекста? = пусто): А.Текст
   {
-    результат = переводчик?.перевести-в-текст(объект) ?? основа.в-текст()
+    если ключ == пусто
+    {
+      ключ = текст
+    }
+    конст текущий-словарь = получить-текущий-словарь()
+    конст переведённый-текст-или-функция = текущий-словарь.словарь.получить(ключ)
+    если переведённый-текст-или-функция == пусто
+    {
+      результат = текст
+    }
+    иначе если переведённый-текст-или-функция это А.Текст
+    {
+      результат = переведённый-текст-или-функция
+    }
+    иначе
+    {
+      результат = переведённый-текст-или-функция(пусто)
+    }
   }
+
+  функция перевести(шаблон: А.ШаблонТекста, ключ: А.КлючПереводимогоТекста? = пусто): А.Текст
+  {
+    если ключ == пусто
+    {
+      ключ = А.Текст.объединить(шаблон.фрагменты, "_")
+    }
+    конст текущий-словарь = получить-текущий-словарь()
+    конст переведённый-текст-или-функция = текущий-словарь.словарь.получить(ключ)
+    если переведённый-текст-или-функция == пусто
+    {
+      результат = шаблон.в-текст()
+    }
+    иначе если переведённый-текст-или-функция это А.Текст
+    {
+      результат = переведённый-текст-или-функция
+    }
+    иначе
+    {
+      результат = переведённый-текст-или-функция(шаблон.значения)
+    }
+  }
+
+  скрыто функция получить-текущий-словарь(): А.СловарьПереводовНаЯзык
+  {
+    если текущий-словарь == пусто или текущий-словарь.язык != А.Переводчик.язык
+    {
+      текущий-словарь = Переводчик.получить-словарь-переводов-пакета-на-язык(пакет, А.Переводчик.язык)
+    }
+    вернуть текущий-словарь
+  }
+}
+
+скрыто(в пакете)
+тип Переводчик = объект
+{
+  всеобщие
+  {
+    чтение язык: А.Текст { язык`` }
+    запись язык { язык`` = значение }
+
+    скрыто словарь-переводов-пакетов = А.Словарь<А.Текст, А.Словарь<А.Текст, А.СловарьПереводовНаЯзык>>()
+  }
+
+  скрыто(в пакете)
+  создание()
+  {
+  }
+
+  всеобщие
+  {
+    функция добавить-перевод-на-язык(имя-пакета: А.Текст, язык: А.Текст, словарь-переводов: А.СловарьПереводов)
+    {
+      пусть словарь-переводов-пакета = словарь-переводов-пакетов.получить(имя-пакета)
+      если словарь-переводов-пакета == пусто
+      {
+        словарь-переводов-пакета = А.Словарь()
+        словарь-переводов-пакетов.добавить(имя-пакета, словарь-переводов-пакета)
+      }
+      словарь-переводов-пакета.добавить(язык, А.СловарьПереводовНаЯзык(язык, словарь-переводов))
+    }
+
+    функция получить-словарь-переводов-пакета-на-язык(пакет: А.Пакет, язык: А.Текст): А.СловарьПереводовНаЯзык
+    {
+      пусть словарь-переводов-пакета = словарь-переводов-пакетов.получить(пакет.имя)
+      если словарь-переводов-пакета == пусто
+      {
+        словарь-переводов-пакета = А.Словарь()
+        словарь-переводов-пакетов.добавить(пакет.имя, словарь-переводов-пакета)
+      }
+      пусть словарь-переводов-пакета-на-язык = словарь-переводов-пакета.получить(язык)
+      если словарь-переводов-пакета-на-язык == пусто
+      {
+        словарь-переводов-пакета-на-язык = А.СловарьПереводовНаЯзык(язык, А.СловарьПереводов())
+        словарь-переводов-пакета.добавить(пакет.имя, словарь-переводов-пакета-на-язык)
+      }
+      результат = словарь-переводов-пакета-на-язык
+    }
+  }
+}
+
+скрыто(в пакете)
+тип СловарьПереводовНаЯзык = объект
+{
+  конст язык: А.Текст
+  конст словарь: А.СловарьПереводов
+}
+
+создание
+{
+  Переводчик.язык`` = "ru"
 }

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214./320/240/320/265/320/260/320/273/320/270/320/267/320/260/321/206/320/270/321/217./320/224/320/266/320/260/320/262/320/260/320/241/320/272/321/200/320/270/320/277/321/202//320/242/320/265/320/272/321/201/321/202./320/260/321/200/321/202

@@ -201,6 +201,29 @@
     0)))
   }
 
+  всеобщая функция объединить(тексты: А.Перебираемый<А.Текст>, разделитель: А.Текст? = пусто): А.Текст
+  {
+    если тексты это JS.Array<А.Текст>
+    {
+      результат = тексты.join(разделитель)
+    }
+    иначе
+    {
+      результат = ""
+      для э, индекс из тексты
+      {
+        если индекс > 0 и разделитель != пусто
+        {
+          результат += разделитель
+        }
+        если э != пусто
+        {
+          результат += э.в-текст()
+        }
+      }
+    }
+  }
+
   #ВЗ.ВстроеноВПлатформу
   функция '+'(др: А.Текст): А.Текст
 }

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214//320/237/321/200/320/276/320/274/320/265/320/266/321/203/321/202/320/276/320/272./320/260/321/200/321/202

@@ -1,12 +0,0 @@
-
-функция промежуток(начало: Целое, конец: Целое): Перебираемый<Целое>
-
-функция промежуток(начало: Целое, конец: Целое, шаг: Целое): Перебираемый<Целое>
-
-функция полузамкнутый-промежуток(начало: Целое, конец: Целое): Перебираемый<Целое>
-
-функция полузамкнутый-промежуток(начало: Целое, конец: Целое, шаг: Целое): Перебираемый<Целое>
-
-функция промежуток(начало: Число, конец: Число, шаг: Число): Перебираемый<Число>
-
-функция полузамкнутый-промежуток(начало: Число, конец: Число, шаг: Число): Перебираемый<Число>

package//320/230/321/201/321/205/320/276/320/264/320/275/320/270/320/272/320/270//320/220/321/200/321/202/320/265/320/273/321/214./320/240/320/265/320/260/320/273/320/270/320/267/320/260/321/206/320/270/321/217./320/224/320/266/320/260/320/262/320/260/320/241/320/272/321/200/320/270/320/277/321/202//320/237/321/200/320/276/320/274/320/265/320/266/321/203/321/202/320/276/320/272./320/260/321/200/321/202

@@ -1,48 +0,0 @@
-подключить А = Артель
-подключить JS = Platform.JavaScript
-
-функция промежуток(начало: А.Целое, конец: А.Целое): А.Перебираемый<А.Целое>
-{
-  вернуть промежуток(начало, конец, 1)
-}
-
-функция промежуток(начало: А.Целое, конец: А.Целое, шаг: А.Целое): А.Перебираемый<А.Целое>
-{
-  пока начало <= конец
-  {
-    выдать начало
-    начало += шаг
-  }
-}
-
-функция полузамкнутый-промежуток(начало: А.Целое, конец: А.Целое): А.Перебираемый<А.Целое>
-{
-  вернуть полузамкнутый-промежуток(начало, конец, 1)
-}
-
-функция полузамкнутый-промежуток(начало: А.Целое, конец: А.Целое, шаг: А.Целое): А.Перебираемый<А.Целое>
-{
-  пока начало < конец
-  {
-    выдать начало
-    начало += шаг
-  }
-}
-
-функция промежуток(начало: А.Число, конец: А.Число, шаг: А.Число): А.Перебираемый<А.Число>
-{
-  пока начало <= конец
-  {
-    выдать начало
-    начало += шаг
-  }
-}
-
-функция полузамкнутый-промежуток(начало: А.Число, конец: А.Число, шаг: А.Число): А.Перебираемый<А.Число>
-{
-  пока начало < конец
-  {
-    выдать начало
-    начало += шаг
-  }
-}