Отправляет email-рассылки с помощью сервиса Sendsay

Новости лаборатории Наномир

  Все выпуски  

Последний натуральный выпуск рассылки "Новости лаборатории НАНОМИР"?


Выпуск 228

 Лаборатория НАНОМИР

Всё, что мне неинтересно,
я делаю по принуждению...

Последний натуральный выпуск рассылки "Новости лаборатории НАНОМИР"

Учитывая, что в ближайшем эксперименте, который планируется на 29 марта 2011 года, рубиновый генератор заработает в режиме регенерации, события могут продолжить развиваться непредсказуемо...

Я уже писал, что я не борец, а исследователь и не собираюсь повторять подвиг Джордано Бруно. Меня устраивает судьба Коперника :). Мне не нужны деньги, слава, почёт и т.п.  Мне нужны условия для научных исследований. Возможно, что Вы читаете последний натуральный выпуск рассылки "Новости лаборатории НАНОМИР".

Что это значит? Это значит, что после создания микроволновой энергетики рассылку может продолжить писать совсем другой Кушелев. Он будет писать её против своей воли, по принуждению. И там будет написано "то, что нужно" ;). Это, конечно, пессимистический прогноз, и желательно, чтобы он не сбылся. А как будет на самом деле, вы узнаете скоро, а может быть, и не очень. Помните, что говорил по ТВ Михаил Сергеевич Горбачёв сразу после катастрофы в Чернобыле?

Цитата: Советское руководство признало факт аварии лишь после того, как повышение уровня радиации, вызванное радиоактивными осадками, было отмечено в Польше и Швеции 

Поэтому узнать о создании микроволновой энергетики Вы можете из тех же источников ;)


Рубиновые шарики доставлены в Дмитров вовремя!

http://img-fotki.yandex.ru/get/6003/nanoworld2003.13/0_48565_e20056cb_L.jpg

http://img-fotki.yandex.ru/get/4909/nanoworld2003.13/0_48566_9ca22a50_L.jpg

 

http://img-fotki.yandex.ru/get/5903/nanoworld2003.13/0_48568_47f7b957_L.jpg

http://img-fotki.yandex.ru/get/5804/nanoworld2003.13/0_48569_9bbbcab2_L.jpg

http://img-fotki.yandex.ru/get/4808/nanoworld2003.13/0_4856a_7b28b2e2_L.jpg

http://img-fotki.yandex.ru/get/5605/nanoworld2003.14/0_4856b_6fa84d7b_L.jpg

Все 10 рубиновых шариков прошли ОТК лаборатории НАНОМИР :)

Подробнее.


В лабораторию НАНОМИР доставлен измерительный генератор 5-мм диапазона

http://img-fotki.yandex.ru/get/5705/nanoworld2003.14/0_485af_d7269f1_L.jpg

Миша (xuma) передал в лабораторию Наномир измерительный генератор на диапазон 53.57-78.33 ГГц
Это соответствует диапазону длин волн: 3.83 ... 5.6 мм.

Таким образом, теперь в лаборатории НАНОМИР появляется возможность настраивать рубиновые резонаторы, которые имеют диаметр от ~4 до 5.5 мм. Этот размер удобен тем, что рубиновые шарики фирм Swiss Jewel и Meller Optics такого размера стоят "копейки", в частности, шарики фирмы Swiss Jewel диаметром 4 мм стоят 2 доллара, если покупать 1000 штук.

Это в ~30 раз дешевле шариков диаметром 10 мм, которые инвестор лаборатории НАНОМИР, Вячеслав Васильев, приобрёл для ближайшего эксперимента в Дубне.

Параллельно с экспериментами в Дубне начинается подготовка к включению рубиновых шариков диаметром 4 ... 5.5 мм от электронно-лучевой сварки.


Результаты обработки видеозаписей мощного эксперимента в Дубне.

17 и 18 февраля 2011 года был проведён мощный эксперимент в Дубне, целью которого было уточнить рабочую частоту генератора. Я не был допущен к этому эксперименту. Видеозапись результатов эксперимента получил в Дубне 24 марта 2011 года.

"...и не удивляйтесь" (М.С.Горбачев), хочу напомнить, что приблизительно через неделю после включения рубинового генератора, можно уже летать на браслетах, а через месяц - на "летающих тарелках"...


Напомню, как выглядит приспособление, где размещались 6 резонаторов из ИАГ-Cr (зелёного цвета) в оправке из плотного пенопласта.

 

 Эскиз оправки был нарисован во время обсуждения предстоящего эксперимента в Дубне.

 

 

 

Единственный пасаметр я увёз в Дубну, а в Дмитрове мне чудом удалось купить этот микрометр. В магазине "Инструменты" мне сказали, что микрометры больше не пользуются спросом...

 

Дубна Дмитров Дмитров Дубна

N   N   диаметр  частота частота
6   1  11.305      29.88      29.94   Самый мелкий шарик
5    2  11.313      29.86
4    3  11.315      29.88
3    4  11.317      29.87
-    5  11.318      29.88
-    6  11.319      29.86      29.875
2    7  11.333      29.79      29.85
1    8  11.347      29.75      29.81    Самый крупный шарик

В эксперименте резонировал шарик N2 (по нумерации в Дубне), который я сделал седьмым. Его резонансная частота 29.85 (по Дубне) ближе всех к резонансной частоте генератора 29.86 (по Дубне).

При диаметре 10.00 мм и частоте 29.6...29.9 (при охлаждении) число узлов стоячей волны = 20.

Материал с форума лаборатории НАНОМИР: 2011-03-25

Plan пишет: а что за аппарат в Дубне, как он работает?

Из ускорителя вылетает пучок ускоренных частиц и проходит через замедляющую систему. В результате из замедляющей системы выходит когерентное излучение с длиной волны ~1 см мощностью 100 мегаватт. Этот луч проходит в просвете между шариками и возбуждает в них различные колебательные моды.

http://img-fotki.yandex.ru/get/5004/nanoworld2003.18/0_487d7_70d27fe2_orig.gif

