\b;Программы, отправленные Хьюстоном
Так как вам в этой миссии будет необходимо много титана, мы написали очень эффективную программу \c;CollectTitanium\n;. Она одновременно собирает все титановые слитки на свободной поверхности, поэтому вы можете позволить ей самой выполнить всю работу. Она также сама себя подзаряжает у \l;электростанции\u object\station;, если в этом возникает необходимость.
\c;
\s;extern void object::CollectTitanium3()
\s;{
\s;	// 1) Задание переменной.
\s;	\l;object\u cbot\type;  item;            // информация об объектах
\s;	
\s;	\l;while\u cbot\while; (true)             // повторять всегда
\s;	{
\s;		
\s;		// 2) Перейти к титановой руде и взять ее.
\s;		item = \l;radar\u cbot\radar;(\l;TitaniumOre\u cbot\category;);// искать титан
\s;		\l;goto\u cbot\goto;(item.position);     // перейти к позиции
\s;		\l;grab\u cbot\grab;();                  // взять титан
\s;		
\s;		// 3) Перейти к преобразователю и сбросить его.
\s;		item = \l;radar\u cbot\radar;(\l;Converter\u cbot\category;); // искать преобразователь
\s;		\l;goto\u cbot\goto;(item.position);     // перейти к позиции
\s;		\l;drop\u cbot\drop;();                  // сбросить титан
\s;		\l;move\u cbot\move;(-2.5);              // отойти назад на 2,5 метра
\s;		
\s;		// 4) Подождать пока титан будет преобразован и забрать его
\s;		\l;do\u cbot\do;
\s;		{
\s;			\l;wait\u cbot\wait;(1);              // ждать слиток
\s;			item = \l;radar\u cbot\radar;(\l;Titanium\u cbot\category;, 0, 45, 0, 5);
\s;		}
\s;		\l;while\u cbot\while; ( item == null );
\s;		\l;goto\u cbot\goto;(item.position);
\s;		\l;grab\u cbot\grab;();                   // взять его
\s;		
\s;		// 5) Drop on a free space
\s;		\l;goto\u cbot\goto;(\l;space\u cbot\space;(position));    // выйти на свободное место
\s;		\l;drop\u cbot\drop;();                   // сбросить титан
\s;		
\s;		// 6) Если батарея разряжена, зарядить ее.
\s;		\l;if\u cbot\if; ( energyCell.energyLevel < 0.5 )
\s;		{                         // if so:
\s;			item = \l;radar\u cbot\radar;(\l;PowerStation\u cbot\category;);
\s;			\l;if\u cbot\if; ( item != null )   // станция найдена ?
\s;			{
\s;				\l;goto\u cbot\goto;(item.position); // идти туда
\s;				\l;while\u cbot\while; ( energyCell.energyLevel < 1 )
\s;				{                 // пока идет зарядка:
\s;					\l;wait\u cbot\wait;(1);      // ждать
\s;				}
\s;			}
\s;		}
\s;	}
\s;}
\n;
\b;Архивы
Список программ, отправленных в предыдущих миссиях

o  \c;\l;KillAnt1\u mlsaari2;\n;
o  \c;\l;CollectTitanium2\u mlcrys2;\n;
o  \c;\l;CollectTitanium1\u mlcrys1;\n;
o  \c;\l;Recharge2\u mltropi3;\n;
o  \c;\l;Recharge1\u mllune4;\n;
o  \c;\l;SwitchCell1\u mllune1;\n;
