Дело в том, что бортовой компьютер будет управляться операционной системой 1С.
Процедура ПриНачалеРаботыСистемы()
   НаборУчастников();
   // ...
КонецПроцедуры
Взлетит? ;)

Спирит искать?

Если PilotBrian<>0 тогда
 Участники.Добавить(PilotBrian);
КонецЕсли;

(1) Спирту мы и здесь найдем ;)

(2)
Если PilotBrian<<?>><>0 тогда
{(1)}: Переменная не определена (PilotBrian)
Участники<<?>>.Добавить(PilotBrian);
{(2)}: Переменная не определена (Участники)
При проверке модуля обнаружены синтаксические ошибки!

- Слыхал? 1С-ники на Марс полетели ...
- Шо, все?

(4) 1. Чайник! Добавь в начале процедуры: Перем PilotBrian;
2. RTFM!

(2) Надо было переменную объявить или заранее присвоить какое-нить значение. Или на крайняк в Попытку..Исключение вставить.
В принципе, можно и интерпретатор переделать.
...
Все. Переделал.
Сообщить(Участники.РазмерСписка());
>> 1

Как думаете, может Рупора вручную - ч/з ВводОстатков занести?

Перем PilotBrian;

Процедура НаборУчастников()
   Участники=СоздатьОбъект("ТаблицаЗначений");
   Участники.НоваяКолонка("Ник","Строка",,,"ФИО",30);
   Участники.НоваяКолонка("ДатаРег","Дата",,,"Дата поступления");
   
   PilotBrian=1;
   Если PilotBrian<>0 тогда
       Участники.НоваяСтрока();
       Участники.Ник="PilotBrian";
       Участники.ДатаРег=ТекущаяДата();
   КонецЕсли;
   Сообщить("ОО  "+PilotBrian);
КонецПроцедуры

Так пойдет? =)

(8) Меня и здесь неплохо кормят (с) Бекас вроде ...
Да и опоздал ты ..., они уж с полгода назад все на Ламерию улетели ...

(9) Принят! Твое имя выгравировали на корпусе корабля.
...
Спирту уже нашел.
...
Рупора занес. Провел. Проверил отчетом - уже двое.
...
Попросил у Волшебника базу "Посетители форума".
Всем разослал повестки.
Проверьте вложения - у кого-то должен быть счастливый билетик. Описание "счастья" в самораспаковывающемся архиве.

Связался по аське с Ламерией. Обещали всех одеть, накормить и вернуть.

(11) Ура! Мне пришла повестка с вложением!
Только вот архив не сразу распаковался ...
Пришлось Касперского снести, а то он ругался, говорил там вирус I-Worm.Happiness.q ...
Ох и глючный он, этот Касперский ...

(13) С Касперским разберемся. Они на пару с Доктором Вебом усиленно в 1С вирусы ищут. А по тяпницам вообще глючат. У себя тоже снес, на всякий случай ...

Блин, Пилот слинял куда-то ...
Вдвоём чтоль летим? У тебя права то хоть на ракету есть?

Пилот уже в кубрике спит.
...
Сертификат покатит? Ещё "БЦ" есть ...
Мы проще поступим - "продавцов полосатых палочек" брать с собой не будем, значит можно и без прав.

(16) А порулить дашь?

Порули, пока не взлетели ...