В этом режиме возбуждается именно та колебательная мода, на которой я планирую включить рубиновый генератор. Это мода EH11. 11 стоячих волн по экватору шарика. 22 узла, 22 пучности стоячей волны. Это при диаметре 11.3 мм. При диаметре 10.00 мм будет возбуждаться мода EH10. 10 стоячих волн по экватору шарика. 20 узлов, 20 пучностей стоячей волны. Есть небольшая вероятность, что я не угадал моду, но это - дело поправимое. По-хорошему нужно смоделировать резонатор в разных режимах и убедиться, что рабочая мода именно эта, но современного компьютера с ОЗУ 8...16 Gb у меня нет, поэтому "идём по СКП" (из Аватара).

 http://img-fotki.yandex.ru/get/5705/nanoworld2003.18/0_48866_31a33952_orig.gif
Кушелев: Самый зрелищный режим (фрагмент N37) smile

http://img-fotki.yandex.ru/get/5905/nanoworld2003.18/0_48868_7c41c91a_orig.gif
Те же видеокадры режима возбуждения в 5 раз медленнее.

При сильном возбуждении резонаторов вдоль пучностей волны бегут миниатюрные молнии. Приблизительно так и работают источники энергии инопланетян. Только в автономном режиме. Для достижения автономного режима нужно заменить одиночные шарики на систему из 4-х рубиновых шариков одинакового диаметра. Хотя есть подозрение, что будут работать и системы из шариков с диаметром, скажем 10-11-10-11 мм smile

Изучая различные бисерные структуры я нашёл изображение источников энергии регулируемой мощности. Вот как происходит процесс регулирования мощности рубиновых генераторов инопланетян:

http://www.nanoworld.org.ru/data/02/020119/004.jpg

Видеофрагмент: http://www.nanoworld.org.ru/data/02/020119/03.avi

Подробнее: http://www.nanoworld.org.ru/data/02/020119/index.htm

Предыстория вопроса:

http://www.nanoworld.org.ru/data/01/dat … 011127.htm

http://www.nanoworld.org.ru/data/02/020113/index.htm

Материал с конферецнии на Zaryad.com : 2011-03-25

16:23:12 ‹Zoldrax› Да, но цвет-то воздушного разряда...
16:26:21 ‹kushelev› Цвет в темноте искаженный. В 37 режимах были и разряды, и свечение шариков
16:27:08 ‹kushelev› Внимательно посмотрите по ссылке: http://img-fotki.yandex.ru/get/5004/nanoworld2003.18/0_487d7_70d27fe2_orig.gif
16:27:12 ‹Zoldrax› Т.е., если светится кристалл зеленым, а не голубым, то это обнадеживает.
16:28:30 ‹kushelev› Кристалл светится зеленым, но при такой освещенности цвет камера не передает
16:28:44 ‹kushelev› По ссылке вообще нет разрядов


 Рубиновый генератор включить можно, но ...


Готовим оправку для рубиновых и гранатовых резонаторов.

Скрипт для 3DS Max:

s1 = sphere radius:5 segs:20 position:[5,5,0] wirecolor:[255,0,0]
s2 = sphere radius:5 segs:20 position:[5,-5,0]
s3 = sphere radius:5 segs:20 position:[-5,5,0]
s4 = sphere radius:5 segs:20 position:[-5,-5,0]
select #(s1,s2,s3,s4)
macros.run  "Modifier stack" "convert_to_Mesh"
attach s1 s2
attach s3 s4
attach s1 s3
s1.pivot = [0,0,0]
rotate s1 45 [0,0,1]
move s1 [27.07,0,0]
s1.pivot = [0,0,0]
s2 = copy s1 wirecolor:[0,255,0]
s2.pivot = [0,0,0]
rotate s2 90 [0,0,1]
s3 = copy s1 wirecolor:[255,0,0]
s3.pivot = [0,0,0]
rotate s3 180 [0,0,1]
s4 = copy s1 wirecolor:[0,255,0]
s4.pivot = [0,0,0]
rotate s4 270 [0,0,1]
t1 = tube radius1:20 radius2:60 height:8 sides:80 position:[0,0,0] wirecolor:[200,200,200]

http://img-fotki.yandex.ru/get/4403/nanoworld2003.18/0_4896a_b6e44173_L.png

Материал с форума Zaryad.com :

Вячеслав Васильев: Александр Юрьевич! Пожалуйста, свяжитесь со мной сегодня. На предмет поручений Владимиру по закупке необходимых Вам материалов. Я в Москве всего день, так что забегаюсь, а решить этот вопрос надо, чтобы не затягивать.

Кушелев: Доброго времени суток! Пытался связаться с Вами по скайпу.
Телефоны работают только на приём звонков:

+7-903-2003424
+7-926-5101703
+7-916-8265031

Skype: 2011-03-25

[13:08:44] sysxuma: smile Для каких задач на данном этапе времени требуется финансирование, помимо мощного компьютера?
[13:13:58] Кушелев Александр Юрьевич: В рассылке расписано. Вот здесь: http://subscribe.ru/archive/science.news.nanoworldnews/201103/16203414.html Читать после фразы: Подготовка к изготовлению рубинового генератора (и не только)
[13:17:10] Кушелев Александр Юрьевич: Учитывая, что до начала эксперимента в Дубне остаётся полтора рабочих дня, времени на составления всяческих бумаг просто нет. Если у меня будут деньги или кто-то поедет со мной закупать необходимое для эксперимента, то успеть ещё можно. Если дотянуть до пон., то с ближайшим экспериментом "не судьба"...
[13:21:34] sysxuma: с ближайшим экспериментов скорее всего пролетаем...
сколько необходимо и достаточно денег для изготовления рубинового генератора, хотя бы примерно для ориентира
[13:25:55] Кушелев Александр Юрьевич: Для изготовления не хватает абразивов, игл, двигателей, микрометров и др. мелочей. Всё это можно успеть купить до пон., если сегодня у меня будет, скажем, от 10 000 рублей или больше. Гарантии, конечно, нет, но вероятность большая.

[13:34:07] sysxuma: сегодня, боюсь, что ничего не выйдет, если же работник всё-таки потребуется, то он может в нагрузку с компьютером привезти еще и денег для подготовки рубинового генератора smile ближайший день, в который он может отправиться, это воскресенье.
[13:47:20] Кушелев Александр Юрьевич: Если в воскр., то теоретически успеваем smile
[13:52:15] sysxuma: он выедет на машине часа в 3 и  в 7-8 вечера только появится в Москоу сити
[13:52:49] Кушелев Александр Юрьевич: Годится

