Алексей Демин (Все сообщения пользователя)

Главная
Форум
Алексей Демин

Форум:

Дата создания:

…

Тема:

Сообщение:

Упорядочить:

Работа с IZbDataset object, Несколько вопросов на тему работы с БД в C#

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

11.02.2026 13:32:00

Дмитрий, а можете тут подсказать?
Плагин визуально представляет из себя окошко с вкладками, которые разделяют по смыслу использования кнопки.

На текущий момент весь плагин это Partial Class (каждая вкладка окошка, отдельный .cs).
Каждая кнопка для работы с объектной моделью zulu обращается к коннектору. Т.е. если надо что то написать в окно сообщений :
var Out = connector.Zulu.OpenOutputChannel("Сообщения");
Out.Clear();

Я прочитал какие еще могут быть варианты организации работы кроме Partial Class. Например сделать каждую вкладку отдельным классом, а connector сделать инстансом и т.д. есть и другие.

Почему возник вопрос - сейчас стало понятно, что нужны общие методы, которые могут быть использованы в любой кнопке, например некий класс обработчик БД со своими методами. Мне кажется совсем не грамотно будет класть его в тот же самый класс.
Иными словами, если коротко, мне не ясно как грамотно сделать архитектуру плагина.

Перейти

Работа с IZbDataset object, Несколько вопросов на тему работы с БД в C#

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 06.02.2026 18:34:19 Спасибо! "набор данных последовательного доступа" - впервые увидел такое выражение, а MoveFirst() и MoveNext() видел, но хотел избежать работы с циклом, теперь все понятно.
	Перейти

Работа с IZbDataset object, Несколько вопросов на тему работы с БД в C#

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

06.02.2026 12:12:24

