Универсальная МК задания параллакса 4-объектов (групп)

с движением лодки (объекта 2) по направляющей

 

Объекты и макрос находится на Tasks -> Болотов В П -> Проект НЗ-Чили в лодке

1)      Фон  (Фон порт Данидин.jpg)

2)      Лодка (Лодка ФК с гребцом.dxf)

3)      Направляющая (полинию задать самим)

4)      Передний фон группа (Фон-ближний Данидин.jpg) туда же поместить *.bmp НЛО, пингвинов и прочие фигуры формата *.bmp, для этого поставить галку «Прозрачность»)

 

Этап1.jpg

В структуре должен быть порядок, как указан слева на картинке,
под номером 4 – группа в которой могут быть картинки jpg, bmp, dxf

Под номером 1 и 2 – могут также группы с картинками

Под номером 3 – обязательно направляющая - полилиния

 

Примечание. Чтобы фон картинок *.bmp просвечивал, Фон прозрачный сделать активным Вид-> Прозрачность (поставить галку)

 

 

Лодка начинает двигаться по направляющей, обращаетесь: Tasks -> Болотов В П -> Проект НЗ-Чили в лодке

к МК:  <Фон,  лодка по направляющей и передний фон-базис.vbs>

 

Текст МК:

VbsMsg "Движение 2 объектов (фон задаются первым; лодка, направляющей и передняя грппа"

n1 = LastNmb-1

n11 = LastNmb

Set B = p(0,0,0)

Np=100

Ns = 1

For u=0 To 1 Step 1/Np

       CurrObjNmb = n1 '   сделали ее активной

       Set A = Polyline.P (u)  ' точка на полилинии

'      Ngpoint.ss A

       CurrObjNmb = n1-1 '   сделали ее активной

       Obj.Translate P(A.x-B.x, A.y-B.y, A.z-B.z)

       CurrObjNmb = n1-2 '   фон сделали ее активным

       'obj.zAngle =  5

       Obj.Translate P(-0.01, 0, 0)  ' фон  смещаеся горизонтально

       Set B = A

ns=ns+1

Next

CurrObjNmb = n1-1 '   сделали  активной лодку

Obj.Translate P(-B.x, -B.y, -B.z)  ' вернули ее в начало

CurrObjNmb = n1-2 '   сделали дальний фон  активным

Obj.Translate P(0.01*Np, 0, 0)  ' фон  вернули в первоначальное положение

obj.All = 0

 

 

Универсал1.gif

Анимация с эффектом параллакс,
направляющую можно в структуре  выключить

 

На задний фон в первую группу Буцефала (сначала сделать группу и помещать последовательно с учетом видимости и потом группу поместить на первое место), во вторую группу к лодке добавили петуха. В группе (номер 4) передняя часть моря, тут же НЛО и два пингвина.

Универсал2.gif

 

Что за чудеса? Петух у нашего друга Федора на носу лодки сидит,
 над горами Буцефал скачет, НЛО навстречу летит

Используя dxf-картинки из Clipart CorelDraw можно выполнить много композиций. Вот например:

Шкаф1.gif

Студент И.Ивлев выполнил

 

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

К ноосфере Вернадского-Вайно.jpg

 

Универсал-ноосфере.gif

Задача, не торопясь решена за 600 секунд

 

                А задав, например, от космодрома Восточный траекторию через 3-пространства к ноосфере Вернадского-Вайно, и обратившись к МК 5.21, вы получите  расстояние до ноосферы и заработанную премию.

                Примечание: Промежуточные пространства – 3D фракталы нашего друга Олега Кислюка из Googla  в Сан-Франциско

 

                Пример.  Используя МК 11.20 «С ФК к звездам». Создать композицию на заданное число с девизом (ключевым словом)  из Имя + 4 числа. Например, на сегодняшнее число 28 11 2012 ФК Свобода – в Модуле Дайдж ->Свертка  дают 4 числа 11 22 34 62. Таким образом, на входе задаем через команду Текст: Имя+4 нумкода (11-99 без чисел с нулями). В результате (МК 11.20) получите соответствующие картинки и текст (картинок текстовых выражений по 81). Что-то через структуру можно удалить, заменить.
                Далее выполнить МК «Расширение пространства пример без фона Вселенной.vbs» в которой задаются круги— «галактики», которые -  как это должно быть - в расширяющемся пространстве не увеличиваются (увеличивается расстояние между ними), остальные объекты увеличиваются в размерах. Кстати буквы тоже в своих размерах не увеличиваются (увеличивается расстояние между ними), что при увеличении пространства – появляется возможность прочитать, что написано.  Этот эффект  также относится к параллаксу, тем более и здесь используется смещение. Следует заметить: на экране непосредственно в системе Вектор это выглядит впечатляюще ярче.

 

ФК1.gif

Рисованные картины  работы ФК

Параллакс – как парадигма расширяющегося пространства

Текст МК расширяющего пространства со смещением (фактически вращения Вселенной (недавно ученые физики это определили*) на маленьком участке).

                Правда, если Вселенная вращается, то в ней подчиняется общим силам тяготения и определить, что вселенная расширяется  невозможно, наподобие тому, что в галактике она  все объектны компакты и расстояние между ними не увеличивается (пример тому как люди  едут в поезде они как бы летят в пространстве, и расстояние между ними внутри не увеличивается).  Так что дурят нас с расширением пространства, но эффект все же полезный – прочитать (увидеть), без этого невозможно.

 

 ' МК Расширение и смещение (вращение Вселенной на малом участке) активной картинки

for nm =0 To 150 step 1

      obj.scale=1.01

      Obj.Translate P(0.01, 0, 0)

Next

for nm =0 To 150 step 1

      obj.scale=0.99

      Obj.Translate P(-0.01, 0, 0)

Next

 

 Комсомольская правда

вчера в 08:29

Новости:

Владимир Машков - от вора до олигарха
...научно-фантастическому роману Владимира Обручева «Плутония», где автором сценария должен быть очень уважаемый им человек - путешественник Федор Конюхов.

Машков.gif

Определить, кто за Галактикой N,
в расширяющемся пространстве находится?

Во Вселенной возможно Галактики одни расширятся во времени,
другие -  нет. Все возможно

Приведем пример Гептафрактал из фильма «Прибытие», в котором гептаподы выстреливали  «пятном», которое прочитать надо было. Герои фильма так и не сумели  прочесть (узнать) что пятно означает. Пятно ничего не значит, а вот за ним находится нужная информация – нужно было «заглянуть» за пятно. В данном случае сделать расширение и сдвиг пространство, в результате чего получим образ или  текст.

ФК10.gif

 

Пример расширение пространства с выходом той части  картинки
 которая расширяется в 3
D-Вселенной