***

[23:44:51] Кушелев Александр Юрьевич (Вячеславу Васильеву): Давайте испытаем Ваш фрезерный станок smile Для эксперимента в Дубне нужно изготовить фторопластовую оправку для рубиновых шариков. Эскиз могу прислать.

Вот эскиз: http://zaryad.com/forum/viewtopic.php?f=14&t=22


 Фотоотчёт об экскурсии в г.Тулу, к Мартынову

 http://img-fotki.yandex.ru/get/4909/nanoworld2003.13/0_48538_6297453d_L.jpg

Подробнее.


До создания виртуального пикотехнологического ДНК-конструктора осталось 30 минут.

Скрипт-генератор ДНК / РНК

Для моделирования всевозможных азотистых оснований можно написать скрипт, который будет расставлять кольцевые модели электронов и сферические модели ядер по некому коду, который по существу является геном виртуальной реальности.

Генерация модели аденина будет выглядеть так:

adenin = azotis(11111111101000110000010000000101010)

Скрипт-генератор нуклеотидов кроме азотистых оснований будет формировать модель рибозы / дезоксирибозы и фосфатной группы.

ribose = rd(0)
doribose = rd(1)

Скрипт-генератор ДНК / РНК будет формировать структуру ДНК / РНК по нуклеотидной последовательности.

dna1 = dna(00acgt...)

Первый символ позволяет выбрать структуру ДНК / РНК.
Второй символ позволяет выбрать одиночную или двойную спираль.
Остальные символы позволяют сформировать модель конкретной последовательности нуклеотидов.

Для формирования структуры тРНК можно написать скрипт, который будет поворачивать нуклеотиды согласно композиционному паспорту РНК. Такой скрипт сможет строить стандартные участки тРНК, т.е. которые получаются без разрыва продольных диэфирных связей между нуклеотидами.

Композиционный паспорт РНК содержит информацию о взаимной композиции следующего нуклеотида относительно предыдущего. Поворот нуклеотида обычно происходит по связям P-O, т.е. его можно задать двумя углами.

Учитывая, что стабилизация структуры РНК происходит за счёт водородных и других связей, которые часто называются минорными взаимодействиями нуклеотидов, композиционные углы нередко оказываются произвольными. Это означает, что композиционный паспорт РНК представлен парами композиционных углов для каждого нуклеотида.

Например, стандартная часть тРНК будет представлена нуклеотидной последовательностью из ~90 символов типа acgt и массивом из ~90-1 пар композиционных углов. Нестандартная часть будет представлена нуклеотидной последовательностью, например, из 1 символа "a" и массивом композиций, каждый (в данном случае один) элемент которого состоит из точки привязки (номера нуклеотида стандартной последовательности) и вектора смещения и поворотов.

Учитывая, что существенная часть структуры РНК линейная, пары композиционных углов можно задавать только для нелинейной части РНК. Другими словами, началом отсчёта композиционных углов можно считать линейную структуру РНК, для которой оба композиционных угла принимаются нулевыми.

Материал с форума лаборатории НАНОМИР:

Виктория Соколик: Это правильное желание. Я тоже понимаю необходимость перенести в виртуальное пространство хотя бы 3D Max, кольцегранную модель тРНК аланина, которую сейчас доделываю из реальных колечек. Однако, написание скрипта - это не менее трудоёмкая работа, чем связывание колечек. Хотя разновидностей азотистых оснований нуклеиновых кислот и меньше, чем аминокислот в белке. Нам бы найти продвинутого математика и программиста в команду, поскольку вычислять двухгранные углы поворота, да ещё и их синхронное изменение, не то что невозможно для биохимика, а слишком трудоёмко в силу скудных математических навыков smile

http://img-fotki.yandex.ru/get/4403/nanoworld2003.10/0_48402_4f6a1a84_orig.gif http://img-fotki.yandex.ru/get/5407/nanoworld2003.10/0_483f6_88015a39_orig.gif

 

 

 

http://img-fotki.yandex.ru/get/5504/nanoworld2003.13/0_4854b_e7cfcf19_XL.png

 

Plan пишет: Что это даёт? Какой смысл от этой модели, и какую пользу эта модель может принести для человечества, или хотя бы для Вас лично? Суть какая? Смотреть на картинку и радоваться как сине жёлтые и желто красные колечки соединились и крутятся из сторону в сторону? Что даст это? Какой практический смысл всего этого?...

Виктория Соколик: Дело в том, что виртуальная кольцегранная модель рибозы и других сложных органических молекул важна, нова и значима для узкого круга специалистов, которые с её помощью могут обосновать закономерности кодирования и трансляции генома, предусмотреть механизм создания новых синтетических белков с заданными свойствами и функциями и многое, многое другое. Для остальной части человечества данная модель настолько же значима в повседневной жизни, как для Вас, например, интеграл. Как часто Вы нуждаетесь в интеграле и какая Вам лично от него польза? А те ученые, которые изобрели для Вас мобильники, интернет, компьютер и т. д., вряд ли смогли бы обойтись без интеграла.

Кушелев: Пока у меня есть свободные дни перед началом подготовки эксперимента в Дубне, я решил создать скрипт "Пикотехнология ДНК/РНК". Спиральная часть тРНК составляет около 75%. Её можно собрать из ~15 000 пластмассовых колец. Нестандартные участки тРНК ~5000 колец я уже собрал.

Скрипт "Пикотех ДНК/РНК" сможет построить спиральные участки тРНК автоматически, т.е. по матрице нулевых композиционных углов. Нестандартную часть тРНК я смогу задать парами композиционных углов по пластмассовой модели. В результате все специалисты, которых интересует структура тРНК с точностью до пикометра, смогут скачать скрипт и изучать структуру на своём компьютере.

Себе лично я сэкономлю стоимость 20 000 пластмассовых колец и 30 000 минут работы по сборке пластмассовой модели тРНК. Это 30 000 / 60 = 500 часов моей работы. Учитывая мою квалификацию (от 200 у.е. в час) экономия будет не меньше 500 * 200 = 100 000 у.е.

А специалисты по структуре ДНК/РНК получат бесценный подарок, т.к. в настоящее время они пользуются моделями, которые имеют в 1000 раз ниже точность...