И я хочуПроцедура НаборУчастников()
  Участники=СоздатьОбъект("ТаблицаЗначений");
  Участники.НоваяКолонка("Ник","Строка",,,"ФИО",30);
  Участники.НоваяКолонка("ДатаРег","Дата",,,"Дата поступления");
   
     Летуны= СоздатьОбъект("Справочник.ЖелающиеЛететьНаМарс");
   Летуны.ПорядокНаименований();
   Летуны.ВыбратьЭлементы(0);
   Пока Летуны.ПолучитьЭлемент()=1 Цикл
       Если Летуны.ЭтоГруппа() = 1 Тогда
           Продолжить;
       КонецЕсли;
       
       Если глЗарегистрированНаМисте(Летуны.ТекущийЭлемент()) = 0 Тогда
           Продолжить;
       Иначе
           Сообщить("А ты полетишь в сад,"+Летуны.ТекущийЭлемент());
       КонецЕсли;
       Если Летуны.ТекущийЭлемент().Пол="Ж" Тогда
           Если Летуны.ТекущийЭлемент().Наименование="ally" Тогда
               Участники.НоваяСтрока();
                 Участники.Ник="ally";
                 Участники.ДатаРег=ТекущаяДата();
             КонецЕсли;
         Иначе        
           Участники.НоваяСтрока();
             Участники.Ник=Летуны.ТекущийЭлемент().Наименование;
             Участники.ДатаРег=ТекущаяДата();
       КонецЕсли;
       
   КонецЦикла;
   
   //Спешали для пилота
   
  PilotBrian=1;
  Если PilotBrian<>0 тогда
      Участники.НоваяСтрока();
      Участники.Ник="PilotBrian";
      Участники.ДатаРег=ТекущаяДата();
  КонецЕсли;
  Сообщить("ОО  "+PilotBrian);
КонецПроцедуры

дяди тоже в космос летать стали?

(19) Ты одна не выдержишь таких перегрузок ...

(19) Ну что можно сказать - сразу видно опытного астронавта ;)
Сообщить(Участники.РазмерСписка());
>> 3
...
(20) А сколько по твоему ещё нужно над собачками измываться?

(22)собачки летали на марс... незнал... отсал от жизни...

(21)Сфигали, это еще посмотрим кто не выдержит ;-)

(23) Щенки летали на Ламерию :))

(25)намек ясен...

Алё, зайцы, на Марсе уже перенаселение. Двигайте лучше на Сникерс, там недобор персонала.

Сори, тест: А не в баньке ли я уже?

Боишься?

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

У тебя симулятор крякнутый, глюкавит по-чёрному.

(28) Дык, вчера надо было - в баньку-то...

(32) А что, он вчерась немытый был?

(29) Не очень ..., вы ж меня вытащите через час ...
(30) Что???? Там уже нет шоколада?
(33) Я всегда стерилен, а вчера я просто плохо себя вёл ...

час на час не приходиться... пока Волшебник не появиться... даже если захотим не вытащим...

(34) Когда стерилизовали?

(21) +  ;)
Ally, а тебе не скучно будет в чисто мужской компании?

(35) Да ладно! Если я счас скажу: "Волшебник - дурак", тут же прибежит ...
ЗЫ: Это я ещё не сказал ...

Так, не толпиться у трапа, по очереди, господа, по очереди.
Все взлетим, места ещё навалом ...

(37) Нет. Я умных мужчинов люблю, уже говорила неоднократно гдето ранее и даже объясняла почему. :-)

(36) Тьфу на тебя ...

(38) Доиграешься! Рейс закроют или ещё чего доброго корабль утопят ...

(41) А я тебя за язык не тянул, сам признался :)

fellow, skunk, пора уже карты раскрыть. Вы с нами или будете по телевизору смотреть?

(42)в космосе уже топят... или это как в "Планета Сокровищ"

(44) Что там у вас по телевизору? Не видно ни зги. Летите-ка к нам, не занимайтесь самодеятельностью. :)

(45) Да, такой вот у нас здесь космос, местами по ноздри, недолго и утонуть :)

Народ отвалил ДеБе смотреть.

(46) Куда к вам??? Давай, тащи свои дубовые опилки. А тут уже вместе покумекаем над формулой. Я даже знаю куда их надо засыпать ...

А я слетаю на марс пока пишется следующая глава.... у меня корыстная цель... буду "засланцем" в штаб противников ;-)

(49) К нам, на Ламерию :о) У нас Гере - великий знаток чинного пойла! Ему даже дубовые опилки не страшны!

(50) Давай, Элия, разведай там, что к чему, и доложи по форме.

skunk - 2. v. amer. sl. напарник карточного шуллера отвлекающий внимание игроков при сдаче карт.

