Макрокоманды системы Вектор

Блок 8 Объекты и расчеты

 

МК 8.1. УПС – учебно-парусное судно

 

корпус судна = 25.5042

Центр = (0.725881, 0.441958, 3.87033e-005)

Паруса в группе

Центр = (0.47788, 2.78761, 0.257549)

Площадь = 26.6637

МК 8.2. Парус

Расчет

Площадь = 149.108

Центр = (2.07526, 3.3, -2.15674e-013)

Парус

Площадь = 25.3868

Центр = (0, 0, 0)

Можно все поверхности поместить в одну группу

Центр = (-0.863603, 0.801654, 6.97684e-006)

Площадь = 174.494

 

МК 8.3.Р1. Эры Майи длинная, Сверхчисло, укороченные. Задается объект  Сфера-Земля и точка на ней. По картинкам задать 6 точек и к МК 5.21.

МК 8.4. Р1. Эры ацтеков. Задать объект « Сфера-Земля»  и точку на ней. По картинкам задать 6 точек и МК 5.21. Дойти до 4-го солнца и получить премию ацтеков

 

МК 8.3old. Паруса произвольные

 

Центр = (1.50216, 2.58888, 0.210671)

Площадь = 16.1616

При постановке парусов на судно, вызывать его первым.

Центр = (-0.831374, 0.240546, 1.46835e-006)

Площадь = 76.0807

Центр = (1.10175, 2.63705, 0.321796)

Площадь = 12.6498

В группу убирая паруса или добавляя новые, можно моделировать разные ситуации.

 

 

МК 8.4old. Стаканы.

Объекты для исследования крена

МК 8.5. Док (полудок)

Объект полезен при расчете, помещая в него объекты, ЦТ

МК 8.6. Два дока (полудока)

Доки полезны для расчета ЦТ, помещенных в них объектов

 

МК 8.7. Два автомобиля

МК 8. 8. Судно по килевой линии.

Сначала задается килевая линия. МК 14 и 15 (из блока 7) формируют килевую линию автоматически с помощью двух точек (Р2 (point2)) начальной и конечной на килевой линии, помня что здесь килевая линия является дном судна и в данном случае совпадает с осью х.

МК далее  задает поверхность судна по килевой линии:

 