Оценить новые высокие технологии, в частности пикотехнологию, могут лишь единицы, а остальные смогут это понять только через десятилетия...

Виктория Соколик: А.Ю., какой же Вы молодец. Я не знала с какой стороны взяться за построение виртуальной модели тРНК, не вручную же строить 90 нуклеотидов, а Вы за два дня скрипт написали. Отличный результат, поздравляю smile.

Кушелев: Продолжим создание скрипта. Для этого определим вектора, вокруг которых будут вращаться элементы виртуального пикотехнологического ДНК-конструктора.

Запускаем 3DS Max, запускаем скрипт, который пока строит лишь один из 9 нуклеотидов на выбор. Далее выделяем два кольцевых элемента:

http://img-fotki.yandex.ru/get/5605/nanoworld2003.14/0_485b0_70ae514a_L.png

Первый вектор, вокруг которого будет вращаться азотистое основание в обрамлении рибозы, соединяет центры этих колец. Сейчас я расскажу, как узнать координаты этих центров...

http://img-fotki.yandex.ru/get/5504/nanoworld2003.14/0_485b2_1de754a9_L.png

Вы видите список кольцевых элементов. Выделенные элементы отмечены красными стрелками. Инвертируем выделение (зелёная стрелка).

http://img-fotki.yandex.ru/get/5005/nanoworld2003.14/0_485b3_208014fc_S.gif

После инверсии выделения удаляем все кольцевые элементы (нажатием на клавишу Delete), кроме двух колец, которые после инверсии оказались невыделенными.

Далее экспортируем объект в ASCII Scene Export формат (.ase): File / Export / .ase

http://img-fotki.yandex.ru/get/4702/nanoworld2003.14/0_485b5_19da1e53_orig.png

Далее открываем сохранённый .ase файл в текстовом редакторе и находим строчки:

*TM_POS -43.39056    -19.98338    4.35080

для 34-ого

*TM_POS -19.63177    -33.74996    13.97997

и для 46-ого кольцевых элементов соответственно.

Это и есть начало и конец первого вектора. Вычитаем координаты центра 34-го кольца из координат центра 46-го кольца.

Получаем тройку координат первого вектора:

[-19.632, -33.750, 13.980] - [-43.391, -19.983, 4.351] = [23.759, -13.767, 9.629]

Проверим, как будет поворачиваться азотистое основание в обрамлении рибозы вокруг первого вектора. Для этого допишем пару строк в скрипте:

gn.pivot = [-19.632, -33.750, 13.980]
rotate gn 120 [23.759, -13.767, 9.629]

http://img-fotki.yandex.ru/get/4405/nanoworld2003.14/0_485b6_efeac9c4_L.png

При повороте азотистого основания в обрамлении рибозы на 120 градусов вокруг первого вектора. Видно, что кольцевые элементы заняли соседние позиции, т.е. поворот произведён правильно. Модель не развалилась smile

Теперь определим координаты второго вектора, вокруг которого будут вращаться оба элемента виртуального пикотехнологического ДНК / РНК-конструктора одновременно.

*TM_POS -43.39056    -10.85528    7.63071    Torus07
*TM_POS -31.51117    -8.61048    15.72521  Torus03

Второй вектор: [-11.880, -2.245, -8.094]

http://img-fotki.yandex.ru/get/4607/nanoworld2003.14/0_485d7_7191666e_L.png


http://img-fotki.yandex.ru/get/5704/nanoworld2003.14/0_485d5_ce158d6a_S.gif

Второй вектор тоже определён правильно.

Теперь нужно запрограммировать преобразование, которое перемещает выходной элемент n-ого нуклеотида в позицию входного элемента (n+1)-ого нуклеотида.

Для начала определим вектор перемещения.

*TM_POS -31.51117    -8.61048    15.72521 Torus03 - начало вектора трансляции
*TM_POS -26.00000    -58.00000    -10.00000 Torus97 - конец вектора трансляции

Вектор трансляции: [5.511 ,-49.39, -25.725]

Проверяем, попадёт ли центр кольцевого элемента фосфатной группы (начало вектора трансляции) в центр кольцевого элемента OH-группы рибозы? (в конец вектора трансляции)

http://img-fotki.yandex.ru/get/5505/nanoworld2003.14/0_485e5_219c79ec_L.png

http://img-fotki.yandex.ru/get/5004/nanoworld2003.14/0_485e6_bbcb8ce4_S.gif

Да, действительно попадает. Значит вектор трансляции определён правильно. Теперь осталось определить начальные углы трансляции, т.е. те, что дадут классическую спираль ДНК / РНК. При это точка A(n+1) должна совместиться с точкой A(n).

Углы трансляции определены.