Добрый день. Уже несколько дней пытаюсь совладать с IZbDataset ([URL=https://www.politerm.com/zuludoc/zuluax/index.html#IZbDataset_cls.html]https://www.politerm.com/zuludoc/zuluax/index.html#IZbDataset_cls.html[/URL]).
Может быть я смотрю вообще не в ту сторону, но хорошего патерна я не знаю.

Суть такая: я хочу выполнить через плагин sql-запрос к группе участков, чтобы в дальнейшем собрать его результат в DataTable C#, далее проделать там некоторые расчеты, получить столбец со значениями, которые с помощью еще одного sql-запроса занести в участки (ну либо просто записать в БД по sys). Проблема в том, что у меня никак не получается этот IZbDataset преобразовать

Вот пишу.

var resultDataset = activeLayer.ExecSQL($@"
select sys,[Длина участка, м],
[Внутpенний диаметp подающего тpубопpовода, м] as 'Dpod',
[Расход воды в подающем трубопроводе, т/ч]
where typeid = 6 and geometry.selected()=1");
var df = resultDataset.DataSet;
Out.PrintDataset(df, 8 + "&H100");

В окно сообщение вывод получаю. В csv тоже выгружается нормально.
Пишу например var fieldsCount = df.GetDataFields(4).Count; -На выходе 0.
Много чего пробовал, но понимания не пришло, а каждый раз для эксперимента собирать dll, открывать программу и тестировать весьма затратно по времени.

Мне не понятно, как указать конкретный столбец, конкретную строку, чтобы получить доступ к значению IZbDataset, полученного как результат sql-запроса?

Перейти

Всплывающая аннотация к макросу.

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

15.01.2026 12:04:11

Добрый день. Возможно ли сделать всплывающую аннотацию к макросу при наведении мыши? Т.е. по умолчанию во всплывающей подсказке под курсором в окне написано просто название макроса, хотелось бы получать краткое описание, желательно написанное внутри самого макроса.

Перейти

Наименование слоя в переменную в SQL запросе

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

06.06.2025 07:29:57

Дмитрий Озеров, подскажите пожалуйста, еще по этой теме. Мне нужно сделать поиск в выделенной области в нескольких слоях.
Что то типа такого. Еще пробовал использовать charindex вместо like.

Код

SEL ECT z.sys, z.[Наименование], z.[Категория строения]
fr om [zdaniya_soorujeniya_trial_1] as z, sa
where z.geometry.within([sa].geometry)
and z.[Наименование] like '%билей%'

UNI ON 
(sel ect x.sys, x.[Наименование узла], x.[Адрес узла ввода]
fr om [Electronnaya_model_PEM_trial_1] as x, sa
where x.geometry.within([sa].geometry) and x.typeid = 3
and x.[Наименование узла] like '%билей%')

UNI ON 
(sel ect c.sys, c.[Наименование узла], c.[Адрес узла ввода]
fr om [ts_sushp_zim] as c, sa
wh ere c.geometry.within([sa].geometry) and c.typeid = 3
and c.[Наименование узла] like '%билей%')

Проблемы тут 2:
1) Нужно в 3-х местах исправлять строку поиска ( '%билей%' ), каждый раз для нового поиска. Я хочу естественно делать это один раз. Пробовал делать так:

Код

Declare @qwe char(100);
set @qwe = 'билей';
SEL ECT z.sys, z.[Наименование], z.[Категория строения]
fr om [zdaniya_soorujeniya_trial_1] as z, sa
where z.geometry.within([sa].geometry)
and z.[Наименование] like @qwe

Это не работает. Const тоже пробовал. Как позже выяснилось, если просто написать:

Код
Declare @qwe char(100); set @qwe = 'билей'; SEL ECT @qwe

В ответе будет - билей. Но вот если написать допустим

Код
Declare @qwe char(100); set @qwe = 'билей'; SEL ECT @qwe, z.sys fr om [layer] as z

в ответе помимо сисов выдаст столбец '@qwe'. Это и есть первая проблема, не понимаю как это работает.

2) Допустим можно потерпеть и исправлять строку для поиска в трех местах, ответ выдает правильно, но тут нюанс. Если в ответе нажимать на сисы, для перемещения экрана на объект - работает почему то с одним слоем, причем не активным. В данном случае, если из примера, то [zdaniya_soorujeniya_trial_1]. Если на сисы этого слоя нажимать - экран перемещает, если из других слоев то не перемещает.

Перейти

WayTree. Дерево путей. Связанные по направлению

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 04.02.2025 16:16:11 Большое спасибо!
	Перейти

WayTree. Дерево путей. Связанные по направлению

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

03.02.2025 15:46:15

Заполнение группы работает долго. Можно как то иначе сделать? В смысле без цикла с добавлением в группу объектов по одному.
[IMG WIDTH=438 HEIGHT=222]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAbYAAADeCAYAAABR2SXzAAAgAElEQVR4Xu2dXYss3XXf13wAIzAGCyFCDE+fwDAkvtBF6Ma6kcA5c2SYi2RIQHFjENMXcjgDZkAXHSOcCRgGwwy2LmYQhCaCwCg4Bx6dmRgMvkj6EIEuYjMMZKZBwQgRYwKyv8B47dpV1bted1X1y1RV/87N85xTb3v99qr932vt3bX2/vb///2LbPnPx8//VH784x/LV7/61S0/mcdBAAIQgEDfCewhbH3vYuyDAAQgsFsEELbd6m+shQAEINB7Aghb77sYAyEAAQjsFgGEbbf6G2shAAEI9J4Awtb7LsZACEAAArtFAGHbrf7GWghAAAK9J4Cw9b6LMRACEIDAbhFA2Harv7EWAhCAQO8JIGy972IMhAAEILBbBF5N2L72ta/tFmmshQAEIACBrRB4FWH7lV/+pa0Yx0MgAAEIQGD3CLyKsO0eZiyGAAQgAIFtEUDYtkWa50AAAhCAwFYIIGxbwcxDIAABCEBgWwQQtm2R5jkQgAAEILAVAnvXP/rLrddj24plPAQCEIAABHaSAMK2k92O0RCAAAT6S6BA2P5a/vz3fkt++H9Cw//JmfzBH31TfnUdHH7+A/nDkwv56TrvuY52cQ8IQAACEOgFgaywhcLz5e/+pXzzK6GN+m9//vNvytejvzcxHUFrQo1rIAABCECgJoGUsNlI7f/9G0fUat4w//RN3XctjeMmEIAABCDQIwJJYQuiqp/KN3707+WgyMgo8gqP/0YqsgvSjJlj/1N+8I2/kC9+60l++P2/Co7+2rc+l+8c/SP9P3PsWr5485/l618yRzx/Tzz/X8q/C9padk3y2N98+Lfy+98X+Vfh8x7+5J/JH//3yNh/Gv97j/oYUyAAAQjsFIGssP2RyO8UrqcZkfi2SCRmgcj8mXwlEImSY2LX1SQhZtF96ghb6tyf/Af5w5+NVSD/ukQc3Wv0/3/vWn6ma4dBm4N2RUKebsdO+QHGQgACEOgNgXoRW05EZyKe//3PNXX5pWy0V3bMRE7/Sf6jR5RSEVwokFFEGPTCv/ieXP+uBIL7PxLdEkVfS8H64p+atn5PhTmMEBG23jgyhkAAAhCICNRbY2sqbF+xqchfd1KczYUtL1VaIRX53d+Un/yvfyzfCURwmfq0qUmbHhUhFcmrAQEIQKDrBLK7IjW9N/nuf5X02pndFZmXbnRTeek05VKETPT2oy+762pNU5Hflp/FKc0Iv0/YTDSXjeC+/iW7qeUnv2HalU5ndr1raT8EIACB3SSQ/zu21AYRcX9zljiWinDKjgUbPJbpwuTmkXQaMa8zwo0i6bbFqciiDSj2uUsxTKYm//in0W/0WGPbzVcAqyEAgb4R6MiXR7KpzL51BPZAAAIQgMB6CCBs6+HIXSAAAQhAoCUEOiJsLaFFMyAAAQhAoPUEELbWdxENhAAEIACBOgT2fvGLX1C2pg4xzoUABCAAgVYT2Jv9l88RtlZ3EY2DAAQgAIE6BAJh++1//Y0613AuBCAAAQhAoLUEELbWdg0NgwAEIACBJgQQtibUuAYCEIAABFpLAGFrbdfQMAhAAAIQaEIgFrbF4l6eP36Q89sbkeNnmb//LHm/xZWMBqfyKf7XE7l7uZa30d99x2Uh91cXcn56E9xjeHIps+v34j7lfjKSwxv7hOHJnR5/mzjexECugQAEIACB3SKQjdjuJzJ6OssXtos3Mlexyf1jhK3k+OJqJGOZ6n3t9ff693OZLZ+jz90735fnmYqdUTsV2vvnt/K24HG71U1YCwEIQAACVQlsTdjSDUoLmxG+izdzWermvUxGT3I9f1/VFs6DAAQgAAEISD1hc1ORQ01FzjQVGeUS06nI9PEA9kKuRgM51WyjSTUmor9ExGbSlmM5PD1IpjvpMAhAAAIQgICHQHVhS9/Ik3qUsuMLFbiLsdzuO6lII3satQ2M6ukfswZ38PAoR3NnHY/uhAAEIAABCGxM2MSXKvQcN8I3FpkXphp996dvIQABCEAAAlkClSO2q9FIbo+Tmz8OH6fyEi6KVTn+OJ3pGlqwM0TuJwM5lLv4epuolHAXpDk+lqejuYR7Teg7CEAAAhCAQCUCsbDdT/Z0q33qmuGlvMQRlaYPVWxO4+346e36nuNh+nF5fWo7/71GcIf25wRDXZ+buut3lUzhJAhAAAIQgIDkbB6BCgQgAAEIQKDDBPjySIc7j6ZDAAIQgECWAMKGV0AAAhCAQK8IIGy96k6MgQAEIAABhA0fgAAEIACBXhFA2HrVnRgDAQhAAAIIGz4AAQhAAAK9IoCw9ao7MQYCEIAABKywfeFz2Uv/Ojv3I8YA210C9gf4tw+f5FPwEetLOZZbkTP9OkyqdF8zRukf+J+IPOwHn1yLviF6cvfiVH9o9pT6V+mn3fYOxX67YCiXz3N599H5pullTu3Cmg9xv5GavNQ+bz18ixtV+PzEBxpqGtXg9MXVRMZaD/LTp6EML5PfkW1wOy7ZYQLLQqOpsjEL/dr+QOujLb88ssOUMF0/cTaSD0fRJ9EUiH5JZjIey/6s+sB7NZrIm4KPWgdli7Q+33U4ii/0SzTj8+W3RLNljdbfKYXty61RqPbvXciRW2y3YZNsrUI7kJsvAH04sgJuPlMnNfg2fHxwmduG8B8833Jd5Wk516YZ698ncv0KE5k128XtXoVAqbCNPxwFpWWuRntaakZnj5cHchtWwNYpu1zqZ6/i2aQWBp2MdWYblth2K2Tb63W+685uTZmaIEpcVuJ2K2hHNCrN0jPVu5eza9O+6PmipXKib1suPyGmdt1p7BF+zqt4xpyKKHQ2O9VoIq6DGtuTuoOx+d3HsPp4OAOXqBq5MyMv4RdUSghKBuVfL2PLN8ky/ERawuZlhfLafEs/WG1GxuL+X7Y/ycbt26gQ7Uw/DpoXAFrhO5aH07CKu8koJESyvH+i/jY+ONU7BZXco3vk+o/SjCLEuFLFQMVsIDcBU0nWC1Qhnpyfhv4/lJPLqYp06B3O/aN7xlFSKipyhc2lVdr+QJlK+Fc4vhS252wdxHT7VXLsu5uOKI3YKx/nna46qpl3/8mN/n3VQzI3tt+XPYwHoEttxe1y4lXVP+O+NWOZte/NRfguOX0Vjx/m32bif7/LxodNh+RVO6FH5yWELSoZY+1LOq0Rh9sD/T7kWVjhOqitdhHPwK8mE3l3fb0clIwjXWih0GstFBp8yf9RhyUJz7fXPh48yH7kzOHX/mcqFsFnkp1ZbCXe6RfBnQEWVBJwX6ZMRJCaQWZmz8GL8qSZONveYOxw25y63nv/Mn7hvROFWEvaFwyamiUcHuhHq6PKravwLaqq7nRMaf+H55VFbPbD2GM514Ep+F6opjqXvhaVNNL6fM+2BqDpu3On7FGV/tGLdEB+0HtP9d5GQO/1qfrfsAML2xf5jxnAxrdyoJ58pv8/TlSMX2gQ+1l8r4xAZRgm358IZZGwBcdL2u/j7zueSEfmpSADcbuVY5MaDSZm4f8nZiFrFjbfZMrxv2xGQd/Pwbnsh6lcn/1xma0znbDoBP3hWCdAj/oh9nB8ykbPtvpI9P773u+88WFPA4dool1pjOOkygQKIzY7A1THCFMheWmRuDMHUUSRfm4YjUUDw/RRRtqZs/3zIPXiOo4VP5N5WUHY3EKorjCnZuRRNPnszBJLHbNg9pieZfqELTlxcCLYgojBjcDy1kHcCDjun2czeIsKwL6cuwPvKnwTg7K75qT9bWa4Z0/hjLWg/ysJW/LadCp8Hf1jhGH0dBak/PL+FAtvOIip/w7Ufy8fNEd6rNkLce6lfCfjKGIzH/IWOZi6a4IpIStoi0/Yctvv8x/f8cSkLCdii2DpmDAaHC4zB2tZW7U3z43YKgtbhRJZibEhMmiZLXKzCqYI8kwnhEnN1vHJeZ+skM7jVKnv/UTYKmvSWk4sFrZUlFAqbG8rOFbopEG68eFYnlXAXGGxHa+Lx1Gq08za6yzMZ8THGUhSEVs023eFdR0Dp0/YiiMuf+0534ww6J+pSak6s+pERLECX6+w+9tv+rc8Ykv7sxHQD/Ea1jr6p7mwRRkGTb/p+tfZk66JaUQsx9EGB9NWnQTezbTMkh0Oc9cEYzEzLJbZDtfyRsK2am3EhLAVq1Uw2TARbyDaznrrGoaijN21UpHJ6CnbnAr+6TyvKFsUi5mZyKdE1/d+ZnzCRN9EbGvwnPxblEdsOjuTcJ3Bl4q0YrGs15Z4XIVUYBQhar2aoGbbyqlIM5Bqm4JdeyZ14jhibWELBuXUQr6TivwYHjO5+GjhPz2I+hy/lF/eQJlJRabWMdMDQxiBN+VrhXM5cAdCFfGNU4MF/R86g8vQTmI0QtfFKpMSTAtDugK7j1/VVGR5xLbs42T7bP+bJOTUrOsZ9rrGdOCuwWmqfaZrziataTa+XOh6myQitmBoCwTN5OQT0Z7zsjQTtig1W8y/in9FG1ii5rgTEZve1lRwUE7KCIVN1yWj3+apSNPfk4/v4s1D6YjINwIabuf7y/Ys1N8vNKUY9YHP/qS/qR06YGQ3RlmB3De7gVObenz+acc3nahF68K5wrYCPx+gHTtevN0/FTHZgW0qj+fhBpHMzwHSi7e6ZVfXeGaaphrHaYBo3S61hTrcvKErtfZFcRZam28eMes0d87mF6dndQ3h5EDTRsEebl3o153lN+Gic/C8eHHcjRqLNyfEC/tRCsNpv4k6Z5p4jdKQZfdPLn6H/Oz2uNLrj28HdvNItFHETT05qcLGfG0MkqjHF3DTCMUWjrXHi9ofn6FcxioIwT6XhP9YYdPV/rgfguPhIOCmeZr0jzqUs2V/6Qdp3zIRSX77jEvqBoKHqD5hKMTOVny3jSbVPd2/Fd2PlN2uH/iGmS+qQLiDTWZzgZMmq9R+H//i465/Jcc/24aBx/+W4hZxdttefUQ1k4mBZmwC96iTrcnzTw0rLxMTsRI+6ffFvHNRf6TWG4N+dgosB57v4eO+/xkazuaupZ8241eddP/PrPwD7W1uPe4/dizcWQIVNuLsLJvWGh6mMmdvklFXxfbmpqXNtaQjKxKsf1olYYu3y9upFL9tq8+ZK3acQLJC/XZ+eL3jyNdofhSJmizFcsPIGh/ArdZMoJKwrfmZ3A4CEIAABCCwMQII28bQcmMIQAACEHgNAgjba1DnmRCAAAQgsDECCNvG0HJjCEAAAhB4DQII22tQ55kQgAAEILAxAgjbxtByYwhAAAIQeA0C1GN7Depde2b6x8P6kw/zSbR6nwosrrdWCUfqR+9F33usdK8VTkp/4WKFW9W4NPUDc+9PbsLzC89LHs/7zmHQOPf6lvAvgpb4SVJ4Uv0fedfoEk5tNQHqsbW6e9rVuMyHams0L/iRakm9taq3qv2ptao31vPqfcuyxo3XdWr4abrpwW2yxEvu/X3fR0wez3At+AzeJvmvgindd21t5yo2cm11AtRjM1UAqMdWyWNWFbaxVkIrqrfmrScWtrBwwPLVI8t88sup1xXXx0tiSHxyyxuxFH9yLYqIhvbbbctPihUUXS3qjPgLFvrJt8w3LxP2mx8ST0XOtWyURtbBH8/xJdeSr/ub2xSVkyrkH0WHJ/rFtButcaafi7rTpplPq+XU1Gtazy3NrP4khXpulQaBjpxEPbaw3pLvI6ZVPrLb/Ov+5oPCJfXswgHl1eqxhc68irD56q357I/ep6KB1Xe9r16XuX+VwbDw+SUfyY7qCy4/IpytJ+cfL9yyN+YjvR+dWoAm+tIP7AYfKA5UzH63U6tovATC5jue/N5h2deFGvF3arm9+2i+B2nKKmml1otk6RfT7rUIW63KAJa8zz98/kU9N78Hb/MM6rFVETZv2ZZwUuwpNNrZemxrEbakWyfqrVWoF1YqbN7rfWk5e/fGwlbBP3wTJ+9Lb74xGVa0Xw7E4eed8r4/6aYSfccTkViDiM3HP9WWqFxL4TcUvTDKT6h/3wplt6jntmKvbPdy6rFtUdg6W4+tQNjqDyCuc7v11qoJTxCL5KbCfNf76nW1X9iS35oMOUZfhvcJl+94IdfsYNSI/1aFLb8yefmw6vMPn38FAONCpEVRLfXctidu1GOrImzBbH6367FFUcJTyCsSmYRYF6aS/PXWvPWywneibNAorAeo1/rqddmIrbgeW2nE6PGPKBVZlkq29y9KxeUNvO4A7ks1+o7nTxjyIthG/CsL2xpSkQ3SkNa3qee2PdnZ/JOox0Y9tri8faG7ZWqFLc9M1jQrqsdVXm8tGtSL67nl11MzBdyWdc389ciudN3pNKy7Z8pAJ+t1mf0VZfXitA5hBlDy+e79h7pVfqrrW6bmmq9eV2k9s0Sar6CeoakLZ9bRtLCmNS/cPHKof4+27OdtHgmPPx/fxvX+kiZG9q3CX5fStABdwM5EmEcftB7dTVBvLapTtvSh1eq55U+2qg6iqXqD1HOrCq6V51X+gTb12FrZfzQKAhBoPQHquW27iyoJG/XYtt0tPA8CEOgPAeq5bbsvKwnbthvF8yAAAQhAAAJNCSBsTclxHQQgAAEItJIAwtbKbqFREIAABCDQlADC1pQc10EAAhCAQCsJIGyt7BYaBQEIQAACTQkgbE3JcR0EIAABCLSSAMLWym6hURCAAAQg0JQAwtaUHNdBAAIQgEArCSBsrewWGgUBCEAAAk0JIGxNyXEdBCAAAQi0kgDC1spuoVEQgAAEINCUAMLWlBzXQQACEIBAKwkgbK3sFhoFAQhAAAJNCSBsTclxHQQgAAEItJIAwtbKbqFREIAABCDQlADC1pQc10EAAhCAQCsJIGyt7BYaBQEIQAACTQkgbE3JcR0EIAABCLSSAMLWym6hURCAAAQg0JQAwtaUHNdBAAIQgEArCSBsrewWGgUBCEAAAk0JIGxNyXEdBCAAAQi0kgDC1spuoVEQgAAEINCUAMLWlBzXQQACEIBAKwkgbK3sFhoFAQhAAAJNCSBsTclxHQQgAAEItJJARtjuJ3tyeNPKttIoCAQEhpfPMn//GTQgAAEI5BLIFbbz/e4OHEaYu9x+n5/23T7s9xHgOAQg4COAsPkItew4wtbviUvL3I3mQKCTBBC2jnUbwoawdcxlaS4Etk4AYds68tUeiLAhbKt5EFdDoP8EELaO9THChrB1zGVpLgS2TgBh2zry1R6IsCFsq3kQV0Og/wQQto71McKGsHXMZWkuBLZOAGHbOvLVHoiwIWyreRBXQ6D/BBC2jvUxwoawdcxlaS4Etk4AYds68tUeiLAhbKt5EFdDoP8EELaO9THChrB1zGVpLgS2TmCNwraQq8lYTm8+BUYMTy5ldv1etv1Fv+YDfzva7/OAvtu3Oft9d+Y4BCDQFwJrEjYVhdFATg/u5Pn6rYrZQu4nAzl8OJG7+bW83SKtZgN/e9rvQ9V3+zZjv++uHIcABPpEYC3CtrgayeD2WJ7nboRmxeL2OPqgcjYimp69l7cmpLufyF5BSYGXl5davJsM/L72z2Qsg1MbiWb+nNzJnRzmVEQYysndXFTnwz9J++0/DuXlZf7q9k0fdRKSqeiQav/iXibjQwkDchOSy91MJy2p/gu+vP/uo4wGpxIQUz4vRx9etX9rAeZkCECg8wTWImxBqRsd3l+Wo3gAZvnvIpM9HRR1kEtEdDc6OL7o4GiE7Xw/EMbn+F6DQBjfzzcvbP72G3VKC7Vr31vHVqtkyXuGEaFcLsU/FPNtCHcV+9LnJP6+uAqE6uDuWYXaJpeDycCpyOXzXEwFmcwzAvukFf3b+bcUAyAAgVoEtiNswYw9HOTi5mkEYP9RrqUnwpaKek40erk2o34gDLdyHIqARWDsP5frLURslYWtoP1WxPIj1hPTf6rl+XX82jFxqfVGcDIEINB5AmsRNl8qb/7molzYnEW4okG4KulNpCJtUctsxOa2KdNuFbOJitm+ETPJE7aqFiXP25R9Ze1/99EI24GNvgqaXRqxOde8Rv82I81VEIBAVwmsRdhs9FGSasw9PtZ1nexg+ToDn6/9QfIttWaYFZxEOjYRpaU3p0T3G2uqdfNrbP7+yUkluu0PhFnXzOJUstLQVONYF+YO3IjNTUe7qUiEravjA+2GQCcJrEnYzLivEcr4NN5ckNnur5sPri7Olz8HGF7KdBZuHgkyc9kNJMFGhCBaqv6nSUQT3L2k/dlUXJhiC5uVn4Yz+yvuZB6vO2Y3jxhGc/1JRJ0/m7CvUvszm0eGMjw4Dn7SEayLhmnMoM+CCD3+B7uu+Nr9Wwcy50IAAp0msD5hCyMauxRjdtTN5OxJdxM+TjObSjZJrPHA35L2+9j03b7N2e+7M8chAIG+EFibsJnU1CCzZzy95X3z2JoO/G1pv49Q3+3blP2++3IcAhDoD4G1CVtbkDQd+NvSfl87+m4f9vsIcBwCEPARQNh8hFp2HGHjW5Etc0maA4HWEUDYWtcl5Q1C2BC2jrkszYXA1gkgbFtHvtoDETaEbTUP4moI9J8AwtaxPkbYELaOuSzNhcDWCSBsW0e+2gMRNoRtNQ/iagj0nwDC1rE+RtgQto65LM2FwNYJIGxbR77aAxE2hG01D+JqCPSfAMLWsT5G2BC2jrkszYXA1gkgbFtHvtoDETaEbTUP4moI9J9ArrAVFLPuPw0s7ASBJh/H7oRhNBICEFgLASK2tWDc3k2I2IjYtudtPAkC3SSAsHWs3xA2hK1jLktzIbB1Agjb1pGv9kCEDWFbzYO4GgL9J4CwdayPETaErWMuS3MhsHUCCNvWka/2QIQNYVvNg7gaAv0ngLB1rI8RNoStYy5LcyGwdQII29aRr/ZAhA1hW82DuBoC/SeAsHWsjxE2hK1jLktzIbB1Agjb1pGv9kCEDWFbzYO4GgL9J4CwdayPETaErWMuS3MhsHUCCNvWka/2QIQNYVvNg7gaAv0nUFvYFvdXMj4/lU+fFM7wUp7n7+WzSpzuZTI6lBtznQzl5HIm1+/dKxdyf3Uh56c3Etz65FJm11XvvWxA04F/sbiX548f5Pz2RuT4WeaJtlUyUBZXExnr9Z8+DRXNLHUPn/3VntHUvip3L2+/7w7+/rufjOTQOoD2753279uKvrN6//paz3EIQKA/BGoJmxn4LuRIzt7pgFRNzWJSV6ORPE5VzN7qhYuFXI3H+ve5/t2esrgayVimKgb2H+717+eSFgc/+JUH/vuJjJ7O6gtb+jr9+0SuY/t89vsts2esbF/Rgzzt97XP2396/73zfXme6WTF+I5OJO6f38rbsP9994+Ob8z+qg3gPAhAoPUEqgvb4komF2/kOlKiFU0zA+HFm6WwpW/XNWEz0cjT2VziQE95jZTXvICXz/5i/dlMKq5u+33dn+6/rL0mgn2Sa4346/xB2OrQ4lwI7CaB6sJmZvQf9uXg4dSmE4cncje7FhOA1f5jBv2xyCyTxtRIbjSQU72/SVUViULZ81Ye+BpGbLnCoDbO8wbuQvv9JFe2r+ARtdpf2MyS/ktEbCZtOZbD0wO5e1Ef8psdn7Ep+2s0gVMhAIGWE6gsbGbGPVDFWdbC0kHs6qO8e19zHcxEfuNHOZqXDGgmVXkxltv97qQiKwtDFftLnGZTA3vl9ldx6IL+i3zI3MKsoR48ePwg51mbsr+KWZwDAQh0g0A9Ybs9lhcnAskMhh6bg80Jj0fVNg2EUU1uxLPJgb9xxLYnH45e4jU1XTTMpCJr2V8YWW0qFelvfy2X9vYfqchaPDkZAhCoTKCysOlqf5AmfJw+hxtAdGAaP8lZIp24kMneQG5E05SJFJNeO9HNIhqBRTsh02suic0V+qz7yUAO5U5eaq7prTyjLxW2IvuUt4nEPr6L7TOi/+EoWkP021+1x1a2r+hBpe2PLiq2v0r/LfQ2NnNt+ncsT8on3CtU1fzNbZ6p3AJOhAAE2k6ghrCZ8ciIWbhlP3eNTY/v6fG0sJnZ+0B/IpCicXLnRjg2/Xj6StvBjWAc6k7/xB/9OYMboeqexHz7wotMRDbQnyuYP8uUrRU9r/0VPWVjwhY0s6D9cdtK7A/Tj4X9pz8TGR1aHxiq70wbrs9u0v6KXcBpEIBAywnUE7aWG2Oa1/eBr+/2+Vxs1+338eE4BCAggrB1zAt2fWDfdfs75q40FwKvQgBhexXszR+66wP7rtvf3HO4EgK7QwBh61hf7/rAvuv2d8xdaS4EXoUAwvYq2Js/dNcH9l23v7nncCUEdocAwtaxvt71gX3X7e+Yu9JcCLwKAYTtVbA3f+iuD+y7bn9zz+FKCOwOAYStY3296wP7rtvfMXeluRB4FQII26tgb/7QXR/Yd93+5p7DlRDYHQIIW8f6etcH9l23v2PuSnMh8CoEELZXwd78obs+sO+6/c09hyshsDsEELaO9fWuD+y7bn/H3JXmQuBVCOQKW+ZjwK/SNB4KgXwCiQ9MAwkCEIBAikBG2CAEAQhAAAIQ6DIBhK3LvUfbIQABCEAgQwBhwykgAAEIQKBXBBC2XnUnxkAAAhCAAMKGD0AAAhCAQK8IIGy96k6MgQAEIAABhA0fgAAEIACBXhFA2HrVnRgDAQhAAAIIGz4AAQhAAAK9IoCw9ao7MQYCEIAABBA2fAACEIAABHpFwArbFz6XvfQHIocncje7lref9cpejGlC4H6S9I/hpTzP30tV11hcjWRw+in7ZL3Pi95nO38WcjUZy+mNbcfw5ETkYV/m8fMXcq/HD+PjlzK7Dm1c0f6q9i2uJjK+vZFPn4YyvJzJ/H1VwlWfwHkQ2A0CccRmBp+LN3O5fmsNX+jLPDjf3+LAsxvAu2zl/WQkT2dzaTLeGv8aizNYL65kNBZHWDZLJvBvff512PjF/ZWMz5fPN7ad709VTOwLEPj/ocjdi07uwqatYr/XOn3e6OlsKWb694lcx++j93pOgAAEYgKlwjb+cCRzVbqr0Z6c6izy8vJAbk91RmmnvHKpEeQxc0oAAAdHSURBVF08yC3uZTI+lHDCq4eXM157vV5y+Zx4cW2UqJFhOHiYgSOaMUctPLl78b/cZpAcnNp2xX+0vc92EI6eLyd38hIqtyl/YoNUPe/uWG4P09eHx8J76FCXnPFrtDHV2X406Ol0Pxv1mrsbm999DNsXtkmi9i7bqCNpIT+J7cu/XsaWb5JlaF/C5oZ81zCwL4XtWSajJ7l2IzWn/4L+1iHd+kZFPlaKEhGXglfPupX9mfUB+/ypzFS4MnGQef7Fm8DX3T9pMfYL20ImewO5cXy66liTuXdBm4rvV25/Nf8yLmTeEdE+Mu+y5f/mIvQlJ8KO3x/zbzPx+3fZ+9FkplQVLOftJIGEsCXTRc6gomiMONweqFidaXomGBl0oB9dyJu5ndFeTSby7vp6OWiYgfpCBzBN5wQD8/hRjvU8e7699vHgQfajCCCcwc/CFFdmhu/rnvRA4M6AC6IDdzBJR6xGqNwZ9NVoJBIOknYcNUL0JGdOSi7R5tT13vuX8TOPS0XUZe0LUn+3KgsHGoHEIbiNkBrz1Tb4B/aSYddNR+alIANxu5VjM5EIhD/8/1CFSv0rbNuHI43Ioty56Z/Buew7ExOTajzXmZeZAwQTr8iX09FSZEbq3/32r1nYakS0pm1l9vv4Be+oEfczFTWdoD4cP8v0cRxH6Bn/F+WrE5TI/33+GbwybtRuhE4nztFE0/d6cxwCdQgURmx24NaBIRzMs47tDLaDvIjJNCOMxiJhmT7KSJ15tn8epKXcF8eK3woDbyZqc2f7yfZF0eSzk1orfTELZs/pgc4nbOl1pjiCzY04HX7hoFB4fTDxCIX32UQ7mkJ73pdzNwpZle8ahM2mInMitshj1edGmv/75EZqdkTMichdPnaQTUSBnrfATbUXTqJqC1udVy95bm7EVlnYPPZ7+SUZDzVqm+mEKBHZpt4BK6TO0kXOOmq6bh7C1tw/uLIegWJhS0UJpcL2tsKLFb6kQbrx4TjYfOAKix2/dPE8SnWaWbWbuvTZlREfJ6JMRWx2PSUprNsQNncNMxlx+Qdm34w46J+pSak6UU8qvbYS3xxhy7SppI+qROB2XetBhkORg6kTfYXRQbFwJaMHn6vY43rN3gc5MmnwkomLO3jnTWQSfVrtwblnmdTehyMn7V4rFemz3+9fccSmglbUV7GYmYlsSnR9/mnfb2cdn4htBW/hUh+B8ojNrp4Ha1y+VGR68T3x4AqpwChClHBAqzIQZp6RGsivVMA0V2JTW86LWFvY9EFlqciPYbRk1iLiwalmKrKUX3pQCMbldKo0tY6ZHhjDCLwx30rCVpyKy+vPq9EkTmXb9OlBuBPXDMQ2HRbtDPTxMcJwvr88f6H2XmhKTabGf42Iafbhbibv41Rlcl0tff97bc/hrZ2ARZGLX9iapyKNsEw+vos3t6QjIt+LXG6/TSO7m2My90v4i9qhL0yUrVmeawVyX9cuE2n5Cv5p32+dSIRLF8GadCYVuQI/HyCO7xSB4u3+qYjJRgRTeTwPN4hkfg6QXrzWLcu6xjM7e5JxvLEjSg+agUbvE6Bebt7QlWo7kDkLzc03j5h1lDtn84vTr2ZjwcGp3ISbR8zO75tw10ty84IbNRZvHokW0uMUjtN+E3XONPEapRHL7u9uNzdhS8DPzipKrz++HdjNI9FGETf1ZP5N+8BsrmnMt2Dh3xBN9k/Ur8sNQdFMPXe7f5iqHnjss+JW4F9xyizZP4bfpU6SrJBZYdPHxf1sNj/dRYNs4BrpnwOUbPd3XKmK/VVHFBNRDzRjEbwVdbIVOe1P2m/tK/Kvz9L+Ynwu6vPUemgwAXmcJtbG3J9z5Pm36/8ZFs7mJttPZlxI+k9VfpwHgYhA5R9o56UiwQiBPhEIorTE7+2GKtxuSrRP1taxJUxlzt4ko66KtyhMWZOOrEiQ0+oSqCRs8XZ5O5Xkt211KXM+BDpNIIqkjNAvN4x02iQa32sClYSt1wQwDgIQgAAEekUAYetVd2IMBCAAAQhYYfu/+qvM8M/e3/03qEAAAhCAAAQ6SwBh62zX0XAIQAACEMgjgLDhFxCAAAQg0CsCCFuvuhNjIAABCEAAYcMHIAABCECgVwQQtl51J8ZAAAIQgADChg9AAAIQgECvCCBsvepOjIEABCAAAYQNH4AABCAAgV4RQNh61Z0YAwEIQAACCBs+AAEIQAACvSKAsPWqOzEGAhCAAAQQNnwAAhCAAAR6RQBh61V3YgwEIAABCCBs+AAEIAABCPSKAMLWq+7EGAhAAAIQoNAoPgABCEAAAr0igLD1qjsxBgIQgAAEEDZ8AAIQgAAEekUAYetVd2IMBCAAAQggbPgABCAAAQj0igDC1qvuxBgIQAACEEDY8AEIQAACEOgVAYStV92JMRCAAAQggLDhAxCAAAQg0CsCCFuvuhNjIAABCEAAYcMHIAABCECgVwQQtl51J8ZAAAIQgADChg9AAAIQgECvCPwDsbOA5BLhuNkAAAAASUVORK5CYII=[/IMG]

Изменено: Алексей Демин - 03.02.2025 17:22:48

Перейти

WayTree. Дерево путей. Связанные по направлению

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

03.02.2025 14:40:10

Добрый день. Есть необходимость нажатием макроса выводить в окно сообщений нагрузки связанных по направлению после узла. Написал вот такой макрос. Он хоть и работает, но на большом числе объектов - не достаточно быстро. Возможно существует способ более быстро решить данную задачу?
[CODE]Sub WayTree

Set Out = Zulu.OpenOutputChannel("Сообщения")

Out.Clear

Set L = Zulu.ActiveMapDoc.Layers.Active

L.Selection.Clear

CurrentSYS = L.CurrentID

Out.Put Cstr(CurrentSYS) + Chr(10)

set MWayTree = L.GetShortWayTreeEx(CInt(CurrentSYS),2)

Out.Put Cstr(MWayTree.Count) + Chr(10)

For i=0 to MWayTree.Count-1

L.Selection.AddElem(MWayTree.Item(i))

Next

Lname = L.UserName
Set Rslt = L.ExecSQL("CONST @Layer = '"+Lname+"'; "& vbLf & _
"SEL ECT Round(SUM([Расчетная нагрузка на отопление, Гкал/ч]),2) as Qот,"& vbLf & _
"Round(SUM([Расчетная нагрузка на ГВС, Гкал/ч]),2) as Qгвс,"& vbLf & _
"Round(SUM([Расчетная нагрузка на вентиляцию, Гкал/ч]),2) as Qвент"& vbLf & _
"fr om @Layer as L "& vbLf & _
"where geometry.selected()=1 and L.typeid=3")

Set r = Rslt.DataSet
Out.PrintDataSet r, 8 + &H100

L.Selection.Clear

End Sub
[/CODE]

Перейти

Вычисление площади поверхности земли. TIN

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 07.11.2024 18:31:13 Отлично. Большое спасибо!
	Перейти

Вычисление площади поверхности земли. TIN

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

06.11.2024 11:18:43

Добрый день. Просто хочу уточнить. Вопрос остался тот же. Не появилось ли какого-то способа автоматизации функции "задать регион"? Или может быть появился другой способ расчета площади поверхности земли с учетом геодезических отметок слоя рельефа?

Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

25.10.2024 23:31:52

IntersectByRadius действительно оказался очень полезным. Часто бывает, что в площадном объекте лежит много маленьких участков, но этот метод как раз помогает, если добавить условие "если число объектов полностью попавших в радиус 2х метров <1 = истина". 2 метра радиус хорошо подходит. Ну это конечно, если в исходном слое есть узлы. В слое, где 8600 домов без метода IntersectByRadius, получалось 1800 домов, где были созданы лишние потребители, с этим методом их было меньше 20. Оставлю макрос на всякий случай.

[CODE]Sub create_obj_in_line

Set Out = Zulu.OpenOutputChannel("Сообщения")

Set L = CreateObject("ZuluLib.Layer")

Set Line_ob = CreateObject("ZuluLib.PolyLine")
Set objz = CreateObject("ZuluLib.ZPoint")
Out.Clear

L.Open "..."

Set Keys_uch = L.ElementKeys.SelectByType(7,0)

'L.StartSequentialWriteMode

For i = 1 To Keys_uch.Count

set Line_ob = L.Elements.getElement(Keys_uch.Item(i)).PolyLine
Point_X = Line_ob.GetX(Line_ob.NumTops)
Point_y = Line_ob.GetY(Line_ob.NumTops)
sys_polygon = L.GetClosestElementByXY(Point_X+0.000002, Point_y, 0, False,objz)
If sys_polygon > 0 and L.Elements.GetElement(sys_polygon).TypeID=5 and L.IntersectByRadius(Point_X+0.000002,Point_y,0.00002,1,0).Count<1 Then
L.AddSimpleSymbol Point_X+0.000002, Point_y, 0, 1, 300, 0
'Out.Put Cstr(sys_polygon) + CHR(10)
Out.Put Cstr(sys_polygon) + CHR(10)
end if

Next
'L.FinishSequentialWriteMode

Out.Put "Готово"
End Sub
[/CODE]

Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 25.10.2024 19:44:51 Понял, спасибо!
	Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

25.10.2024 18:25:25

Изначально пробовал в разных слоях - результат был тот же. Сейчас попробовал прибавлять к координатам небольшие значения, чтобы сместить точки - не помогло, результат не изменился. Посмотрел какие сисы он пишет в sys_polygon - действительно, пишет все подряд, не только полигоны, а что попало под 5 пикселей вокруг точки с учетом масштаба. Что делать с этим масштабом, где его указывать я не разобрался. За то нашел метод GetClosestElementByXY. С ним все работает как надо.

Изменено: Алексей Демин - 25.10.2024 19:26:01

Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

25.10.2024 16:58:07

Увы, работало только на тестовом слое ~500 объектов нормально. На "боевом" почему-то из ~7600 объектов проставляет то 1059, то 1060, то 1063 символа. По разному пытался сделать, но никак. Вот стоят рядом 2 одинаковых дома, в один ставит в другой не ставит.

Вот сам макрос
Sub create_obj_in_line

Set Out = Zulu.OpenOutputChannel("Сообщения")

Set L = CreateObject("ZuluLib.Layer")

Set Line_ob = CreateObject("ZuluLib.PolyLine")

Out.Clear

L.Open "..."

Set Keys_uch = L.ElementKeys.SelectByType(7,0)

For i = 1 To Keys_uch.Count

set Line_ob = L.Elements.getElement(Keys_uch.Item(i)).PolyLine
Point_X = Line_ob.GetX(Line_ob.NumTops)
Point_y = Line_ob.GetY(Line_ob.NumTops)
sys_polygon = L.ElemIDByXY(Point_X, Point_y)
If sys_polygon <> -1 and L.Elements.GetElement(sys_polygon).TypeID=5 Then
L.AddSimpleSymbol Point_X, Point_y, 0, 1, 200, 0
Out.Put Cstr(sys_polygon) + CHR(10)
end if

Next
Out.Put "Готово"
End Sub

Вот как это выглядит
[IMG WIDTH=569 HEIGHT=367]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAjkAAAFvCAYAAACo1NoaAAAgAElEQVR4XuydB2BVRfbGv/Qe0nuoIXTpKojKuupaUNC1snZd9a+ya9lde+9lsaCuva6I4iooooIVRER6LwmEkkJ678nLf+a+JAQM5JVb3r3vuy77Xt6bOXPmdybcj7kzc3zaxAVeJEACJEACJEACJGAxAj4UORaLKLtDAiRAAiRAAiSgEKDI4UAgARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnSIBEiABEiABEqDI4RggARIgARIgARKwJAGKHEuGlZ0iARIgARIgARKgyOEYIAESIAESIAESsCQBihxLhpWdIgESIAESIAESoMjhGCABEiABEiABErAkAYocS4aVnfI2AjNWzoK/rx/8xJ+A9tdAX38E+gaIz33FZwEI8Q0U7+Vnfgj1DUZQ+/eyvCzX8SrrBSjf+cPfR7z62e10fO/n4+tteNlfEiABkxKgyDFp4Og2CXQQaGlrxT9Wv4Lkkf1hs9nQZmsTf8RrmyhhaxWfiTfij3xVPu/y6iO+8rHJcvI7eznlVVSWr7b2+q3itVXUlT/LS4opKaqkGJKvdjFl/7lDPMnPgsUfKZaCfYMUcSU/6yqiOsSUFGHdiS1GmQRIgATcIUCR4w491lWVgJyNsOo1a/wMzbrW2NqMO9a/rogcPa42RQBJsSS0kCJ8bBB/kXQjooRmkqJIlLPJwkI0+dt8O4WYXVyJ+u32pB35xy6mbGgRdbXk1pWVlceeWmNCr1h0568cc39b9aJaXbGsHSNjpDdUR39nKXL0jgzbOywBOWjTxwy0HKGC9bvwxKi/ihmOAE36VtfaiHvXv4XEkf00sW+EUXlTK1i3C8+Nu1Hz5pttLfjn2teQMkofkah5hzRoYN+aLN0EZ3fuVzTV4JEtHyBhRB8NemcNk0bHSG+Kjt4vKHL0jgzb8zqRU7xxD+4ddikiA0I1iX51cx0e3Py+pW4Aba02FG7ajZljbtCEWVejikjcIETiUdYRiWpDM/oGure2CK/s+RJRg5LV7ppl7BkdI71BUuToTZztuU3A0UHrdkM6Gyjdkod/ZJ6H+KBemrRcLv6V+/jW2Ygb3lsT+0YYtQmRU7JpL54Zc73mzVc21eKRrR8g3kL81IZm9A10Y/kuzC1ehvAB8Wp3zTL2jI6R3iAdvV9wJkfvyLA9r5vJKd+ajxv7n4W0UG3+gi5prMTT2+cidliaZUaXrbkFZdvy8dSoazXvU2ljFZ7a/rGl+KkNzegb6LKiTfimdj3Ce8eq3TXL2DM6RnqDpMjRmzjbc5uAo4PW7YZ0NlC5Yz+uSjsVAyJSNGl5f30Znt/5GaKHpGpi3wijLU0tqBbcHh95jebNF9SX4vnseYgZah1+akMz+gb6Rf5yrGzbjfCkaLW7Zhl7RsdIb5CO3i84k6N3ZNie183kVGcX4uKkyRjaS5tFk/niJj1r5zxriZzGZtRmF+PRo67S/DdmX10R/rOb6z2OBNroG+i7uxdhV3A5wuK1eeSr+SDToQGjY6RDFw9qgiJHb+Jsz20Cjg5atxvS2UDNrhKcGzcBo6IHaNKyFRdlNtc3oXF3OR4afrkmzLoa3Vmdj7dyF6FXZpLmbZm1AaNvoM9nfYqKGBtCosLNilBzv42OkeYdPKQBR+8XnMnROzJsz+tmcmr2lOLMyDE4Jm6IJtHPqSnAG/u+sdRNurmhCc05FXhg+GWaMOtqdHvVPryf/z0iByZq3pZZGzD6Bvrwlv/CJz0CgaFBZkWoud9Gx0jzDlLk6I2Y7alNwFFlrna7WturyS3DySHDcULCUZo0lVWdh3dzv0VkpnVu0k11jcC+Gtwz9C+aMOtqdGNFDj4uXIqIjATN2zJrA0bfQP+17jWxfTwF/oH+ZkWoud9Gx0jzDlLk6I2Y7alNwKoipzqvDCcEDMIpyWPVRqbY21q5F7P3/2ipm3RTbT188xpw15CLNWHW1ejasmx8VrYc4f202f2meQd0aMDIG2jHacfpo8VBoT46dNakTRgZIyOQOXq/4OMqI6LDNrsl4OigNRu+6oIyjPfph7NTJ2ji+ubK3Zizf4mlRE5jTT2CCprxr8EXaMKsq9HfSrbhi8rViOjL7cmHg23kDZSnHTv2K2BkjBzzUN1Sjt4vKHLU5U5rbhBwdNC60YQhVasLKzC8JQkX9p6sSfvrxUFp/ysRB6X1t85MRH1VHSKKbbhVHKKo9bWsWJzBUrNBnMESo3VTprVv5A3UigvrtRgIRsZIi/70ZNPR+wVFTk8k+b1uBBwdtLo5pFJDtSVV6F8fjcv7nqKSxYPNrCnLwryyFeJxS5wm9o0w2lBVi17Fvvh75jmaN/9j4Tp817AZEWmcyfHEmRyeduzYrwBFTvecKHIcGz8spQMBq4qcuvJqJFeF4rr+Z2pCUT5uWVC1GuF9rHOTrquoRXx5AG7MOFsTZl2NLi5YjSUt2xGRwpkcTxQ58rTjReK04zCednzE3wWKHIoczf+yZAPuEbCqyGmoFLMSpWJWYqA2sxLLizdjYfU6RFhJ5JTXIKkyGNcPmOLeoHKg9pd5K7C8bScikylyPFHk8LRjBwaxKEKRQ5Hj2EhhKcMIWFXkNFaLRbT7tVtE+7OypkSInN7WeVxVW1qF3rURuLrf6ZqPx89yf8Zqn32IZMqAw7I28gbK044d+xUwMkaOeahuKUfvF3xcpS53WnODgKOD1o0mDKnaVNfQfubLJZq0/1PhenyrrCmxzkxEbUkl+tVF44p+p2rCrKvROXt/wOaA/YhIYF4kT5zJ4WnHjv0KUORwJsexkcJShhGwqsiRKQoacsrw8IgrNGH73f41+LFpGyJSrSNyaoTIyayPxSV9T9aEWVej7+/+FlkhpQiPY14kTxQ5PO3YsV8BihyKHMdGCksZRsCqIqe1qRlVWUV4/KirNWG7KH8Vlth2WGpNSU1RBYY2J+Ki3n/QhFlXo2/s+gr7wmsQFhuheVtmbcDIGyhPO3Zs1BgZI8c8VLeUo/cLPq5SlzutuUHA0UHrRhOGVLW1tKJ4Sy7+Pfo6Tdq34sLZ6sJyjGpNw5/Tj9eEWVej/9n5BQp7NSI0mskfPW0mh6cdOz78KXI4k+P4aGFJQwhYVeSgDchbtxPPj7tRE67z837ByrbdlprJqVJOie6LqakTNWHW1egLOz5DeZzIcN0rTPO2zNqAUTdQnnbs+IgxKkaOe6huSUfvF5zJUZc7rblBwNFB60YThlXNW7sTM8f+H/x8fFX34X/7lmKdXy4iEq2zcFaKnIk+A3BG6jGq8zrU4DPb56Iu0Q/BEaGat2XWBoy6gfK0Y8dHjFExctxDdUs6er+gyFGXO625QcDRQetGE4ZV3b9hNx4RC49D/YNV90HuDtoSUIjwhCjVbRtlUIqcE3wzcWrKOM1deGLrh2hOCUZQeIjmbZm1AaNuoDzt2PERY1SMHPdQ3ZKO3i8octTlTmtuEHB00LrRhGFVSzbvw52DL0J0oPqLWz8Qu4O2W2x3kMzcPjlwMP6YNEbzmMndO769wxEQor4A1dx5nRow6gaqx2nHqx97GGPvulcnkto1Y1SMtOvRkS07er+gyDEqQmz3dwQcHbRmRFcmFh7fnHEukkLU3+b9Ts4i5ISWI8xCW6Crc8twcvAwnJg4UvNw37fxXQT1j0JAcJDmbfXUgKfecI26gX6R/6tYb5aDcA0PavRU5j2NlUO/NypGzvqpVnlH7xcUOWoRpx23CTg6aN1uyAADFdvzcV2fM9EnLFH11t/M+Qp7w6rFFuhI1W0bZbBmbylODR+JSfHDNXfh7g1vITwjAX5B/pq31VMDnnrDNeoGqsdpx57KvKexQpEzC+ljBvaIiSKnR0QsoBcBK4ucqh2FuCz1j8iMTFMd56s7F6CgV4OltkBX7ynFGRGjMCF+mOq8DjV4+/rXEZWZDL9AipzDwTZK5Ohx2jFFjua/Ypo04Oj9giJHE/w06goBRwetK7aNrlO9sxgXJkzC8Kh+qrvyUvbnKI5uRmiUdbZA1+wpwZTIcTg6brDqvA41+I+1ryBuWG/4+qm/881Z5z31hmuUyNHjtGNPZe7s2DEqRs76qVZ5R+8XFDlqEacdtwk4OmjdbsgAA9W7SzAt+miMjclUvfXnd3yKyvg2BEdaSOTkCF4xx2BMTM/T0e4CvXn1y0g+qh98fH3cNeV2fU+94Rp1A9XjtGNPZe7sYDIqRs76qVZ5R+8XFDlqEacdtwk4OmjdbsgAA3KNyWnhozBRg8cvz+74H6rifRASaZ1zXmp2FePPccdhZHR/zaMlx52nXEVfz0HCaRd5ijsH+TFr/Azd/VJiIw7ThIb605OZOwvciBg566Na5R29X1DkHELcJn6jbDYblNc28drWJt61oVW8V15trcp39vftn8nvRDn5k1JOvO8o3529A7alfXtbXevIuge129WeeN/U1ooW8V9H+zbRB5v4TPGh3Z6s39TWLGyLvyPa+yN9lp8rtjvL2dAi3stL2pN/o3T0Tb5vFWXlq72OvY9tNnsZtX+hHB20av2S6GlH7hY6KWgo/pA0SvVmn9r2MRqTAzQ758WIf+lWZxfhoqQTMKxXX9V5ebLBCx8+Dh/du8yTXbScb2RuzpA6+o8Tipwu8ZXQfOR/YtraV776iH8+tP8Lwrf9pFpfX+UbpZZ8Ly9ZzubTZq8r3stqslRH5Y5p8FZZpt2evZy0by+p2BHtNkOIFfmx8qHdlmK5y8+ynpQevvK1w8VOe3ZrSnn5meLogX8GdfRJaV/Kl3Z/pSF7F9vrd+mb3aC9n/aO+yB/bbY4wfcGVU/wtbLIkYfbHec7AKenqH+C72PiMDtbajACw7Q5zM4okTM9aTKG9Ord5TfU+m95w9U/xmSuP3M9W6TI6ULbyjdZtQdVgcjF9KRIOBnoq96OFD35633jrtpfjjG2NJyrQcLJR7Z8AKSHIzBUm3Ne9GYlx6rcjXZ52skYGJGq9tD1aHu84eofHjLXn7meLVLkUOS4NN4K1ufgsaOuQoi/ejdWK4ucmuIKDG5KwPTeJ7nE+0iVHtj0HgL6ycPsAlW3LQ0aIXIqd+zHNel/Qr/wZE365KlGecPVPzJkrj9zPVukyKHIcWm8FYpcTA+JXExhKuZisrLIqS2tQp/aSFzV7zSXeB+p0n2bxIm9faNFWgLriJyK7QW4Xhye2DssQXVenmyQN1z9o0Pm+jPXs0WKHIocl8Zb0cY9uG/YpYgMUG9Hj5VFTl1FDRLKg3BDxlku8T5SJXlib1hGPPyDAlS3bdRMTvnWPMwYMA0pIbGa9MlTjfKGq39kyFx/5nq2SJFDkePSeCvZtBd3DpkuEk6Gu1S/u0pWFjn1VbWIKG7DrZnnqcarw9Cd699ARGYS/DU6sdeIx1VS5Px9wDma5PpSPQAqGuQNV0WYDpoicwdBmbQYRQ5FjktDt3RzLv456HzEBfVyqb63iZzGmnr45zcIYXixarw6DMkD02IGp8A3QL1F4F2dNELkaDG+VAevgUHecDWA2oNJMtefuZ4tUuRQ5Lg03srEv7RvEVm1E4OjXarvbSKnqb4RrburcP/wS1Xj1WHoH2tEWoLh2qUlMELkaDFTqDp4DQzyhqsBVIoc/aF6UIsUORQ5Lg1H+Tjhb+JxQnJIjEv1vU3ktDQ2o25nCR4ZcaVqvDoM3bLmZSQN7wsfjXIvGSFy5Jqv+8WarwgV13ypDl4DgxQ5GkClyNEfqge1SJFDkePScKzYlo8b+p2NtNA4l+p7m8hpbW5F+bY8PDXqWtV4dRi6edVLSB7V/8BhjSq3YITIKRRHFDw88iqE+ql3RIHKWDQxR5GjCdYjGiVz/Znr2SJFDkWOS+Otcvt+XNvndPQJS3Sp/uFEjjzF2UccvSxflROb209m9ms/adpHvMrvZDIM+V45ZbrzpGl7nVYf8V1nffvJ0B2nNTf52lNY7Hz3Pxh45Y3K+87EjIo9+YH8I0697mKjw5795Gel0kF1O07Ktp8wLe2IM6m79EGm0SjctAfPjrlBNV4dhuSCbX9fP+UEbslJvionc7ezkv60CXeVk7zF+xbJQL6XfZD/E3XlW4Wn+FypJ17ladiy/Pp/P4HRt99l/77j1GvVe3GwwYL1u/DEyL8iyE+bHWMau++yed5wXUbnckUydxmdKSpS5FDkuDRQq8RhbVeJw9r6q3xYmz1vl03J/dX52p4zTCS8UHKHKd91ySPWKvJ2ydxaXet0vJd5uQ61I+u+/voMXHH1s0qdjnxk9bbGzvxjMmeXPXeZ3ZfGtpbOn+35vw7kMhPf2HOCKXnNZA4w6anMJ9aem6wjV5h4VTvfV0fwmmwtaLI1o1m03fHaLH6Wnzcr3x147Vqu3taEBvGno16DqNMibLSI8vJzmc8se/6bSD3zEqVfdg3np4gpP+VV5jDpEFRSTImet4skKaSkoJJiqkM8dRVRitBS6guRpWQ4sZeTwkqKnGfGXg9/Hz+XxqdZK/GGq3/kyFx/5nq2SJFDkePSeKsUx+5fYeJj9/kXm2Nhl8Jm+mMnYPZdSxRRIwVfV5HU1CpSxQoBeDgR1SGeGoVoqrM1iHJ2ASXFlRRhLUJESXuyvmxLlpevUmhpJQgd67kxpTgu9ecumT907efYur9EaXxIUhwGJXrX+Uz6U9evRYocihyXRltVViEuS/kjMiPTXKpvdCXeTByLwJqsZXhyzr9w+0VPYczA4xyrxFIuEzD7uCytKkJFTRkGpAx2mYGeFeuamjHlucdhixqJ2ki5vrANYVWlmJgSi3tOPQahgdZ+XGq2eLkyNihyKHJcGTeoyi7CX5JOFFmi+7hU3+hKZr+Z6MVv1mcP4udNizBpxKmYMe1+vZr12nbMOC7lzNv6nb9i8er5yuu5x1+B8064yhQxvGvBz/isxg8lGeMO8jdh51pMDWvCY1MmmaIfzjhp5ng508+OshQ5FDmujBtU7yzGhQmTMDyqn0v1ja5kxpuJ3syy87fg8dm3oaa+CuEhkbjj4mcwMHWY3m54VXtyXJrukqvt5SI0k11NvnHIi7wQORPO79bzfsvnIrXqIwTa7I+xLHOZNF6u8qfIochxaexU7yrGeXETMTJ6gEv1ja5EkdNzBHbmb8Pa7F8w96c3cf6JV2N0xkTTPIbouXcsoRYBs84MzFu/A49uLcLujGO6RdE3+zfcPSQO00YOUguVR9gxa7xchUeRQ5Hj0tipySnBtJhjMCZmoEv1ja5EkeN4BMjKcVbeXtJMazzmrd8uRE6JEDlHH0bkrBAiJ95yIqdrZ80UL1d/tyhyKHJcGjvVu0swNWo8xsWa8185vHE7HnaycpwVS5qHwPbCUlw3/2dsHnNGt04PW7MQr06dxJ1W5glpt55S5FDkuDSEq/eUYErkWBwTN8Sl+kZX4o3b8QiQleOsWNJcBOTC4/m1gSgaMPogx6288NhcEXLfW4ocihyXRlHN3lKcFj4KE+PNuRCVN27Hw05WjrNiSXMRkFvIH1m0Ar/kl4ot5PJsHB+xhbzEa7aQmytarnlLkUOR49LIqdlXilNCj8LxCSNcqm90Jd64HY8AWTnOiiXNSUA+uuJhgOaMXU9eU+RQ5PQ0Rrr9via3DCcFD8XkxFEu1Te6Em/cjkeArBxnxZIkQAKeRYAihyKnk0De2mzkrspSfk4bNxCpozMOO1qr8kpxUuBQnJR08LNszxreh/eGN27HI0VWjrNiSRIgAc8iQJHj5SKnSjyL/vjqmchavAbBvcJga25Pwhjgh4bKWgw8ZQwuePNWRIpjzrte1fllOMF/EE5JHutZI9pBb3jjdhCUKEZWjrNiSRIgAc8iQJHjxSJn1buL8dmNL6KloemIo9I/OBDnvHQTxl1+Sme5qoJSTPLNxGkp4z1rRDvoDW/cDoKiyHEcFEuSAAl4HAGKHC8VOVLgfHHrq8psjSOXnOU5a+Z1nUKnqqAMx/r0w5TUCY5U97gyFDmOh4SsHGfFkiRAAp5FgCLHC0WOfET1ZOZVPc7gHDpU5YzO7TveUh5dVe8vx9i23piWZsJcO5ydcOpvIYocp3CxMAmQgAcRoMjxQpHzxul3K2twXLnkGp1rvnoU1YXlGNmaivPST3DFjOF1eON2PARk5TgrliQBEvAsAhQ5Xihybvc/3a1R+GTLV6guKsfw5mRc2HuyW7aMqswbt+PkJatnb/gQKbG9Ha/EkiRAAiTgAQQocrxM5Mht4q+dfIfDa3EOHaNybc613z6BXmnxGNwYj+l9TvKAYey8CxQ5jjObt+w9yIzkt53/mOOVWJIESIAEPIAARY6XiZwVr3+FBbe9hqa6BpeGX2BoMKb8+1oMP+c4DKiPxmV9D+y4csmgQZUocpwDf+cbV+PMYy7EpBGnOleRpUmABEjAQAIUORQ5Tg0//wBfjDq9H/qPS+ys99G9y5yy4QmFKXKci8KGXSvx6oLH8dwNcxDgH+hcZZYmARIgAYMIUOR4mchR63FVdJ9EpFaH4dsPHgVFjkG/vTo3+8bCpxEYEITLTvmbzi2zORIgARJwjQBFjpeJHNldNRYe15XXILkyGN/Pfpwix7XfPdPVqm2oxi0vX4xbxdqcwelHmc5/OkwCJOB9BChyvFDkqLGFvL6iBnHlgVjy4ZMUOV7098b36xZgyfqFeODyl72o1+wqCZCAWQlQ5HihyFHjMEB5UnJUqS+WzXmGIsesv/0u+v3Eh//AUf3H4wyxEJkXCZAACXgyAYocLxQ5ssvupnVoqKpFRDHw60czKXI8+TdcA9/2FGbjnrevxbP/9yHieh1YgK5BUzRJAiRAAm4RoMjxUpHTIXRcTdDZWF2PkMIWrPz4OYoct34FzVl57k9vYH95HmZMu9+cHaDXJEACXkGAIseLRY7sunx09fHVM5U0D/KgP1tzq0LEN8BPOTBQprL0ibkAACAASURBVHG44M1blXxVXa+GmnoEFTRhzdwXKHK84q+K33fytlcuwYWT/4qjB5/opQTYbRIgAU8nQJHj5SKn6wCV28tzV2UpH6WNG4jU0RmHHb+NtfXwz2vAuk9epMjx9N9yjfxbteNnfPDtS0rKB14kQAIk4IkEKHIoclwal/LEZJ99ddjwv5dMJ3Jaba2Y/tgJmH3XEvj5+rnUf1ayE3h5/iOIjojDxSddTyQkQAIk4HEEKHIoclwalE31TbDtqcTmT18xnchZk7UMT875F26/6CmMGXicS/1nJTuB8uoS5eycey+dhQEpg4mFBEiABDyKAEUORY5LA7K5oQlNOeXY9tlrphM5sz57ED9vWqTkYeLCWZfCf1Clr1f+D6t3LMXdf3nOfWO0QAIkQAIqEqDIochxaThJkdOYU4btn71uKpGTnb8Fj8++DTX1VQgPicQdFz+DganDXGLASgcIPPT+DEwY+kecMnYasZAACZCAxxCgyKHIcWkwtjQ2oza7BNnz3zCVyNmZvw1rs3/B3J/exPknXo3RGRP5mMWlEXBwpay8zYp4fO7GOYgMjVLBIk2QAAmQgPsEKHIoclwaRS1NLajesR+7Pn/bVCKno7PMQu5S2I9YSe60qhH5ra6bcof6xmmRBEiABFwgQJFDkePCsAFaxXk65dvysOeLdylyXCJovUpy15pchHzVabdiVMax1usge0QCJGA6AhQ5FDkuDVpbSytKtuRi34L3KHJcImjNSsu3fI95y97Dk399x5odZK9IgARMRYAihyLHpQErRU7R5r3I+/K/FDkuEbRupec/vQ9p8f3w5+OvtG4n2TMSIAFTEKDIochxaaC22dqwf0MO8hd+QJHjEkHrVioqz8ffX74IT137LtKF2OFFAiRAAkYRoMihyHFp7LW1tSF/3U7s/+pDihyXCFq70hfLZ2NTzircOX2mtTvK3pEACXg0AYqcQ0RO2piBgJil6LjkjIX9ssFmA3zQBnF/h/3/5Kdt8BFvlZ/EZ/JjH/lWFO6oKW0onymf2z+VIqG9kvKq/KzY7vi8axnlmy7lAP82P/jK9rr4Y/fBXk/+59vmI3wTLSt+dbQr+tHumb1Jm/BNlrHXU74T/7N1+iPf25N2dvguy8j38r+ir+dQ5Hj0r7hxzv39pYuQIU5BnnHOA8Y5wZZJgAS8mgBFTpfwz1g5S7nh+/j6wFeRJRC5jXzF//vAz0d84qN8C1/xKn5Qysj38nN/8ZPvIWWUn5Uy9rqBPqJUez1pr6uNA5/7I0iUk/U62pSviiVRV/msvV1pV/lP2uymjPTdXlrUE++Vesp7v0NsHLB9aDt2G/a6XW34tts261Zss/ptpr+tflj3JV754jFMF3mtph53qZlcp68kQAIWIUCRY5FAGtUNs4oFs/ptVJxdaVeeKn39c1PR3NKkHLx43glXuWKGdUiABEjAZQIUOS6jY0VJwKxiwax+m23U3frKX5BXvFuZaVQWIif0N1sX6C8JkICJCVDkmDh4nuC6WcWCWf32hJg748Ozn9wDmS8sNDAcT1//njNVWZYESIAE3CZAkeM2Qu81IE+4nf7YCZh91xJlnY+ZLoocfaK1e3+WMnszc+5dGNx7JM6aMF2fhtkKCZAACQgCFDkcBi4TWJO1DE/O+Rduv+gpjBl4nMt2jKhIkaMv9X3FOfjXa5fj+RvmICE6Rd/G2RoJkIDXEqDI8drQu9/xWZ89iJ83LcKkEadixrT73TeoowWKHB1htzf1v6VvI1eInb+f+5D+jbNFEiABryRAkeOVYXe/03KdxeOzb4PcQRMeEok7Ln4GA1OHuW9YJwsUOTqBPqSZ21+/AtOOuwwThp5kjANslQRIwKsIUOR4VbjV6+zO/G1Ym/0L5v70prI9eHTGRAwQB7+Z5aLIMSZS67J/xVtfz8SzN3xounVcxhBjqyRAAu4QoMhxhx7rcgs5x4DTBF5d8ATCgyPwl5NvdLouK5AACZCAMwQocpyhxbK/I2DWGRGz+m2FIVhVV4GbRcqHO6f/21SPOK3Ann0gAW8jQJHjbRFXub9mFQtm9Vvl8BlmbvHqeVi+5Tvcd+ksw3xgwyRAAtYnQJFj/Rhr2kOzigWz+q1pMHU2/ugHN2Ns5vE4bfyfdW6ZzZEACXgLAYocb4m0Rv00q1gwq98ahdEQs3Lx+sPvz1AWIUdHxBniAxslARKwNgGKHGvHV/PemVUsmNVvzQOqcwMffv8KyqtLcMPUe3Rumc2RAAl4AwGKHG+IsoZ9NKtYMKvfGobSMNO3vHyxstNqXOYkw3xgwyRAAtYkQJFjzbjq1iuzigWz+q1bYHVs6LdtP+GjH1/Hv6//r46tsikS+D2B4sYKPLThfZzTexJOShxNRBYgQJFjgSAa2QWzigWz+m1krLVse9a8B5EUnSoOlrxGy2ZomwSOSOCVnQuwz68caLQh3iccF6ZPRnJILKmZmABFjomD5wmum1UsmNVvT4i5Fj6UVBbilv9cjEeufA19EjO0aII2SeCIBNaU7cAn+csQNSRZKddUXIPCfQWY0nsC/pQ4jvRMSoAix6SB8xS3zSoWzOq3p8RdCz8WrvgIG3atVPKg8SIBvQncs/FtBKZFIjgyrLPp5oZGNOVWIcInGH9JP4mzOnoHRYX2KHJUgOjNJswqFszqt9XH2gPv3oATRp6Bk0ZNsXpX2T8PIjA3bym2NuYiuE90t15xVseDguWkKxQ5TgJj8YMJmFUsmNVvq4+/bfs2YObcu5Szc8JEfiteJKA1gby6Ejy95WMkDusNv0D/wzbHWR2tI6GNfYocbbh6jVWzigWz+u0NA+u9xS+gqbkR15zxT2/oLvtoMIFnsz5FTbgNQQnhDnnCWR2HMHlMIYocjwmFOR0xq1gwq9/mHCXOed3c0oSbX74I1025E0Fh/bF1f4liYEhSHAYlcqeLczRZ+kgElpduwcKi3xCRmeQUKM7qOIXL0MIUOYbiN3/jZhULZvXb/CPGsR58t/YbPPfzFlQH9UdtpEz50IawqlJMTInFPaceg9DAAMcMsRQJHIZAs60F9254B2F9YxEUEeISJ87quIRN10oUObritl5jZhULZvXbeiOo+x7dteBnzKvxR3HG2IMKJOxci6lhTXhsCk9H9paxoFU/Z+/7HtmthQhO736xsaPtclbHUVLGlLOMyJFT3Hkle9A3aaAxJHtodXthqS7T7qVVRaioKcOAlMG6cDCrWDCr37oE1eBG5O/KtfN/xpYxZ3TrybA1C/Hq1El8dGVwnMzc/O7a/Zi1Yx7ixWJjXz9fVbrCWR1VMKpuxBIiZ+X2JXh30QuYLLaennfCVapDcsdgXVMzHlm0Ar/kl2o27d5qa8X6nb9i8er5yuu5x1+hGYdDxdp9r52Nj+5d5g4iQ+pS5BiC/bCN1jXUIK90D/JL9uKbbXlY2DwAeYO7n63pm/0b7h4Sh2kjB3lWJ+iNaQg8te0jNEb5Iihe3R18nNXxvCHgsMixtdlgEzdTeUO12cR7+XNbK9rEe+Uz8b7zc+X735eV33fUb5PlFZvys5bO9x12D5RtLyfK2tsSZdvbLyjbh5yC7cjZv0MhO7j3SGSmDe/8vqNsW7uvXdtX/G1vX752tSv7Kesc6GtXX2U/D/jU8V6Wlf515SA/Kwj4IwrST0ZJxsEnZsZlr0Ly3sWIb/zG/VHhI0y0uW/mSBbaEICSoJNQE5KBtvg+SoNyjYRvxXosuPlO062ROOfRqbh8ylNKl7mgVZ2x48hsqsw4bhczew68ivc19VVIjesj/vRFcWtvfNE4APsyj+3WsfQdv+C+YUkUOeqEzeus/FC0Dj+UbkB4ZoJmfeesjmZonTbco8jZkbsJ9759HXx9fOHr6wc/8cf+Xvzx8YOPeD3wWft3Xcsq5exlZR1Z1qf9+w47fr7+XWweXLaznfY2O8o2Njdgy+41KK7ar2w3ldeIfuNwVP+jO23JstI/e/td/G/3/UA/pF/Ch/ayPl187Wj/gK+yj/a+dOWg9OsQuztLKvF/X/yq+bS7HjM5co3E/NpAFA04OGmdFGvnhLeqvkZCPnaT/7pPT+jv9KA+UoWOmbVvc/YeJNa4oNU9zIfOphaU7jtIxOQLYSMfJ/v7BShiJiVWCpreSJHCRryPj7IfpS8vOVt4nXhctfkwj6syVnyKwS1fY+q4k3DymKkID4l0z3nW9hoCda2NuE8sNo7KSERgaLCm/easjqZ4HTZ+RJFTWVuO+965Xjz6uBLHjzjNYaN6F5Q3xF0F2xAREiVmc47Su/nDtjdv/Q48urUIuzOO6baMFtPuWqzJ6emmM+DX/2FiyGrEh4qzJgKCxZ8Q8ScIgeJ9sHgfKN53/TwosP17f/G9eC+/l+X8xA1w+751+H7tl8pjt7v/8hyG9R2jajylWPusxu93M2vx2asxomojzurfhNDgcIQFiT8hEcqBdPY/4eLzCISLPwH+gW75pEWM3HLIxcpNLY1YsuEbLNv4DbbsXadYiQqPEbMy1YiJiLeLmXYRkxrfVxEzEaG9HGrtcKK6Y+HxNWPjxePZz/DT+q9wyrhpQuxMQ3p8P4dss5D3Enh7zzfI86lEYKp+wpizOsaOtyOKnMdn34aM1CHMDOxijOat3y5ETokQOUcfRuSsEGsL4j1+2r0nsdZ7xwpck9SACb3D0djSgMamejSK2TXlVfwsZ9oaxPsm8b6hSf4syogbpL2cLN+A+qZaVNdXKo8aO67oiDgECSEUFCiFk3wV4si/XTyJzwK7iCR7Obt4spcT30vxJEWU/E6831fZiFu+WX/YmbVBKz/HFRkNiAioE7NI1agRf+Rskrxp1zVWo1a8rxXv5WUXQEL4BAnhI95LYSQFkBRCXQVSqBBL8nvpU07BDiwVgkDrdVM9DVdnF8FX11UqszJ5xbsPmp2RYi1YxEXGsqW1WWn25LHTcPmpfxPMg3py44jfH7yWTZ6N4yMej5b8bgu5fPy1ePU8fLtmHob0HqXM7IzoP96ttlnZmgR2VOXijV0LETssXcy6y2f8+l2c1dGP9aEtHVbkvP31TOUv9xnn3G+cdyZvuacZELPsEtFLrEkR8dVvH0MmakyL749b/vwwGpqFOOoikjrFkxRR4jspkpTvlXJCMHX5XIon5ft2cbW/KQVZidNQMOSEw4hOxxa0yrUndgHULnyUV/FH/L7UNta0C6MqIYzs7+WMaEHZXjS32IWAvKTwie+V0imQ7GIoUtNZJCkcpjz3OGxRI7tdBF8rjrfvXC8jFgB3PGKSAubAI6YDszPJsemd/dFqNtVRQdYm1ogtXmUXO8GBoYrYOeEoz519NvlfbaZ0/9Gts2GLC0RQjGMnG2vRSc7qaEH1yDa7FTnyRvPzpsV46IpXlDU0vFwncLjHI2Y670NvsSbFjlyYOjBtmOvgu6mpl1jrzulD1039afyfceJRp7fPEokZooNEkrqzSMrjt+BIPPrtusM8qluFlNzvkBmw+qBHTB2PmuSMmpkuuT5Izu7IjQmnjj1HETwhQQcyS5upL/RVHQLfFK7C8srtCB1g/InZnNVRJ6aOWvmdyFmT9Qtemv+wInDkv954uUfg4H89H37a3b1WtK/d0xoJMxzOprdYO1xU3FmT4+wsUsejtpJ6f2QHn4WcCed369bQNV/itanHW+rsmey8Lcq6nV82f4dTxGM0+SgtJba39r8sbMGjCFQ01eCBDe8hfnAqAkLce4yqZsc4q6MmzcPbOkjkyN0PcqHxjVPvxZiBE/XxwAtakWeyPHTt57ocBqgVTkfXSGjVvlp2rSDWXGHR07oqLRbBu+KnFnVKqgrFo6zPxKOs+cruSzmzo/aCdi38pk11CLyWsxBFAbUITFb3TBw1vOOsjhoUj2yjU+TI6XQpcCYNPwWnH32B9i17UQtWOnjO0TUSnhpeq4g1Z/ka+ajOWV+1Ki/XFkmhIwVPZFi0MrszcdjJWjVHux5AYHPlbry/91vEDE3zAG8O7wJndbQLT6fImfXZg8oiyCtPu1W71rzUspVEjlVCaHax5mwcPOVRnbN+a1X+160/KOt2CstylW3u/ZMHizN8/DubG5d5vMemiNGKiRXtPrDpPfgkhSIk2rjFxo5y5ayOo6ScK6eInLk/vYHsvK24c/q/navN0g4RoMhxCBMLaUzACovg1Ua0fd8GvPnVv7GnMLvTtDxv5+bzHkGaOH2Zl3kJfJ7/C9bW5SCkn/GLjZ2hyFkdZ2j1XNZnyYav2j5Z8ray0LiXmMLlpT4Bihz1mdKi8wSssgje+Z73XOPdRc+Lows+Vgr2SczA1affhkHpnnOwaM89YImuBIobK/DQhveRPKwP/IPcO7zTCLKc1VGPus8FD01se/jKV5WcT7y0IUCRow1XWnWegBUWwTvfa8dqyCS/P61fgLMmXCJexaFxvRKVdTvHDvmDYwZYymMIvLJzAfKDqhGebO5/uFeJxM6V+8swa/wMj2FrNkd6zF1ltg55or8UOZ4YFe/0iWPxyHHPyt3ceT7TL5u/VdbtVInDHE8ZZz9vR+be4uXZBNaU7cAn+csQNeRAPjTP9vjw3tXtLMH4yEycmdT9qflm7ZeeflPk6ECbNxYdILMJhwhwLDqE6aBCm0UiYLkra8Ou3xShIwVPXGSi84ZYQxcC92x8G4FpkQiONPcBkA0lNfAvb8Jdg6frws2qjWgmcmasnCWyjfuIjDMi64zIAG5/FT8rn3V9lVlpfNBeQmT2PlBeFFbq+fvILOX2ch22ZAZwiKPc7RnGFeudtgPkZ/I/8bn8Xn4rf5Zv7C111LN/5yeyigfCnkFdKdtus6ufB9nqUu5AeemPvZ2Ozzpen3jpctx90/uKP0pf2/09nM0D5Tq4HeJXm91Gh62OVzsTu/+H+mDVAcx+OUeAIsc5Xl1L55fuxbdiZkfO7kwc9kfxKOsckdtvqOsGWVN1AnPzlmJrYy6C+5j7MZWtuRUl23LxfwPOwoCIFNU5eZNBzUTO31e/hOQR/eyJ0NraFBEiNnIpN1/5KnSGIlKUr5TPZBH758r3SkmZrLGjvr1s53ftFeXP8q0ULnab7bY6bHcpZy9l90FWsts6vE35nWK33WZHeVk3AGK7aZd+oc2mWFZa6Ohbe8WsD8Wap4uuF91Tet/pr70/oo9CsCj96PTFXsa3E9MBPzvL2UvDdgjHjn7ZbUmf7P3jM1372PD2iyLH/RFQ31irzOwsEqcpJ8ekK+t2xg/qPh+a+63RgqME8kTutae3fIzEYb3hF3jgOABH63tSuca95cjwT8LF6VwP5m5cNBM5t6x+GYkj+sLXzz674M3X6scexti77jUMwb41WaYQOXL2j5e2BIq+noOE0y5yuxGKZjvCJRu+VgRPQ1OdeJQ1TTzKmqb8U4eX/gSezfoUNeE2BCV4/pk4R6JTX1mD5rwaPDziCo4kFYaRZiLnH2tfRdzQdPj6U+RQ5Dg2UqXISR8z0LHCLOUSAXfHoq21FUWb9mLmmP9zqX2rVtq4a6UidrbuXWcXO2J2x2yJTc0cm+WlW7Cw6DdEZCaZuRvKzHv5ljxMFzM4R0X1N3VfPMV5zUTOHevfQKQYcP4mnzZUI1Du3ljc9cFMMzkUOe5G+8j13R2LLU0tqNqxH0+MvEZbR01qfV9xjhA7Yt3Oqnk4ceTpyrqd/smDTNobc7jdbGvBvRveQVjfWARFhJjD6cN42ZhXiWRbJK7pe7qp++FJzmsmcu7e8BbCMuLFQUzccunujcXdAUOR4y5B69R3dyw2NzShcVc5HhpxuXWgaNCTmvoqe54ssW6nT0KGyIA+VSQ9Pq6zJbmuZ29Fg6mT9mqAzSWTs/d9j+zWQgSnm3uxcWNNPapyinD/sMsQHmBuseZSIDWqpJnIuW/jOwjuHwP/YPOdNqk2a3dvLO76Q5HjLkHr1Hd3LDbWNsAvrx53DbnYOlA07smP677EYiF4bGLGQT7KGjXwRJz/n+fRED4ETdEpYt9BG8KqSjExJRb3nHoMQgP5D0NHQ7K7dj9m7ZiHeLHY2OzrP6uzCnFq7FgcH8+DeR2NvyPlNBM5D25+H/59IhEQEuSIH5Yu4+6NxV04FDnuErROfXfHYkN1HcKL2nBr5p+tA0Wnnqzb+avYgi5md/J6YV/yZBRnjD2o5YSdazE1rAmPTZmkk0fmb+apbR+hMcoXQfERpu5MU2ENwmt9cfPAc03dD090XjOR8+iW2WhLD0VgaLAn9ltXn9y9sbjrLEWOuwStU9/dsVhXUYPEiiDl/A5ezhNYu3cvrpv/M3ImnN9t5aFrFuK1qZMwKNFcSSWdJ+F+jR+K1uGH0g0Iz0xw35gbFvLWZiN3VZZiIW3cQKSOznDKWot4BFywZQ/uGXEJEoPN/cjNqY7rVFgzkfP41g/RkhKMoHA+W3T3xuLuWKDIcZegdeq7OxZrSirRvz4aV/Q91TpQdOzJI/M/xCfVScgb3P1sTfLWpTgnRNzwpv0FAf581H+40NS1NuI+sdg4KiPRkH9Iy5xSH189E1mL1yC4Vxjk4X3y8g3wQ0NlLQaeMgYXvHkrIsUjyJ4upm7oiZB732smcp7Z/gnqEn0RHBHqnoes7TYBihy3EVrGgLsip7qwHCNaknFB78mmZVLZVIt71r+FSYkj8MfE0YgL6qVbX654+W5sjDoNezOP7bbN3lm/4oTmVaguXoyzjp2Osyf+RTnJndfBBN7e8w3yfCoRmBqpO5pV7y7GZze+CDkDc6RLrkc956WbMO7yUw5bjKkbtA+fZiLnOXEwU2VcG0JMnj9E+xBo3wJFjvaMvaWF6oIyHOvTH2emdn+TNgOHebm/YFXzTnGGlx+qiiowNnYgTk4cg+SQnv/V7U7/duRuwr/nv4jtAadj85gzujU1TDyuelU8rgpCGb5YPhubclaLrOjTMeVY9w9wdMd3T6q7oyoXb+wSWeKHpdtP1NfxkgLni1tfVWZrHLnkLM9ZM6/rVugwdYMjBN0vo5nIeTFrPkpimhEaZe7TJ91HbLwFihzjY2AVD2pyyzA5aAhOShptyi41tDbhTnGGV/zgdOV4C1uLDU3FNagsLkNGrzSckTgefcK0Sb75xsJnEBsZj5UVAzC/NhBFAw5m2N3C4535WxWxk5W3WZnZOe3o80zJXU2nH906G61xgQiO0ffeIh9RPZl5VY8zOIf2Vc7o3L7jrd89umLqBjVHxeFtaSZyXtm5APt7NSA0Wt+BqA82c7VCkWOueHmytzV7S3Fa+ChMjB/myW4e1rcvCn7FmvochByawFHkd2soqkZNcSXSwuJwesJ4DIxMU62PLa0tuPqZ0/HM9e8jTMwYPbJoBX4RN83aSDl75CO2kJcccQv5jtyNQux8iD2F2cojLJkN3RuvbwpXYXnldoQO0HbWrTu2b5x+t7IGx5VLrtG55qtHO6sydYMrFF2ro5nIeTPnK+wNq0FYrLm39rmG1bNqUeR4VjzM7E1NTjHOiZ2A0dHO7SDxlD7/c91r6CUXqx7haAspdurEAuv4oCicLmZ2hvbq47b78qyclTuW4p8XPNFpa3thqdOHAW7Zs1YRO/vLcoXYmY4/jJritm9mMVDRVIMHNrwnZuFSDTma5HZ/904hfrLlKwU1UzfoO+I0Eznv7V6MnSHlCIvTf2GYvgg9vzWKHM+PkVk8rM4uxvTkEzEksrdZXO70c3HhGiyr2orQ/o7NAtSX1ohHWdWI8AvGaWJmZ1SM68Lu4ff/JpJ3noNjh6iTVXpjzirlMVZ5dYkido4fcZrp4uGsw6/lLERRQC0Ck/X/h7PcJv7ayXc4vBbn0L7JtTnXfvuEsr2cqRucjbx75TUTObP3fI/tQcUIi9dv54J7KKxbmyLHurHVu2eVOwpxTfqf0C/cfIkQ7974FoL7xCAozLmzu+rLRVboohqxGDgAf0oci6NjBzuFfV/RLjw6+xa8cvN8p+o5Unht1nIsWPEh6hpqxQLlizFx2MmOVDNdmc2Vu/H+3m8RM1S9R4jOQFjx+ldYcNtraKprcKZaZ1l5XtyUf1+LURdPZuoGlwi6XkkzkfPJviVY75eHiEQebuR6eNSpSZGjDkdaAcpEhuS/Z5wjdiLFmArHzyWbsLhsHcIGxLnsd73YUdNaVAefllaclDAGJyYc5ZCt2d/9Ryk3/Y/aZW5fuX0pvvxVnE0mUkfIBcrHDJnskG9mKfTApvfgkxSKEIPWeKolcoZOHsPUDToPOs1EznyxTXOlz25EJpnrL0Od+evSHEWOLpi9opHiTXtF3qrpiA4014aC+8VN0i81DMEqHGkhU1vYhNiRyUonJ4zCKUljjhj765+birunP4v0hP6aj5Fft/6gPMYK8AvAFLH1fFym+VNEfJ7/C9bWicXi/Rx7zKgFZDUeV1350X3I7J/B1A1aBOgINjUTOQvzxO6BtmxEJhs3MHVm6bHNUeR4bGhM51jB+hw8NvIqhPiZJyfdqrLtmF+0AhED1T3+XyYrlTM7dTU1OD7xKOVRVqDvwck1pehYvOoz3HvpC7rGetkmcZ6LWKAcFhyunLMzKsO85xrNWDkLUeKJQESq67NwasB3d+HxTb+9wNQNagTCSRuaiZxFBauwtGUHIlI4k+NkTFQvTpGjOlKvNNgm9oXkrsnGC+NvEpue9T2EzR3gj4kUM80JAQjR6Myu5vpGtAixU1lRgYkJw3F60niE+dvX/Tz98R0Yn3k8Jo86050uuFx3yYavFLETHRGniJ0R/ca5bMuoikUNFfgo9yfsbyxFYEovww6YdWcLee/RffHywo9wZtLRRmH02nY1Eznf71+LH5u2IjyVIsfo0UWRY3QErNG+rbUVReJx1cwx2q0tUZvUpord+DD/B/QalKy26d/Za6lvQnNJHcpKSnBM4jAcHdIbD795Pd78x1fw9/PXvP0jNfD92i8UsZMUk6YsUB7ax3yHOa4u24FPc39GSHRyPQAAIABJREFUoMiHGJgSAb8AfZm6fBhgoD8uePxsJIhDAeUZR9607d/QQd/euGYiZ2nRRiyuExli0/m4yuhAU+QYHQFrtN/S1IKqHfvxxMhrTNOhZ7Z/jNoYX4ToeDpua1MzmotrsXf5T4gSe7L+efb9SAzxjA0Yi1fPU9bs9EnMUMROZtoI08RSOtomDm2cm78Ey/dvRmxKPAIT9N1O7kpah8m3nocXb3lMnL2Uj89/+S+q6ioxVYgdq+6E87QBpZnI+aV4M76uWYfw3hQ5RgedIsfoCFijfbnQtnFXOR4acbkpOiRzHMlEjtFDUw3xd/OrLyP5mD+i0ScQQ6L7KCkj0kLjDfHl0Ea//u0TfPHrbAxMHaY8xhqQMsQj/HLUiX11xcojrIoWsbU/VUjJcOeOBXC0ne7KOZOg86yHrsL5F12Ai9MPnI+0asfPQux8oJiWMztWWBzuDk+t62omcn4r2YYFVasQ3sfYxWJaAzSDfYocM0TJ832UC2398urF7qqLPd9Z4eEL2fNQGd6MoHh9/7Uv4VTl7ELejz9gyJVXo80m8mOJc3aqisvRJyJZETv9w7V/fOZIkBb8OkeZ2Rneb6yy9bxv0kBHqnlMGXk0wOdiJ29EdC8EiEMCff18dfFNPrr6+OqZSpoHedCfTLYpL98AP+XAQJnG4eznrkdwawAeHnFFtyvYftn8LeYLsRMZ2kuInUtMuV5KF9huNqKZyFlTloV5ZSsQ3o8ix80YuV2dIsdthDQgCMit0+FFbbg1888ez2NvbRFeFCInbrgxJzPnfD4PYckpSBh/8ELTBiF26oorkCTOGZIpIwZFphvO0iZEmJzVkWJn7MDjlK3n6fH9DPfLUQdk0tW5eUuwoWynkgQzKFbf4w3k9vLcVVmKu2njBiqnGjuTuuGHdQuUmZ2UuD44W7AflO7Y+UuO8vH2cpqJnPXlO/FJsVDYAzxjetabA02R483RV6/vdRU1SKwIwv8NOEs9oxpZemXXAhQF1SM4Sf9ZHFtzC9Y+/ThG3vIP+IeEdNvDhtJqkRC0CtEBEThNiJ0RUcaLiuaWJkXoyAXKE4adpMzsJMcaL8IcHSLZ1fn4OPdHNPraEJAaccT8ZI7adLWcK6kbvl4pHiEK/nKdlHyM1S8p09XmWa8LAc1EjjyGe07hUoocDxhuFDkeEAQLuFAjklb2r4/CFX3/5NG92V9fhqe3foSEo/rCx8eYre5S6Pg6sPunvkykjCiugdgvhNOSxmFsjPE3tvqmOuVmu0CInRNHnqEsUE6ISvHomHd1TuYoW5j7K2ITxcJkKXJ1HgKNNfVupW6QszqfL/9ArNU5XhE7KbHGzEaaJuA9OKqZyNletQ/vi62bkSofwGUV8Hr2gyJHT9rWbau6sBwjWlJwQe8TPbqT7+xZhH3+FQhKMk9y4LryatjE9nO/Vl+ckjgGE+OGGc64pr4KMiWFfJwiFyZnpo9AaFCY4pe8AXvy+p3K5lplYfIuMbsTkhKlazqI6qxCt1M3NDY3KEJTCp4/iDOW5Jqd2Eh1D7M0fIDp5IBmImenGFxv5S5Cr0zzJfLTib1uzVDk6Iba0g1VF5ThWJ/+ODPVc0/PLW+qxoMb3kPSiL7w9fczXTwaquqUU5TlNvSTEkbjpMRRhvfhv9++pNxwOy45s3DbBY8jLa6v4b715IB8ovBJ7hK0ibNq5Nk6/sEHn0jdU31nv28qrEF4ra9qqRuq6ysx5/tX8e2a+fjo3mXOusPygoBmImdPbSFe3b0QUYM9YxeBN0ebIsebo69e32tySzE5aChOSvLcg+Rm7/sB2W1FCE7tpV7HDbDUKBZ5txbXoaGuESeKlBGnitkdPx/jRNsnS97C3J/eVEj4+vgqj1Hk1vPwEHPMln1RsByLclchMTUJgYnarNNqEUcsFGzZo3rqhpfmPyIeFybj/BOvNmAkmr9JzUROXl0JXsz5HNGDzfMs1/zh7L4HFDlWjay+/arZW4rTwkdhYrzxj1K663ltSwPuXvcmEof1hl+gtv9i14t8U509P1Z1VTUmJY7AnxLGIsTfmLxh7y56AT+t/xL3XfYyvlszT7xfKHZiXawsUA4JCtULicvtaJ0eom5nCcZHZqqaumFTziq8uuAJvHDTXMPWl7kM3EMqaiZyChvK8WzW/xAzNM1Duuq9blDkeG/s1ex5TU4xzomdgNHRGWqaVc3WZ/nLsLFpH4LTo1Sz6SmGmhsaFbFTXlaBCYlDxY6scYgMsK+P0fPKyt2MgWl2kVtQuk/Zer588/fK4mQ5sxPgH6inOy61pUV6iIaSGviXN+GuwdNd8ulwle5/9wacNOossQD8dFXtepMxzUROSWMlnt4+F7HDKHKMHlAUOUZHwBrtV2cXY3ryiRgS6Xm7PVraWnHH2tcRnZmCgBDPv9G6OiJaGptRU1iB6pIKzBo/w1UzqtbLLc5R1uyszlqmzOrIR1lG7WpztGNqpoeQBwGWbMtVjlYYEKHekwuZb0xmk9c7g72jDM1STjORU9FUg0e3zka8QYdxmSUAevhJkaMHZeu3UbmjENek/wn9wj1vM8HC/N+wqj4bwX2tnxC4saAafVqjcVmfkz1q0O0uzFLEzqac1cqszpRjL/Io/7pzpjM9RKtIDyF2YbmSHqJxbzky/JMOSt3gbsflmUV/f+lCzJh2P4b0MX7xubv9MbK+ZiJHPh+/b+M7SBRnVfAylgBFjrH8rdJ62ZY8/D3jHCSL03o97bpj/RuI6B+PgFBj1qvoxkMkqNy/cQ/+NfgC5dRkT7x25m9VxE5W3mZlZue0o8/zRDcP8snV9BD1leKco7yaw6ZucLXjc354FRU1Zbj+rDtdNcF67QQ0EznyqO07172B5FH9CdtgAhQ5BgfAIs0Xb9or8lZNR3Sgvsfm94Tvx6L1+LFyE0L7Wz8ZcENhFeIaQnBDf88/dXpH7kbl9OQ9hdnKI6yTx0ztKZSGfu9seghnUjc407G8EiFiX7tcLDb+SJyNk+hMVZbthoBmIqfF1orb1r6ClJHtIkf8C0QePSmfhSqJPeT/KR+1ic/E2/bvlR/ktx3lxPf28vKzjnLtPyhHWdo6qnTa7bac+NBuuqs9xSDa5Kmo7e22N9LuYrvP7XVESXt1UdYfvvBrk+2LPnXxwd6PDl9t4lvZZ/urLH+gmQP9bJN97Ohz+6ss59vBq5OH4kE7K/lqg629T+2I2rl1lBNs2st7yvP7I/0Wzlg5S+FkP6TWR2xVtR9VKresyh7J5/wKcV97Ej57MXsZ+3eybkcdH7QqdewllXodZdvrdf7cYVe8NotYyiD7iDY7XpVR0GGniz0RIMVyk0+L3RulkN3PA63ae2z/TFhSXjv62P653Tml3O/bOriPdmsH7HX4KSAdYtfuQbsjwnDXNu08O9m187B3oWsf5AcH2itYn4PHRl6FED/Pmi25V8wYB6RHIjjC83f4dMTP1Vc5m3ZtvzM8JsGnI/3YsmetInb2l+UKsTNdHG43xZFqhpVxND2EK6kbHOnU85/ej94JA3DOpMscKc4yPRDQTOTIdpWbVucNRN6y7X9hy5vXQf+JL+SNrONGZC/n2+UmJwSC+E/+PS7LyavjVdrptNduV5YL9AlQ7HUt33EjtJeX34m6ipQAAkR5P8WWvd0Oux1+HfTa7qvymRQjh9Tp9KlruXZfuto+4Lvdh65tHFpO+t6dL0o5cQPryqC7cmb5TZA3X5sUnge92sWaTYg6Kf6UV/ttWnkvr47PDq3brT2RkLDTXmddKTBk212/O9gXe4kOP3rwU5T7vb0Dfja0Ndu/Fyq14z8pWJX3ihI+1BcIAdbSzsYucLv6Yv83gd2ndiuKAG4V/9k/k223t6TUFSOu3YbSluLHwXY76ij22u2/MP6mdsnoGSNqefFWfF26EmFecLJ6vch3FV4B3JZ5vmfAd9KLjWI7tHyMVV5dooid40ec5qQFfYsfSA8RJ9JDiPOA2gW/9MLd1A2H68m67F/x7qLn8ewNH+rbWQu3pqnIsTA3do0ESMADCDy85b+wJYUgpJf+26n17n7l9gJcnDIZwz0gmac7fV+btRwLVnyIuoZaZev5xGGetYC6a98Olx5CjdQN3TG8+62/4oxjLsBxw05xBzHrdiFAkcPhQAIkYEoC68t34pP9PyMi0/rrFhoqa+Gzvx73Dr3ElLHqzumV25fiy18/RIutRVmgfMyQyR7bN5ke4tPcpWiUpxME+SKpMRw3DVR3jdGiVZ9i9Y5luHP6vz2Wgxkdo8gxY9ToMwmQAJ7YNgcNcX4IjdbmmH5PQlwrzig6LXYsJsQN9SS3VPHl160/KI+xAvwCxAnK00Xyz0mq2NXCyNcFK/GlyHB+z4hLkBgcrVoTDU31+NuL5+OfFz6JgameeaK4ap3V2RBFjs7A2RwJkID7BLZW7sF7+75H9BDr58ZrrG1Aw55yPDriSvfBebAFefCdXKAcFhyunLMzKsNzE8GqjVEmQW1srsfVp/9DbdNeb48ix+uHAAGQgPkIzBQpY2p6tSE41rO2s2tBsn53GSaEZeLUpHFamPc4m0s2fKWIneiIOEXsjOhn7X7vLdqJe966FrNmzEWvMM88+8jjBokTDlHkOAGLRUmABIwnsKumAK/mfIlYL8iL11zfhLKsAjw16hpDs5AbEXWZ1kCKnaSYNGWB8tA+o41wQ/M2Z35yNzLEI6qzhaDjpT4Bihz1mdIiCZCAhgRezJ6P8vBmBMVbfxancV8Fhgak4c+pnrtORcNQK6YXr56nrNnpk5ihiJ3MtBFaN6mb/VU7fsac71/FM9e/r1ub3tYQRY63RZz9JQETE8itK8ZzOz5Fwog+Ju6FY663isSP+Rt34dFRV4uM49Y/6LAnKl//9omS9VwuzJWPsQakDOmpisd/f9srl+D8E6/GsUP+4PG+mtVBihyzRo5+k4AXEng95yvsDxTJFJOsv6PKUxNxGj3sFvw6R5nZGd5vrLL1vG/SQKNdcqn9B9+7CQ3NdXj86rdcqs9KjhGgyHGME0uRAAkYTKC4sRKPbf4AicP7wtfPfvK5ZS8TJOI0kr1NnFouZ3Wk2Bk78Dhl63l6fD8jXXKq7TcWPiMew32Gm899GBOGneRUXRZ2jgBFjnO8WJoESMAgAv/d+y1yfMoQlCKO2Lf4ZaZEnEaGormlSRE6coGyFAtyZic5Nt1Il3ps+5Mlb2HuT28iwD8Qr9w8H+Eh1h/PPULRsABFjoZwaZoESEA9AjIXXmR0L4QmRyEgWB49a92rdEsurut3pqkScRoZjfqmOkXsLBBi58SRZygLlBOiUrC9sBRb95corg1JisOgRGMz1W/buwEPvn+jyBVnQ2pcX8z8vw+MxOYVbVPkeEWY2UkSMD+BarF+4bvidfilaBNCw8LgGx9iyczjZk/EWdxQgYc2vo+z0yfilKSxug68mvoqRezMX/4JkHgx8ltjUd8rXvjQhrCqUkxMicU9px6D0MAAXf3q2tgD796Iwoo8ZKYOxy3nPWKYH97SMEWOt0Sa/SQBCxFYUrwB3xeuQ4ufDQGxYQiJtc5CZLMn4nx155fY61cOn6ZWRNiCcF7qCRgQkaLr6Lv100X4qikCJRkHHySYsHMtpoY14bEpxmzJlyks5i17H49e9Tr2Fe0y7aJpXYPpZmMUOW4CZHUSIAHjCGwo34VFxashZw/CYnshKCECPr4+xjnkZstmT8S5tjwbn+QvRa/B9nQbDSU1qCooxdjYTFyU/gfoERn5iOqv85Zi69gzu43GsDUL8erUSYY8uvrHK5fiopOu8+j8XG4OYY+rTpHjcSGhQyRAAs4S2F2zX4idNdhatgcx8THwiw2BvwnX7Zg9Eee9G99BQGoEgnuFdYbQJs77aS6oQmNNIy5IPwFHRfV3NrxOlZ+3fgce2JiPvMHHdVuvb/ZvuHtIHKaNHOSUXXcLfy4eo2Xnbcat5z3qrinWd4IARY4TsFiUBEjAswmUNVVhceEarCjeil69IuEbF4qg8BDPdrrdO7Mn4vw072dsatiL4L7d51+qr6xBfV4lMsSjq4tSJyM8QJu4vPrjD3h5XxvyhxzfbdxTt/2M2waE4dIJR+s2LipryzBj1vl45KrX0DthgG7tsiGAIoejgARIwHIEmm0t+KFwPZaUbICvvx/8EkIREuXZaSDMnIizoL4UT26eg4RhfeAf6H/Y8dQmvmkSQqeqrAJnpx6H4+OHqz727nzvXiypHYUd48/u1nbmb/OQWP5fXDzpbJx3wpXw8dH+zKU3v3oGQULUXXLyjar3lwaPTIAihyOEBEjA0gRWlW3Ht0VrUdVSh+A48SglTogdHz1WhziO1eyJOJ/P+gzVYS0ITHRsAXhjTT2axCOsWL8IXCzW6iQGRzsO6wglf9v2Ez5d+i58k6/C/NpAFA04OKlnx8LjmycNwP/EeTVb9qzDn4XQmSy2nWt1ZYlHVE9/dDteuGkuggO1mb3Syncr2KXIsUIU2QcSIIEeCWRV5+KbwtXIqS5AVFw0/OPC4HeEWYceDapYwMyJOFeWbsf8wuWIHJTkNJGmwhoU5hXgtPRjcGaS+4+P7nj9Kpx7/OUY3n8iHlm0Ar/kl6I2Up6N4yO2kJf8bgv55t1rIA/nk9d5J1yFYX3HON2Hnio8Pvs2jM08DqeOO7enovxeAwIUORpApUkSIAHPJbC/vgyLxSLlVUXbEBsbB7/4YASEBBvmsJkTcdrabLhn49sI7h3t8plFLQ1N4hFWFQJtvrhQrNVxdbv5olWfYm32ctx+0dOdsXT0MMAf1y8UMztvY2ifUWJm5ypxkKB9d5i717LNi7FwxcfKlnFexhCgyDGGO1slARIwmEBdS4NyuOCywk0ICg2BX1zwQbuC9HKvUTy26dMag8v6nKxXk6q181HuT9jRnI8gIXLcvdzZbt7c2iwW9p6n7FzKTHNtnU+bEGyfCKEjxY58hKXGep1bXr4Yl5/6d4zKONZdPKzvIgGKHBfBsRoJkIB1CCwr3ojvi9ejAc0IjA1HiFi7o8tl4kSceXUleGbbx0gY0lu1x36ubjf/6MfXUVFTiuum3OF22IoqClRZr/PZz+9hb9FO/P3cB932iQZcJ0CR4zo71iQBErAYgc0Vu5XzdvJrSxAZH40AsQVd7s7S6jJzIs6ZWf9DbVgbghLV37XmzHbzYiFK5PbsWTPmIl6lx0wy3u6s1ymtKsTfXrwQT137rshR1Uer4UO7DhCgyHEAEouQAAl4F4F9dUVYXLQG60uyERcfD19xuGBAiPpJQcu25OHafmeYLhHn8pItWFj8GyIynV9s7OhIcnS7+asLnkBUeCwunPxXR007Vc6V9TqvfPG48CkGF/3hOqfaYmH1CVDkqM+UFkmABCxCoKKpRmw/X4NfxeGC4eHh4rydEHG4YKgqvTNrIs7mtlbcu+EdhPWJQVCE9luij7TdfEfuJsz85G4xi/MJAvy0S7rpzHqdrWJb+qx5D+L5Gz9CgL/6wliVwedFRihyvCjY7CoJkIBrBOQuoh9FUtCfitajzd9HLFIWhwtGu/eYxqyJOGfv+wHZLYViR1WUazBdrNXddvMn5/wTozMm6LY925H1Og+//zccN/wUnDT6LBd7ympqEqDIUZMmbZEACViewDqRhHKROG+nrLkaoXEiKag4XNDZpKBmTcS5p7YQL2z/FHHDxGJjDdcqHW4Qdd1uPrw+BL+s+gJP/NV+zo2e1+HW68xe+jm+27waZ02YjiFJcYYkAdWTgxnaosgxQ5ToIwmQgMcR2Fmdr2RA31GRi5i4GPjHh4pdRo49MjFrIs5nts9FfS8fBMW7N4vlbjDldvOsj97DqDF/wq2TbtQlu3l3Pnes1xmYPhq728ZjWV4JWmLS4OsrDx8s/d3hg+72m/WdJ0CR4zwz1iABEiCBTgLFDRX4tngtfhOHC0ZHR4mkoCEIDDv84YJmTcS5pGgDFpetQ8TABMOjX7x6FSqzs5A+4TTdspsfrtNyvc5l73yAVSEZKMkYd1CxjjQSj02ZZDgzb3WAIsdbI89+kwAJqEqg0daM7wvXYqk4cycgKFDJgB4SFfa7NsyYiLOhtQn3bnwHkf3jERSm/WLjIwXG1tqKTS/PQv9zz0N4ahqc2W6uasDbjclTlf86bym2jj2zW/PD1izEq1Mn8dGVFvAdsEmR4wAkFiEBEiABZwisKNmqzO7UtjYiWDzakYlB5WXWRJzv7/1WPI4pRVBaL2cwaFI2f8mPaK6pQZ8zpnTad3S7uRYOzVu/A49uLcLujGO6Nd83+zfcPSQO00YO0qJ52uyBAEUOhwgJkAAJaERgW9VefC92ZO2qyReLlCNha2rFMUEZOCvVPMf87xS+/yf7C8QNTYevn69GpBwz29LQiA0zn8bwG25CYNTvd3dpld38SN7NW79diJwSIXK6TzDaN3uFEDnxFDmOhVj1UhQ5qiOlQRIgARI4mEB+fSl+EI+y5Hk7j466GpEB6py1owfnJ7bNQXO0v7KLzBMuKXT8g4OO6Ira2c2P1Jh8XHXd/J+xecwZ3Rbj4ypjRw1FjrH82ToJkAAJeCwBucbop/JNCBsY77E+Hs4xtbKbO9Lxuxb8jPm1gSgaMPqg4lx47Ag9bctQ5GjLl9ZJgARIwJQEalrqcf+GdxE9MAmBoYffLebpnXMnu7mjfatrasYji1bgl/xS1EbGimo+8C/NQ7+gGrxx2aUIdfBoAUfbYznHCVDkOM6KJUmABEjAawi8tfsb5PlWICjV+MXG7kJ3Nbu5s+3KR1db95co1QYlxmDON/djRL/xOO+EK501xfIqEaDIUQkkzZAACZCAVQjsqMrFGzlfIXZYGnx8fKzSLd23m5fXlOLh92fg9KMvwCljp1mGo5k6QpFjpmjRVxIgARLQgcCjWz+ALS4IQTGesdhYzS7rvd18b2E2HhRC59ozb8cxQyar2RXacoAARY4DkFiEBEiABLyFwDf7V+GXqm0IGxBn6S7rud18466VeGz2rbj/shcxuPdIS3P1tM5R5HhaROgPCZAACRhEoLKpFg9uehexmWkICAk0yAt9m63KK0VlYRlmjZ+hacPLNi3G+4tn4d5LZyE1ro+mbdH4AQIUORwNJEACJEACCoE3dn+FAr8qBKWYf7GxoyGtzynDmLD+OCtZ+wMaF674GD+s+1LM6MxCeEikoy6ynBsEKHLcgMeqJEACJGAVAlvF6czviB1VMUOttdj4SPFpKK8BCutx37BLdQvjRz+8hqz8LbjnL8/p1qY3N0SR483RZ99JgARIoJ3AQ1v+C8QHI9iCi427DXJbG0o35+KKvn/CkF69dR0Hry14Eg3N9fjbOQ/o2q43NkaR441RZ59JgARIoAuBr/b/hhVVOxBq8cXGXYPemFeJZFsvXNP3NEPGwjMf34n4qCRcfurfDWnfWxqlyPGWSLOfJEACJNANgbKmajy04T3EDxGLjXvICWUVgE11DSjP3o8HR1yOcP8QQ7rV0tqMB9+bgdEDJ+DcSZcb4oM3NEqR4w1RZh9JgARI4DAEXtm1ACWBdQhM9p6FsLVZxTgxZgROShhl6LgorSoShwX+DWdNnI4/jj7bUF+s2jhFjlUjy36RAAmQQA8ENlXk4IN93yN6aKrXsGoorkFwpQ3/GnSBR/R59/4dYkbnJtww9R6MH3SCR/hkJScocqwUTfaFBEiABJwg8MDm9+CTFIqQKOudbNwdBltLK4q37MXfMs9Fn7BEJ0hpW3T9zhV46qPbla3lmWkjtG3My6xT5HhZwNldEiABEpAE5uf9gnX1uxHSL8ZrgDTsrcBA/0RcnP4Hj+vz0o3f4MPvXxGHBb6A5Jh0j/PPrA5R5Jg1cvSbBEiABNwgMGPlLEQlxSAiJdYNK+ap2lBVh0Yhch4+6gr4+vh6pOMLfp0DKXbkjE5okHfMrmkdCIocrQnTPgmQAAl4IIGC+jL8d+93qEUjAtN6wT84wAO9VM+lym0FmJY8EeNjBqlnVANLcjYnR6zTuWv6TA2se59Jihzvizl7TAIkQAKdBBaKM3K+yf0NcWlJCIq35uxBU2E1ouoDcdOAqaaI/CtfPA65xfymafeZwl9PdpIix5OjQ99IgARIQAcCuXUl+GDvt2jwa0VAWiT8A60zq9PS0IyCLbtx74hLkRAcpQNNdZqQC5GTY9Jw6SnaJg5Vx1vPtUKR47mxoWckQAIkoCuBz/OX44eCtYhJT0RQbJiubWvVmJ4JONXsQ1NLo7K1XG4rn3acfrm11OyDJ9iiyPGEKNAHEiABEvAQAntqC8WszndoFpM5AakRpp7VMSIBp5phLK7cLw4LnIFzxInIfxg1RU3TXmOLIsdrQs2OkgAJkIDjBD7LX4al+zciOi3enLM6BibgdJxyzyV3FWxTZnRkMs+xmZN6rsASBxGgyOGAIAESIAES6JZATk2BmNX5Hq1BPghM7QW/AD/TkDI6AaeaoNZmL8fMuXeLreUvIiN1qJqmLW+LIsfyIWYHSYAESMA9AnNzl2JF8RZEpsUiOMbzd2B5QgJO94j/vvZPG77C3B/fEIcFzkJidIra5i1rjyLHsqFlx0iABEhAPQLZ1XnKrI5PiL+Y1YmEr7/nzup4SgJO9ejbLX2+fDZ+WrcQd//lOcRExqlt3pL2KHIsGVZ2igRIgAS0ITBn3w9YXZqFiNQYj5zV8bQEnGpH4d8f34nVWctw7vFX4PSjL0BYsOfPrKnNwBl7FDnO0GJZEiABEiABbK/ap8zq+IcGKqcl+/p5RpoET03AqeaQKa0qwg3Pn6OYlALn4StfQ2pcHzWbsJQtihxLhZOdIQESIAH9CMit5usrdiEsJQoh0RH6NXyYljw5AaeacP7xyiXYV5yDQekj8NAVr6hp2nK2KHIsF1J2iARIgAT0I7Clcg9mi1mdwPAQBIlZHR9fH/0a79KSTMDZsLccj/x/e2cXG0UZheE/3vabAAAGQElEQVS3lE5327Ld3dKWVsAC1VCEKokGGzSKhqBYuTCWQg0XRoIkijGomGqIxoCGG6LU+EOMiAiiQSgWBKlYLEWiDamkAaXAFroL/du2221Ztr84HSNBBdcy3+J8M+/c7nzvnvO8Nycn852T+6RhF3CKArNm6wrkjM/F4eMVyLvtQczLKxIlbTodFjmms5QJkQAJkMCNJTB4aVBb9nms8wwSxrphT77x05JlWcApwpnWQCNSnRlo7jivDQssuH8x7st9WIS06TRY5JjOUiZEAiRAAv8PgdpAPT5Xuzp2R6LW1UHMjenq9DQF4QrHS7OAU6Q7p84d14YFLi9YjenZeSKlTaHFIscUNjIJEiABEjAGgb7BfmxSuzp1XV6tq2NzJEQ1MFkXcIqEcqSuCut2vK4NC5yYMVmktPRaLHKkt5AJkAAJkIDxCNS0n8QXvh+QmDzqj65OlB5ZF3CKxlHxyy7sqNqoDQtMTR4jWl5aPRY50lrHwEmABEjA2ATCA71aV8dzoRH2sU7YRont6si+gFO0e6WHNqH6RKXW0VFGxouWl1KPRY6UtjFoEiABEpCHQHXbCWzzVmKUO1mblizkMckCTiEsrhDZVF6CxnYfVhSuES0tpR6LHCltY9AkQAIkIBeBC/1hfObdj7OhFq2rE69eOdfzmGkBpx4OVzv7bukbGBkbh6WPFouWlk6PRY50ljFgEiABEpCXwGH/cWz3HkTyaDeUzOsbIGjGBZyiHX1zy3JMGHMrFj6wVLS0VHoscqSyi8GSAAmQgPwEgn0hratzPtwGm/pRspI4vK6OWRdwinQ21NOtXi1fhnunzUH+3QtESkulxSJHKrsYLAmQAAmYh0CV/xh2NByEKy0FSsZ/6+qYfQGnSHcb273qsMDntG7OULFjxYdFjhVdZ84kQAIkYBACHb1d2Oz9Hs29Ae2quZJgu2ZkVljAKdqWOl+t1tEZ+hD59kkzRMsbXo9FjuEtYoAkQAIkYH4CB1prsVPt6qRkpEJJv3pXxyoLOEW7PXSt/L2dq7Sr5VnqdzpWeljkWMlt5koCJEACBibQ1hvUdmC19XVBGeeEYlcuR2ulBZzRsGh/zdco+3GLOixwHVIcadH4C0NqssgxpC0MigRIgASsS+C7lhqUNRxCamb65a6OlRZwRsv57epE5JqTh9WOTol2xdwKD4scK7jMHEmABEhAMgIt4QC2NlSgeTAI2GMxrt+JpZPyJctCTLhDwxQ/9ezDCzkFyErSt7Jh47530Bpowovz3xITnMFVWOQY3CCGRwIkQAJWJlDRXIPtDVVYOW0R0mxOy6HY21iN/WpnK86VACU4gOKcIsTr7MIMLfO0xdmxJP9l0/NkkWN6i5kgCZAACZCAjAQ+PvMt6sNNSLjZjVglDr2+Trj67Xhm0jzd6aza/DxuyZyCwllLdGsZWYBFjpHdYWwkQAIkQAKWIzC0AuMDzy50x/bBnuX6S/6hU37kJk3AYzfN1MWl+2JQu1o+645HMHfGfF1aRj7MIsfI7jA2EiABEiABSxHwhfxY79kNxWlXByT+c5npQF8/Ok40YuH4WZjuytbF5pz/rDoscBkWzV6GmVNn69Iy6mEWOUZ1hnGRAAmQAAlYisDRDg8+8exFylj1VtnoxGvmHu4KIeBpxoqcQoyxu3Ux+q3hqNrReRavFK3FtIl36dIy4mEWOUZ0hTGRAAmQAAlYikB58xHsOV8NZ1YqbI5rFzh/Qulp6caIQA9ezXlCN6effj2A9bvX4LVFJRifrq87pDsYwQIscgQDpRwJkAAJkAAJDIfAFu8BHAvWqx8YpyDuigGIkTR6GgLIjHHiqayHIr0a8ffyI6XY8/OX6rDAEriSUiK+L8sLLHJkcYpxkgAJkAAJmIrAwKVBvH+6DP7Bbu0D45jYEcPOr6uuCfe4p2JO+p3DPvv3A9sqN6C2vlpb/zAiZvix6A4gCgIscqIAlZIkQAIkQAIk8G8EWsOd+LB+N5AQC0VdTHq9T9/FXvjrzuHp7HxMdoy7XpnL5zbsXYuO7jYsf3y1bi0jCLDIMYILjIEESIAESMAyBOq6fPjo9DdwpLnVtRVJuvMOBy4g5AugeMoCJMdF/p4n0h++/dVKJNkdWDz3pUivGv733wGExaxV7BAh9wAAAABJRU5ErkJggg==[/IMG]

Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 25.10.2024 13:18:57 Да, это серьезно упростило дело. Спасибо. Все получилось.
	Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

25.10.2024 11:13:48

А можете подсказать? Вот есть метод IsPointInContour method (ZGeometry), который проверяет попадание точки в полигон. А как его применить, чтобы не перебирать каждый полигон в цикле по сисам в отдельности. А то получается, что идет прохождение в цикле по всем участкам, берется 1 точка, а потом еще и проверяет в цикле по всем полигонам, боюсь такое будет очень долго работать. Может быть можно как-то получить 1 единый полигон, со все площадных объектов? Или еще как то?

Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

24.10.2024 17:42:01

[QUOTE] написал:
[QUOTE] написал:
Добрый день. Столкнулся со следующей ситуацией. Есть слой с площадными объектами (домами), а так же есть слой с участками. Требуется на конце участка, который попал в площадной объект создать потребителя. Как создавать символьные объекты по координатам в VBS мне понятно, но не понятно как взять координаты начала или конца участка и можно ли вообще их как то получить?[/QUOTE]
Добрый день. Element.Polyline [URL=https://politerm.com/zuludoc/zuluax/index.html#Element_PolyLine.html]https://politerm.com/zuludoc/zuluax/index.html#Element_PolyLine.html[/URL]

А у Polyline GetX, GetY, первой и послдней точки[/QUOTE]
Спасибо. Если я все верно понял

Function [B]GetX[/B](TopNum As Long) As Double

TopNum - номер вершины ломаной (нумерация с единицы).

Для получения первой точки TopNum указываем 1. Для последней используем свойство NumTops.

Перейти

Создать объект на конечной/начальной точке участка по условию пересечения с другим слоем, VBS, координаты

Алексей Демин

Пользователь

Сообщений: 53 Регистрация: 08.04.2022

24.10.2024 15:15:06

Добрый день. Столкнулся со следующей ситуацией. Есть слой с площадными объектами (домами), а так же есть слой с участками. Требуется на конце участка, который попал в площадной объект создать потребителя. Как создавать символьные объекты по координатам в VBS мне понятно, но не понятно как взять координаты начала или конца участка и можно ли вообще их как то получить?

Перейти

Большой вес слоя

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 17.10.2024 11:29:18 Вопрос снят. Нашел в БД поле BLOB, где были картинки.
	Перейти

Большой вес слоя

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 16.10.2024 21:13:39 Добрый день. Попался в руки слой БД (sqlite файл) которого весит 1 гб. Привязанных фотографий нет, фрагментация 0%. Подскажите пожалуйста, как можно выяснить причину большого веса слоя?
	Перейти

sql запрос select в плагине или VBScript

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 10.10.2024 16:04:04 А можете сказать, что значит 8 и &H100? Изменено: Алексей Демин - 10.10.2024 16:32:19
	Перейти

sql запрос select в плагине или VBScript

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 09.10.2024 22:44:09 Вот это уже очень даже хорошо, спасибо!
	Перейти

sql запрос select в плагине или VBScript

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 08.10.2024 09:34:41 Большое спасибо! Полезная информация
	Перейти

sql запрос select в плагине или VBScript

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 07.10.2024 14:37:17 Да, похоже сейчас это единственный вариант, но он имеет существенный минус - красивую таблицу там не собрать. Если бы там можно было сделать выравнивание столбцов то это бы еще куда не шло, но увы
	Перейти

sql запрос select в плагине или VBScript

Алексей Демин Пользователь Сообщений: 53 Регистрация: 08.04.2022	# 07.10.2024 10:28:19 А этот DataSet можно внутри внутри зулы показать? Или только сохранять его?
	Перейти