как после этого мне открывать карты... только при розыгрыше... сорри...

(50)"засланцы" в цвет не паляться... ((

(52)Ага, только Гере не говорите.... :-)

Скунки, Фел, я ни разу не нагадил в вашей ракете ...
А ТЕПЕРЬ БУДУ!

(54)А ни кто и не видел, ща прикроем сообщения ;-)))

(56) Ее еще догнать надо
Перем ОбратныйОтсчет Экспорт;

Процедура ОбратныйОтсчет()
   ОбратныйОтсчет = ОбратныйОтсчет -1;
   Если ОбратныйОтсчет = 0 Тогда
       ОбработкаОжидания();
       Старт();
   Иначе
       Сообщить("До старта осталось " + СокрЛП(ОбратныйОтсчет) + "сек");
   КонецЕсли;
КонецПроцедуры //ОбработкаОжидания

Процедура ПриНачалеРаботыСистемы()
//................
   ОбработкаОжидания("ОбратныйОтсчет", 60);
//................
КонецПроцедуры //ПриНачалеРаботыСистемы

ОбратныйОтсчет = ХХХХ //?????

(56) Да полно, голубчик РА, не собираемся мы в вашей ракете гадить. Это пошло!

GrayT, я так понимаю, у нас ещё один член экипажа добавился?

"Я полезных преспектив ни когда не супротив" :)

(56)а где я гадил?

Ура, леди анд джентльмены, на подмогу "Первой Эсии" отправляется дружественный (надеюсь) экипаж, ведомый славным... Постойте-ка, а кто у вас командир?

Самозванцев нам не надо.
Командиром буду я.

Кстати, как мы назовём нашу ракету?
И надо обязательно Композитора подождать, он нам гимн сочинит ...

(65)+ И СнаркХантера в стрелки ...

(64) Кадровые вопросы постепенно проясняются...

Рупор и скунки, давайте не будем выяснять где вы гадите....

(65) Все-таки решился лететь?

(68) Нет! Пусть он сознается! А потом уже ..., мы его великодушно простим ...

(65) Строго по военному "Борт 3358"

(69) Не бросать же вас одних ... Заблудитесь ...

для того что бы сознаться... надо быть уличенным... вопрос, где и чего я сделал(не сделал)

(71) Неее ... Так нельзя! Надо чё-нить героическое, мужественное, суровое ..., предлагаю: "Бородатая Женщина" ...

(74) С яй....э-э-э-э. Э-э-э?

(72) С таким-то штурманом? У него практика была еще на "Первой..", без атласов летала.

(74) "Как вы лодку назовете так она и поплывет" (с)

(73)Рупор, не флудил в наших ветках про Катастрофу на Ламерию

(78) Ну, что ж, придётся отправляться восвояси.

Фел, я просто объяснила что он имел в виду

Так, стоило ненадолго отлучиться, как  тут уже порубленные посты завелись и дискуссия затихла.

(82) Да, теперь до старта лучше не высовываться ... Пристрелить могут ...

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

(84) Это ваша шпионка постреливает ...

А не нарывайся :о)

Обиделась, а зря. Ее предупреждали

(86)Фелл, зря... я уже привык... ноль эмоций...

Давайте не будем её осуждать ..., это она от возбуждения несдержалась ...

Ох, не лезь на рожон. У нее винтовка с оптическим прицелом :)

дома инет появился

(90)СВД-19?

Кхм. (84) мирный говоришь. Ему б еще звезду (эксперт в области вооружения).
В яндексе только 6 строкой стояла - http://www.okhotnik.ru/Products/12013.html

http://www.yandex.ru/yandsearch?rpt=rad&text=%E2%E8%ED%F2%EE%E2%EA%E0+%EE%EF%F2%E8%F7%E5%F1%EA%E8%EC+%EF%F0%E8%F6%E5%EB%EE%EC+

здесь на четвертой

http://guvd.stavkray.ru/orujie/svd.htm

но больше нравиться так:
http://www.yandex.ru/yandsearch?rpt=rad&text=%F1%E2%E4+19