p = #(); p1 = #(); p2 = #(); aa = #(); ax = #(); ay = #(); r = #(); nuclcol = #(); gp = #(); gn = #(); gg = #()
-- 1 a - adenosine
-- 2 c - cytosine
-- 3 g - guanine
-- 4 t - timidine
-- 5 u - uracil
-- 6 i - inosine
-- 7 p - pseudouracil
-- 8 d - dihydrouracil
-- 9 m - methyl inosine
-- 10 x - circles maximum
-- 11 w - methyl-2-guanine
-- 12 v - methyl-1-guanine
nucl = #("a","c","g","t","u","i","p","d","m","x","w","v")
nuclcolor = #([200,0,0],[200,100,100],[0,200,200],[0,0,200],[100,0,200],[200,0,200],[150,0,0],[100,50,0],[0,80,50],[100,100,100])
--*****************************************************************************************************************
seq = #("a","c","c","a","c","c","u","g","c","u","c","a","g","g","c","c","u","u","a","g","c","p","t","g","g","c","c"
,"u","c","d","g","g","a","g","a","g","g","g","p","m","c","g","i","u","u","c","c","c","u","c","w"
,"c","g","c","g","a","d","g","g","c","d","g","a","u","g","c","g","v","u","g","u","g","c","g","g","g")
--*****************************************************************************************************************
px = #(4.2,-4.2,4.2,-4.2,-4.2,4.2,-4.2,4.2)
py = #(-4.2,-4.2,4.2,4.2,4.2,4.2,-4.2,-4.2)
pz = #(4.2,4.2,4.2,4.2,-4.2,-4.2,-4.2,-4.2)
pa = #(35.27,35.27,-35.27,-35.27,35.27,35.27,-35.27,-35.27)
pb = #(45,-45,45,-45,45,-45,45,-45)
-- PH4
-- pindex = #(1,0,0,1,0,1,1,0,1,1,1,1,1,1,0,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,0,0,0,0,0,0,0,0)
-- HP3
-- pindex = #(1,0,0,1,0,1,1,0,1,1,1,1,1,1,0,1,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,1,0,1,1,1)
-- pindex for second vector
-- pindex = #(1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,1,0,1,1,1)
-- PH2
pindex = #(1,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,1,0,1,1,1)
-- pindex for translation vector
-- pindex = #(1,1,1,1,1,1,1,1,0,0,0,0,0,0,0,0,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,1,0,1,1,1)
for k = 2 to 2 do(
for ll = 1 to 8 do(p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll],py[ll],pz[ll]] wirecolor:[0,200,0]
rotate p[ll] pa[ll] [1,0,0]
rotate p[ll] pb[ll] [0,1,0])
for ll = 9 to 16 do(p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-8],py[ll-8],pz[ll-8]] wirecolor:[0,200,0]
rotate p[ll] pa[ll-8] [1,0,0]
rotate p[ll] pb[ll-8] [0,1,0])
g1 = group #(p[09],p[10],p[11],p[12],p[13],p[14],p[15],p[16])
rotate g1 60 [1,1,1]
move g1 [8.4,8.4,8.4]
ungroup g1
for ll = 17 to 24 do(p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-16],py[ll-16],pz[ll-16]] wirecolor:[0,200,0]
rotate p[ll] pa[ll-16] [1,0,0]
rotate p[ll] pb[ll-16] [0,1,0])
g2 = group #(p[17],p[18],p[19],p[20],p[21],p[22],p[23],p[24])
rotate g2 60 [-1,-1,1]
move g2 [-8.4,-8.4,8.4]
ungroup g2
for ll = 25 to 32 do(p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-24],py[ll-24],pz[ll-24]] wirecolor:[0,200,0]
rotate p[ll] pa[ll-24] [1,0,0]
rotate p[ll] pb[ll-24] [0,1,0])
g3 = group #(p[25],p[26],p[27],p[28],p[29],p[30],p[31],p[32])
rotate g3 60 [-1,1,-1]
move g3 [-8.4,8.4,-8.4]
ungroup g3
for ll = 33 to 40 do(p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-32],py[ll-32],pz[ll-32]] wirecolor:[0,150,0]
rotate p[ll] pa[ll-32] [1,0,0]
rotate p[ll] pb[ll-32] [0,1,0])
g4 = group #(p[33],p[34],p[35],p[36],p[37],p[38],p[39],p[40])
rotate g4 60 [1,-1,-1]
move g4 [8.4,-8.4,-8.4]
ungroup g4
for ll = 41 to 48 do(p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-40],py[ll-40],pz[ll-40]] wirecolor:[200,200,1]
rotate p[ll] pa[ll-40] [1,0,0]
rotate p[ll] pb[ll-40] [0,1,0])
g5 = group #(p[41],p[42],p[43],p[44],p[45],p[46],p[47],p[48])
rotate g5 60 [1,-1,-1]
rotate g5 60 [-14,-2.8,-2.8]
move g5 [8.4,-8.4,-8.4]
move g5 [14,2.8,2.8]
ungroup g5
for ll = 1 to 48 do(if pindex[ll] < 1 then (delete p[ll]))
g6 = group $tor*
rotate g6 -45 [0,0,1]
rotate g6 -15.5 [1,0,0]
move g6 [-39.5,-14.5,13]
ungroup g6
-- rybose
x = #(6,-6,0,0,0,0,15,-15,23.5,-23.5,25,-25,20,-20,19,-19,19,-19,22.5,-22.5,22.5,-22.5,10,-10,10,-10,15.5,-15.5,15.5,-15.5,0,6,-6,0,-5.5,5.5,0,-23.7,-16.5,-26,-23.5,-18,-15.5,-26)
y = #(-58,-58,-58,-58,-49,-49,-55,-55,-47,-47,-37.5,-37.5,-26.5,-26.5,-50.5,-50.5,-50.5,-50.5,-32,-32,-32,-32,-47,-47,-47,-47,-38.5,-38.5,-38.5,-38.5,-55,-63,-63,-69,-60.5

