fix: Исправлена работа на клиенте

Author: Diversus23

bin/РаботаСЦветами.epf

@@ -4461,15 +4461,19 @@
 		Возврат КонструкторЦвета(0, 0, 0);
 	КонецЕсли;
 
+#Если Сервер Тогда
 	Хеш = Новый ХешированиеДанных(ХешФункция.CRC32);
 	Хеш.Добавить(Строка);
 	ХешСтроки = Хеш.ХешСумма;
+#Иначе
+	ХешСтроки = КонтрольнаяСумма(Строка);	
+#КонецЕсли
 
 	Индекс = ХешСтроки % КаталогЦветов.Количество();
 
 	Если ТипЗнч(КаталогЦветов) = Тип("Соответствие") Тогда
-		Таблица = СоответствиеВТаблицуЗначений(КаталогЦветов);
-		Результат = АбсолютныйЦвет(Таблица[Индекс].Значение);
+		Массив = СоответствиеВМассив(КаталогЦветов);
+		Результат = АбсолютныйЦвет(Массив[Индекс]);
 	ИначеЕсли ТипЗнч(КаталогЦветов) = Тип("Массив") Тогда
 		Результат = АбсолютныйЦвет(КаталогЦветов[Индекс]);
 	Иначе
@@ -5143,29 +5147,24 @@
 
 КонецФункции
 
-// Преобразует Соответствие в ТаблицаЗначений
+// Числовое представление строки. Любую строку превращает в Число, которое соответствует строке.
+// Используется контрольная сумма Флетчера https://ru.wikipedia.org/wiki/Контрольная_сумма_Флетчера
 // 
 // Параметры:
-//  Соответствие - Соответствие из КлючЗначение - исходной соответствие
+//  Строка - Строка - исходная строка.
 // 
 // Возвращаемое значение:
-//  ТаблицаЗначений - Соответствие в таблицу значений:
-// 		* Ключ - Строка - представление цвета 
-// 		* Значение - Цвет - сам цвета
-Функция СоответствиеВТаблицуЗначений(Знач Соответствие)
-	 
-	Таблица = Новый ТаблицаЗначений;
-	Таблица.Колонки.Добавить("Ключ");
-	Таблица.Колонки.Добавить("Значение");
-	Для Каждого Элемент из Соответствие Цикл
-	      НоваяСтрока = Таблица.Добавить();
-	      НоваяСтрока.Ключ = Элемент.Ключ;
-	      НоваяСтрока.Значение = Элемент.Значение;                          
-	КонецЦикла;
+//  Число - Контрольная сумма строки (два байта).
+Функция КонтрольнаяСумма(Знач Строка)
 
-	Таблица.Сортировать("Ключ");
+	Сумма1 = 0;
+	Сумма2 = 0;
+	Для Индекс = 1 По СтрДлина(Строка) Цикл  
+		Сумма1 = (Сумма1 + КодСимвола(Строка, Индекс)) % 255;
+		Сумма2 = (Сумма2 + Сумма1) % 255;
+	КонецЦикла;
 
-	Возврат Таблица;
+	Возврат ПобитовоеИли(ПобитовыйСдвигВлево(Сумма2, 8), Сумма1);
 
 КонецФункции