кооператив "Свой Дом"

Не много не в тему. Меня однажды прокатили "под прицелом" Сайги. Я тогда ее от АКМ-а отличить не смог, с тех пор недолюбливаю...

(96) Значит ты меня должен понимать ...
Я тут всегда под прицелом ... и не одним ...

Круто... Карабин от автомата не отличить... Это ж сколько выпить надо...

Процедура Полет()

Пока ПроверкаСистем()=Норма И Состояние(Экипажа)=КтоНибудьЖив Цикл

    Если ТекущаяСкорость() < Константа.ЗаданнаяСкорость Тогда
          ПоддатьСпиртуВДюзы(1000, литры);
    КонецЕсли;
       
   Если ПолучитьРасстояние(Корабль,Земля) = ПолучитьРасстояние(Корабль,Марс) Тогда
          Синтезировать(МногоЕды+Алкоголь);
          Разморозить(Экипаж);
          ОтпраздноватьСобытие(Экватор);
          Заморозить(Экипаж);
    КонецЕсли;

    Если Расстояние(Корабль,Марс) < Константа.Подлетное Тогда
          Разморозить(Экипаж);
          Прервать; //подлетаем
    КонецЕсли;
КонецЦикла;

УстановитьМонопольныйРежим(Посадка);

КонецПроцедуры //полет

100

О! Еще один участник полета...

Я замораживаться отказываюсь! Чур, я буду топливный бак сторожить ...

(102) Тебе нельзя доверять наш топливный бак, ты весь спирт выпьешь. Так у нас его не хватит, чтобы отметить посадку.

(102)ты все топливо высосешь

1. А я все летала... Но я так и знала...
2. Spread your wings and fly away, fly away far away...
3. Земля в иллюминаторе, земля в иллюминаторе...

У тебя не получится отказаться от заморозки, потому что ты не видел исходники процедуры "Заморозить". Вот они:

------------------------
Процедура Заморозить(Экипаж)

    //обрати внимание на этот цикл
    Пока Состояние(КогоНибудь)=Бодрствует Цикл
          Поить(Экипаж,Спиртом,ДоБесчувствия);
    КонецЦикла;

    Собрать(Тела,ПоВсемуКораблю);
    Поместить(Тела,АнабиозныеКамеры);
 
КонецПроцедуры
------------------------

Я замораживаться отказываюсь!!!!
У меня горло ...
... И алергия на анабиоз ...
Если нельзя топливный бак, могу сторожить синтезатор еды и самогонный аппарат ...

(107+ аЛЛергия

(107)У всех горло...

(107) от кого сторожить, если все в анабиозе? от маленьких зеленых человечков с Марса?

(99) Во второй строке резануло по глазам отсутствие скобок, а вообще Волшебник молодец - прочувствовал тему ... ;)
(102) "Сторожу топливного бака" придется до старта вшить торпеду, а то мало того, что выпьет всё, так потом ещё и начнет в холодильник за закуской лазить ...

(110) Видишь, я был уверен, что командир корабля не пойдёт на такой риск ...
(111) А вдруг топливо испортится? Надо ж кому-то периодически проверять его ...

(99) я сразу на версию 8.0 перевел.
Константа - это глобальная структура, чтобы было как в 7.7
Экипаж,Корабль,Марс,Земля - глобальные переменные
Экипажа = Экипаж
Процедура "Состояние" переписана на уровне платформы под наши нужды.

Так что теоретически все должно работать. Реальных испытаний конечно не было. Есть вероятность, что американская ПРО "Нави" ЖН попытается сбить кораблик еще при выходе на околоземную орбиту.

(113) По фиг нам ихняя ПРО ...
Наш стрелок после литра водки снарку в глаз бьёт, чтоб не пялился ...

Экспедиция на Марс с 12 людьми должна была быть запущена 13 февраля 2004 года!!!
Перенесли на год! Что вы об этом думаете

Их никого нет, они все улетели ...

а пасквилянтов не берут....

Злыдни....   (о)(о)

Алкоголики, блин!