,-60.5,-66,-55.7,-48,-58,-48,-58,-56,-50)
z = #(0,0,6,-6,7,-7,0,0,0,0,0,0,0,0,6,6,-6,-6,6,6,-6,-6,7,7,-7,-7,7,7,-7,-7,-13.5,-8.5,-8.5,-10.5,-16,-16,-18,-17.5,-13,-10,-15.5,-8,-15.5,-8)
a = #(90,90,30,-30,-20,20,90,90,90,90,90,90,90,90,30,30,-30,-30,30,30,-30,-30,-20,-20,20,20,-20,-20,20,20,75,50,50,75,50,50,-30,-30,80,80,60,60,60,60)
b = #(45,-45,0,0,0,0,-5,5,95,-95,65,-65,-15,15,45,-45,45,-45,120,-120,120,-120,30,-30,30,-30,90,-90,90,-90,0,75,-75,0,75,-75,0,-45,-45,-45,30,30,235,235)
ri = #(1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1)
-- ri for translation vector
-- ri = #(1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
-- azotis
-- x - circles maximum
if (seq[k] == nucl[10]) then (
ai = #(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
axi = #(1,1,1,1,1,1,1,1)
ayi = #(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
nuclcol = nuclcolor[10])
-- a
if (seq[k] == nucl[1]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[1])
-- c
if (seq[k] == nucl[2]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[2])
-- g
if (seq[k] == nucl[3]) then (
ai = #(0,1,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,0,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[3])
-- t
if (seq[k] == nucl[4]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[4])
-- u
if (seq[k] == nucl[5]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[5])
-- i
if (seq[k] == nucl[6]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[6])
-- p
if (seq[k] == nucl[7]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[7])
-- d
if (seq[k] == nucl[8]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[8])
-- m
if (seq[k] == nucl[9]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[9])
--
for i = 1 to 3 do for j = 1 to 5 do (
n = i + 3*(j-1)
if ai[n] > 0 then (aa[n] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position:[10*(i-2),10*(j-5),10*0.5] wirecolor: nuclcol
aa[n+12]=copy aa[n] wirecolor: nuclcol
move aa[n] [0,0,-10]))
for i = 1 to 2 do for j = 1 to 4  do (
m = i + 2*(j-1)
if axi[m] > 0 then (ax[m] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position:[10*(3*(i-1.5)),10*(j-4),0] wirecolor: nuclcol
rotate ax[m] 90 [0,1,0]))
for i = 1 to 3 do for j = 1 to 5  do (
m = i + 3*(j-1)
if ayi[m] > 0 then (ay[m] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position:[10*(i-2),10*(j-4.5),0] wirecolor: nuclcol
rotate ay[m] 90 [1,0,0]))
-- rybose
for l = 1 to 44 do(
if ri[l] > 0 then (r[l] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [x[l],y[l],z[l]] wirecolor: [200,200,0]
rotate r[l] a[l] [1,0,0]
rotate r[l] b[l] [0,0,1]
))
gp[k] = group #(p[01],p[04],p[06],p[07],p[17],p[18],p[19],p[20],p[21],p[23],p[24],p[26],p[27],p[28],p[29],p[30],p[31],p[32])
gn[k] = group $tor*
-- first vector
gn[k].pivot = [-19.632, -33.750, 13.980]
rotate gn[k] 0 [23.759, -13.767, 9.629]
gg[k] = group #(gp[k],gn[k])
-- second vector
gg[k].pivot = [-43.391, -10.855, 7.631]
rotate gg[k] 0 [-11.880, -2.245, -8.094]
-- translation vector
move gg[k] [5.511 ,-49.39, -25.725]
gg[k].pivot = [-26, -58, -10]
-- translation angles
rotate gg[k] 50 [0, 1, 0]
rotate gg[k] 35 [0, 0, 1])

 

Скрипт удалось упростить:

p = #(); p1 = #(); p2 = #(); aa = #(); ax = #(); ay = #(); r = #(); nuclcol = #(); gp = #(); gn = #(); gg = #()
element0 = #(); element1 = #(); element2 = #()
-- 1 a - adenosine
-- 2 c - cytosine
-- 3 g - guanine
-- 4 t - timidine
-- 5 u - uracil
-- 6 i - inosine
-- 7 p - pseudouracil
-- 8 d - dihydrouracil
-- 9 m - methyl inosine
-- 10 x - circles maximum
-- 11 w - methyl-2-guanine
-- 12 v - methyl-1-guanine
nucl = #("a","c","g","t","u","i","p","d","m","x","w","v")
nuclcolor = #([200,0,0],[200,100,100],[0,200,200],[0,0,200],[100,0,200],[200,0,200],[150,0,0],[100,50,0],[0,80,50],[100,100,100])
--*****************************************************************************************************************
seq = #("a","c","c","a","c","c","u","g","c","u","c","a","g","g","c","c","u","u","a","g","c","p","t","g","g","c","c"
,"u","c","d","g","g","a","g","a","g","g","g","p","m","c","g","i","u","u","c","c","c","u","c","w"
,"c","g","c","g","a","d","g","g","c","d","g","a","u","g","c","g","v","u","g","u","g","c","g","g","g")
--*****************************************************************************************************************
px = #(4.2,-4.2,4.2,-4.2,-4.2,4.2,-4.2,4.2)
py = #(-4.2,-4.2,4.2,4.2,4.2,4.2,-4.2,-4.2)
pz = #(4.2,4.2,4.2,4.2,-4.2,-4.2,-4.2,-4.2)
pa = #(35.27,35.27,-35.27,-35.27,35.27,35.27,-35.27,-35.27)
pb = #(45,-45,45,-45,45,-45,45,-45)
-- PH2
-- pindex  = #(1,0,0,1,0,1,1,0, 0,0,0,0,0,0,0,0, 1,1,1,1,1,0,1,1, 0,1,1,1,1,1,1,1, 1,1,1,0,1,0,1,1, 1,0,1,1,0,1,1,1)
pindex  = #(1,0,0,1,0,1,1,0, 0,0,0,0,0,0,0,0, 1,1,1,1,1,0,1,1, 0,1,1,1,1,1,1,1, 1,1,1,0,1,0,1,1, 1,0,1,1,0,1,1,1)
pindex2 = #(1,0,0,1,0,1,1,0, 0,0,0,0,0,0,0,0, 1,1,1,1,1,0,1,1, 0,1,1,1,1,1,1,1, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0)
for k = 1 to 1 do(
for ll = 1 to 8 do(if pindex[ll] > 0 then (p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll],py[ll],pz[ll]] wirecolor:[0,200,0]
rotate p[ll] pa[ll] [1,0,0]
rotate p[ll] pb[ll] [0,1,0]))
g0 = group #(p[01],p[04],p[06],p[07])
for ll = 17 to 24 do(if pindex[ll] > 0 then (p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-16],py[ll-16],pz[ll-16]] wirecolor:[0,200,0]
rotate p[ll] pa[ll-16] [1,0,0]
rotate p[ll] pb[ll-16] [0,1,0]))
g2 = group #(p[17],p[18],p[19],p[20],p[21],p[23],p[24])
rotate g2 60 [-1,-1,1]
move g2 [-8.4,-8.4,8.4]
for ll = 25 to 32 do(if pindex[ll] > 0 then (p[ll] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [px[ll-24],py[ll-24],pz[ll-24]] wirecolor:[0,200,0]
rotate p[ll] pa[ll-24] [1,0,0]
rotate p[ll] pb[ll-24] [0,1,0]))
g3 = group #(p[26],p[27],p[28],p[29],p[30],p[31],p[32])
rotate g3 60 [-1,1,-1]
move g3 [-8.4,8.4,-8.4]
g6 = group #(g0,g2,g3)
g6.pivot = [0,0,0]
rotate g6 -45 [0,0,1]
rotate g6 -15.5 [1,0,0]
move g6 [-37.5,-9.5,11.5]
ungroup g6
ungroup g3
ungroup g2
ungroup g0
select #(p[01],p[04],p[06],p[07],p[17],p[18],p[19],p[20],p[21],p[23],p[24],p[26],p[27],p[28],p[29],p[30],p[31],p[32])
-- select $tor*
macros.run  "Modifier stack" "convert_to_Mesh"
element2[k] = copy p[1] wirecolor: [0,200,0]
for ll = 2 to 32 do(if pindex2[ll] > 0 then (attach element2[k] p[ll]))
delete p[1]
--
-- rybose
x = #(6,-6,0,0,0,0,15,-15,23.5,-23.5,25,-25,20,-20,19,-19,19,-19,22.5,-22.5,22.5,-22.5,10,-10,10,-10,15.5,-15.5,15.5,-15.5,0,6,-6,0,-5.5,5.5,0,-23.7,-16.5,-26,-23.5