МК 8.9. Бортовая (задается две проекции как? см. ниже и киль

Пример 1. Построить бортовую линию судна по ее двум проекциям – на видах Бок и Полубок (на фронтальной и горизонтальной плоскостях).

По бортовой линии на горизонтальной и фронтальной проекций задаем 7 пар точек

С помощью МК 23 строим сглаженную полилинию 3D

Это хорошо видно, если повернуть сцену

 

Пример 2. Чтобы построить поверхность судна, задаем диаметральный батокс - килевую через «Группа точек - > Полилиния». Задав киль, и обращаемся к МК 9 «Брт-ая (две проекц) и киль»

 

Бортовую на xy уже задали  

 

МК 8. 10. Задаются верхняя диаметральная линия (верх лодки) и киль

Поверхность задается по верхней линии и килевой МК 8.10 «Верхн. Диаметральная линия и киль». Возьмем лодку ФК и по ней проведем сначала верхнюю линию, затем килевую и только после этого МК 8.10.

Полученный результат на КЧ

Ниже МК запускаются к заданным выше в этом блоке объектам, или из других блоков, где есть формы судов, а также вызванных через Импорт или к формам (группам форм), смоделированные проектантом:

Настраиваемые параметры находятся в начале МК, по умолчанию они больше подходят к импортируемым моделям.

МК 8.11. Объем от осадки. Если поверхность находится в группе, то её надо вытащить из группы.

МК 8. 12. Осадка от объема

VbsMsg "График зависимости Осадки от объема (как веса) для поверхности (может быть в группе) из структуру". Здесь берем готовую модель по вариантам и сразу запускаем данную МК, которая строит судно ниже его осадки и график зависимости от объема (груза).

МК 8. 13. Объем судна

VbsMsg "определить вес (объем) группы (если одна поверхность, то ее поместить в группу) "

МК вычисление объема работает для любой поверхности (в группе)

МК 8. 14: «Объем подводной части»

Здесь есть некоторые внутренние настройки для каждого случая.

МК 8. 15. Мета графики. Если поверхность в группе, то ее вытащить.

Рассчитываемые параметры см. на экране

МК 8. 16. Метапараметры судна при крене

 

МК 8. 17 «Мета пример». Вычисление некоторых метапараметров для заданно поверхности (в группе).

МК 8. 18. Крен судна. Расчет дифферента (крена) для одной поверхности или для групп.

' Определяем мета характеристики судна с грузом

               vol = area(n71)

               Set Pcg = Centroid(n71) ' центр тяжести судна

               VBSMsg ("Вес (объем) = " & ar)

               VBSMsg ("ЦТ: " & " Pcg.x = " & Pcg.x & " Pcg.y = " & Pcg.y & " Pcg.z = " & Pcg.z)

               yi = vol/10   ' вес порожнего судна

               VBSMsg ("Вес (объем) = " & yi)

' вес груза

Rgr = 2.178 '

VBSMsg ("Вес полный = " & yi+Rgr)

' Диапазон варьирования

Dif_beg = -9

Dif_end = -10  

Два стакана (группа из 4-х половинок)

Резюме. Базовая МК «Крен» сработала быстро, хотя равновесие не идеальное (Рс и Go не на одной вертикали). 

 

 

Резюме. Базовая МК сработала, но и здесь не идеально. Требуются настройки по загрузке (вес, ЦТ, диапазон (варьирования) поиска крена).

Лодка ФК с килем и ее два клона - тримаран

Неплохой результат.

Резюме. Диапазон в котором ищется угол в базовой МК один и тот же, причем число поиска тоже одинаковое, поэтому и получается угол крена одинаковый, когда крайний диапазон угла крена приближается к его допустимому пределу и в результате «не дотягивает»  до истинного.

В StdMacro рядом с основной МК Metmk18.vbs  находятся ряд МК для конкретных объектов. Например, для лодки ФК МК Metmk18_лодка.vbs. Вот как она отработала на объект «Лодка ФК»:

Резюме. Центр поддерживающей силы Рс находится по одной вертикали с общим центром тяжести лодки, то есть лодка, хоть и с дифферентом, но находится в равновесии, потому Федор Конюхов удачно и пересек на ней Тихий океан за фантастически короткий срок – 160 суток.

Запустим МК Metmk18_Буран.vbs

Резюме. МК работает минуты 3-4. Центр поддержания Рс и вес Go не находятся на одной вертикали – то есть нет устойчивого равновесии, поэтому космический аппарат и пошел вниз – больше не летает.

Далее проверяем:  Для одного дока МК отработала, но изображение центра поддерживающей силы не с той стороны. Два дока (груз слишком большой)

  

МК «Metmk18_крен_2 дока_поверхности». Поверхности вытащить из группы.

Здесь центр поддерживающей силы и центр общего веса G почти совпали.

Пример. Сгруппируем парус и лодку ФК в одну группу и запустили базовую МК «Крен судна»

Резюме: МК отработала быстро, но видим, что опять скатилась к своему пределу, и явно здесь надо считать по-другому.

Пример. верхностей – три бульба

МК: Metmk18_ крен_для 3-х_бульб.vbs

VbsMsg "Рассчет дифферента для поверхностей"

n70 = LastNmb

' Определяем мета характеристики судна с грузом

               ar = PolyPov.area

               Set Pcg = PolyPov.centroid

               vol = ar

               yi = vol/10

               Set G1 = Pcg

Dif_beg = 0

Dif_end = -20

pn = 20

hag = (Dif_end - Dif_beg)/pn

dif = hag ' крен/дифферент - меняющийся параметр

Результат приемлемый

 

Общие выводы. В системе Вектор расчет крена планировали сделать базовой командой, но наши «карты» ФК спутал – быстро Тихий океан пересек. А по-серьезному – задача довольно интересная и за нее мог бы любой сесть для написания кандидатской и даже докторской диссертаций. Однако Куравлев (князь Милославский) сказал бы: «Мы сесть всегда успеем». Так и мы скажем – сесть всегда успеем.