colobot-data/help/R/mlvolca1.txt

62 lines
3.3 KiB
Plaintext
Raw Normal View History

\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;