,-18,-15.5,-26,-29.53,-31.51

,-21.611,-23.59,-21.611,-19.631,-29.53,-27.55,-43.389,-43.39,-37.45,-37.45,-31.51,-31.51,-37.45,-37.45)
y = #(-58,-58,-58,-58,-49,-49,-55,-55,-47,-47,-37.5,-37.5,-26.5,-26.5,-50.5,-50.5,-50.5,-50.5,-32,-32,-32,-32,-47,-47,-47,-47,-38.5,-38.5,-38.5,-38.5,-55,-63,-63,-69,-60.5

,-60.5,-66,-55.7,-48,-58,-48

,-58,-56,-50,-28.049,-26.864,-25.754,-24.57

,-32.563,-33.747,-34.857,-36.042,-26.864,-19.981,-23.46,-16.576,-19.981,-26.864,-23.385,-30.268)
z = #(0,0,6,-6,7,-7,0,0,0,0,0,0,0,0,6,6,-6,-6,6,6,-6,-6,7,7,-7,-7,7,7,-7,-7,-13.5,-8.5,-8.5,-10.5,-16,-16,-18,-17.5,-13,-10,-15.5,-8,-15.5,-8,17.242,9.165,15.637,7.56,5.902

,13.98,7.507,15.584,9.165,4.35,14.032,9.217

,4.35,9.165,-0.517,4.297)
a = #(90,90,30,-30,-20,20,90,90,90,90,90,90,90,90,30,30,-30,-30,30,30,-30,-30,-20,-20,20,20,-20,-20,20,20,75,50,50,75,50,50,-30,-30,80,80,60,60,60,60,40,70

,-55,55,40,70,-55,55,71.5,71.5,0

,-71.5,71.5,71.5,0,-71.5)
b = #(45,-45,0,0,0,0,-5,5,95,-95,65,-65,-15,15,45,-45,45,-45,120,-120,120,-120,30,-30,30,-30,90,-90,90,-90,0,75,-75,0,75,-75,0,-45,-45,-45,30,30,235,235

,-120,60,-40,-18,-120

,60,-40,-18,-60,60,0,0,-60,60,0,0)
ri = #(1,1,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,0,1,1,0,1,1,1,1,1,1,0,1,0,1,1)
for l = 1 to 60 do(
if ri[l] > 0 then (r[l] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position: [x[l],y[l],z[l]] wirecolor: [200,200,0]
rotate r[l] a[l] [1,0,0]
rotate r[l] b[l] [0,0,1]
))
select #(r[1],r[2],r[3],r[5],r[6],r[7],r[8],r[9],r[10],r[11],r[12],r[13],r[14],r[15],r[16],r[17],r[19]
,r[21],r[22],r[23],r[24],r[25],r[26],r[27],r[28],r[29],r[30],r[31],r[32],r[33],r[34],r[35],r[36],r[37],r[38],r[39]
,r[41],r[42],r[43],r[44],r[45],r[47],r[48],r[50],r[51],r[52],r[53],r[54],r[55],r[57],r[59],r[60])
macros.run  "Modifier stack" "convert_to_Mesh"
element1[k] = copy r[1] wirecolor: [200,200,0]
for ll = 2 to 60 do(if ri[ll] > 0 then (attach element1[k] r[ll]))
delete r[1]
--
if (seq[k] == nucl[10]) then (
ai = #(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
axi = #(1,1,1,1,1,1,1,1)
ayi = #(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
nuclcol = nuclcolor[10])
-- a
if (seq[k] == nucl[1]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[1])
-- c
if (seq[k] == nucl[2]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[2])
-- g
if (seq[k] == nucl[3]) then (
ai = #(0,1,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,0,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[3])
-- t
if (seq[k] == nucl[4]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[4])
-- u
if (seq[k] == nucl[5]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[5])
-- i
if (seq[k] == nucl[6]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[6])
-- p
if (seq[k] == nucl[7]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[7])
-- d
if (seq[k] == nucl[8]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,0,1,0,0,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,1,0,1,0,1,0,0,0)
nuclcol = nuclcolor[8])
-- m
if (seq[k] == nucl[9]) then (
ai = #(0,0,0,1,1,1,1,1,1,1,1,1,0,1,0)
axi = #(0,0,1,1,0,0,0,0)
ayi = #(0,1,0,0,0,0,0,0,0,1,0,1,0,1,0)
nuclcol = nuclcolor[9])
--
for i = 1 to 3 do for j = 1 to 5 do (
n = i + 3*(j-1)
if ai[n] > 0 then (aa[n] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position:[10*(i-2),10*(j-5),10*0.5] wirecolor: nuclcol
aa[n+12]=copy aa[n] wirecolor: nuclcol
move aa[n] [0,0,-10]))
for i = 1 to 2 do for j = 1 to 4  do (
m = i + 2*(j-1)
if axi[m] > 0 then (ax[m] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position:[10*(3*(i-1.5)),10*(j-4),0] wirecolor: nuclcol
rotate ax[m] 90 [0,1,0]))
for i = 1 to 3 do for j = 1 to 5  do (
m = i + 3*(j-1)
if ayi[m] > 0 then (ay[m] = torus radius1:4.8 radius2:0.4 segs:20 sides:12 position:[10*(i-2),10*(j-4.5),0] wirecolor: nuclcol
rotate ay[m] 90 [1,0,0])))

Программист мог бы дописать программу буквально за полчаса, т.к. нужно всего лишь автоматизировать процесс наращивания структуры тРНК. Поштучно добавлять нуклеотиды, т.е. достраивать модель я уже могу, используя функцию merge.


"Летающие тарелки" можно создать в качестве реквизита к продолжению фильма "Аватар"

 

Как я уже отмечал ранее, настоящие "летающие тарелки" можно делать из обыкновенного гранита и базальта. Их стоимость будет не выше стоимости обычного реквизита к научно-фантастическому фильму "Аватар". А включить можно будет весь номинальный ряд "летающих тарелок" от рубинового генератора...


Эликсир "вечной молодости" создадут на Пандоре?


О том, как создать эликсир "вечной молодости", я написал в газете "Дмитровские известия" ещё в сентябре 2010 года. Прошло более 7 месяцев. Если я не ошибаюсь (а как хотелось бы ошибиться!), на нашей планете люди готовы и дальше умирать от несчастной старости. Если удастся заинтересовать Джеймса Кэмерона сценариями для продолжения фильма "Аватар", то в качестве реквизита ко второй серии будут созданы настоящие "летающие тарелки", а эликсир "вечной молодости" можно будет создать прямо на Пандоре, откуда его будут привозить на нашу планету с межзвёздной наценкой ;)

Но если лично Вас интересует создание отечественного эликсира "вечной молодости", то напомню, что ~90% от затрат по проведению эксперимента Золдракса / Zoldrax берёт на себя Институт геронтологии НАМН Украины, а инвесторам предлагается оплатить только лабораторных животных, корм для мышек и расходные материалы для операций и анализов, т.е. в общей сложности нужно набрать 2.5 тыс. долл. И тот, кто внесёт часть этой суммы, сможет после создания эликсира "вечной молодости" не только омолодиться, но и участвовать в продаже эликсира. Напомню, что только экономия на выплате пенсий в масштабах планеты превысит валовой продукт России, т.е. 2.5 триллиона долл. в месяц.


 Первые аватары на Луне...


Учитывая, что настоящие "летающие тарелки" могут быть изготовлены в качестве декораций к очередной серии фильма "Аватар", первыми на нашу настоящую Луну могут высадиться ... аборигены с Пандоры! Естественно, что после Пандоры сделать компьютерную графику "на Луне" - не проблема, но сенсацией может стать реальная съёмка фильма на реальной Луне, куда ещё (к сожалению) не ступала нога человека. При этом Джеймс Кэмерон сможет спасти честь Америки (или хотя бы её часть), правительство которой уже 40 лет обманывает народы всех стран, продолжая лгать о пилотируемых полётах к Луне и высадке людей на Луну.



 Многорукие Боги с Пандоры.

Те, кто смотрел фильм "Аватар", могли заметить необычные виды животных, например нечто типа шакалов с лапами, строение которых совпадает со строением скелета многорукого Шивы, запечатлённого в частности в скульптурах храмовых комплексов в Индии.

http://img-fotki.yandex.ru/get/5804/nanoworld2003.17/0_48765_5bad3483_L.jpg

Видеокадр из фильма "Аватар"

http://img-fotki.yandex.ru/get/6004/nanoworld2003.17/0_4875b_6b913369_L.jpg

Фото скульптуры многорукой богини из Индии

Другие фотографии из фотоальбома "Храмовый комплекс Кхаджурахо / Khajurahpo"

Учитывая, что жители Пандоры в космос не летали, можно сделать вывод, что животный мир Пандоры натуральный, т.е. он должен был появиться в процессе эволюции на этой планете. В таком случае все млекопитающие должны иметь сходное строение скелета, т.е. у аборигенов Пандоры должны быть руки, как у многорукого Шивы...

http://img-fotki.yandex.ru/get/6005/nanoworld2003.17/0_4876a_f6b229e4_L.jpg

Понятно, что до таких тонкостей научные консультанты фильма "Аватар" не дошли, а если бы дошли, то главные герои фильма могли бы быть многорукими. Кстати, цвет кожи у них уже соответствует цвету кожи Кришны (в переводе на русский язык - лиловый).

Кстати, неплохая идея для второй серии "Аватара" smile

Типа того, что в первой серии показали не настоящих аборигенов, которые живут внутри планеты, а после того, как им сломали дерево, они вылезли на поверхность, "и сюжет стал закручиваться по полной программе" smile

 

 

 

Настоящие многорукие аборигены Пандоры могли быть потомками высокоразвитых инопланетян. У них могла остаться аппаратура инопланетян, которую можно показать во второй серии фильма "Аватар". А в третьей серии можно показать и самих инопланетян в эпизоде "Третье пришествие".

Изюминка сценария заключается в том, что бюджет фильма "Аватар" позволит в качестве декораций создать настоящие "летающие тарелки", трезубцы, ваджры, боевые жилеты-катафоты...

Прикиньте, какой триумф будет у фильма, если там будет показана действующая техника инопланетян, созданная в качестве декораций к фильму? smile

А на выходе из зрительного зала в обмен на стереоочки зрители будут получать флакончики с эликсиром "вечной молодости", которых должно хватить до выхода следующей серии фильма "Аватар". Приходите смотреть следующую серию, а Вам уже не 90 лет, а 30...

Это уже реальная фантастика, а не Голливуд smile

 

Кстати, любопытно, что многие боги изображаются не только с разными лицами и разной комплекцией, но и с разным числом рук. Это косвенно подтверждает, что они являются собирательными образами инопланетян, причём один и тот же бог может быть представлен скульптурами инопланетян разных видов...


Эротическая маскировка инопланетных звездолётов...

 

Изучая "Храмовый комплекс Кхаджурахо / Khajurahpo" я обнаружил явные признаки мегалитических объектов. Это означает, что скульптуры изначально были изготовлены инопланетянами. Зачем, спрашивается, изображать в т.ч. эротические сцены на поверхности, скажем, звездолёта или выпаривательного комплекса? Зная, что фигуры людей и животных обычно изображаются для маскировки, нетрудно догадаться, что и в этом случае мы видим именно маскировку, цель которой максимально отвлечь внимание потенциального врага от его основной задачи. Пока он будет соображать, что он видит, пройдёт некоторое время, а при разборках инопланетян счёт идёт на микро- и наносекунды...


Обсудить на форуме


В избранное